[BACK]Return to ttoutput.c CVS log [TXT][DIR] Up to [local] / src / usr.bin / window

Annotation of src/usr.bin/window/ttoutput.c, Revision 1.1.1.1

1.1       deraadt     1: /*     $NetBSD: ttoutput.c,v 1.3 1995/09/28 10:34:51 tls Exp $ */
                      2:
                      3: /*
                      4:  * Copyright (c) 1983, 1993
                      5:  *     The Regents of the University of California.  All rights reserved.
                      6:  *
                      7:  * This code is derived from software contributed to Berkeley by
                      8:  * Edward Wang at The University of California, Berkeley.
                      9:  *
                     10:  * Redistribution and use in source and binary forms, with or without
                     11:  * modification, are permitted provided that the following conditions
                     12:  * are met:
                     13:  * 1. Redistributions of source code must retain the above copyright
                     14:  *    notice, this list of conditions and the following disclaimer.
                     15:  * 2. Redistributions in binary form must reproduce the above copyright
                     16:  *    notice, this list of conditions and the following disclaimer in the
                     17:  *    documentation and/or other materials provided with the distribution.
                     18:  * 3. All advertising materials mentioning features or use of this software
                     19:  *    must display the following acknowledgement:
                     20:  *     This product includes software developed by the University of
                     21:  *     California, Berkeley and its contributors.
                     22:  * 4. Neither the name of the University nor the names of its contributors
                     23:  *    may be used to endorse or promote products derived from this software
                     24:  *    without specific prior written permission.
                     25:  *
                     26:  * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND
                     27:  * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
                     28:  * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
                     29:  * ARE DISCLAIMED.  IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
                     30:  * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
                     31:  * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
                     32:  * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
                     33:  * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
                     34:  * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
                     35:  * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
                     36:  * SUCH DAMAGE.
                     37:  */
                     38:
                     39: #ifndef lint
                     40: #if 0
                     41: static char sccsid[] = "@(#)ttoutput.c 8.1 (Berkeley) 6/6/93";
                     42: #else
                     43: static char rcsid[] = "$NetBSD: ttoutput.c,v 1.3 1995/09/28 10:34:51 tls Exp $";
                     44: #endif
                     45: #endif /* not lint */
                     46:
                     47: #include "ww.h"
                     48: #include "tt.h"
                     49: #include <sys/errno.h>
                     50:
                     51: /*
                     52:  * Buffered output package.
                     53:  * We need this because stdio fails on non-blocking writes.
                     54:  */
                     55:
                     56: ttflush()
                     57: {
                     58:        register char *p;
                     59:        register n = tt_obp - tt_ob;
                     60:        extern errno;
                     61:
                     62:        if (n == 0)
                     63:                return;
                     64:        if (tt.tt_checksum)
                     65:                (*tt.tt_checksum)(tt_ob, n);
                     66:        if (tt.tt_flush) {
                     67:                (*tt.tt_flush)();
                     68:                return;
                     69:        }
                     70:        wwnflush++;
                     71:        for (p = tt_ob; p < tt_obp;) {
                     72:                wwnwr++;
                     73:                n = write(1, p, tt_obp - p);
                     74:                if (n < 0) {
                     75:                        wwnwre++;
                     76:                        if (errno != EWOULDBLOCK) {
                     77:                                /* can't deal with this */
                     78:                                p = tt_obp;
                     79:                        }
                     80:                } else if (n == 0) {
                     81:                        /* what to do? */
                     82:                        wwnwrz++;
                     83:                } else {
                     84:                        wwnwrc += n;
                     85:                        p += n;
                     86:                }
                     87:        }
                     88:        tt_obp = tt_ob;
                     89: }
                     90:
                     91: ttputs(s)
                     92: register char *s;
                     93: {
                     94:        while (*s)
                     95:                ttputc(*s++);
                     96: }
                     97:
                     98: ttwrite(s, n)
                     99:        register char *s;
                    100:        register n;
                    101: {
                    102:        switch (n) {
                    103:        case 0:
                    104:                break;
                    105:        case 1:
                    106:                ttputc(*s);
                    107:                break;
                    108:        case 2:
                    109:                if (tt_obe - tt_obp < 2)
                    110:                        ttflush();
                    111:                *tt_obp++ = *s++;
                    112:                *tt_obp++ = *s;
                    113:                break;
                    114:        case 3:
                    115:                if (tt_obe - tt_obp < 3)
                    116:                        ttflush();
                    117:                *tt_obp++ = *s++;
                    118:                *tt_obp++ = *s++;
                    119:                *tt_obp++ = *s;
                    120:                break;
                    121:        case 4:
                    122:                if (tt_obe - tt_obp < 4)
                    123:                        ttflush();
                    124:                *tt_obp++ = *s++;
                    125:                *tt_obp++ = *s++;
                    126:                *tt_obp++ = *s++;
                    127:                *tt_obp++ = *s;
                    128:                break;
                    129:        case 5:
                    130:                if (tt_obe - tt_obp < 5)
                    131:                        ttflush();
                    132:                *tt_obp++ = *s++;
                    133:                *tt_obp++ = *s++;
                    134:                *tt_obp++ = *s++;
                    135:                *tt_obp++ = *s++;
                    136:                *tt_obp++ = *s;
                    137:                break;
                    138:        default:
                    139:                while (n > 0) {
                    140:                        register m;
                    141:
                    142:                        while ((m = tt_obe - tt_obp) == 0)
                    143:                                ttflush();
                    144:                        if ((m = tt_obe - tt_obp) > n)
                    145:                                m = n;
                    146:                        bcopy(s, tt_obp, m);
                    147:                        tt_obp += m;
                    148:                        s += m;
                    149:                        n -= m;
                    150:                }
                    151:        }
                    152: }