user/tcsh/ed.init.c

   1 /* $Header: /src/pub/tcsh/ed.init.c,v 3.43 2000/11/11 23:03:34 christos Exp $ */
   2 /*
   3  * ed.init.c: Editor initializations
   4  */
   5 /*-
   6  * Copyright (c) 1980, 1991 The Regents of the University of California.
   7  * All rights reserved.
   8  *
   9  * Redistribution and use in source and binary forms, with or without
  10  * modification, are permitted provided that the following conditions
  11  * are met:
  12  * 1. Redistributions of source code must retain the above copyright
  13  *    notice, this list of conditions and the following disclaimer.
  14  * 2. Redistributions in binary form must reproduce the above copyright
  15  *    notice, this list of conditions and the following disclaimer in the
  16  *    documentation and/or other materials provided with the distribution.
  17  * 3. All advertising materials mentioning features or use of this software
  18  *    must display the following acknowledgement:
  19  *      This product includes software developed by the University of
  20  *      California, Berkeley and its contributors.
  21  * 4. Neither the name of the University nor the names of its contributors
  22  *    may be used to endorse or promote products derived from this software
  23  *    without specific prior written permission.
  24  *
  25  * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND
  26  * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
  27  * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
  28  * ARE DISCLAIMED.  IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
  29  * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
  30  * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
  31  * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTS_ION)
  32  * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
  33  * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
  34  * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
  35  * SUCH DAMAGE.
  36  */
  37 #include "sh.h"
  38
  39 RCSID("$Id: ed.init.c,v 3.43 2000/11/11 23:03:34 christos Exp $")
  40
  41 #include "ed.h"
  42 #include "ed.term.h"
  43 #include "tc.h"
  44 #include "ed.defns.h"
  45
  46 /* ed.init.c -- init routines for the line editor */
  47 /* #define DEBUG_TTY */
  48
  49 int     Tty_raw_mode = 0;       /* Last tty change was to raw mode */
  50 int     MacroLvl = -1;          /* pointer to current macro nesting level; */
  51                                 /* (-1 == none) */
  52 static int Tty_quote_mode = 0;  /* Last tty change was to quote mode */
  53 static unsigned char vdisable;  /* The value of _POSIX_VDISABLE from
  54                                  * pathconf(2) */
  55
  56 int     Tty_eight_bit = -1;     /* does the tty handle eight bits */
  57
  58 extern bool GotTermCaps;
  59
  60 static ttydata_t extty, edtty, tstty;
  61 #define qutty tstty
  62
  63 extern int insource;
  64 #define SHTTY (insource ? OLDSTD : SHIN)
  65
  66 #define uc unsigned char
  67 static unsigned char ttychars[NN_IO][C_NCC] = {
  68     {
  69         (uc)CINTR,      (uc)CQUIT,       (uc)CERASE,       (uc)CKILL,
  70         (uc)CEOF,       (uc)CEOL,        (uc)CEOL2,        (uc)CSWTCH,
  71         (uc)CDSWTCH,    (uc)CERASE2,     (uc)CSTART,       (uc)CSTOP,
  72         (uc)CWERASE,    (uc)CSUSP,       (uc)CDSUSP,       (uc)CREPRINT,
  73         (uc)CDISCARD,   (uc)CLNEXT,      (uc)CSTATUS,      (uc)CPAGE,
  74         (uc)CPGOFF,     (uc)CKILL2,      (uc)CBRK,         (uc)CMIN,
  75         (uc)CTIME
  76     },
  77     {
  78         CINTR,           CQUIT,           CERASE,          CKILL,
  79         _POSIX_VDISABLE, _POSIX_VDISABLE, _POSIX_VDISABLE, _POSIX_VDISABLE,
  80         _POSIX_VDISABLE, CERASE2,         CSTART,          CSTOP,
  81         _POSIX_VDISABLE, _POSIX_VDISABLE, _POSIX_VDISABLE, _POSIX_VDISABLE,
  82         CDISCARD,        _POSIX_VDISABLE, _POSIX_VDISABLE, _POSIX_VDISABLE,
  83         _POSIX_VDISABLE, _POSIX_VDISABLE, _POSIX_VDISABLE, 1,
  84         0
  85     },
  86     {
  87         0,               0,               0,               0,
  88         0,               0,               0,               0,
  89         0,               0,               0,               0,
  90         0,               0,               0,               0,
  91         0,               0,               0,               0,
  92         0,               0,               0,               0,
  93         0
  94     }
  95 };
  96
  97 #ifdef SIG_WINDOW
  98 void
  99 check_window_size(force)
 100     int     force;
 101 {
 102 #ifdef BSDSIGS
 103     sigmask_t omask;
 104 #endif /* BSDSIGS */
 105     int     lins, cols;
 106
 107     /* don't want to confuse things here */
 108 #ifdef BSDSIGS
 109     omask = sigblock(sigmask(SIG_WINDOW)) & ~sigmask(SIG_WINDOW);
 110 #else /* BSDSIGS */
 111     (void) sighold(SIG_WINDOW);
 112 #endif /* BSDSIGS */
 113     /*
 114      * From: bret@shark.agps.lanl.gov (Bret Thaeler) Avoid sunview bug, where a
 115      * partially hidden window gets a SIG_WINDOW every time the text is
 116      * scrolled
 117      */
 118     if (GetSize(&lins, &cols) || force) {
 119         if (GettingInput) {
 120             ClearLines();
 121             ClearDisp();
 122             MoveToLine(0);
 123             MoveToChar(0);
 124             ChangeSize(lins, cols);
 125             Refresh();
 126         }
 127         else
 128             ChangeSize(lins, cols);
 129     }
 130 #ifdef BSDSIGS
 131     (void) sigsetmask(omask);   /* can change it again */
 132 #else                           /* BSDSIGS */
 133     (void) sigrelse(SIG_WINDOW);
 134 #endif /* BSDSIGS */
 135 }
 136
 137 sigret_t
 138 /*ARGSUSED*/
 139 window_change(snum)
 140 int snum;
 141 {
 142     USE(snum);
 143 #ifdef UNRELSIGS
 144     /* If we were called as a signal handler, restore it. */
 145     if (snum > 0)
 146       sigset(snum, window_change);
 147 #endif /* UNRELSIGS */
 148     check_window_size(0);
 149 #ifndef SIGVOID
 150     return (snum);
 151 #endif
 152 }
 153
 154 #endif /* SIG_WINDOW */
 155
 156 void
 157 ed_set_tty_eight_bit()
 158 {
 159     if (tty_getty(SHTTY, &extty) == -1) {
 160 #ifdef DEBUG_TTY
 161         xprintf("ed_set_tty_eight_bit: tty_getty: %s\n", strerror(errno));
 162 #endif /* DEBUG_TTY */
 163         return;
 164     }
 165     Tty_eight_bit = tty_geteightbit(&extty);
 166 }
 167
 168
 169 int
 170 ed_Setup(rst)
 171     int rst;
 172 {
 173     static int havesetup = 0;
 174     struct varent *imode;
 175
 176     if (havesetup)      /* if we have never been called */
 177         return(0);
 178
 179 #if defined(POSIX) && defined(_PC_VDISABLE) && !defined(BSD4_4) && \
 180     !defined(WINNT_NATIVE)
 181     {
 182         long pcret;
 183
 184         if ((pcret = fpathconf(SHTTY, _PC_VDISABLE)) == -1L)
 185             vdisable = (unsigned char) _POSIX_VDISABLE;
 186         else
 187             vdisable = (unsigned char) pcret;
 188         if (vdisable != (unsigned char) _POSIX_VDISABLE && rst != 0)
 189             for (rst = 0; rst < C_NCC; rst++) {
 190                 if (ttychars[ED_IO][rst] == (unsigned char) _POSIX_VDISABLE)
 191                     ttychars[ED_IO][rst] = vdisable;
 192                 if (ttychars[EX_IO][rst] == (unsigned char) _POSIX_VDISABLE)
 193                     ttychars[EX_IO][rst] = vdisable;
 194             }
 195     }
 196 #else /* ! POSIX || !_PC_VDISABLE || BSD4_4 || WINNT_NATIVE */
 197     vdisable = (unsigned char) _POSIX_VDISABLE;
 198 #endif /* POSIX && _PC_VDISABLE && !BSD4_4 && !WINNT_NATIVE */
 199
 200     if ((imode = adrof(STRinputmode)) != NULL) {
 201         if (!Strcmp(*(imode->vec), STRinsert))
 202             inputmode = MODE_INSERT;
 203         else if (!Strcmp(*(imode->vec), STRoverwrite))
 204             inputmode = MODE_REPLACE;
 205     }
 206     else
 207         inputmode = MODE_INSERT;
 208     ed_InitMaps();
 209     Hist_num = 0;
 210     Expand = 0;
 211
 212 #ifndef WINNT_NATIVE
 213     if (tty_getty(SHTTY, &extty) == -1) {
 214 # ifdef DEBUG_TTY
 215         xprintf("ed_Setup: tty_getty: %s\n", strerror(errno));
 216 # endif /* DEBUG_TTY */
 217         return(-1);
 218     }
 219
 220     tstty = edtty = extty;
 221
 222     T_Speed = tty_getspeed(&extty);
 223     T_Tabs = tty_gettabs(&extty);
 224     Tty_eight_bit = tty_geteightbit(&extty);
 225
 226 # if defined(POSIX) || defined(TERMIO)
 227     extty.d_t.c_iflag &= ~ttylist[EX_IO][M_INPUT].t_clrmask;
 228     extty.d_t.c_iflag |=  ttylist[EX_IO][M_INPUT].t_setmask;
 229
 230     extty.d_t.c_oflag &= ~ttylist[EX_IO][M_OUTPUT].t_clrmask;
 231     extty.d_t.c_oflag |=  ttylist[EX_IO][M_OUTPUT].t_setmask;
 232
 233     extty.d_t.c_cflag &= ~ttylist[EX_IO][M_CONTROL].t_clrmask;
 234     extty.d_t.c_cflag |=  ttylist[EX_IO][M_CONTROL].t_setmask;
 235
 236     extty.d_t.c_lflag &= ~ttylist[EX_IO][M_LINED].t_clrmask;
 237     extty.d_t.c_lflag |=  ttylist[EX_IO][M_LINED].t_setmask;
 238
 239 #  if defined(IRIX3_3) && SYSVREL < 4
 240     extty.d_t.c_line = NTTYDISC;
 241 #  endif /* IRIX3_3 && SYSVREL < 4 */
 242
 243 # else  /* GSTTY */             /* V7, Berkeley style tty */
 244
 245     if (T_Tabs) {       /* order of &= and |= is important to XTABS */
 246         extty.d_t.sg_flags &= ~(ttylist[EX_IO][M_CONTROL].t_clrmask|XTABS);
 247         extty.d_t.sg_flags |=   ttylist[EX_IO][M_CONTROL].t_setmask;
 248     }
 249     else {
 250         extty.d_t.sg_flags &= ~ttylist[EX_IO][M_CONTROL].t_clrmask;
 251         extty.d_t.sg_flags |= (ttylist[EX_IO][M_CONTROL].t_setmask|XTABS);
 252     }
 253
 254     extty.d_lb &= ~ttylist[EX_IO][M_LOCAL].t_clrmask;
 255     extty.d_lb |=  ttylist[EX_IO][M_LOCAL].t_setmask;
 256
 257 # endif /* GSTTY */
 258     /*
 259      * Reset the tty chars to reasonable defaults
 260      * If they are disabled, then enable them.
 261      */
 262     if (rst) {
 263         if (tty_cooked_mode(&tstty)) {
 264             tty_getchar(&tstty, ttychars[TS_IO]);
 265             /*
 266              * Don't affect CMIN and CTIME for the editor mode
 267              */
 268             for (rst = 0; rst < C_NCC - 2; rst++)
 269                 if (ttychars[TS_IO][rst] != vdisable &&
 270                     ttychars[ED_IO][rst] != vdisable)
 271                     ttychars[ED_IO][rst] = ttychars[TS_IO][rst];
 272             for (rst = 0; rst < C_NCC; rst++)
 273                 if (ttychars[TS_IO][rst] != vdisable &&
 274                     ttychars[EX_IO][rst] != vdisable)
 275                     ttychars[EX_IO][rst] = ttychars[TS_IO][rst];
 276         }
 277         tty_setchar(&extty, ttychars[EX_IO]);
 278         if (tty_setty(SHTTY, &extty) == -1) {
 279 # ifdef DEBUG_TTY
 280             xprintf("ed_Setup: tty_setty: %s\n", strerror(errno));
 281 # endif /* DEBUG_TTY */
 282             return(-1);
 283         }
 284     }
 285     else
 286         tty_setchar(&extty, ttychars[EX_IO]);
 287
 288 # ifdef SIG_WINDOW
 289     (void) sigset(SIG_WINDOW, window_change);   /* for window systems */
 290 # endif
 291 #else /* WINNT_NATIVE */
 292 # ifdef DEBUG
 293     if (rst)
 294         xprintf("rst received in ed_Setup() %d\n", rst);
 295 # endif
 296 #endif /* WINNT_NATIVE */
 297     havesetup = 1;
 298     return(0);
 299 }
 300
 301 void
 302 ed_Init()
 303 {
 304     ResetInLine(1);             /* reset the input pointers */
 305     GettingInput = 0;           /* just in case */
 306     LastKill = KillBuf;         /* no kill buffer */
 307
 308 #ifdef DEBUG_EDIT
 309     CheckMaps();                /* do a little error checking on key maps */
 310 #endif
 311
 312     if (ed_Setup(0) == -1)
 313         return;
 314
 315     /*
 316      * if we have been called before but GotTermCaps isn't set, our TERM has
 317      * changed, so get new termcaps and try again
 318      */
 319
 320     if (!GotTermCaps)
 321         GetTermCaps();          /* does the obvious, but gets term type each
 322                                  * time */
 323
 324 #ifndef WINNT_NATIVE
 325 # if defined(TERMIO) || defined(POSIX)
 326     edtty.d_t.c_iflag &= ~ttylist[ED_IO][M_INPUT].t_clrmask;
 327     edtty.d_t.c_iflag |=  ttylist[ED_IO][M_INPUT].t_setmask;
 328
 329     edtty.d_t.c_oflag &= ~ttylist[ED_IO][M_OUTPUT].t_clrmask;
 330     edtty.d_t.c_oflag |=  ttylist[ED_IO][M_OUTPUT].t_setmask;
 331
 332     edtty.d_t.c_cflag &= ~ttylist[ED_IO][M_CONTROL].t_clrmask;
 333     edtty.d_t.c_cflag |=  ttylist[ED_IO][M_CONTROL].t_setmask;
 334
 335     edtty.d_t.c_lflag &= ~ttylist[ED_IO][M_LINED].t_clrmask;
 336     edtty.d_t.c_lflag |=  ttylist[ED_IO][M_LINED].t_setmask;
 337
 338
 339 #  if defined(IRIX3_3) && SYSVREL < 4
 340     edtty.d_t.c_line = NTTYDISC;
 341 #  endif /* IRIX3_3 && SYSVREL < 4 */
 342
 343 # else /* GSTTY */
 344
 345     if (T_Tabs) {       /* order of &= and |= is important to XTABS */
 346         edtty.d_t.sg_flags &= ~(ttylist[ED_IO][M_CONTROL].t_clrmask | XTABS);
 347         edtty.d_t.sg_flags |=   ttylist[ED_IO][M_CONTROL].t_setmask;
 348     }
 349     else {
 350         edtty.d_t.sg_flags &= ~ttylist[ED_IO][M_CONTROL].t_clrmask;
 351         edtty.d_t.sg_flags |= (ttylist[ED_IO][M_CONTROL].t_setmask | XTABS);
 352     }
 353
 354     edtty.d_lb &= ~ttylist[ED_IO][M_LOCAL].t_clrmask;
 355     edtty.d_lb |=  ttylist[ED_IO][M_LOCAL].t_setmask;
 356 # endif /* POSIX || TERMIO */
 357
 358     tty_setchar(&edtty, ttychars[ED_IO]);
 359 #endif /* WINNT_NATIVE */
 360 }
 361
 362 /*
 363  * Check and re-init the line. set the terminal into 1 char at a time mode.
 364  */
 365 int
 366 Rawmode()
 367 {
 368     if (Tty_raw_mode)
 369         return (0);
 370
 371 #ifdef WINNT_NATIVE
 372     do_nt_raw_mode();
 373 #else /* !WINNT_NATIVE */
 374 # ifdef _IBMR2
 375     tty_setdisc(SHTTY, ED_IO);
 376 # endif /* _IBMR2 */
 377
 378     if (tty_getty(SHTTY, &tstty) == -1) {
 379 # ifdef DEBUG_TTY
 380         xprintf("Rawmode: tty_getty: %s\n", strerror(errno));
 381 # endif /* DEBUG_TTY */
 382         return(-1);
 383     }
 384
 385     /*
 386      * We always keep up with the eight bit setting and the speed of the
 387      * tty. But only we only believe changes that are made to cooked mode!
 388      */
 389 # if defined(POSIX) || defined(TERMIO)
 390     Tty_eight_bit = tty_geteightbit(&tstty);
 391     T_Speed = tty_getspeed(&tstty);
 392
 393 #  ifdef POSIX
 394     /*
 395      * Fix from: Steven (Steve) B. Green <xrsbg@charney.gsfc.nasa.gov>
 396      * Speed was not being set up correctly under POSIX.
 397      */
 398     if (tty_getspeed(&extty) != T_Speed || tty_getspeed(&edtty) != T_Speed) {
 399         (void) cfsetispeed(&extty.d_t, T_Speed);
 400         (void) cfsetospeed(&extty.d_t, T_Speed);
 401         (void) cfsetispeed(&edtty.d_t, T_Speed);
 402         (void) cfsetospeed(&edtty.d_t, T_Speed);
 403     }
 404 #  endif /* POSIX */
 405 # else /* GSTTY */
 406
 407     T_Speed = tty_getspeed(&tstty);
 408     Tty_eight_bit = tty_geteightbit(&tstty);
 409
 410     if (extty.d_t.sg_ispeed != tstty.d_t.sg_ispeed) {
 411         extty.d_t.sg_ispeed = tstty.d_t.sg_ispeed;
 412         edtty.d_t.sg_ispeed = tstty.d_t.sg_ispeed;
 413     }
 414
 415     if (extty.d_t.sg_ospeed != tstty.d_t.sg_ospeed) {
 416         extty.d_t.sg_ospeed = tstty.d_t.sg_ospeed;
 417         edtty.d_t.sg_ospeed = tstty.d_t.sg_ospeed;
 418     }
 419 # endif /* POSIX || TERMIO */
 420
 421     if (tty_cooked_mode(&tstty)) {
 422         /*
 423          * re-test for some things here (like maybe the user typed
 424          * "stty -tabs"
 425          */
 426         if (tty_gettabs(&tstty) == 0)
 427             T_Tabs = 0;
 428         else
 429             T_Tabs = CanWeTab();
 430
 431 # if defined(POSIX) || defined(TERMIO)
 432         extty.d_t.c_cflag  = tstty.d_t.c_cflag;
 433         extty.d_t.c_cflag &= ~ttylist[EX_IO][M_CONTROL].t_clrmask;
 434         extty.d_t.c_cflag |=  ttylist[EX_IO][M_CONTROL].t_setmask;
 435
 436         edtty.d_t.c_cflag  = tstty.d_t.c_cflag;
 437         edtty.d_t.c_cflag &= ~ttylist[ED_IO][M_CONTROL].t_clrmask;
 438         edtty.d_t.c_cflag |=  ttylist[ED_IO][M_CONTROL].t_setmask;
 439
 440         extty.d_t.c_lflag = tstty.d_t.c_lflag;
 441         extty.d_t.c_lflag &= ~ttylist[EX_IO][M_LINED].t_clrmask;
 442         extty.d_t.c_lflag |=  ttylist[EX_IO][M_LINED].t_setmask;
 443
 444         edtty.d_t.c_lflag = tstty.d_t.c_lflag;
 445         edtty.d_t.c_lflag &= ~ttylist[ED_IO][M_LINED].t_clrmask;
 446         edtty.d_t.c_lflag |=  ttylist[ED_IO][M_LINED].t_setmask;
 447
 448         extty.d_t.c_iflag = tstty.d_t.c_iflag;
 449         extty.d_t.c_iflag &= ~ttylist[EX_IO][M_INPUT].t_clrmask;
 450         extty.d_t.c_iflag |=  ttylist[EX_IO][M_INPUT].t_setmask;
 451
 452         edtty.d_t.c_iflag = tstty.d_t.c_iflag;
 453         edtty.d_t.c_iflag &= ~ttylist[ED_IO][M_INPUT].t_clrmask;
 454         edtty.d_t.c_iflag |=  ttylist[ED_IO][M_INPUT].t_setmask;
 455
 456         extty.d_t.c_oflag = tstty.d_t.c_oflag;
 457         extty.d_t.c_oflag &= ~ttylist[EX_IO][M_OUTPUT].t_clrmask;
 458         extty.d_t.c_oflag |=  ttylist[EX_IO][M_OUTPUT].t_setmask;
 459
 460         edtty.d_t.c_oflag = tstty.d_t.c_oflag;
 461         edtty.d_t.c_oflag &= ~ttylist[ED_IO][M_OUTPUT].t_clrmask;
 462         edtty.d_t.c_oflag |=  ttylist[ED_IO][M_OUTPUT].t_setmask;
 463
 464 # else /* GSTTY */
 465
 466         extty.d_t.sg_flags = tstty.d_t.sg_flags;
 467
 468         extty.d_t.sg_flags &= ~ttylist[EX_IO][M_CONTROL].t_clrmask;
 469         extty.d_t.sg_flags |=  ttylist[EX_IO][M_CONTROL].t_setmask;
 470
 471         if (T_Tabs)             /* order of &= and |= is important to XTABS */
 472             extty.d_t.sg_flags &= ~XTABS;
 473         else
 474             extty.d_t.sg_flags |= XTABS;
 475
 476         extty.d_lb = tstty.d_lb;
 477         extty.d_lb &= ~ttylist[EX_IO][M_LOCAL].t_clrmask;
 478         extty.d_lb |= ttylist[EX_IO][M_LOCAL].t_setmask;
 479
 480         edtty.d_t.sg_flags = extty.d_t.sg_flags;
 481         if (T_Tabs) {   /* order of &= and |= is important to XTABS */
 482             edtty.d_t.sg_flags &=
 483                     ~(ttylist[ED_IO][M_CONTROL].t_clrmask|XTABS);
 484             edtty.d_t.sg_flags |=   ttylist[ED_IO][M_CONTROL].t_setmask;
 485         }
 486         else {
 487             edtty.d_t.sg_flags &= ~ttylist[ED_IO][M_CONTROL].t_clrmask;
 488             edtty.d_t.sg_flags |=
 489                     (ttylist[ED_IO][M_CONTROL].t_setmask|XTABS);
 490         }
 491
 492         edtty.d_lb = tstty.d_lb;
 493         edtty.d_lb &= ~ttylist[ED_IO][M_LOCAL].t_clrmask;
 494         edtty.d_lb |= ttylist[ED_IO][M_LOCAL].t_setmask;
 495
 496 # endif /* TERMIO || POSIX */
 497
 498         {
 499             extern int didsetty;
 500             int i;
 501
 502             tty_getchar(&tstty, ttychars[TS_IO]);
 503             /*
 504              * Check if the user made any changes.
 505              * If he did, then propagate the changes to the
 506              * edit and execute data structures.
 507              */
 508             for (i = 0; i < C_NCC; i++)
 509                 if (ttychars[TS_IO][i] != ttychars[EX_IO][i])
 510                     break;
 511
 512             if (i != C_NCC || didsetty) {
 513                 didsetty = 0;
 514                 /*
 515                  * Propagate changes only to the unprotected chars
 516                  * that have been modified just now.
 517                  */
 518                 for (i = 0; i < C_NCC; i++) {
 519                     if (!((ttylist[ED_IO][M_CHAR].t_setmask & C_SH(i))) &&
 520                         (ttychars[TS_IO][i] != ttychars[EX_IO][i]))
 521                         ttychars[ED_IO][i] = ttychars[TS_IO][i];
 522                     if (ttylist[ED_IO][M_CHAR].t_clrmask & C_SH(i))
 523                         ttychars[ED_IO][i] = vdisable;
 524                 }
 525                 tty_setchar(&edtty, ttychars[ED_IO]);
 526
 527                 for (i = 0; i < C_NCC; i++) {
 528                     if (!((ttylist[EX_IO][M_CHAR].t_setmask & C_SH(i))) &&
 529                         (ttychars[TS_IO][i] != ttychars[EX_IO][i]))
 530                         ttychars[EX_IO][i] = ttychars[TS_IO][i];
 531                     if (ttylist[EX_IO][M_CHAR].t_clrmask & C_SH(i))
 532                         ttychars[EX_IO][i] = vdisable;
 533                 }
 534                 tty_setchar(&extty, ttychars[EX_IO]);
 535             }
 536
 537         }
 538     }
 539     if (tty_setty(SHTTY, &edtty) == -1) {
 540 # ifdef DEBUG_TTY
 541         xprintf("Rawmode: tty_setty: %s\n", strerror(errno));
 542 # endif /* DEBUG_TTY */
 543         return(-1);
 544     }
 545 #endif /* WINNT_NATIVE */
 546     Tty_raw_mode = 1;
 547     flush();                    /* flush any buffered output */
 548     return (0);
 549 }
 550
 551 int
 552 Cookedmode()
 553 {                               /* set tty in normal setup */
 554 #ifdef WINNT_NATIVE
 555     do_nt_cooked_mode();
 556 #else
 557     signalfun_t orig_intr;
 558
 559 # ifdef _IBMR2
 560     tty_setdisc(SHTTY, EX_IO);
 561 # endif /* _IBMR2 */
 562
 563     if (!Tty_raw_mode)
 564         return (0);
 565
 566     /* hold this for reseting tty */
 567 # ifdef BSDSIGS
 568     orig_intr = (signalfun_t) signal(SIGINT, SIG_IGN);
 569 # else
 570 #  ifdef SIG_HOLD
 571     /*
 572      * sigset doesn't return the previous handler if the signal is held,
 573      * it will return SIG_HOLD instead. So instead of restoring the
 574      * the signal we would end up installing a blocked SIGINT with a
 575      * SIG_IGN signal handler. This is what happened when Cookedmode
 576      * was called from sched_run, disabling interrupt for the rest
 577      * of your session.
 578      *
 579      * This is what we do:
 580      * - if the signal is blocked, keep it that way
 581      * - else set it to SIG_IGN
 582      *
 583      * Casper Dik (casper@fwi.uva.nl)
 584      */
 585     orig_intr = (signalfun_t) sigset(SIGINT, SIG_HOLD);
 586     if (orig_intr != SIG_HOLD)
 587         (void) sigset(SIGINT, SIG_IGN); /* returns SIG_HOLD */
 588 #  else /* !SIG_HOLD */
 589     /*
 590      * No SIG_HOLD; probably no reliable signals as well.
 591      */
 592     orig_intr = (signalfun_t) sigset(SIGINT, SIG_IGN);
 593 #  endif /* SIG_HOLD */
 594 # endif /* BSDSIGS */
 595     if (tty_setty(SHTTY, &extty) == -1) {
 596 # ifdef DEBUG_TTY
 597         xprintf("Cookedmode: tty_setty: %s\n", strerror(errno));
 598 # endif /* DEBUG_TTY */
 599         return -1;
 600     }
 601 # ifdef BSDSIGS
 602     (void) signal(SIGINT, orig_intr);   /* take these again */
 603 # else
 604     (void) sigset(SIGINT, orig_intr);   /* take these again */
 605 # endif /* BSDSIGS */
 606 #endif /* WINNT_NATIVE */
 607
 608     Tty_raw_mode = 0;
 609     return (0);
 610 }
 611
 612 void
 613 ResetInLine(macro)
 614     int macro;
 615 {
 616     Cursor = InputBuf;          /* reset cursor */
 617     LastChar = InputBuf;
 618     InputLim = &InputBuf[INBUFSIZE - 2];
 619     Mark = InputBuf;
 620     MetaNext = 0;
 621     CurrentKeyMap = CcKeyMap;
 622     AltKeyMap = 0;
 623     Hist_num = 0;
 624     DoingArg = 0;
 625     Argument = 1;
 626 #ifdef notdef
 627     LastKill = KillBuf;         /* no kill buffer */
 628 #endif
 629     LastCmd = F_UNASSIGNED;     /* previous command executed */
 630     if (macro)
 631         MacroLvl = -1;          /* no currently active macros */
 632 }
 633
 634 static Char *Input_Line = NULL;
 635 int
 636 Load_input_line()
 637 {
 638 #ifdef SUNOS4
 639     long chrs = 0;
 640 #else /* !SUNOS4 */
 641     /*
 642      * *Everyone* else has an int, but SunOS wants long!
 643      * This breaks where int != long (alpha)
 644      */
 645     int chrs = 0;
 646 #endif /* SUNOS4 */
 647
 648     if (Input_Line)
 649         xfree((ptr_t) Input_Line);
 650     Input_Line = NULL;
 651
 652     if (Tty_raw_mode)
 653         return 0;
 654
 655 #if defined(FIONREAD) && !defined(OREO)
 656     (void) ioctl(SHIN, FIONREAD, (ioctl_t) &chrs);
 657     if (chrs > 0) {
 658         char    buf[BUFSIZE];
 659
 660         chrs = read(SHIN, buf, (size_t) min(chrs, BUFSIZE - 1));
 661         if (chrs > 0) {
 662             buf[chrs] = '\0';
 663             Input_Line = Strsave(str2short(buf));
 664             PushMacro(Input_Line);
 665         }
 666 #ifdef convex
 667         /* need to print errno message in case file is migrated */
 668         if (chrs < 0)
 669             stderror(ERR_SYSTEM, progname, strerror(errno));
 670 #endif
 671     }
 672 #endif  /* FIONREAD && !OREO */
 673     return chrs > 0;
 674 }
 675
 676 /*
 677  * Bugfix (in Swedish) by:
 678  * Johan Widen
 679  * SICS, PO Box 1263, S-163 13 SPANGA, SWEDEN
 680  * {mcvax,munnari,cernvax,diku,inria,prlb2,penet,ukc,unido}!enea!sics.se!jw
 681  * Internet: jw@sics.se
 682  *
 683  * (via Hans J Albertsson (thanks))
 684  */
 685 void
 686 QuoteModeOn()
 687 {
 688     if (MacroLvl >= 0)
 689         return;
 690
 691 #ifndef WINNT_NATIVE
 692     qutty = edtty;
 693
 694 #if defined(TERMIO) || defined(POSIX)
 695     qutty.d_t.c_iflag &= ~ttylist[QU_IO][M_INPUT].t_clrmask;
 696     qutty.d_t.c_iflag |=  ttylist[QU_IO][M_INPUT].t_setmask;
 697
 698     qutty.d_t.c_oflag &= ~ttylist[QU_IO][M_OUTPUT].t_clrmask;
 699     qutty.d_t.c_oflag |=  ttylist[QU_IO][M_OUTPUT].t_setmask;
 700
 701     qutty.d_t.c_cflag &= ~ttylist[QU_IO][M_CONTROL].t_clrmask;
 702     qutty.d_t.c_cflag |=  ttylist[QU_IO][M_CONTROL].t_setmask;
 703
 704     qutty.d_t.c_lflag &= ~ttylist[QU_IO][M_LINED].t_clrmask;
 705     qutty.d_t.c_lflag |=  ttylist[QU_IO][M_LINED].t_setmask;
 706 #else /* GSTTY */
 707     qutty.d_t.sg_flags &= ~ttylist[QU_IO][M_CONTROL].t_clrmask;
 708     qutty.d_t.sg_flags |= ttylist[QU_IO][M_CONTROL].t_setmask;
 709     qutty.d_lb &= ~ttylist[QU_IO][M_LOCAL].t_clrmask;
 710     qutty.d_lb |= ttylist[QU_IO][M_LOCAL].t_setmask;
 711
 712 #endif /* TERMIO || POSIX */
 713     if (tty_setty(SHTTY, &qutty) == -1) {
 714 #ifdef DEBUG_TTY
 715         xprintf("QuoteModeOn: tty_setty: %s\n", strerror(errno));
 716 #endif /* DEBUG_TTY */
 717         return;
 718     }
 719 #endif /* !WINNT_NATIVE */
 720     Tty_quote_mode = 1;
 721     return;
 722 }
 723
 724 void
 725 QuoteModeOff()
 726 {
 727     if (!Tty_quote_mode)
 728         return;
 729     Tty_quote_mode = 0;
 730     if (tty_setty(SHTTY, &edtty) == -1) {
 731 #ifdef DEBUG_TTY
 732         xprintf("QuoteModeOff: tty_setty: %s\n", strerror(errno));
 733 #endif /* DEBUG_TTY */
 734         return;
 735     }
 736     return;
 737 }