realy suppress size output when talking to stdout. Patch from Mat Zimmerman @ debian
[rrdtool.git] / src / rrd_tool.c
1 /*****************************************************************************
2  * RRDtool 1.1.x  Copyright Tobias Oetiker, 1997 - 2002
3  *****************************************************************************
4  * rrd_tool.c  Startup wrapper
5  *****************************************************************************/
6
7 #include "rrd_tool.h"
8 #include "rrd_xport.h"
9
10 void PrintUsage(char *cmd);
11 int CountArgs(char *aLine);
12 int CreateArgs(char *, char *, int, char **);
13 int HandleInputLine(int, char **, FILE*);
14 int RemoteMode=0;
15 int ChangeRoot=0;
16 #define TRUE            1
17 #define FALSE           0
18 #define MAX_LENGTH      10000
19
20
21 void PrintUsage(char *cmd)
22 {
23
24     char help_main[] =
25            "RRDtool 1.1.x  Copyright 1997-2003 by Tobias Oetiker <tobi@oetiker.ch>\n"
26            "               Compiled " MAKE_TIMESTAMP "\n\n"
27            "Usage: rrdtool [options] command command_options\n\n";
28
29     char help_list[] =
30            "Valid commands: create, update, graph, dump, restore,\n"
31            "\t\tlast, info, fetch, tune, resize, xport\n\n";
32
33     char help_listremote[] =
34            "Valid remote commands: quit, ls, cd, mkdir\n\n";
35
36
37     char help_create[] =
38            "* create - create a new RRD\n\n"
39            "\trrdtool create filename [--start|-b start time]\n"
40            "\t\t[--step|-s step]\n"
41            "\t\t[DS:ds-name:DST:dst arguments]\n" 
42            "\t\t[RRA:CF:cf arguments]\n\n";
43
44     char help_dump[] =
45            "* dump - dump an RRD to XML\n\n"
46            "\trrdtool dump filename.rrd >filename.xml\n\n";
47
48     char help_info[] =
49            "* info - returns the configuration and status of the RRD\n\n"
50            "\trrdtool info filename.rrd\n\n";
51
52     char help_restore[] =
53            "* restore - restore an RRD file from its XML form\n\n"
54            "\trrdtool restore [--range-check|-r] filename.xml filename.rrd\n\n";
55
56     char help_last[] =
57            "* last - show last update time for RRD\n\n"
58            "\trrdtool last filename.rrd\n\n";
59
60     char help_update[] =
61            "* update - update an RRD\n\n"
62            "\trrdtool update filename\n"
63            "\t\t--template|-t ds-name:ds-name:...\n"
64            "\t\ttime|N:value[:value...]\n\n"
65            "\t\tat-time@value[:value...]\n\n"
66            "\t\t[ time:value[:value...] ..]\n\n";
67
68     char help_fetch[] =
69            "* fetch - fetch data out of an RRD\n\n"
70            "\trrdtool fetch filename.rrd CF\n"
71            "\t\t[--resolution|-r resolution]\n"
72            "\t\t[--start|-s start] [--end|-e end]\n\n";
73
74     char help_graph[] =
75            "* graph - generate a graph from one or several RRD\n\n"
76            "\trrdtool graph filename [-s|--start seconds] [-e|--end seconds]\n"
77            "\t\t[-x|--x-grid x-axis grid and label]\n"
78            "\t\t[--alt-y-grid]\n"
79            "\t\t[-y|--y-grid y-axis grid and label]\n"
80            "\t\t[-v|--vertical-label string] [-w|--width pixels]\n"
81            "\t\t[-h|--height pixels] [-o|--logarithmic]\n"
82            "\t\t[-u|--upper-limit value] [-z|--lazy]\n"
83            "\t\t[-l|--lower-limit value] [-r|--rigid]\n"
84            "\t\t[-g|--no-legend]\n"
85            "\t\t[--font FONTTAG:size:font]\n"
86            "\t\t[--zoom factor]\n"       
87            "\t\t[--alt-autoscale]\n"
88            "\t\t[--alt-autoscale-max]\n"
89            "\t\t[--units-exponent value]\n"        
90            "\t\t[--step seconds]\n"        
91            "\t\t[-f|--imginfo printfstr]\n"
92            "\t\t[-a|--imgformat PNG]\n"
93            "\t\t[-c|--color COLORTAG#rrggbb[aa]] [-t|--title string]\n"
94            "\t\t[DEF:vname=rrd:ds-name:CF]\n"
95            "\t\t[CDEF:vname=rpn-expression]\n"
96            "\t\t[PRINT:vname:CF:format]\n"
97            "\t\t[GPRINT:vname:CF:format]\n"
98            "\t\t[HRULE:value#rrggbb[aa][:legend]]\n"
99            "\t\t[VRULE:value#rrggbb[aa][:legend]]\n"
100            "\t\t[LINE{1|2|3}:vname[#rrggbb[aa][:legend]]]\n"
101            "\t\t[AREA:vname[#rrggbb[aa][:legend]]]\n"
102            "\t\t[STACK:vname[#rrggbb[aa][:legend]]]\n\n";
103
104     char help_tune[] =
105            " * tune -  Modify some basic properties of an RRD\n\n"
106            "\trrdtool tune filename\n"
107            "\t\t[--heartbeat|-h ds-name:heartbeat]\n"
108            "\t\t[--data-source-type|-d ds-name:DST]\n"
109            "\t\t[--data-source-rename|-r old-name:new-name]\n"
110            "\t\t[--minimum|-i ds-name:min] [--maximum|-a ds-name:max]\n"
111            "\t\t[--deltapos scale-value] [--deltaneg scale-value]\n"
112            "\t\t[--failure-threshold integer]\n"
113            "\t\t[--window-length integer]\n"
114            "\t\t[--alpha adaptation-parameter]\n"
115            "\t\t[--beta adaptation-parameter]\n"
116            "\t\t[--gamma adaptation-parameter]\n"
117            "\t\t[--gamma-deviation adaptation-parameter]\n"
118            "\t\t[--aberrant-reset ds-name]\n\n";
119
120     char help_resize[] =
121            " * resize - alter the lenght of one of the RRAs in an RRD\n\n"
122            "\trrdtool resize filename rranum GROW|SHRINK rows\n\n";
123
124     char help_xport[] =
125            "* xport - generate XML dump from one or several RRD\n\n"
126            "\trrdtool xport [-s|--start seconds] [-e|--end seconds]\n"
127            "\t\t[-m|--maxrows rows]\n"
128            "\t\t[--step seconds]\n"        
129            "\t\t[DEF:vname=rrd:ds-name:CF]\n"
130            "\t\t[CDEF:vname=rpn-expression]\n"
131            "\t\t[XPORT:vname:legend]\n\n";
132
133     char help_quit[] =
134            " * quit - closeing a session in remote mode\n\n"
135            "\trrdtool quit\n\n";
136
137     char help_ls[] =
138            " * ls - lists all *.rrd files in current directory\n\n"
139            "\trrdtool ls\n\n";
140
141     char help_cd[] =
142            " * cd - changes the current directory\n\n"
143            "\trrdtool cd new direcotry\n\n";
144
145     char help_mkdir[] =
146            " * mkdir - creates a new direcotry\n\n"
147            "\trrdtool mkdir newdirecotryname\n\n";
148
149     char help_lic[] =
150            "RRDtool is distributed under the Terms of the GNU General\n"
151            "Public License Version 2. (www.gnu.org/copyleft/gpl.html)\n\n"
152
153            "For more information read the RRD manpages\n\n";
154
155     enum { C_NONE, C_CREATE, C_DUMP, C_INFO, C_RESTORE, C_LAST,
156            C_UPDATE, C_FETCH, C_GRAPH, C_TUNE, C_RESIZE, C_XPORT,
157            C_QUIT, C_LS, C_CD, C_MKDIR };
158
159     int help_cmd = C_NONE;
160
161     if (cmd)
162         {
163             if (!strcmp(cmd,"create"))
164                 help_cmd = C_CREATE;
165             else if (!strcmp(cmd,"dump"))
166                 help_cmd = C_DUMP;
167             else if (!strcmp(cmd,"info"))
168                 help_cmd = C_INFO;
169             else if (!strcmp(cmd,"restore"))
170                 help_cmd = C_RESTORE;
171             else if (!strcmp(cmd,"last"))
172                 help_cmd = C_LAST;
173             else if (!strcmp(cmd,"update"))
174                 help_cmd = C_UPDATE;
175             else if (!strcmp(cmd,"fetch"))
176                 help_cmd = C_FETCH;
177             else if (!strcmp(cmd,"graph"))
178                 help_cmd = C_GRAPH;
179             else if (!strcmp(cmd,"tune"))
180                 help_cmd = C_TUNE;
181             else if (!strcmp(cmd,"resize"))
182                 help_cmd = C_RESIZE;
183             else if (!strcmp(cmd,"xport"))
184                 help_cmd = C_XPORT;
185             else if (!strcmp(cmd,"quit"))
186                 help_cmd = C_QUIT;
187             else if (!strcmp(cmd,"ls"))
188                 help_cmd = C_LS;
189             else if (!strcmp(cmd,"cd"))
190                 help_cmd = C_CD;
191             else if (!strcmp(cmd,"mkdir"))
192                 help_cmd = C_MKDIR;
193         }
194     fputs(help_main, stdout);
195     switch (help_cmd)
196         {
197             case C_NONE:
198                 fputs(help_list, stdout);
199                 if (RemoteMode){
200                    fputs(help_listremote, stdout);
201                 }
202                 break;
203             case C_CREATE:
204                 fputs(help_create, stdout);
205                 break;
206             case C_DUMP:
207                 fputs(help_dump, stdout);
208                 break;
209             case C_INFO:
210                 fputs(help_info, stdout);
211                 break;
212             case C_RESTORE:
213                 fputs(help_restore, stdout);
214                 break;
215             case C_LAST:
216                 fputs(help_last, stdout);
217                 break;
218             case C_UPDATE:
219                 fputs(help_update, stdout);
220                 break;
221             case C_FETCH:
222                 fputs(help_fetch, stdout);
223                 break;
224             case C_GRAPH:
225                 fputs(help_graph, stdout);
226                 break;
227             case C_TUNE:
228                 fputs(help_tune, stdout);
229                 break;
230             case C_RESIZE:
231                 fputs(help_resize, stdout);
232                 break;
233             case C_XPORT:
234                 fputs(help_xport, stdout);
235                 break;
236             case C_QUIT:
237                 fputs(help_quit, stdout);
238                 break;
239             case C_LS:
240                 fputs(help_ls, stdout);
241                 break;
242             case C_CD:
243                 fputs(help_cd, stdout);
244                 break;
245             case C_MKDIR:
246                 fputs(help_mkdir, stdout);
247                 break;
248         }
249     fputs(help_lic, stdout);
250 }
251
252
253 int main(int argc, char *argv[])
254 {
255     char **myargv;
256     char aLine[MAX_LENGTH];
257 #ifdef HAVE_CHROOT    
258     char *firstdir="";
259 #endif
260 #ifdef MUST_DISABLE_SIGFPE
261     signal(SIGFPE,SIG_IGN);
262 #endif
263 #ifdef MUST_DISABLE_FPMASK
264     fpsetmask(0);
265 #endif
266     if (argc == 1)
267         {
268             PrintUsage("");
269             return 0;
270         }
271     
272     if (((argc == 2)||(argc == 3)) && !strcmp("-",argv[1]))
273         {
274 #if HAVE_GETRUSAGE
275           struct rusage  myusage;
276           struct timeval starttime;
277           struct timeval currenttime;
278           struct timezone tz;
279
280             tz.tz_minuteswest =0;
281             tz.tz_dsttime=0;
282             gettimeofday(&starttime,&tz);
283 #endif
284           RemoteMode=1;
285 #ifdef HAVE_CHROOT
286           if ((argc == 3) && strcmp("",argv[2])){
287              if (getuid()==0){
288                 chroot(argv[2]);
289                 if (errno!=0){
290                    fprintf(stderr,"ERROR: can't change root to '%s' errno=%d\n",
291                            argv[2],errno);
292                     exit(errno);
293                 }
294                 ChangeRoot=1;
295                 firstdir="/";
296              }
297              else{
298                 firstdir=argv[2];
299              }
300           }
301           if (strcmp(firstdir,"")){
302              chdir(firstdir);
303              if (errno!=0){
304                 fprintf(stderr,"ERROR: %s\n",strerror(errno));
305                 exit(errno);
306              }
307           }
308 #else
309           fprintf(stderr,"ERROR: change root is not supported by your OS "
310                          "or at least by this copy of rrdtool\n");
311           exit(1);
312 #endif
313
314             while (fgets(aLine, sizeof(aLine)-1, stdin)){
315                 if ((argc = CountArgs(aLine)) == 0)  {
316                     fprintf(stderr,"ERROR: not enough arguments\n");                
317                 }
318                 if ((myargv = (char **) malloc((argc+1) * 
319                                                sizeof(char *))) == NULL)   {
320                     perror("malloc");
321                     return -1;
322                 }
323                 if ((argc=CreateArgs(argv[0], aLine, argc, myargv)) < 0) {
324                     fprintf(stderr, "ERROR: creating arguments\n");
325                     return -1;
326                 }
327
328                 if (HandleInputLine(argc, myargv, stdout))
329                     return -1;
330                 free(myargv);
331
332 #if HAVE_GETRUSAGE
333                 getrusage(RUSAGE_SELF,&myusage);
334                 gettimeofday(&currenttime,&tz);
335                 printf("OK u:%1.2f s:%1.2f r:%1.2f\n",
336                        (double)myusage.ru_utime.tv_sec+
337                        (double)myusage.ru_utime.tv_usec/1000000.0,
338                        (double)myusage.ru_stime.tv_sec+
339                        (double)myusage.ru_stime.tv_usec/1000000.0,
340                        (double)(currenttime.tv_sec-starttime.tv_sec)
341                        +(double)(currenttime.tv_usec-starttime.tv_usec)
342                        /1000000.0);
343 #else
344                 printf("OK\n");
345 #endif
346                 fflush(stdout); /* this is important for pipes to work */
347             }
348         }
349     else if (argc == 2)
350         {
351                 PrintUsage(argv[1]);
352                 exit(0);
353         }
354     else if (argc == 3 && !strcmp(argv[1],"help"))
355         {
356                 PrintUsage(argv[2]);
357                 exit(0);
358         }
359     else
360         HandleInputLine(argc, argv, stderr);    
361     return 0;
362 }
363
364 /* HandleInputLine is NOT thread safe - due to readdir issues,
365    resolving them portably is not really simple. */
366 int HandleInputLine(int argc, char **argv, FILE* out)
367 {
368 #if defined(HAVE_OPENDIR) && defined (HAVE_READDIR)
369     DIR           *curdir; /* to read current dir with ls */
370     struct dirent *dent;
371 #endif
372 #if defined(HAVE_SYS_STAT_H)
373     struct stat   st;
374 #endif
375     optind=0; /* reset gnu getopt */
376     opterr=0; /* no error messages */
377
378     if (RemoteMode){
379        if (argc>1 && strcmp("quit", argv[1]) == 0){
380           if (argc>2){
381              printf("ERROR: invalid parameter count for quit\n");
382              return(0);
383           }
384           exit(0);
385        }
386 #if defined(HAVE_OPENDIR) && defined(HAVE_READDIR) && defined(HAVE_CHDIR)
387        if (argc>1 && strcmp("cd", argv[1]) == 0){
388           if (argc>3){
389              printf("ERROR: invalid parameter count for cd\n");
390              return(0);
391           }
392 #if ! defined(HAVE_CHROOT) || ! defined(HAVE_GETUID)
393           if (getuid()==0 && ! ChangeRoot){
394              printf("ERROR: chdir security problem - rrdtool is runnig as "
395                     "root an no chroot!\n");
396              return(0); 
397           }
398 #endif
399           chdir(argv[2]);
400           if (errno!=0){
401              printf("ERROR: %s\n",strerror(errno));
402           }
403           return(0);
404        }
405        if (argc>1 && strcmp("mkdir", argv[1]) == 0){
406           if (argc>3){
407              printf("ERROR: invalid parameter count for mkdir\n");
408              return(0);
409           }
410 #if ! defined(HAVE_CHROOT) || ! defined(HAVE_GETUID)
411           if (getuid()==0 && ! ChangeRoot){
412              printf("ERROR: mkdir security problem - rrdtool is runnig as "
413                     "root an no chroot!\n");
414              return(0); 
415           }
416 #endif
417           mkdir(argv[2],0777);
418           if (errno!=0){
419              printf("ERROR: %s\n",strerror(errno));
420           }
421           return(0);
422        }
423        if (argc>1 && strcmp("ls", argv[1]) == 0){
424           if (argc>2){
425              printf("ERROR: invalid parameter count for ls\n");
426              return(0);
427           }
428           if ((curdir=opendir("."))!=NULL){
429              while((dent=readdir(curdir))!=NULL){
430                 if (!stat(dent->d_name,&st)){
431                    if (S_ISDIR(st.st_mode)){
432                       printf("d %s\n",dent->d_name);
433                    }
434                    if (strlen(dent->d_name)>4 && S_ISREG(st.st_mode)){
435                       if (!strcmp(dent->d_name+NAMLEN(dent)-4,".rrd") ||
436                           !strcmp(dent->d_name+NAMLEN(dent)-4,".RRD")){
437                          printf("- %s\n",dent->d_name);
438                       }
439                    }
440                 }
441              }
442           }
443           else{
444              printf("ERROR: %s\n",strerror(errno));
445              return(errno);
446           }
447           return(0);
448        }
449 #endif /* opendir and readdir */
450
451     }
452     if (argc < 3 
453         || strcmp("help", argv[1]) == 0
454         || strcmp("--help", argv[1]) == 0
455         || strcmp("-help", argv[1]) == 0
456         || strcmp("-?", argv[1]) == 0
457         || strcmp("-h", argv[1]) == 0 ) {
458         PrintUsage("");
459         return 0;
460     }
461     
462     if (strcmp("create", argv[1]) == 0) 
463         rrd_create(argc-1, &argv[1]);
464     else if (strcmp("dump", argv[1]) == 0)
465         rrd_dump(argc-1, &argv[1]);
466     else if (strcmp("info", argv[1]) == 0){
467         info_t *data,*save;
468         data=rrd_info(argc-1, &argv[1]);
469         while (data) {
470             save=data;
471             printf ("%s = ", data->key);
472             free(data->key);
473             
474             switch (data->type) {
475             case RD_I_VAL:
476                 if (isnan (data->value.u_val))
477                     printf("NaN");
478                 else
479                     printf ("%0.10e", data->value.u_val);
480                 break;
481             case RD_I_CNT:
482                 printf ("%lu", data->value.u_cnt);
483                 break;
484             case RD_I_STR:
485                 printf ("\"%s\"", data->value.u_str);
486                 free(data->value.u_str);
487                 break;
488             }
489             data = data->next;
490             free(save);
491             printf ("\n");
492         }
493         free(data);
494     }
495         
496     else if (strcmp("--version", argv[1]) == 0 ||
497              strcmp("version", argv[1]) == 0 || 
498              strcmp("v", argv[1]) == 0 ||
499              strcmp("-v", argv[1]) == 0  ||
500              strcmp("-version", argv[1]) == 0  )
501         printf("RRDtool 1.1.x  Copyright (C) 1997-2003 by Tobias Oetiker <tobi@oetiker.ch>\n");
502     else if (strcmp("restore", argv[1]) == 0)
503         rrd_restore(argc-1, &argv[1]);
504     else if (strcmp("resize", argv[1]) == 0)
505         rrd_resize(argc-1, &argv[1]);
506     else if (strcmp("last", argv[1]) == 0)
507         printf("%ld\n",rrd_last(argc-1, &argv[1]));
508     else if (strcmp("update", argv[1]) == 0)
509         rrd_update(argc-1, &argv[1]);
510     else if (strcmp("fetch", argv[1]) == 0) {
511         time_t        start,end, ti;
512         unsigned long step, ds_cnt,i,ii;
513         rrd_value_t   *data,*datai;
514         char          **ds_namv;
515         if (rrd_fetch(argc-1, &argv[1],&start,&end,&step,&ds_cnt,&ds_namv,&data) != -1) {
516             datai=data;
517             printf("           ");
518             for (i = 0; i<ds_cnt;i++)
519                 printf("%14s",ds_namv[i]);
520             printf ("\n\n");
521             for (ti = start+step; ti <= end; ti += step){
522                 printf("%10lu:", ti);
523                 for (ii = 0; ii < ds_cnt; ii++)
524                     printf(" %0.10e", *(datai++));
525                 printf("\n");
526             }
527             for (i=0;i<ds_cnt;i++)
528                   free(ds_namv[i]);
529             free(ds_namv);
530             free (data);
531         }
532     } else if (strcmp("xport", argv[1]) == 0) {
533         int xxsize;
534         unsigned long int j = 0;
535         time_t        start,end, ti;
536         unsigned long step, col_cnt,row_cnt;
537         rrd_value_t   *data,*ptr;
538         char          **legend_v;
539         if(rrd_xport(argc-1, &argv[1], &xxsize,&start,&end,&step,&col_cnt,&legend_v,&data) != -1) {
540           row_cnt = (end-start)/step;
541           ptr = data;
542           printf("<?xml version=\"1.0\" encoding=\"%s\"?>\n\n", XML_ENCODING);
543           printf("<%s>\n", ROOT_TAG);
544           printf("  <%s>\n", META_TAG);
545           printf("    <%s>%lu</%s>\n", META_START_TAG, start+step, META_START_TAG);
546           printf("    <%s>%lu</%s>\n", META_STEP_TAG, step, META_STEP_TAG);
547           printf("    <%s>%lu</%s>\n", META_END_TAG, end, META_END_TAG);
548           printf("    <%s>%lu</%s>\n", META_ROWS_TAG, row_cnt, META_ROWS_TAG);
549           printf("    <%s>%lu</%s>\n", META_COLS_TAG, col_cnt, META_COLS_TAG);
550           printf("    <%s>\n", LEGEND_TAG);
551           for (j = 0; j < col_cnt; j++) {
552             char *entry = NULL;
553             entry = legend_v[j];
554             printf("      <%s>%s</%s>\n", LEGEND_ENTRY_TAG, entry, LEGEND_ENTRY_TAG);
555             free(entry);
556           }
557           free(legend_v);
558           printf("    </%s>\n", LEGEND_TAG);
559           printf("  </%s>\n", META_TAG);
560           printf("  <%s>\n", DATA_TAG);
561           for (ti = start+step; ti <= end; ti += step) {
562             printf ("    <%s>", DATA_ROW_TAG);
563             printf ("<%s>%lu</%s>", COL_TIME_TAG, ti, COL_TIME_TAG);
564             for (j = 0; j < col_cnt; j++) {
565               rrd_value_t newval = DNAN;
566               newval = *ptr;
567               if(isnan(newval)){
568                 printf("<%s>NaN</%s>", COL_DATA_TAG, COL_DATA_TAG);
569               } else {
570                 printf("<%s>%0.10e</%s>", COL_DATA_TAG, newval, COL_DATA_TAG);
571               };
572               ptr++;
573             }
574             printf("</%s>\n", DATA_ROW_TAG);
575           }
576           free(data);
577           printf("  </%s>\n", DATA_TAG);
578           printf("</%s>\n", ROOT_TAG);
579         }
580     }
581     else if (strcmp("graph", argv[1]) == 0) {
582         char **calcpr;
583         const char *imgfile = argv[2]; /* rrd_graph changes argv pointer */
584         int xsize, ysize;
585         int i;
586         int tostdout = (strcmp(argv[2],"-") == 0);      
587         if( rrd_graph(argc-1, &argv[1], &calcpr, &xsize, &ysize) != -1 ) {
588             if (!tostdout) 
589                 printf ("%dx%d\n",xsize,ysize);
590             if (calcpr) {
591                 for(i=0;calcpr[i];i++){
592                     if (!tostdout) 
593                         printf("%s\n",calcpr[i]);
594                     free(calcpr[i]);
595                 } 
596                 free(calcpr);
597             }
598         }
599         
600     } else if (strcmp("tune", argv[1]) == 0) 
601                 rrd_tune(argc-1, &argv[1]);
602     else {
603                 rrd_set_error("unknown function '%s'",argv[1]);
604     }
605     if (rrd_test_error()) {
606         fprintf(out, "ERROR: %s\n",rrd_get_error());
607         rrd_clear_error();
608     }
609     return(0);
610 }
611
612 int CountArgs(char *aLine)
613 {
614     int i=0;
615     int aCount = 0;
616     int inarg = 0;
617     while (aLine[i] == ' ') i++;
618     while (aLine[i] != 0){       
619         if((aLine[i]== ' ') && inarg){
620             inarg = 0;
621         }
622         if((aLine[i]!= ' ') && ! inarg){
623             inarg = 1;
624             aCount++;
625         }
626         i++;
627     }
628     return aCount;
629 }
630
631 /*
632  * CreateArgs - take a string (aLine) and tokenize
633  */
634 int CreateArgs(char *pName, char *aLine, int argc, char **argv)
635 {
636     char        *getP, *putP;
637     char        **pargv = argv;
638     char        Quote = 0;
639     int inArg = 0;
640     int len;
641
642     len = strlen(aLine);
643     /* remove trailing space and newlines */
644     while (len && aLine[len] <= ' ') {
645         aLine[len] = 0 ; len--;
646     }
647     /* sikp leading blanks */
648     while (*aLine && *aLine <= ' ') aLine++;
649
650     pargv[0] = pName;
651     argc = 1;
652     getP = aLine;
653     putP = aLine;
654     while (*getP){
655         switch (*getP) {
656         case ' ': 
657             if (Quote){
658                 *(putP++)=*getP;
659             } else 
660                 if(inArg) {
661                     *(putP++) = 0;
662                     inArg = 0;
663                 }
664             break;
665         case '"':
666         case '\'':
667             if (Quote != 0) {
668                 if (Quote == *getP) 
669                     Quote = 0;
670                 else {
671                     *(putP++)=*getP;
672                 }
673             } else {
674                 if(!inArg){
675                     pargv[argc++] = putP;
676                     inArg=1;
677                 }           
678                 Quote = *getP;
679             }
680             break;
681         default:
682             if(!inArg){
683                 pargv[argc++] = putP;
684                 inArg=1;
685             }
686             *(putP++)=*getP;
687             break;
688         }
689         getP++;
690     }
691
692     *putP = '\0';
693
694     if (Quote) 
695         return -1;
696     else
697         return argc;
698 }
699
700