libc/stdio/fread.c

   1 /* Copyright (C) 2004       Manuel Novoa III    <mjn3@codepoet.org>
   2  *
   3  * GNU Library General Public License (LGPL) version 2 or later.
   4  *
   5  * Dedicated to Toni.  See uClibc/DEDICATION.mjn3 for details.
   6  */
   7
   8 #include "_stdio.h"
   9
  10
  11 #ifdef __DO_UNLOCKED
  12
  13
  14 size_t fread_unlocked(void * __restrict ptr, size_t size, size_t nmemb,
  15                                                 FILE * __restrict stream)
  16 {
  17         __STDIO_STREAM_VALIDATE(stream);
  18         assert(stream->__filedes >= -2);
  19
  20         /* Note: If nmbem * size > SIZE_MAX then there is an application
  21          * bug since no array can be larger than SIZE_MAX in size. */
  22
  23         if ((__STDIO_STREAM_IS_NARROW_READING(stream)
  24                  || !__STDIO_STREAM_TRANS_TO_READ(stream, __FLAG_NARROW))
  25                 && size && nmemb
  26                 ) {
  27
  28                 if (nmemb <= (SIZE_MAX / size)) {
  29                         unsigned char *buffer = (unsigned char *) ptr;
  30                         size_t todo, bytes, avail;
  31
  32                         todo = bytes = size * nmemb;
  33
  34                         /* Check for ungots... */
  35                         while (stream->__modeflags & __FLAG_UNGOT) {
  36                                 *buffer++ = stream->__ungot[(stream->__modeflags--) & 1];
  37                                 stream->__ungot[1] = 0;
  38                                 if (!--todo) {
  39                                         goto DONE;
  40                                 }
  41                         }
  42
  43 #ifdef __STDIO_BUFFERS
  44                         /* Next check for available buffered... */
  45                         if ((avail = stream->__bufread - stream->__bufpos) > 0) {
  46                                 if (avail > todo) {
  47                                         avail = todo;
  48                                 }
  49                                 memcpy(buffer, stream->__bufpos, avail);
  50                                 buffer += avail;
  51                                 stream->__bufpos += avail;
  52                                 if (!(todo -= avail)) {
  53                                         goto DONE;
  54                                 }
  55                         }
  56
  57                         /* We need to read from the host environment, so we must
  58                          * flush all line buffered streams if the stream is not
  59                          * fully buffered. */
  60                         if (!__STDIO_STREAM_IS_FBF(stream)) {
  61                                 __STDIO_FLUSH_LBF_STREAMS;
  62                         }
  63 #endif
  64
  65                         while ((avail = __stdio_READ(stream, buffer, todo)) > 0) {
  66                                 buffer += avail;
  67                                 if (!(todo -= avail)) {
  68                                         break;
  69                                 }
  70                         }
  71
  72                 DONE:
  73                         __STDIO_STREAM_VALIDATE(stream);
  74                         return (bytes - todo) / size;
  75                 }
  76
  77                 __STDIO_STREAM_SET_ERROR(stream);
  78                 __set_errno(EINVAL);
  79         }
  80
  81         __STDIO_STREAM_VALIDATE(stream);
  82         return 0;
  83 }
  84 libc_hidden_def(fread_unlocked)
  85
  86 #ifndef __UCLIBC_HAS_THREADS__
  87 strong_alias(fread_unlocked,fread)
  88 libc_hidden_def(fread)
  89 #endif
  90
  91 #elif defined __UCLIBC_HAS_THREADS__
  92
  93 size_t fread(void * __restrict ptr, size_t size, size_t nmemb,
  94                          register FILE * __restrict stream)
  95 {
  96         size_t retval;
  97         __STDIO_AUTO_THREADLOCK_VAR;
  98
  99         __STDIO_AUTO_THREADLOCK(stream);
 100
 101         retval = fread_unlocked(ptr, size, nmemb, stream);
 102
 103         __STDIO_AUTO_THREADUNLOCK(stream);
 104
 105         return retval;
 106 }
 107 libc_hidden_def(fread)
 108
 109 #endif