sys/kern/tty_compat.c

   1 /*-
   2  * Copyright (c) 1982, 1986, 1991, 1993
   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. All advertising materials mentioning features or use of this software
  14  *    must display the following acknowledgement:
  15  *      This product includes software developed by the University of
  16  *      California, Berkeley and its contributors.
  17  * 4. Neither the name of the University nor the names of its contributors
  18  *    may be used to endorse or promote products derived from this software
  19  *    without specific prior written permission.
  20  *
  21  * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND
  22  * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
  23  * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
  24  * ARE DISCLAIMED.  IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
  25  * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
  26  * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
  27  * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
  28  * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
  29  * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
  30  * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
  31  * SUCH DAMAGE.
  32  *
  33  *      @(#)tty_compat.c        8.1 (Berkeley) 6/10/93
  34  * $FreeBSD: src/sys/kern/tty_compat.c,v 1.29 1999/08/28 00:46:20 peter Exp $
  35  */
  36
  37 #include "opt_compat.h"
  38
  39 /*
  40  * mapping routines for old line discipline (yuck)
  41  */
  42 #if defined(COMPAT_43) || defined(COMPAT_SUNOS)
  43
  44 #include <sys/param.h>
  45 #include <sys/systm.h>
  46 #include <sys/ioctl_compat.h>
  47 #include <sys/tty.h>
  48 #include <sys/kernel.h>
  49 #include <sys/sysctl.h>
  50
  51 static int ttcompatgetflags     __P((struct tty *tp));
  52 static void ttcompatsetflags    __P((struct tty *tp, struct termios *t));
  53 static void ttcompatsetlflags   __P((struct tty *tp, struct termios *t));
  54 static int ttcompatspeedtab     __P((int speed, struct speedtab *table));
  55
  56 static int ttydebug = 0;
  57 SYSCTL_INT(_debug, OID_AUTO, ttydebug, CTLFLAG_RW, &ttydebug, 0, "");
  58
  59 static struct speedtab compatspeeds[] = {
  60 #define MAX_SPEED       17
  61         { 115200, 17 },
  62         { 57600, 16 },
  63         { 38400, 15 },
  64         { 19200, 14 },
  65         { 9600, 13 },
  66         { 4800, 12 },
  67         { 2400, 11 },
  68         { 1800, 10 },
  69         { 1200, 9 },
  70         { 600,  8 },
  71         { 300,  7 },
  72         { 200,  6 },
  73         { 150,  5 },
  74         { 134,  4 },
  75         { 110,  3 },
  76         { 75,   2 },
  77         { 50,   1 },
  78         { 0,    0 },
  79         { -1,   -1 },
  80 };
  81 static int compatspcodes[] = {
  82         0, 50, 75, 110, 134, 150, 200, 300, 600, 1200,
  83         1800, 2400, 4800, 9600, 19200, 38400, 57600, 115200,
  84 };
  85
  86 static int
  87 ttcompatspeedtab(speed, table)
  88         int speed;
  89         register struct speedtab *table;
  90 {
  91         if (speed == 0)
  92                 return (0); /* hangup */
  93         for ( ; table->sp_speed > 0; table++)
  94                 if (table->sp_speed <= speed) /* nearest one, rounded down */
  95                         return (table->sp_code);
  96         return (1); /* 50, min and not hangup */
  97 }
  98
  99 int
 100 ttsetcompat(tp, com, data, term)
 101         register struct tty *tp;
 102         u_long *com;
 103         caddr_t data;
 104         struct termios *term;
 105 {
 106         switch (*com) {
 107         case TIOCSETP:
 108         case TIOCSETN: {
 109                 register struct sgttyb *sg = (struct sgttyb *)data;
 110                 int speed;
 111
 112                 if ((speed = sg->sg_ispeed) > MAX_SPEED || speed < 0)
 113                         return(EINVAL);
 114                 else if (speed != ttcompatspeedtab(tp->t_ispeed, compatspeeds))
 115                         term->c_ispeed = compatspcodes[speed];
 116                 else
 117                         term->c_ispeed = tp->t_ispeed;
 118                 if ((speed = sg->sg_ospeed) > MAX_SPEED || speed < 0)
 119                         return(EINVAL);
 120                 else if (speed != ttcompatspeedtab(tp->t_ospeed, compatspeeds))
 121                         term->c_ospeed = compatspcodes[speed];
 122                 else
 123                         term->c_ospeed = tp->t_ospeed;
 124                 term->c_cc[VERASE] = sg->sg_erase;
 125                 term->c_cc[VKILL] = sg->sg_kill;
 126                 tp->t_flags = (tp->t_flags&0xffff0000) | (sg->sg_flags&0xffff);
 127                 ttcompatsetflags(tp, term);
 128                 *com = (*com == TIOCSETP) ? TIOCSETAF : TIOCSETA;
 129                 break;
 130         }
 131         case TIOCSETC: {
 132                 struct tchars *tc = (struct tchars *)data;
 133                 register cc_t *cc;
 134
 135                 cc = term->c_cc;
 136                 cc[VINTR] = tc->t_intrc;
 137                 cc[VQUIT] = tc->t_quitc;
 138                 cc[VSTART] = tc->t_startc;
 139                 cc[VSTOP] = tc->t_stopc;
 140                 cc[VEOF] = tc->t_eofc;
 141                 cc[VEOL] = tc->t_brkc;
 142                 if (tc->t_brkc == -1)
 143                         cc[VEOL2] = _POSIX_VDISABLE;
 144                 *com = TIOCSETA;
 145                 break;
 146         }
 147         case TIOCSLTC: {
 148                 struct ltchars *ltc = (struct ltchars *)data;
 149                 register cc_t *cc;
 150
 151                 cc = term->c_cc;
 152                 cc[VSUSP] = ltc->t_suspc;
 153                 cc[VDSUSP] = ltc->t_dsuspc;
 154                 cc[VREPRINT] = ltc->t_rprntc;
 155                 cc[VDISCARD] = ltc->t_flushc;
 156                 cc[VWERASE] = ltc->t_werasc;
 157                 cc[VLNEXT] = ltc->t_lnextc;
 158                 *com = TIOCSETA;
 159                 break;
 160         }
 161         case TIOCLBIS:
 162         case TIOCLBIC:
 163         case TIOCLSET:
 164                 if (*com == TIOCLSET)
 165                         tp->t_flags = (tp->t_flags&0xffff) | *(int *)data<<16;
 166                 else {
 167                         tp->t_flags =
 168                          (ttcompatgetflags(tp)&0xffff0000)|(tp->t_flags&0xffff);
 169                         if (*com == TIOCLBIS)
 170                                 tp->t_flags |= *(int *)data<<16;
 171                         else
 172                                 tp->t_flags &= ~(*(int *)data<<16);
 173                 }
 174                 ttcompatsetlflags(tp, term);
 175                 *com = TIOCSETA;
 176                 break;
 177         }
 178         return 0;
 179 }
 180
 181 /*ARGSUSED*/
 182 int
 183 ttcompat(tp, com, data, flag)
 184         register struct tty *tp;
 185         u_long com;
 186         caddr_t data;
 187         int flag;
 188 {
 189         switch (com) {
 190         case TIOCSETP:
 191         case TIOCSETN:
 192         case TIOCSETC:
 193         case TIOCSLTC:
 194         case TIOCLBIS:
 195         case TIOCLBIC:
 196         case TIOCLSET: {
 197                 struct termios term;
 198                 int error;
 199
 200                 term = tp->t_termios;
 201                 if ((error = ttsetcompat(tp, &com, data, &term)) != 0)
 202                         return error;
 203                 return ttioctl(tp, com, &term, flag);
 204         }
 205         case TIOCGETP: {
 206                 register struct sgttyb *sg = (struct sgttyb *)data;
 207                 register cc_t *cc = tp->t_cc;
 208
 209                 sg->sg_ospeed = ttcompatspeedtab(tp->t_ospeed, compatspeeds);
 210                 if (tp->t_ispeed == 0)
 211                         sg->sg_ispeed = sg->sg_ospeed;
 212                 else
 213                         sg->sg_ispeed = ttcompatspeedtab(tp->t_ispeed, compatspeeds);
 214                 sg->sg_erase = cc[VERASE];
 215                 sg->sg_kill = cc[VKILL];
 216                 sg->sg_flags = tp->t_flags = ttcompatgetflags(tp);
 217                 break;
 218         }
 219         case TIOCGETC: {
 220                 struct tchars *tc = (struct tchars *)data;
 221                 register cc_t *cc = tp->t_cc;
 222
 223                 tc->t_intrc = cc[VINTR];
 224                 tc->t_quitc = cc[VQUIT];
 225                 tc->t_startc = cc[VSTART];
 226                 tc->t_stopc = cc[VSTOP];
 227                 tc->t_eofc = cc[VEOF];
 228                 tc->t_brkc = cc[VEOL];
 229                 break;
 230         }
 231         case TIOCGLTC: {
 232                 struct ltchars *ltc = (struct ltchars *)data;
 233                 register cc_t *cc = tp->t_cc;
 234
 235                 ltc->t_suspc = cc[VSUSP];
 236                 ltc->t_dsuspc = cc[VDSUSP];
 237                 ltc->t_rprntc = cc[VREPRINT];
 238                 ltc->t_flushc = cc[VDISCARD];
 239                 ltc->t_werasc = cc[VWERASE];
 240                 ltc->t_lnextc = cc[VLNEXT];
 241                 break;
 242         }
 243         case TIOCLGET:
 244                 tp->t_flags =
 245                  (ttcompatgetflags(tp) & 0xffff0000UL)
 246                    | (tp->t_flags & 0xffff);
 247                 *(int *)data = tp->t_flags>>16;
 248                 if (ttydebug)
 249                         printf("CLGET: returning %x\n", *(int *)data);
 250                 break;
 251
 252         case OTIOCGETD:
 253                 *(int *)data = tp->t_line ? tp->t_line : 2;
 254                 break;
 255
 256         case OTIOCSETD: {
 257                 int ldisczero = 0;
 258
 259                 return (ttioctl(tp, TIOCSETD,
 260                         *(int *)data == 2 ? (caddr_t)&ldisczero : data, flag));
 261             }
 262
 263         case OTIOCCONS:
 264                 *(int *)data = 1;
 265                 return (ttioctl(tp, TIOCCONS, data, flag));
 266
 267         default:
 268                 return (ENOIOCTL);
 269         }
 270         return (0);
 271 }
 272
 273 static int
 274 ttcompatgetflags(tp)
 275         register struct tty *tp;
 276 {
 277         register tcflag_t iflag = tp->t_iflag;
 278         register tcflag_t lflag = tp->t_lflag;
 279         register tcflag_t oflag = tp->t_oflag;
 280         register tcflag_t cflag = tp->t_cflag;
 281         register int flags = 0;
 282
 283         if (iflag&IXOFF)
 284                 flags |= TANDEM;
 285         if (iflag&ICRNL || oflag&ONLCR)
 286                 flags |= CRMOD;
 287         if ((cflag&CSIZE) == CS8) {
 288                 flags |= PASS8;
 289                 if (iflag&ISTRIP)
 290                         flags |= ANYP;
 291         }
 292         else if (cflag&PARENB) {
 293                 if (iflag&INPCK) {
 294                         if (cflag&PARODD)
 295                                 flags |= ODDP;
 296                         else
 297                                 flags |= EVENP;
 298                 } else
 299                         flags |= EVENP | ODDP;
 300         }
 301
 302         if ((lflag&ICANON) == 0) {
 303                 /* fudge */
 304                 if (iflag&(INPCK|ISTRIP|IXON) || lflag&(IEXTEN|ISIG)
 305                     || (cflag&(CSIZE|PARENB)) != CS8)
 306                         flags |= CBREAK;
 307                 else
 308                         flags |= RAW;
 309         }
 310         if (!(flags&RAW) && !(oflag&OPOST) && (cflag&(CSIZE|PARENB)) == CS8)
 311                 flags |= LITOUT;
 312         if (cflag&MDMBUF)
 313                 flags |= MDMBUF;
 314         if ((cflag&HUPCL) == 0)
 315                 flags |= NOHANG;
 316         if (oflag&OXTABS)
 317                 flags |= XTABS;
 318         if (lflag&ECHOE)
 319                 flags |= CRTERA|CRTBS;
 320         if (lflag&ECHOKE)
 321                 flags |= CRTKIL|CRTBS;
 322         if (lflag&ECHOPRT)
 323                 flags |= PRTERA;
 324         if (lflag&ECHOCTL)
 325                 flags |= CTLECH;
 326         if ((iflag&IXANY) == 0)
 327                 flags |= DECCTQ;
 328         flags |= lflag&(ECHO|TOSTOP|FLUSHO|PENDIN|NOFLSH);
 329         if (ttydebug)
 330                 printf("getflags: %x\n", flags);
 331         return (flags);
 332 }
 333
 334 static void
 335 ttcompatsetflags(tp, t)
 336         register struct tty *tp;
 337         register struct termios *t;
 338 {
 339         register int flags = tp->t_flags;
 340         register tcflag_t iflag = t->c_iflag;
 341         register tcflag_t oflag = t->c_oflag;
 342         register tcflag_t lflag = t->c_lflag;
 343         register tcflag_t cflag = t->c_cflag;
 344
 345         if (flags & RAW) {
 346                 iflag = IGNBRK;
 347                 lflag &= ~(ECHOCTL|ISIG|ICANON|IEXTEN);
 348         } else {
 349                 iflag &= ~(PARMRK|IGNPAR|IGNCR|INLCR);
 350                 iflag |= BRKINT|IXON|IMAXBEL;
 351                 lflag |= ISIG|IEXTEN|ECHOCTL;   /* XXX was echoctl on ? */
 352                 if (flags & XTABS)
 353                         oflag |= OXTABS;
 354                 else
 355                         oflag &= ~OXTABS;
 356                 if (flags & CBREAK)
 357                         lflag &= ~ICANON;
 358                 else
 359                         lflag |= ICANON;
 360                 if (flags&CRMOD) {
 361                         iflag |= ICRNL;
 362                         oflag |= ONLCR;
 363                 } else {
 364                         iflag &= ~ICRNL;
 365                         oflag &= ~ONLCR;
 366                 }
 367         }
 368         if (flags&ECHO)
 369                 lflag |= ECHO;
 370         else
 371                 lflag &= ~ECHO;
 372
 373         cflag &= ~(CSIZE|PARENB);
 374         if (flags&(RAW|LITOUT|PASS8)) {
 375                 cflag |= CS8;
 376                 if (!(flags&(RAW|PASS8))
 377                     || (flags&(RAW|PASS8|ANYP)) == (PASS8|ANYP))
 378                         iflag |= ISTRIP;
 379                 else
 380                         iflag &= ~ISTRIP;
 381                 if (flags&(RAW|LITOUT))
 382                         oflag &= ~OPOST;
 383                 else
 384                         oflag |= OPOST;
 385         } else {
 386                 cflag |= CS7|PARENB;
 387                 iflag |= ISTRIP;
 388                 oflag |= OPOST;
 389         }
 390         /* XXX don't set INPCK if RAW or PASS8? */
 391         if ((flags&(EVENP|ODDP)) == EVENP) {
 392                 iflag |= INPCK;
 393                 cflag &= ~PARODD;
 394         } else if ((flags&(EVENP|ODDP)) == ODDP) {
 395                 iflag |= INPCK;
 396                 cflag |= PARODD;
 397         } else
 398                 iflag &= ~INPCK;
 399         if (flags&TANDEM)
 400                 iflag |= IXOFF;
 401         else
 402                 iflag &= ~IXOFF;
 403         if ((flags&DECCTQ) == 0)
 404                 iflag |= IXANY;
 405         else
 406                 iflag &= ~IXANY;
 407         t->c_iflag = iflag;
 408         t->c_oflag = oflag;
 409         t->c_lflag = lflag;
 410         t->c_cflag = cflag;
 411 }
 412
 413 static void
 414 ttcompatsetlflags(tp, t)
 415         register struct tty *tp;
 416         register struct termios *t;
 417 {
 418         register int flags = tp->t_flags;
 419         register tcflag_t iflag = t->c_iflag;
 420         register tcflag_t oflag = t->c_oflag;
 421         register tcflag_t lflag = t->c_lflag;
 422         register tcflag_t cflag = t->c_cflag;
 423
 424         iflag &= ~(PARMRK|IGNPAR|IGNCR|INLCR);
 425         if (flags&CRTERA)
 426                 lflag |= ECHOE;
 427         else
 428                 lflag &= ~ECHOE;
 429         if (flags&CRTKIL)
 430                 lflag |= ECHOKE;
 431         else
 432                 lflag &= ~ECHOKE;
 433         if (flags&PRTERA)
 434                 lflag |= ECHOPRT;
 435         else
 436                 lflag &= ~ECHOPRT;
 437         if (flags&CTLECH)
 438                 lflag |= ECHOCTL;
 439         else
 440                 lflag &= ~ECHOCTL;
 441         if (flags&TANDEM)
 442                 iflag |= IXOFF;
 443         else
 444                 iflag &= ~IXOFF;
 445         if ((flags&DECCTQ) == 0)
 446                 iflag |= IXANY;
 447         else
 448                 iflag &= ~IXANY;
 449         if (flags & MDMBUF)
 450                 cflag |= MDMBUF;
 451         else
 452                 cflag &= ~MDMBUF;
 453         if (flags&NOHANG)
 454                 cflag &= ~HUPCL;
 455         else
 456                 cflag |= HUPCL;
 457         lflag &= ~(TOSTOP|FLUSHO|PENDIN|NOFLSH);
 458         lflag |= flags&(TOSTOP|FLUSHO|PENDIN|NOFLSH);
 459
 460         /*
 461          * The next if-else statement is copied from above so don't bother
 462          * checking it separately.  We could avoid fiddlling with the
 463          * character size if the mode is already RAW or if neither the
 464          * LITOUT bit or the PASS8 bit is being changed, but the delta of
 465          * the change is not available here and skipping the RAW case would
 466          * make the code different from above.
 467          */
 468         cflag &= ~(CSIZE|PARENB);
 469         if (flags&(RAW|LITOUT|PASS8)) {
 470                 cflag |= CS8;
 471                 if (!(flags&(RAW|PASS8))
 472                     || (flags&(RAW|PASS8|ANYP)) == (PASS8|ANYP))
 473                         iflag |= ISTRIP;
 474                 else
 475                         iflag &= ~ISTRIP;
 476                 if (flags&(RAW|LITOUT))
 477                         oflag &= ~OPOST;
 478                 else
 479                         oflag |= OPOST;
 480         } else {
 481                 cflag |= CS7|PARENB;
 482                 iflag |= ISTRIP;
 483                 oflag |= OPOST;
 484         }
 485         t->c_iflag = iflag;
 486         t->c_oflag = oflag;
 487         t->c_lflag = lflag;
 488         t->c_cflag = cflag;
 489 }
 490 #endif  /* COMPAT_43 || COMPAT_SUNOS */