Return to puts.c CVS log

Up to [Research Unix] / researchv10dc / libI77 / notused

Annotation of researchv10dc/libI77/notused/puts.c, revision 1.1.1.1

1.1       root        1: /*     @(#)puts.c      3.3     */
                      2: /*LINTLIBRARY*/
                      3: /*
                      4:  * This version writes directly to the buffer rather than looping on putc.
                      5:  * Ptr args aren't checked for NULL because the program would be a
                      6:  * catastrophic mess anyway.  Better to abort than just to return NULL.
                      7:  */
                      8: #include <stdio.h>
                      9: #include "stdiom.h"
                     10: 
                     11: extern char *memccpy();
                     12: 
                     13: int
                     14: puts(ptr)
                     15: char *ptr;
                     16: {
                     17:        char *p;
                     18:        register int ndone = 0, n;
                     19:        register unsigned char *cptr, *bufend;
                     20: 
                     21:        if (_WRTCHK(stdout))
                     22:                return (0);
                     23: 
                     24:        bufend = _bufend(stdout);
                     25: 
                     26:        for ( ; ; ptr += n) {
                     27:                while ((n = bufend - (cptr = stdout->_ptr)) <= 0) /* full buf */
                     28:                        if (_xflsbuf(stdout) == EOF)
                     29:                                return(EOF);
                     30:                if ((p = memccpy((char *) cptr, ptr, '\0', n)) != NULL)
                     31:                        n = p - (char *) cptr;
                     32:                stdout->_cnt -= n;
                     33:                stdout->_ptr += n;
                     34:                _BUFSYNC(stdout);
                     35:                ndone += n;
                     36:                if (p != NULL) {
                     37:                        stdout->_ptr[-1] = '\n'; /* overwrite '\0' with '\n' */
                     38:                        if (stdout->_flag & (_IONBF | _IOLBF)) /* flush line */
                     39:                                if (_xflsbuf(stdout) == EOF)
                     40:                                        return(EOF);
                     41:                        return(ndone);
                     42:                }
                     43:        }
                     44: }

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