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 * 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA. *
25 ***************************************************************************/
32 #include "configuration.h"
35 struct fileio_internal {
38 enum fileio_type type;
39 enum fileio_access access;
43 static inline int fileio_close_local(struct fileio_internal *fileio);
44 static inline int fileio_open_local(struct fileio_internal *fileio)
49 switch (fileio->access) {
51 strcpy(file_access, "r");
54 strcpy(file_access, "w");
56 case FILEIO_READWRITE:
57 strcpy(file_access, "w+");
60 strcpy(file_access, "a");
62 case FILEIO_APPENDREAD:
63 strcpy(file_access, "a+");
66 LOG_ERROR("BUG: access neither read, write nor readwrite");
67 return ERROR_COMMAND_SYNTAX_ERROR;
70 /* win32 always opens in binary mode */
72 if (fileio->type == FILEIO_BINARY)
74 strcat(file_access, "b");
76 fileio->file = open_file_from_path(fileio->url, file_access);
78 LOG_ERROR("couldn't open %s", fileio->url);
79 return ERROR_FILEIO_OPERATION_FAILED;
84 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 file_size = ftell(fileio->file);
94 result2 = fseek(fileio->file, 0, SEEK_SET);
96 if ((file_size < 0) || (result < 0) || (result2 < 0)) {
97 fileio_close_local(fileio);
98 return ERROR_FILEIO_OPERATION_FAILED;
102 fileio->size = file_size;
107 int fileio_open(struct fileio *fileio_p,
109 enum fileio_access access_type,
110 enum fileio_type type)
113 struct fileio_internal *fileio;
115 fileio = malloc(sizeof(struct fileio_internal));
118 fileio->access = access_type;
119 fileio->url = strdup(url);
121 retval = fileio_open_local(fileio);
123 if (retval != ERROR_OK) {
129 fileio_p->fp = fileio;
134 static inline int fileio_close_local(struct fileio_internal *fileio)
136 int retval = fclose(fileio->file);
139 LOG_ERROR("BUG: fileio_local->file not a valid file descriptor");
141 LOG_ERROR("couldn't close %s: %s", fileio->url, strerror(errno));
143 return ERROR_FILEIO_OPERATION_FAILED;
149 int fileio_close(struct fileio *fileio_p)
152 struct fileio_internal *fileio = fileio_p->fp;
154 retval = fileio_close_local(fileio);
165 int fileio_seek(struct fileio *fileio_p, size_t position)
168 struct fileio_internal *fileio = fileio_p->fp;
169 retval = fseek(fileio->file, position, SEEK_SET);
171 LOG_ERROR("couldn't seek file %s: %s", fileio->url, strerror(errno));
172 return ERROR_FILEIO_OPERATION_FAILED;
178 static int fileio_local_read(struct fileio_internal *fileio,
179 size_t size, void *buffer, size_t *size_read)
181 ssize_t retval = fread(buffer, 1, size, fileio->file);
182 *size_read = (retval >= 0) ? retval : 0;
183 return (retval < 0) ? retval : ERROR_OK;
186 int fileio_read(struct fileio *fileio_p, size_t size, void *buffer,
189 struct fileio_internal *fileio = fileio_p->fp;
190 return fileio_local_read(fileio, size, buffer, size_read);
193 int fileio_read_u32(struct fileio *fileio_p, uint32_t *data)
197 struct fileio_internal *fileio = fileio_p->fp;
198 int retval = fileio_local_read(fileio, sizeof(uint32_t), buf, &size_read);
199 if (ERROR_OK == retval && sizeof(uint32_t) != size_read)
201 if (ERROR_OK == retval)
202 *data = be_to_h_u32(buf);
206 static int fileio_local_fgets(struct fileio_internal *fileio,
207 size_t size, void *buffer)
209 if (fgets(buffer, size, fileio->file) == NULL)
210 return ERROR_FILEIO_OPERATION_FAILED;
215 int fileio_fgets(struct fileio *fileio_p, size_t size, void *buffer)
217 struct fileio_internal *fileio = fileio_p->fp;
218 return fileio_local_fgets(fileio, size, buffer);
221 static int fileio_local_write(struct fileio_internal *fileio,
222 size_t size, const void *buffer, size_t *size_written)
224 ssize_t retval = fwrite(buffer, 1, size, fileio->file);
225 *size_written = (retval >= 0) ? retval : 0;
226 return (retval < 0) ? retval : ERROR_OK;
229 int fileio_write(struct fileio *fileio_p,
230 size_t size, const void *buffer, size_t *size_written)
232 struct fileio_internal *fileio = fileio_p->fp;
233 int retval = fileio_local_write(fileio, size, buffer, size_written);
234 if (retval == ERROR_OK)
235 fileio->size += *size_written;
239 int fileio_write_u32(struct fileio *fileio_p, uint32_t data)
242 h_u32_to_be(buf, data);
244 int retval = fileio_write(fileio_p, 4, buf, &size_written);
245 if (ERROR_OK == retval && size_written != sizeof(uint32_t))
254 * For now this can not fail, but that's because a seek was executed
257 * Avoiding the seek on startup opens up for using streams.
260 int fileio_size(struct fileio *fileio_p, size_t *size)
262 struct fileio_internal *fileio = fileio_p->fp;
263 *size = fileio->size;