newlib/libc/stdio/puts.c

   1 /*
   2  * Copyright (c) 1990 The Regents of the University of California.
   3  * All rights reserved.
   4  *
   5  * Redistribution and use in source and binary forms are permitted
   6  * provided that the above copyright notice and this paragraph are
   7  * duplicated in all such forms and that any documentation,
   8  * and/or other materials related to such
   9  * distribution and use acknowledge that the software was developed
  10  * by the University of California, Berkeley.  The name of the
  11  * University may not be used to endorse or promote products derived
  12  * from this software without specific prior written permission.
  13  * THIS SOFTWARE IS PROVIDED ``AS IS'' AND WITHOUT ANY EXPRESS OR
  14  * IMPLIED WARRANTIES, INCLUDING, WITHOUT LIMITATION, THE IMPLIED
  15  * WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE.
  16  */
  17
  18 /*
  19 FUNCTION
  20 <<puts>>---write a character string
  21
  22 INDEX
  23         puts
  24 INDEX
  25         _puts_r
  26
  27 SYNOPSIS
  28         #include <stdio.h>
  29         int puts(const char *<[s]>);
  30
  31         int _puts_r(struct _reent *<[reent]>, const char *<[s]>);
  32
  33 DESCRIPTION
  34 <<puts>> writes the string at <[s]> (followed by a newline, instead of
  35 the trailing null) to the standard output stream.
  36
  37 The alternate function <<_puts_r>> is a reentrant version.  The extra
  38 argument <[reent]> is a pointer to a reentrancy structure.
  39
  40 RETURNS
  41 If successful, the result is a nonnegative integer; otherwise, the
  42 result is <<EOF>>.
  43
  44 PORTABILITY
  45 ANSI C requires <<puts>>, but does not specify that the result on
  46 success must be <<0>>; any non-negative value is permitted.
  47
  48 Supporting OS subroutines required: <<close>>, <<fstat>>, <<isatty>>,
  49 <<lseek>>, <<read>>, <<sbrk>>, <<write>>.
  50 */
  51
  52 #if defined(LIBC_SCCS) && !defined(lint)
  53 static char sccsid[] = "%W% (Berkeley) %G%";
  54 #endif /* LIBC_SCCS and not lint */
  55
  56 #include <_ansi.h>
  57 #include <reent.h>
  58 #include <stdio.h>
  59 #include <string.h>
  60 #include "fvwrite.h"
  61 #include "local.h"
  62
  63 /*
  64  * Write the given string to stdout, appending a newline.
  65  */
  66
  67 int
  68 _puts_r (struct _reent *ptr,
  69        const char * s)
  70 {
  71 #ifdef _FVWRITE_IN_STREAMIO
  72   int result;
  73   size_t c = strlen (s);
  74   struct __suio uio;
  75   struct __siov iov[2];
  76   FILE *fp;
  77
  78   iov[0].iov_base = s;
  79   iov[0].iov_len = c;
  80   iov[1].iov_base = "\n";
  81   iov[1].iov_len = 1;
  82   uio.uio_resid = c + 1;
  83   uio.uio_iov = &iov[0];
  84   uio.uio_iovcnt = 2;
  85
  86   _REENT_SMALL_CHECK_INIT (ptr);
  87   fp = _stdout_r (ptr);
  88   CHECK_INIT (ptr, fp);
  89   _newlib_flockfile_start (fp);
  90   if (ORIENT (fp, -1) != -1)
  91     result = EOF;
  92   else
  93     result = (__sfvwrite_r (ptr, fp, &uio) ? EOF : '\n');
  94   _newlib_flockfile_end (fp);
  95   return result;
  96 #else
  97   int result = EOF;
  98   const char *p = s;
  99   FILE *fp;
 100   _REENT_SMALL_CHECK_INIT (ptr);
 101
 102   fp = _stdout_r (ptr);
 103   CHECK_INIT (ptr, fp);
 104   _newlib_flockfile_start (fp);
 105   /* Make sure we can write.  */
 106   if (cantwrite (ptr, fp))
 107     goto err;
 108
 109   while (*p)
 110     {
 111       if (__sputc_r (ptr, *p++, fp) == EOF)
 112         goto err;
 113     }
 114   if (__sputc_r (ptr, '\n', fp) == EOF)
 115     goto err;
 116
 117   result = '\n';
 118
 119 err:
 120   _newlib_flockfile_end (fp);
 121   return result;
 122 #endif
 123 }
 124
 125 #ifndef _REENT_ONLY
 126
 127 int
 128 puts (char const * s)
 129 {
 130   return _puts_r (_REENT, s);
 131 }
 132
 133 #endif