Return to sh.print.c CVS log

Up to [CSRG BSD Unix] / 43BSD / bin / csh

Annotation of 43BSD/bin/csh/sh.print.c, revision 1.1.1.1

1.1       root        1: /*
                      2:  * Copyright (c) 1980 Regents of the University of California.
                      3:  * All rights reserved.  The Berkeley Software License Agreement
                      4:  * specifies the terms and conditions for redistribution.
                      5:  */
                      6: 
                      7: #ifndef lint
                      8: static char *sccsid = "@(#)sh.print.c  5.2 (Berkeley) 6/6/85";
                      9: #endif
                     10: 
                     11: #include "sh.h"
                     12: #include <sys/ioctl.h>
                     13: 
                     14: /*
                     15:  * C Shell
                     16:  */
                     17: 
                     18: psecs(l)
                     19:        long l;
                     20: {
                     21:        register int i;
                     22: 
                     23:        i = l / 3600;
                     24:        if (i) {
                     25:                printf("%d:", i);
                     26:                i = l % 3600;
                     27:                p2dig(i / 60);
                     28:                goto minsec;
                     29:        }
                     30:        i = l;
                     31:        printf("%d", i / 60);
                     32: minsec:
                     33:        i %= 60;
                     34:        printf(":");
                     35:        p2dig(i);
                     36: }
                     37: 
                     38: p2dig(i)
                     39:        register int i;
                     40: {
                     41: 
                     42:        printf("%d%d", i / 10, i % 10);
                     43: }
                     44: 
                     45: char   linbuf[128];
                     46: char   *linp = linbuf;
                     47: 
                     48: putchar(c)
                     49:        register int c;
                     50: {
                     51: 
                     52:        if ((c & QUOTE) == 0 && (c == 0177 || c < ' ' && c != '\t' && c != '\n')) {
                     53:                putchar('^');
                     54:                if (c == 0177)
                     55:                        c = '?';
                     56:                else
                     57:                        c |= 'A' - 1;
                     58:        }
                     59:        c &= TRIM;
                     60:        *linp++ = c;
                     61:        if (c == '\n' || linp >= &linbuf[sizeof linbuf - 2])
                     62:                flush();
                     63: }
                     64: 
                     65: draino()
                     66: {
                     67: 
                     68:        linp = linbuf;
                     69: }
                     70: 
                     71: flush()
                     72: {
                     73:        register int unit;
                     74:        int lmode;
                     75: 
                     76:        if (linp == linbuf)
                     77:                return;
                     78:        if (haderr)
                     79:                unit = didfds ? 2 : SHDIAG;
                     80:        else
                     81:                unit = didfds ? 1 : SHOUT;
                     82: #ifdef TIOCLGET
                     83:        if (didfds == 0 && ioctl(unit, TIOCLGET, (char *)&lmode) == 0 &&
                     84:            lmode&LFLUSHO) {
                     85:                lmode = LFLUSHO;
                     86:                (void) ioctl(unit, TIOCLBIC, (char *)&lmode);
                     87:                (void) write(unit, "\n", 1);
                     88:        }
                     89: #endif
                     90:        (void) write(unit, linbuf, linp - linbuf);
                     91:        linp = linbuf;
                     92: }

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