0
|
1 /*
|
|
2 * CDDL HEADER START
|
|
3 *
|
|
4 * The contents of this file are subject to the terms of the
|
|
5 * Common Development and Distribution License, Version 1.0 only
|
|
6 * (the "License"). You may not use this file except in compliance
|
|
7 * with the License.
|
|
8 *
|
|
9 * You can obtain a copy of the license at usr/src/OPENSOLARIS.LICENSE
|
|
10 * or http://www.opensolaris.org/os/licensing.
|
|
11 * See the License for the specific language governing permissions
|
|
12 * and limitations under the License.
|
|
13 *
|
|
14 * When distributing Covered Code, include this CDDL HEADER in each
|
|
15 * file and include the License file at usr/src/OPENSOLARIS.LICENSE.
|
|
16 * If applicable, add the following below this CDDL HEADER, with the
|
|
17 * fields enclosed by brackets "[]" replaced with your own identifying
|
|
18 * information: Portions Copyright [yyyy] [name of copyright owner]
|
|
19 *
|
|
20 * CDDL HEADER END
|
|
21 */
|
|
22 /* Copyright (c) 1988 AT&T */
|
|
23 /* All Rights Reserved */
|
|
24
|
|
25
|
|
26 /*
|
|
27 * Copyright 2004 Sun Microsystems, Inc. All rights reserved.
|
|
28 * Use is subject to license terms.
|
|
29 */
|
|
30
|
|
31 #pragma ident "%Z%%M% %I% %E% SMI" /* SVr4.0 1.13 */
|
|
32
|
|
33 /*
|
|
34 NAME
|
|
35 infocmp - compare terminfo descriptions, or dump a terminfo
|
|
36 description
|
|
37
|
|
38 AUTHOR
|
|
39 Tony Hansen, February 23, 1984.
|
|
40 */
|
|
41
|
|
42 #include "curses.h"
|
|
43 #include "term.h"
|
|
44 #include "print.h"
|
|
45 #include <fcntl.h>
|
|
46 #include <stdlib.h>
|
|
47
|
|
48 /* externs from libcurses */
|
|
49 extern char *boolnames[];
|
|
50 extern char *boolcodes[];
|
|
51 extern char *boolfnames[];
|
|
52 extern char *numnames[];
|
|
53 extern char *numcodes[];
|
|
54 extern char *numfnames[];
|
|
55 extern char *strnames[];
|
|
56 extern char *strcodes[];
|
|
57 extern char *strfnames[];
|
|
58 extern char ttytype[];
|
|
59 extern int tgetflag();
|
|
60 extern int tgetnum();
|
|
61 extern char *tgetstr();
|
|
62
|
|
63 /* externs from libc */
|
|
64 extern void exit();
|
|
65 extern void qsort();
|
|
66 extern char *getenv();
|
|
67 extern int getopt();
|
|
68 extern int optind;
|
|
69 extern char *optarg;
|
|
70 extern char *strncpy(), *strcpy();
|
|
71 extern int strcmp(), strlen();
|
|
72
|
|
73 /* data structures for this program */
|
|
74
|
|
75 struct boolstruct {
|
|
76 char *infoname; /* the terminfo capability name */
|
|
77 char *capname; /* the termcap capability name */
|
|
78 char *fullname; /* the long C variable name */
|
|
79 char *secondname; /* the use= terminal w/ this value */
|
|
80 char val; /* the value */
|
|
81 char secondval; /* the value in the use= terminal */
|
|
82 char changed; /* a use= terminal changed the value */
|
|
83 char seenagain; /* a use= terminal had this entry */
|
|
84 };
|
|
85
|
|
86 struct numstruct {
|
|
87 char *infoname; /* ditto from above */
|
|
88 char *capname;
|
|
89 char *fullname;
|
|
90 char *secondname;
|
|
91 short val;
|
|
92 short secondval;
|
|
93 char changed;
|
|
94 char seenagain;
|
|
95 };
|
|
96
|
|
97 struct strstruct {
|
|
98 char *infoname; /* ditto from above */
|
|
99 char *capname;
|
|
100 char *fullname;
|
|
101 char *secondname;
|
|
102 char *val;
|
|
103 char *secondval;
|
|
104 char changed;
|
|
105 char seenagain;
|
|
106 };
|
|
107
|
|
108 /* globals for this file */
|
|
109 char *progname; /* argv[0], the name of the program */
|
|
110 static struct boolstruct *ibool; /* array of char information */
|
|
111 static struct numstruct *num; /* array of number information */
|
|
112 static struct strstruct *str; /* array of string information */
|
|
113 static char *used; /* usage statistics */
|
|
114 static int numbools; /* how many booleans there are */
|
|
115 static int numnums; /* how many numbers there are */
|
|
116 static int numstrs; /* how many strings there are */
|
|
117 #define TTYLEN 255
|
|
118 static char *firstterm; /* the name of the first terminal */
|
|
119 static char *savettytype; /* the synonyms of the first terminal */
|
|
120 static char _savettytype[TTYLEN+1]; /* the place to save those names */
|
|
121 static int devnull; /* open("/dev/null") for setupterm */
|
|
122 #define trace stderr /* send trace messages to stderr */
|
|
123
|
|
124 /* options */
|
|
125 static int verbose = 0; /* debugging printing level */
|
|
126 static int diff = 0; /* produce diff listing, the default */
|
|
127 static int common = 0; /* produce common listing */
|
|
128 static int neither = 0; /* list caps in neither entry */
|
|
129 static int use = 0; /* produce use= comparison listing */
|
|
130 static enum printtypes printing /* doing any of above printing at all */
|
|
131 = pr_none;
|
|
132 enum { none, by_database, by_terminfo, by_longnames, by_cap }
|
|
133 sortorder = none; /* sort the fields for printing */
|
|
134 static char *term1info, *term2info; /* $TERMINFO settings */
|
|
135 static int Aflag = 0, Bflag = 0; /* $TERMINFO was set with -A/-B */
|
|
136
|
|
137 #define EQUAL(s1, s2) (((s1 == NULL) && (s2 == NULL)) || \
|
|
138 ((s1 != NULL) && (s2 != NULL) && \
|
|
139 (strcmp(s1, s2) == 0)))
|
|
140
|
|
141 static void sortnames();
|
|
142 int numcompare(const void *, const void *);
|
|
143 int boolcompare(const void *, const void *);
|
|
144 int strcompare(const void *, const void *);
|
|
145 static void check_nth_terminal(char *, int);
|
|
146
|
|
147 void
|
|
148 badmalloc()
|
|
149 {
|
|
150 (void) fprintf(stderr, "%s: malloc is out of space!\n", progname);
|
|
151 exit(-1);
|
|
152 }
|
|
153
|
|
154 /*
|
|
155 Allocate and initialize the global data structures and variables.
|
|
156 */
|
|
157 void
|
|
158 allocvariables(int argc, int firstoptind)
|
|
159 {
|
|
160 register int i, nullseen;
|
|
161
|
|
162 /* find out how many names we are dealing with */
|
|
163 for (numbools = 0; boolnames[numbools]; numbools++)
|
|
164 ;
|
|
165 for (numnums = 0; numnames[numnums]; numnums++)
|
|
166 ;
|
|
167 for (numstrs = 0; strnames[numstrs]; numstrs++)
|
|
168 ;
|
|
169
|
|
170 if (verbose) {
|
|
171 (void) fprintf(trace, "There are %d boolean capabilities.\n",
|
|
172 numbools);
|
|
173 (void) fprintf(trace, "There are %d numeric capabilities.\n",
|
|
174 numnums);
|
|
175 (void) fprintf(trace, "There are %d string capabilities.\n",
|
|
176 numstrs);
|
|
177 }
|
|
178
|
|
179 /* Allocate storage for the names and their values */
|
|
180 ibool = (struct boolstruct *) malloc((unsigned) numbools *
|
|
181 sizeof (struct boolstruct));
|
|
182 num = (struct numstruct *) malloc((unsigned) numnums *
|
|
183 sizeof (struct numstruct));
|
|
184 str = (struct strstruct *) malloc((unsigned) numstrs *
|
|
185 sizeof (struct strstruct));
|
|
186
|
|
187 /* Allocate array to keep track of which names have been used. */
|
|
188 if (use)
|
|
189 used = (char *) malloc((unsigned) (argc - firstoptind) *
|
|
190 sizeof (char));
|
|
191
|
|
192 if ((ibool == NULL) || (num == NULL) || (str == NULL) ||
|
|
193 (use && (used == NULL)))
|
|
194 badmalloc();
|
|
195
|
|
196 /* Fill in the names and initialize the structures. */
|
|
197 nullseen = FALSE;
|
|
198 for (i = 0; i < numbools; i++) {
|
|
199 ibool[i].infoname = boolnames[i];
|
|
200 ibool[i].capname = boolcodes[i];
|
|
201 /* This is necessary until fnames.c is */
|
|
202 /* incorporated into standard curses. */
|
|
203 if (nullseen || (boolfnames[i] == NULL)) {
|
|
204 ibool[i].fullname = "unknown_boolean";
|
|
205 nullseen = TRUE;
|
|
206 } else
|
|
207 ibool[i].fullname = boolfnames[i];
|
|
208 ibool[i].changed = FALSE;
|
|
209 ibool[i].seenagain = FALSE;
|
|
210 }
|
|
211 nullseen = 0;
|
|
212 for (i = 0; i < numnums; i++) {
|
|
213 num[i].infoname = numnames[i];
|
|
214 num[i].capname = numcodes[i];
|
|
215 if (nullseen || (numfnames[i] == NULL)) {
|
|
216 ibool[i].fullname = "unknown_number";
|
|
217 nullseen = TRUE;
|
|
218 } else
|
|
219 num[i].fullname = numfnames[i];
|
|
220 num[i].changed = FALSE;
|
|
221 num[i].seenagain = FALSE;
|
|
222 }
|
|
223 nullseen = 0;
|
|
224 for (i = 0; i < numstrs; i++) {
|
|
225 str[i].infoname = strnames[i];
|
|
226 str[i].capname = strcodes[i];
|
|
227 if (nullseen || (strfnames[i] == NULL)) {
|
|
228 str[i].fullname = "unknown_string";
|
|
229 nullseen = TRUE;
|
|
230 } else
|
|
231 str[i].fullname = strfnames[i];
|
|
232 str[i].changed = FALSE;
|
|
233 str[i].seenagain = FALSE;
|
|
234 }
|
|
235 }
|
|
236
|
|
237 /*
|
|
238 Routines to be passed to qsort(3) for comparison of the structures.
|
|
239 */
|
|
240 int
|
|
241 boolcompare(const void *x, const void *y)
|
|
242 {
|
|
243 struct boolstruct *a;
|
|
244 struct boolstruct *b;
|
|
245
|
|
246 a = (struct boolstruct *)x;
|
|
247 b = (struct boolstruct *)y;
|
|
248
|
|
249 switch ((int) sortorder) {
|
|
250 case (int) by_terminfo:
|
|
251 return (strcmp(a->infoname, b->infoname));
|
|
252 case (int) by_cap:
|
|
253 return (strcmp(a->capname, b->capname));
|
|
254 case (int) by_longnames:
|
|
255 return (strcmp(a->fullname, b->fullname));
|
|
256 default:
|
|
257 return (0);
|
|
258 }
|
|
259 }
|
|
260
|
|
261 int
|
|
262 numcompare(const void *x, const void *y)
|
|
263 {
|
|
264 struct numstruct *a;
|
|
265 struct numstruct *b;
|
|
266
|
|
267 a = (struct numstruct *)x;
|
|
268 b = (struct numstruct *)y;
|
|
269 switch ((int) sortorder) {
|
|
270 case (int) by_terminfo:
|
|
271 return (strcmp(a->infoname, b->infoname));
|
|
272 case (int) by_cap:
|
|
273 return (strcmp(a->capname, b->capname));
|
|
274 case (int) by_longnames:
|
|
275 return (strcmp(a->fullname, b->fullname));
|
|
276 default:
|
|
277 return (0);
|
|
278 }
|
|
279 }
|
|
280
|
|
281 int
|
|
282 strcompare(const void *x, const void *y)
|
|
283 {
|
|
284 struct strstruct *a;
|
|
285 struct strstruct *b;
|
|
286
|
|
287 a = (struct strstruct *)x;
|
|
288 b = (struct strstruct *)y;
|
|
289
|
|
290 switch ((int) sortorder) {
|
|
291 case (int) by_terminfo:
|
|
292 return (strcmp(a->infoname, b->infoname));
|
|
293 case (int) by_cap:
|
|
294 return (strcmp(a->capname, b->capname));
|
|
295 case (int) by_longnames:
|
|
296 return (strcmp(a->fullname, b->fullname));
|
|
297 default:
|
|
298 return (0);
|
|
299 }
|
|
300 }
|
|
301
|
|
302 /*
|
|
303 Sort the entries by their terminfo name.
|
|
304 */
|
|
305 static void
|
|
306 sortnames()
|
|
307 {
|
|
308 if (sortorder != by_database) {
|
|
309 qsort((char *) ibool, (unsigned) numbools,
|
|
310 sizeof (struct boolstruct), boolcompare);
|
|
311 qsort((char *) num, (unsigned) numnums,
|
|
312 sizeof (struct numstruct), numcompare);
|
|
313 qsort((char *) str, (unsigned) numstrs,
|
|
314 sizeof (struct strstruct), strcompare);
|
|
315 }
|
|
316 return;
|
|
317 }
|
|
318
|
|
319 /*
|
|
320 Print out a string, or "NULL" if it's not defined.
|
|
321 */
|
|
322 void
|
|
323 PR(FILE *stream, char *string)
|
|
324 {
|
|
325 if (string == NULL)
|
|
326 (void) fprintf(stream, "NULL");
|
|
327 else
|
|
328 tpr(stream, string);
|
|
329 }
|
|
330
|
|
331 /*
|
|
332 Output the 'ko' termcap string. This is a list of all of the input
|
|
333 keys that input the same thing as the corresponding output strings.
|
|
334 */
|
|
335 int kncounter;
|
|
336 char kobuffer[512];
|
|
337
|
|
338 char
|
|
339 *addko(char *output, char *input, char *koptr)
|
|
340 {
|
|
341 char *inptr, *outptr, padbuffer[512];
|
|
342 inptr = tgetstr(input, (char **)0);
|
|
343 if (inptr == NULL)
|
|
344 return (koptr);
|
|
345 outptr = tgetstr(output, (char **)0);
|
|
346 if (outptr == NULL)
|
|
347 return (koptr);
|
|
348 outptr = rmpadding(outptr, padbuffer, (int *) 0);
|
|
349 if (strcmp(inptr, outptr) == 0) {
|
|
350 *koptr++ = *output++;
|
|
351 *koptr++ = *output++;
|
|
352 *koptr++ = ',';
|
|
353 kncounter++;
|
|
354 }
|
|
355 return (koptr);
|
|
356 }
|
|
357
|
|
358 void
|
|
359 setupknko()
|
|
360 {
|
|
361 char *koptr;
|
|
362
|
|
363 kncounter = 0;
|
|
364 koptr = kobuffer;
|
|
365
|
|
366 koptr = addko("bs", "kb", koptr); /* key_backspace */
|
|
367 koptr = addko("bt", "kB", koptr); /* key_btab */
|
|
368 koptr = addko("cl", "kC", koptr); /* key_clear */
|
|
369 koptr = addko("le", "kl", koptr); /* key_left */
|
|
370 koptr = addko("do", "kd", koptr); /* key_down */
|
|
371 koptr = addko("nd", "kr", koptr); /* key_right */
|
|
372 koptr = addko("up", "ku", koptr); /* key_up */
|
|
373 koptr = addko("dc", "kD", koptr); /* key_dc */
|
|
374 koptr = addko("dl", "kL", koptr); /* key_dl */
|
|
375 koptr = addko("cd", "kS", koptr); /* key_eos */
|
|
376 koptr = addko("ce", "kE", koptr); /* key_eol */
|
|
377 koptr = addko("ho", "kh", koptr); /* key_home */
|
|
378 koptr = addko("st", "kT", koptr); /* key_stab */
|
|
379 koptr = addko("ic", "kI", koptr); /* key_ic */
|
|
380 koptr = addko("im", "kI", koptr); /* key_ic */
|
|
381 koptr = addko("al", "kA", koptr); /* key_il */
|
|
382 koptr = addko("sf", "kF", koptr); /* key_sf */
|
|
383 koptr = addko("ll", "kH", koptr); /* key_ll */
|
|
384 koptr = addko("sr", "kR", koptr); /* key_sr */
|
|
385 koptr = addko("ei", "kM", koptr); /* key_eic */
|
|
386 koptr = addko("ct", "ka", koptr); /* key_catab */
|
|
387
|
|
388 /* get rid of comma */
|
|
389 if (koptr != kobuffer)
|
|
390 *(--koptr) = '\0';
|
|
391 }
|
|
392
|
|
393 void
|
|
394 pr_kn()
|
|
395 {
|
|
396 if (kncounter > 0)
|
|
397 pr_number((char *)0, "kn", (char *)0, kncounter);
|
|
398 }
|
|
399
|
|
400 void
|
|
401 pr_ko()
|
|
402 {
|
|
403 if (kncounter > 0)
|
|
404 pr_string((char *)0, "ko", (char *)0, kobuffer);
|
|
405 }
|
|
406
|
|
407 void
|
|
408 pr_bcaps()
|
|
409 {
|
|
410 char *retptr;
|
|
411 char padbuffer[512];
|
|
412
|
|
413 if (verbose)
|
|
414 (void) fprintf(trace, "looking at 'bs'\n");
|
|
415 retptr = cconvert(rmpadding(cursor_left, padbuffer, (int *) 0));
|
|
416 if (strcmp("\\b", retptr) == 0)
|
|
417 pr_boolean((char *)0, "bs", (char *)0, 1);
|
|
418
|
|
419 if (verbose)
|
|
420 (void) fprintf(trace, "looking at 'pt'\n");
|
|
421 retptr = cconvert(rmpadding(tab, padbuffer, (int *) 0));
|
|
422 if (strcmp("\\t", retptr) == 0)
|
|
423 pr_boolean((char *)0, "pt", (char *)0, 1);
|
|
424
|
|
425 if (verbose)
|
|
426 (void) fprintf(trace, "looking at 'nc'\n");
|
|
427 retptr = cconvert(rmpadding(carriage_return, padbuffer, (int *) 0));
|
|
428 if (strcmp("\\r", retptr) != 0)
|
|
429 pr_boolean((char *)0, "nc", (char *)0, 1);
|
|
430
|
|
431 if (verbose)
|
|
432 (void) fprintf(trace, "looking at 'ns'\n");
|
|
433 if (scroll_forward == NULL)
|
|
434 pr_boolean((char *)0, "ns", (char *)0, 1);
|
|
435
|
|
436 /* Ignore "xr": Return acts like ce \r \n (Delta Data) */
|
|
437 }
|
|
438
|
|
439 void
|
|
440 pr_ncaps()
|
|
441 {
|
|
442 char padbuffer[512];
|
|
443 int padding;
|
|
444
|
|
445 if (verbose)
|
|
446 (void) fprintf(trace, "looking at 'ug'\n");
|
|
447 /* Duplicate sg for ug: Number of blank chars left by us or ue */
|
|
448 if (magic_cookie_glitch > -1)
|
|
449 pr_number((char *)0, "ug", (char *)0, magic_cookie_glitch);
|
|
450
|
|
451 if (verbose)
|
|
452 (void) fprintf(trace, "looking at 'dB'\n");
|
|
453 /* Number of millisec of bs delay needed */
|
|
454 (void) rmpadding(cursor_left, padbuffer, &padding);
|
|
455 if (padding > 0)
|
|
456 pr_number((char *)0, "dB", (char *)0, padding);
|
|
457
|
|
458 if (verbose)
|
|
459 (void) fprintf(trace, "looking at 'dC'\n");
|
|
460 /* Number of millisec of cr delay needed */
|
|
461 (void) rmpadding(carriage_return, padbuffer, &padding);
|
|
462 if (padding > 0)
|
|
463 pr_number((char *)0, "dC", (char *)0, padding);
|
|
464
|
|
465 if (verbose)
|
|
466 (void) fprintf(trace, "looking at 'dF'\n");
|
|
467 /* Number of millisec of ff delay needed */
|
|
468 (void) rmpadding(form_feed, padbuffer, &padding);
|
|
469 if (padding > 0)
|
|
470 pr_number((char *)0, "dF", (char *)0, padding);
|
|
471
|
|
472 if (verbose)
|
|
473 (void) fprintf(trace, "looking at 'dN'\n");
|
|
474 /* Number of millisec of nl delay needed */
|
|
475 (void) rmpadding(cursor_down, padbuffer, &padding);
|
|
476 if (padding > 0)
|
|
477 pr_number((char *)0, "dN", (char *)0, padding);
|
|
478
|
|
479 if (verbose)
|
|
480 (void) fprintf(trace, "looking at 'dT'\n");
|
|
481 /* Number of millisec of tab delay needed */
|
|
482 (void) rmpadding(tab, padbuffer, &padding);
|
|
483 if (padding > 0)
|
|
484 pr_number((char *)0, "dT", (char *)0, padding);
|
|
485
|
|
486 /* Handle "kn": Number of "other" keys */
|
|
487 setupknko();
|
|
488 pr_kn();
|
|
489 }
|
|
490
|
|
491 void
|
|
492 pr_scaps()
|
|
493 {
|
|
494 char *retptr;
|
|
495 char padbuffer[512];
|
|
496
|
|
497 /* Backspace if not "^H" */
|
|
498 if (verbose)
|
|
499 (void) fprintf(trace, "looking at 'bc'\n");
|
|
500 retptr = cconvert(rmpadding(cursor_left, padbuffer, (int *) 0));
|
|
501 if (strcmp("\\b", retptr) != 0)
|
|
502 pr_string((char *)0, "bc", (char *)0, cursor_left);
|
|
503
|
|
504 /* Newline character (default "\n") */
|
|
505 if (verbose)
|
|
506 (void) fprintf(trace, "looking at 'nl'\n");
|
|
507 retptr = cconvert(rmpadding(cursor_down, padbuffer, (int *) 0));
|
|
508 if (strcmp("\\n", retptr) != 0)
|
|
509 pr_string((char *)0, "nl", (char *)0, cursor_down);
|
|
510
|
|
511 /* Handle "ko" here: Termcap entries for other non-function keys */
|
|
512 pr_ko();
|
|
513
|
|
514 /* Ignore "ma": Arrow key map, used by vi version 2 only */
|
|
515 }
|
|
516
|
|
517 /*
|
|
518 Set up the first terminal and save the values from it.
|
|
519 */
|
|
520 void
|
|
521 initfirstterm(char *term)
|
|
522 {
|
|
523 register int i;
|
|
524
|
|
525 if (verbose)
|
|
526 (void) fprintf(trace, "setting up terminal type '%s'.\n",
|
|
527 term);
|
|
528
|
|
529 (void) setupterm(term, devnull, (int *) 0);
|
|
530
|
|
531 /* Save the name for later use. */
|
|
532 if (use) {
|
|
533 register unsigned int length;
|
|
534 savettytype = _savettytype;
|
|
535 if ((length = strlen(ttytype)) >= TTYLEN) {
|
|
536 savettytype = malloc(length);
|
|
537 if (savettytype == NULL) {
|
|
538 (void) fprintf(stderr, "%s: malloc is out "
|
|
539 "of space\n", progname);
|
|
540 (void) strncpy(_savettytype, ttytype,
|
|
541 TTYLEN-1);
|
|
542 _savettytype[TTYLEN] = '\0';
|
|
543 savettytype = _savettytype;
|
|
544 }
|
|
545 } else
|
|
546 (void) strcpy(_savettytype, ttytype);
|
|
547 }
|
|
548
|
|
549 if (printing != pr_none) {
|
|
550 pr_heading(term, ttytype);
|
|
551 pr_bheading();
|
|
552 }
|
|
553
|
|
554 /* Save the values for the first terminal. */
|
|
555 for (i = 0; i < numbools; i++) {
|
|
556 if ((ibool[i].val = tgetflag(ibool[i].capname)) &&
|
|
557 printing != pr_none)
|
|
558 pr_boolean(ibool[i].infoname, ibool[i].capname,
|
|
559 ibool[i].fullname, 1);
|
|
560 if (verbose)
|
|
561 (void) fprintf(trace, "%s=%d.\n", ibool[i].infoname,
|
|
562 ibool[i].val);
|
|
563 }
|
|
564
|
|
565 if (printing != pr_none) {
|
|
566 if (printing == pr_cap)
|
|
567 pr_bcaps();
|
|
568 pr_bfooting();
|
|
569 pr_nheading();
|
|
570 }
|
|
571
|
|
572 for (i = 0; i < numnums; i++) {
|
|
573 if (((num[i].val = tgetnum(num[i].capname)) > -1) &&
|
|
574 printing != pr_none)
|
|
575 pr_number(num[i].infoname, num[i].capname,
|
|
576 num[i].fullname, num[i].val);
|
|
577 if (verbose)
|
|
578 (void) fprintf(trace, "%s=%d.\n", num[i].infoname,
|
|
579 num[i].val);
|
|
580 }
|
|
581
|
|
582 if (printing != pr_none) {
|
|
583 if (printing == pr_cap)
|
|
584 pr_ncaps();
|
|
585 pr_nfooting();
|
|
586 pr_sheading();
|
|
587 }
|
|
588
|
|
589 for (i = 0; i < numstrs; i++) {
|
|
590 str[i].val = tgetstr(str[i].capname, (char **)0);
|
|
591 if ((str[i].val != NULL) && printing != pr_none)
|
|
592 pr_string(str[i].infoname, str[i].capname,
|
|
593 str[i].fullname, str[i].val);
|
|
594 if (verbose) {
|
|
595 (void) fprintf(trace, "%s='", str[i].infoname);
|
|
596 PR(trace, str[i].val);
|
|
597 (void) fprintf(trace, "'.\n");
|
|
598 }
|
|
599 }
|
|
600
|
|
601 if (printing == pr_cap)
|
|
602 pr_scaps();
|
|
603
|
|
604 if (printing != pr_none)
|
|
605 pr_sfooting();
|
|
606 }
|
|
607
|
|
608 /*
|
|
609 Set up the n'th terminal.
|
|
610 */
|
|
611 static void
|
|
612 check_nth_terminal(char *nterm, int n)
|
|
613 {
|
|
614 register char boolval;
|
|
615 register short numval;
|
|
616 register char *strval;
|
|
617 register int i;
|
|
618
|
|
619 if (use)
|
|
620 used[n] = FALSE;
|
|
621
|
|
622 if (verbose)
|
|
623 (void) fprintf(trace, "adding in terminal type '%s'.\n",
|
|
624 nterm);
|
|
625
|
|
626 (void) setupterm(nterm, devnull, (int *) 0);
|
|
627
|
|
628 if (printing != pr_none) {
|
|
629 pr_heading(nterm, ttytype);
|
|
630 pr_bheading();
|
|
631 }
|
|
632
|
|
633 if (diff || common || neither) {
|
|
634 if (Aflag && Bflag)
|
|
635 (void) printf("comparing %s (TERMINFO=%s) to %s "
|
|
636 "(TERMINFO=%s).\n",
|
|
637 firstterm, term1info, nterm, term2info);
|
|
638 else if (Aflag)
|
|
639 (void) printf("comparing %s (TERMINFO=%s) to %s.\n",
|
|
640 firstterm, term1info, nterm);
|
|
641 else if (Bflag)
|
|
642 (void) printf("comparing %s to %s (TERMINFO=%s).\n",
|
|
643 firstterm, nterm, term2info);
|
|
644 else
|
|
645 (void) printf("comparing %s to %s.\n",
|
|
646 firstterm, nterm);
|
|
647 (void) printf(" comparing booleans.\n");
|
|
648 }
|
|
649
|
|
650 /* save away the values for the nth terminal */
|
|
651 for (i = 0; i < numbools; i++) {
|
|
652 boolval = tgetflag(ibool[i].capname);
|
|
653 if (use) {
|
|
654 if (ibool[i].seenagain) {
|
|
655 /*
|
|
656 ** We do not have to worry about this impossible case
|
|
657 ** since booleans can have only two values: true and
|
|
658 ** false.
|
|
659 ** if (boolval && (boolval != ibool[i].secondval))
|
|
660 ** {
|
|
661 ** (void) fprintf(trace, "use= order dependency"
|
|
662 ** "found:\n");
|
|
663 ** (void) fprintf(trace, " %s: %s has %d, %s has"
|
|
664 ** " %d.\n",
|
|
665 ** ibool[i].capname, ibool[i].secondname,
|
|
666 ** ibool[i].secondval, nterm, boolval);
|
|
667 ** }
|
|
668 */
|
|
669 } else {
|
|
670 if (boolval == TRUE) {
|
|
671 ibool[i].seenagain = TRUE;
|
|
672 ibool[i].secondval = boolval;
|
|
673 ibool[i].secondname = nterm;
|
|
674 if (ibool[i].val != boolval)
|
|
675 ibool[i].changed = TRUE;
|
|
676 else
|
|
677 used[n] = TRUE;
|
|
678 }
|
|
679 }
|
|
680 }
|
|
681 if (boolval) {
|
|
682 if (printing != pr_none)
|
|
683 pr_boolean(ibool[i].infoname, ibool[i].capname,
|
|
684 ibool[i].fullname, 1);
|
|
685 if (common && (ibool[i].val == boolval))
|
|
686 (void) printf("\t%s= T.\n", ibool[i].infoname);
|
|
687 } else if (neither && !ibool[i].val)
|
|
688 (void) printf("\t!%s.\n", ibool[i].infoname);
|
|
689 if (diff && (ibool[i].val != boolval))
|
|
690 (void) printf("\t%s: %c:%c.\n", ibool[i].infoname,
|
|
691 ibool[i].val?'T':'F', boolval?'T':'F');
|
|
692 if (verbose)
|
|
693 (void) fprintf(trace, "%s: %d:%d, changed=%d, "
|
|
694 "seen=%d.\n", ibool[i].infoname, ibool[i].val,
|
|
695 boolval, ibool[i].changed, ibool[i].seenagain);
|
|
696 }
|
|
697
|
|
698 if (printing != pr_none) {
|
|
699 if (printing == pr_cap)
|
|
700 pr_bcaps();
|
|
701 pr_bfooting();
|
|
702 pr_nheading();
|
|
703 }
|
|
704
|
|
705 if (diff || common || neither)
|
|
706 (void) printf(" comparing numbers.\n");
|
|
707
|
|
708 for (i = 0; i < numnums; i++) {
|
|
709 numval = tgetnum(num[i].capname);
|
|
710 if (use) {
|
|
711 if (num[i].seenagain) {
|
|
712 if ((numval > -1) &&
|
|
713 (numval != num[i].secondval)) {
|
|
714 (void) fprintf(stderr,
|
|
715 "%s: use = order dependency "
|
|
716 "found:\n", progname);
|
|
717 (void) fprintf(stderr, " %s: %s "
|
|
718 "has %d, %s has %d.\n",
|
|
719 num[i].capname, num[i].secondname,
|
|
720 num[i].secondval, nterm, numval);
|
|
721 }
|
|
722 } else {
|
|
723 if (numval > -1) {
|
|
724 num[i].seenagain = TRUE;
|
|
725 num[i].secondval = numval;
|
|
726 num[i].secondname = nterm;
|
|
727 if ((numval > -1) &&
|
|
728 (num[i].val != numval))
|
|
729 num[i].changed = TRUE;
|
|
730 else
|
|
731 used[n] = TRUE;
|
|
732 }
|
|
733 }
|
|
734 }
|
|
735 if (numval > -1) {
|
|
736 if (printing != pr_none)
|
|
737 pr_number(num[i].infoname, num[i].capname,
|
|
738 num[i].fullname, numval);
|
|
739 if (common && (num[i].val == numval))
|
|
740 (void) printf("\t%s= %d.\n", num[i].infoname,
|
|
741 numval);
|
|
742 } else if (neither && (num[i].val == -1))
|
|
743 (void) printf("\t!%s.\n", num[i].infoname);
|
|
744 if (diff && (num[i].val != numval))
|
|
745 (void) printf("\t%s: %d:%d.\n",
|
|
746 num[i].infoname, num[i].val, numval);
|
|
747 if (verbose)
|
|
748 (void) fprintf(trace, "%s: %d:%d, "
|
|
749 "changed = %d, seen = %d.\n",
|
|
750 num[i].infoname, num[i].val, numval,
|
|
751 num[i].changed, num[i].seenagain);
|
|
752 }
|
|
753
|
|
754 if (printing != pr_none) {
|
|
755 if (printing == pr_cap)
|
|
756 pr_ncaps();
|
|
757 pr_nfooting();
|
|
758 pr_sheading();
|
|
759 }
|
|
760
|
|
761 if (diff || common || neither)
|
|
762 (void) printf(" comparing strings.\n");
|
|
763
|
|
764 for (i = 0; i < numstrs; i++) {
|
|
765 strval = tgetstr(str[i].capname, (char **)0);
|
|
766 if (use) {
|
|
767 if (str[i].seenagain && (strval != NULL)) {
|
|
768 if (!EQUAL(strval, str[i].secondval)) {
|
|
769 (void) fprintf(stderr,
|
|
770 "use= order dependency"
|
|
771 " found:\n");
|
|
772 (void) fprintf(stderr,
|
|
773 " %s: %s has '",
|
|
774 str[i].capname, str[i].secondname);
|
|
775 PR(stderr, str[i].secondval);
|
|
776 (void) fprintf(stderr,
|
|
777 "', %s has '", nterm);
|
|
778 PR(stderr, strval);
|
|
779 (void) fprintf(stderr, "'.\n");
|
|
780 }
|
|
781 } else {
|
|
782 if (strval != NULL) {
|
|
783 str[i].seenagain = TRUE;
|
|
784 str[i].secondval = strval;
|
|
785 str[i].secondname = nterm;
|
|
786 if (!EQUAL(str[i].val, strval))
|
|
787 str[i].changed = TRUE;
|
|
788 else
|
|
789 used[n] = TRUE;
|
|
790 }
|
|
791 }
|
|
792 }
|
|
793 if (strval != NULL) {
|
|
794 if (printing != pr_none)
|
|
795 pr_string(str[i].infoname, str[i].capname,
|
|
796 str[i].fullname, strval);
|
|
797 if (common && EQUAL(str[i].val, strval)) {
|
|
798 (void) printf("\t%s= '", str[i].infoname);
|
|
799 PR(stdout, strval);
|
|
800 (void) printf("'.\n");
|
|
801 }
|
|
802 } else if (neither && (str[i].val == NULL))
|
|
803 (void) printf("\t!%s.\n", str[i].infoname);
|
|
804 if (diff && !EQUAL(str[i].val, strval)) {
|
|
805 (void) printf("\t%s: '", str[i].infoname);
|
|
806 PR(stdout, str[i].val);
|
|
807 (void) printf("','");
|
|
808 PR(stdout, strval);
|
|
809 (void) printf("'.\n");
|
|
810 }
|
|
811 if (verbose) {
|
|
812 (void) fprintf(trace, "%s: '", str[i].infoname);
|
|
813 PR(trace, str[i].val);
|
|
814 (void) fprintf(trace, "':'");
|
|
815 PR(trace, strval);
|
|
816 (void) fprintf(trace, "',changed=%d,seen=%d.\n",
|
|
817 str[i].changed, str[i].seenagain);
|
|
818 }
|
|
819 }
|
|
820
|
|
821 if (printing == pr_cap)
|
|
822 pr_scaps();
|
|
823
|
|
824 if (printing != pr_none)
|
|
825 pr_sfooting();
|
|
826
|
|
827 return;
|
|
828 }
|
|
829
|
|
830 /*
|
|
831 A capability gets an at-sign if it no longer exists, but
|
|
832 one of the relative entries contains a value for it.
|
|
833 It gets printed if the original value is not seen in ANY
|
|
834 of the relative entries, or if the FIRST relative entry that has
|
|
835 the capability gives a DIFFERENT value for the capability.
|
|
836 */
|
|
837 void
|
|
838 dorelative(int firstoptind, int argc, char **argv)
|
|
839 {
|
|
840 register int i;
|
|
841
|
|
842 /* turn off printing of termcap and long names */
|
|
843 pr_init(pr_terminfo);
|
|
844
|
|
845 /* print out the entry name */
|
|
846 pr_heading((char *)0, savettytype);
|
|
847
|
|
848 pr_bheading();
|
|
849
|
|
850 /* Print out all bools that are different. */
|
|
851 for (i = 0; i < numbools; i++)
|
|
852 if (!ibool[i].val && ibool[i].changed)
|
|
853 pr_boolean(ibool[i].infoname, (char *)0,
|
|
854 (char *)0, -1);
|
|
855 else if (ibool[i].val && (ibool[i].changed ||
|
|
856 !ibool[i].seenagain))
|
|
857 pr_boolean(ibool[i].infoname, (char *)0, (char *)0, 1);
|
|
858
|
|
859 pr_bfooting();
|
|
860 pr_nheading();
|
|
861
|
|
862 /* Print out all nums that are different. */
|
|
863 for (i = 0; i < numnums; i++)
|
|
864 if (num[i].val < 0 && num[i].changed)
|
|
865 pr_number(num[i].infoname, (char *)0, (char *)0, -1);
|
|
866 else if (num[i].val >= 0 && (num[i].changed ||
|
|
867 !num[i].seenagain))
|
|
868 pr_number(num[i].infoname, (char *)0,
|
|
869 (char *)0, num[i].val);
|
|
870
|
|
871 pr_nfooting();
|
|
872 pr_sheading();
|
|
873
|
|
874 /* Print out all strs that are different. */
|
|
875 for (i = 0; i < numstrs; i++)
|
|
876 if (str[i].val == NULL && str[i].changed)
|
|
877 pr_string(str[i].infoname, (char *)0, (char *)0,
|
|
878 (char *)0);
|
|
879 else if ((str[i].val != NULL) &&
|
|
880 (str[i].changed || !str[i].seenagain))
|
|
881 pr_string(str[i].infoname, (char *)0, (char *)0, str[i].val);
|
|
882
|
|
883 pr_sfooting();
|
|
884
|
|
885 /* Finish it up. */
|
|
886 for (i = firstoptind; i < argc; i++)
|
|
887 if (used[i - firstoptind])
|
|
888 (void) printf("\tuse=%s,\n", argv[i]);
|
|
889 else
|
|
890 (void) fprintf(stderr,
|
|
891 "%s: 'use=%s' did not add anything to the "
|
|
892 "description.\n", progname, argv[i]);
|
|
893 }
|
|
894
|
|
895 void
|
|
896 local_setenv(char *termNinfo)
|
|
897 {
|
|
898 extern char **environ;
|
|
899 static char *newenviron[2] = { 0, 0 };
|
|
900 static unsigned int termsize = BUFSIZ;
|
|
901 static char _terminfo[BUFSIZ];
|
|
902 static char *terminfo = &_terminfo[0];
|
|
903 register int termlen;
|
|
904
|
|
905 if (termNinfo && *termNinfo) {
|
|
906 if (verbose)
|
|
907 (void) fprintf(trace, "setting TERMINFO=%s.\n",
|
|
908 termNinfo);
|
|
909 termlen = strlen(termNinfo);
|
|
910 if (termlen + 10 > termsize) {
|
|
911 termsize = termlen + 20;
|
|
912 terminfo = (char *) malloc(termsize * sizeof (char));
|
|
913 }
|
|
914 if (terminfo == (char *) NULL)
|
|
915 badmalloc();
|
|
916 (void) sprintf(terminfo, "TERMINFO=%s", termNinfo);
|
|
917 newenviron[0] = terminfo;
|
|
918 } else
|
|
919 newenviron[0] = (char *) 0;
|
|
920 environ = newenviron;
|
|
921 }
|
|
922
|
|
923 int
|
|
924 main(int argc, char **argv)
|
|
925 {
|
|
926 int i, c, firstoptind;
|
|
927 char *tempargv[2];
|
|
928 char *term = getenv("TERM");
|
|
929
|
|
930 term1info = term2info = getenv("TERMINFO");
|
|
931 progname = argv[0];
|
|
932
|
|
933 /* parse options */
|
|
934 while ((c = getopt(argc, argv, "ducnILCvV1rw:s:A:B:")) != EOF)
|
|
935 switch (c) {
|
|
936 case 'v': verbose++;
|
|
937 break;
|
|
938 case '1': pr_onecolumn(1);
|
|
939 break;
|
|
940 case 'w': pr_width(atoi(optarg));
|
|
941 break;
|
|
942 case 'd': diff++;
|
|
943 break;
|
|
944 case 'c': common++;
|
|
945 break;
|
|
946 case 'n': neither++;
|
|
947 break;
|
|
948 case 'u': use++;
|
|
949 break;
|
|
950 case 'L': pr_init(printing = pr_longnames);
|
|
951 break;
|
|
952 case 'I': pr_init(printing = pr_terminfo);
|
|
953 break;
|
|
954 case 'C': pr_init(printing = pr_cap);
|
|
955 break;
|
|
956 case 'A': term1info = optarg; Aflag++;
|
|
957 break;
|
|
958 case 'B': term2info = optarg; Bflag++;
|
|
959 break;
|
|
960 case 'r': pr_caprestrict(0);
|
|
961 break;
|
|
962 case 's':
|
|
963 if (strcmp(optarg, "d") == 0)
|
|
964 sortorder = by_database;
|
|
965 else if (strcmp(optarg, "i") == 0)
|
|
966 sortorder = by_terminfo;
|
|
967 else if (strcmp(optarg, "l") == 0)
|
|
968 sortorder = by_longnames;
|
|
969 else if (strcmp(optarg, "c") == 0)
|
|
970 sortorder = by_cap;
|
|
971 else
|
|
972 goto usage;
|
|
973 break;
|
|
974 case 'V':
|
|
975 (void) printf("%s: version %s\n", progname,
|
|
976 "@(#)curses:screen/infocmp.c 1.13");
|
|
977 exit(0);
|
|
978 case '?':
|
|
979 usage:
|
|
980 (void) fprintf(stderr,
|
|
981 "usage: %s [-ducn] [-ILC] [-1Vv] "
|
|
982 "[-s d|i|l|c] [-A directory] "
|
|
983 "[-B directory] term-names ...\n",
|
|
984 progname);
|
|
985 (void) fprintf(stderr, "\t-d\tprint "
|
|
986 "differences (the default for >1 "
|
|
987 "term-name)\n");
|
|
988 (void) fprintf(stderr, "\t-u\tproduce "
|
|
989 "relative description\n");
|
|
990 (void) fprintf(stderr, "\t-c\tprint common "
|
|
991 "entries\n");
|
|
992 (void) fprintf(stderr, "\t-n\tprint entries "
|
|
993 "in neither\n");
|
|
994 (void) fprintf(stderr, "\t-I\tprint terminfo "
|
|
995 "entries (the default for 1 term-name)\n");
|
|
996 (void) fprintf(stderr, "\t-C\tprint termcap "
|
|
997 "entries\n");
|
|
998 (void) fprintf(stderr, "\t-L\tprint long C "
|
|
999 "variable names\n");
|
|
1000 (void) fprintf(stderr, "\t-1\tsingle column "
|
|
1001 "output\n");
|
|
1002 (void) fprintf(stderr, "\t-V\tprint program "
|
|
1003 "version\n");
|
|
1004 (void) fprintf(stderr, "\t-v\tverbose "
|
|
1005 "debugging output\n");
|
|
1006 (void) fprintf(stderr, "\t-s\tchange sort "
|
|
1007 "order\n");
|
|
1008 (void) fprintf(stderr, "\t-A\tset $TERMINFO "
|
|
1009 "for first term-name\n");
|
|
1010 (void) fprintf(stderr, "\t-B\tset $TERMINFO "
|
|
1011 "for other term-names\n");
|
|
1012 exit(-1);
|
|
1013 }
|
|
1014
|
|
1015 argc -= optind;
|
|
1016 argv += optind;
|
|
1017 optind = 0;
|
|
1018
|
|
1019 /* Default to $TERM for -n, -I, -C and -L options. */
|
|
1020 /* This is done by faking argv[][], argc and optind. */
|
|
1021 if (neither && (argc == 0 || argc == 1)) {
|
|
1022 if (argc == 0)
|
|
1023 tempargv[0] = term;
|
|
1024 else
|
|
1025 tempargv[0] = argv[optind];
|
|
1026 tempargv[1] = term;
|
|
1027 argc = 2;
|
|
1028 argv = tempargv;
|
|
1029 optind = 0;
|
|
1030 } else if ((printing != pr_none) && (argc == 0)) {
|
|
1031 tempargv[0] = term;
|
|
1032 argc = 1;
|
|
1033 argv = tempargv;
|
|
1034 optind = 0;
|
|
1035 }
|
|
1036
|
|
1037 /* Check for enough names. */
|
|
1038 if ((use || diff || common) && (argc <= 1)) {
|
|
1039 (void) fprintf(stderr,
|
|
1040 "%s: must have at least two terminal names for a "
|
|
1041 "comparison to be done.\n", progname);
|
|
1042 goto usage;
|
|
1043 }
|
|
1044
|
|
1045 /* Set the default of diff -d or print -I */
|
|
1046 if (!use && (printing == pr_none) && !common && !neither) {
|
|
1047 if (argc == 0 || argc == 1) {
|
|
1048 if (argc == 0) {
|
|
1049 tempargv[0] = term;
|
|
1050 argc = 1;
|
|
1051 argv = tempargv;
|
|
1052 optind = 0;
|
|
1053 }
|
|
1054 pr_init(printing = pr_terminfo);
|
|
1055 } else
|
|
1056 diff++;
|
|
1057 }
|
|
1058
|
|
1059 /* Set the default sorting order. */
|
|
1060 if (sortorder == none)
|
|
1061 switch ((int) printing) {
|
|
1062 case (int) pr_cap:
|
|
1063 sortorder = by_cap; break;
|
|
1064 case (int) pr_longnames:
|
|
1065 sortorder = by_longnames; break;
|
|
1066 case (int) pr_terminfo:
|
|
1067 case (int) pr_none:
|
|
1068 sortorder = by_terminfo; break;
|
|
1069 }
|
|
1070
|
|
1071 firstterm = argv[optind++];
|
|
1072 firstoptind = optind;
|
|
1073
|
|
1074 allocvariables(argc, firstoptind);
|
|
1075 sortnames();
|
|
1076
|
|
1077 devnull = open("/dev/null", O_RDWR);
|
|
1078 local_setenv(term1info);
|
|
1079 initfirstterm(firstterm);
|
|
1080 local_setenv(term2info);
|
|
1081 for (i = 0; optind < argc; optind++, i++)
|
|
1082 check_nth_terminal(argv[optind], i);
|
|
1083
|
|
1084 if (use)
|
|
1085 dorelative(firstoptind, argc, argv);
|
|
1086
|
|
1087 return (0);
|
|
1088 }
|