Return to fwrite.c CVS log

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

Annotation of coherent/b/lib/libc/XSTDIO/fwrite.c, revision 1.1

1.1     ! root        1: /*
        !             2:  * libc/stdio/fwrite.c
        !             3:  * ANSI-compliant C standard i/o library.
        !             4:  * fwrite()
        !             5:  * ANSI 4.9.8.2.
        !             6:  * Write nmemb items of given size from ptr to stream.
        !             7:  */
        !             8: 
        !             9: #include <stdio.h>
        !            10: #include <stdlib.h>
        !            11: 
        !            12: size_t
        !            13: fwrite(ptr, size, nmemb, stream) const Void *ptr; size_t size, nmemb; register FILE *stream;
        !            14: {
        !            15:        register size_t nb, n;
        !            16:        register unsigned char *p;
        !            17: 
        !            18:        n = nb = size * nmemb;
        !            19: 
        !            20:        /* Throw away ungotten character if present. */
        !            21:        if (stream->_ff2 & _FUNGOT)
        !            22:                (*stream->_f2p->_gt)(stream);
        !            23: 
        !            24:        /* If unbuffered, write() will work, otherwise use putc(). */
        !            25:        /* putc() sets _FERR as required, write() does not. */
        !            26:        if (stream->_mode == _MODE_FBUF || stream->_mode == _MODE_LBUF) {
        !            27:                for (p = ptr; nb && putc(*p++, stream) != EOF; nb--)
        !            28:                        ;
        !            29:                if (nb)
        !            30:                        return (n - nb) / size;
        !            31:        } else if ((nb = write(fileno(stream), ptr, nb)) != n) {
        !            32:                stream->_ff1 |= _FERR;
        !            33:                return nb / size;
        !            34:        }
        !            35:        return nmemb;
        !            36: }
        !            37: 
        !            38: /* end of libc/stdio/fwrite.c */

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