2  * Copyright 2020-2021,2024 Thomas E. Dickey                                *
3  * Copyright 1998-2016,2017 Free Software Foundation, Inc.                  *
5  * Permission is hereby granted, free of charge, to any person obtaining a  *
31  *  Author: Zeyd M. Ben-Halim <zmbenhal@netcom.com> 1992,1995               *
33  *     and: Thomas E. Dickey                        1996-on                 *
53  * tset.c - terminal initialization utility
60 /*-
117 	int cmp = LOWERCASE(*a) - LOWERCASE(*b);  in CaselessCmp()
122     return LOWERCASE(*a) - LOWERCASE(*b);  in CaselessCmp()
153     if ((int) len < (int) sizeof(temp) - 12) {  in failed()
159     _nc_STRNCAT(temp, msg, sizeof(temp), sizeof(temp) - strlen(temp) - 2);  in failed()
229 #define DATA(name,value) { { name }, value }  argument
355 	if (n > 0 && (speeds[n].speed <= speeds[n - 1].speed)) {  in tbaudrate()
366     return (sp->speed);  in tbaudrate()
370  * Syntax for -m:
371  * [port-type][test baudrate]:terminal-type
390     mapp->next = 0;  in add_mapping()
394 	cur->next = mapp;  in add_mapping()
398     mapp->porttype = arg;  in add_mapping()
399     mapp->conditional = 0;  in add_mapping()
404 	mapp->type = mapp->porttype;  in add_mapping()
405 	mapp->porttype = 0;  in add_mapping()
409     if (arg == mapp->porttype)	/* [><@=! baud]:term */  in add_mapping()
410 	termp = mapp->porttype = 0;  in add_mapping()
417 	    if (mapp->conditional & GT)  in add_mapping()
419 	    mapp->conditional |= LT;  in add_mapping()
422 	    if (mapp->conditional & LT)  in add_mapping()
424 	    mapp->conditional |= GT;  in add_mapping()
428 	    mapp->conditional |= EQ;  in add_mapping()
431 	    mapp->conditional |= NOT;  in add_mapping()
440 	if (mapp->conditional)  in add_mapping()
448 	mapp->speed = tbaudrate(p);  in add_mapping()
451     mapp->type = arg;  in add_mapping()
458     if (mapp->conditional & NOT)  in add_mapping()
459 	mapp->conditional = ~mapp->conditional & (EQ | GT | LT);  in add_mapping()
464 	if (mapp->porttype) {  in add_mapping()
466 	    err("illegal -m option format: %s", copy);  in add_mapping()
468 	mapp->porttype = port;  in add_mapping()
472     (void) printf("port: %s\n", mapp->porttype ? mapp->porttype : "ANY");  in add_mapping()
473     (void) printf("type: %s\n", mapp->type);  in add_mapping()
476     if (mapp->conditional & GT) {  in add_mapping()
480     if (mapp->conditional & EQ) {  in add_mapping()
484     if (mapp->conditional & LT)  in add_mapping()
486     (void) printf("\nspeed: %d\n", mapp->speed);  in add_mapping()
501     for (mapp = maplist; mapp; mapp = mapp->next)  in mapped()
502 	if (mapp->porttype == 0 || !strcmp(mapp->porttype, type)) {  in mapped()
503 	    switch (mapp->conditional) {  in mapped()
508 		match = ((int) ospeed == mapp->speed);  in mapped()
511 		match = ((int) ospeed >= mapp->speed);  in mapped()
514 		match = ((int) ospeed > mapp->speed);  in mapped()
517 		match = ((int) ospeed <= mapp->speed);  in mapped()
520 		match = ((int) ospeed < mapp->speed);  in mapped()
526 		return (mapp->type);  in mapped()
574 	 * there's an /etc/ttys to look up device-to-type mappings in.  in get_termcap_entry()
578 	    ttype = t->ty_type;  in get_termcap_entry()
587 	    while (fgets(buffer, sizeof(buffer) - 1, fp) != 0) {  in get_termcap_entry()
593 		    else if (d == 0 && s != buffer && s[-1] == '\0')  in get_termcap_entry()
673  * This means that -e, -i and -k get default arguments supplied for them.
681 	if (parm[0] == '-' && parm[1] == '\0') {  in obsolete()
682 	    argv[0] = strdup("-q");  in obsolete()
686 	if ((parm[0] != '-')  in obsolete()
687 	    || (argv[1] && argv[1][0] != '-')  in obsolete()
693 	    argv[0] = strdup("-e^H");  in obsolete()
696 	    argv[0] = strdup("-i^C");  in obsolete()
699 	    argv[0] = strdup("-k^U");  in obsolete()
718 	&& !strcmp(leaf + len - 3, "csh"))  in print_shell_commands()
734 	SKIP("  -a arpanet  (obsolete)")  in usage()
735 	KEEP("  -c          set control characters")  in usage()
736 	SKIP("  -d dialup   (obsolete)")  in usage()
737 	KEEP("  -e ch       erase character")  in usage()
738 	KEEP("  -I          no initialization strings")  in usage()
739 	KEEP("  -i ch       interrupt character")  in usage()
740 	KEEP("  -k ch       kill character")  in usage()
741 	KEEP("  -m mapping  map identifier to type")  in usage()
742 	SKIP("  -p plugboard (obsolete)")  in usage()
743 	KEEP("  -Q          do not output control key settings")  in usage()
744 	KEEP("  -q          display term only, do no changes")  in usage()
745 	KEEP("  -r          display term on stderr")  in usage()
746 	SKIP("  -S          (obsolete)")  in usage()
747 	KEEP("  -s          output TERM set command")  in usage()
748 	KEEP("  -V          print curses-version")  in usage()
749 	KEEP("  -w          set window-size")  in usage()
751 	KEEP("If neither -c/-w are given, both are assumed.")  in usage()
765 		   ? ((optarg[1] == '?') ? '\177' : CTRL(optarg[1]))  in arg_to_char()
774     int terasechar = -1;	/* new erase character */  in main()
775     int intrchar = -1;		/* new interrupt character */  in main()
776     int tkillchar = -1;		/* new kill character */  in main()
778     bool opt_c = FALSE;		/* set control-chars */  in main()
779     bool opt_w = FALSE;		/* set window-size */  in main()
785     while ((ch = getopt(argc, argv, "a:cd:e:Ii:k:m:p:qQrSsVw")) != -1) {  in main()
787 	case 'c':		/* set control-chars */  in main()
829 	case 'V':		/* print curses-version */  in main()
832 	case 'w':		/* set window-size */  in main()
841     argc -= optind;  in main()
906 	 * modified and not -Q, display the changes.  in main()
914 	err("The -S option is not supported under terminfo.");  in main()