Return to _fgetc.c CVS log

Up to [MW Coherent from dump] / coherent / b / lib / libc / XSTDIO

Annotation of coherent/b/lib/libc/XSTDIO/_fgetc.c, revision 1.1.1.1

1.1       root        1: /*
                      2:  * libc/stdio/_fgetc.c
                      3:  * ANSI-compliant C standard i/o library internals.
                      4:  * _fgetc(), _fgetca()
                      5:  * Read character, unbuffered.
                      6:  */
                      7: 
                      8: #include <stdio.h>
                      9: #if    COHERENT || GEMDOS
                     10: #include <errno.h>
                     11: #endif
                     12: 
                     13: int
                     14: _fgetc(fp) register FILE *fp;
                     15: {
                     16:        unsigned char c;
                     17:        register int n;
                     18: 
                     19:        /* Special kludge: fflush stdout if line buffered. */
                     20:        if ((stdout->_ff1 & _IOLBF) != 0)
                     21:                fflush(stdout);
                     22: 
                     23:        if ((n = read(fileno(fp), &c, 1)) == 1)
                     24:                return c;
                     25:        else if (n == 0)
                     26:                fp->_ff1 |= _FEOF;
                     27:        else {
                     28: #if    COHERENT || GEMDOS
                     29:                if (errno == EINTR)
                     30:                        errno = 0;
                     31:                else
                     32: #endif
                     33:                fp->_ff1 |= _FERR;
                     34:        }
                     35:        return EOF;
                     36: }
                     37: 
                     38: #if    _ASCII
                     39: 
                     40: /* ASCII: ignore '\r', map _EOFCHAR to EOF. */
                     41: int
                     42: _fgetca(fp) register FILE *fp;
                     43: {
                     44:        register int c;
                     45: 
                     46:        while ((c = _fgetc(fp)) == '\r')
                     47:                ;
                     48:        if (c == _EOFCHAR) {
                     49:                fp->_ff |= _FEOF;
                     50:                return EOF;
                     51:        }
                     52:        return c;
                     53: }
                     54: 
                     55: #endif
                     56: 
                     57: /* end of libc/stdio/_fgetc.c */

This archive runs on limited infrastructure. Preserving old code on modern bandwidth. Automated agents are requested to crawl responsibly.