os/ossrv/genericopenlibs/cstdlib/LSTDIO/FREAD.C
author sl
Tue, 10 Jun 2014 14:32:02 +0200
changeset 1 260cb5ec6c19
permissions -rw-r--r--
Update contrib.
sl@0
     1
/* FREAD.C
sl@0
     2
 * 
sl@0
     3
 * Portions Copyright (c) 1990-2005 Nokia Corporation and/or its subsidiary(-ies).
sl@0
     4
 * All rights reserved.
sl@0
     5
 */
sl@0
     6
sl@0
     7
/*
sl@0
     8
 * Copyright (c) 1990 The Regents of the University of California.
sl@0
     9
 * All rights reserved.
sl@0
    10
 *
sl@0
    11
 * Redistribution and use in source and binary forms are permitted
sl@0
    12
 * provided that the above copyright notice and this paragraph are
sl@0
    13
 * duplicated in all such forms and that any documentation,
sl@0
    14
 * advertising materials, and other materials related to such
sl@0
    15
 * distribution and use acknowledge that the software was developed
sl@0
    16
 * by the University of California, Berkeley.  The name of the
sl@0
    17
 * University may not be used to endorse or promote products derived
sl@0
    18
 * from this software without specific prior written permission.
sl@0
    19
 * THIS SOFTWARE IS PROVIDED ``AS IS'' AND WITHOUT ANY EXPRESS OR
sl@0
    20
 * IMPLIED WARRANTIES, INCLUDING, WITHOUT LIMITATION, THE IMPLIED
sl@0
    21
 * WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE.
sl@0
    22
 */
sl@0
    23
sl@0
    24
/*
sl@0
    25
FUNCTION
sl@0
    26
<<fread>>---read array elements from a file
sl@0
    27
sl@0
    28
INDEX
sl@0
    29
	fread
sl@0
    30
sl@0
    31
ANSI_SYNOPSIS
sl@0
    32
	#include <stdio.h>
sl@0
    33
	size_t fread(void *<[buf]>, size_t <[size]>, size_t <[count]>,
sl@0
    34
		     FILE *<[fp]>);
sl@0
    35
sl@0
    36
TRAD_SYNOPSIS
sl@0
    37
	#include <stdio.h>
sl@0
    38
	size_t fread(<[buf]>, <[size]>, <[count]>, <[fp]>)
sl@0
    39
	char *<[buf]>;
sl@0
    40
	size_t <[size]>;
sl@0
    41
	size_t <[count]>;
sl@0
    42
	FILE *<[fp]>;
sl@0
    43
sl@0
    44
DESCRIPTION
sl@0
    45
<<fread>> attempts to copy, from the file or stream identified by
sl@0
    46
<[fp]>, <[count]> elements (each of size <[size]>) into memory,
sl@0
    47
starting at <[buf]>.   <<fread>> may copy fewer elements than
sl@0
    48
<[count]> if an error, or end of file, intervenes.
sl@0
    49
sl@0
    50
<<fread>> also advances the file position indicator (if any) for
sl@0
    51
<[fp]> by the number of @emph{characters} actually read.
sl@0
    52
sl@0
    53
RETURNS
sl@0
    54
The result of <<fread>> is the number of elements it succeeded in
sl@0
    55
reading.
sl@0
    56
sl@0
    57
PORTABILITY
sl@0
    58
ANSI C requires <<fread>>.
sl@0
    59
sl@0
    60
Supporting OS subroutines required: <<close>>, <<fstat>>, <<isatty>>,
sl@0
    61
<<lseek>>, <<read>>, <<sbrk>>, <<write>>.
sl@0
    62
*/
sl@0
    63
sl@0
    64
#include <stdio.h>
sl@0
    65
#include <string.h>
sl@0
    66
#include "LOCAL.H"
sl@0
    67
sl@0
    68
/**
sl@0
    69
Read block of data from a stream.
sl@0
    70
Read count number of items each one with a size of size bytes from the stream
sl@0
    71
and stores it in the specified buffer.
sl@0
    72
Stream's postion indicator is increased by the number of bytes readed.
sl@0
    73
Total amount of bytes read is (size x count).
sl@0
    74
@return   The total number of items readed is returned.
sl@0
    75
@param buf Pointer to the destination structure with a minimum size of (size*count) bytes. 
sl@0
    76
@param size Size in bytes of each item to be read. 
sl@0
    77
@param count Number of items, each one with a size of size bytes. 
sl@0
    78
@param fp pointer to an open file.
sl@0
    79
*/
sl@0
    80
EXPORT_C size_t
sl@0
    81
fread (void *buf, size_t size, size_t count, FILE * fp)
sl@0
    82
{
sl@0
    83
  register size_t resid;
sl@0
    84
  register char *p;
sl@0
    85
  register int r;
sl@0
    86
  size_t total;
sl@0
    87
sl@0
    88
  if ((resid = count * size) == 0)
sl@0
    89
    return 0;
sl@0
    90
  if (fp->_r < 0)
sl@0
    91
    fp->_r = 0;
sl@0
    92
  total = resid;
sl@0
    93
  p = (char*)buf;
sl@0
    94
  while ((int)resid > (r = fp->_r))
sl@0
    95
    {
sl@0
    96
      (void) memcpy ((void *) p, (void *) fp->_p, (size_t) r);
sl@0
    97
      fp->_p += r;
sl@0
    98
      /* fp->_r = 0 ... done in __srefill */
sl@0
    99
      p += r;
sl@0
   100
      resid -= r;
sl@0
   101
      if (__srefill (fp))
sl@0
   102
	{
sl@0
   103
	  /* no more input: return partial result */
sl@0
   104
	  return (total - resid) / size;
sl@0
   105
	}
sl@0
   106
    }
sl@0
   107
  (void) memcpy ((void *) p, (void *) fp->_p, resid);
sl@0
   108
  fp->_r -= resid;
sl@0
   109
  fp->_p += resid;
sl@0
   110
  return count;
sl@0
   111
}