]>
git.proxmox.com Git - mirror_edk2.git/blob - StdLib/LibC/Stdio/fgetstr.c
1 /* $NetBSD: fgetstr.c,v 1.4 2006/11/24 19:46:58 christos Exp $ */
4 * Copyright (c) 1990, 1993
5 * The Regents of the University of California. All rights reserved.
7 * This code is derived from software contributed to Berkeley by
10 * Redistribution and use in source and binary forms, with or without
11 * modification, are permitted provided that the following conditions
13 * 1. Redistributions of source code must retain the above copyright
14 * notice, this list of conditions and the following disclaimer.
15 * 2. Redistributions in binary form must reproduce the above copyright
16 * notice, this list of conditions and the following disclaimer in the
17 * documentation and/or other materials provided with the distribution.
18 * 3. Neither the name of the University nor the names of its contributors
19 * may be used to endorse or promote products derived from this software
20 * without specific prior written permission.
22 * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND
23 * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
24 * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
25 * ARE DISCLAIMED. IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
26 * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
27 * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
28 * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
29 * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
30 * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
31 * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
34 #include <LibConfig.h>
35 #include <sys/EfiCdefs.h>
36 #if defined(LIBC_SCCS) && !defined(lint)
38 static char sccsid
[] = "@(#)fgetline.c 8.1 (Berkeley) 6/4/93";
40 __RCSID("$NetBSD: fgetstr.c,v 1.4 2006/11/24 19:46:58 christos Exp $");
42 #endif /* LIBC_SCCS and not lint */
44 #include "namespace.h"
50 #include "reentrant.h"
54 * Expand the line buffer. Return -1 on error.
56 * The `new size' does not account for a terminating '\0',
61 __slbexpand(FILE *fp
, size_t newsize
)
68 _DIAGASSERT(fp
!= NULL
);
70 if ((size_t)fp
->_lb
._size
>= newsize
)
72 if ((p
= realloc(fp
->_lb
._base
, newsize
)) == NULL
)
75 fp
->_lb
._size
= (int)newsize
;
80 * Get an input line. The returned pointer often (but not always)
81 * points into a stdio buffer. Fgetline does not alter the text of
82 * the returned line (which is thus not a C string because it will
83 * not necessarily end with '\0'), but does allow callers to modify
84 * it if they wish. Thus, we set __SMOD in case the caller does.
87 __fgetstr(FILE *fp
, size_t *lenp
, int sep
)
93 _DIAGASSERT(fp
!= NULL
);
94 _DIAGASSERT(lenp
!= NULL
);
96 /* make sure there is input */
97 if (fp
->_r
<= 0 && __srefill(fp
)) {
102 /* look for a newline in the input */
103 if ((p
= memchr((void *)fp
->_p
, sep
, (size_t)fp
->_r
)) != NULL
) {
107 * Found one. Flag buffer as modified to keep fseek from
108 * `optimising' a backward seek, in case the user stomps on
111 p
++; /* advance over it */
112 ret
= (char *)fp
->_p
;
113 *lenp
= len
= p
- fp
->_p
;
114 fp
->_flags
|= __SMOD
;
121 * We have to copy the current buffered data to the line buffer.
122 * As a bonus, though, we can leave off the __SMOD.
124 * OPTIMISTIC is length that we (optimistically) expect will
125 * accommodate the `rest' of the string, on each trip through the
128 #define OPTIMISTIC 80
130 for (len
= fp
->_r
, off
= 0;; len
+= fp
->_r
) {
134 * Make sure there is room for more bytes. Copy data from
135 * file buffer to line buffer, refill file and look for
136 * newline. The loop stops only when we find a newline.
138 if (__slbexpand(fp
, len
+ OPTIMISTIC
))
140 (void)memcpy((void *)(fp
->_lb
._base
+ off
), (void *)fp
->_p
,
144 break; /* EOF or error: return partial line */
145 if ((p
= memchr((void *)fp
->_p
, sep
, (size_t)fp
->_r
)) == NULL
)
148 /* got it: finish up the line (like code above) */
152 if (__slbexpand(fp
, len
))
154 (void)memcpy((void *)(fp
->_lb
._base
+ off
), (void *)fp
->_p
,
162 fp
->_lb
._base
[len
] = 0;
164 return ((char *)fp
->_lb
._base
);
168 return (NULL
); /* ??? */