[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.3

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