Add window-status-separator option, from Thomas Adam.
[tmux-openbsd.git] / tty-term.c
blob5338d0d947187236fbbe48773268de43cf0b1fd2
1 /* $OpenBSD$ */
3 /*
4 * Copyright (c) 2008 Nicholas Marriott <nicm@users.sourceforge.net>
6 * Permission to use, copy, modify, and distribute this software for any
7 * purpose with or without fee is hereby granted, provided that the above
8 * copyright notice and this permission notice appear in all copies.
10 * THE SOFTWARE IS PROVIDED "AS IS" AND THE AUTHOR DISCLAIMS ALL WARRANTIES
11 * WITH REGARD TO THIS SOFTWARE INCLUDING ALL IMPLIED WARRANTIES OF
12 * MERCHANTABILITY AND FITNESS. IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR
13 * ANY SPECIAL, DIRECT, INDIRECT, OR CONSEQUENTIAL DAMAGES OR ANY DAMAGES
14 * WHATSOEVER RESULTING FROM LOSS OF MIND, USE, DATA OR PROFITS, WHETHER
15 * IN AN ACTION OF CONTRACT, NEGLIGENCE OR OTHER TORTIOUS ACTION, ARISING
16 * OUT OF OR IN CONNECTION WITH THE USE OR PERFORMANCE OF THIS SOFTWARE.
19 #include <sys/types.h>
21 #include <curses.h>
22 #include <fnmatch.h>
23 #include <stdlib.h>
24 #include <string.h>
25 #include <term.h>
26 #include <vis.h>
28 #include "tmux.h"
30 void tty_term_override(struct tty_term *, const char *);
31 char *tty_term_strip(const char *);
33 struct tty_terms tty_terms = LIST_HEAD_INITIALIZER(tty_terms);
35 const struct tty_term_code_entry tty_term_codes[NTTYCODE] = {
36 { TTYC_ACSC, TTYCODE_STRING, "acsc" },
37 { TTYC_AX, TTYCODE_FLAG, "AX" },
38 { TTYC_BEL, TTYCODE_STRING, "bel" },
39 { TTYC_BLINK, TTYCODE_STRING, "blink" },
40 { TTYC_BOLD, TTYCODE_STRING, "bold" },
41 { TTYC_CC, TTYCODE_STRING, "Cc" },
42 { TTYC_CIVIS, TTYCODE_STRING, "civis" },
43 { TTYC_CLEAR, TTYCODE_STRING, "clear" },
44 { TTYC_CNORM, TTYCODE_STRING, "cnorm" },
45 { TTYC_COLORS, TTYCODE_NUMBER, "colors" },
46 { TTYC_CR, TTYCODE_STRING, "Cr" },
47 { TTYC_CS1, TTYCODE_STRING, "Cs" },
48 { TTYC_CSR, TTYCODE_STRING, "csr" },
49 { TTYC_CSR1, TTYCODE_STRING, "Csr" },
50 { TTYC_CUB, TTYCODE_STRING, "cub" },
51 { TTYC_CUB1, TTYCODE_STRING, "cub1" },
52 { TTYC_CUD, TTYCODE_STRING, "cud" },
53 { TTYC_CUD1, TTYCODE_STRING, "cud1" },
54 { TTYC_CUF, TTYCODE_STRING, "cuf" },
55 { TTYC_CUF1, TTYCODE_STRING, "cuf1" },
56 { TTYC_CUP, TTYCODE_STRING, "cup" },
57 { TTYC_CUU, TTYCODE_STRING, "cuu" },
58 { TTYC_CUU1, TTYCODE_STRING, "cuu1" },
59 { TTYC_DCH, TTYCODE_STRING, "dch" },
60 { TTYC_DCH1, TTYCODE_STRING, "dch1" },
61 { TTYC_DIM, TTYCODE_STRING, "dim" },
62 { TTYC_DL, TTYCODE_STRING, "dl" },
63 { TTYC_DL1, TTYCODE_STRING, "dl1" },
64 { TTYC_E3, TTYCODE_STRING, "E3" },
65 { TTYC_EL, TTYCODE_STRING, "el" },
66 { TTYC_EL1, TTYCODE_STRING, "el1" },
67 { TTYC_ENACS, TTYCODE_STRING, "enacs" },
68 { TTYC_FSL, TTYCODE_STRING, "fsl" },
69 { TTYC_HOME, TTYCODE_STRING, "home" },
70 { TTYC_HPA, TTYCODE_STRING, "hpa" },
71 { TTYC_ICH, TTYCODE_STRING, "ich" },
72 { TTYC_ICH1, TTYCODE_STRING, "ich1" },
73 { TTYC_IL, TTYCODE_STRING, "il" },
74 { TTYC_IL1, TTYCODE_STRING, "il1" },
75 { TTYC_INVIS, TTYCODE_STRING, "invis" },
76 { TTYC_IS1, TTYCODE_STRING, "is1" },
77 { TTYC_IS2, TTYCODE_STRING, "is2" },
78 { TTYC_IS3, TTYCODE_STRING, "is3" },
79 { TTYC_KCBT, TTYCODE_STRING, "kcbt" },
80 { TTYC_KCUB1, TTYCODE_STRING, "kcub1" },
81 { TTYC_KCUD1, TTYCODE_STRING, "kcud1" },
82 { TTYC_KCUF1, TTYCODE_STRING, "kcuf1" },
83 { TTYC_KCUU1, TTYCODE_STRING, "kcuu1" },
84 { TTYC_KDC2, TTYCODE_STRING, "kDC" },
85 { TTYC_KDC3, TTYCODE_STRING, "kDC3" },
86 { TTYC_KDC4, TTYCODE_STRING, "kDC4" },
87 { TTYC_KDC5, TTYCODE_STRING, "kDC5" },
88 { TTYC_KDC6, TTYCODE_STRING, "kDC6" },
89 { TTYC_KDC7, TTYCODE_STRING, "kDC7" },
90 { TTYC_KDCH1, TTYCODE_STRING, "kdch1" },
91 { TTYC_KDN2, TTYCODE_STRING, "kDN" },
92 { TTYC_KDN3, TTYCODE_STRING, "kDN3" },
93 { TTYC_KDN4, TTYCODE_STRING, "kDN4" },
94 { TTYC_KDN5, TTYCODE_STRING, "kDN5" },
95 { TTYC_KDN6, TTYCODE_STRING, "kDN6" },
96 { TTYC_KDN7, TTYCODE_STRING, "kDN7" },
97 { TTYC_KEND, TTYCODE_STRING, "kend" },
98 { TTYC_KEND2, TTYCODE_STRING, "kEND" },
99 { TTYC_KEND3, TTYCODE_STRING, "kEND3" },
100 { TTYC_KEND4, TTYCODE_STRING, "kEND4" },
101 { TTYC_KEND5, TTYCODE_STRING, "kEND5" },
102 { TTYC_KEND6, TTYCODE_STRING, "kEND6" },
103 { TTYC_KEND7, TTYCODE_STRING, "kEND7" },
104 { TTYC_KF1, TTYCODE_STRING, "kf1" },
105 { TTYC_KF10, TTYCODE_STRING, "kf10" },
106 { TTYC_KF11, TTYCODE_STRING, "kf11" },
107 { TTYC_KF12, TTYCODE_STRING, "kf12" },
108 { TTYC_KF13, TTYCODE_STRING, "kf13" },
109 { TTYC_KF14, TTYCODE_STRING, "kf14" },
110 { TTYC_KF15, TTYCODE_STRING, "kf15" },
111 { TTYC_KF16, TTYCODE_STRING, "kf16" },
112 { TTYC_KF17, TTYCODE_STRING, "kf17" },
113 { TTYC_KF18, TTYCODE_STRING, "kf18" },
114 { TTYC_KF19, TTYCODE_STRING, "kf19" },
115 { TTYC_KF2, TTYCODE_STRING, "kf2" },
116 { TTYC_KF20, TTYCODE_STRING, "kf20" },
117 { TTYC_KF3, TTYCODE_STRING, "kf3" },
118 { TTYC_KF4, TTYCODE_STRING, "kf4" },
119 { TTYC_KF5, TTYCODE_STRING, "kf5" },
120 { TTYC_KF6, TTYCODE_STRING, "kf6" },
121 { TTYC_KF7, TTYCODE_STRING, "kf7" },
122 { TTYC_KF8, TTYCODE_STRING, "kf8" },
123 { TTYC_KF9, TTYCODE_STRING, "kf9" },
124 { TTYC_KHOM2, TTYCODE_STRING, "kHOM" },
125 { TTYC_KHOM3, TTYCODE_STRING, "kHOM3" },
126 { TTYC_KHOM4, TTYCODE_STRING, "kHOM4" },
127 { TTYC_KHOM5, TTYCODE_STRING, "kHOM5" },
128 { TTYC_KHOM6, TTYCODE_STRING, "kHOM6" },
129 { TTYC_KHOM7, TTYCODE_STRING, "kHOM7" },
130 { TTYC_KHOME, TTYCODE_STRING, "khome" },
131 { TTYC_KIC2, TTYCODE_STRING, "kIC" },
132 { TTYC_KIC3, TTYCODE_STRING, "kIC3" },
133 { TTYC_KIC4, TTYCODE_STRING, "kIC4" },
134 { TTYC_KIC5, TTYCODE_STRING, "kIC5" },
135 { TTYC_KIC6, TTYCODE_STRING, "kIC6" },
136 { TTYC_KIC7, TTYCODE_STRING, "kIC7" },
137 { TTYC_KICH1, TTYCODE_STRING, "kich1" },
138 { TTYC_KLFT2, TTYCODE_STRING, "kLFT" },
139 { TTYC_KLFT3, TTYCODE_STRING, "kLFT3" },
140 { TTYC_KLFT4, TTYCODE_STRING, "kLFT4" },
141 { TTYC_KLFT5, TTYCODE_STRING, "kLFT5" },
142 { TTYC_KLFT6, TTYCODE_STRING, "kLFT6" },
143 { TTYC_KLFT7, TTYCODE_STRING, "kLFT7" },
144 { TTYC_KMOUS, TTYCODE_STRING, "kmous" },
145 { TTYC_KNP, TTYCODE_STRING, "knp" },
146 { TTYC_KNXT2, TTYCODE_STRING, "kNXT" },
147 { TTYC_KNXT3, TTYCODE_STRING, "kNXT3" },
148 { TTYC_KNXT4, TTYCODE_STRING, "kNXT4" },
149 { TTYC_KNXT5, TTYCODE_STRING, "kNXT5" },
150 { TTYC_KNXT6, TTYCODE_STRING, "kNXT6" },
151 { TTYC_KNXT7, TTYCODE_STRING, "kNXT7" },
152 { TTYC_KPP, TTYCODE_STRING, "kpp" },
153 { TTYC_KPRV2, TTYCODE_STRING, "kPRV" },
154 { TTYC_KPRV3, TTYCODE_STRING, "kPRV3" },
155 { TTYC_KPRV4, TTYCODE_STRING, "kPRV4" },
156 { TTYC_KPRV5, TTYCODE_STRING, "kPRV5" },
157 { TTYC_KPRV6, TTYCODE_STRING, "kPRV6" },
158 { TTYC_KPRV7, TTYCODE_STRING, "kPRV7" },
159 { TTYC_KRIT2, TTYCODE_STRING, "kRIT" },
160 { TTYC_KRIT3, TTYCODE_STRING, "kRIT3" },
161 { TTYC_KRIT4, TTYCODE_STRING, "kRIT4" },
162 { TTYC_KRIT5, TTYCODE_STRING, "kRIT5" },
163 { TTYC_KRIT6, TTYCODE_STRING, "kRIT6" },
164 { TTYC_KRIT7, TTYCODE_STRING, "kRIT7" },
165 { TTYC_KUP2, TTYCODE_STRING, "kUP" },
166 { TTYC_KUP3, TTYCODE_STRING, "kUP3" },
167 { TTYC_KUP4, TTYCODE_STRING, "kUP4" },
168 { TTYC_KUP5, TTYCODE_STRING, "kUP5" },
169 { TTYC_KUP6, TTYCODE_STRING, "kUP6" },
170 { TTYC_KUP7, TTYCODE_STRING, "kUP7" },
171 { TTYC_MS, TTYCODE_STRING, "Ms" },
172 { TTYC_OP, TTYCODE_STRING, "op" },
173 { TTYC_REV, TTYCODE_STRING, "rev" },
174 { TTYC_RI, TTYCODE_STRING, "ri" },
175 { TTYC_RMACS, TTYCODE_STRING, "rmacs" },
176 { TTYC_RMCUP, TTYCODE_STRING, "rmcup" },
177 { TTYC_RMIR, TTYCODE_STRING, "rmir" },
178 { TTYC_RMKX, TTYCODE_STRING, "rmkx" },
179 { TTYC_SETAB, TTYCODE_STRING, "setab" },
180 { TTYC_SETAF, TTYCODE_STRING, "setaf" },
181 { TTYC_SGR0, TTYCODE_STRING, "sgr0" },
182 { TTYC_SITM, TTYCODE_STRING, "sitm" },
183 { TTYC_SMACS, TTYCODE_STRING, "smacs" },
184 { TTYC_SMCUP, TTYCODE_STRING, "smcup" },
185 { TTYC_SMIR, TTYCODE_STRING, "smir" },
186 { TTYC_SMKX, TTYCODE_STRING, "smkx" },
187 { TTYC_SMSO, TTYCODE_STRING, "smso" },
188 { TTYC_SMUL, TTYCODE_STRING, "smul" },
189 { TTYC_TSL, TTYCODE_STRING, "tsl" },
190 { TTYC_VPA, TTYCODE_STRING, "vpa" },
191 { TTYC_XENL, TTYCODE_FLAG, "xenl" },
192 { TTYC_XT, TTYCODE_FLAG, "XT" },
195 char *
196 tty_term_strip(const char *s)
198 const char *ptr;
199 static char buf[BUFSIZ];
200 size_t len;
202 /* Ignore strings with no padding. */
203 if (strchr(s, '$') == NULL)
204 return (xstrdup(s));
206 len = 0;
207 for (ptr = s; *ptr != '\0'; ptr++) {
208 if (*ptr == '$' && *(ptr + 1) == '<') {
209 while (*ptr != '\0' && *ptr != '>')
210 ptr++;
211 if (*ptr == '>')
212 ptr++;
215 buf[len++] = *ptr;
216 if (len == (sizeof buf) - 1)
217 break;
219 buf[len] = '\0';
221 return (xstrdup(buf));
224 void
225 tty_term_override(struct tty_term *term, const char *overrides)
227 const struct tty_term_code_entry *ent;
228 struct tty_code *code;
229 char *termnext, *termstr;
230 char *entnext, *entstr;
231 char *s, *ptr, *val;
232 const char *errstr;
233 u_int i;
234 int n, removeflag;
236 s = xstrdup(overrides);
238 termnext = s;
239 while ((termstr = strsep(&termnext, ",")) != NULL) {
240 entnext = termstr;
242 entstr = strsep(&entnext, ":");
243 if (entstr == NULL || entnext == NULL)
244 continue;
245 if (fnmatch(entstr, term->name, 0) != 0)
246 continue;
247 while ((entstr = strsep(&entnext, ":")) != NULL) {
248 if (*entstr == '\0')
249 continue;
251 val = NULL;
252 removeflag = 0;
253 if ((ptr = strchr(entstr, '=')) != NULL) {
254 *ptr++ = '\0';
255 val = xstrdup(ptr);
256 if (strunvis(val, ptr) == -1) {
257 xfree(val);
258 val = xstrdup(ptr);
260 } else if (entstr[strlen(entstr) - 1] == '@') {
261 entstr[strlen(entstr) - 1] = '\0';
262 removeflag = 1;
263 } else
264 val = xstrdup("");
266 log_debug("%s override: %s %s",
267 term->name, entstr, removeflag ? "@" : val);
268 for (i = 0; i < NTTYCODE; i++) {
269 ent = &tty_term_codes[i];
270 if (strcmp(entstr, ent->name) != 0)
271 continue;
272 code = &term->codes[ent->code];
274 if (removeflag) {
275 code->type = TTYCODE_NONE;
276 continue;
278 switch (ent->type) {
279 case TTYCODE_NONE:
280 break;
281 case TTYCODE_STRING:
282 if (code->type == TTYCODE_STRING)
283 xfree(code->value.string);
284 code->value.string = xstrdup(val);
285 code->type = ent->type;
286 break;
287 case TTYCODE_NUMBER:
288 n = strtonum(val, 0, INT_MAX, &errstr);
289 if (errstr != NULL)
290 break;
291 code->value.number = n;
292 code->type = ent->type;
293 break;
294 case TTYCODE_FLAG:
295 code->value.flag = 1;
296 code->type = ent->type;
297 break;
301 if (val != NULL)
302 xfree(val);
306 xfree(s);
309 struct tty_term *
310 tty_term_find(char *name, int fd, const char *overrides, char **cause)
312 struct tty_term *term;
313 const struct tty_term_code_entry *ent;
314 struct tty_code *code;
315 u_int i;
316 int n, error;
317 char *s;
318 const char *acs;
320 LIST_FOREACH(term, &tty_terms, entry) {
321 if (strcmp(term->name, name) == 0) {
322 term->references++;
323 return (term);
327 log_debug("new term: %s", name);
328 term = xmalloc(sizeof *term);
329 term->name = xstrdup(name);
330 term->references = 1;
331 term->flags = 0;
332 memset(term->codes, 0, sizeof term->codes);
333 LIST_INSERT_HEAD(&tty_terms, term, entry);
335 /* Set up curses terminal. */
336 if (setupterm(name, fd, &error) != OK) {
337 switch (error) {
338 case 1:
339 xasprintf(
340 cause, "can't use hardcopy terminal: %s", name);
341 break;
342 case 0:
343 xasprintf(
344 cause, "missing or unsuitable terminal: %s", name);
345 break;
346 case -1:
347 xasprintf(cause, "can't find terminfo database");
348 break;
349 default:
350 xasprintf(cause, "unknown error");
351 break;
353 goto error;
356 /* Fill in codes. */
357 for (i = 0; i < NTTYCODE; i++) {
358 ent = &tty_term_codes[i];
360 code = &term->codes[ent->code];
361 code->type = TTYCODE_NONE;
362 switch (ent->type) {
363 case TTYCODE_NONE:
364 break;
365 case TTYCODE_STRING:
366 s = tigetstr((char *) ent->name);
367 if (s == NULL || s == (char *) -1)
368 break;
369 code->type = TTYCODE_STRING;
370 code->value.string = tty_term_strip(s);
371 break;
372 case TTYCODE_NUMBER:
373 n = tigetnum((char *) ent->name);
374 if (n == -1 || n == -2)
375 break;
376 code->type = TTYCODE_NUMBER;
377 code->value.number = n;
378 break;
379 case TTYCODE_FLAG:
380 n = tigetflag((char *) ent->name);
381 if (n == -1)
382 break;
383 code->type = TTYCODE_FLAG;
384 code->value.number = n;
385 break;
388 tty_term_override(term, overrides);
390 /* Delete curses data. */
391 del_curterm(cur_term);
393 /* These are always required. */
394 if (!tty_term_has(term, TTYC_CLEAR)) {
395 xasprintf(cause, "terminal does not support clear");
396 goto error;
398 if (!tty_term_has(term, TTYC_CUP)) {
399 xasprintf(cause, "terminal does not support cup");
400 goto error;
403 /* These can be emulated so one of the two is required. */
404 if (!tty_term_has(term, TTYC_CUD1) && !tty_term_has(term, TTYC_CUD)) {
405 xasprintf(cause, "terminal does not support cud1 or cud");
406 goto error;
409 /* Figure out if we have 256 or 88 colours. */
410 if (tty_term_number(term, TTYC_COLORS) == 256)
411 term->flags |= TERM_256COLOURS;
412 if (tty_term_number(term, TTYC_COLORS) == 88)
413 term->flags |= TERM_88COLOURS;
416 * Terminals without xenl (eat newline glitch) wrap at at $COLUMNS - 1
417 * rather than $COLUMNS (the cursor can never be beyond $COLUMNS - 1).
419 * This is irritating, most notably because it is impossible to write
420 * to the very bottom-right of the screen without scrolling.
422 * Flag the terminal here and apply some workarounds in other places to
423 * do the best possible.
425 if (!tty_term_flag(term, TTYC_XENL))
426 term->flags |= TERM_EARLYWRAP;
428 /* Generate ACS table. If none is present, use nearest ASCII. */
429 memset(term->acs, 0, sizeof term->acs);
430 if (tty_term_has(term, TTYC_ACSC))
431 acs = tty_term_string(term, TTYC_ACSC);
432 else
433 acs = "a#j+k+l+m+n+o-p-q-r-s-t+u+v+w+x|y<z>~.";
434 for (; acs[0] != '\0' && acs[1] != '\0'; acs += 2)
435 term->acs[(u_char) acs[0]][0] = acs[1];
437 /* On terminals with xterm titles (XT), fill in tsl and fsl. */
438 if (tty_term_flag(term, TTYC_XT) &&
439 !tty_term_has(term, TTYC_TSL) &&
440 !tty_term_has(term, TTYC_FSL)) {
441 code = &term->codes[TTYC_TSL];
442 code->value.string = xstrdup("\033]0;");
443 code->type = TTYCODE_STRING;
444 code = &term->codes[TTYC_FSL];
445 code->value.string = xstrdup("\007");
446 code->type = TTYCODE_STRING;
449 return (term);
451 error:
452 tty_term_free(term);
453 return (NULL);
456 void
457 tty_term_free(struct tty_term *term)
459 u_int i;
461 if (--term->references != 0)
462 return;
464 LIST_REMOVE(term, entry);
466 for (i = 0; i < NTTYCODE; i++) {
467 if (term->codes[i].type == TTYCODE_STRING)
468 xfree(term->codes[i].value.string);
470 xfree(term->name);
471 xfree(term);
475 tty_term_has(struct tty_term *term, enum tty_code_code code)
477 return (term->codes[code].type != TTYCODE_NONE);
480 const char *
481 tty_term_string(struct tty_term *term, enum tty_code_code code)
483 if (!tty_term_has(term, code))
484 return ("");
485 if (term->codes[code].type != TTYCODE_STRING)
486 log_fatalx("not a string: %d", code);
487 return (term->codes[code].value.string);
490 /* No vtparm. Fucking curses. */
491 const char *
492 tty_term_string1(struct tty_term *term, enum tty_code_code code, int a)
494 return (tparm((char *) tty_term_string(term, code), a));
497 const char *
498 tty_term_string2(struct tty_term *term, enum tty_code_code code, int a, int b)
500 return (tparm((char *) tty_term_string(term, code), a, b));
503 const char *
504 tty_term_ptr1(struct tty_term *term, enum tty_code_code code, const void *a)
506 return (tparm((char *) tty_term_string(term, code), a));
509 const char *
510 tty_term_ptr2(struct tty_term *term, enum tty_code_code code, const void *a, const void *b)
512 return (tparm((char *) tty_term_string(term, code), a, b));
516 tty_term_number(struct tty_term *term, enum tty_code_code code)
518 if (!tty_term_has(term, code))
519 return (0);
520 if (term->codes[code].type != TTYCODE_NUMBER)
521 log_fatalx("not a number: %d", code);
522 return (term->codes[code].value.number);
526 tty_term_flag(struct tty_term *term, enum tty_code_code code)
528 if (!tty_term_has(term, code))
529 return (0);
530 if (term->codes[code].type != TTYCODE_FLAG)
531 log_fatalx("not a flag: %d", code);
532 return (term->codes[code].value.flag);