packages/language/c/libc/stdio/v2_0/src/input/gets.cxx

   1 //===========================================================================
   2 //
   3 //      gets.cxx
   4 //
   5 //      ISO C standard I/O gets() function
   6 //
   7 //===========================================================================
   8 //####ECOSGPLCOPYRIGHTBEGIN####
   9 // -------------------------------------------
  10 // This file is part of eCos, the Embedded Configurable Operating System.
  11 // Copyright (C) 1998, 1999, 2000, 2001, 2002 Red Hat, Inc.
  12 //
  13 // eCos is free software; you can redistribute it and/or modify it under
  14 // the terms of the GNU General Public License as published by the Free
  15 // Software Foundation; either version 2 or (at your option) any later version.
  16 //
  17 // eCos is distributed in the hope that it will be useful, but WITHOUT ANY
  18 // WARRANTY; without even the implied warranty of MERCHANTABILITY or
  19 // FITNESS FOR A PARTICULAR PURPOSE.  See the GNU General Public License
  20 // for more details.
  21 //
  22 // You should have received a copy of the GNU General Public License along
  23 // with eCos; if not, write to the Free Software Foundation, Inc.,
  24 // 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA.
  25 //
  26 // As a special exception, if other files instantiate templates or use macros
  27 // or inline functions from this file, or you compile this file and link it
  28 // with other works to produce a work based on this file, this file does not
  29 // by itself cause the resulting work to be covered by the GNU General Public
  30 // License. However the source code for this file must still be made available
  31 // in accordance with section (3) of the GNU General Public License.
  32 //
  33 // This exception does not invalidate any other reasons why a work based on
  34 // this file might be covered by the GNU General Public License.
  35 //
  36 // Alternative licenses for eCos may be arranged by contacting Red Hat, Inc.
  37 // at http://sources.redhat.com/ecos/ecos-license/
  38 // -------------------------------------------
  39 //####ECOSGPLCOPYRIGHTEND####
  40 //===========================================================================
  41 //#####DESCRIPTIONBEGIN####
  42 //
  43 // Author(s):     jlarmour
  44 // Contributors:
  45 // Date:          2001-03-15
  46 // Purpose:       Implementation of ISO C standard I/O gets() function
  47 // Description:
  48 // Usage:
  49 //
  50 //####DESCRIPTIONEND####
  51 //
  52 //===========================================================================
  53
  54 // CONFIGURATION
  55
  56 #include <pkgconf/libc_stdio.h>   // Configuration header
  57
  58 // INCLUDES
  59
  60 #include <cyg/infra/cyg_type.h>     // Common type definitions
  61 #include <cyg/infra/cyg_ass.h>      // Assertion support
  62 #include <cyg/infra/cyg_trac.h>     // Tracing support
  63 #include <stddef.h>                 // NULL and size_t from compiler
  64 #include <stdio.h>                  // header for this file
  65 #include <errno.h>                  // error codes
  66 #include <cyg/libc/stdio/stream.hxx>// Cyg_StdioStream
  67
  68 // FUNCTIONS
  69
  70 // FIXME: should be reworked to read buffer at a time, and scan that
  71 // for newlines, rather than reading byte at a time.
  72
  73 externC char *
  74 gets( char *s ) __THROW
  75 {
  76     Cyg_StdioStream *real_stream = (Cyg_StdioStream *)stdin;
  77     Cyg_ErrNo err=ENOERR;
  78     cyg_uint8 c;
  79     cyg_uint8 *str=(cyg_uint8 *)s;
  80     int nch;
  81
  82     CYG_CHECK_DATA_PTRC( s );
  83     CYG_CHECK_DATA_PTRC( real_stream );
  84
  85     CYG_REPORT_FUNCTYPE( "returning string %08x");
  86     CYG_REPORT_FUNCARG1( "s=%08x", s );
  87
  88     for (nch=1;; nch++) {
  89         err = real_stream->read_byte( &c );
  90
  91         // if nothing to read, try again ONCE after refilling buffer
  92         if (EAGAIN == err) {
  93             err = real_stream->refill_read_buffer();
  94             if ( !err )
  95                 err = real_stream->read_byte( &c );
  96
  97             if (EAGAIN == err) {
  98                 if (1 == nch) {   // indicates EOF at start
  99                     CYG_REPORT_RETVAL( NULL );
 100                     return NULL;
 101                 } else
 102                     break; // EOF
 103             } // if
 104         } // if
 105
 106         if ('\n' == c) // discard newlines
 107             break;
 108         *str++ = c;
 109     } // while
 110
 111     *str = '\0'; // NULL terminate it
 112
 113     if (err && EAGAIN != err) {
 114         real_stream->set_error( err );
 115         errno = err;
 116         CYG_REPORT_RETVAL( NULL );
 117         return NULL;
 118     } // if
 119
 120     CYG_REPORT_RETVAL( s );
 121     return s;
 122 } // gets()
 123
 124 // EOF gets.cxx