git://gcc.gnu.org / gcc.git / blame
| Commit | Line | Data |
|---|---|---|
| 6599da04 JM |
1 | /* |
| 2 | Copyright (C) 1994 Free Software Foundation | |
| 3 | ||
| 4 | This file is part of the GNU IO Library. This library is free | |
| 5 | software; you can redistribute it and/or modify it under the | |
| 6 | terms of the GNU General Public License as published by the | |
| 7 | Free Software Foundation; either version 2, or (at your option) | |
| 8 | any later version. | |
| 9 | ||
| 10 | This library 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. | |
| 14 | ||
| 15 | You should have received a copy of the GNU General Public License | |
| 16 | along with this library; see the file COPYING. If not, write to the Free | |
| 17 | Software Foundation, 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA. | |
| 18 | ||
| 19 | As a special exception, if you link this library with files | |
| 20 | compiled with a GNU compiler to produce an executable, this does not cause | |
| 21 | the resulting executable to be covered by the GNU General Public License. | |
| 22 | This exception does not however invalidate any other reasons why | |
| 23 | the executable file might be covered by the GNU General Public License. */ | |
| 24 | ||
| 25 | #ifdef __STDC__ | |
| 26 | #include <stdlib.h> | |
| 27 | #endif | |
| 28 | #include "libioP.h" | |
| 29 | #include <string.h> | |
| 30 | #include <errno.h> | |
| 31 | ||
| 32 | /* Read up to (and including) a TERMINATOR from FP into *LINEPTR | |
| 33 | (and null-terminate it). *LINEPTR is a pointer returned from malloc (or | |
| 34 | NULL), pointing to *N characters of space. It is realloc'ed as | |
| 35 | necessary. Returns the number of characters read (not including the | |
| 36 | null terminator), or -1 on error or EOF. */ | |
| 37 | ||
| 38 | _IO_ssize_t | |
| 39 | DEFUN(_IO_getdelim, (lineptr, n, delimiter, fp), | |
| 40 | char **lineptr AND _IO_size_t *n AND int delimiter AND _IO_FILE *fp) | |
| 41 | { | |
| 42 | register _IO_ssize_t cur_len = 0; | |
| 43 | _IO_ssize_t len; | |
| 44 | ||
| 45 | if (lineptr == NULL || n == NULL) | |
| 46 | { | |
| 47 | #ifdef EINVAL | |
| 48 | errno = EINVAL; | |
| 49 | #endif | |
| 50 | return -1; | |
| 51 | } | |
| 52 | CHECK_FILE (fp, -1); | |
| 53 | if (_IO_ferror (fp)) | |
| 54 | return -1; | |
| 55 | ||
| 56 | if (*lineptr == NULL || *n == 0) | |
| 57 | { | |
| 58 | *n = 120; | |
| 59 | *lineptr = (char *) malloc (*n); | |
| 60 | if (*lineptr == NULL) | |
| 61 | return -1; | |
| 62 | } | |
| 63 | ||
| 64 | len = fp->_IO_read_end - fp->_IO_read_ptr; | |
| 65 | if (len <= 0) | |
| 66 | { | |
| 67 | if (__underflow (fp) == EOF) | |
| 68 | return -1; | |
| 69 | len = fp->_IO_read_end - fp->_IO_read_ptr; | |
| 70 | } | |
| 71 | ||
| 72 | for (;;) | |
| 73 | { | |
| 74 | _IO_size_t needed; | |
| 75 | char *t; | |
| 76 | t = (char *) memchr ((void *) fp->_IO_read_ptr, delimiter, len); | |
| 77 | if (t != NULL) | |
| 78 | len = (t - fp->_IO_read_ptr) + 1; | |
| 79 | /* make enough space for len+1 (for final NUL) bytes. */ | |
| 80 | needed = cur_len + len + 1; | |
| 81 | if (needed > *n) | |
| 82 | { | |
| 83 | if (t == NULL && needed < 2 * *n) | |
| 84 | needed = 2 * *n; /* Be generous. */ | |
| 85 | *n = needed; | |
| 86 | *lineptr = (char *) realloc (*lineptr, needed); | |
| 87 | if (*lineptr == NULL) | |
| 88 | return -1; | |
| 89 | } | |
| 90 | memcpy (*lineptr + cur_len, (void *) fp->_IO_read_ptr, len); | |
| 91 | fp->_IO_read_ptr += len; | |
| 92 | cur_len += len; | |
| 93 | if (t != NULL || __underflow (fp) == EOF) | |
| 94 | break; | |
| 95 | len = fp->_IO_read_end - fp->_IO_read_ptr; | |
| 96 | } | |
| 97 | (*lineptr)[cur_len] = '\0'; | |
| 98 | return cur_len; | |
| 99 | } |