src/rrd_tool.c

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