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