1 /*****************************************************************************
2 * RRDtool 1.2.9 Copyright by Tobi Oetiker, 1997-2005
3 *****************************************************************************
4 * rrd_create.c creates new rrds
5 *****************************************************************************/
7 #include "rrd_tool.h"
8 #include "rrd_rpncalc.h"
9 #include "rrd_hw.h"
11 #include "rrd_is_thread_safe.h"
13 unsigned long FnvHash(char *str);
14 int create_hw_contingent_rras(rrd_t *rrd, unsigned short period, unsigned long hashed_name);
15 void parseGENERIC_DS(char *def,rrd_t *rrd, int ds_idx);
17 int
18 rrd_create(int argc, char **argv)
19 {
20 time_t last_up = time(NULL)-10;
21 unsigned long pdp_step = 300;
22 struct rrd_time_value last_up_tv;
23 char *parsetime_error = NULL;
24 long long_tmp;
25 int rc;
26 optind = 0; opterr = 0; /* initialize getopt */
28 while (1){
29 static struct option long_options[] =
30 {
31 {"start", required_argument, 0, 'b'},
32 {"step", required_argument,0,'s'},
33 {0,0,0,0}
34 };
35 int option_index = 0;
36 int opt;
37 opt = getopt_long(argc, argv, "b:s:",
38 long_options, &option_index);
40 if (opt == EOF)
41 break;
43 switch(opt) {
44 case 'b':
45 if ((parsetime_error = parsetime(optarg, &last_up_tv))) {
46 rrd_set_error("start time: %s", parsetime_error );
47 return(-1);
48 }
49 if (last_up_tv.type == RELATIVE_TO_END_TIME ||
50 last_up_tv.type == RELATIVE_TO_START_TIME) {
51 rrd_set_error("specifying time relative to the 'start' "
52 "or 'end' makes no sense here");
53 return(-1);
54 }
56 last_up = mktime(&last_up_tv.tm) + last_up_tv.offset;
58 if (last_up < 3600*24*365*10){
59 rrd_set_error("the first entry to the RRD should be after 1980");
60 return(-1);
61 }
62 break;
64 case 's':
65 long_tmp = atol(optarg);
66 if (long_tmp < 1){
67 rrd_set_error("step size should be no less than one second");
68 return(-1);
69 }
70 pdp_step = long_tmp;
71 break;
73 case '?':
74 if (optopt != 0)
75 rrd_set_error("unknown option '%c'", optopt);
76 else
77 rrd_set_error("unknown option '%s'",argv[optind-1]);
78 return(-1);
79 }
80 }
82 rc = rrd_create_r(argv[optind],
83 pdp_step, last_up,
84 argc - optind - 1, argv + optind + 1);
86 return rc;
87 }
89 /* #define DEBUG */
90 int
91 rrd_create_r(char *filename,
92 unsigned long pdp_step, time_t last_up,
93 int argc, char **argv)
94 {
95 rrd_t rrd;
96 long i;
97 int offset;
98 char *token;
99 char dummychar1[2], dummychar2[2];
100 unsigned short token_idx, error_flag, period=0;
101 unsigned long hashed_name;
103 /* init rrd clean */
104 rrd_init(&rrd);
105 /* static header */
106 if((rrd.stat_head = calloc(1,sizeof(stat_head_t)))==NULL){
107 rrd_set_error("allocating rrd.stat_head");
108 rrd_free(&rrd);
109 return(-1);
110 }
112 /* live header */
113 if((rrd.live_head = calloc(1,sizeof(live_head_t)))==NULL){
114 rrd_set_error("allocating rrd.live_head");
115 rrd_free(&rrd);
116 return(-1);
117 }
119 /* set some defaults */
120 strcpy(rrd.stat_head->cookie,RRD_COOKIE);
121 strcpy(rrd.stat_head->version,RRD_VERSION);
122 rrd.stat_head->float_cookie = FLOAT_COOKIE;
123 rrd.stat_head->ds_cnt = 0; /* this will be adjusted later */
124 rrd.stat_head->rra_cnt = 0; /* ditto */
125 rrd.stat_head->pdp_step = pdp_step; /* 5 minute default */
127 /* a default value */
128 rrd.ds_def = NULL;
129 rrd.rra_def = NULL;
131 rrd.live_head->last_up = last_up;
133 /* optind points to the first non-option command line arg,
134 * in this case, the file name. */
135 /* Compute the FNV hash value (used by SEASONAL and DEVSEASONAL
136 * arrays. */
137 hashed_name = FnvHash(filename);
138 for(i=0;i<argc;i++){
139 unsigned int ii;
140 if (strncmp(argv[i],"DS:",3)==0){
141 size_t old_size = sizeof(ds_def_t)*(rrd.stat_head->ds_cnt);
142 if((rrd.ds_def = rrd_realloc(rrd.ds_def,
143 old_size+sizeof(ds_def_t)))==NULL){
144 rrd_set_error("allocating rrd.ds_def");
145 rrd_free(&rrd);
146 return(-1);
147 }
148 memset(&rrd.ds_def[rrd.stat_head->ds_cnt], 0, sizeof(ds_def_t));
149 /* extract the name and type */
150 switch (sscanf(&argv[i][3],
151 DS_NAM_FMT "%1[:]" DST_FMT "%1[:]%n",
152 rrd.ds_def[rrd.stat_head->ds_cnt].ds_nam,
153 dummychar1,
154 rrd.ds_def[rrd.stat_head->ds_cnt].dst,
155 dummychar2,
156 &offset)) {
157 case 0:
158 case 1: rrd_set_error("Invalid DS name"); break;
159 case 2:
160 case 3: rrd_set_error("Invalid DS type"); break;
161 case 4: /* (%n may or may not be counted) */
162 case 5: /* check for duplicate datasource names */
163 for (ii=0;ii<rrd.stat_head->ds_cnt;ii++)
164 if(strcmp(rrd.ds_def[rrd.stat_head->ds_cnt].ds_nam,
165 rrd.ds_def[ii].ds_nam) == 0)
166 rrd_set_error("Duplicate DS name: %s",
167 rrd.ds_def[ii].ds_nam);
168 /* DS_type may be valid or not. Checked later */
169 break;
170 default: rrd_set_error("invalid DS format");
171 }
172 if (rrd_test_error()) {
173 rrd_free(&rrd);
174 return -1;
175 }
177 /* parse the remainder of the arguments */
178 switch(dst_conv(rrd.ds_def[rrd.stat_head->ds_cnt].dst))
179 {
180 case DST_COUNTER:
181 case DST_ABSOLUTE:
182 case DST_GAUGE:
183 case DST_DERIVE:
184 parseGENERIC_DS(&argv[i][offset+3],&rrd, rrd.stat_head->ds_cnt);
185 break;
186 case DST_CDEF:
187 parseCDEF_DS(&argv[i][offset+3],&rrd, rrd.stat_head->ds_cnt);
188 break;
189 default:
190 rrd_set_error("invalid DS type specified");
191 break;
192 }
194 if (rrd_test_error()) {
195 rrd_free(&rrd);
196 return -1;
197 }
198 rrd.stat_head -> ds_cnt++;
199 } else if (strncmp(argv[i],"RRA:",4)==0){
200 char *argvcopy;
201 char *tokptr;
202 size_t old_size = sizeof(rra_def_t)*(rrd.stat_head->rra_cnt);
203 if((rrd.rra_def = rrd_realloc(rrd.rra_def,
204 old_size+sizeof(rra_def_t)))==NULL)
205 {
206 rrd_set_error("allocating rrd.rra_def");
207 rrd_free(&rrd);
208 return(-1);
209 }
210 memset(&rrd.rra_def[rrd.stat_head->rra_cnt], 0, sizeof(rra_def_t));
212 argvcopy = strdup(argv[i]);
213 token = strtok_r(&argvcopy[4],":", &tokptr);
214 token_idx = error_flag = 0;
215 while (token != NULL)
216 {
217 switch(token_idx)
218 {
219 case 0:
220 if (sscanf(token,CF_NAM_FMT,
221 rrd.rra_def[rrd.stat_head->rra_cnt].cf_nam) != 1)
222 rrd_set_error("Failed to parse CF name");
223 switch(cf_conv(rrd.rra_def[rrd.stat_head->rra_cnt].cf_nam))
224 {
225 case CF_HWPREDICT:
226 /* initialize some parameters */
227 rrd.rra_def[rrd.stat_head->rra_cnt].par[RRA_hw_alpha].u_val = 0.1;
228 rrd.rra_def[rrd.stat_head->rra_cnt].par[RRA_hw_beta].u_val = 1.0/288;
229 rrd.rra_def[rrd.stat_head->rra_cnt].par[RRA_dependent_rra_idx].u_cnt =
230 rrd.stat_head -> rra_cnt;
231 break;
232 case CF_DEVSEASONAL:
233 case CF_SEASONAL:
234 /* initialize some parameters */
235 rrd.rra_def[rrd.stat_head->rra_cnt].par[RRA_seasonal_gamma].u_val = 0.1;
236 /* fall through */
237 case CF_DEVPREDICT:
238 rrd.rra_def[rrd.stat_head->rra_cnt].par[RRA_dependent_rra_idx].u_cnt = -1;
239 break;
240 case CF_FAILURES:
241 rrd.rra_def[rrd.stat_head->rra_cnt].par[RRA_delta_pos].u_val = 2.0;
242 rrd.rra_def[rrd.stat_head->rra_cnt].par[RRA_delta_neg].u_val = 2.0;
243 rrd.rra_def[rrd.stat_head->rra_cnt].par[RRA_window_len].u_cnt = 3;
244 rrd.rra_def[rrd.stat_head->rra_cnt].par[RRA_failure_threshold].u_cnt = 2;
245 rrd.rra_def[rrd.stat_head->rra_cnt].par[RRA_dependent_rra_idx].u_cnt = -1;
246 break;
247 /* invalid consolidation function */
248 case -1:
249 rrd_set_error("Unrecognized consolidation function %s",
250 rrd.rra_def[rrd.stat_head->rra_cnt].cf_nam);
251 default:
252 break;
253 }
254 /* default: 1 pdp per cdp */
255 rrd.rra_def[rrd.stat_head->rra_cnt].pdp_cnt = 1;
256 break;
257 case 1:
258 switch(cf_conv(rrd.rra_def[rrd.stat_head->rra_cnt].cf_nam))
259 {
260 case CF_HWPREDICT:
261 case CF_DEVSEASONAL:
262 case CF_SEASONAL:
263 case CF_DEVPREDICT:
264 case CF_FAILURES:
265 rrd.rra_def[rrd.stat_head->rra_cnt].row_cnt = atoi(token);
266 break;
267 default:
268 rrd.rra_def[rrd.stat_head->rra_cnt].par[RRA_cdp_xff_val].u_val = atof(token);
269 if (rrd.rra_def[rrd.stat_head->rra_cnt].par[RRA_cdp_xff_val].u_val<0.0 ||
270 rrd.rra_def[rrd.stat_head->rra_cnt].par[RRA_cdp_xff_val].u_val>=1.0)
271 rrd_set_error("Invalid xff: must be between 0 and 1");
272 break;
273 }
274 break;
275 case 2:
276 switch(cf_conv(rrd.rra_def[rrd.stat_head->rra_cnt].cf_nam))
277 {
278 case CF_HWPREDICT:
279 rrd.rra_def[rrd.stat_head->rra_cnt].par[RRA_hw_alpha].u_val = atof(token);
280 if (atof(token) <= 0.0 || atof(token) >= 1.0)
281 rrd_set_error("Invalid alpha: must be between 0 and 1");
282 break;
283 case CF_DEVSEASONAL:
284 case CF_SEASONAL:
285 rrd.rra_def[rrd.stat_head->rra_cnt].par[RRA_seasonal_gamma].u_val =
286 atof(token);
287 if (atof(token) <= 0.0 || atof(token) >= 1.0)
288 rrd_set_error("Invalid gamma: must be between 0 and 1");
289 rrd.rra_def[rrd.stat_head->rra_cnt].par[RRA_seasonal_smooth_idx].u_cnt
290 = hashed_name % rrd.rra_def[rrd.stat_head->rra_cnt].row_cnt;
291 break;
292 case CF_FAILURES:
293 /* specifies the # of violations that constitutes the failure threshold */
294 rrd.rra_def[rrd.stat_head->rra_cnt].par[RRA_failure_threshold].u_cnt =
295 atoi(token);
296 if (atoi(token) < 1 || atoi(token) > MAX_FAILURES_WINDOW_LEN)
297 rrd_set_error("Failure threshold is out of range %d, %d",1,
298 MAX_FAILURES_WINDOW_LEN);
299 break;
300 case CF_DEVPREDICT:
301 /* specifies the index (1-based) of CF_DEVSEASONAL array
302 * associated with this CF_DEVPREDICT array. */
303 rrd.rra_def[rrd.stat_head->rra_cnt].par[RRA_dependent_rra_idx].u_cnt =
304 atoi(token) - 1;
305 break;
306 default:
307 rrd.rra_def[rrd.stat_head->rra_cnt].pdp_cnt = atoi(token);
308 break;
309 }
310 break;
311 case 3:
312 switch(cf_conv(rrd.rra_def[rrd.stat_head->rra_cnt].cf_nam))
313 {
314 case CF_HWPREDICT:
315 rrd.rra_def[rrd.stat_head->rra_cnt].par[RRA_hw_beta].u_val = atof(token);
316 if (atof(token) < 0.0 || atof(token) > 1.0)
317 rrd_set_error("Invalid beta: must be between 0 and 1");
318 break;
319 case CF_DEVSEASONAL:
320 case CF_SEASONAL:
321 /* specifies the index (1-based) of CF_HWPREDICT array
322 * associated with this CF_DEVSEASONAL or CF_SEASONAL array.
323 * */
324 rrd.rra_def[rrd.stat_head->rra_cnt].par[RRA_dependent_rra_idx].u_cnt =
325 atoi(token) - 1;
326 break;
327 case CF_FAILURES:
328 /* specifies the window length */
329 rrd.rra_def[rrd.stat_head->rra_cnt].par[RRA_window_len].u_cnt =
330 atoi(token);
331 if (atoi(token) < 1 || atoi(token) > MAX_FAILURES_WINDOW_LEN)
332 rrd_set_error("Window length is out of range %d, %d",1,
333 MAX_FAILURES_WINDOW_LEN);
334 /* verify that window length exceeds the failure threshold */
335 if (rrd.rra_def[rrd.stat_head->rra_cnt].par[RRA_window_len].u_cnt <
336 rrd.rra_def[rrd.stat_head->rra_cnt].par[RRA_failure_threshold].u_cnt)
337 rrd_set_error("Window length is shorter than the failure threshold");
338 break;
339 case CF_DEVPREDICT:
340 /* shouldn't be any more arguments */
341 rrd_set_error("Unexpected extra argument for consolidation function DEVPREDICT");
342 break;
343 default:
344 rrd.rra_def[rrd.stat_head->rra_cnt].row_cnt = atoi(token);
345 break;
346 }
347 break;
348 case 4:
349 switch(cf_conv(rrd.rra_def[rrd.stat_head->rra_cnt].cf_nam))
350 {
351 case CF_FAILURES:
352 /* specifies the index (1-based) of CF_DEVSEASONAL array
353 * associated with this CF_DEVFAILURES array. */
354 rrd.rra_def[rrd.stat_head->rra_cnt].par[RRA_dependent_rra_idx].u_cnt =
355 atoi(token) - 1;
356 break;
357 case CF_HWPREDICT:
358 /* length of the associated CF_SEASONAL and CF_DEVSEASONAL arrays. */
359 period = atoi(token);
360 if (period > rrd.rra_def[rrd.stat_head->rra_cnt].row_cnt)
361 rrd_set_error("Length of seasonal cycle exceeds length of HW prediction array");
362 break;
363 default:
364 /* shouldn't be any more arguments */
365 rrd_set_error("Unexpected extra argument for consolidation function %s",
366 rrd.rra_def[rrd.stat_head->rra_cnt].cf_nam);
367 break;
368 }
369 break;
370 case 5:
371 /* If we are here, this must be a CF_HWPREDICT RRA.
372 * Specifies the index (1-based) of CF_SEASONAL array
373 * associated with this CF_HWPREDICT array. If this argument
374 * is missing, then the CF_SEASONAL, CF_DEVSEASONAL, CF_DEVPREDICT,
375 * CF_FAILURES.
376 * arrays are created automatically. */
377 rrd.rra_def[rrd.stat_head->rra_cnt].par[RRA_dependent_rra_idx].u_cnt =
378 atoi(token) - 1;
379 break;
380 default:
381 /* should never get here */
382 rrd_set_error("Unknown error");
383 break;
384 } /* end switch */
385 if (rrd_test_error())
386 {
387 /* all errors are unrecoverable */
388 free(argvcopy);
389 rrd_free(&rrd);
390 return (-1);
391 }
392 token = strtok_r(NULL,":", &tokptr);
393 token_idx++;
394 } /* end while */
395 free(argvcopy);
396 #ifdef DEBUG
397 fprintf(stderr,"Creating RRA CF: %s, dep idx %lu, current idx %lu\n",
398 rrd.rra_def[rrd.stat_head->rra_cnt].cf_nam,
399 rrd.rra_def[rrd.stat_head->rra_cnt].par[RRA_dependent_rra_idx].u_cnt,
400 rrd.stat_head -> rra_cnt);
401 #endif
402 /* should we create CF_SEASONAL, CF_DEVSEASONAL, and CF_DEVPREDICT? */
403 if (cf_conv(rrd.rra_def[rrd.stat_head->rra_cnt].cf_nam) == CF_HWPREDICT
404 && rrd.rra_def[rrd.stat_head->rra_cnt].par[RRA_dependent_rra_idx].u_cnt
405 == rrd.stat_head -> rra_cnt)
406 {
407 #ifdef DEBUG
408 fprintf(stderr,"Creating HW contingent RRAs\n");
409 #endif
410 if (create_hw_contingent_rras(&rrd,period,hashed_name) == -1) {
411 rrd_set_error("creating contingent RRA");
412 rrd_free(&rrd);
413 return -1;
414 }
415 }
416 rrd.stat_head->rra_cnt++;
417 } else {
418 rrd_set_error("can't parse argument '%s'",argv[i]);
419 rrd_free(&rrd);
420 return -1;
421 }
422 }
425 if (rrd.stat_head->rra_cnt < 1){
426 rrd_set_error("you must define at least one Round Robin Archive");
427 rrd_free(&rrd);
428 return(-1);
429 }
431 if (rrd.stat_head->ds_cnt < 1){
432 rrd_set_error("you must define at least one Data Source");
433 rrd_free(&rrd);
434 return(-1);
435 }
436 return rrd_create_fn(filename, &rrd);
437 }
439 void parseGENERIC_DS(char *def,rrd_t *rrd, int ds_idx)
440 {
441 char minstr[DS_NAM_SIZE], maxstr[DS_NAM_SIZE];
442 /*
443 int temp;
445 temp = sscanf(def,"%lu:%18[^:]:%18[^:]",
446 &(rrd -> ds_def[ds_idx].par[DS_mrhb_cnt].u_cnt),
447 minstr,maxstr);
448 */
449 if (sscanf(def,"%lu:%18[^:]:%18[^:]",
450 &(rrd -> ds_def[ds_idx].par[DS_mrhb_cnt].u_cnt),
451 minstr,maxstr) == 3)
452 {
453 if (minstr[0] == 'U' && minstr[1] == 0)
454 rrd -> ds_def[ds_idx].par[DS_min_val].u_val = DNAN;
455 else
456 rrd -> ds_def[ds_idx].par[DS_min_val].u_val = atof(minstr);
458 if (maxstr[0] == 'U' && maxstr[1] == 0)
459 rrd -> ds_def[ds_idx].par[DS_max_val].u_val = DNAN;
460 else
461 rrd -> ds_def[ds_idx].par[DS_max_val].u_val = atof(maxstr);
463 if (! isnan(rrd -> ds_def[ds_idx].par[DS_min_val].u_val) &&
464 ! isnan(rrd -> ds_def[ds_idx].par[DS_max_val].u_val) &&
465 rrd -> ds_def[ds_idx].par[DS_min_val].u_val
466 >= rrd -> ds_def[ds_idx].par[DS_max_val].u_val ) {
467 rrd_set_error("min must be less than max in DS definition");
468 return;
469 }
470 } else {
471 rrd_set_error("failed to parse data source %s", def);
472 }
473 }
475 /* Create the CF_DEVPREDICT, CF_DEVSEASONAL, CF_SEASONAL, and CF_FAILURES RRAs
476 * associated with a CF_HWPREDICT RRA. */
477 int
478 create_hw_contingent_rras(rrd_t *rrd, unsigned short period, unsigned long hashed_name)
479 {
480 size_t old_size;
481 rra_def_t* current_rra;
483 /* save index to CF_HWPREDICT */
484 unsigned long hw_index = rrd -> stat_head -> rra_cnt;
485 /* advance the pointer */
486 (rrd -> stat_head -> rra_cnt)++;
487 /* allocate the memory for the 4 contingent RRAs */
488 old_size = sizeof(rra_def_t)*(rrd -> stat_head->rra_cnt);
489 if ((rrd -> rra_def = rrd_realloc(rrd -> rra_def,
490 old_size+4*sizeof(rra_def_t)))==NULL)
491 {
492 rrd_set_error("allocating rrd.rra_def");
493 return(-1);
494 }
495 /* clear memory */
496 memset(&(rrd -> rra_def[rrd -> stat_head->rra_cnt]), 0, 4*sizeof(rra_def_t));
498 /* create the CF_SEASONAL RRA */
499 current_rra = &(rrd -> rra_def[rrd -> stat_head -> rra_cnt]);
500 strcpy(current_rra -> cf_nam,"SEASONAL");
501 current_rra -> row_cnt = period;
502 current_rra -> par[RRA_seasonal_smooth_idx].u_cnt = hashed_name % period;
503 current_rra -> pdp_cnt = 1;
504 current_rra -> par[RRA_seasonal_gamma].u_val =
505 rrd -> rra_def[hw_index].par[RRA_hw_alpha].u_val;
506 current_rra -> par[RRA_dependent_rra_idx].u_cnt = hw_index;
507 rrd -> rra_def[hw_index].par[RRA_dependent_rra_idx].u_cnt = rrd -> stat_head -> rra_cnt;
509 /* create the CF_DEVSEASONAL RRA */
510 (rrd -> stat_head -> rra_cnt)++;
511 current_rra = &(rrd -> rra_def[rrd -> stat_head -> rra_cnt]);
512 strcpy(current_rra -> cf_nam,"DEVSEASONAL");
513 current_rra -> row_cnt = period;
514 current_rra -> par[RRA_seasonal_smooth_idx].u_cnt = hashed_name % period;
515 current_rra -> pdp_cnt = 1;
516 current_rra -> par[RRA_seasonal_gamma].u_val =
517 rrd -> rra_def[hw_index].par[RRA_hw_alpha].u_val;
518 current_rra -> par[RRA_dependent_rra_idx].u_cnt = hw_index;
520 /* create the CF_DEVPREDICT RRA */
521 (rrd -> stat_head -> rra_cnt)++;
522 current_rra = &(rrd -> rra_def[rrd -> stat_head -> rra_cnt]);
523 strcpy(current_rra -> cf_nam,"DEVPREDICT");
524 current_rra -> row_cnt = (rrd -> rra_def[hw_index]).row_cnt;
525 current_rra -> pdp_cnt = 1;
526 current_rra -> par[RRA_dependent_rra_idx].u_cnt
527 = hw_index + 2; /* DEVSEASONAL */
529 /* create the CF_FAILURES RRA */
530 (rrd -> stat_head -> rra_cnt)++;
531 current_rra = &(rrd -> rra_def[rrd -> stat_head -> rra_cnt]);
532 strcpy(current_rra -> cf_nam,"FAILURES");
533 current_rra -> row_cnt = period;
534 current_rra -> pdp_cnt = 1;
535 current_rra -> par[RRA_delta_pos].u_val = 2.0;
536 current_rra -> par[RRA_delta_neg].u_val = 2.0;
537 current_rra -> par[RRA_failure_threshold].u_cnt = 7;
538 current_rra -> par[RRA_window_len].u_cnt = 9;
539 current_rra -> par[RRA_dependent_rra_idx].u_cnt =
540 hw_index + 2; /* DEVSEASONAL */
541 return 0;
542 }
544 /* create and empty rrd file according to the specs given */
546 int
547 rrd_create_fn(char *file_name, rrd_t *rrd)
548 {
549 unsigned long i,ii;
550 FILE *rrd_file;
551 rrd_value_t *unknown;
552 int unkn_cnt;
554 if ((rrd_file = fopen(file_name,"wb")) == NULL ) {
555 rrd_set_error("creating '%s': %s",file_name, rrd_strerror(errno));
556 free(rrd->stat_head);
557 free(rrd->ds_def);
558 free(rrd->rra_def);
559 return(-1);
560 }
562 fwrite(rrd->stat_head,
563 sizeof(stat_head_t), 1, rrd_file);
565 fwrite(rrd->ds_def,
566 sizeof(ds_def_t), rrd->stat_head->ds_cnt, rrd_file);
568 fwrite(rrd->rra_def,
569 sizeof(rra_def_t), rrd->stat_head->rra_cnt, rrd_file);
571 fwrite(rrd->live_head,
572 sizeof(live_head_t),1, rrd_file);
574 if((rrd->pdp_prep = calloc(1,sizeof(pdp_prep_t))) == NULL){
575 rrd_set_error("allocating pdp_prep");
576 rrd_free(rrd);
577 fclose(rrd_file);
578 return(-1);
579 }
581 strcpy(rrd->pdp_prep->last_ds,"UNKN");
583 rrd->pdp_prep->scratch[PDP_val].u_val = 0.0;
584 rrd->pdp_prep->scratch[PDP_unkn_sec_cnt].u_cnt =
585 rrd->live_head->last_up % rrd->stat_head->pdp_step;
587 for(i=0; i < rrd->stat_head->ds_cnt; i++)
588 fwrite( rrd->pdp_prep,sizeof(pdp_prep_t),1,rrd_file);
590 if((rrd->cdp_prep = calloc(1,sizeof(cdp_prep_t))) == NULL){
591 rrd_set_error("allocating cdp_prep");
592 rrd_free(rrd);
593 fclose(rrd_file);
594 return(-1);
595 }
598 for(i=0; i < rrd->stat_head->rra_cnt; i++) {
599 switch (cf_conv(rrd->rra_def[i].cf_nam))
600 {
601 case CF_HWPREDICT:
602 init_hwpredict_cdp(rrd->cdp_prep);
603 break;
604 case CF_SEASONAL:
605 case CF_DEVSEASONAL:
606 init_seasonal_cdp(rrd->cdp_prep);
607 break;
608 case CF_FAILURES:
609 /* initialize violation history to 0 */
610 for (ii = 0; ii < MAX_CDP_PAR_EN; ii++)
611 {
612 /* We can zero everything out, by setting u_val to the
613 * NULL address. Each array entry in scratch is 8 bytes
614 * (a double), but u_cnt only accessed 4 bytes (long) */
615 rrd->cdp_prep->scratch[ii].u_val = 0.0;
616 }
617 break;
618 default:
619 /* can not be zero because we don't know anything ... */
620 rrd->cdp_prep->scratch[CDP_val].u_val = DNAN;
621 /* startup missing pdp count */
622 rrd->cdp_prep->scratch[CDP_unkn_pdp_cnt].u_cnt =
623 ((rrd->live_head->last_up -
624 rrd->pdp_prep->scratch[PDP_unkn_sec_cnt].u_cnt)
625 % (rrd->stat_head->pdp_step
626 * rrd->rra_def[i].pdp_cnt)) / rrd->stat_head->pdp_step;
627 break;
628 }
630 for(ii=0; ii < rrd->stat_head->ds_cnt; ii++)
631 {
632 fwrite( rrd->cdp_prep,sizeof(cdp_prep_t),1,rrd_file);
633 }
634 }
636 /* now, we must make sure that the rest of the rrd
637 struct is properly initialized */
639 if((rrd->rra_ptr = calloc(1,sizeof(rra_ptr_t))) == NULL) {
640 rrd_set_error("allocating rra_ptr");
641 rrd_free(rrd);
642 fclose(rrd_file);
643 return(-1);
644 }
646 /* changed this initialization to be consistent with
647 * rrd_restore. With the old value (0), the first update
648 * would occur for cur_row = 1 because rrd_update increments
649 * the pointer a priori. */
650 for (i=0; i < rrd->stat_head->rra_cnt; i++)
651 {
652 rrd->rra_ptr->cur_row = rrd->rra_def[i].row_cnt - 1;
653 fwrite( rrd->rra_ptr, sizeof(rra_ptr_t),1,rrd_file);
654 }
656 /* write the empty data area */
657 if ((unknown = (rrd_value_t *)malloc(512 * sizeof(rrd_value_t))) == NULL) {
658 rrd_set_error("allocating unknown");
659 rrd_free(rrd);
660 fclose(rrd_file);
661 return(-1);
662 }
663 for (i = 0; i < 512; ++i)
664 unknown[i] = DNAN;
666 unkn_cnt = 0;
667 for (i = 0; i < rrd->stat_head->rra_cnt; i++)
668 unkn_cnt += rrd->stat_head->ds_cnt * rrd->rra_def[i].row_cnt;
670 while (unkn_cnt > 0) {
671 fwrite(unknown, sizeof(rrd_value_t), min(unkn_cnt, 512), rrd_file);
672 unkn_cnt -= 512;
673 }
674 free(unknown);
676 /* lets see if we had an error */
677 if(ferror(rrd_file)){
678 rrd_set_error("a file error occurred while creating '%s'",file_name);
679 fclose(rrd_file);
680 rrd_free(rrd);
681 return(-1);
682 }
684 fclose(rrd_file);
685 rrd_free(rrd);
686 return (0);
687 }