schily-2021-09-18/termcap/cap.c

74 LOCAL clist caplist[] = {  variable
78 LOCAL	int	ncaps = sizeof (caplist) / sizeof (caplist[0]);
129 		if (caplist[i].tc_name[0] == '-' &&  in init_clist()
130 		    caplist[i].tc_name[1] == '-') {  in init_clist()
133 		if (streql(caplist[i].tc_var, "BOOL")) {  in init_clist()
138 		if (streql(caplist[i].tc_var, "INT")) {  in init_clist()
143 		if (streql(caplist[i].tc_var, "STRING")) {  in init_clist()
148 		if (streql(caplist[i].tc_var, "TC")) {  in init_clist()
152 		if (streql(caplist[i].tc_var, "COMMENT")) {  in init_clist()
157 		if (streql(caplist[i].tc_var, "OBSOLETE")) {  in init_clist()
163 		if (streql(caplist[i].tc_var, "CURIOUS")) {  in init_clist()
170 		if (caplist[i].tc_comment[0] != '\0') {  in init_clist()
171 			char	*p = caplist[i].tc_comment;  in init_clist()
186 		caplist[i].tc_flags = flags | flags2;  in init_clist()
252 		if (caplist[i].tc_name[0] == '-' &&  in dumplist()
253 		    caplist[i].tc_name[1] == '-')  in dumplist()
255 		if (caplist[i].tc_name[0] == '.' &&  in dumplist()
256 		    caplist[i].tc_name[1] == '.')  in dumplist()
261 		if (caplist[i].tc_flags & C_PARM)  in dumplist()
263 		if (caplist[i].tc_flags & C_PAD)  in dumplist()
265 		if (caplist[i].tc_flags & C_PADN)  in dumplist()
270 		l = strlen(caplist[i].tc_var);  in dumplist()
272 			caplist[i].tc_name,  in dumplist()
273 			caplist[i].tc_iname,  in dumplist()
274 			strlen(caplist[i].tc_iname) >= 5 ? "\t":"\t\t",  in dumplist()
275 			caplist[i].tc_var,  in dumplist()
279 			(caplist[i].tc_flags & C_BOOL) ? 'B':  in dumplist()
280 			(caplist[i].tc_flags & C_INT) ? 'I':  in dumplist()
281 			(caplist[i].tc_flags & C_STRING) ? 'S': '?',  in dumplist()
282 			(caplist[i].tc_flags & C_OLD) ? 'O': ' ',  in dumplist()
284 			caplist[i].tc_comment);  in dumplist()
537 		if (caplist[i].tc_name[0] == '-' &&
538 		    caplist[i].tc_name[1] == '-')
541 		if (!(pe = tfind(tbuf, caplist[i].tc_name)))
544 		if ((caplist[i].tc_flags & (C_BOOL|C_INT|C_STRING)) == 0)
547 		if ((caplist[i].tc_flags & C_OLD) != 0) {
552 			printf("'%s' -> %s", caplist[i].tc_name,
553 				((caplist[i].tc_flags & C_STRING) != 0)? "null @" :
554 				(((caplist[i].tc_flags & C_INT) != 0)? "-1 @" :
555 				(((caplist[i].tc_flags & C_BOOL) != 0)? "FALSE @" :
557 			printf("		%s", caplist[i].tc_comment);
580 			char	*e = tfind(tbuf, caplist[i].tc_name);
610 				p = tgetstr(caplist[i].tc_name, &sbp);
613 		if (caplist[i].tc_name[0] == 'm' &&
614 		    caplist[i].tc_name[1] == 'a' &&
615 		    (caplist[i].tc_flags & C_STRING) == 0) {
628 			printf("'%s' -> '%s'", caplist[i].tc_name, p);
629 			printf("		%s", caplist[i].tc_comment);
631 			if ((caplist[i].tc_flags & C_STRING) == 0)
638 		b = tgetnum(caplist[i].tc_name);
640 		if (caplist[i].tc_name[0] == 'm' &&
641 		    caplist[i].tc_name[1] == 'a' &&
642 		    (caplist[i].tc_flags & C_INT) == 0) {
651 			printf("'%s' -> %d", caplist[i].tc_name, b);
652 			printf("		%s", caplist[i].tc_comment);
653 			if ((caplist[i].tc_flags & C_INT) == 0)
659 		b = tgetflag(caplist[i].tc_name);
660 		printf("'%s' -> %s", caplist[i].tc_name, b?"TRUE":"FALSE");
661 		printf("		%s", caplist[i].tc_comment);
662 		if ((caplist[i].tc_flags & C_BOOL) == 0)
827 			if (caplist[i].tc_name[0] == '-' &&
828 			    caplist[i].tc_name[1] == '-')
831 			if (caplist[i].tc_name[0] == 'm' &&
832 			    caplist[i].tc_name[1] == 'a' &&
833 			    (caplist[i].tc_flags & C_STRING) == 0) {
844 			if (streql(ent, caplist[i].tc_name))
864 		} else if ((caplist[i].tc_flags & (C_STRING|C_PARM)) == (C_STRING|C_PARM)) {
885 		rp = tgetstr(caplist[i].tc_name, NULL);
888 		if (caplist[i].tc_name[0] == 'm' &&
889 		    caplist[i].tc_name[1] == 'a' &&
890 		    (caplist[i].tc_flags & C_STRING) == 0) {
894 			if ((caplist[i].tc_flags & C_STRING) == 0) {
897 					tname, ent, (int)(p2 - p - 1), p, type2str(caplist[i].tc_flags));
904 		rb = tgetnum(caplist[i].tc_name);
907 		if (caplist[i].tc_name[0] == 'm' &&
908 		    caplist[i].tc_name[1] == 'a' &&
909 		    (caplist[i].tc_flags & C_INT) == 0) {
913 			if ((caplist[i].tc_flags & C_INT) == 0) {
916 					tname, ent, (int)(p2 - p - 1), p, type2str(caplist[i].tc_flags));
921 			rb = tgetflag(caplist[i].tc_name);
922 			if ((caplist[i].tc_flags & C_BOOL) == 0) {
926 						tname, ent, (int)(p2 - p - 1), p, type2str(caplist[i].tc_flags));
929 						tname, ent, (int)(p2 - p - 1), p, type2str(caplist[i].tc_flags));
1000 			i, caplist[i].tc_name[0], caplist[i].tc_name[1],
1001 			itoname[j], tfind(tbuf, caplist[i].tc_name), j);
1006 		if (caplist[i].tc_name[0] == '-' &&
1007 		    caplist[i].tc_name[1] == '-')
1064 		if (j > 0 && (caplist[i].tc_flags & (C_BOOL|C_INT|C_STRING|C_TC)) != itotype[j])
1067 		if ((caplist[i].tc_flags & (C_BOOL|C_INT|C_STRING)) == 0) {
1068 			if (streql(caplist[i].tc_var, "unknown")) {
1102 		if (!(pe = tfind(tbuf, caplist[i].tc_name)))
1106 			curlen = sprintf(line, "%s@:", caplist[i].tc_name);
1131 			curlen = sprintf(line, "%s=%s:", caplist[i].tc_name, p);
1135 			p = tgetstr(caplist[i].tc_name, &sbp);
1139 			if (caplist[i].tc_flags & C_INT) {	/* check type for "ma" */
1140 				if (caplist[i].tc_name[0] == 'm' &&
1141 				    caplist[i].tc_name[1] == 'a') {
1152 			if (caplist[i].tc_flags & C_STRING) {	/* check type for "ma" */
1153 				curlen = sprintf(line, "%s=%s:", caplist[i].tc_name, quote(p));
1158 						tname, caplist[i].tc_name,
1164 		b = tgetnum(caplist[i].tc_name);
1166 			if (caplist[i].tc_flags & C_INT) {	/* check type for "ma" */
1167 				curlen = sprintf(line, "%s#%d:", caplist[i].tc_name, b);
1171 				if (caplist[i].tc_name[0] == 'm' &&
1172 				    caplist[i].tc_name[1] == 'a') {
1183 						tname, caplist[i].tc_name,
1189 		b = tgetflag(caplist[i].tc_name);
1191 			if (caplist[i].tc_flags & C_BOOL) {
1192 				curlen = sprintf(line, "%s:", caplist[i].tc_name);
1197 						tname, caplist[i].tc_name,
1203 		if (caplist[i].tc_flags & C_INT) {	/* check type for "ma" */
1204 			if (caplist[i].tc_name[0] == 'm' &&
1205 			    caplist[i].tc_name[1] == 'a' &&
1215 						tname, caplist[i].tc_name,
1221 		    flags != (caplist[i].tc_flags & (C_BOOL|C_INT|C_STRING|C_TC))) {
1224 			flags = caplist[i].tc_flags & (C_BOOL|C_INT|C_STRING|C_TC);
1232 		    j < 0 && (caplist[i].tc_flags & C_OLD) != 0) {