Return to ttoutput.c CVS log

Up to [CSRG BSD Unix] / 43BSDTahoe / ucb / window

Annotation of 43BSDTahoe/ucb/window/ttoutput.c, revision 1.1

1.1     ! root        1: /*
        !             2:  * Copyright (c) 1983 Regents of the University of California.
        !             3:  * All rights reserved.
        !             4:  *
        !             5:  * Redistribution and use in source and binary forms are permitted
        !             6:  * provided that the above copyright notice and this paragraph are
        !             7:  * duplicated in all such forms and that any documentation,
        !             8:  * advertising materials, and other materials related to such
        !             9:  * distribution and use acknowledge that the software was developed
        !            10:  * by the University of California, Berkeley.  The name of the
        !            11:  * University may not be used to endorse or promote products derived
        !            12:  * from this software without specific prior written permission.
        !            13:  * THIS SOFTWARE IS PROVIDED ``AS IS'' AND WITHOUT ANY EXPRESS OR
        !            14:  * IMPLIED WARRANTIES, INCLUDING, WITHOUT LIMITATION, THE IMPLIED
        !            15:  * WARRANTIES OF MERCHANTIBILITY AND FITNESS FOR A PARTICULAR PURPOSE.
        !            16:  */
        !            17: 
        !            18: #ifndef lint
        !            19: static char sccsid[] = "@(#)ttoutput.c 3.6 (Berkeley) 6/29/88";
        !            20: #endif /* not lint */
        !            21: 
        !            22: #include "ww.h"
        !            23: #include "tt.h"
        !            24: #include <sys/errno.h>
        !            25: 
        !            26: /*
        !            27:  * Buffered output package.
        !            28:  * We need this because stdio fails on non-blocking writes.
        !            29:  */
        !            30: 
        !            31: ttflush()
        !            32: {
        !            33:        register char *p;
        !            34:        register n;
        !            35:        extern errno;
        !            36: 
        !            37:        wwnflush++;
        !            38:        for (p = tt_ob; p < tt_obp;) {
        !            39:                wwnwr++;
        !            40:                n = write(1, p, tt_obp - p);
        !            41:                if (n < 0) {
        !            42:                        wwnwre++;
        !            43:                        if (errno != EWOULDBLOCK) {
        !            44:                                /* can't deal with this */
        !            45:                                p = tt_obp;
        !            46:                        }
        !            47:                } else if (n == 0) {
        !            48:                        /* what to do? */
        !            49:                        wwnwrz++;
        !            50:                } else {
        !            51:                        wwnwrc += n;
        !            52:                        p += n;
        !            53:                }
        !            54:        }
        !            55:        tt_obp = tt_ob;
        !            56: }
        !            57: 
        !            58: ttputs(s)
        !            59: register char *s;
        !            60: {
        !            61:        while (*s)
        !            62:                ttputc(*s++);
        !            63: }
        !            64: 
        !            65: ttwrite(s, n)
        !            66:        register char *s;
        !            67:        register n;
        !            68: {
        !            69:        switch (n) {
        !            70:        case 0:
        !            71:                break;
        !            72:        case 1:
        !            73:                ttputc(*s);
        !            74:                break;
        !            75:        case 2:
        !            76:                if (tt_obe - tt_obp < 2)
        !            77:                        ttflush();
        !            78:                *tt_obp++ = *s++;
        !            79:                *tt_obp++ = *s;
        !            80:                break;
        !            81:        case 3:
        !            82:                if (tt_obe - tt_obp < 3)
        !            83:                        ttflush();
        !            84:                *tt_obp++ = *s++;
        !            85:                *tt_obp++ = *s++;
        !            86:                *tt_obp++ = *s;
        !            87:                break;
        !            88:        case 4:
        !            89:                if (tt_obe - tt_obp < 4)
        !            90:                        ttflush();
        !            91:                *tt_obp++ = *s++;
        !            92:                *tt_obp++ = *s++;
        !            93:                *tt_obp++ = *s++;
        !            94:                *tt_obp++ = *s;
        !            95:                break;
        !            96:        case 5:
        !            97:                if (tt_obe - tt_obp < 5)
        !            98:                        ttflush();
        !            99:                *tt_obp++ = *s++;
        !           100:                *tt_obp++ = *s++;
        !           101:                *tt_obp++ = *s++;
        !           102:                *tt_obp++ = *s++;
        !           103:                *tt_obp++ = *s;
        !           104:                break;
        !           105:        default:
        !           106:                while (n > 0) {
        !           107:                        register m;
        !           108: 
        !           109:                        while ((m = tt_obe - tt_obp) == 0)
        !           110:                                ttflush();
        !           111:                        if ((m = tt_obe - tt_obp) > n)
        !           112:                                m = n;
        !           113:                        bcopy(s, tt_obp, m);
        !           114:                        tt_obp += m;
        !           115:                        s += m;
        !           116:                        n -= m;
        !           117:                }
        !           118:        }
        !           119: }

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