initial check-in, version 0.5.0
[musl] / src / stdio / getdelim.c
1 #include "stdio_impl.h"
2
3 #define MIN(a,b) ((a)<(b) ? (a) : (b))
4
5 ssize_t getdelim(char **s, size_t *n, int delim, FILE *f)
6 {
7         char *tmp;
8         unsigned char *z;
9         size_t k;
10         size_t i=0;
11
12         if (!n || !s) {
13                 errno = EINVAL;
14                 return -1;
15         }
16
17         if (!*s) *n=0;
18
19         FLOCK(f);
20
21         while (!feof(f)) {
22                 z = memchr(f->rpos, delim, f->rend - f->rpos);
23                 k = z ? z - f->rpos + 1 : f->rend - f->rpos;
24                 if (i+k >= *n) {
25                         if (k >= SIZE_MAX-i) goto oom;
26                         *n = i+k+1;
27                         if (*n < SIZE_MAX/2) *n *= 2;
28                         tmp = realloc(*s, *n);
29                         if (!tmp) {
30                                 *n = i+k+1;
31                                 tmp = realloc(*s, *n);
32                                 if (!tmp) goto oom;
33                         }
34                         *s = tmp;
35                 }
36                 memcpy(*s+i, f->rpos, k);
37                 f->rpos += k;
38                 i += k;
39                 if (z) break;
40                 __underflow(f);
41         }
42         (*s)[i] = 0;
43         if (feof(f) || ferror(f)) {
44                 FUNLOCK(f);
45                 return -1;
46         }
47
48         FUNLOCK(f);
49
50         if (i > SSIZE_MAX) {
51                 errno = EOVERFLOW;
52                 return -1;
53         }
54
55         return i;
56 oom:
57         errno = ENOMEM;
58         return -1;
59 }