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