rom/dos/fgets.c

   1 /*
   2     Copyright © 1995-2001, The AROS Development Team. All rights reserved.
   3     $Id$
   4
   5     Desc:
   6     Lang: english
   7 */
   8 #include "dos_intern.h"
   9 #include <aros/debug.h>
  10
  11 /*****************************************************************************
  12
  13     NAME */
  14 #include <proto/dos.h>
  15
  16         AROS_LH3(STRPTR, FGets,
  17
  18 /*  SYNOPSIS */
  19         AROS_LHA(BPTR  , fh, D1),
  20         AROS_LHA(STRPTR, buf, D2),
  21         AROS_LHA(ULONG , buflen, D3),
  22
  23 /*  LOCATION */
  24         struct DosLibrary *, DOSBase, 56, Dos)
  25
  26 /*  FUNCTION
  27         Read until NEWLINE (\n), EOF is encountered or buflen-1
  28         characters have been read. If a NEWLINE is read, it will
  29         be the last character in the buffer. The buffer will always
  30         be \0-terminated.
  31
  32     INPUTS
  33         fh - Read buffered from this filehandle
  34         buf - Put read chars in this buffer
  35         buflen - The size of the buffer
  36
  37     RESULT
  38         buf or NULL if the first thing read is EOF.
  39
  40     NOTES
  41
  42     EXAMPLE
  43
  44     BUGS
  45
  46     SEE ALSO
  47
  48     INTERNALS
  49
  50 *****************************************************************************/
  51 {
  52     AROS_LIBFUNC_INIT
  53     AROS_LIBBASE_EXT_DECL(struct DosLibrary *,DOSBase)
  54
  55     ULONG len = 0;
  56     LONG  c;
  57
  58     buflen--;
  59
  60     do
  61     {
  62         c = FGetC (fh);
  63
  64         if (c == EOF)
  65         {
  66             if (len == 0)
  67                 return NULL;
  68             else
  69                 break;
  70         }
  71
  72         buf[len++] = c;
  73     }
  74     while ((len<buflen) && (c != '\n'));
  75
  76     buf[len] = 0;
  77
  78     return buf;
  79
  80     AROS_LIBFUNC_EXIT
  81 } /* FGets */