- if (!strcmp(argv2[argv_i], "--start") || !strcmp(argv2[argv_i], "-b")) {
- if (argv_i++>=argc) {
- Tcl_AppendResult(interp, "RRD Error: option '",
- argv2[argv_i - 1], "' needs an argument", (char *) NULL);
- getopt_cleanup(argc, argv2);
- return TCL_ERROR;
- }
- if ((parsetime_error = parsetime(argv2[argv_i], &last_up_tv))) {
- Tcl_AppendResult(interp, "RRD Error: invalid time format: '",
- argv2[argv_i], "'", (char *) NULL);
- getopt_cleanup(argc, argv2);
- return TCL_ERROR;
- }
- if (last_up_tv.type == RELATIVE_TO_END_TIME ||
- last_up_tv.type == RELATIVE_TO_START_TIME) {
- Tcl_AppendResult(interp, "RRD Error: specifying time relative to the 'start' ",
- "or 'end' makes no sense here", (char *) NULL);
- getopt_cleanup(argc, argv2);
- return TCL_ERROR;
- }
- last_up = mktime(&last_up_tv.tm) + last_up_tv.offset;
- if (last_up < 3600*24*365*10) {
- Tcl_AppendResult(interp, "RRD Error: the first entry to the RRD should be after 1980",
- (char *) NULL);
- getopt_cleanup(argc, argv2);
- return TCL_ERROR;
- }
- getopt_free_element(argv2, argv_i - 1);
- getopt_free_element(argv2, argv_i);
- } else if (!strcmp(argv2[argv_i], "--step") || !strcmp(argv2[argv_i], "-s")) {
- if (argv_i++>=argc) {
- Tcl_AppendResult(interp, "RRD Error: option '",
- argv2[argv_i - 1], "' needs an argument", (char *) NULL);
- getopt_cleanup(argc, argv2);
- return TCL_ERROR;
- }
- long_tmp = atol(argv2[argv_i]);
- if (long_tmp < 1) {
- Tcl_AppendResult(interp, "RRD Error: step size should be no less than one second",
- (char *) NULL);
- getopt_cleanup(argc, argv2);
- return TCL_ERROR;
- }
- pdp_step = long_tmp;
- getopt_free_element(argv2, argv_i - 1);
- getopt_free_element(argv2, argv_i);
- } else if (!strcmp(argv2[argv_i], "--")) {
- getopt_free_element(argv2, argv_i);
- break;
- } else if (argv2[argv_i][0]=='-') {
- Tcl_AppendResult(interp, "RRD Error: unknown option '",
- argv2[argv_i], "'", (char *) NULL);
- getopt_cleanup(argc, argv2);
- return TCL_ERROR;
- }
+ if (!strcmp(argv2[argv_i], "--start") || !strcmp(argv2[argv_i], "-b")) {
+ if (argv_i++ >= argc) {
+ Tcl_AppendResult(interp, "RRD Error: option '",
+ argv2[argv_i - 1], "' needs an argument",
+ (char *) NULL);
+ getopt_cleanup(argc, argv2);
+ return TCL_ERROR;
+ }
+ if ((parsetime_error = parsetime(argv2[argv_i], &last_up_tv))) {
+ Tcl_AppendResult(interp, "RRD Error: invalid time format: '",
+ argv2[argv_i], "'", (char *) NULL);
+ getopt_cleanup(argc, argv2);
+ return TCL_ERROR;
+ }
+ if (last_up_tv.type == RELATIVE_TO_END_TIME ||
+ last_up_tv.type == RELATIVE_TO_START_TIME) {
+ Tcl_AppendResult(interp,
+ "RRD Error: specifying time relative to the 'start' ",
+ "or 'end' makes no sense here",
+ (char *) NULL);
+ getopt_cleanup(argc, argv2);
+ return TCL_ERROR;
+ }
+ last_up = mktime(&last_up_tv.tm) +last_up_tv.offset;
+ if (last_up < 3600 * 24 * 365 * 10) {
+ Tcl_AppendResult(interp,
+ "RRD Error: the first entry to the RRD should be after 1980",
+ (char *) NULL);
+ getopt_cleanup(argc, argv2);
+ return TCL_ERROR;
+ }
+ getopt_free_element(argv2, argv_i - 1);
+ getopt_free_element(argv2, argv_i);
+ } else if (!strcmp(argv2[argv_i], "--step")
+ || !strcmp(argv2[argv_i], "-s")) {
+ if (argv_i++ >= argc) {
+ Tcl_AppendResult(interp, "RRD Error: option '",
+ argv2[argv_i - 1], "' needs an argument",
+ (char *) NULL);
+ getopt_cleanup(argc, argv2);
+ return TCL_ERROR;
+ }
+ long_tmp = atol(argv2[argv_i]);
+ if (long_tmp < 1) {
+ Tcl_AppendResult(interp,
+ "RRD Error: step size should be no less than one second",
+ (char *) NULL);
+ getopt_cleanup(argc, argv2);
+ return TCL_ERROR;
+ }
+ pdp_step = long_tmp;
+ getopt_free_element(argv2, argv_i - 1);
+ getopt_free_element(argv2, argv_i);
+ } else if (!strcmp(argv2[argv_i], "--")) {
+ getopt_free_element(argv2, argv_i);
+ break;
+ } else if (argv2[argv_i][0] == '-') {
+ Tcl_AppendResult(interp, "RRD Error: unknown option '",
+ argv2[argv_i], "'", (char *) NULL);
+ getopt_cleanup(argc, argv2);
+ return TCL_ERROR;
+ }