bin/stty/print.c

   1 /*-
   2  * Copyright (c) 1991, 1993, 1994
   3  *      The Regents of the University of California.  All rights reserved.
   4  *
   5  * Redistribution and use in source and binary forms, with or without
   6  * modification, are permitted provided that the following conditions
   7  * are met:
   8  * 1. Redistributions of source code must retain the above copyright
   9  *    notice, this list of conditions and the following disclaimer.
  10  * 2. Redistributions in binary form must reproduce the above copyright
  11  *    notice, this list of conditions and the following disclaimer in the
  12  *    documentation and/or other materials provided with the distribution.
  13  * 3. Neither the name of the University nor the names of its contributors
  14  *    may be used to endorse or promote products derived from this software
  15  *    without specific prior written permission.
  16  *
  17  * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND
  18  * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
  19  * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
  20  * ARE DISCLAIMED.  IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
  21  * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
  22  * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
  23  * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
  24  * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
  25  * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
  26  * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
  27  * SUCH DAMAGE.
  28  *
  29  * @(#)print.c  8.6 (Berkeley) 4/16/94
  30  * $FreeBSD: src/bin/stty/print.c,v 1.12.2.2 2001/07/04 22:40:00 kris Exp $
  31  */
  32
  33 #include <sys/types.h>
  34
  35 #include <stddef.h>
  36 #include <stdio.h>
  37 #include <string.h>
  38
  39 #include "stty.h"
  40 #include "extern.h"
  41
  42 static void  binit (const char *);
  43 static void  bput (const char *);
  44 static const char *ccval (struct cchar *, int);
  45
  46 void
  47 print(struct termios *tp, struct winsize *wp, int ldisc, enum FMT fmt)
  48 {
  49         struct cchar *p;
  50         long tmp;
  51         u_char *cc;
  52         int cnt, ispeed, ospeed;
  53         char buf1[100], buf2[100];
  54
  55         cnt = 0;
  56
  57         /* Line discipline. */
  58         if (ldisc != TTYDISC) {
  59                 switch(ldisc) {
  60                 case SLIPDISC:
  61                         cnt += printf("slip disc; ");
  62                         break;
  63                 case PPPDISC:
  64                         cnt += printf("ppp disc; ");
  65                         break;
  66                 default:
  67                         cnt += printf("#%d disc; ", ldisc);
  68                         break;
  69                 }
  70         }
  71
  72         /* Line speed. */
  73         ispeed = cfgetispeed(tp);
  74         ospeed = cfgetospeed(tp);
  75         if (ispeed != ospeed)
  76                 cnt +=
  77                     printf("ispeed %d baud; ospeed %d baud;", ispeed, ospeed);
  78         else
  79                 cnt += printf("speed %d baud;", ispeed);
  80         if (fmt >= BSD)
  81                 cnt += printf(" %d rows; %d columns;", wp->ws_row, wp->ws_col);
  82         if (cnt)
  83                 printf("\n");
  84
  85 #define on(f)   ((tmp & (f)) != 0)
  86 #define put(n, f, d) \
  87         if (fmt >= BSD || on(f) != (d)) \
  88                 bput((n) + on(f));
  89
  90         /* "local" flags */
  91         tmp = tp->c_lflag;
  92         binit("lflags");
  93         put("-icanon", ICANON, 1);
  94         put("-isig", ISIG, 1);
  95         put("-iexten", IEXTEN, 1);
  96         put("-echo", ECHO, 1);
  97         put("-echoe", ECHOE, 0);
  98         put("-echok", ECHOK, 0);
  99         put("-echoke", ECHOKE, 0);
 100         put("-echonl", ECHONL, 0);
 101         put("-echoctl", ECHOCTL, 0);
 102         put("-echoprt", ECHOPRT, 0);
 103         put("-altwerase", ALTWERASE, 0);
 104         put("-noflsh", NOFLSH, 0);
 105         put("-tostop", TOSTOP, 0);
 106         put("-flusho", FLUSHO, 0);
 107         put("-pendin", PENDIN, 0);
 108         put("-nokerninfo", NOKERNINFO, 0);
 109         put("-extproc", EXTPROC, 0);
 110
 111         /* input flags */
 112         tmp = tp->c_iflag;
 113         binit("iflags");
 114         put("-istrip", ISTRIP, 0);
 115         put("-icrnl", ICRNL, 1);
 116         put("-inlcr", INLCR, 0);
 117         put("-igncr", IGNCR, 0);
 118         put("-ixon", IXON, 1);
 119         put("-ixoff", IXOFF, 0);
 120         put("-ixany", IXANY, 1);
 121         put("-imaxbel", IMAXBEL, 1);
 122         put("-ignbrk", IGNBRK, 0);
 123         put("-brkint", BRKINT, 1);
 124         put("-inpck", INPCK, 0);
 125         put("-ignpar", IGNPAR, 0);
 126         put("-parmrk", PARMRK, 0);
 127
 128         /* output flags */
 129         tmp = tp->c_oflag;
 130         binit("oflags");
 131         put("-opost", OPOST, 1);
 132         put("-onlcr", ONLCR, 1);
 133         put("-ocrnl", OCRNL, 0);
 134         put("-oxtabs", OXTABS, 1);
 135         put("-onocr", OXTABS, 0);
 136         put("-onlret", OXTABS, 0);
 137
 138         /* control flags (hardware state) */
 139         tmp = tp->c_cflag;
 140         binit("cflags");
 141         put("-cread", CREAD, 1);
 142         switch(tmp&CSIZE) {
 143         case CS5:
 144                 bput("cs5");
 145                 break;
 146         case CS6:
 147                 bput("cs6");
 148                 break;
 149         case CS7:
 150                 bput("cs7");
 151                 break;
 152         case CS8:
 153                 bput("cs8");
 154                 break;
 155         }
 156         bput("-parenb" + on(PARENB));
 157         put("-parodd", PARODD, 0);
 158         put("-hupcl", HUPCL, 1);
 159         put("-clocal", CLOCAL, 0);
 160         put("-cstopb", CSTOPB, 0);
 161         switch(tmp & (CCTS_OFLOW | CRTS_IFLOW)) {
 162         case CCTS_OFLOW:
 163                 bput("ctsflow");
 164                 break;
 165         case CRTS_IFLOW:
 166                 bput("rtsflow");
 167                 break;
 168         default:
 169                 put("-crtscts", CCTS_OFLOW | CRTS_IFLOW, 0);
 170                 break;
 171         }
 172         put("-dsrflow", CDSR_OFLOW, 0);
 173         put("-dtrflow", CDTR_IFLOW, 0);
 174         put("-mdmbuf", MDMBUF, 0);      /* XXX mdmbuf ==  dtrflow */
 175
 176         /* special control characters */
 177         cc = tp->c_cc;
 178         if (fmt == POSIX) {
 179                 binit("cchars");
 180                 for (p = cchars1; p->name; ++p) {
 181                         snprintf(buf1, sizeof(buf1), "%s = %s;",
 182                             p->name, ccval(p, cc[p->sub]));
 183                         bput(buf1);
 184                 }
 185                 binit(NULL);
 186         } else {
 187                 binit(NULL);
 188                 for (p = cchars1, cnt = 0; p->name; ++p) {
 189                         if (fmt != BSD && cc[p->sub] == p->def)
 190                                 continue;
 191 #define WD      "%-8s"
 192                         snprintf(buf1 + cnt * 8, sizeof(buf1) - cnt * 8,
 193                             WD, p->name);
 194                         snprintf(buf2 + cnt * 8, sizeof(buf2) - cnt * 8,
 195                             WD, ccval(p, cc[p->sub]));
 196                         if (++cnt == LINELENGTH / 8) {
 197                                 cnt = 0;
 198                                 printf("%s\n", buf1);
 199                                 printf("%s\n", buf2);
 200                         }
 201                 }
 202                 if (cnt) {
 203                         printf("%s\n", buf1);
 204                         printf("%s\n", buf2);
 205                 }
 206         }
 207 }
 208
 209 static int col;
 210 static const char *label;
 211
 212 static void
 213 binit(const char *lb)
 214 {
 215
 216         if (col) {
 217                 printf("\n");
 218                 col = 0;
 219         }
 220         label = lb;
 221 }
 222
 223 static void
 224 bput(const char *s)
 225 {
 226
 227         if (col == 0) {
 228                 col = printf("%s: %s", label, s);
 229                 return;
 230         }
 231         if ((col + strlen(s)) > LINELENGTH) {
 232                 printf("\n\t");
 233                 col = printf("%s", s) + 8;
 234                 return;
 235         }
 236         col += printf(" %s", s);
 237 }
 238
 239 static const char *
 240 ccval(struct cchar *p, int c)
 241 {
 242         static char buf[5];
 243         char *bp;
 244
 245         if (p->sub == VMIN || p->sub == VTIME) {
 246                 snprintf(buf, sizeof(buf), "%d", c);
 247                 return (buf);
 248         }
 249         if (c == _POSIX_VDISABLE)
 250                 return ("<undef>");
 251         bp = buf;
 252         if (c & 0200) {
 253                 *bp++ = 'M';
 254                 *bp++ = '-';
 255                 c &= 0177;
 256         }
 257         if (c == 0177) {
 258                 *bp++ = '^';
 259                 *bp++ = '?';
 260         }
 261         else if (c < 040) {
 262                 *bp++ = '^';
 263                 *bp++ = c + '@';
 264         }
 265         else
 266                 *bp++ = c;
 267         *bp = '\0';
 268         return (buf);
 269 }