1 /****************************************************************************
2 * Copyright (c) 1998-2011,2012 Free Software Foundation, Inc. *
4 * Permission is hereby granted, free of charge, to any person obtaining a *
5 * copy of this software and associated documentation files (the *
6 * "Software"), to deal in the Software without restriction, including *
7 * without limitation the rights to use, copy, modify, merge, publish, *
8 * distribute, distribute with modifications, sublicense, and/or sell *
9 * copies of the Software, and to permit persons to whom the Software is *
10 * furnished to do so, subject to the following conditions: *
12 * The above copyright notice and this permission notice shall be included *
13 * in all copies or substantial portions of the Software. *
15 * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS *
16 * OR IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF *
17 * MERCHANTABILITY, FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. *
18 * IN NO EVENT SHALL THE ABOVE COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, *
19 * DAMAGES OR OTHER LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR *
20 * OTHERWISE, ARISING FROM, OUT OF OR IN CONNECTION WITH THE SOFTWARE OR *
21 * THE USE OR OTHER DEALINGS IN THE SOFTWARE. *
23 * Except as contained in this notice, the name(s) of the above copyright *
24 * holders shall not be used in advertising or otherwise to promote the *
25 * sale, use or other dealings in this Software without prior written *
27 ****************************************************************************/
29 /****************************************************************************
30 * Author: Zeyd M. Ben-Halim <zmbenhal@netcom.com> 1992,1995 *
31 * and: Eric S. Raymond <esr@snark.thyrsus.com> *
32 * and: Thomas E. Dickey 1996-on *
33 ****************************************************************************/
37 * The initial adaptation from 4.4BSD Lite sources in September 1995 used 686
38 * lines from that version, and made changes/additions for 150 lines. There
39 * was no reformatting, so with/without ignoring whitespace, the amount of
42 * Comparing with current (2009) source, excluding this comment:
43 * a) 209 lines match identically to the 4.4BSD Lite sources, with 771 lines
45 * a) Ignoring whitespace, the current version still uses 516 lines from the
46 * 4.4BSD Lite sources, with 402 lines changed/added.
48 * Raymond's original comment on this follows...
52 * tset.c - terminal initialization utility
54 * This code was mostly swiped from 4.4BSD tset, with some obsolescent
55 * cruft removed and substantial portions rewritten. A Regents of the
56 * University of California copyright applies to some portions of the
57 * code, and is reproduced below:
60 * Copyright (c) 1980, 1991, 1993
61 * The Regents of the University of California. All rights reserved.
63 * Redistribution and use in source and binary forms, with or without
64 * modification, are permitted provided that the following conditions
66 * 1. Redistributions of source code must retain the above copyright
67 * notice, this list of conditions and the following disclaimer.
68 * 2. Redistributions in binary form must reproduce the above copyright
69 * notice, this list of conditions and the following disclaimer in the
70 * documentation and/or other materials provided with the distribution.
71 * 3. Neither the name of the University nor the names of its contributors
72 * may be used to endorse or promote products derived from this software
73 * without specific prior written permission.
75 * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND
76 * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
77 * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
78 * ARE DISCLAIMED. IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
79 * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
80 * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
81 * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
82 * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
83 * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
84 * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
89 #define __INTERNAL_CAPS_VISIBLE /* we need to see has_hardware_tabs */
90 #include <progs.priv.h>
97 #if HAVE_GETTTYNAM && HAVE_TTYENT_H
101 char *ttyname(int fd);
105 # if !defined(sun) || !TERMIOS
106 # if HAVE_SYS_IOCTL_H
107 # include <sys/ioctl.h>
113 /* they neglected to define struct winsize in termios.h -- it's only
115 #include <sys/stream.h>
116 #include <sys/ptem.h>
119 #include <dump_entry.h>
120 #include <transform.h>
122 MODULE_ID("$Id: tset.c,v 1.90 2012/12/15 23:01:17 tom Exp $")
125 * SCO defines TIOCGSIZE and the corresponding struct. Other systems (SunOS,
126 * Solaris, IRIX) define TIOCGWINSZ and struct winsize.
129 # define IOCTL_GET_WINSIZE TIOCGSIZE
130 # define IOCTL_SET_WINSIZE TIOCSSIZE
131 # define STRUCT_WINSIZE struct ttysize
132 # define WINSIZE_ROWS(n) n.ts_lines
133 # define WINSIZE_COLS(n) n.ts_cols
136 # define IOCTL_GET_WINSIZE TIOCGWINSZ
137 # define IOCTL_SET_WINSIZE TIOCSWINSZ
138 # define STRUCT_WINSIZE struct winsize
139 # define WINSIZE_ROWS(n) n.ws_row
140 # define WINSIZE_COLS(n) n.ws_col
145 extern char **environ;
149 #define CTRL(x) ((x) & 0x1f)
151 static void failed(const char *) GCC_NORETURN;
152 static void exit_error(void) GCC_NORETURN;
153 static void err(const char *,...) GCC_NORETURN;
155 const char *_nc_progname = "tset";
157 static TTY mode, oldmode, original;
159 static bool opt_c; /* set control-chars */
160 static bool opt_w; /* set window-size */
162 static bool can_restore = FALSE;
163 static bool isreset = FALSE; /* invoked as reset */
164 static int terasechar = -1; /* new erase character */
165 static int intrchar = -1; /* new interrupt character */
166 static int tkillchar = -1; /* new kill character */
169 static int tlines, tcolumns; /* window size */
172 #define LOWERCASE(c) ((isalpha(UChar(c)) && isupper(UChar(c))) ? tolower(UChar(c)) : (c))
175 CaselessCmp(const char *a, const char *b)
176 { /* strcasecmp isn't portable */
178 int cmp = LOWERCASE(*a) - LOWERCASE(*b);
183 return LOWERCASE(*a) - LOWERCASE(*b);
190 SET_TTY(STDERR_FILENO, &original);
191 (void) fprintf(stderr, "\n");
193 ExitProgram(EXIT_FAILURE);
198 err(const char *fmt,...)
202 (void) fprintf(stderr, "%s: ", _nc_progname);
203 (void) vfprintf(stderr, fmt, ap);
210 failed(const char *msg)
213 size_t len = strlen(_nc_progname) + 2;
215 if ((int) len < (int) sizeof(temp) - 12) {
216 _nc_STRCPY(temp, _nc_progname, sizeof(temp));
217 _nc_STRCAT(temp, ": ", sizeof(temp));
219 _nc_STRCPY(temp, "tset: ", sizeof(temp));
221 perror(strncat(temp, msg, sizeof(temp) - strlen(temp) - 2));
233 if ((fp = fopen(file, "r")) == 0)
236 while ((nr = fread(buf, sizeof(char), sizeof(buf), fp)) != 0)
237 if (fwrite(buf, sizeof(char), nr, stderr) != nr)
238 failed("write to stderr");
245 return putc(c, stderr);
248 /* Prompt the user for a terminal type. */
250 askuser(const char *dflt)
252 static char answer[256];
255 /* We can get recalled; if so, don't continue uselessly. */
257 if (feof(stdin) || ferror(stdin)) {
258 (void) fprintf(stderr, "\n");
264 (void) fprintf(stderr, "Terminal type? [%s] ", dflt);
266 (void) fprintf(stderr, "Terminal type? ");
267 (void) fflush(stderr);
269 if (fgets(answer, sizeof(answer), stdin) == 0) {
277 if ((p = strchr(answer, '\n')) != 0)
286 /**************************************************************************
288 * Mapping logic begins here
290 **************************************************************************/
292 /* Baud rate conditionals for mapping. */
301 struct map *next; /* Linked list of maps. */
302 const char *porttype; /* Port type, or "" for any. */
303 const char *type; /* Terminal type to select. */
304 int conditional; /* Baud rate conditionals bitmask. */
305 int speed; /* Baud rate to compare against. */
308 static MAP *cur, *maplist;
310 typedef struct speeds {
315 static const SPEEDS speeds[] =
332 /* sgttyb may define up to this point */
375 tbaudrate(char *rate)
380 /* The baudrate number can be preceded by a 'B', which is ignored. */
384 for (sp = speeds; sp->string; ++sp) {
385 if (!CaselessCmp(rate, sp->string)) {
391 err("unknown baud rate %s", rate);
397 * [port-type][test baudrate]:terminal-type
398 * The baud rate tests are: >, <, @, =, !
401 add_mapping(const char *port, char *arg)
409 mapp = typeMalloc(MAP, 1);
410 if (copy == 0 || mapp == 0)
418 cur = maplist = mapp;
424 mapp->porttype = arg;
425 mapp->conditional = 0;
427 arg = strpbrk(arg, "><@=!:");
429 if (arg == 0) { /* [?]term */
430 mapp->type = mapp->porttype;
435 if (arg == mapp->porttype) /* [><@=! baud]:term */
436 termp = mapp->porttype = 0;
440 for (;; ++arg) { /* Optional conditionals. */
443 if (mapp->conditional & GT)
445 mapp->conditional |= LT;
448 if (mapp->conditional & LT)
450 mapp->conditional |= GT;
453 case '=': /* Not documented. */
454 mapp->conditional |= EQ;
457 mapp->conditional |= NOT;
466 if (mapp->conditional)
469 } else { /* Optional baudrate. */
470 arg = strchr(p = arg, ':');
474 mapp->speed = tbaudrate(p);
479 /* Terminate porttype, if specified. */
483 /* If a NOT conditional, reverse the test. */
484 if (mapp->conditional & NOT)
485 mapp->conditional = ~mapp->conditional & (EQ | GT | LT);
487 /* If user specified a port with an option flag, set it. */
490 if (mapp->porttype) {
492 err("illegal -m option format: %s", copy);
494 mapp->porttype = port;
498 (void) printf("port: %s\n", mapp->porttype ? mapp->porttype : "ANY");
499 (void) printf("type: %s\n", mapp->type);
500 (void) printf("conditional: ");
502 if (mapp->conditional & GT) {
506 if (mapp->conditional & EQ) {
507 (void) printf("%sEQ", p);
510 if (mapp->conditional & LT)
511 (void) printf("%sLT", p);
512 (void) printf("\nspeed: %d\n", mapp->speed);
517 * Return the type of terminal to use for a port of type 'type', as specified
518 * by the first applicable mapping in 'map'. If no mappings apply, return
522 mapped(const char *type)
527 for (mapp = maplist; mapp; mapp = mapp->next)
528 if (mapp->porttype == 0 || !strcmp(mapp->porttype, type)) {
529 switch (mapp->conditional) {
530 case 0: /* No test specified. */
534 match = (ospeed == mapp->speed);
537 match = (ospeed >= mapp->speed);
540 match = (ospeed > mapp->speed);
543 match = (ospeed <= mapp->speed);
546 match = (ospeed < mapp->speed);
554 /* No match found; return given type. */
558 /**************************************************************************
562 **************************************************************************/
565 * Figure out what kind of terminal we're dealing with, and then read in
569 get_termcap_entry(char *userarg)
586 /* Try the environment. */
587 if ((ttype = getenv("TERM")) != 0)
590 if ((ttypath = ttyname(STDERR_FILENO)) != 0) {
591 p = _nc_basename(ttypath);
594 * We have the 4.3BSD library call getttynam(3); that means
595 * there's an /etc/ttys to look up device-to-type mappings in.
596 * Try ttyname(3); check for dialup or other mapping.
598 if ((t = getttynam(p))) {
603 if ((fp = fopen("/etc/ttytype", "r")) != 0
604 || (fp = fopen("/etc/ttys", "r")) != 0) {
608 while (fgets(buffer, sizeof(buffer) - 1, fp) != 0) {
609 for (s = buffer, t = d = 0; *s; s++) {
610 if (isspace(UChar(*s)))
614 else if (d == 0 && s != buffer && s[-1] == '\0')
617 if (t != 0 && d != 0 && !strcmp(d, p)) {
625 #endif /* HAVE_GETTTYNAM */
628 /* If still undefined, use "unknown". */
631 map:ttype = mapped(ttype);
634 * If not a path, remove TERMCAP from the environment so we get a
635 * real entry from /etc/termcap. This prevents us from being fooled
636 * by out of date stuff in the environment.
638 found:if ((p = getenv("TERMCAP")) != 0 && !_nc_is_abs_path(p)) {
639 /* 'unsetenv("TERMCAP")' is not portable.
640 * The 'environ' array is better.
643 for (n = 0; environ[n] != 0; n++) {
644 if (!strncmp("TERMCAP=", environ[n], 8)) {
645 while ((environ[n] = environ[n + 1]) != 0) {
654 * ttype now contains a pointer to the type of the terminal.
655 * If the first character is '?', ask the user.
657 if (ttype[0] == '?') {
658 if (ttype[1] != '\0')
659 ttype = askuser(ttype + 1);
663 /* Find the terminfo entry. If it doesn't exist, ask the user. */
664 while (setupterm((NCURSES_CONST char *) ttype, STDOUT_FILENO, &errret)
667 (void) fprintf(stderr, "%s: unknown terminal type %s\n",
668 _nc_progname, ttype);
671 (void) fprintf(stderr,
672 "%s: can't initialize terminal type %s (error %d)\n",
673 _nc_progname, ttype, errret);
676 ttype = askuser(ttype);
679 tgetflag("am"); /* force lib_termcap.o to be linked for 'ospeed' */
684 /**************************************************************************
688 **************************************************************************/
690 /* some BSD systems have these built in, some systems are missing
691 * one or more definitions. The safest solution is to override unless the
692 * commonly-altered ones are defined.
694 #if !(defined(CERASE) && defined(CINTR) && defined(CKILL) && defined(CQUIT))
707 /* control-character defaults */
709 #define CEOF CTRL('D')
712 #define CERASE CTRL('H')
715 #define CINTR 127 /* ^? */
718 #define CKILL CTRL('U')
721 #define CLNEXT CTRL('v')
724 #define CRPRNT CTRL('r')
727 #define CQUIT CTRL('\\')
730 #define CSTART CTRL('Q')
733 #define CSTOP CTRL('S')
736 #define CSUSP CTRL('Z')
739 #if defined(_POSIX_VDISABLE)
740 #define DISABLED(val) (((_POSIX_VDISABLE != -1) \
741 && ((val) == _POSIX_VDISABLE)) \
744 #define DISABLED(val) ((int)(val) <= 0)
747 #define CHK(val, dft) (DISABLED(val) ? dft : val)
749 static bool set_tabs(void);
752 * Reset the terminal mode bits to a sensible state. Very useful after
753 * a child program dies in raw mode.
759 tcgetattr(STDERR_FILENO, &mode);
761 stty(STDERR_FILENO, &mode);
765 #if defined(VDISCARD) && defined(CDISCARD)
766 mode.c_cc[VDISCARD] = CHK(mode.c_cc[VDISCARD], CDISCARD);
768 mode.c_cc[VEOF] = CHK(mode.c_cc[VEOF], CEOF);
769 mode.c_cc[VERASE] = CHK(mode.c_cc[VERASE], CERASE);
770 #if defined(VFLUSH) && defined(CFLUSH)
771 mode.c_cc[VFLUSH] = CHK(mode.c_cc[VFLUSH], CFLUSH);
773 mode.c_cc[VINTR] = CHK(mode.c_cc[VINTR], CINTR);
774 mode.c_cc[VKILL] = CHK(mode.c_cc[VKILL], CKILL);
775 #if defined(VLNEXT) && defined(CLNEXT)
776 mode.c_cc[VLNEXT] = CHK(mode.c_cc[VLNEXT], CLNEXT);
778 mode.c_cc[VQUIT] = CHK(mode.c_cc[VQUIT], CQUIT);
779 #if defined(VREPRINT) && defined(CRPRNT)
780 mode.c_cc[VREPRINT] = CHK(mode.c_cc[VREPRINT], CRPRNT);
782 #if defined(VSTART) && defined(CSTART)
783 mode.c_cc[VSTART] = CHK(mode.c_cc[VSTART], CSTART);
785 #if defined(VSTOP) && defined(CSTOP)
786 mode.c_cc[VSTOP] = CHK(mode.c_cc[VSTOP], CSTOP);
788 #if defined(VSUSP) && defined(CSUSP)
789 mode.c_cc[VSUSP] = CHK(mode.c_cc[VSUSP], CSUSP);
791 #if defined(VWERASE) && defined(CWERASE)
792 mode.c_cc[VWERASE] = CHK(mode.c_cc[VWERASE], CWERASE);
795 mode.c_iflag &= ~(IGNBRK | PARMRK | INPCK | ISTRIP | INLCR | IGNCR
804 mode.c_iflag |= (BRKINT | IGNPAR | ICRNL | IXON
849 mode.c_oflag |= (OPOST
855 mode.c_cflag &= ~(CSIZE | CSTOPB | PARENB | PARODD | CLOCAL);
856 mode.c_cflag |= (CS8 | CREAD);
857 mode.c_lflag &= ~(ECHONL | NOFLSH
869 mode.c_lflag |= (ISIG | ICANON | ECHO | ECHOE | ECHOK
879 SET_TTY(STDERR_FILENO, &mode);
883 * Returns a "good" value for the erase character. This is loosely based on
893 && key_backspace != 0
894 && strlen(key_backspace) == 1)
895 result = key_backspace[0];
904 * Update the values of the erase, interrupt, and kill characters in 'mode'.
906 * SVr4 tset (e.g., Solaris 2.5) only modifies the intr, quit or erase
907 * characters if they're unset, or if we specify them as options. This differs
908 * from BSD 4.4 tset, which always sets erase.
911 set_control_chars(void)
914 if (DISABLED(mode.c_cc[VERASE]) || terasechar >= 0)
915 mode.c_cc[VERASE] = (terasechar >= 0) ? terasechar : default_erase();
917 if (DISABLED(mode.c_cc[VINTR]) || intrchar >= 0)
918 mode.c_cc[VINTR] = (intrchar >= 0) ? intrchar : CINTR;
920 if (DISABLED(mode.c_cc[VKILL]) || tkillchar >= 0)
921 mode.c_cc[VKILL] = (tkillchar >= 0) ? tkillchar : CKILL;
926 * Set up various conversions in 'mode', including parity, tabs, returns,
927 * echo, and case, according to the termcap entry. If the program we're
928 * running was named with a leading upper-case character, map external
929 * uppercase to internal lowercase.
932 set_conversions(void)
936 * Conversion logic for some *really* ancient terminal glitches,
937 * not supported in terminfo. Left here for succeeding generations
940 if (tgetflag("UC")) {
942 mode.c_iflag |= IUCLC;
943 mode.c_oflag |= OLCUC;
945 } else if (tgetflag("LC")) {
947 mode.c_iflag &= ~IUCLC;
948 mode.c_oflag &= ~OLCUC;
951 mode.c_iflag &= ~(PARMRK | INPCK);
952 mode.c_lflag |= ICANON;
953 if (tgetflag("EP")) {
954 mode.c_cflag |= PARENB;
955 mode.c_cflag &= ~PARODD;
957 if (tgetflag("OP")) {
958 mode.c_cflag |= PARENB;
959 mode.c_cflag |= PARODD;
961 #endif /* __OBSOLETE__ */
965 mode.c_oflag |= ONLCR;
967 mode.c_iflag |= ICRNL;
968 mode.c_lflag |= ECHO;
970 mode.c_oflag |= OXTABS;
973 /* test used to be tgetflag("NL") */
974 if (newline != (char *) 0 && newline[0] == '\n' && !newline[1]) {
975 /* Newline, not linefeed. */
977 mode.c_oflag &= ~ONLCR;
979 mode.c_iflag &= ~ICRNL;
982 if (tgetflag("HD")) /* Half duplex. */
983 mode.c_lflag &= ~ECHO;
984 #endif /* __OBSOLETE__ */
986 /* test used to be tgetflag("pt") */
987 if (has_hardware_tabs) /* Print tabs. */
988 mode.c_oflag &= ~OXTABS;
990 mode.c_lflag |= (ECHOE | ECHOK);
994 /* Output startup string. */
1002 if (pad_char != (char *) 0) /* Get/set pad character. */
1004 #endif /* OBSOLETE */
1007 if (oldmode.c_oflag & (TAB3 | ONLCR | OCRNL | ONLRET)) {
1008 oldmode.c_oflag &= (TAB3 | ONLCR | OCRNL | ONLRET);
1009 SET_TTY(STDERR_FILENO, &oldmode);
1012 settle = set_tabs();
1015 if ((p = reset_1string) != 0) {
1019 if ((p = reset_2string) != 0) {
1023 /* What about rf, rs3, as per terminfo man page? */
1024 /* also might be nice to send rmacs, rmul, rmm */
1025 if ((p = reset_file) != 0
1026 || (p = init_file) != 0) {
1033 (void) putc('\r', stderr);
1034 (void) fflush(stderr);
1035 (void) napms(1000); /* Settle the terminal. */
1040 * Set the hardware tabs on the terminal, using the ct (clear all tabs),
1041 * st (set one tab) and ch (horizontal cursor addressing) capabilities.
1042 * This is done before if and is, so they can patch in case we blow this.
1043 * Return TRUE if we set any tab stops, FALSE if not.
1048 if (set_tab && clear_all_tabs) {
1058 (void) putc('\r', stderr); /* Force to left margin. */
1059 tputs(clear_all_tabs, 0, outc);
1061 for (c = 8; c < lim; c += 8) {
1062 /* Get to the right column. In BSD tset, this
1063 * used to try a bunch of half-clever things
1064 * with cup and hpa, for an average saving of
1065 * somewhat less than two character times per
1066 * tab stop, less than .01 sec at 2400cps. We
1067 * lost all this cruft because it seemed to be
1068 * introducing some odd bugs.
1069 * -----------12345678----------- */
1070 (void) fputs(" ", stderr);
1071 tputs(set_tab, 0, outc);
1079 /**************************************************************************
1083 **************************************************************************/
1086 * Tell the user if a control key has been changed from the default value.
1090 report(const char *name, int which, unsigned def)
1092 unsigned older, newer;
1095 newer = mode.c_cc[which];
1096 older = oldmode.c_cc[which];
1098 if (older == newer && older == def)
1101 (void) fprintf(stderr, "%s %s ", name, older == newer ? "is" : "set to");
1103 if (DISABLED(newer))
1104 (void) fprintf(stderr, "undef.\n");
1106 * Check 'delete' before 'backspace', since the key_backspace value
1109 else if (newer == 0177)
1110 (void) fprintf(stderr, "delete.\n");
1111 else if ((p = key_backspace) != 0
1112 && newer == (unsigned char) p[0]
1114 (void) fprintf(stderr, "backspace.\n");
1115 else if (newer < 040) {
1117 (void) fprintf(stderr, "control-%c (^%c).\n", UChar(newer), UChar(newer));
1119 (void) fprintf(stderr, "%c.\n", UChar(newer));
1124 * Convert the obsolete argument forms into something that getopt can handle.
1125 * This means that -e, -i and -k get default arguments supplied for them.
1128 obsolete(char **argv)
1130 for (; *argv; ++argv) {
1131 char *parm = argv[0];
1133 if (parm[0] == '-' && parm[1] == '\0') {
1134 argv[0] = strdup("-q");
1138 if ((parm[0] != '-')
1139 || (argv[1] && argv[1][0] != '-')
1140 || (parm[1] != 'e' && parm[1] != 'i' && parm[1] != 'k')
1141 || (parm[2] != '\0'))
1143 switch (argv[0][1]) {
1145 argv[0] = strdup("-e^H");
1148 argv[0] = strdup("-i^C");
1151 argv[0] = strdup("-k^U");
1160 static const char *tbl[] =
1164 ," -c set control characters"
1165 ," -e ch erase character"
1166 ," -I no initialization strings"
1167 ," -i ch interrupt character"
1168 ," -k ch kill character"
1169 ," -m mapping map identifier to type"
1170 ," -Q do not output control key settings"
1171 ," -r display term on stderr"
1172 ," -s output TERM set command"
1173 ," -V print curses-version"
1174 ," -w set window-size"
1177 (void) fprintf(stderr, "Usage: %s [options] [terminal]\n", _nc_progname);
1178 for (n = 0; n < sizeof(tbl) / sizeof(tbl[0]); ++n)
1179 fprintf(stderr, "%s\n", tbl[n]);
1187 return (char) ((optarg[0] == '^' && optarg[1] != '\0')
1188 ? ((optarg[1] == '?') ? '\177' : CTRL(optarg[1]))
1193 main(int argc, char **argv)
1195 int ch, noinit, noset, quiet, Sflag, sflag, showterm;
1200 noinit = noset = quiet = Sflag = sflag = showterm = 0;
1201 while ((ch = getopt(argc, argv, "a:cd:e:Ii:k:m:np:qQSrsVw")) != -1) {
1203 case 'c': /* set control-chars */
1206 case 'a': /* OBSOLETE: map identifier to type */
1207 add_mapping("arpanet", optarg);
1209 case 'd': /* OBSOLETE: map identifier to type */
1210 add_mapping("dialup", optarg);
1212 case 'e': /* erase character */
1213 terasechar = arg_to_char();
1215 case 'I': /* no initialization strings */
1218 case 'i': /* interrupt character */
1219 intrchar = arg_to_char();
1221 case 'k': /* kill character */
1222 tkillchar = arg_to_char();
1224 case 'm': /* map identifier to type */
1225 add_mapping(0, optarg);
1227 case 'n': /* OBSOLETE: set new tty driver */
1229 case 'p': /* OBSOLETE: map identifier to type */
1230 add_mapping("plugboard", optarg);
1232 case 'Q': /* don't output control key settings */
1235 case 'q': /* display term only */
1238 case 'r': /* display term on stderr */
1241 case 'S': /* OBSOLETE: output TERM & TERMCAP */
1244 case 's': /* output TERM set command */
1247 case 'V': /* print curses-version */
1248 puts(curses_version());
1249 ExitProgram(EXIT_SUCCESS);
1250 case 'w': /* set window-size */
1259 _nc_progname = _nc_rootname(*argv);
1266 if (!opt_c && !opt_w)
1267 opt_c = opt_w = TRUE;
1269 if (GET_TTY(STDERR_FILENO, &mode) < 0)
1270 failed("standard error");
1272 original = oldmode = mode;
1274 ospeed = (NCURSES_OSPEED) cfgetospeed(&mode);
1276 ospeed = (NCURSES_OSPEED) mode.sg_ospeed;
1279 if (same_program(_nc_progname, PROG_RESET)) {
1284 (void) get_termcap_entry(*argv);
1293 /* Set window size if not set already */
1294 (void) ioctl(STDERR_FILENO, IOCTL_GET_WINSIZE, &win);
1295 if (WINSIZE_ROWS(win) == 0 &&
1296 WINSIZE_COLS(win) == 0 &&
1297 tlines > 0 && tcolumns > 0) {
1298 WINSIZE_ROWS(win) = tlines;
1299 WINSIZE_COLS(win) = tcolumns;
1300 (void) ioctl(STDERR_FILENO, IOCTL_SET_WINSIZE, &win);
1305 set_control_chars();
1311 /* Set the modes if they've changed. */
1312 if (memcmp(&mode, &oldmode, sizeof(mode))) {
1313 SET_TTY(STDERR_FILENO, &mode);
1318 /* Get the terminal name from the entry. */
1319 ttype = _nc_first_name(cur_term->type.term_names);
1322 (void) printf("%s\n", ttype);
1325 (void) fprintf(stderr, "Terminal type is %s.\n", ttype);
1327 * If erase, kill and interrupt characters could have been
1328 * modified and not -Q, display the changes.
1332 report("Erase", VERASE, CERASE);
1333 report("Kill", VKILL, CKILL);
1334 report("Interrupt", VINTR, CINTR);
1340 err("The -S option is not supported under terminfo.");
1347 * Figure out what shell we're using. A hack, we look for an
1348 * environmental variable SHELL ending in "csh".
1350 if ((var = getenv("SHELL")) != 0
1351 && ((len = (int) strlen(leaf = _nc_basename(var))) >= 3)
1352 && !strcmp(leaf + len - 3, "csh"))
1353 p = "set noglob;\nsetenv TERM %s;\nunset noglob;\n";
1356 (void) printf(p, ttype);
1359 ExitProgram(EXIT_SUCCESS);