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