1 /****************************************************************************
2 * RRDtool 1.3rc2 Copyright by Tobi Oetiker, 1997-2008
3 ****************************************************************************
4 * rrd_xport.c export RRD data
5 ****************************************************************************/
10 #include "rrd_graph.h"
11 #include "rrd_xport.h"
14 #if defined(_WIN32) && !defined(__CYGWIN__) && !defined(__CYGWIN32__)
48 time_t *end, /* which time frame do you want ?
49 * will be changed to represent reality */
50 unsigned long *step, /* which stepsize do you want?
51 * will be changed to represent reality */
52 unsigned long *col_cnt, /* number of data columns in the result */
53 char ***legend_v, /* legend entries */
55 { /* two dimensional array containing the data */
58 time_t start_tmp = 0, end_tmp = 0;
59 struct rrd_time_value start_tv, end_tv;
60 char *parsetime_error = NULL;
61 struct option long_options[] = {
62 {"start", required_argument, 0, 's'},
63 {"end", required_argument, 0, 'e'},
64 {"maxrows", required_argument, 0, 'm'},
65 {"step", required_argument, 0, 261},
66 {"enumds", no_argument, 0, 262}, /* these are handled in the frontend ... */
71 opterr = 0; /* initialize getopt */
75 parsetime("end-24h", &start_tv);
76 parsetime("now", &end_tv);
82 opt = getopt_long(argc, argv, "s:e:m:", long_options, &option_index);
89 im.step = atoi(optarg);
94 if ((parsetime_error = parsetime(optarg, &start_tv))) {
95 rrd_set_error("start time: %s", parsetime_error);
100 if ((parsetime_error = parsetime(optarg, &end_tv))) {
101 rrd_set_error("end time: %s", parsetime_error);
106 im.xsize = atol(optarg);
108 rrd_set_error("maxrows below 10 rows");
113 rrd_set_error("unknown option '%s'", argv[optind - 1]);
118 if (proc_start_end(&start_tv, &end_tv, &start_tmp, &end_tmp) == -1) {
122 if (start_tmp < 3600 * 24 * 365 * 10) {
123 rrd_set_error("the first entry to fetch should be after 1980 (%ld)",
128 if (end_tmp < start_tmp) {
129 rrd_set_error("start (%ld) should be less than end (%ld)",
134 im.start = start_tmp;
136 im.step = max((long) im.step, (im.end - im.start) / im.xsize);
138 rrd_graph_script(argc, argv, &im, 0);
139 if (rrd_test_error()) {
144 if (im.gdes_c == 0) {
145 rrd_set_error("can't make a graph without contents");
150 if (rrd_xport_fn(&im, start, end, step, col_cnt, legend_v, data) == -1) {
164 time_t *end, /* which time frame do you want ?
165 * will be changed to represent reality */
166 unsigned long *step, /* which stepsize do you want?
167 * will be changed to represent reality */
168 unsigned long *col_cnt, /* number of data columns in the result */
169 char ***legend_v, /* legend entries */
171 { /* two dimensional array containing the data */
174 unsigned long *ds_cnt; /* number of data sources in file */
175 unsigned long col, dst_row, row_cnt;
176 rrd_value_t *srcptr, *dstptr;
178 unsigned long nof_xports = 0;
179 unsigned long xport_counter = 0;
181 rrd_value_t **srcptr_list;
185 time_t start_tmp = 0;
187 unsigned long step_tmp = 1;
189 /* pull the data from the rrd files ... */
190 if (data_fetch(im) == -1)
193 /* evaluate CDEF operations ... */
194 if (data_calc(im) == -1)
197 /* how many xports? */
198 for (i = 0; i < im->gdes_c; i++) {
199 switch (im->gdes[i].gf) {
207 if (nof_xports == 0) {
208 rrd_set_error("no XPORT found, nothing to do");
212 /* a list of referenced gdes */
213 ref_list = malloc(sizeof(int) * nof_xports);
214 if (ref_list == NULL)
217 /* a list to save pointers into each gdes data */
218 srcptr_list = malloc(sizeof(srcptr) * nof_xports);
219 if (srcptr_list == NULL) {
224 /* a list to save pointers to the column's legend entry */
225 /* this is a return value! */
226 legend_list = malloc(sizeof(char *) * nof_xports);
227 if (legend_list == NULL) {
233 /* find referenced gdes and save their index and */
234 /* a pointer into their data */
235 for (i = 0; i < im->gdes_c; i++) {
236 switch (im->gdes[i].gf) {
238 ii = im->gdes[i].vidx;
239 if (xport_counter > nof_xports) {
240 rrd_set_error("too many xports: should not happen. Hmmm");
246 srcptr_list[xport_counter] = im->gdes[ii].data;
247 ref_list[xport_counter++] = i;
254 start_tmp = im->gdes[0].start;
255 end_tmp = im->gdes[0].end;
256 step_tmp = im->gdes[0].step;
258 /* fill some return values */
259 *col_cnt = nof_xports;
264 row_cnt = ((*end) - (*start)) / (*step);
266 /* room for rearranged data */
267 /* this is a return value! */
269 malloc((*col_cnt) * row_cnt * sizeof(rrd_value_t))) == NULL) {
273 rrd_set_error("malloc xport data area");
279 for (i = 0; i < im->gdes_c; i++) {
280 switch (im->gdes[i].gf) {
282 /* reserve room for one legend entry */
283 /* is FMT_LEG_LEN + 5 the correct size? */
284 if ((legend_list[j] =
285 malloc(sizeof(char) * (FMT_LEG_LEN + 5))) == NULL) {
291 free(legend_list[j]);
293 rrd_set_error("malloc xport legend entry");
297 if (im->gdes[i].legend)
298 /* omit bounds check, should have the same size */
299 strcpy(legend_list[j++], im->gdes[i].legend);
301 legend_list[j++][0] = '\0';
309 /* fill data structure */
310 for (dst_row = 0; (int) dst_row < (int) row_cnt; dst_row++) {
311 for (i = 0; i < (int) nof_xports; i++) {
313 ii = im->gdes[j].vidx;
314 ds_cnt = &im->gdes[ii].ds_cnt;
316 srcptr = srcptr_list[i];
317 for (col = 0; col < (*ds_cnt); col++) {
318 rrd_value_t newval = DNAN;
320 newval = srcptr[col];
322 if (im->gdes[ii].ds_namv && im->gdes[ii].ds_nam) {
323 if (strcmp(im->gdes[ii].ds_namv[col], im->gdes[ii].ds_nam)
325 (*dstptr++) = newval;
327 (*dstptr++) = newval;
331 srcptr_list[i] += (*ds_cnt);
335 *legend_v = legend_list;