9f188b12a8afc5bcc07705639f5d52927bd82610
[rrdtool.git] / src / rrd_open.c
1 /*****************************************************************************
2  * RRDtool 1.2rc8  Copyright by Tobi Oetiker, 1997-2005
3  *****************************************************************************
4  * rrd_open.c  Open an RRD File
5  *****************************************************************************
6  * $Id$
7  * $Log$
8  * Revision 1.10  2004/05/26 22:11:12  oetiker
9  * reduce compiler warnings. Many small fixes. -- Mike Slifcak <slif@bellsouth.net>
10  *
11  * Revision 1.9  2003/04/29 21:56:49  oetiker
12  * readline in rrd_open.c reads the file in 8 KB blocks, and calls realloc for
13  * each block. realloc is very slow in Mac OS X for huge blocks, e.g. when
14  * restoring databases from huge xml files. This patch finds the size of the
15  * file, and starts out with malloc'ing the full size.
16  * -- Peter Speck <speck@ruc.dk>
17  *
18  * Revision 1.8  2003/04/11 19:43:44  oetiker
19  * New special value COUNT which allows calculations based on the position of a
20  * value within a data set. Bug fix in rrd_rpncalc.c. PREV returned erroneus
21  * value for the second value. Bug fix in rrd_restore.c. Bug causing seek error
22  * when accesing an RRD restored from an xml that holds an RRD version <3.
23  * --  Ruben Justo <ruben@ainek.com>
24  *
25  * Revision 1.7  2003/03/31 21:22:12  oetiker
26  * enables RRDtool updates with microsecond or in case of windows millisecond
27  * precision. This is needed to reduce time measurement error when archive step
28  * is small. (<30s) --  Sasha Mikheev <sasha@avalon-net.co.il>
29  *
30  * Revision 1.6  2003/02/13 07:05:27  oetiker
31  * Find attached the patch I promised to send to you. Please note that there
32  * are three new source files (src/rrd_is_thread_safe.h, src/rrd_thread_safe.c
33  * and src/rrd_not_thread_safe.c) and the introduction of librrd_th. This
34  * library is identical to librrd, but it contains support code for per-thread
35  * global variables currently used for error information only. This is similar
36  * to how errno per-thread variables are implemented.  librrd_th must be linked
37  * alongside of libpthred
38  *
39  * There is also a new file "THREADS", holding some documentation.
40  *
41  * -- Peter Stamfest <peter@stamfest.at>
42  *
43  * Revision 1.5  2002/06/20 00:21:03  jake
44  * More Win32 build changes; thanks to Kerry Calvert.
45  *
46  * Revision 1.4  2002/02/01 20:34:49  oetiker
47  * fixed version number and date/time
48  *
49  * Revision 1.3  2001/03/04 13:01:55  oetiker
50  * Aberrant Behavior Detection support. A brief overview added to rrdtool.pod.
51  * Major updates to rrd_update.c, rrd_create.c. Minor update to other core files.
52  * This is backwards compatible! But new files using the Aberrant stuff are not readable
53  * by old rrdtool versions. See http://cricket.sourceforge.net/aberrant/rrd_hw.htm
54  * -- Jake Brutlag <jakeb@corp.webtv.net>
55  *
56  * Revision 1.2  2001/03/04 10:29:20  oetiker
57  * fixed filedescriptor leak
58  * -- Mike Franusich <mike@franusich.com>
59  *
60  * Revision 1.1.1.1  2001/02/25 22:25:05  oetiker
61  * checkin
62  *
63  *****************************************************************************/
64
65 #include "rrd_tool.h"
66 #define MEMBLK 8192
67
68 /* open a database file, return its header and a open filehandle */
69 /* positioned to the first cdp in the first rra */
70
71 int
72 rrd_open(const char *file_name, FILE **in_file, rrd_t *rrd, int rdwr)    
73 {
74
75     
76     char *mode = NULL;
77     int version;
78     
79     rrd_init(rrd);
80     if (rdwr == RRD_READONLY) {
81 #if defined(WIN32) && !defined(__CYGWIN__) && !defined(__CYGWIN32__)
82         mode = "r";
83 #else
84         mode = "rb";
85 #endif
86     } else {
87 #if defined(WIN32) && !defined(__CYGWIN__) && !defined(__CYGWIN32__)
88         mode = "r+";
89 #else
90         mode = "rb+";
91 #endif
92     }
93     
94     if (((*in_file) = fopen(file_name,mode)) == NULL ){
95         rrd_set_error("opening '%s': %s",file_name, rrd_strerror(errno));
96         return (-1);
97     }
98 /*
99         if (rdwr == RRD_READWRITE)
100         {
101            if (setvbuf((*in_file),NULL,_IONBF,2)) {
102                   rrd_set_error("failed to disable the stream buffer\n");
103                   return (-1);
104            }
105         }
106 */
107     
108 #define MYFREAD(MYVAR,MYVART,MYCNT) \
109     if ((MYVAR = malloc(sizeof(MYVART) * MYCNT)) == NULL) {\
110         rrd_set_error("" #MYVAR " malloc"); \
111         fclose(*in_file); \
112     return (-1); } \
113     fread(MYVAR,sizeof(MYVART),MYCNT, *in_file); 
114
115
116     MYFREAD(rrd->stat_head, stat_head_t,  1)
117     version = atoi(rrd->stat_head->version);
118
119         /* lets do some test if we are on track ... */
120         if (strncmp(rrd->stat_head->cookie,RRD_COOKIE,4) != 0){
121             rrd_set_error("'%s' is not an RRD file",file_name);
122             free(rrd->stat_head);
123             fclose(*in_file);
124             return(-1);}
125
126         if (version > atoi(RRD_VERSION)){
127             rrd_set_error("can't handle RRD file version %s",
128                         rrd->stat_head->version);
129             free(rrd->stat_head);
130             fclose(*in_file);
131             return(-1);}
132
133         if (rrd->stat_head->float_cookie != FLOAT_COOKIE){
134             rrd_set_error("This RRD was created on other architecture");
135             free(rrd->stat_head);
136             fclose(*in_file);
137             return(-1);}
138
139     MYFREAD(rrd->ds_def,    ds_def_t,     rrd->stat_head->ds_cnt)
140     MYFREAD(rrd->rra_def,   rra_def_t,    rrd->stat_head->rra_cnt)
141     /* handle different format for the live_head */
142     if(version < 3) {
143             rrd->live_head = (live_head_t *)malloc(sizeof(live_head_t));
144             if(rrd->live_head == NULL) {
145                 rrd_set_error("live_head_t malloc");
146                 fclose(*in_file); 
147                 return (-1);
148             }
149                 fread(&rrd->live_head->last_up, sizeof(long), 1, *in_file); 
150                 rrd->live_head->last_up_usec = 0;
151     }
152     else {
153             MYFREAD(rrd->live_head, live_head_t, 1)
154     }
155     MYFREAD(rrd->pdp_prep,  pdp_prep_t,   rrd->stat_head->ds_cnt)
156     MYFREAD(rrd->cdp_prep,  cdp_prep_t,   (rrd->stat_head->rra_cnt
157                                              * rrd->stat_head->ds_cnt))
158     MYFREAD(rrd->rra_ptr,   rra_ptr_t,    rrd->stat_head->rra_cnt)
159 #undef MYFREAD
160
161     return(0);
162 }
163
164 void rrd_init(rrd_t *rrd)
165 {
166     rrd->stat_head = NULL;
167     rrd->ds_def = NULL;
168     rrd->rra_def = NULL;
169     rrd->live_head = NULL;
170     rrd->rra_ptr = NULL;
171     rrd->pdp_prep = NULL;
172     rrd->cdp_prep = NULL;
173     rrd->rrd_value = NULL;
174 }
175
176 void rrd_free(rrd_t *rrd)
177 {
178     if (rrd->stat_head) free(rrd->stat_head);
179     if (rrd->ds_def) free(rrd->ds_def);
180     if (rrd->rra_def) free(rrd->rra_def);
181     if (rrd->live_head) free(rrd->live_head);
182     if (rrd->rra_ptr) free(rrd->rra_ptr);
183     if (rrd->pdp_prep) free(rrd->pdp_prep);
184     if (rrd->cdp_prep) free(rrd->cdp_prep);
185     if (rrd->rrd_value) free(rrd->rrd_value);
186 }
187
188 /* routine used by external libraries to free memory allocated by
189  * rrd library */
190 void rrd_freemem(void *mem)
191 {
192
193     if (mem) free(mem);
194 }
195
196 int readfile(const char *file_name, char **buffer, int skipfirst){
197     long writecnt=0,totalcnt = MEMBLK;
198      long offset = 0;
199     FILE *input=NULL;
200     char c ;
201     if ((strcmp("-",file_name) == 0)) { input = stdin; }
202     else {
203       if ((input = fopen(file_name,"rb")) == NULL ){
204         rrd_set_error("opening '%s': %s",file_name,rrd_strerror(errno));
205         return (-1);
206       }
207     }
208     if (skipfirst){
209       do { c = getc(input); offset++; } while (c != '\n' && ! feof(input));
210     }
211     if (strcmp("-",file_name)) {
212       fseek(input, 0, SEEK_END);
213       /* have extra space for detecting EOF without realloc */
214       totalcnt = (ftell(input) + 1) / sizeof(char) - offset;
215       if (totalcnt < MEMBLK)
216         totalcnt = MEMBLK; /* sanitize */
217       fseek(input, offset * sizeof(char), SEEK_SET);
218     }
219     if (((*buffer) = (char *) malloc((totalcnt+4) * sizeof(char))) == NULL) {
220         perror("Allocate Buffer:");
221         exit(1);
222     };
223     do{
224       writecnt += fread((*buffer)+writecnt, 1, (totalcnt - writecnt) * sizeof(char),input);
225       if (writecnt >= totalcnt){
226         totalcnt += MEMBLK;
227         if (((*buffer)=rrd_realloc((*buffer), (totalcnt+4) * sizeof(char)))==NULL){
228             perror("Realloc Buffer:");
229             exit(1);
230         };
231       }
232     } while (! feof(input));
233     (*buffer)[writecnt] = '\0';
234     if (strcmp("-",file_name) != 0) {fclose(input);};
235     return writecnt;
236 }
237
238