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