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