src/rrd_info.c

   1 /*****************************************************************************
   2  * RRDtool 1.3.2  Copyright by Tobi Oetiker, 1997-2008
   3  *****************************************************************************
   4  * rrd_info  Get Information about the configuration of an RRD
   5  *****************************************************************************/
   6
   7 #include "rrd_tool.h"
   8 #include "rrd_rpncalc.h"
   9 #include "rrd_client.h"
  10 #include <stdarg.h>
  11
  12 /* proto */
  13 rrd_info_t *rrd_info(
  14     int,
  15     char **);
  16 rrd_info_t *rrd_info_r(
  17     char *filename);
  18
  19 /* allocate memory for string */
  20 char     *sprintf_alloc(
  21     char *fmt,
  22     ...)
  23 {
  24     char     *str = NULL;
  25     va_list   argp;
  26 #ifdef HAVE_VASPRINTF
  27     va_start( argp, fmt );
  28     if (vasprintf( &str, fmt, argp ) == -1){
  29         va_end(argp);
  30         rrd_set_error ("vasprintf failed.");
  31         return(NULL);
  32     }
  33 #else
  34     int       maxlen = 1024 + strlen(fmt);
  35     str = (char*)malloc(sizeof(char) * (maxlen + 1));
  36     if (str != NULL) {
  37         va_start(argp, fmt);
  38 #ifdef HAVE_VSNPRINTF
  39         vsnprintf(str, maxlen, fmt, argp);
  40 #else
  41         vsprintf(str, fmt, argp);
  42 #endif
  43     }
  44 #endif /* HAVE_VASPRINTF */
  45     va_end(argp);
  46     return str;
  47 }
  48
  49 /* the function formerly known as push was renamed to info_push and later
  50  * rrd_info_push because it is now used outside the scope of this file */
  51 rrd_info_t
  52     * rrd_info_push(rrd_info_t * info,
  53                     char *key, rrd_info_type_t type, rrd_infoval_t value)
  54 {
  55     rrd_info_t *next;
  56
  57     next = (rrd_info_t*)malloc(sizeof(*next));
  58     next->next = (rrd_info_t *) 0;
  59     if (info)
  60         info->next = next;
  61     next->type = type;
  62     next->key = key;
  63     switch (type) {
  64     case RD_I_VAL:
  65         next->value.u_val = value.u_val;
  66         break;
  67     case RD_I_CNT:
  68         next->value.u_cnt = value.u_cnt;
  69         break;
  70     case RD_I_INT:
  71         next->value.u_int = value.u_int;
  72         break;
  73     case RD_I_STR:
  74         next->value.u_str = (char*)malloc(sizeof(char) * (strlen(value.u_str) + 1));
  75         strcpy(next->value.u_str, value.u_str);
  76         break;
  77     case RD_I_BLO:
  78         next->value.u_blo.size = value.u_blo.size;
  79         next->value.u_blo.ptr =
  80             (unsigned char *)malloc(sizeof(unsigned char) * value.u_blo.size);
  81         memcpy(next->value.u_blo.ptr, value.u_blo.ptr, value.u_blo.size);
  82         break;
  83     }
  84     return (next);
  85 }
  86
  87
  88 rrd_info_t *rrd_info(
  89     int argc,
  90     char **argv)
  91 {
  92     rrd_info_t *info;
  93     char *opt_daemon = NULL;
  94     int status;
  95
  96     optind = 0;
  97     opterr = 0;         /* initialize getopt */
  98
  99     while (42) {
 100         int       opt;
 101         int       option_index = 0;
 102         static struct option long_options[] = {
 103             {"daemon", required_argument, 0, 'd'},
 104             {0, 0, 0, 0}
 105         };
 106
 107         opt = getopt_long(argc, argv, "d:", long_options, &option_index);
 108
 109         if (opt == EOF)
 110             break;
 111
 112         switch (opt) {
 113         case 'd':
 114             if (opt_daemon != NULL)
 115                     free (opt_daemon);
 116             opt_daemon = strdup (optarg);
 117             if (opt_daemon == NULL)
 118             {
 119                 rrd_set_error ("strdup failed.");
 120                 return (NULL);
 121             }
 122             break;
 123
 124         default:
 125             rrd_set_error ("Usage: rrdtool %s [--daemon <addr>] <file>",
 126                     argv[0]);
 127             return (NULL);
 128             break;
 129         }
 130     }                   /* while (42) */
 131
 132     if ((argc - optind) != 1) {
 133         rrd_set_error ("Usage: rrdtool %s [--daemon <addr>] <file>",
 134                 argv[0]);
 135         return (NULL);
 136     }
 137
 138     status = rrdc_flush_if_daemon(opt_daemon, argv[optind]);
 139     if (opt_daemon) free (opt_daemon);
 140     if (status) return (NULL);
 141
 142     info = rrd_info_r(argv[optind]);
 143
 144     return (info);
 145 } /* rrd_info_t *rrd_info */
 146
 147 rrd_info_t *rrd_info_r(
 148     char *filename)
 149 {
 150     unsigned int i, ii = 0;
 151     rrd_t     rrd;
 152     rrd_info_t *data = NULL, *cd;
 153     rrd_infoval_t info;
 154     rrd_file_t *rrd_file;
 155     enum cf_en current_cf;
 156     enum dst_en current_ds;
 157
 158     rrd_init(&rrd);
 159     rrd_file = rrd_open(filename, &rrd, RRD_READONLY);
 160     if (rrd_file == NULL)
 161         goto err_free;
 162
 163     info.u_str = filename;
 164     cd = rrd_info_push(NULL, sprintf_alloc("filename"), RD_I_STR, info);
 165     data = cd;
 166
 167     info.u_str = rrd.stat_head->version;
 168     cd = rrd_info_push(cd, sprintf_alloc("rrd_version"), RD_I_STR, info);
 169
 170     info.u_cnt = rrd.stat_head->pdp_step;
 171     cd = rrd_info_push(cd, sprintf_alloc("step"), RD_I_CNT, info);
 172
 173     info.u_cnt = rrd.live_head->last_up;
 174     cd = rrd_info_push(cd, sprintf_alloc("last_update"), RD_I_CNT, info);
 175
 176     info.u_cnt = rrd_get_header_size(&rrd);
 177     cd = rrd_info_push(cd, sprintf_alloc("header_size"), RD_I_CNT, info);
 178
 179     for (i = 0; i < rrd.stat_head->ds_cnt; i++) {
 180
 181         info.u_str = rrd.ds_def[i].dst;
 182         cd = rrd_info_push(cd, sprintf_alloc("ds[%s].type",
 183                                              rrd.ds_def[i].ds_nam),
 184                            RD_I_STR, info);
 185
 186         current_ds = dst_conv(rrd.ds_def[i].dst);
 187         switch (current_ds) {
 188         case DST_CDEF:
 189         {
 190             char     *buffer = NULL;
 191
 192             rpn_compact2str((rpn_cdefds_t *) &(rrd.ds_def[i].par[DS_cdef]),
 193                             rrd.ds_def, &buffer);
 194             info.u_str = buffer;
 195             cd = rrd_info_push(cd,
 196                                sprintf_alloc("ds[%s].cdef",
 197                                              rrd.ds_def[i].ds_nam), RD_I_STR,
 198                                info);
 199             free(buffer);
 200         }
 201             break;
 202         default:
 203             info.u_cnt = rrd.ds_def[i].par[DS_mrhb_cnt].u_cnt;
 204             cd = rrd_info_push(cd,
 205                                sprintf_alloc("ds[%s].minimal_heartbeat",
 206                                              rrd.ds_def[i].ds_nam), RD_I_CNT,
 207                                info);
 208
 209             info.u_val = rrd.ds_def[i].par[DS_min_val].u_val;
 210             cd = rrd_info_push(cd,
 211                                sprintf_alloc("ds[%s].min",
 212                                              rrd.ds_def[i].ds_nam), RD_I_VAL,
 213                                info);
 214
 215             info.u_val = rrd.ds_def[i].par[DS_max_val].u_val;
 216             cd = rrd_info_push(cd,
 217                                sprintf_alloc("ds[%s].max",
 218                                              rrd.ds_def[i].ds_nam), RD_I_VAL,
 219                                info);
 220             break;
 221         }
 222
 223         info.u_str = rrd.pdp_prep[i].last_ds;
 224         cd = rrd_info_push(cd,
 225                            sprintf_alloc("ds[%s].last_ds",
 226                                          rrd.ds_def[i].ds_nam), RD_I_STR,
 227                            info);
 228
 229         info.u_val = rrd.pdp_prep[i].scratch[PDP_val].u_val;
 230         cd = rrd_info_push(cd,
 231                            sprintf_alloc("ds[%s].value",
 232                                          rrd.ds_def[i].ds_nam), RD_I_VAL,
 233                            info);
 234
 235         info.u_cnt = rrd.pdp_prep[i].scratch[PDP_unkn_sec_cnt].u_cnt;
 236         cd = rrd_info_push(cd,
 237                            sprintf_alloc("ds[%s].unknown_sec",
 238                                          rrd.ds_def[i].ds_nam), RD_I_CNT,
 239                            info);
 240     }
 241
 242     for (i = 0; i < rrd.stat_head->rra_cnt; i++) {
 243         info.u_str = rrd.rra_def[i].cf_nam;
 244         cd = rrd_info_push(cd, sprintf_alloc("rra[%d].cf", i), RD_I_STR,
 245                            info);
 246         current_cf = cf_conv(rrd.rra_def[i].cf_nam);
 247
 248         info.u_cnt = rrd.rra_def[i].row_cnt;
 249         cd = rrd_info_push(cd, sprintf_alloc("rra[%d].rows", i), RD_I_CNT,
 250                            info);
 251
 252         info.u_cnt = rrd.rra_ptr[i].cur_row;
 253         cd = rrd_info_push(cd, sprintf_alloc("rra[%d].cur_row", i), RD_I_CNT,
 254                            info);
 255
 256         info.u_cnt = rrd.rra_def[i].pdp_cnt;
 257         cd = rrd_info_push(cd, sprintf_alloc("rra[%d].pdp_per_row", i),
 258                            RD_I_CNT, info);
 259
 260         switch (current_cf) {
 261         case CF_HWPREDICT:
 262         case CF_MHWPREDICT:
 263             info.u_val = rrd.rra_def[i].par[RRA_hw_alpha].u_val;
 264             cd = rrd_info_push(cd, sprintf_alloc("rra[%d].alpha", i),
 265                                RD_I_VAL, info);
 266             info.u_val = rrd.rra_def[i].par[RRA_hw_beta].u_val;
 267             cd = rrd_info_push(cd, sprintf_alloc("rra[%d].beta", i), RD_I_VAL,
 268                                info);
 269             break;
 270         case CF_SEASONAL:
 271         case CF_DEVSEASONAL:
 272             info.u_val = rrd.rra_def[i].par[RRA_seasonal_gamma].u_val;
 273             cd = rrd_info_push(cd, sprintf_alloc("rra[%d].gamma", i),
 274                                RD_I_VAL, info);
 275             if (atoi(rrd.stat_head->version) >= 4) {
 276                 info.u_val =
 277                     rrd.rra_def[i].par[RRA_seasonal_smoothing_window].u_val;
 278                 cd = rrd_info_push(cd,
 279                                    sprintf_alloc("rra[%d].smoothing_window",
 280                                                  i), RD_I_VAL, info);
 281             }
 282             break;
 283         case CF_FAILURES:
 284             info.u_val = rrd.rra_def[i].par[RRA_delta_pos].u_val;
 285             cd = rrd_info_push(cd, sprintf_alloc("rra[%d].delta_pos", i),
 286                                RD_I_VAL, info);
 287             info.u_val = rrd.rra_def[i].par[RRA_delta_neg].u_val;
 288             cd = rrd_info_push(cd, sprintf_alloc("rra[%d].delta_neg", i),
 289                                RD_I_VAL, info);
 290             info.u_cnt = rrd.rra_def[i].par[RRA_failure_threshold].u_cnt;
 291             cd = rrd_info_push(cd,
 292                                sprintf_alloc("rra[%d].failure_threshold", i),
 293                                RD_I_CNT, info);
 294             info.u_cnt = rrd.rra_def[i].par[RRA_window_len].u_cnt;
 295             cd = rrd_info_push(cd, sprintf_alloc("rra[%d].window_length", i),
 296                                RD_I_CNT, info);
 297             break;
 298         case CF_DEVPREDICT:
 299             break;
 300         default:
 301             info.u_val = rrd.rra_def[i].par[RRA_cdp_xff_val].u_val;
 302             cd = rrd_info_push(cd, sprintf_alloc("rra[%d].xff", i), RD_I_VAL,
 303                                info);
 304             break;
 305         }
 306
 307         for (ii = 0; ii < rrd.stat_head->ds_cnt; ii++) {
 308             switch (current_cf) {
 309             case CF_HWPREDICT:
 310             case CF_MHWPREDICT:
 311                 info.u_val =
 312                     rrd.cdp_prep[i * rrd.stat_head->ds_cnt +
 313                                  ii].scratch[CDP_hw_intercept].u_val;
 314                 cd = rrd_info_push(cd,
 315                                    sprintf_alloc
 316                                    ("rra[%d].cdp_prep[%d].intercept", i, ii),
 317                                    RD_I_VAL, info);
 318                 info.u_val =
 319                     rrd.cdp_prep[i * rrd.stat_head->ds_cnt +
 320                                  ii].scratch[CDP_hw_slope].u_val;
 321                 cd = rrd_info_push(cd,
 322                                    sprintf_alloc("rra[%d].cdp_prep[%d].slope",
 323                                                  i, ii), RD_I_VAL, info);
 324                 info.u_cnt =
 325                     rrd.cdp_prep[i * rrd.stat_head->ds_cnt +
 326                                  ii].scratch[CDP_null_count].u_cnt;
 327                 cd = rrd_info_push(cd,
 328                                    sprintf_alloc
 329                                    ("rra[%d].cdp_prep[%d].NaN_count", i, ii),
 330                                    RD_I_CNT, info);
 331                 break;
 332             case CF_SEASONAL:
 333                 info.u_val =
 334                     rrd.cdp_prep[i * rrd.stat_head->ds_cnt +
 335                                  ii].scratch[CDP_hw_seasonal].u_val;
 336                 cd = rrd_info_push(cd,
 337                                    sprintf_alloc
 338                                    ("rra[%d].cdp_prep[%d].seasonal", i, ii),
 339                                    RD_I_VAL, info);
 340                 break;
 341             case CF_DEVSEASONAL:
 342                 info.u_val =
 343                     rrd.cdp_prep[i * rrd.stat_head->ds_cnt +
 344                                  ii].scratch[CDP_seasonal_deviation].u_val;
 345                 cd = rrd_info_push(cd,
 346                                    sprintf_alloc
 347                                    ("rra[%d].cdp_prep[%d].deviation", i, ii),
 348                                    RD_I_VAL, info);
 349                 break;
 350             case CF_DEVPREDICT:
 351                 break;
 352             case CF_FAILURES:
 353             {
 354                 unsigned short j;
 355                 char     *violations_array;
 356                 char      history[MAX_FAILURES_WINDOW_LEN + 1];
 357
 358                 violations_array =
 359                     (char *) rrd.cdp_prep[i * rrd.stat_head->ds_cnt +
 360                                           ii].scratch;
 361                 for (j = 0; j < rrd.rra_def[i].par[RRA_window_len].u_cnt; ++j)
 362                     history[j] = (violations_array[j] == 1) ? '1' : '0';
 363                 history[j] = '\0';
 364                 info.u_str = history;
 365                 cd = rrd_info_push(cd,
 366                                    sprintf_alloc
 367                                    ("rra[%d].cdp_prep[%d].history", i, ii),
 368                                    RD_I_STR, info);
 369             }
 370                 break;
 371             default:
 372                 info.u_val =
 373                     rrd.cdp_prep[i * rrd.stat_head->ds_cnt +
 374                                  ii].scratch[CDP_val].u_val;
 375                 cd = rrd_info_push(cd,
 376                                    sprintf_alloc("rra[%d].cdp_prep[%d].value",
 377                                                  i, ii), RD_I_VAL, info);
 378                 info.u_cnt =
 379                     rrd.cdp_prep[i * rrd.stat_head->ds_cnt +
 380                                  ii].scratch[CDP_unkn_pdp_cnt].u_cnt;
 381                 cd = rrd_info_push(cd,
 382                                    sprintf_alloc
 383                                    ("rra[%d].cdp_prep[%d].unknown_datapoints",
 384                                     i, ii), RD_I_CNT, info);
 385                 break;
 386             }
 387         }
 388     }
 389
 390     rrd_close(rrd_file);
 391   err_free:
 392     rrd_free(&rrd);
 393     return (data);
 394 }
 395
 396
 397 void rrd_info_print(
 398     rrd_info_t * data)
 399 {
 400     while (data) {
 401         printf("%s = ", data->key);
 402
 403         switch (data->type) {
 404         case RD_I_VAL:
 405             if (isnan(data->value.u_val))
 406                 printf("NaN\n");
 407             else
 408                 printf("%0.10e\n", data->value.u_val);
 409             break;
 410         case RD_I_CNT:
 411             printf("%lu\n", data->value.u_cnt);
 412             break;
 413         case RD_I_INT:
 414             printf("%d\n", data->value.u_int);
 415             break;
 416         case RD_I_STR:
 417             printf("\"%s\"\n", data->value.u_str);
 418             break;
 419         case RD_I_BLO:
 420             printf("BLOB_SIZE:%lu\n", data->value.u_blo.size);
 421             fwrite(data->value.u_blo.ptr, data->value.u_blo.size, 1, stdout);
 422             break;
 423         }
 424         data = data->next;
 425     }
 426 }
 427
 428 void rrd_info_free(
 429     rrd_info_t * data)
 430 {
 431     rrd_info_t *save;
 432
 433     while (data) {
 434         save = data;
 435         if (data->key) {
 436             if (data->type == RD_I_STR) {
 437                 free(data->value.u_str);
 438             }
 439             if (data->type == RD_I_BLO) {
 440                 free(data->value.u_blo.ptr);
 441             }
 442             free(data->key);
 443         }
 444         data = data->next;
 445         free(save);
 446     }
 447 }