Support for COMPUTE data sources (CDEF data sources). Removes the RPN
[rrdtool.git] / src / rrd_info.c
1 /*****************************************************************************
2  * RRDtool 1.0.33  Copyright Tobias Oetiker, 1997 - 2000
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 <stdarg.h>
10
11 /* proto */
12 static char * sprintf_alloc(char *, ...);
13 static info_t *push(info_t *, char *, enum info_type, infoval);
14 info_t *rrd_info(int, char **);
15
16 /* allocate memory for string */
17 static char *
18 sprintf_alloc(char *fmt, ...) {
19 #ifdef HAVE_VSNPRINTF    
20     int maxlen = 50;
21 #else
22     int maxlen = 1000;
23 #endif
24     char *str = NULL;
25     va_list argp;
26     str = malloc(sizeof(char)*(strlen(fmt)+maxlen));
27     if (str != NULL) {
28         va_start(argp, fmt);
29 #ifdef HAVE_VSNPRINTF
30         vsnprintf(str, maxlen-1, fmt, argp);
31 #else
32         vsprintf(str, fmt, argp);
33 #endif
34     }
35     va_end(argp);
36     return str;
37 }
38
39 static info_t 
40 *push(info_t *info, char *key, enum info_type type, infoval value){
41     info_t *next;
42     next = malloc(sizeof(*next));
43     next->next = (info_t *) 0;
44     if( info )
45         info->next = next;
46     next->type = type;
47     next->key  = key;
48     switch (type) {
49     case RD_I_VAL:
50         next->value.u_val = value.u_val;
51         break;
52     case RD_I_CNT:
53         next->value.u_cnt = value.u_cnt;
54         break;
55     case RD_I_STR:
56         next->value.u_str = malloc(sizeof(char)*(strlen(value.u_str)+1));
57         strcpy(next->value.u_str,value.u_str);
58         break;
59     }
60     return(next);
61 }
62
63   
64 info_t *
65 rrd_info(int argc, char **argv) {   
66     int          i,ii=0;
67     FILE         *in_file;
68     rrd_t        rrd;
69     info_t       *data,*cd;
70     infoval      info;
71         enum cf_en   current_cf;
72         enum dst_en  current_ds;
73
74     if(rrd_open(argv[1],&in_file,&rrd, RRD_READONLY)==-1){
75         return(NULL);
76     }
77     fclose(in_file);
78
79     info.u_str=argv[1];
80     cd=push(NULL,sprintf_alloc("filename"),    RD_I_STR, info);
81     data=cd;
82
83     info.u_str=rrd.stat_head->version;
84     cd=push(cd,sprintf_alloc("rrd_version"),    RD_I_STR, info);
85
86     info.u_cnt=rrd.stat_head->pdp_step;
87     cd=push(cd,sprintf_alloc("step"),       RD_I_CNT, info);
88
89     info.u_cnt=rrd.live_head->last_up;
90     cd=push(cd,sprintf_alloc("last_update"), RD_I_CNT, info);
91
92     for(i=0;i<rrd.stat_head->ds_cnt;i++){
93
94         info.u_str=rrd.ds_def[i].dst;
95         cd=push(cd,sprintf_alloc("ds[%s].type",             rrd.ds_def[i].ds_nam), RD_I_STR, info);
96   
97         current_ds = dst_conv(rrd.ds_def[i].dst);
98     switch (current_ds) {
99            case DST_CDEF:
100                   {
101                   char *buffer;
102                   rpn_compact2str((rpn_cdefds_t *) &(rrd.ds_def[i].par[DS_cdef]),
103                          rrd.ds_def, &buffer);
104                   info.u_str = buffer;
105                   cd=push(cd,sprintf_alloc("ds[%s].cdef",rrd.ds_def[i].ds_nam),RD_I_STR,info);
106                   free(buffer);
107                   }
108                   break;
109            default:
110            info.u_cnt=rrd.ds_def[i].par[DS_mrhb_cnt].u_cnt;
111            cd=push(cd,sprintf_alloc("ds[%s].minimal_heartbeat",rrd.ds_def[i].ds_nam), RD_I_CNT, info);
112
113            info.u_val=rrd.ds_def[i].par[DS_min_val].u_val;
114            cd=push(cd,sprintf_alloc("ds[%s].min",rrd.ds_def[i].ds_nam), RD_I_VAL, info);
115         
116            info.u_val=rrd.ds_def[i].par[DS_max_val].u_val;
117            cd=push(cd,sprintf_alloc("ds[%s].max",rrd.ds_def[i].ds_nam), RD_I_VAL, info);
118            break;
119         }
120         
121         info.u_str=rrd.pdp_prep[i].last_ds;
122         cd=push(cd,sprintf_alloc("ds[%s].last_ds",          rrd.ds_def[i].ds_nam), RD_I_STR, info);
123
124         info.u_val=rrd.pdp_prep[i].scratch[PDP_val].u_val;
125         cd=push(cd,sprintf_alloc("ds[%s].value",            rrd.ds_def[i].ds_nam), RD_I_VAL, info);
126
127         info.u_cnt=rrd.pdp_prep[i].scratch[PDP_unkn_sec_cnt].u_cnt;
128         cd=push(cd,sprintf_alloc("ds[%s].unknown_sec",      rrd.ds_def[i].ds_nam), RD_I_CNT, info);
129     }
130
131     for(i=0;i<rrd.stat_head->rra_cnt;i++){
132         info.u_str=rrd.rra_def[i].cf_nam;
133         cd=push(cd,sprintf_alloc("rra[%d].cf",         i),  RD_I_STR,   info);
134         current_cf = cf_conv(rrd.rra_def[i].cf_nam);
135
136         info.u_cnt=rrd.rra_def[i].row_cnt;
137         cd=push(cd,sprintf_alloc("rra[%d].rows",i),  RD_I_CNT,   info);
138
139         info.u_cnt=rrd.rra_def[i].pdp_cnt;
140         cd=push(cd,sprintf_alloc("rra[%d].pdp_per_row",i),  RD_I_CNT,   info);
141
142         switch(current_cf)
143         {
144            case CF_HWPREDICT:
145                   info.u_val=rrd.rra_def[i].par[RRA_hw_alpha].u_val;
146                   cd=push(cd,sprintf_alloc("rra[%d].alpha",i),RD_I_VAL,info);
147                   info.u_val=rrd.rra_def[i].par[RRA_hw_beta].u_val;
148                   cd=push(cd,sprintf_alloc("rra[%d].beta",i),RD_I_VAL,info);
149                   break;
150            case CF_SEASONAL:
151            case CF_DEVSEASONAL:
152                   info.u_val=rrd.rra_def[i].par[RRA_seasonal_gamma].u_val;
153                   cd=push(cd,sprintf_alloc("rra[%d].gamma",i),RD_I_VAL,info);
154                   break;
155            case CF_FAILURES:
156                   info.u_val=rrd.rra_def[i].par[RRA_delta_pos].u_val;
157                   cd=push(cd,sprintf_alloc("rra[%d].delta_pos",i),RD_I_VAL,info);
158                   info.u_val=rrd.rra_def[i].par[RRA_delta_neg].u_val;
159                   cd=push(cd,sprintf_alloc("rra[%d].delta_neg",i),RD_I_VAL,info);
160                   info.u_cnt=rrd.rra_def[i].par[RRA_failure_threshold].u_cnt;
161                   cd=push(cd,sprintf_alloc("rra[%d].failure_threshold",i),RD_I_CNT,info);
162                   info.u_cnt=rrd.rra_def[i].par[RRA_window_len].u_cnt;
163                   cd=push(cd,sprintf_alloc("rra[%d].window_length",i),RD_I_CNT,info);
164                   break;
165            case CF_DEVPREDICT:
166                   break;
167            default:
168                   info.u_val=rrd.rra_def[i].par[RRA_cdp_xff_val].u_val;
169                   cd=push(cd,sprintf_alloc("rra[%d].xff",i),RD_I_VAL,info);
170                   break;
171         }
172
173         for(ii=0;ii<rrd.stat_head->ds_cnt;ii++){
174         switch(current_cf)
175                 {
176                 case CF_HWPREDICT:
177             info.u_val=rrd.cdp_prep[i*rrd.stat_head->ds_cnt+ii].scratch[CDP_hw_intercept].u_val;
178             cd=push(cd,sprintf_alloc("rra[%d].cdp_prep[%d].intercept",i,ii), RD_I_VAL, info);
179             info.u_val=rrd.cdp_prep[i*rrd.stat_head->ds_cnt+ii].scratch[CDP_hw_slope].u_val;
180             cd=push(cd,sprintf_alloc("rra[%d].cdp_prep[%d].slope",i,ii), RD_I_VAL, info);
181             info.u_cnt=rrd.cdp_prep[i*rrd.stat_head->ds_cnt+ii].scratch[CDP_null_count].u_cnt;
182             cd=push(cd,sprintf_alloc("rra[%d].cdp_prep[%d].NaN_count",i,ii), RD_I_CNT, info);
183                    break;
184                 case CF_SEASONAL:
185             info.u_val=rrd.cdp_prep[i*rrd.stat_head->ds_cnt+ii].scratch[CDP_hw_seasonal].u_val;
186             cd=push(cd,sprintf_alloc("rra[%d].cdp_prep[%d].seasonal",i,ii), RD_I_VAL, info);
187                    break;
188                 case CF_DEVSEASONAL:
189             info.u_val=rrd.cdp_prep[i*rrd.stat_head->ds_cnt+ii].scratch[CDP_seasonal_deviation].u_val;
190             cd=push(cd,sprintf_alloc("rra[%d].cdp_prep[%d].deviation",i,ii), RD_I_VAL, info);
191                    break;
192                 case CF_DEVPREDICT:
193                    break;
194                 case CF_FAILURES:
195                    {
196                           short j;
197                           char *violations_array;
198                           char history[MAX_FAILURES_WINDOW_LEN+1];
199                           violations_array = (char*) rrd.cdp_prep[i*rrd.stat_head->ds_cnt +ii].scratch;
200                           for (j = 0; j < rrd.rra_def[i].par[RRA_window_len].u_cnt; ++j)
201                                  history[j] = (violations_array[j] == 1) ? '1' : '0';
202                       history[j] = '\0';
203                       info.u_str = history;
204                           cd=push(cd,sprintf_alloc("rra[%d].cdp_prep[%d].history",i,ii), RD_I_STR, info);
205                    }
206                    break;
207                 default:
208             info.u_val=rrd.cdp_prep[i*rrd.stat_head->ds_cnt+ii].scratch[CDP_val].u_val;
209             cd=push(cd,sprintf_alloc("rra[%d].cdp_prep[%d].value",i,ii), RD_I_VAL, info);
210             info.u_cnt=rrd.cdp_prep[i*rrd.stat_head->ds_cnt+ii].scratch[CDP_unkn_pdp_cnt].u_cnt;
211             cd=push(cd,sprintf_alloc("rra[%d].cdp_prep[%d].unknown_datapoints",i,ii), RD_I_CNT, info);
212                    break;
213         }
214     }
215         }
216         rrd_free(&rrd);
217     return(data);
218
219 }