1 /***************************************************************************
2 * Copyright (C) 2007 by Dominic Rath *
3 * Dominic.Rath@gmx.de *
5 * Copyright (C) 2007,2008 Øyvind Harboe *
6 * oyvind.harboe@zylin.com *
8 * Copyright (C) 2008 by Spencer Oliver *
9 * spen@spen-soft.co.uk *
11 * This program is free software; you can redistribute it and/or modify *
12 * it under the terms of the GNU General Public License as published by *
13 * the Free Software Foundation; either version 2 of the License, or *
14 * (at your option) any later version. *
16 * This program is distributed in the hope that it will be useful, *
17 * but WITHOUT ANY WARRANTY; without even the implied warranty of *
18 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the *
19 * GNU General Public License for more details. *
21 * You should have received a copy of the GNU General Public License *
22 * along with this program; if not, write to the *
23 * Free Software Foundation, Inc., *
24 * 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA. *
25 ***************************************************************************/
31 #include "configuration.h"
34 struct fileio_internal
{
37 enum fileio_type type
;
38 enum fileio_access access
;
42 static inline int fileio_close_local(struct fileio_internal
*fileio
);
43 static inline int fileio_open_local(struct fileio_internal
*fileio
)
47 switch (fileio
->access
)
50 strcpy(file_access
, "r");
53 strcpy(file_access
, "w");
55 case FILEIO_READWRITE
:
56 strcpy(file_access
, "w+");
59 strcpy(file_access
, "a");
61 case FILEIO_APPENDREAD
:
62 strcpy(file_access
, "a+");
65 LOG_ERROR("BUG: access neither read, write nor readwrite");
66 return ERROR_INVALID_ARGUMENTS
;
69 /* win32 always opens in binary mode */
71 if (fileio
->type
== FILEIO_BINARY
)
74 strcat(file_access
, "b");
77 if (!(fileio
->file
= open_file_from_path (fileio
->url
, file_access
)))
79 LOG_ERROR("couldn't open %s", fileio
->url
);
80 return ERROR_FILEIO_OPERATION_FAILED
;
83 if ((fileio
->access
!= FILEIO_WRITE
) || (fileio
->access
== FILEIO_READWRITE
))
85 /* NB! Here we use fseek() instead of stat(), since stat is a
86 * more advanced operation that might not apply to e.g. a disk path
87 * that refers to e.g. a tftp client */
90 result
= fseek(fileio
->file
, 0, SEEK_END
);
92 fileio
->size
= ftell(fileio
->file
);
94 result2
= fseek(fileio
->file
, 0, SEEK_SET
);
96 if ((fileio
->size
< 0)||(result
< 0)||(result2
< 0))
98 fileio_close_local(fileio
);
99 return ERROR_FILEIO_OPERATION_FAILED
;
110 int fileio_open(struct fileio
*fileio_p
, const char *url
, enum fileio_access access_type
, enum fileio_type type
)
112 int retval
= ERROR_OK
;
114 struct fileio_internal
*fileio
= malloc(sizeof(struct fileio_internal
));
115 fileio_p
->fp
= fileio
;
118 fileio
->access
= access_type
;
119 fileio
->url
= strdup(url
);
121 retval
= fileio_open_local(fileio
);
126 static inline int fileio_close_local(struct fileio_internal
*fileio
)
129 if ((retval
= fclose(fileio
->file
)) != 0)
133 LOG_ERROR("BUG: fileio_local->file not a valid file descriptor");
137 LOG_ERROR("couldn't close %s: %s", fileio
->url
, strerror(errno
));
140 return ERROR_FILEIO_OPERATION_FAILED
;
146 int fileio_close(struct fileio
*fileio_p
)
149 struct fileio_internal
*fileio
= fileio_p
->fp
;
151 retval
= fileio_close_local(fileio
);
153 free((void*)fileio
->url
);
162 int fileio_seek(struct fileio
*fileio_p
, size_t position
)
165 struct fileio_internal
*fileio
= fileio_p
->fp
;
166 if ((retval
= fseek(fileio
->file
, position
, SEEK_SET
)) != 0)
168 LOG_ERROR("couldn't seek file %s: %s", fileio
->url
, strerror(errno
));
169 return ERROR_FILEIO_OPERATION_FAILED
;
175 static int fileio_local_read(struct fileio_internal
*fileio
,
176 size_t size
, void *buffer
, size_t *size_read
)
178 ssize_t retval
= fread(buffer
, 1, size
, fileio
->file
);
179 *size_read
= (retval
>= 0) ? retval
: 0;
180 return (retval
< 0) ? retval
: ERROR_OK
;
183 int fileio_read(struct fileio
*fileio_p
, size_t size
, void *buffer
,
186 struct fileio_internal
*fileio
= fileio_p
->fp
;
187 return fileio_local_read(fileio
, size
, buffer
, size_read
);
190 int fileio_read_u32(struct fileio
*fileio_p
, uint32_t *data
)
194 struct fileio_internal
*fileio
= fileio_p
->fp
;
195 int retval
= fileio_local_read(fileio
, sizeof(uint32_t), buf
, &size_read
);
196 if (ERROR_OK
== retval
&& sizeof(uint32_t) != size_read
)
198 if (ERROR_OK
== retval
)
199 *data
= be_to_h_u32(buf
);
203 static int fileio_local_fgets(struct fileio_internal
*fileio
,
204 size_t size
, void *buffer
)
206 if (fgets(buffer
, size
, fileio
->file
) == NULL
)
207 return ERROR_FILEIO_OPERATION_FAILED
;
212 int fileio_fgets(struct fileio
*fileio_p
, size_t size
, void *buffer
)
214 struct fileio_internal
*fileio
= fileio_p
->fp
;
215 return fileio_local_fgets(fileio
, size
, buffer
);
218 static int fileio_local_write(struct fileio_internal
*fileio
,
219 size_t size
, const void *buffer
, size_t *size_written
)
221 ssize_t retval
= fwrite(buffer
, 1, size
, fileio
->file
);
222 *size_written
= (retval
>= 0) ? retval
: 0;
223 return (retval
< 0) ? retval
: ERROR_OK
;
226 int fileio_write(struct fileio
*fileio_p
,
227 size_t size
, const void *buffer
, size_t *size_written
)
229 struct fileio_internal
*fileio
= fileio_p
->fp
;
230 int retval
= fileio_local_write(fileio
, size
, buffer
, size_written
);
231 if (retval
== ERROR_OK
)
232 fileio
->size
+= *size_written
;
236 int fileio_write_u32(struct fileio
*fileio_p
, uint32_t data
)
239 h_u32_to_be(buf
, data
);
241 int retval
= fileio_write(fileio_p
, 4, buf
, &size_written
);
242 if (ERROR_OK
== retval
&& size_written
!= sizeof(uint32_t))
251 * For now this can not fail, but that's because a seek was executed
254 * Avoiding the seek on startup opens up for using streams.
257 int fileio_size(struct fileio
*fileio_p
, int *size
)
259 struct fileio_internal
*fileio
= fileio_p
->fp
;
260 *size
= fileio
->size
;