Return to filbuf.c CVS log

Up to [CSRG BSD Unix] / 42BSD / lib / libc / stdio

Annotation of 42BSD/lib/libc/stdio/filbuf.c, revision 1.1.1.1

1.1       root        1: /* @(#)filbuf.c        4.6 (Berkeley) 6/30/83 */
                      2: #include       <stdio.h>
                      3: #include       <sys/types.h>
                      4: #include       <sys/stat.h>
                      5: char   *malloc();
                      6: 
                      7: _filbuf(iop)
                      8: register FILE *iop;
                      9: {
                     10:        int size;
                     11:        struct stat stbuf;
                     12:        static char smallbuf[_NFILE];
                     13:        extern char _sibuf[];
                     14: 
                     15:        if (iop->_flag & _IORW)
                     16:                iop->_flag |= _IOREAD;
                     17: 
                     18:        if ((iop->_flag&_IOREAD) == 0)
                     19:                return(EOF);
                     20:        if (iop->_flag&(_IOSTRG|_IOEOF))
                     21:                return(EOF);
                     22: tryagain:
                     23:        if (iop->_base==NULL) {
                     24:                if (iop->_flag&_IONBF) {
                     25:                        iop->_base = &smallbuf[fileno(iop)];
                     26:                        goto tryagain;
                     27:                }
                     28:                if (fstat(fileno(iop), &stbuf) < 0 || stbuf.st_blksize <= NULL)
                     29:                        size = BUFSIZ;
                     30:                else
                     31:                        size = stbuf.st_blksize;
                     32:                if (iop == stdin)
                     33:                        iop->_base = _sibuf;
                     34:                else {
                     35:                        if ((iop->_base = malloc(size)) == NULL) {
                     36:                                iop->_flag |= _IONBF;
                     37:                                goto tryagain;
                     38:                        }
                     39:                        iop->_flag |= _IOMYBUF;
                     40:                }
                     41:                iop->_bufsiz = size;
                     42:        }
                     43:        if (iop == stdin) {
                     44:                if (stdout->_flag&_IOLBF)
                     45:                        fflush(stdout);
                     46:                if (stderr->_flag&_IOLBF)
                     47:                        fflush(stderr);
                     48:        }
                     49:        iop->_cnt = read(fileno(iop), iop->_base,
                     50:                iop->_flag & _IONBF ? 1 : iop->_bufsiz);
                     51:        iop->_ptr = iop->_base;
                     52:        if (--iop->_cnt < 0) {
                     53:                if (iop->_cnt == -1) {
                     54:                        iop->_flag |= _IOEOF;
                     55:                        if (iop->_flag & _IORW)
                     56:                                iop->_flag &= ~_IOREAD;
                     57:                } else
                     58:                        iop->_flag |= _IOERR;
                     59:                iop->_cnt = 0;
                     60:                return(-1);
                     61:        }
                     62:        return(*iop->_ptr++&0377);
                     63: }

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