1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
|
#
# parsearg.rb - parse arguments
# $Release Version: $
# $Revision$
# $Date$
# by Yasuo OHBA(SHL Japan Inc. Technology Dept.)
#
# --
#
#
#
$RCS_ID=%q$Header$
require "getopts"
def printUsageAndExit()
if $USAGE
eval($USAGE)
end
exit()
end
def setParenthesis(ex, opt, c)
if opt != ""
ex = sprintf("%s$OPT_%s%s", ex, opt, c)
else
ex = sprintf("%s%s", ex, c)
end
return ex
end
def setOrAnd(ex, opt, c)
if opt != ""
ex = sprintf("%s$OPT_%s %s%s ", ex, opt, c, c)
else
ex = sprintf("%s %s%s ", ex, c, c)
end
return ex
end
def setExpression(ex, opt, op)
if !op
ex = sprintf("%s$OPT_%s", ex, opt)
return ex
end
case op.chr
when "(", ")"
ex = setParenthesis(ex, opt, op.chr)
when "|", "&"
ex = setOrAnd(ex, opt, op.chr)
else
return nil
end
return ex
end
def parseArgs(argc, nopt, single_opts, *opts)
if (noOptions = getopts(single_opts, *opts)) == nil
printUsageAndExit()
end
if nopt
ex = nil
pos = 0
for o in nopt.split(/[()|&]/)
pos += o.length
ex = setExpression(ex, o, nopt[pos])
pos += 1
end
begin
if !eval(ex)
printUsageAndExit()
end
rescue
print "Format Error!! : \"" + nopt + "\"\t[parseArgs]\n"
exit!(-1)
end
end
if ARGV.length < argc
printUsageAndExit()
end
return noOptions
end
|
