added better '-' support
[swftools.git] / lib / args.h
1 /* args.h
2    Routines to simplify argument handling
3
4    Part of the swftools package.
5
6    Copyright (c) 2001 Matthias Kramm <kramm@quiss.org> 
7  
8    This program is free software; you can redistribute it and/or modify
9    it under the terms of the GNU General Public License as published by
10    the Free Software Foundation; either version 2 of the License, or
11    (at your option) any later version.
12
13    This program is distributed in the hope that it will be useful,
14    but WITHOUT ANY WARRANTY; without even the implied warranty of
15    MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
16    GNU General Public License for more details.
17
18    You should have received a copy of the GNU General Public License
19    along with this program; if not, write to the Free Software
20    Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307  USA */
21
22 #ifndef __args_h__
23 #define __args_h__
24
25 #ifndef NO_ARGPARSER
26
27 extern int args_callback_option(char*,char*);
28 extern int args_callback_longoption(char*,char*);
29 extern int args_callback_command(char*,char*);
30 extern void args_callback_usage(char*name);
31
32 //int argn;
33 //char**argv;
34
35 static void processargs(int argn2,char**argv2)
36 {
37     int t;
38     if(argn2==1)
39     {
40         args_callback_usage(argv2[0]);
41         exit(1);
42     }
43     for(t=1;t<argn2;t++)
44     {
45         char*next;
46         if(t<argn2-1) next=argv2[t+1];
47         else        next=0;
48
49         if(argv2[t][0]=='-' && argv2[t][1])
50         {
51             if(argv2[t][1]=='-')
52             {
53                 if(!strcmp(&argv2[t][2],"help")) 
54                 {
55                     args_callback_usage(argv2[0]);
56                     exit(1);
57                 }
58                 t+=args_callback_longoption(&argv2[t][2],next);
59             }
60             else
61             {
62                 if(strchr("?h",argv2[t][1]))
63                 {
64                     args_callback_usage(argv2[0]);
65                     exit(1);
66                 }
67                 if(argv2[t][1]) // this might be something like e.g. -xvf
68                 {
69                     char buf[2];
70                     int s=1;
71                     int ret;
72                     buf[1]=0;
73                     do{
74                         if(argv2[t][s+1]) {
75                           buf[0] = argv2[t][s];
76                           ret = args_callback_option(buf,&argv2[t][s+1]);
77                         }
78                         else {
79                           t+= args_callback_option(&argv2[t][s], next);
80                           break;
81                         }
82                         s++;
83                     } while(!ret);
84                 }
85             }
86         }
87         else
88         {
89             t+=args_callback_command(argv2[t],next);
90         }
91     }
92 }
93
94 struct options_t
95 {
96     char*shortoption;
97     char*longoption;
98 };
99
100 static int args_long2shortoption(struct options_t*options, char*name, char*val)
101 {
102     char*equal = strchr(name,'=');
103     if (equal) {
104         *equal = 0;
105         equal++;
106     }
107     while(options->shortoption) {
108         if(!strcmp(options->longoption, name)) {
109                 char*tmp = (char*)malloc(strlen(options->shortoption)
110                         +(equal?strlen(equal)+2:2));
111                 strcpy(tmp, options->shortoption);
112                 if(equal) {
113                     //strcpy(&tmp[strlen(tmp)], equal);
114                     int ret = args_callback_option(tmp, equal);
115                     if(!ret) {
116                         fprintf(stderr, "Warning: Option --%s takes no parameter.\n", name);
117                     }
118                     return 0;
119                 }
120                 return args_callback_option(tmp,val);
121         }
122         options++;
123     }
124     fprintf(stderr, "Unknown option: --%s\n", name);
125     exit(1);
126 }
127
128 #endif
129
130 /* check whether the value t is in a given range.
131   examples: 3 is in range 1-10: true
132             7 is in range 2-4,6,8-10: false
133             9 is in range 1,2,3-12: true
134 */
135 static char is_in_range(int t, char*irange)
136 {
137     char*pos = irange;
138     char*digits;
139     int num;
140     char range = 0;
141     int last=0;
142     char tmp;
143
144     if(!irange)  // no range resembles (-OO,OO)
145         return 1;
146
147     while(*pos)
148     {
149         while(*pos == ' ' || *pos == '\r' || *pos == '\n' || *pos == '\t')
150             pos++;
151
152         digits = pos;
153         while(*digits>='0' && *digits<='9')
154             digits++;
155         if(digits == pos) {
156             fprintf(stderr, "Error: \"%s\" is not a valid format (digit expected)\n",irange);
157             exit(1);
158         }
159         
160         tmp=*digits;*digits=0;
161         num = atoi(pos);
162         *digits=tmp;
163         pos = digits;
164
165         while(*pos == ' ' || *pos == '\r' || *pos == '\n' || *pos == '\t')
166             pos++;
167
168         if(range && last<=t && num>=t)
169             return 1;
170         if(range) {
171             range = 0;
172             if(*pos)
173              pos ++;
174             continue;
175         }
176
177         if(*pos=='-')
178         {
179             if(range) {
180                 fprintf(stderr, "Error: \"%s\" is not a valid format (too many '-'s)\n",irange);
181                 exit(1);
182             }
183             last = num;
184             range = 1;
185             if(*pos)
186              pos ++;
187             continue;
188         } 
189         else 
190         {
191             /* if it isn't a '-', we assume it is a seperator like
192                ',', ';', ':', whatever. */
193             if(t == num)
194                 return 1;
195             if(*pos)
196              pos ++;
197             continue;
198         }
199     }
200     if(range && last<=t)
201         return 1;
202     return 0;
203 }
204
205 #endif //__args_h__