Return to _fputa.c CVS log

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

Annotation of coherent/b/lib/libc/stdio/_fputa.c, revision 1.1

1.1     ! root        1: /*
        !             2:  * libc/stdio/_fputa.c
        !             3:  * ANSI-compliant C standard i/o library internals.
        !             4:  * _fputa()
        !             5:  * Append character to end of file.
        !             6:  * Executed on first write after seek on append mode stream.
        !             7:  */
        !             8: 
        !             9: #include <stdio.h>
        !            10: #include "stdio.int.h"
        !            11: 
        !            12: int
        !            13: _fputa(c, fp) int c; register FILE *fp;
        !            14: {
        !            15:        register _FILE2 *f2p;
        !            16: 
        !            17: #if    _ASCII
        !            18:        register int isascii;
        !            19: 
        !            20:        isascii = fp->_ff2 & _FASCII;
        !            21: #endif
        !            22:        /* Seek to end. */
        !            23:        if (lseek(fileno(fp), 0L, SEEK_END) == -1L)
        !            24:                return EOF;
        !            25: 
        !            26:        /* Restore appropriate put function pointer. */
        !            27:        f2p = fp->_f2p;
        !            28:        switch (fp->_mode) {
        !            29: 
        !            30:        case _MODE_UNINIT:
        !            31:                f2p->_pt = &_fpinit;
        !            32:                break;
        !            33: 
        !            34:        case _MODE_FBUF:
        !            35: #if    _ASCII
        !            36:                f2p->_pt = isascii ? &_fputba : &_fputb;
        !            37: #else
        !            38:                f2p->_pt = &_fputb;
        !            39: #endif
        !            40:                break;
        !            41: 
        !            42:        case _MODE_LBUF:
        !            43: #if    _ASCII
        !            44:                f2p->_pt = isascii ? &_fputta : &_fputt;
        !            45: #else
        !            46:                f2p->_pt = &_fputt;
        !            47: #endif
        !            48:                break;
        !            49: 
        !            50:        case _MODE_NBUF:
        !            51: #if    _ASCII
        !            52:                f2p->_pt = isascii ? &_fputca : &_fputc;
        !            53: #else
        !            54:                f2p->_pt = &_fputc;
        !            55: #endif
        !            56:                break;
        !            57: 
        !            58:        default:
        !            59:                return EOF;                             /* should not happen */
        !            60:                break;
        !            61:        }
        !            62: 
        !            63:        /* Put the character. */
        !            64:        return (*f2p->_pt)(c, fp);
        !            65: }
        !            66: 
        !            67: /* end of libc/stdio/_fputa.c */

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