xref: /dragonfly/contrib/cvs-1.12/lib/getndelim2.c (revision 36a3d1d6)
1 /* getndelim2 - Read a line from a stream, stopping at one of 2 delimiters,
2    with bounded memory allocation.
3 
4    Copyright (C) 1993, 1996, 1997, 1998, 2000, 2003, 2004 Free Software
5    Foundation, Inc.
6 
7    This program is free software; you can redistribute it and/or modify
8    it under the terms of the GNU General Public License as published by
9    the Free Software Foundation; either version 2, or (at your option)
10    any later version.
11 
12    This program is distributed in the hope that it will be useful,
13    but WITHOUT ANY WARRANTY; without even the implied warranty of
14    MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
15    GNU General Public License for more details.
16 
17    You should have received a copy of the GNU General Public License
18    along with this program; if not, write to the Free Software Foundation,
19    Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301, USA.  */
20 
21 /* Originally written by Jan Brittenson, bson@gnu.ai.mit.edu.  */
22 
23 #ifdef HAVE_CONFIG_H
24 # include <config.h>
25 #endif
26 
27 #include "getndelim2.h"
28 
29 #include <stdlib.h>
30 #include <stddef.h>
31 
32 #if USE_UNLOCKED_IO
33 # include "unlocked-io.h"
34 #endif
35 
36 #include <limits.h>
37 #if HAVE_INTTYPES_H
38 # include <inttypes.h>
39 #endif
40 #if HAVE_STDINT_H
41 # include <stdint.h>
42 #endif
43 #ifndef PTRDIFF_MAX
44 # define PTRDIFF_MAX ((ptrdiff_t) (SIZE_MAX / 2))
45 #endif
46 #ifndef SIZE_MAX
47 # define SIZE_MAX ((size_t) -1)
48 #endif
49 #ifndef SSIZE_MAX
50 # define SSIZE_MAX ((ssize_t) (SIZE_MAX / 2))
51 #endif
52 
53 /* The maximum value that getndelim2 can return without suffering from
54    overflow problems, either internally (because of pointer
55    subtraction overflow) or due to the API (because of ssize_t).  */
56 #define GETNDELIM2_MAXIMUM (PTRDIFF_MAX < SSIZE_MAX ? PTRDIFF_MAX : SSIZE_MAX)
57 
58 /* Try to add at least this many bytes when extending the buffer.
59    MIN_CHUNK must be no greater than GETNDELIM2_MAXIMUM.  */
60 #define MIN_CHUNK 64
61 
62 ssize_t
63 getndelim2 (char **lineptr, size_t *linesize, size_t offset, size_t nmax,
64             int delim1, int delim2, FILE *stream)
65 {
66   size_t nbytes_avail;		/* Allocated but unused bytes in *LINEPTR.  */
67   char *read_pos;		/* Where we're reading into *LINEPTR. */
68   ssize_t bytes_stored = -1;
69   char *ptr = *lineptr;
70   size_t size = *linesize;
71 
72   if (!ptr)
73     {
74       size = nmax < MIN_CHUNK ? nmax : MIN_CHUNK;
75       ptr = malloc (size);
76       if (!ptr)
77 	return -1;
78     }
79 
80   if (size < offset)
81     goto done;
82 
83   nbytes_avail = size - offset;
84   read_pos = ptr + offset;
85 
86   if (nbytes_avail == 0 && nmax <= size)
87     goto done;
88 
89   for (;;)
90     {
91       /* Here always ptr + size == read_pos + nbytes_avail.  */
92 
93       int c;
94 
95       /* We always want at least one byte left in the buffer, since we
96 	 always (unless we get an error while reading the first byte)
97 	 NUL-terminate the line buffer.  */
98 
99       if (nbytes_avail < 2 && size < nmax)
100 	{
101 	  size_t newsize = size < MIN_CHUNK ? size + MIN_CHUNK : 2 * size;
102 	  char *newptr;
103 
104 	  if (! (size < newsize && newsize <= nmax))
105 	    newsize = nmax;
106 
107 	  if (GETNDELIM2_MAXIMUM < newsize - offset)
108 	    {
109 	      size_t newsizemax = offset + GETNDELIM2_MAXIMUM + 1;
110 	      if (size == newsizemax)
111 		goto done;
112 	      newsize = newsizemax;
113 	    }
114 
115 	  nbytes_avail = newsize - (read_pos - ptr);
116 	  newptr = realloc (ptr, newsize);
117 	  if (!newptr)
118 	    goto done;
119 	  ptr = newptr;
120 	  size = newsize;
121 	  read_pos = size - nbytes_avail + ptr;
122 	}
123 
124       c = getc (stream);
125       if (c == EOF)
126 	{
127 	  /* Return partial line, if any.  */
128 	  if (read_pos == ptr)
129 	    goto done;
130 	  else
131 	    break;
132 	}
133 
134       if (nbytes_avail >= 2)
135 	{
136 	  *read_pos++ = c;
137 	  nbytes_avail--;
138 	}
139 
140       if (c == delim1 || c == delim2)
141 	/* Return the line.  */
142 	break;
143     }
144 
145   /* Done - NUL terminate and return the number of bytes read.
146      At this point we know that nbytes_avail >= 1.  */
147   *read_pos = '\0';
148 
149   bytes_stored = read_pos - (ptr + offset);
150 
151  done:
152   *lineptr = ptr;
153   *linesize = size;
154   return bytes_stored;
155 }
156