rom/dos/writechars.c

   1 /*
   2     Copyright © 1995-2001, The AROS Development Team. All rights reserved.
   3     $Id$
   4
   5     Desc: Writes a buffer to the current output.
   6     Lang: english
   7 */
   8 #include <proto/exec.h>
   9 #include <dos/dosextens.h>
  10 #include "dos_intern.h"
  11
  12 /*****************************************************************************
  13
  14     NAME */
  15 #include <proto/dos.h>
  16
  17         AROS_LH2(LONG, WriteChars,
  18
  19 /*  SYNOPSIS */
  20         AROS_LHA(STRPTR, buf, D1),
  21         AROS_LHA(ULONG , buflen, D2),
  22
  23 /*  LOCATION */
  24         struct DosLibrary *, DOSBase, 157, Dos)
  25
  26 /*  FUNCTION
  27         Writes the contents of the buffer to the current output stream.
  28         The number of bytes written is returned.
  29
  30     INPUTS
  31         buf - Buffer to be written.
  32         buflen - Size of the buffer in bytes.
  33
  34     RESULT
  35         The number of bytes written or EOF on failure. IoErr() gives
  36         additional information in that case.
  37
  38     NOTES
  39
  40     EXAMPLE
  41
  42     BUGS
  43
  44     SEE ALSO
  45         FPuts(), FPutC(), FWrite(), PutStr()
  46
  47     INTERNALS
  48
  49 *****************************************************************************/
  50 {
  51     AROS_LIBFUNC_INIT
  52     AROS_LIBBASE_EXT_DECL(struct DosLibrary *,DOSBase)
  53     ULONG i;
  54     BPTR file = Output();
  55
  56     for (i = 0; i < buflen; i++)
  57         if (FPutC(file, buf[i]) < 0)
  58             return EOF;
  59
  60     return (LONG)i;
  61     AROS_LIBFUNC_EXIT
  62 } /* WriteChars */