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