1 /* read-file.c -- read file contents into a string
2 Copyright (C) 2006, 2009-2011 Free Software Foundation, Inc.
3 Written by Simon Josefsson and Bruno Haible.
5 This program is free software; you can redistribute it and/or modify
6 it under the terms of the GNU General Public License as published by
7 the Free Software Foundation; either version 2, or (at your option)
10 This program is distributed in the hope that it will be useful,
11 but WITHOUT ANY WARRANTY; without even the implied warranty of
12 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
13 GNU General Public License for more details.
15 You should have received a copy of the GNU General Public License
16 along with this program; if not, write to the Free Software Foundation,
17 Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301, USA. */
21 #include "read-file.h"
32 /* Get malloc, realloc, free. */
38 /* Read a STREAM and return a newly allocated string with the content,
39 and set *LENGTH to the length of the string. The string is
40 zero-terminated, but the terminating zero byte is not counted in
41 *LENGTH. On errors, *LENGTH is undefined, errno preserves the
42 values set by system functions (if any), and NULL is returned. */
44 fread_file (FILE *stream, size_t *length)
47 size_t alloc = BUFSIZ;
49 /* For a regular file, allocate a buffer that has exactly the right
50 size. This avoids the need to do dynamic reallocations later. */
54 if (fstat (fileno (stream), &st) >= 0 && S_ISREG (st.st_mode))
56 off_t pos = ftello (stream);
58 if (pos >= 0 && pos < st.st_size)
60 off_t alloc_off = st.st_size - pos;
62 /* '1' below, accounts for the trailing NUL. */
63 if (SIZE_MAX - 1 < alloc_off)
69 alloc = alloc_off + 1;
74 if (!(buf = malloc (alloc)))
75 return NULL; /* errno is ENOMEM. */
78 size_t size = 0; /* number of bytes read so far */
83 /* This reads 1 more than the size of a regular file
84 so that we get eof immediately. */
85 size_t requested = alloc - size;
86 size_t count = fread (buf + size, 1, requested, stream);
89 if (count != requested)
95 /* Shrink the allocated memory if possible. */
98 char *smaller_buf = realloc (buf, size + 1);
99 if (smaller_buf != NULL)
111 if (alloc == SIZE_MAX)
117 if (alloc < SIZE_MAX - alloc / 2)
118 alloc = alloc + alloc / 2;
122 if (!(new_buf = realloc (buf, alloc)))
139 internal_read_file (const char *filename, size_t *length, const char *mode)
141 FILE *stream = fopen (filename, mode);
148 out = fread_file (stream, length);
152 if (fclose (stream) != 0)
166 /* Open and read the contents of FILENAME, and return a newly
167 allocated string with the content, and set *LENGTH to the length of
168 the string. The string is zero-terminated, but the terminating
169 zero byte is not counted in *LENGTH. On errors, *LENGTH is
170 undefined, errno preserves the values set by system functions (if
171 any), and NULL is returned. */
173 read_file (const char *filename, size_t *length)
175 return internal_read_file (filename, length, "r");
178 /* Open (on non-POSIX systems, in binary mode) and read the contents
179 of FILENAME, and return a newly allocated string with the content,
180 and set LENGTH to the length of the string. The string is
181 zero-terminated, but the terminating zero byte is not counted in
182 the LENGTH variable. On errors, *LENGTH is undefined, errno
183 preserves the values set by system functions (if any), and NULL is
186 read_binary_file (const char *filename, size_t *length)
188 return internal_read_file (filename, length, "rb");