12345678910111213141516171819202122232425262728293031323334353637383940414243444546474849505152535455565758596061626364656667686970717273747576777879808182838485868788899091 |
- /* Copyright (C) 2004 Manuel Novoa III <mjn3@codepoet.org>
- *
- * GNU Library General Public License (LGPL) version 2 or later.
- *
- * Dedicated to Toni. See uClibc/DEDICATION.mjn3 for details.
- */
- #include "_stdio.h"
- /* libc_hidden_proto(fgets_unlocked) */
- #ifdef __DO_UNLOCKED
- /* libc_hidden_proto(__fgetc_unlocked) */
- char *fgets_unlocked(char *__restrict s, int n,
- register FILE * __restrict stream)
- {
- register char *p;
- int c;
- __STDIO_STREAM_VALIDATE(stream);
- #ifdef __UCLIBC_MJN3_ONLY__
- #warning CONSIDER: What should fgets do if n <= 0?
- #endif /* __UCLIBC_MJN3_ONLY__ */
- /* Should we assert here? Or set errno? Or just fail... */
- if (n <= 0) {
- /* __set_errno(EINVAL); */
- goto ERROR;
- }
- p = s;
- while (--n) {
- if (__STDIO_STREAM_CAN_USE_BUFFER_GET(stream)) {
- if ((*p++ = __STDIO_STREAM_BUFFER_GET(stream)) == '\n') {
- break;
- }
- } else {
- if ((c = __fgetc_unlocked(stream)) == EOF) {
- if (__FERROR_UNLOCKED(stream)) {
- goto ERROR;
- }
- break;
- }
- if ((*p++ = c) == '\n') {
- break;
- }
- }
- }
- #ifdef __UCLIBC_MJN3_ONLY__
- #warning CONSIDER: If n==1 and not at EOF, should fgets return an empty string?
- #endif /* __UCLIBC_MJN3_ONLY__ */
- if (p > s) {
- *p = 0;
- return s;
- }
- ERROR:
- return NULL;
- }
- libc_hidden_def(fgets_unlocked)
- #ifndef __UCLIBC_HAS_THREADS__
- /* libc_hidden_proto(fgets) */
- strong_alias(fgets_unlocked,fgets)
- libc_hidden_def(fgets)
- #endif
- #elif defined __UCLIBC_HAS_THREADS__
- /* libc_hidden_proto(fgets) */
- char *fgets(char *__restrict s, int n,
- register FILE * __restrict stream)
- {
- char *retval;
- __STDIO_AUTO_THREADLOCK_VAR;
- __STDIO_AUTO_THREADLOCK(stream);
- retval = fgets_unlocked(s, n, stream);
- __STDIO_AUTO_THREADUNLOCK(stream);
- return retval;
- }
- libc_hidden_def(fgets)
- #endif
|