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