ViewVC Help
View File | Revision Log | Show Annotations | Download File
/cvs/rxvt-unicode/src/command.C
(Generate patch)

Comparing rxvt-unicode/src/command.C (file contents):
Revision 1.38 by pcg, Mon Feb 9 07:11:49 2004 UTC vs.
Revision 1.596 by root, Sun Nov 21 23:36:36 2021 UTC

1/*--------------------------------*-C-*---------------------------------* 1/*----------------------------------------------------------------------*
2 * File: command.c 2 * File: command.C
3 *----------------------------------------------------------------------* 3 *----------------------------------------------------------------------*
4 * 4 *
5 * All portions of code are copyright by their respective author/s. 5 * All portions of code are copyright by their respective author/s.
6 * Copyright (c) 1992 John Bovey, University of Kent at Canterbury <jdb@ukc.ac.uk> 6 * Copyright (c) 1992 John Bovey, University of Kent at Canterbury <jdb@ukc.ac.uk>
7 * - original version 7 * - original version
8 * Copyright (c) 1994 Robert Nation <nation@rocket.sanders.lockheed.com> 8 * Copyright (c) 1994 Robert Nation <nation@rocket.sanders.lockheed.com>
9 * - extensive modifications 9 * - extensive modifications
10 * Copyright (c) 1995 Garrett D'Amore <garrett@netcom.com> 10 * Copyright (c) 1995 Garrett D'Amore <garrett@netcom.com>
11 * - vt100 printing 11 * - vt100 printing
12 * Copyright (c) 1995 Steven Hirsch <hirsch@emba.uvm.edu> 12 * Copyright (c) 1995 Steven Hirsch <hirsch@emba.uvm.edu>
13 * - X11 mouse report mode and support for 13 * - X11 mouse report mode and support for
14 * DEC "private mode" save/restore functions. 14 * DEC "private mode" save/restore functions.
20 * Copyright (c) 1997 Raul Garcia Garcia <rgg@tid.es> 20 * Copyright (c) 1997 Raul Garcia Garcia <rgg@tid.es>
21 * - modification and cleanups for Solaris 2.x 21 * - modification and cleanups for Solaris 2.x
22 * and Linux 1.2.x 22 * and Linux 1.2.x
23 * Copyright (c) 1997,1998 Oezguer Kesim <kesim@math.fu-berlin.de> 23 * Copyright (c) 1997,1998 Oezguer Kesim <kesim@math.fu-berlin.de>
24 * Copyright (c) 1998-2001 Geoff Wing <gcw@pobox.com> 24 * Copyright (c) 1998-2001 Geoff Wing <gcw@pobox.com>
25 * - extensive modifications 25 * - extensive modifications
26 * Copyright (c) 1998 Alfredo K. Kojima <kojima@windowmaker.org> 26 * Copyright (c) 1998 Alfredo K. Kojima <kojima@windowmaker.org>
27 * Copyright (c) 2001 Marius Gedminas 27 * Copyright (c) 2001 Marius Gedminas
28 * - Ctrl/Mod4+Tab works like Meta+Tab (options) 28 * - Ctrl/Mod4+Tab works like Meta+Tab (options)
29 * Copyright (c) 2003 Rob McMullen <robm@flipturn.org> 29 * Copyright (c) 2003 Rob McMullen <robm@flipturn.org>
30 * Copyright (c) 2003-2021 Marc Lehmann <schmorp@schmorp.de>
31 * Copyright (c) 2007,2015 Emanuele Giaquinta <e.giaquinta@glauco.it>
30 * 32 *
31 * This program is free software; you can redistribute it and/or modify 33 * This program is free software; you can redistribute it and/or modify
32 * it under the terms of the GNU General Public License as published by 34 * it under the terms of the GNU General Public License as published by
33 * the Free Software Foundation; either version 2 of the License, or 35 * the Free Software Foundation; either version 3 of the License, or
34 * (at your option) any later version. 36 * (at your option) any later version.
35 * 37 *
36 * This program is distributed in the hope that it will be useful, 38 * This program is distributed in the hope that it will be useful,
37 * but WITHOUT ANY WARRANTY; without even the implied warranty of 39 * but WITHOUT ANY WARRANTY; without even the implied warranty of
38 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the 40 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
42 * along with this program; if not, write to the Free Software 44 * along with this program; if not, write to the Free Software
43 * Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA. 45 * Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.
44 *----------------------------------------------------------------------*/ 46 *----------------------------------------------------------------------*/
45 47
46/*{{{ includes: */ 48/*{{{ includes: */
47#include "../config.h" /* NECESSARY */ 49#include "../config.h"
48#include "rxvt.h" /* NECESSARY */ 50#include "rxvt.h"
51#include "rxvtperl.h"
49#include "version.h" 52#include "version.h"
50#include "command.h" 53#include "command.h"
51 54
55#ifdef KEYSYM_RESOURCE
56# include "keyboard.h"
57#endif
58
52#include <wchar.h> 59#include <signal.h>
60
61#if LINUX_YIELD_HACK
62# include <time.h>
63#endif
53 64
54/*----------------------------------------------------------------------*/ 65/*----------------------------------------------------------------------*/
55 66
56/*{{{ Convert the keypress event into a string */ 67#define IS_CONTROL(ch) !((ch) & 0xffffff60UL)
57void 68
58rxvt_term::lookup_key (XKeyEvent &ev) 69#if ENABLE_FRILLS || ISO_14755
70
71#define ISO_14755_STARTED 0x80000000UL
72#define ISO_14755_51 0x40000000UL // basic (section 5.1)
73#define ISO_14755_52 0x20000000UL // keycap (section 5.2)
74#define ISO_14755_54 0x10000000UL // code feedback (section 5.4)
75#define ISO_14755_MASK 0x0fffffffUL
76
77#if ISO_14755
78static unsigned short iso14755_symtab[] = {
79 // keysym, unicode
80 XK_Left, 0x2190,
81 XK_KP_Left, 0x2190,
82 XK_Up, 0x2191,
83 XK_KP_Up, 0x2191,
84 XK_Right, 0x2192,
85 XK_KP_Right, 0x2192,
86 XK_Down, 0x2193,
87 XK_KP_Down, 0x2193,
88 XK_Linefeed, 0x21b4,
89 XK_Return, 0x21b5,
90 XK_KP_Enter, 0x21b5,
91
92 XK_Prior, 0x21de,
93 XK_Next, 0x21df,
94 XK_Tab, 0x21e5,
95 XK_ISO_Left_Tab, 0x21e6,
96 XK_Shift_L, 0x21e7,
97 XK_Shift_R, 0x21e7,
98
99 XK_Shift_Lock, 0x21eb,
100 XK_ISO_Lock, 0x21eb,
101 XK_Caps_Lock, 0x21ec,
102 XK_Num_Lock, 0x21ed,
103 XK_ISO_Level3_Shift, 0x21ee,
104 XK_ISO_Level3_Lock, 0x21ef,
105 XK_ISO_Group_Lock, 0x21f0,
106 XK_Home, 0x21f1,
107 XK_End, 0x21f2,
108
109 XK_Execute, 0x2318,
110 XK_Begin, 0x2320,
111 XK_Delete, 0x2326,
112 XK_Clear, 0x2327,
113 XK_BackSpace, 0x232b,
114 XK_Insert, 0x2380,
115 XK_Control_L, 0x2388,
116 XK_Control_R, 0x2388,
117 XK_Pause, 0x2389,
118 XK_Break, 0x238a,
119 XK_Escape, 0x238b,
120 XK_Undo, 0x238c,
121 XK_Print, 0x2399,
122
123 XK_space, 0x2423,
124
125#ifdef XK_KP_Begin
126 XK_KP_Prior, 0x21de,
127 XK_KP_Next, 0x21df,
128 XK_KP_Begin, 0x2320,
129 XK_KP_Insert, 0x2380,
130 XK_KP_Delete, 0x2326,
131 XK_KP_Space, 0x2422,
132#endif
133 0,
134};
135
136void ecb_cold
137rxvt_term::iso14755_54 (int x, int y)
59{ 138{
60 int ctrl, meta, shft, len; 139 x = Pixel2Col (x);
61 unsigned int newlen; 140 y = Pixel2Row (y);
62 KeySym keysym; 141
63#ifdef DEBUG_CMD 142 if (!IN_RANGE_EXC (x, 0, ncol)
64 static int debug_key = 1; /* accessible by a debugger only */ 143 || !IN_RANGE_EXC (y, 0, nrow))
144 return;
145
146 for (;;)
147 {
148 const line_t &l = ROW(y + view_start);
149
150 text_t t = l.t[x];
151
152 if (t != NOCHAR || !x)
153 {
154 iso14755_51 (l.t[x], l.r[x], x, y, view_start);
155 iso14755buf = ISO_14755_54;
156 break;
157 }
158
159 x--;
160 }
161}
162
163void ecb_cold
164rxvt_term::iso14755_51 (unicode_t ch, rend_t r, int x, int y, int y2)
165{
166 rxvt_fontset *fs = FONTSET (r);
167 wchar_t *chr, *alloc, ch2, **fname;
168 int len;
169
170# if ENABLE_COMBINING
171 if (IS_COMPOSE (ch))
172 {
173 len = rxvt_composite.expand (ch);
174 alloc = chr = new wchar_t[len];
175 rxvt_composite.expand (ch, chr);
176 }
177 else
65#endif 178# endif
66 int valid_keysym; 179 {
67 unsigned char kbuf[KBUFSZ]; 180 ch2 = ch;
181
182 alloc = 0;
183 chr = &ch2;
184 len = 1;
185 }
186
187 char rowcol[40];
188 snprintf (rowcol, sizeof rowcol, "col %d row %d @%d", x, y, y2);
189
190 char attr[80]; // plenty
191
192 sprintf (attr, "%08x = fg %d bg %d%s%s%s%s%s%s",
193 (int)r,
194 fgcolor_of (r), bgcolor_of (r),
195 r & RS_Bold ? " bold" : "",
196 r & RS_Italic ? " italic" : "",
197 r & RS_Blink ? " blink" : "",
198 r & RS_RVid ? " rvid" : "",
199 r & RS_Uline ? " uline" : "",
200 r & RS_Careful ? " careful" : "");
201
202 int width = 0;
203 fname = rxvt_temp_buf<wchar_t *> (len);
204 for (int i = 0; i < len; i++)
205 {
206 rxvt_font *f = (*fs)[fs->find_font_idx (chr[i])];
207 fname[i] = rxvt_utf8towcs (f->name);
208 max_it (width, wcswidth (fname[i], wcslen (fname[i])));
209 }
210
211 max_it (width, strlen (attr));
212
213 if (y >= 0)
214 {
215 y = (y >= nrow - len - 5 && x < width + 2) ? 0 : -1;
216 x = 0;
217 }
218
219 scr_overlay_new (x, y, width, len * 2 + 2);
220
221 scr_overlay_set (0, 0, rowcol);
222
223 r = SET_STYLE (OVERLAY_RSTYLE, GET_STYLE (r));
224
225 for (int y = 0; y < len; y++)
226 {
227 char buf[9];
228
229 ch = *chr++;
230
231 sprintf (buf, "%8x", ch);
232 scr_overlay_set (0, y + 1, buf);
233 scr_overlay_set (9, y + 1, '=');
234# if !UNICODE_3
235 if (ch >= 0x10000)
236 ch = 0xfffd;
237# endif
238 scr_overlay_set (11, y + 1, ch, r);
239
240 if (WCWIDTH (ch) >= 2)
241 scr_overlay_set (12, y + 1, NOCHAR, r);
242 }
243
244// {
245// char buf[4+4+3+1];
246// snprintf (buf, sizeof (buf), "(%.4d|%.4d)", x, y);
247// scr_overlay_set (0, 0, buf);
248// }
249 scr_overlay_set (0, len + 1, attr);
250 for (int i = 0; i < len; i++)
251 {
252 scr_overlay_set (0, len + 2 + i, fname[i]);
253 free (fname[i]);
254 }
255
256# if ENABLE_COMBINING
257 if (alloc)
258 delete [] alloc;
259# endif
260}
261#endif
262
263void ecb_cold
264rxvt_term::commit_iso14755 ()
265{
266 wchar_t ch = iso14755buf & ISO_14755_MASK;
267
268 if (iso14755buf & ISO_14755_51)
269 {
270 char mb[MB_LEN_MAX];
271 int len;
272
273 // allow verbatim 0-bytes and control-bytes to be entered
274 if (ch >= 0x20)
275 len = wctomb (mb, ch);
276 else
277 {
278 mb[0] = ch;
279 len = 1;
280 }
281
282 if (len > 0)
283 tt_write (mb, len);
284 else
285 scr_bell ();
286 }
287
288 iso14755buf = 0;
289}
290
291static int ecb_cold
292hex_keyval (XKeyEvent &ev)
293{
294 // check whether this event corresponds to a hex digit
295 // if the modifiers had not been pressed.
296 for (int index = 0; index < 8; index++)
297 {
298 KeySym k = XLookupKeysym (&ev, index);
299
300 if (k >= XK_KP_0 && k <= XK_KP_9) return k - XK_KP_0;
301 else if (k >= XK_0 && k <= XK_9) return k - XK_0;
302 else if (k >= XK_a && k <= XK_f) return k - XK_a + 10;
303 else if (k >= XK_A && k <= XK_F) return k - XK_A + 10;
304 }
305
306 return -1;
307}
308#endif
309
310static inline KeySym ecb_cold
311translate_keypad (KeySym keysym, bool kp)
312{
313#ifdef XK_KP_Home
314 static const KeySym keypadtrans[] = {
315 XK_KP_7, // XK_KP_Home
316 XK_KP_4, // XK_KP_Left
317 XK_KP_8, // XK_KP_Up
318 XK_KP_6, // XK_KP_Right
319 XK_KP_2, // XK_KP_Down
320 XK_KP_9, // XK_KP_Prior
321 XK_KP_3, // XK_KP_Next
322 XK_KP_1, // XK_KP_End
323 XK_KP_5, // XK_KP_Begin
324 };
325
326 if (IN_RANGE_INC (keysym, XK_KP_Home, XK_KP_Begin))
327 {
328 unsigned int index = keysym - XK_KP_Home;
329 keysym = kp ? keypadtrans[index] : XK_Home + index;
330 }
331 else if (keysym == XK_KP_Insert)
332 keysym = kp ? XK_KP_0 : XK_Insert;
333# ifndef NO_DELETE_KEY
334 else if (keysym == XK_KP_Delete)
335 keysym = kp ? XK_KP_Decimal : XK_Delete;
336# endif
337#endif
338 return keysym;
339}
340
341static inline int ecb_cold
342map_function_key (KeySym keysym)
343{
344 int param = 0;
345
346 if (IN_RANGE_INC (keysym, XK_F1, XK_F35))
347 {
348 param = 11 + keysym - XK_F1;
349 if (keysym >= XK_F17)
350 param += 4;
351 else if (keysym >= XK_F15)
352 param += 3;
353 else if (keysym >= XK_F11)
354 param += 2;
355 else if (keysym >= XK_F6)
356 param += 1;
357 }
358 else
359 switch (keysym)
360 {
361 case XK_Find:
362 param = 1;
363 break;
364 case XK_Insert:
365 param = 2;
366 break;
367#ifdef DXK_Remove
368 case DXK_Remove:
369#endif
370 case XK_Execute:
371 param = 3;
372 break;
373 case XK_Select:
374 param = 4;
375 break;
376 case XK_Prior:
377 param = 5;
378 break;
379 case XK_Next:
380 param = 6;
381 break;
382 case XK_Home:
383 param = 7;
384 break;
385 case XK_End:
386 param = 8;
387 break;
388 case XK_Help:
389 param = 28;
390 break;
391 case XK_Menu:
392 param = 29;
393 break;
394 }
395 return param;
396}
397
398static inline wchar_t *
399rxvt_wcsdup (const wchar_t *str, int len)
400{
401 wchar_t *r = (wchar_t *)rxvt_malloc ((len + 1) * sizeof (wchar_t));
402 memcpy (r, str, len * sizeof (wchar_t));
403 r[len] = 0;
404 return r;
405}
406
407void ecb_cold
408rxvt_term::key_press (XKeyEvent &ev)
409{
410 int ctrl, meta, shft, len;
411 KeySym keysym = NoSymbol;
412 char rkbuf[KBUFSZ + 1];
413 char *kbuf = rkbuf + 1;
414
415#if ISO_14755
416 if (iso14755buf & ISO_14755_52)
417 return;
418#endif
68 419
69 /* 420 /*
70 * use Num_Lock to toggle Keypad on/off. If Num_Lock is off, allow an 421 * use Num_Lock to toggle Keypad on/off. If Num_Lock is off, allow an
71 * escape sequence to toggle the Keypad. 422 * escape sequence to toggle the Keypad.
72 * 423 *
73 * Always permit `shift' to override the current setting 424 * Always permit `shift' to override the current setting
74 */ 425 */
75 shft = (ev.state & ShiftMask); 426 shft = ev.state & ShiftMask;
76 ctrl = (ev.state & ControlMask); 427 ctrl = ev.state & ControlMask;
77 meta = (ev.state & ModMetaMask); 428 meta = ev.state & ModMetaMask;
78
79 if (numlock_state || (ev.state & ModNumLockMask))
80 {
81 numlock_state = (ev.state & ModNumLockMask);
82 PrivMode((!numlock_state), PrivMode_aplKP);
83 }
84 429
85 kbuf[0] = 0; 430 kbuf[0] = 0;
86 431
87#ifdef USE_XIM 432#if USE_XIM
88 if (Input_Context) 433 if (Input_Context)
89 { 434 {
90 Status status_return; 435 Status status_return;
91 436
437#if 0
92#ifdef X_HAVE_UTF8_STRING 438#ifdef X_HAVE_UTF8_STRING
93 if (enc_utf8 && 0) 439 if (enc_utf8 && 0) // currently disabled, doesn't seem to work, nor is useful
94 len = Xutf8LookupString (Input_Context, &ev, (char *)kbuf, 440 len = Xutf8LookupString (Input_Context, &ev, kbuf,
95 KBUFSZ, &keysym, &status_return); 441 KBUFSZ, &keysym, &status_return);
96 else 442 else
97#endif 443#endif
98 444#endif
99 { 445 {
100 wchar_t wkbuf[KBUFSZ + 1]; 446 wchar_t wkbuf[KBUFSZ + 1];
101 447
102 // the XOpenIM manpage lies about hardcoding the locale 448 // the XOpenIM manpage lies about hardcoding the locale
103 // at the point of XOpenIM, so temporarily switch locales 449 // at the point of XOpenIM, so temporarily switch locales
104 if (rs[Rs_imLocale]) 450 if (rs[Rs_imLocale])
105 SET_LOCALE (rs[Rs_imLocale]); 451 SET_LOCALE (rs[Rs_imLocale]);
452
106 // assume wchar_t == unicode or better 453 // assume wchar_t == unicode or better
107 len = XwcLookupString (Input_Context, &ev, wkbuf, 454 len = XwcLookupString (Input_Context, &ev, wkbuf,
108 KBUFSZ, &keysym, &status_return); 455 KBUFSZ, &keysym, &status_return);
456
109 if (rs[Rs_imLocale]) 457 if (rs[Rs_imLocale])
110 SET_LOCALE (locale); 458 SET_LOCALE (locale);
111 459
112 if (status_return == XLookupChars 460 if (status_return == XLookupChars
113 || status_return == XLookupBoth) 461 || status_return == XLookupBoth)
114 { 462 {
463 /* make sure the user can type ctrl-@, i.e. NUL */
464 if (len == 1 && *wkbuf == 0)
465 {
466 kbuf[0] = 0;
467 len = 1;
468 }
469 else
470 {
115 wkbuf[len] = 0; 471 wkbuf[len] = 0;
116 len = wcstombs ((char *)kbuf, wkbuf, KBUFSZ); 472 len = wcstombs ((char *)kbuf, wkbuf, KBUFSZ);
117 if (len < 0) 473 if (len < 0)
118 len = 0; 474 len = 0;
475 }
119 } 476 }
120 else 477 else
121 len = 0; 478 len = 0;
122 } 479 }
123
124 valid_keysym = status_return == XLookupKeySym
125 || status_return == XLookupBoth;
126 } 480 }
127 else 481 else
128#endif 482#endif
129
130 { 483 {
131 len = XLookupString (&ev, (char *)kbuf, KBUFSZ, &keysym, &compose); 484 len = XLookupString (&ev, kbuf, KBUFSZ, &keysym, &compose);
132 valid_keysym = !len;
133 }
134
135 if (valid_keysym)
136 { 485 }
137 /* for some backwards compatibility */ 486
138#if defined(HOTKEY_CTRL) || defined(HOTKEY_META) 487 if (keysym != NoSymbol)
139# ifdef HOTKEY_CTRL 488 {
140 if (ctrl) 489 KeySym orig_keysym = keysym;
141# else 490
142 if (meta) 491 /* Shift + F1 - F10 generates F11 - F20 */
143# endif 492 if (shft && keysym >= XK_F1 && keysym <= XK_F10)
493 {
494 keysym += (XK_F11 - XK_F1);
495 shft = 0; /* turn off Shift */
144 { 496 }
145 if (keysym == ks_bigfont) 497
498 if (keysym >= 0xFF00 && keysym <= 0xFFFF)
499 {
500 bool kp = priv_modes & PrivMode_aplKP ? !shft : shft;
501 unsigned int newlen = 1;
502
503 if (ev.state & ModNumLockMask)
504 kp = false;
505
506 keysym = translate_keypad (keysym, kp);
507
508 switch (keysym)
146 { 509 {
147 change_font (0, FONT_UP); 510#ifndef NO_BACKSPACE_KEY
511 case XK_BackSpace:
512 if (priv_modes & PrivMode_HaveBackSpace)
513 {
514 kbuf[0] = (!! (priv_modes & PrivMode_BackSpace)
515 ^ !!ctrl) ? '\b' : '\177';
516 kbuf[1] = '\0';
517 }
518 else
519 strcpy (kbuf, rs[Rs_backspace_key]);
148 return; 520 break;
521#endif
522#ifndef NO_DELETE_KEY
523 case XK_Delete:
524 strcpy (kbuf, rs[Rs_delete_key]);
525 break;
526#endif
527 case XK_Tab:
528 if (shft)
529 strcpy (kbuf, "\033[Z");
530 else
531 {
532#ifdef CTRL_TAB_MAKES_META
533 if (ctrl)
534 meta = 1;
535#endif
536#ifdef MOD4_TAB_MAKES_META
537 if (ev.state & Mod4Mask)
538 meta = 1;
539#endif
540 newlen = 0;
541 }
542 break;
543
544 case XK_Up: /* "\033[A" */
545 case XK_Down: /* "\033[B" */
546 case XK_Right: /* "\033[C" */
547 case XK_Left: /* "\033[D" */
548 strcpy (kbuf, "\033[Z");
549 kbuf[2] = "DACB"[keysym - XK_Left];
550 /* do Shift first */
551 if (shft)
552 kbuf[2] = "dacb"[keysym - XK_Left];
553 else if (ctrl)
554 {
555 kbuf[1] = 'O';
556 kbuf[2] = "dacb"[keysym - XK_Left];
557 }
558 else if (priv_modes & PrivMode_aplCUR)
559 kbuf[1] = 'O';
560 break;
561
562 case XK_KP_Enter:
563 /* allow shift to override */
564 if (kp)
565 {
566 strcpy (kbuf, "\033OM");
567 break;
568 }
569
570 /* FALLTHROUGH */
571
572 case XK_Return:
573 if (priv_modes & PrivMode_LFNL)
574 {
575 kbuf[0] = '\015';
576 kbuf[1] = '\012';
577 kbuf[2] = '\0';
578 }
579 else
580 {
581 kbuf[0] = '\015';
582 kbuf[1] = '\0';
583 }
584 break;
585
586 case XK_KP_F1: /* "\033OP" */
587 case XK_KP_F2: /* "\033OQ" */
588 case XK_KP_F3: /* "\033OR" */
589 case XK_KP_F4: /* "\033OS" */
590 strcpy (kbuf, "\033OP");
591 kbuf[2] += (keysym - XK_KP_F1);
592 break;
593
594 case XK_KP_Multiply: /* "\033Oj" : "*" */
595 case XK_KP_Add: /* "\033Ok" : "+" */
596 case XK_KP_Separator: /* "\033Ol" : "," */
597 case XK_KP_Subtract: /* "\033Om" : "-" */
598 case XK_KP_Decimal: /* "\033On" : "." */
599 case XK_KP_Divide: /* "\033Oo" : "/" */
600 case XK_KP_0: /* "\033Op" : "0" */
601 case XK_KP_1: /* "\033Oq" : "1" */
602 case XK_KP_2: /* "\033Or" : "2" */
603 case XK_KP_3: /* "\033Os" : "3" */
604 case XK_KP_4: /* "\033Ot" : "4" */
605 case XK_KP_5: /* "\033Ou" : "5" */
606 case XK_KP_6: /* "\033Ov" : "6" */
607 case XK_KP_7: /* "\033Ow" : "7" */
608 case XK_KP_8: /* "\033Ox" : "8" */
609 case XK_KP_9: /* "\033Oy" : "9" */
610 /* allow shift to override */
611 if (kp)
612 {
613 strcpy (kbuf, "\033Oj");
614 kbuf[2] += (keysym - XK_KP_Multiply);
615 }
616 else
617 {
618 kbuf[0] = ('*' + (keysym - XK_KP_Multiply));
619 kbuf[1] = '\0';
620 }
621 break;
622
623 default:
624 {
625 int param = map_function_key (keysym);
626 if (param > 0)
627 sprintf (kbuf,"\033[%d~", param);
628 else
629 newlen = 0;
630 }
631 break;
149 } 632 }
150 else if (keysym == ks_smallfont) 633
634 if (newlen)
635 len = strlen (kbuf);
636
637 if (len > 0)
151 { 638 {
152 change_font (0, FONT_DN);
153 return; 639 /*
640 * pass Shift/Control indicators for function keys ending with `~'
641 *
642 * eg,
643 * Prior = "ESC[5~"
644 * Shift+Prior = "ESC[5$"
645 * Ctrl+Prior = "ESC[5^"
646 * Ctrl+Shift+Prior = "ESC[5@"
647 */
648 if (kbuf[0] == C0_ESC && kbuf[1] == '[' && kbuf[len - 1] == '~')
649 kbuf[len - 1] = (shft ? (ctrl ? '@' : '$') : (ctrl ? '^' : '~'));
650
651 /*
652 * Pass meta for all function keys, if 'meta' option set
653 */
654#ifdef META8_OPTION
655 if (meta && (meta_char == 0x80))
656 kbuf[len - 1] |= 0x80;
657#endif
154 } 658 }
659
660 }
661 else if (ctrl && keysym == XK_minus)
155 } 662 {
156#endif 663 len = 1;
664 kbuf[0] = '\037'; /* Ctrl-Minus generates ^_ (31) */
665 }
666 else if (keysym == XK_ISO_Left_Tab)
667 {
668 strcpy (kbuf, "\033[Z");
669 len = 3;
670 }
671 else
672 {
673#ifdef META8_OPTION
674 /* set 8-bit on */
675 if (meta && (meta_char == 0x80))
676 {
677 char *ch;
157 678
679 for (ch = kbuf; ch < kbuf + len; ch++)
680 *ch |= 0x80;
681 }
682#endif
683 /* nil */ ;
684 }
685
686 keysym = orig_keysym;
687 }
688
689 /* escape prefix */
690 if (len && meta
691#ifdef META8_OPTION
692 && meta_char == C0_ESC
693#endif
694 )
695 {
696 *--kbuf = C0_ESC;
697 len++;
698 }
699
700 if (HOOK_INVOKE ((this, HOOK_KEY_PRESS, DT_XEVENT, &ev, DT_INT, keysym, DT_STR_LEN, kbuf, len, DT_END)))
701 return;
702
703 if (keysym != NoSymbol)
704 {
705#ifdef KEYSYM_RESOURCE
706 if (keyboard->dispatch (this, keysym, ev.state, kbuf, len))
707 return;
708#endif
709
158 if (TermWin.saveLines) 710 if (saveLines)
159 { 711 {
160#ifdef UNSHIFTED_SCROLLKEYS 712#ifdef UNSHIFTED_SCROLLKEYS
161 if (!ctrl && !meta) 713 if (!ctrl && !meta)
162 {
163#else 714#else
164 if (IS_SCROLL_MOD) 715 if (IS_SCROLL_MOD)
716#endif
165 { 717 {
166#endif
167 int lnsppg; 718 int lnsppg;
168 719
169#ifdef PAGING_CONTEXT_LINES 720#ifdef PAGING_CONTEXT_LINES
170 lnsppg = TermWin.nrow - PAGING_CONTEXT_LINES; 721 lnsppg = nrow - PAGING_CONTEXT_LINES;
171#else 722#else
172 lnsppg = TermWin.nrow * 4 / 5; 723 lnsppg = nrow * 4 / 5;
173#endif 724#endif
725 max_it (lnsppg, 1);
726
174 if (keysym == XK_Prior) 727 if (keysym == XK_Prior)
175 { 728 {
176 scr_page (UP, lnsppg); 729 scr_page (lnsppg);
177 return; 730 return;
178 } 731 }
179 else if (keysym == XK_Next) 732 else if (keysym == XK_Next)
180 { 733 {
181 scr_page (DN, lnsppg); 734 scr_page (-lnsppg);
182 return; 735 return;
183 } 736 }
184 } 737 }
185#ifdef SCROLL_ON_UPDOWN_KEYS 738#ifdef SCROLL_ON_UPDOWN_KEYS
186 if (IS_SCROLL_MOD) 739 if (IS_SCROLL_MOD)
187 { 740 {
188 if (keysym == XK_Up) 741 if (keysym == XK_Up)
189 { 742 {
190 scr_page (UP, 1); 743 scr_page (1);
191 return; 744 return;
192 } 745 }
193 else if (keysym == XK_Down) 746 else if (keysym == XK_Down)
194 { 747 {
195 scr_page (DN, 1); 748 scr_page (-1);
196 return; 749 return;
197 } 750 }
198 } 751 }
199#endif 752#endif
200#ifdef SCROLL_ON_HOMEEND_KEYS 753#ifdef SCROLL_ON_HOMEEND_KEYS
201 if (IS_SCROLL_MOD) 754 if (IS_SCROLL_MOD)
202 { 755 {
203 if (keysym == XK_Home) 756 if (keysym == XK_Home)
204 { 757 {
205 scr_move_to (0, 1); 758 scr_changeview (top_row);
206 return; 759 return;
207 } 760 }
208 else if (keysym == XK_End) 761 else if (keysym == XK_End)
209 { 762 {
210 scr_move_to (1, 0); 763 scr_changeview (0);
211 return; 764 return;
212 } 765 }
213 } 766 }
214#endif 767#endif
215
216 } 768 }
217 769
218 if (shft) 770 if (shft)
219 { 771 {
220 /* Shift + F1 - F10 generates F11 - F20 */
221 if (keysym >= XK_F1 && keysym <= XK_F10)
222 {
223 keysym += (XK_F11 - XK_F1);
224 shft = 0; /* turn off Shift */
225 }
226 else if (!ctrl && !meta && (PrivateModes & PrivMode_ShiftKeys)) 772 if (!ctrl && !meta && (priv_modes & PrivMode_ShiftKeys))
227 { 773 {
228 switch (keysym) 774 switch (keysym)
229 { 775 {
230 /* normal XTerm key bindings */ 776 /* normal XTerm key bindings */
231 case XK_Insert: /* Shift+Insert = paste mouse selection */ 777 case XK_Insert: /* Shift+Insert = paste mouse selection */
232 selection_request (ev.time, 0, 0); 778 selection_request (ev.time);
233 return; 779 return;
780#if TODO
234 /* rxvt extras */ 781 /* rxvt extras */
235 case XK_KP_Add: /* Shift+KP_Add = bigger font */ 782 case XK_KP_Add: /* Shift+KP_Add = bigger font */
236 change_font (0, FONT_UP);
237 return; 783 return;
238 case XK_KP_Subtract: /* Shift+KP_Subtract = smaller font */ 784 case XK_KP_Subtract: /* Shift+KP_Subtract = smaller font */
239 change_font (0, FONT_DN);
240 return; 785 return;
786#endif
241 } 787 }
242 } 788 }
243 } 789 }
244#ifdef PRINTPIPE 790
791 if (ctrl && meta && (keysym == XK_c || keysym == XK_v))
792 {
245 if (keysym == XK_Print) 793 if (keysym == XK_v)
794 selection_request (ev.time, Sel_Clipboard);
795 else if (selection.len > 0)
246 { 796 {
247 scr_printscreen (ctrl | shft); 797 free (selection.clip_text);
798 selection.clip_text = rxvt_wcsdup (selection.text, selection.len);
799 selection.clip_len = selection.len;
800 selection_grab (CurrentTime, true);
801 }
802
248 return; 803 return;
249 } 804 }
250#endif 805
251#ifdef GREEK_SUPPORT 806#if ENABLE_FRILLS || ISO_14755
252 if (keysym == ks_greekmodeswith) 807 // ISO 14755 support
808 if (iso14755buf & (ISO_14755_STARTED | ISO_14755_51))
253 { 809 {
254 greek_mode = !greek_mode; 810 int hv;
255 if (greek_mode) 811
812 if (iso14755buf & ISO_14755_51
813 && (keysym == XK_space || keysym == XK_KP_Space
814 || keysym == XK_Return || keysym == XK_KP_Enter))
256 { 815 {
257 xterm_seq (XTerm_title, 816 commit_iso14755 ();
258 (greek_getmode() == GREEK_ELOT928 817 iso14755buf = ISO_14755_51;
259 ? "[Greek: iso]" : "[Greek: ibm]"), CHAR_ST); 818# if ISO_14755
260 greek_reset(); 819 iso14755_51 (0);
820# endif
821 return;
261 } 822 }
262 else 823 else if (keysym == XK_BackSpace)
263 xterm_seq (XTerm_title, APL_NAME "-" VERSION, CHAR_ST);
264 return;
265 }
266#endif
267
268 if (keysym >= 0xFF00 && keysym <= 0xFFFF)
269 {
270#ifdef KEYSYM_RESOURCE
271 if (!(shft | ctrl) && Keysym_map[keysym & 0xFF] != NULL)
272 { 824 {
273 unsigned int l; 825 iso14755buf = ((iso14755buf & ISO_14755_MASK) >> 4) | ISO_14755_51;
274 const unsigned char *kbuf0; 826# if ISO_14755
275 const unsigned char ch = C0_ESC; 827 iso14755_51 (iso14755buf & ISO_14755_MASK);
276
277 kbuf0 = (Keysym_map[keysym & 0xFF]);
278 l = (unsigned int)*kbuf0++;
279
280 /* escape prefix */
281 if (meta)
282# ifdef META8_OPTION
283 if (meta_char == C0_ESC)
284# endif 828# endif
285 tt_write (&ch, 1); 829 return;
286 tt_write (kbuf0, l); 830 }
831 else if ((hv = hex_keyval (ev)) >= 0)
832 {
833 iso14755buf = ((iso14755buf << 4) & ISO_14755_MASK)
834 | hv | ISO_14755_51;
835# if ISO_14755
836 iso14755_51 (iso14755buf & ISO_14755_MASK);
837# endif
287 return; 838 return;
288 } 839 }
289 else 840 else
290#endif
291
292 { 841 {
293 newlen = 1; 842# if ISO_14755
294 switch (keysym) 843 scr_overlay_off ();
295 {
296#ifndef NO_BACKSPACE_KEY
297 case XK_BackSpace:
298 if (PrivateModes & PrivMode_HaveBackSpace)
299 {
300 kbuf[0] = (!!(PrivateModes & PrivMode_BackSpace)
301 ^ !!ctrl) ? '\b' : '\177';
302 kbuf[1] = '\0';
303 }
304 else
305 STRCPY(kbuf, key_backspace);
306# ifdef MULTICHAR_SET
307 if ((Options & Opt_mc_hack) && screen.cur.col > 0)
308 {
309 int col, row;
310
311 newlen = STRLEN(kbuf);
312 col = screen.cur.col - 1;
313 row = screen.cur.row + TermWin.saveLines;
314 if (IS_MULTI2(screen.rend[row][col]))
315 MEMMOVE(kbuf + newlen, kbuf, newlen + 1);
316 }
317# endif 844# endif
318 break; 845 iso14755buf = 0;
319#endif 846 }
320#ifndef NO_DELETE_KEY 847 }
321 case XK_Delete: 848 else if (option (Opt_iso14755) &&
322 STRCPY(kbuf, key_delete); 849 ((ctrl && (keysym == XK_Shift_L || keysym == XK_Shift_R))
323# ifdef MULTICHAR_SET 850 || (shft && (keysym == XK_Control_L || keysym == XK_Control_R))))
324 if (Options & Opt_mc_hack) 851 if (!(iso14755buf & ISO_14755_STARTED))
325 { 852 {
326 int col, row; 853 iso14755buf |= ISO_14755_STARTED;
327 854# if ISO_14755
328 newlen = STRLEN(kbuf); 855 scr_overlay_new (0, -1, sizeof ("ISO 14755 mode") - 1, 1);
329 col = screen.cur.col; 856 scr_overlay_set (0, 0, "ISO 14755 mode");
330 row = screen.cur.row + TermWin.saveLines;
331 if (IS_MULTI1(screen.rend[row][col]))
332 MEMMOVE(kbuf + newlen, kbuf, newlen + 1);
333 }
334# endif 857# endif
335 break; 858 }
336#endif
337 case XK_Tab:
338 if (shft)
339 STRCPY(kbuf, "\033[Z");
340 else
341 {
342#ifdef CTRL_TAB_MAKES_META
343 if (ctrl)
344 meta = 1;
345#endif
346#ifdef MOD4_TAB_MAKES_META
347 if (ev.state & Mod4Mask)
348 meta = 1;
349#endif
350 newlen = 0;
351 }
352 break;
353
354
355#ifdef XK_KP_Left
356 case XK_KP_Up: /* \033Ox or standard */
357 case XK_KP_Down: /* \033Or or standard */
358 case XK_KP_Right: /* \033Ov or standard */
359 case XK_KP_Left: /* \033Ot or standard */
360 if ((PrivateModes & PrivMode_aplKP) ? !shft : shft)
361 {
362 STRCPY(kbuf, "\033OZ");
363 kbuf[2] = ("txvr"[keysym - XK_KP_Left]);
364 break;
365 }
366 else
367 /* translate to std. cursor key */
368 keysym = XK_Left + (keysym - XK_KP_Left);
369 /* FALLTHROUGH */
370#endif
371 case XK_Up: /* "\033[A" */
372 case XK_Down: /* "\033[B" */
373 case XK_Right: /* "\033[C" */
374 case XK_Left: /* "\033[D" */
375 STRCPY(kbuf, "\033[Z");
376 kbuf[2] = ("DACB"[keysym - XK_Left]);
377 /* do Shift first */
378 if (shft)
379 kbuf[2] = ("dacb"[keysym - XK_Left]);
380 else if (ctrl)
381 {
382 kbuf[1] = 'O';
383 kbuf[2] = ("dacb"[keysym - XK_Left]);
384 }
385 else if (PrivateModes & PrivMode_aplCUR)
386 kbuf[1] = 'O';
387#ifdef MULTICHAR_SET
388 //TODO: ??
389 if (Options & Opt_mc_hack)
390 {
391 int col, row, m;
392
393 col = screen.cur.col;
394 row = screen.cur.row + TermWin.saveLines;
395 m = 0;
396 if (keysym == XK_Right
397 && IS_MULTI1(screen.rend[row][col]))
398 m = 1;
399 else if (keysym == XK_Left)
400 {
401 if (col > 0)
402 {
403 if (IS_MULTI2(screen.rend[row][col - 1]))
404 m = 1;
405 }
406 else if (screen.cur.row > 0)
407 {
408 col = screen.tlen[--row];
409 if (col == -1)
410 col = TermWin.ncol - 1;
411 else
412 col--;
413 if (col > 0
414 && IS_MULTI2(screen.rend[row][col]))
415 m = 1;
416 }
417 }
418 if (m)
419 MEMMOVE(kbuf + 3, kbuf, 3 + 1);
420 }
421#endif
422 break;
423
424#ifndef UNSHIFTED_SCROLLKEYS
425# ifdef XK_KP_Prior
426 case XK_KP_Prior:
427 /* allow shift to override */
428 if ((PrivateModes & PrivMode_aplKP) ? !shft : shft)
429 {
430 STRCPY(kbuf, "\033Oy");
431 break;
432 }
433 /* FALLTHROUGH */
434# endif 859#endif
435 case XK_Prior: 860
436 STRCPY(kbuf, "\033[5~"); 861#ifdef PRINTPIPE
437 break; 862 if (keysym == XK_Print)
438# ifdef XK_KP_Next 863 {
439 case XK_KP_Next: 864 scr_printscreen (ctrl | shft);
440 /* allow shift to override */ 865 return;
441 if ((PrivateModes & PrivMode_aplKP) ? !shft : shft) 866 }
442 {
443 STRCPY(kbuf, "\033Os");
444 break;
445 }
446 /* FALLTHROUGH */
447# endif 867#endif
448 case XK_Next:
449 STRCPY(kbuf, "\033[6~");
450 break;
451#endif
452 case XK_KP_Enter:
453 /* allow shift to override */
454 if ((PrivateModes & PrivMode_aplKP) ? !shft : shft)
455 {
456 STRCPY(kbuf, "\033OM");
457 }
458 else
459 {
460 kbuf[0] = '\r';
461 kbuf[1] = '\0';
462 }
463 break;
464
465#ifdef XK_KP_Begin
466 case XK_KP_Begin:
467 STRCPY(kbuf, "\033Ou");
468 break;
469
470 case XK_KP_Insert:
471 STRCPY(kbuf, "\033Op");
472 break;
473
474 case XK_KP_Delete:
475 STRCPY(kbuf, "\033On");
476 break;
477#endif
478 case XK_KP_F1: /* "\033OP" */
479 case XK_KP_F2: /* "\033OQ" */
480 case XK_KP_F3: /* "\033OR" */
481 case XK_KP_F4: /* "\033OS" */
482 STRCPY(kbuf, "\033OP");
483 kbuf[2] += (keysym - XK_KP_F1);
484 break;
485
486 case XK_KP_Multiply: /* "\033Oj" : "*" */
487 case XK_KP_Add: /* "\033Ok" : "+" */
488 case XK_KP_Separator: /* "\033Ol" : "," */
489 case XK_KP_Subtract: /* "\033Om" : "-" */
490 case XK_KP_Decimal: /* "\033On" : "." */
491 case XK_KP_Divide: /* "\033Oo" : "/" */
492 case XK_KP_0: /* "\033Op" : "0" */
493 case XK_KP_1: /* "\033Oq" : "1" */
494 case XK_KP_2: /* "\033Or" : "2" */
495 case XK_KP_3: /* "\033Os" : "3" */
496 case XK_KP_4: /* "\033Ot" : "4" */
497 case XK_KP_5: /* "\033Ou" : "5" */
498 case XK_KP_6: /* "\033Ov" : "6" */
499 case XK_KP_7: /* "\033Ow" : "7" */
500 case XK_KP_8: /* "\033Ox" : "8" */
501 case XK_KP_9: /* "\033Oy" : "9" */
502 /* allow shift to override */
503 if ((PrivateModes & PrivMode_aplKP) ? !shft : shft)
504 {
505 STRCPY(kbuf, "\033Oj");
506 kbuf[2] += (keysym - XK_KP_Multiply);
507 }
508 else
509 {
510 kbuf[0] = ('*' + (keysym - XK_KP_Multiply));
511 kbuf[1] = '\0';
512 }
513 break;
514
515 case XK_Find:
516 STRCPY(kbuf, "\033[1~");
517 break;
518 case XK_Insert:
519 STRCPY(kbuf, "\033[2~");
520 break;
521#ifdef DXK_Remove /* support for DEC remove like key */
522 case DXK_Remove:
523 /* FALLTHROUGH */
524#endif
525 case XK_Execute:
526 STRCPY(kbuf, "\033[3~");
527 break;
528 case XK_Select:
529 STRCPY(kbuf, "\033[4~");
530 break;
531#ifdef XK_KP_End
532 case XK_KP_End:
533 /* allow shift to override */
534 if ((PrivateModes & PrivMode_aplKP) ? !shft : shft)
535 {
536 STRCPY(kbuf, "\033Oq");
537 break;
538 }
539 /* FALLTHROUGH */
540#endif
541 case XK_End:
542 STRCPY(kbuf, KS_END);
543 break;
544#ifdef XK_KP_Home
545 case XK_KP_Home:
546 /* allow shift to override */
547 if ((PrivateModes & PrivMode_aplKP) ? !shft : shft)
548 {
549 STRCPY(kbuf, "\033Ow");
550 break;
551 }
552 /* FALLTHROUGH */
553#endif
554 case XK_Home:
555 STRCPY(kbuf, KS_HOME);
556 break;
557
558#define FKEY(n, fkey) \
559 sprintf((char *)kbuf,"\033[%2d~", (int)((n) + (keysym - fkey)))
560
561 case XK_F1: /* "\033[11~" */
562 case XK_F2: /* "\033[12~" */
563 case XK_F3: /* "\033[13~" */
564 case XK_F4: /* "\033[14~" */
565 case XK_F5: /* "\033[15~" */
566 FKEY(11, XK_F1);
567 break;
568 case XK_F6: /* "\033[17~" */
569 case XK_F7: /* "\033[18~" */
570 case XK_F8: /* "\033[19~" */
571 case XK_F9: /* "\033[20~" */
572 case XK_F10: /* "\033[21~" */
573 FKEY(17, XK_F6);
574 break;
575 case XK_F11: /* "\033[23~" */
576 case XK_F12: /* "\033[24~" */
577 case XK_F13: /* "\033[25~" */
578 case XK_F14: /* "\033[26~" */
579 FKEY(23, XK_F11);
580 break;
581 case XK_F15: /* "\033[28~" */
582 case XK_F16: /* "\033[29~" */
583 FKEY(28, XK_F15);
584 break;
585 case XK_Help: /* "\033[28~" */
586 FKEY(28, XK_Help);
587 break;
588 case XK_Menu: /* "\033[29~" */
589 FKEY(29, XK_Menu);
590 break;
591 case XK_F17: /* "\033[31~" */
592 case XK_F18: /* "\033[32~" */
593 case XK_F19: /* "\033[33~" */
594 case XK_F20: /* "\033[34~" */
595 case XK_F21: /* "\033[35~" */
596 case XK_F22: /* "\033[36~" */
597 case XK_F23: /* "\033[37~" */
598 case XK_F24: /* "\033[38~" */
599 case XK_F25: /* "\033[39~" */
600 case XK_F26: /* "\033[40~" */
601 case XK_F27: /* "\033[41~" */
602 case XK_F28: /* "\033[42~" */
603 case XK_F29: /* "\033[43~" */
604 case XK_F30: /* "\033[44~" */
605 case XK_F31: /* "\033[45~" */
606 case XK_F32: /* "\033[46~" */
607 case XK_F33: /* "\033[47~" */
608 case XK_F34: /* "\033[48~" */
609 case XK_F35: /* "\033[49~" */
610 FKEY(31, XK_F17);
611 break;
612#undef FKEY
613 default:
614 newlen = 0;
615 break;
616 }
617 if (newlen)
618 len = STRLEN(kbuf);
619 }
620 /*
621 * Pass meta for all function keys, if 'meta' option set
622 */
623#ifdef META8_OPTION
624 if (meta && (meta_char == 0x80) && len > 0)
625 kbuf[len - 1] |= 0x80;
626#endif
627
628 }
629 else if (ctrl && keysym == XK_minus)
630 {
631 len = 1;
632 kbuf[0] = '\037'; /* Ctrl-Minus generates ^_ (31) */
633 }
634 else
635 {
636#ifdef META8_OPTION
637 /* set 8-bit on */
638 if (meta && (meta_char == 0x80))
639 {
640 unsigned char *ch;
641
642 for (ch = kbuf; ch < kbuf + len; ch++)
643 *ch |= 0x80;
644 meta = 0;
645 }
646#endif
647#ifdef GREEK_SUPPORT
648 if (greek_mode)
649 len = greek_xlat(kbuf, len);
650#endif
651 /* nil */ ;
652 }
653 } 868 }
654 869
655 if (len <= 0) 870 if (len <= 0)
656 return; /* not mapped */ 871 return; /* not mapped */
657 872
658 if (Options & Opt_scrollTtyKeypress) 873 tt_write_user_input (kbuf, (unsigned int)len);
659 if (TermWin.view_start) 874}
875
876void ecb_cold
877rxvt_term::key_release (XKeyEvent &ev)
878{
879#if (MOUSE_WHEEL && MOUSE_SLIP_WHEELING) || ISO_14755 || ENABLE_PERL
880 KeySym keysym;
881
882 keysym = XLookupKeysym (&ev, ev.state & ShiftMask ? 1 : 0); // sorry, only shift supported :/
883#endif
884
885#if ENABLE_FRILLS || ISO_14755
886 // ISO 14755 support
887 if (iso14755buf)
888 if (iso14755buf & ISO_14755_52)
660 { 889 {
661 TermWin.view_start = 0; 890# if ISO_14755
662 want_refresh = 1; 891 scr_overlay_off ();
892# endif
893# if ISO_14755
894 // iso14755 part 5.2 handling: release time
895 // first: controls
896 if ((ev.state & ControlMask)
897 && ((keysym >= 0x40 && keysym <= 0x5f)
898 || (keysym >= 0x61 && keysym <= 0x7f)))
899 {
900 iso14755buf = ISO_14755_51 | 0x2400 | (keysym & 0x1f);
901 commit_iso14755 ();
902
903 return;
904 }
905
906 for (unsigned short *i = iso14755_symtab; i[0]; i += 2)
907 if (i[0] == keysym)
908 {
909 iso14755buf = ISO_14755_51 | i[1];
910 commit_iso14755 ();
911
912 return;
913 }
914
915 scr_bell ();
916# endif
917 iso14755buf = 0;
918
919 return;
663 } 920 }
664 921 else if ((ev.state & (ShiftMask | ControlMask)) != (ShiftMask | ControlMask))
665 /* 922 {
666 * these modifications only affect the static keybuffer 923# if ISO_14755
667 * pass Shift/Control indicators for function keys ending with `~' 924 scr_overlay_off ();
668 *
669 * eg,
670 * Prior = "ESC[5~"
671 * Shift+Prior = "ESC[5$"
672 * Ctrl+Prior = "ESC[5^"
673 * Ctrl+Shift+Prior = "ESC[5@"
674 * Meta adds an Escape prefix (with META8_OPTION, if meta == <escape>).
675 */
676 if (kbuf[0] == C0_ESC && kbuf[1] == '[' && kbuf[len - 1] == '~')
677 kbuf[len - 1] = (shft ? (ctrl ? '@' : '$') : (ctrl ? '^' : '~'));
678
679 /* escape prefix */
680 if (meta
681#ifdef META8_OPTION
682 && (meta_char == C0_ESC)
683#endif 925# endif
684 ) 926 if (iso14755buf & ISO_14755_51)
685 { 927 commit_iso14755 ();
686 const unsigned char ch = C0_ESC; 928#if ISO_14755
929 else if (option (Opt_iso14755_52) && iso14755buf & ISO_14755_STARTED)
930 {
931 iso14755buf = ISO_14755_52; // iso14755 part 5.2: remember empty begin/end pair
687 932
688 tt_write(&ch, 1); 933 scr_overlay_new (0, -1, sizeof ("KEYCAP PICTURE INSERT MODE") - 1, 1);
934 scr_overlay_set (0, 0, "KEYCAP PICTURE INSERT MODE");
935 }
936# endif
937 else
938 iso14755buf = 0;
689 } 939 }
690#ifdef DEBUG_CMD 940#endif
691 if (debug_key)
692 { /* Display keyboard buffer contents */
693 char *p;
694 int i;
695 941
696 fprintf(stderr, "key 0x%04X [%d]: `", (unsigned int)keysym, len); 942 if (HOOK_INVOKE ((this, HOOK_KEY_RELEASE, DT_XEVENT, &ev, DT_INT, keysym, DT_END)))
697 for (i = 0, p = kbuf; i < len; i++, p++)
698 fprintf(stderr, (*p >= ' ' && *p < '\177' ? "%c" : "\\%03o"), *p);
699 fprintf(stderr, "'\n");
700 }
701#endif /* DEBUG_CMD */
702 tt_write (kbuf, (unsigned int)len);
703}
704/*}}} */
705
706#if (MENUBAR_MAX)
707/*{{{ rxvt_cmd_write(), rxvt_cmd_getc() */
708/* attempt to `write' count to the input buffer */
709unsigned int
710rxvt_term::cmd_write (const unsigned char *str, unsigned int count)
711{
712 unsigned int n, s;
713
714 n = cmdbuf_ptr - cmdbuf_base;
715 s = cmdbuf_base + BUFSIZ - 1 - cmdbuf_endp;
716 if (n > 0 && s < count)
717 {
718 MEMMOVE(cmdbuf_base, cmdbuf_ptr,
719 (unsigned int)(cmdbuf_endp - cmdbuf_ptr));
720 cmdbuf_ptr = cmdbuf_base;
721 cmdbuf_endp -= n;
722 s += n;
723 }
724 if (count > s)
725 {
726 rxvt_print_error("data loss: cmd_write too large");
727 count = s;
728 }
729 for (; count--;)
730 *cmdbuf_endp++ = *str++;
731 return 0; 943 return;
944
945#if defined(MOUSE_WHEEL) && defined(MOUSE_SLIP_WHEELING)
946 if (!(ev.state & ControlMask))
947 slip_wheel_ev.stop ();
948 else if (keysym == XK_Control_L || keysym == XK_Control_R)
949 mouse_slip_wheel_speed = 0;
950#endif
732} 951}
733#endif /* MENUBAR_MAX */
734 952
735void 953void
736rxvt_term::flush () 954rxvt_term::flush ()
737{ 955{
738#ifdef TRANSPARENT 956 flush_ev.stop ();
739 if (want_full_refresh) 957
958#ifdef HAVE_IMG
959 if (bg_flags & BG_NEEDS_REFRESH)
740 { 960 {
741 want_full_refresh = 0; 961 bg_flags &= ~BG_NEEDS_REFRESH;
742 scr_clear ();
743 scr_touch (false); 962 scr_touch (false);
744 want_refresh = 1;
745 } 963 }
746#endif 964#endif
747 965
748 if (want_refresh) 966 if (want_refresh)
749 { 967 {
968 if (SHOULD_INVOKE (HOOK_LINE_UPDATE))
969 {
970 int row = view_start;
971 int end_row = row + nrow;
972
973 while (row > top_row && ROW (row - 1).is_longer ())
974 --row;
975
976 do
977 {
978 int start_row = row;
979 line_t *l;
980
981 do
982 {
983 l = &ROW (row++);
984
985 if (!(l->f & LINE_FILTERED))
986 {
987 // line not filtered, mark it as filtered
988 l->f |= LINE_FILTERED;
989 while (l->is_longer ())
990 {
991 l = &ROW (row++);
992 l->f |= LINE_FILTERED;
993 }
994
995 // and filter it
996 HOOK_INVOKE ((this, HOOK_LINE_UPDATE, DT_INT, start_row, DT_END));
997
998 break;
999 }
1000 }
1001 while (l->is_longer () && row < end_row);
1002 }
1003 while (row < end_row);
1004 }
1005
750 scr_refresh (refresh_type); 1006 scr_refresh ();
751 scrollbar_show (1); 1007 scrollBar.show (1);
752#ifdef USE_XIM 1008#if USE_XIM
753 IMSendSpot (); 1009 im_send_spot ();
754#endif 1010#endif
755
756 } 1011 }
757 1012
758 XFlush (display->display); 1013 display->flush ();
759} 1014}
760 1015
1016/* checks whether a refresh is requested and starts the refresh timer */
761void 1017void
762rxvt_term::check_cb (check_watcher &w) 1018rxvt_term::refresh_check ()
763{ 1019{
764 SET_R (this); 1020 if (want_refresh && !flush_ev.is_active ())
765 SET_LOCALE (locale); 1021 flush_ev.start (1. / 60.); // refresh at max. 60 Hz normally
766 1022
1023 display->flush ();
1024}
1025
1026void
1027rxvt_term::flush_cb (ev::timer &w, int revents)
1028{
1029 make_current ();
1030
1031 refresh_count = 0;
767 flush (); 1032 flush ();
768} 1033}
769 1034
770#ifdef CURSOR_BLINK 1035#ifdef CURSOR_BLINK
771void 1036void
1037rxvt_term::cursor_blink_reset ()
1038{
1039 if (!focus)
1040 return;
1041
1042 if (hidden_cursor)
1043 {
1044 hidden_cursor = 0;
1045 want_refresh = 1;
1046 }
1047
1048 if (option (Opt_cursorBlink) || (priv_modes & PrivMode_BlinkingCursor))
1049 cursor_blink_ev.again ();
1050 else
1051 cursor_blink_ev.stop ();
1052}
1053
1054void
772rxvt_term::cursor_blink_cb (time_watcher &w) 1055rxvt_term::cursor_blink_cb (ev::timer &w, int revents)
773{ 1056{
774 hidden_cursor = !hidden_cursor; 1057 hidden_cursor = !hidden_cursor;
775 want_refresh = 1; 1058 want_refresh = 1;
776 1059 refresh_check ();
777 w.start (w.at + BLINK_INTERVAL);
778} 1060}
779#endif 1061#endif
780 1062
781#ifdef TEXT_BLINK 1063#ifdef TEXT_BLINK
782void 1064void
783rxvt_term::text_blink_cb (time_watcher &w) 1065rxvt_term::text_blink_cb (ev::timer &w, int revents)
784{ 1066{
785 if (scr_refresh_rend (RS_Blink, RS_Blink)) 1067 if (scr_refresh_rend (RS_Blink, RS_Blink))
786 { 1068 {
787 hidden_text = !hidden_text; 1069 hidden_text = !hidden_text;
788 want_refresh = 1; 1070 want_refresh = 1;
789 w.start (w.at + TEXT_BLINK_INTERVAL); 1071 refresh_check ();
1072 }
1073 else
1074 w.stop ();
1075}
1076#endif
1077
1078#ifndef NO_SCROLLBAR_BUTTON_CONTINUAL_SCROLLING
1079void
1080rxvt_term::cont_scroll_cb (ev::timer &w, int revents)
1081{
1082 if ((scrollBar.state == SB_STATE_UP || scrollBar.state == SB_STATE_DOWN)
1083 && scr_page (scrollBar.state == SB_STATE_UP ? UP : DN, 1))
790 } 1084 {
1085 want_refresh = 1;
1086 refresh_check ();
1087 }
1088 else
1089 w.stop ();
1090}
1091#endif
1092
1093#ifdef SELECTION_SCROLLING
1094void
1095rxvt_term::sel_scroll_cb (ev::timer &w, int revents)
1096{
1097 if (scr_page (scroll_selection_lines))
1098 {
1099 selection_extend (selection_save_x, selection_save_y, selection_save_state);
1100 want_refresh = 1;
1101 refresh_check ();
1102 }
1103 else
1104 w.stop ();
1105}
1106#endif
1107
1108#if defined(MOUSE_WHEEL) && defined(MOUSE_SLIP_WHEELING)
1109void
1110rxvt_term::slip_wheel_cb (ev::timer &w, int revents)
1111{
1112 if (scr_page (mouse_slip_wheel_speed))
1113 {
1114 want_refresh = 1;
1115 refresh_check ();
1116 }
1117
1118 if (view_start == top_row || view_start == 0 || mouse_slip_wheel_speed == 0)
1119 {
1120 mouse_slip_wheel_speed = 0;
1121 w.stop ();
1122 }
1123}
1124#endif
1125
1126#if LINUX_YIELD_HACK
1127static struct event_handler
1128{
1129 ev::prepare yield_ev;
1130
1131 void yield_cb (ev::prepare &w, int revents)
1132 {
1133 // this should really be sched_yield(), but the linux guys thought
1134 // that giving a process calling sched_yield () less cpu time than
1135 // ones with high nice levels is a useful thing to do. It surely is is
1136 // allowed by the sus... as is returning ENOSYS.
1137 // since the linux guys additionally thought that breaking the only
1138 // known workaround against their unusable sched_yield hack is cool,
1139 // we just nanosleep a bit and hope for the best.
1140
1141 struct timespec ts = { 0, 1000 };
1142 nanosleep (&ts, 0);
1143
1144 w.stop ();
1145 }
1146
1147 event_handler ()
1148 : yield_ev (this, &event_handler::yield_cb)
1149 {
1150 }
1151} event_handler;
1152#endif
1153
1154/* make sure all the cmd data is at beginning of cmdbuf */
1155void
1156rxvt_term::cmdbuf_reify ()
1157{
1158 if (cmdbuf_ptr == cmdbuf_base)
1159 return;
1160
1161 ssize_t used = cmdbuf_endp - cmdbuf_ptr;
1162
1163 memmove (cmdbuf_base, cmdbuf_ptr, used);
1164 cmdbuf_ptr = cmdbuf_base;
1165 cmdbuf_endp = cmdbuf_ptr + used;
1166
1167}
1168
1169#if defined (KEYSYM_RESOURCE)
1170void
1171rxvt_term::cmdbuf_append (const char *str, size_t count)
1172{
1173 cmdbuf_reify ();
1174
1175 size_t avail = cmdbuf_base + CBUFSIZ - cmdbuf_endp;
1176
1177 if (count > avail)
1178 return;
1179
1180 memcpy (cmdbuf_endp, str, count);
1181 cmdbuf_endp += count;
1182
1183 cmd_parse ();
791} 1184}
792#endif 1185#endif
793 1186
794bool 1187bool
795rxvt_term::pty_fill () 1188rxvt_term::pty_fill ()
796{ 1189{
797 ssize_t n = cmdbuf_endp - cmdbuf_ptr; 1190 cmdbuf_reify ();
798 1191
799 memmove (cmdbuf_base, cmdbuf_ptr, n); 1192 size_t avail = cmdbuf_base + CBUFSIZ - cmdbuf_endp;
1193
1194 if (!avail)
1195 {
1196 // normally this indicates a "too long" command sequence - just drop the data we have
800 cmdbuf_ptr = cmdbuf_base; 1197 cmdbuf_ptr = cmdbuf_base;
801 cmdbuf_endp = cmdbuf_ptr + n; 1198 cmdbuf_endp = cmdbuf_ptr;
1199 avail = CBUFSIZ;
1200 }
802 1201
803 n = read (cmd_fd, cmdbuf_endp, BUFSIZ - n); 1202 ssize_t r = read (pty->pty, cmdbuf_endp, avail);
804 1203
805 if (n > 0) 1204 if (r > 0)
806 { 1205 {
807 cmdbuf_endp += n; 1206 cmdbuf_endp += r;
808 return true; 1207 return true;
809 } 1208 }
810 else if (n < 0 && errno != EAGAIN) 1209 else if (r < 0 && (errno == EAGAIN || errno == EINTR))
1210 {
1211#if LINUX_YIELD_HACK
1212 if (display->is_local)
1213 event_handler.yield_ev.start ();
1214#endif
1215 }
1216 else
1217 {
1218 pty_ev.stop ();
1219
1220 if (!option (Opt_hold))
811 destroy (); 1221 destroy ();
1222 }
812 1223
813 return false; 1224 return false;
814} 1225}
815 1226
816void 1227void
817rxvt_term::pty_cb (io_watcher &w, short revents) 1228rxvt_term::pty_cb (ev::io &w, int revents)
818{ 1229{
819 SET_R (this); 1230 make_current ();
820 SET_LOCALE (locale);
821 1231
822 if (revents & EVENT_WRITE) 1232 if (revents & ev::READ)
823 tt_write (0, 0);
824 else if (revents & EVENT_READ)
825 {
826 bool flag = true;
827
828 // loop, but don't allow a single term to monopolize us 1233 // loop, but don't allow a single term to monopolize us
829 // the number of loops is fully arbitrary, and thus wrong 1234 for (int i = CBUFCNT; i-- && pty_fill (); )
830 while (flag && pty_fill ()) 1235 cmd_parse ();
831 {
832 if (!seen_input)
833 {
834 seen_input = 1;
835 /* once we know the shell is running, send the screen size. Again! */
836 tt_winch ();
837 }
838 1236
839 uint32_t ch = NOCHAR; 1237 if (revents & ev::WRITE)
1238 pty_write ();
840 1239
841 for (;;) 1240 refresh_check ();
842 {
843 if (ch == NOCHAR)
844 ch = next_char ();
845
846 if (ch == NOCHAR) // TODO: improve
847 break;
848
849 if (ch >= ' ' || ch == '\t' || ch == '\n' || ch == '\r')
850 {
851 /* Read a text string from the input buffer */
852 uint32_t buf[BUFSIZ];
853 bool refreshnow = false;
854 int nlines = 0;
855 uint32_t *str = buf;
856
857 *str++ = ch;
858
859 for (;;)
860 {
861 ch = next_char ();
862
863 if (ch == NOCHAR || (ch < ' ' && ch != '\t' && ch != '\n' && ch != '\r'))
864 break;
865 else
866 {
867 *str++ = ch;
868
869 if (ch == '\n')
870 {
871 nlines++;
872 refresh_count++;
873
874 if (!(Options & Opt_jumpScroll)
875 || (refresh_count >= (refresh_limit * (TermWin.nrow - 1))))
876 {
877 refreshnow = true;
878 flag = false;
879 ch = NOCHAR;
880 break;
881 }
882
883 // scr_add_lines only works for nlines < TermWin.nrow - 1.
884 if (nlines >= TermWin.nrow - 1)
885 {
886 scr_add_lines (buf, nlines, str - buf);
887 nlines = 0;
888 str = buf;
889 }
890 }
891
892 if (str >= buf + BUFSIZ)
893 {
894 ch = NOCHAR;
895 break;
896 }
897 }
898 }
899
900 scr_add_lines (buf, nlines, str - buf);
901
902 /*
903 * If there have been a lot of new lines, then update the screen
904 * What the heck I'll cheat and only refresh less than every page-full.
905 * the number of pages between refreshes is refresh_limit, which
906 * is incremented here because we must be doing flat-out scrolling.
907 *
908 * refreshing should be correct for small scrolls, because of the
909 * time-out
910 */
911 if (refreshnow)
912 {
913 if ((Options & Opt_jumpScroll) && refresh_limit < REFRESH_PERIOD)
914 refresh_limit++;
915
916 scr_refresh (refresh_type);
917 }
918
919 }
920 else
921 {
922 switch (ch)
923 {
924 default:
925 process_nonprinting (ch);
926 break;
927 case C0_ESC: /* escape char */
928 process_escape_seq ();
929 break;
930 /*case 0x9b: */ /* CSI */
931 /* process_csi_seq (); */
932 }
933
934 ch = NOCHAR;
935 }
936 }
937 }
938 }
939} 1241}
940 1242
941// read the next character, currently handles UTF-8 1243void ecb_cold
942// will probably handle all sorts of other stuff in the future 1244rxvt_term::pointer_unblank ()
943uint32_t
944rxvt_term::next_char ()
945{ 1245{
946 while (cmdbuf_ptr < cmdbuf_endp) 1246 XDefineCursor (dpy, vt, TermWin_cursor);
947 { 1247 recolor_cursor ();
948 if (*cmdbuf_ptr < 0x80) // assume < 0x80 to be ascii ALWAYS (all shift-states etc.) uh-oh
949 return *cmdbuf_ptr++;
950
951 wchar_t wc;
952 size_t len = mbrtowc (&wc, (char *)cmdbuf_ptr, cmdbuf_endp - cmdbuf_ptr, &mbstate.mbs);
953
954 if (len == (size_t)-2)
955 return NOCHAR;
956
957 if (len == (size_t)-1)
958 return *cmdbuf_ptr++; // the _occasional_ latin1 character is allowed to slip through
959
960 // assume wchar == unicode
961 cmdbuf_ptr += len;
962 return wc;
963 }
964
965 return NOCHAR;
966}
967
968/* rxvt_cmd_getc() - Return next input character */
969/*
970 * Return the next input character after first passing any keyboard input
971 * to the command.
972 */
973uint32_t
974rxvt_term::cmd_getc ()
975{
976 for (;;)
977 {
978 uint32_t c = next_char ();
979 if (c != NOCHAR)
980 return c;
981
982 // incomplete sequences should occur rarely, still, a better solution
983 // would be preferred. either setjmp/longjmp or better design.
984 fcntl (cmd_fd, F_SETFL, 0);
985 pty_fill ();
986 fcntl (cmd_fd, F_SETFL, O_NONBLOCK);
987 }
988}
989 1248
990#ifdef POINTER_BLANK 1249#ifdef POINTER_BLANK
1250 hidden_pointer = 0;
1251
1252 if (option (Opt_pointerBlank))
1253 pointer_ev.start (pointerBlankDelay);
1254#endif
1255}
1256
1257#ifdef POINTER_BLANK
1258void ecb_cold
1259rxvt_term::pointer_blank ()
1260{
1261 if (!option (Opt_pointerBlank))
1262 return;
1263
1264 XDefineCursor (dpy, vt, display->blank_cursor);
1265 XFlush (dpy);
1266
1267 hidden_pointer = 1;
1268}
1269
1270void ecb_cold
1271rxvt_term::pointer_cb (ev::timer &w, int revents)
1272{
1273 make_current ();
1274
1275 pointer_blank ();
1276}
1277#endif
1278
991void 1279void
992rxvt_term::pointer_unblank ()
993{
994 XDefineCursor (display->display, TermWin.vt, TermWin_cursor);
995 recolour_cursor ();
996
997 hidden_pointer = 0;
998
999 if (Options & Opt_pointerBlank)
1000 pointer_ev.start (NOW + pointerBlankDelay);
1001}
1002
1003void
1004rxvt_term::pointer_blank ()
1005{
1006 if (!(Options & Opt_pointerBlank))
1007 return;
1008
1009 XDefineCursor (display->display, TermWin.vt, blank_cursor);
1010 XFlush (display->display);
1011
1012 hidden_pointer = 1;
1013}
1014
1015void
1016rxvt_term::pointer_cb (time_watcher &w)
1017{
1018 SET_R (this);
1019 SET_LOCALE (locale);
1020
1021 pointer_blank ();
1022}
1023#endif
1024
1025void
1026rxvt_term::mouse_report (const XButtonEvent &ev) 1280rxvt_term::mouse_report (XButtonEvent &ev)
1027{ 1281{
1028 int button_number, key_state = 0; 1282 int button_number, state = 0;
1029 int x, y; 1283 int x, y;
1284 bool release = ev.type == ButtonRelease;
1030 1285
1031 x = ev.x; 1286 x = Pixel2Col (ev.x) + 1;
1032 y = ev.y; 1287 y = Pixel2Row (ev.y) + 1;
1033 pixel_position (&x, &y);
1034 1288
1035 if (MEvent.button == AnyButton) 1289 if (ev.type == MotionNotify)
1036 {
1037 button_number = 3;
1038 } 1290 {
1039 else 1291 if (x == mouse_row && y == mouse_col)
1292 return;
1293
1294 mouse_row = x;
1295 mouse_col = y;
1296 state += 32;
1040 { 1297 }
1298
1041 button_number = MEvent.button - Button1; 1299 button_number = MEvent.button - Button1;
1042 /* add 0x3D for wheel events, like xterm does */ 1300 /* add 0x3D for wheel events, like xterm does */
1043 if (button_number >= 3) 1301 if (button_number >= 3)
1044 button_number += (64 - 3); 1302 button_number += 64 - 3;
1045 }
1046 1303
1047 if (PrivateModes & PrivMode_MouseX10) 1304 if (priv_modes & PrivMode_MouseX10)
1048 { 1305 {
1049 /* 1306 /*
1050 * do not report ButtonRelease 1307 * do not report ButtonRelease
1051 * no state info allowed 1308 * no state info allowed
1052 */ 1309 */
1053 key_state = 0; 1310 if (release)
1054 if (button_number == 3)
1055 return; 1311 return;
1056 } 1312 }
1057 else 1313 else
1058 { 1314 {
1059 /* XTerm mouse reporting needs these values: 1315 /* XTerm mouse reporting needs these values:
1061 * 8 = Meta 1317 * 8 = Meta
1062 * 16 = Control 1318 * 16 = Control
1063 * plus will add in our own Double-Click reporting 1319 * plus will add in our own Double-Click reporting
1064 * 32 = Double Click 1320 * 32 = Double Click
1065 */ 1321 */
1066 key_state = ((MEvent.state & ShiftMask) ? 4 : 0) 1322 state += ((MEvent.state & ShiftMask) ? 4 : 0)
1067 + ((MEvent.state & ModMetaMask) ? 8 : 0) 1323 + ((MEvent.state & ModMetaMask) ? 8 : 0)
1068 + ((MEvent.state & ControlMask) ? 16 : 0); 1324 + ((MEvent.state & ControlMask) ? 16 : 0);
1069#ifdef MOUSE_REPORT_DOUBLECLICK 1325#ifdef MOUSE_REPORT_DOUBLECLICK
1070 key_state += ((MEvent.clicks > 1) ? 32 : 0); 1326 state += ((MEvent.clicks > 1) ? 32 : 0);
1071#endif 1327#endif
1072
1073 } 1328 }
1074 1329
1330 int code = 32 + (release ? 3 : button_number) + state;
1331
1075#ifdef DEBUG_MOUSEREPORT 1332#if DEBUG_MOUSEREPORT
1076 fprintf(stderr, "Mouse ["); 1333 fprintf (stderr, "Mouse [");
1077 if (key_state & 16) 1334 if (state & 16)
1078 fputc('C', stderr); 1335 fputc ('C', stderr);
1079 if (key_state & 4) 1336 if (state & 4)
1080 fputc('S', stderr); 1337 fputc ('S', stderr);
1081 if (key_state & 8) 1338 if (state & 8)
1082 fputc('A', stderr); 1339 fputc ('A', stderr);
1083 if (key_state & 32) 1340 if (state & 32)
1084 fputc('2', stderr); 1341 fputc ('2', stderr);
1085 fprintf(stderr, "]: <%d>, %d/%d\n", 1342 fprintf (stderr, "]: <%d>, %d/%d\n",
1086 button_number, 1343 button_number,
1087 x + 1, 1344 x,
1088 y + 1); 1345 y);
1089#else 1346#endif
1347
1348#if ENABLE_FRILLS
1349 if (priv_modes & PrivMode_ExtMouseSGR)
1350 tt_printf ("\033[<%d;%d;%d%c",
1351 button_number + state,
1352 x,
1353 y,
1354 release ? 'm' : 'M');
1355 else if (priv_modes & PrivMode_ExtMouseUrxvt)
1356 tt_printf ("\033[%d;%d;%dM",
1357 code,
1358 x,
1359 y);
1360 else if (priv_modes & PrivMode_ExtMouseUTF8)
1361 tt_printf ("\033[M%c%lc%lc",
1362 code,
1363 wint_t (32 + x),
1364 wint_t (32 + y));
1365 else
1366#endif
1090 tt_printf("\033[M%c%c%c", 1367 tt_printf ("\033[M%c%c%c",
1091 (32 + button_number + key_state), 1368 code,
1092 (32 + x + 1), 1369 32 + x,
1093 (32 + y + 1)); 1370 32 + y);
1094#endif
1095} 1371}
1096
1097#ifdef USING_W11LIB
1098void
1099rxvt_W11_process_x_event(XEvent *ev)
1100{
1101 rxvt_t *r = rxvt_get_r();
1102
1103 x_cb (*ev);
1104}
1105#endif
1106 1372
1107/*{{{ process an X event */ 1373/*{{{ process an X event */
1108void 1374void ecb_hot
1109rxvt_term::x_cb (XEvent &ev) 1375rxvt_term::x_cb (XEvent &ev)
1110{ 1376{
1111 SET_R (this); 1377 make_current ();
1112 SET_LOCALE (locale);
1113 1378
1114#if defined(CURSOR_BLINK) 1379 dLocal (Display *, dpy);
1115 if ((Options & Opt_cursorBlink) && ev.type == KeyPress)
1116 {
1117 if (hidden_cursor)
1118 {
1119 hidden_cursor = 0;
1120 want_refresh = 1;
1121 }
1122 1380
1123 cursor_blink_ev.start (NOW + BLINK_INTERVAL); 1381 if (ev.xany.window == vt
1124 } 1382 && SHOULD_INVOKE (HOOK_X_EVENT)
1125#endif 1383 && HOOK_INVOKE ((this, HOOK_X_EVENT, DT_XEVENT, &ev, DT_END)))
1126
1127#if defined(POINTER_BLANK)
1128 if ((Options & Opt_pointerBlank) && pointerBlankDelay > 0)
1129 {
1130 if (ev.type == MotionNotify
1131 || ev.type == ButtonPress
1132 || ev.type == ButtonRelease)
1133 if (hidden_pointer)
1134 pointer_unblank ();
1135
1136 if (ev.type == KeyPress && hidden_pointer == 0)
1137 pointer_blank ();
1138 }
1139#endif
1140
1141#ifdef USE_XIM
1142 if (XFilterEvent (&ev, None))
1143 return; 1384 return;
1144#endif
1145 1385
1386 // for XQueryPointer
1146 Window unused_root, unused_child; 1387 Window unused_root, unused_child;
1147 int unused_root_x, unused_root_y; 1388 int unused_root_x, unused_root_y;
1148 unsigned int unused_mask; 1389 unsigned int unused_mask;
1149
1150#ifdef DEBUG_X
1151 const char *const eventnames[] =
1152 { /* mason - this matches my system */
1153 "",
1154 "",
1155 "KeyPress",
1156 "KeyRelease",
1157 "ButtonPress",
1158 "ButtonRelease",
1159 "MotionNotify",
1160 "EnterNotify",
1161 "LeaveNotify",
1162 "FocusIn",
1163 "FocusOut",
1164 "KeymapNotify",
1165 "Expose",
1166 "GraphicsExpose",
1167 "NoExpose",
1168 "VisibilityNotify",
1169 "CreateNotify",
1170 "DestroyNotify",
1171 "UnmapNotify",
1172 "MapNotify",
1173 "MapRequest",
1174 "ReparentNotify",
1175 "ConfigureNotify",
1176 "ConfigureRequest",
1177 "GravityNotify",
1178 "ResizeRequest",
1179 "CirculateNotify",
1180 "CirculateRequest",
1181 "PropertyNotify",
1182 "SelectionClear",
1183 "SelectionRequest",
1184 "SelectionNotify",
1185 "ColormapNotify",
1186 "ClientMessage",
1187 "MappingNotify"
1188 };
1189#endif
1190
1191#ifdef DEBUG_X
1192 struct timeval tp;
1193 struct tm *ltt;
1194 (void)gettimeofday(&tp, NULL);
1195 ltt = localtime(&(tp.tv_sec));
1196 D_X((stderr, "Event: %-16s %-7s %08lx (%4d-%02d-%02d %02d:%02d:%02d.%.6ld) %s %lu", eventnames[ev.type], (ev.xany.window == TermWin.parent[0] ? "parent" : (ev.xany.window == TermWin.vt ? "vt" : (ev.xany.window == scrollBar.win ? "scroll" : (ev.xany.window == menuBar.win ? "menubar" : "UNKNOWN")))), (ev.xany.window == TermWin.parent[0] ? TermWin.parent[0] : (ev.xany.window == TermWin.vt ? TermWin.vt : (ev.xany.window == scrollBar.win ? scrollBar.win : (ev.xany.window == menuBar.win ? menuBar.win : 0)))), ltt->tm_year + 1900, ltt->tm_mon + 1, ltt->tm_mday, ltt->tm_hour, ltt->tm_min, ltt->tm_sec, tp.tv_usec, ev.xany.send_event ? "S" : " ", ev.xany.serial));
1197#endif
1198 1390
1199 switch (ev.type) 1391 switch (ev.type)
1200 { 1392 {
1201 case KeyPress: 1393 case KeyPress:
1202 lookup_key (ev.xkey); 1394 key_press (ev.xkey);
1203 break; 1395 break;
1204 1396
1205#if defined(MOUSE_WHEEL) && defined(MOUSE_SLIP_WHEELING)
1206 case KeyRelease: 1397 case KeyRelease:
1207 { 1398 key_release (ev.xkey);
1208 if (!(ev.xkey.state & ControlMask))
1209 mouse_slip_wheel_speed = 0;
1210 else
1211 {
1212 KeySym ks;
1213
1214 ks = XKeycodeToKeysym(display->display, ev.xkey.keycode, 0);
1215 if (ks == XK_Control_L || ks == XK_Control_R)
1216 mouse_slip_wheel_speed = 0;
1217 }
1218 break; 1399 break;
1219 }
1220#endif
1221 1400
1222 case ButtonPress: 1401 case ButtonPress:
1223 button_press (ev.xbutton); 1402 button_press (ev.xbutton);
1224 break; 1403 break;
1225 1404
1227 button_release (ev.xbutton); 1406 button_release (ev.xbutton);
1228 break; 1407 break;
1229 1408
1230 case ClientMessage: 1409 case ClientMessage:
1231 if (ev.xclient.format == 32 1410 if (ev.xclient.format == 32
1232 && (Atom)ev.xclient.data.l[0] == xa[XA_WMDELETEWINDOW]) 1411 && !HOOK_INVOKE ((this, HOOK_CLIENT_MESSAGE, DT_XEVENT, &ev, DT_END)))
1233 destroy ();
1234#ifdef OFFIX_DND
1235 /* OffiX Dnd (drag 'n' drop) protocol */
1236 else if (ev.xclient.message_type == xa[XA_DNDPROTOCOL]
1237 && (ev.xclient.data.l[0] == DndFile
1238 || ev.xclient.data.l[0] == DndDir
1239 || ev.xclient.data.l[0] == DndLink))
1240 { 1412 {
1241 /* Get Dnd data */ 1413 if (ev.xclient.message_type == xa[XA_WM_PROTOCOLS])
1242 Atom ActualType; 1414 {
1243 int ActualFormat; 1415 if (!HOOK_INVOKE ((this, HOOK_WM_PROTOCOLS, DT_XEVENT, &ev, DT_END)))
1244 unsigned char *data; 1416 {
1245 unsigned long Size, RemainingBytes; 1417 if (ev.xclient.data.l[0] == xa[XA_WM_DELETE_WINDOW])
1246 1418 {
1247 XGetWindowProperty(display->display, display->root, 1419 if (!HOOK_INVOKE ((this, HOOK_WM_DELETE_WINDOW, DT_XEVENT, &ev, DT_END)))
1248 xa[XA_DNDSELECTION], 1420 destroy ();
1249 0L, 1000000L, 1421 }
1250 False, AnyPropertyType, 1422#if ENABLE_EWMH
1251 &ActualType, &ActualFormat, 1423 else if (ev.xclient.data.l[0] == xa[XA_NET_WM_PING])
1252 &Size, &RemainingBytes, 1424 XSendEvent (dpy, ev.xclient.window = display->root,
1425 False, SubstructureRedirectMask | SubstructureNotifyMask,
1253 &data); 1426 &ev);
1254 XChangeProperty(display->display, display->root, 1427#endif
1255 XA_CUT_BUFFER0, XA_STRING, 1428 }
1256 8, PropModeReplace, 1429 }
1257 data, STRLEN(data)); 1430#if ENABLE_XEMBED
1258 selection_paste (display->root, XA_CUT_BUFFER0, True); 1431 else if (ev.xclient.format == 32 && ev.xclient.message_type == xa[XA_XEMBED])
1259 XSetInputFocus(display->display, display->root, RevertToNone, CurrentTime); 1432 {
1433 if (ev.xclient.data.l[1] == XEMBED_FOCUS_IN)
1434 focus_in ();
1435 else if (ev.xclient.data.l[1] == XEMBED_FOCUS_OUT)
1436 focus_out ();
1437 }
1438#endif
1260 } 1439 }
1261#endif /* OFFIX_DND */
1262 break;
1263
1264 case MappingNotify:
1265 XRefreshKeyboardMapping(&(ev.xmapping));
1266 break; 1440 break;
1267 1441
1268 /* 1442 /*
1269 * XXX: this is not the _current_ arrangement 1443 * XXX: this is not the _current_ arrangement
1270 * Here's my conclusion: 1444 * Here's my conclusion:
1289 break; 1463 break;
1290 } 1464 }
1291 break; 1465 break;
1292 1466
1293 case FocusIn: 1467 case FocusIn:
1294 if (!TermWin.focus) 1468 if (ev.xfocus.detail != NotifyInferior
1469 && ev.xfocus.detail != NotifyPointer
1470 && ev.xfocus.mode != NotifyGrab)
1471 focus_in ();
1472 break;
1473
1474 case FocusOut:
1475 if (ev.xfocus.detail != NotifyInferior
1476 && ev.xfocus.detail != NotifyPointer
1477 && ev.xfocus.mode != NotifyGrab)
1478 focus_out ();
1479 break;
1480
1481 case ConfigureNotify:
1482 if (ev.xconfigure.window == parent)
1295 { 1483 {
1296 TermWin.focus = 1; 1484 while (XCheckTypedWindowEvent (dpy, ev.xconfigure.window, ConfigureNotify, &ev))
1297 want_refresh = 1; 1485 ;
1298#ifdef USE_XIM
1299 if (Input_Context != NULL)
1300 XSetICFocus(Input_Context);
1301#endif
1302#ifdef CURSOR_BLINK
1303 if (Options & Opt_cursorBlink)
1304 cursor_blink_ev.start (NOW + BLINK_INTERVAL);
1305#endif
1306 1486
1487 bool want_position_change = SHOULD_INVOKE (HOOK_POSITION_CHANGE);
1488
1489 if (want_position_change)
1490 {
1491 int x, y;
1492
1493 if (ev.xconfigure.send_event)
1494 {
1495 x = ev.xconfigure.x;
1496 y = ev.xconfigure.y;
1497 }
1498 else
1499 get_window_origin (x, y);
1500
1501 if (x != parent_x || y != parent_y)
1502 {
1503 parent_x = x;
1504 parent_y = y;
1505 HOOK_INVOKE ((this, HOOK_POSITION_CHANGE, DT_INT, x, DT_INT, y, DT_END));
1506 }
1507 }
1508
1509 if (szHint.width != ev.xconfigure.width || szHint.height != ev.xconfigure.height)
1510 {
1511 seen_resize = 1;
1512 resize_all_windows (ev.xconfigure.width, ev.xconfigure.height, 1);
1513 }
1514
1515 HOOK_INVOKE ((this, HOOK_CONFIGURE_NOTIFY, DT_XEVENT, &ev, DT_END));
1307 } 1516 }
1308 break; 1517 break;
1309 1518
1310 case FocusOut:
1311 if (TermWin.focus)
1312 {
1313 TermWin.focus = 0;
1314 want_refresh = 1;
1315#ifdef USE_XIM
1316 if (Input_Context != NULL)
1317 XUnsetICFocus(Input_Context);
1318#endif
1319#ifdef CURSOR_BLINK
1320 if (Options & Opt_cursorBlink)
1321 cursor_blink_ev.stop ();
1322 hidden_cursor = 0;
1323#endif
1324
1325 }
1326 break;
1327
1328 case ConfigureNotify: 1519 case PropertyNotify:
1329 if (ev.xconfigure.window == TermWin.parent[0]) 1520 HOOK_INVOKE ((this, HOOK_PROPERTY_NOTIFY, DT_XEVENT, &ev, DT_END));
1330 {
1331 int height, width;
1332
1333 do
1334 { /* Wrap lots of configures into one */
1335 width = ev.xconfigure.width;
1336 height = ev.xconfigure.height;
1337 D_SIZE((stderr, "Size: ConfigureNotify: %4d x %4d", width, height));
1338 }
1339 while (XCheckTypedWindowEvent(display->display, ev.xconfigure.window, ConfigureNotify, &ev));
1340
1341 if (szHint.width != width || szHint.height != height)
1342 {
1343 D_SIZE((stderr, "Size: Resizing from: %4d x %4d", szHint.width, szHint.height));
1344 resize_all_windows (width, height, 1);
1345 }
1346#ifdef DEBUG_SIZE
1347 else
1348 {
1349 D_SIZE((stderr, "Size: Not resizing"));
1350 }
1351#endif
1352#ifdef TRANSPARENT /* XXX: maybe not needed - leave in for now */
1353 if (Options & Opt_transparent)
1354 {
1355 check_our_parents ();
1356 if (am_transparent)
1357 want_full_refresh = 1;
1358 }
1359#endif
1360
1361 }
1362 break; 1521 break;
1363 1522
1364 case SelectionClear: 1523 case SelectionClear:
1365 selection_clear (); 1524 selection_clear (ev.xselectionclear.selection == xa[XA_CLIPBOARD]);
1366 break;
1367
1368 case SelectionNotify:
1369 if (selection_wait == Sel_normal)
1370 selection_paste (ev.xselection.requestor,
1371 ev.xselection.property, True);
1372 break; 1525 break;
1373 1526
1374 case SelectionRequest: 1527 case SelectionRequest:
1375 selection_send (ev.xselectionrequest); 1528 selection_send (ev.xselectionrequest);
1376 break; 1529 break;
1377 1530
1531 case MapNotify:
1532 mapped = 1;
1533#ifdef TEXT_BLINK
1534 text_blink_ev.start ();
1535#endif
1536 HOOK_INVOKE ((this, HOOK_MAP_NOTIFY, DT_XEVENT, &ev, DT_END));
1537 break;
1538
1378 case UnmapNotify: 1539 case UnmapNotify:
1379 TermWin.mapped = 0; 1540 mapped = 0;
1380#ifdef TEXT_BLINK 1541#ifdef TEXT_BLINK
1381 text_blink_ev.stop (); 1542 text_blink_ev.stop ();
1382#endif 1543#endif
1544 HOOK_INVOKE ((this, HOOK_UNMAP_NOTIFY, DT_XEVENT, &ev, DT_END));
1383 break; 1545 break;
1384
1385 case MapNotify:
1386 TermWin.mapped = 1;
1387#ifdef TEXT_BLINK
1388 text_blink_ev.start (NOW + TEXT_BLINK_INTERVAL);
1389#endif
1390 break;
1391
1392 case PropertyNotify:
1393 if (ev.xproperty.atom == xa[XA_VT_SELECTION])
1394 if (ev.xproperty.state == PropertyNewValue)
1395 selection_property (ev.xproperty.window, ev.xproperty.atom);
1396 break;
1397
1398#ifdef TRANSPARENT
1399 case ReparentNotify:
1400 rootwin_cb (ev);
1401 break;
1402#endif /* TRANSPARENT */
1403 1546
1404 case GraphicsExpose: 1547 case GraphicsExpose:
1405 case Expose: 1548 case Expose:
1406 if (ev.xany.window == TermWin.vt) 1549 if (ev.xany.window == vt)
1407 { 1550 {
1408#ifdef NO_SLOW_LINK_SUPPORT 1551 do
1552 {
1409 scr_expose (ev.xexpose.x, ev.xexpose.y, 1553 scr_expose (ev.xexpose.x, ev.xexpose.y,
1410 ev.xexpose.width, ev.xexpose.height, False); 1554 ev.xexpose.width, ev.xexpose.height, false);
1411#else 1555 }
1412 // don't understand this, so commented it out 1556 while (XCheckTypedWindowEvent (dpy, vt, ev.xany.type, &ev));
1557
1558 ev.xany.type = ev.xany.type == Expose ? GraphicsExpose : Expose;
1559
1560 while (XCheckTypedWindowEvent (dpy, vt, ev.xany.type, &ev))
1561 {
1413 scr_expose (ev.xexpose.x, ev.xexpose.y, 1562 scr_expose (ev.xexpose.x, ev.xexpose.y,
1414 ev.xexpose.width, ev.xexpose.height, False); 1563 ev.xexpose.width, ev.xexpose.height, false);
1415 //scr_expose (ev.xexpose.x, 0, 1564 }
1416 // ev.xexpose.width, TermWin.height, False); 1565
1417#endif
1418 want_refresh = 1; 1566 want_refresh = 1;
1419 } 1567 }
1420 else 1568 else
1421 { 1569 {
1422 XEvent unused_event; 1570 XEvent unused_event;
1423 1571
1424 while (XCheckTypedWindowEvent(display->display, ev.xany.window, 1572 while (XCheckTypedWindowEvent (dpy, ev.xany.window, Expose, &unused_event))
1425 Expose, 1573 ;
1426 &unused_event)) ; 1574 while (XCheckTypedWindowEvent (dpy, ev.xany.window, GraphicsExpose, &unused_event))
1427 while (XCheckTypedWindowEvent(display->display, ev.xany.window, 1575 ;
1428 GraphicsExpose, 1576
1429 &unused_event)) ; 1577 if (scrollBar.state && ev.xany.window == scrollBar.win)
1430 if (isScrollbarWindow(ev.xany.window))
1431 { 1578 {
1432 scrollBar.setIdle(); 1579 scrollBar.state = SB_STATE_IDLE;
1433 scrollbar_show (0); 1580 scrollBar.show (0);
1434 } 1581 }
1435#ifdef MENUBAR
1436 if (menubar_visible () && isMenuBarWindow(ev.xany.window))
1437 menubar_expose ();
1438#endif
1439#ifdef RXVT_GRAPHICS
1440 Gr_expose (ev.xany.window);
1441#endif
1442
1443 } 1582 }
1444 break; 1583 break;
1445 1584
1446 case MotionNotify: 1585 case MotionNotify:
1447#ifdef POINTER_BLANK 1586#ifdef POINTER_BLANK
1448 if (hidden_pointer) 1587 if (hidden_pointer)
1449 pointer_unblank (); 1588 pointer_unblank ();
1450#endif 1589#endif
1451#if MENUBAR 1590 if (!bypass_keystate
1452 if (isMenuBarWindow(ev.xany.window)) 1591 && ((priv_modes & PrivMode_MouseBtnEvent && ev.xbutton.state & (Button1Mask|Button2Mask|Button3Mask))
1592 || priv_modes & PrivMode_MouseAnyEvent))
1593 mouse_report (ev.xbutton);
1594 if ((priv_modes & PrivMode_mouse_report) && !bypass_keystate)
1595 break;
1596
1597 if (ev.xany.window == vt)
1453 { 1598 {
1454 menubar_control (&(ev.xbutton)); 1599 if (SHOULD_INVOKE (HOOK_MOTION_NOTIFY)
1455 break; 1600 && HOOK_INVOKE ((this, HOOK_MOTION_NOTIFY, DT_XEVENT, &ev, DT_END)))
1456 } 1601 ; // nop
1457#endif
1458 if ((PrivateModes & PrivMode_mouse_report) && !(bypass_keystate))
1459 break;
1460
1461 if (ev.xany.window == TermWin.vt)
1462 {
1463 if ((ev.xbutton.state & (Button1Mask | Button3Mask))) 1602 else if (ev.xbutton.state & (Button1Mask | Button3Mask))
1464 { 1603 {
1465 while (XCheckTypedWindowEvent (display->display, TermWin.vt, MotionNotify, &ev)) 1604 while (XCheckTypedWindowEvent (dpy, vt, MotionNotify, &ev))
1466 ; 1605 ;
1467 1606
1468 XQueryPointer(display->display, TermWin.vt, 1607 XQueryPointer (dpy, vt,
1469 &unused_root, &unused_child, 1608 &unused_root, &unused_child,
1470 &unused_root_x, &unused_root_y, 1609 &unused_root_x, &unused_root_y,
1471 &(ev.xbutton.x), &(ev.xbutton.y), 1610 &ev.xbutton.x, &ev.xbutton.y,
1472 &unused_mask); 1611 &ev.xbutton.state);
1473#ifdef MOUSE_THRESHOLD 1612#ifdef MOUSE_THRESHOLD
1474 /* deal with a `jumpy' mouse */ 1613 /* deal with a `jumpy' mouse */
1475 if ((ev.xmotion.time - MEvent.time) > MOUSE_THRESHOLD) 1614 if (ev.xmotion.time - MEvent.time > MOUSE_THRESHOLD)
1615#endif
1476 { 1616 {
1617#if ISO_14755
1618 // 5.4
1619 if (iso14755buf & (ISO_14755_STARTED | ISO_14755_54))
1620 {
1621 iso14755_54 (ev.xbutton.x, ev.xbutton.y);
1622 break;
1623 }
1477#endif 1624#endif
1478 selection_extend ((ev.xbutton.x), (ev.xbutton.y), 1625 selection_extend (ev.xbutton.x, ev.xbutton.y,
1479 (ev.xbutton.state & Button3Mask) ? 2 : 0); 1626 ev.xbutton.state & Button3Mask ? 2 : 0);
1627
1480#ifdef SELECTION_SCROLLING 1628#ifdef SELECTION_SCROLLING
1481 if (ev.xbutton.y < TermWin.int_bwidth 1629 if (ev.xbutton.y < int_bwidth
1482 || Pixel2Row(ev.xbutton.y) > (TermWin.nrow-1)) 1630 || Pixel2Row (ev.xbutton.y) > (nrow-1))
1483 { 1631 {
1632 page_dirn scroll_selection_dir;
1484 int dist; 1633 int dist;
1485
1486 pending_scroll_selection=1;
1487 1634
1488 /* don't clobber the current delay if we are 1635 /* don't clobber the current delay if we are
1489 * already in the middle of scrolling. 1636 * already in the middle of scrolling.
1490 */ 1637 */
1491 if (scroll_selection_delay<=0) 1638 if (!sel_scroll_ev.is_active ())
1492 scroll_selection_delay=SCROLLBAR_CONTINUOUS_DELAY; 1639 sel_scroll_ev.start (SCROLLBAR_INITIAL_DELAY, SCROLLBAR_CONTINUOUS_DELAY);
1493 1640
1494 /* save the event params so we can highlight 1641 /* save the event params so we can highlight
1495 * the selection in the pending-scroll loop 1642 * the selection in the pending-scroll loop
1496 */ 1643 */
1497 selection_save_x=ev.xbutton.x; 1644 selection_save_x = ev.xbutton.x;
1498 selection_save_y=ev.xbutton.y; 1645 selection_save_y = ev.xbutton.y;
1499 selection_save_state=
1500 (ev.xbutton.state & Button3Mask) ? 2 : 0; 1646 selection_save_state = (ev.xbutton.state & Button3Mask) ? 2 : 0;
1501 1647
1502 /* calc number of lines to scroll */ 1648 /* calc number of lines to scroll */
1503 if (ev.xbutton.y<TermWin.int_bwidth) 1649 if (ev.xbutton.y < int_bwidth)
1504 { 1650 {
1505 scroll_selection_dir = UP; 1651 scroll_selection_dir = UP;
1506 dist = TermWin.int_bwidth - ev.xbutton.y; 1652 dist = int_bwidth - ev.xbutton.y;
1507 } 1653 }
1508 else 1654 else
1509 { 1655 {
1510 scroll_selection_dir = DN; 1656 scroll_selection_dir = DN;
1511 dist = ev.xbutton.y - 1657 dist = ev.xbutton.y - (int_bwidth + vt_height);
1512 (TermWin.int_bwidth + TermWin.height);
1513 } 1658 }
1659
1514 scroll_selection_lines=(Pixel2Height(dist)/ 1660 scroll_selection_lines = Pixel2Height (dist)
1515 SELECTION_SCROLL_LINE_SPEEDUP)+1; 1661 / SELECTION_SCROLL_LINE_SPEEDUP
1662 + 1;
1516 MIN_IT(scroll_selection_lines, 1663 min_it (scroll_selection_lines,
1517 SELECTION_SCROLL_MAX_LINES); 1664 SELECTION_SCROLL_MAX_LINES);
1665 scroll_selection_lines *= scroll_selection_dir;
1518 } 1666 }
1519 else 1667 else
1520 { 1668 {
1521 /* we are within the text window, so we 1669 /* we are within the text window, so we
1522 * shouldn't be scrolling 1670 * shouldn't be scrolling
1523 */ 1671 */
1524 pending_scroll_selection = 0; 1672 sel_scroll_ev.stop();
1525 } 1673 }
1526#endif 1674#endif
1527#ifdef MOUSE_THRESHOLD
1528
1529 } 1675 }
1530#endif
1531
1532 } 1676 }
1533 } 1677 }
1534 else if (isScrollbarWindow(ev.xany.window) && scrollbar_isMotion()) 1678 else if (scrollBar.state == SB_STATE_MOTION && ev.xany.window == scrollBar.win)
1535 { 1679 {
1536 while (XCheckTypedWindowEvent(display->display, scrollBar.win, 1680 while (XCheckTypedWindowEvent (dpy, scrollBar.win,
1537 MotionNotify, &ev)) ; 1681 MotionNotify, &ev))
1682 ;
1683
1538 XQueryPointer(display->display, scrollBar.win, 1684 XQueryPointer (dpy, scrollBar.win,
1539 &unused_root, &unused_child, 1685 &unused_root, &unused_child,
1540 &unused_root_x, &unused_root_y, 1686 &unused_root_x, &unused_root_y,
1541 &(ev.xbutton.x), &(ev.xbutton.y), 1687 &ev.xbutton.x, &ev.xbutton.y,
1542 &unused_mask); 1688 &unused_mask);
1543 scr_move_to (scrollbar_position(ev.xbutton.y) - csrO, 1689 scr_move_to (scrollBar.position (ev.xbutton.y) - csrO,
1544 scrollbar_size()); 1690 scrollBar.size ());
1545 scr_refresh (refresh_type);
1546 refresh_limit = 0; 1691 want_refresh = 1;
1547 scrollbar_show (1); 1692 scrollBar.show (1);
1548 } 1693 }
1549 break; 1694 break;
1550 } 1695 }
1696
1697#if defined(CURSOR_BLINK)
1698 if (ev.type == KeyPress)
1699 cursor_blink_reset ();
1700#endif
1701
1702#if defined(POINTER_BLANK)
1703 if (option (Opt_pointerBlank) && pointerBlankDelay > 0)
1704 {
1705 if (ev.type == MotionNotify
1706 || ev.type == ButtonPress
1707 || ev.type == ButtonRelease)
1708 if (hidden_pointer)
1709 pointer_unblank ();
1710
1711 if (ev.type == KeyPress && hidden_pointer == 0)
1712 pointer_blank ();
1713 }
1714#endif
1715
1716 refresh_check ();
1551} 1717}
1718
1719#if ENABLE_FRILLS
1720void ecb_cold
1721rxvt_term::set_urgency (bool enable)
1722{
1723 if (enable == urgency_hint)
1724 return;
1725
1726 if (XWMHints *h = XGetWMHints (dpy, parent))
1727 {
1728 h->flags = h->flags & ~XUrgencyHint | (enable ? XUrgencyHint : 0);
1729 XSetWMHints (dpy, parent, h);
1730 urgency_hint = enable;
1731 XFree (h);
1732 }
1733}
1734#endif
1735
1736void ecb_cold
1737rxvt_term::focus_in ()
1738{
1739 if (!focus)
1740 {
1741 focus = 1;
1742 want_refresh = 1;
1743
1744#if USE_XIM
1745 if (Input_Context != NULL)
1746 {
1747 im_set_position ();
1748 XSetICFocus (Input_Context);
1749 }
1750#endif
1751#if CURSOR_BLINK
1752 if (option (Opt_cursorBlink))
1753 cursor_blink_ev.again ();
1754#endif
1755#if OFF_FOCUS_FADING
1756 if (rs[Rs_fade])
1757 {
1758 pix_colors = pix_colors_focused;
1759 scr_recolor ();
1760 }
1761#endif
1762#if ENABLE_FRILLS
1763 if (option (Opt_urgentOnBell))
1764 set_urgency (0);
1765
1766 if (priv_modes & PrivMode_FocusEvent)
1767 tt_printf ("\x1b[I");
1768#endif
1769
1770 HOOK_INVOKE ((this, HOOK_FOCUS_IN, DT_END));
1771 }
1772}
1773
1774void ecb_cold
1775rxvt_term::focus_out ()
1776{
1777 if (focus)
1778 {
1779 focus = 0;
1780 want_refresh = 1;
1781
1782#if ENABLE_FRILLS
1783 if (option (Opt_urgentOnBell))
1784 set_urgency (0);
1785
1786 if (priv_modes & PrivMode_FocusEvent)
1787 tt_printf ("\x1b[O");
1788#endif
1789#if ENABLE_FRILLS || ISO_14755
1790 if (iso14755buf)
1791 {
1792 iso14755buf = 0;
1793# if ISO_14755
1794 scr_overlay_off ();
1795# endif
1796 }
1797#endif
1798#if USE_XIM
1799 if (Input_Context != NULL)
1800 XUnsetICFocus (Input_Context);
1801#endif
1802#if CURSOR_BLINK
1803 if (option (Opt_cursorBlink))
1804 cursor_blink_ev.stop ();
1805
1806 hidden_cursor = 0;
1807#endif
1808#if OFF_FOCUS_FADING
1809 if (rs[Rs_fade])
1810 {
1811 pix_colors = pix_colors_unfocused;
1812 scr_recolor ();
1813 }
1814#endif
1815
1816 HOOK_INVOKE ((this, HOOK_FOCUS_OUT, DT_END));
1817 }
1818}
1819
1820void ecb_cold
1821rxvt_term::update_fade_color (unsigned int idx, bool first_time)
1822{
1823#if OFF_FOCUS_FADING
1824 if (rs[Rs_fade])
1825 {
1826 if (!first_time)
1827 pix_colors_focused [idx].free (this);
1828
1829 rgba c;
1830 pix_colors [Color_fade].get (c);
1831 pix_colors_focused [idx].fade (this, atoi (rs[Rs_fade]), pix_colors_unfocused [idx], c);
1832 }
1833#endif
1834}
1835
1836#if ENABLE_PERL
1837void ecb_hot
1838rxvt_term::rootwin_cb (XEvent &ev)
1839{
1840 make_current ();
1841
1842 if (SHOULD_INVOKE (HOOK_ROOT_EVENT)
1843 && HOOK_INVOKE ((this, HOOK_ROOT_EVENT, DT_XEVENT, &ev, DT_END)))
1844 return;
1845
1846 switch (ev.type)
1847 {
1848 case PropertyNotify:
1849 /*
1850 * if user used some Esetroot compatible prog to set the root bg,
1851 * use the property to determine the pixmap. We use it later on.
1852 */
1853 if (ev.xproperty.atom == xa[XA_XROOTPMAP_ID]
1854 || ev.xproperty.atom == xa[XA_ESETROOT_PMAP_ID])
1855 {
1856 HOOK_INVOKE ((this, HOOK_ROOTPMAP_CHANGE, DT_END));
1857 }
1858
1859 break;
1860 }
1861
1862 refresh_check ();
1863}
1864#endif
1552 1865
1553void 1866void
1554rxvt_term::rootwin_cb (XEvent &ev)
1555{
1556 SET_R (this);
1557 SET_LOCALE (locale);
1558
1559 if (ev.type == PropertyNotify)
1560 {
1561 /*
1562 * if user used some Esetroot compatible prog to set the root bg,
1563 * use the property to determine the pixmap. We use it later on.
1564 */
1565 if (xa[XA_XROOTPMAPID] == 0)
1566 xa[XA_XROOTPMAPID] = XInternAtom(display->display, "_XROOTPMAP_ID", False);
1567
1568 if (ev.xproperty.atom != xa[XA_XROOTPMAPID])
1569 return;
1570 }
1571
1572 if ((Options & Opt_transparent) && check_our_parents ())
1573 {
1574 if (am_transparent)
1575 want_full_refresh = 1;
1576 }
1577}
1578
1579void
1580rxvt_term::button_press (const XButtonEvent &ev) 1867rxvt_term::button_press (XButtonEvent &ev)
1581{ 1868{
1582 int reportmode = 0, clickintime; 1869 int reportmode = 0, clickintime;
1583 1870
1584 bypass_keystate = ev.state & (ModMetaMask | ShiftMask); 1871 bypass_keystate = ev.state & (ModMetaMask | ShiftMask);
1872
1585 if (!bypass_keystate) 1873 if (!bypass_keystate)
1586 reportmode = !!(PrivateModes & PrivMode_mouse_report); 1874 reportmode = !! (priv_modes & PrivMode_mouse_report);
1875
1587 /* 1876 /*
1588 * VT window processing of button press 1877 * VT window processing of button press
1589 */ 1878 */
1590 if (ev.window == TermWin.vt) 1879 if (ev.window == vt)
1591 { 1880 {
1592#if RXVT_GRAPHICS 1881 if (HOOK_INVOKE ((this, HOOK_BUTTON_PRESS, DT_XEVENT, &ev, DT_END)))
1593 if (ev.subwindow != None) 1882 return;
1594 rxvt_Gr_ButtonPress (ev.x, ev.y);
1595 else
1596#endif
1597 1883
1884#if ISO_14755
1885 // 5.4
1886 if (iso14755buf & (ISO_14755_STARTED | ISO_14755_54))
1887 {
1888 iso14755_54 (ev.x, ev.y);
1889 return;
1598 { 1890 }
1599 clickintime = ev.time - MEvent.time < MULTICLICK_TIME; 1891#endif
1892
1893 clickintime = ev.time - MEvent.time < multiClickTime;
1894
1600 if (reportmode) 1895 if (reportmode)
1896 {
1897 /* mouse report from vt window */
1898 /* save the xbutton state (for ButtonRelease) */
1899 MEvent.state = ev.state;
1900#ifdef MOUSE_REPORT_DOUBLECLICK
1901 if (ev.button == MEvent.button && clickintime)
1601 { 1902 {
1602 /* mouse report from vt window */ 1903 /* same button, within allowed time */
1603 /* save the xbutton state (for ButtonRelease) */ 1904 MEvent.clicks++;
1604 MEvent.state = ev.state; 1905
1605#ifdef MOUSE_REPORT_DOUBLECLICK 1906 if (MEvent.clicks > 1)
1606 if (ev.button == MEvent.button && clickintime)
1607 { 1907 {
1608 /* same button, within alloted time */
1609 MEvent.clicks++;
1610 if (MEvent.clicks > 1)
1611 {
1612 /* only report double clicks */ 1908 /* only report double clicks */
1613 MEvent.clicks = 2; 1909 MEvent.clicks = 2;
1614 mouse_report (ev); 1910 mouse_report (ev);
1615 1911
1616 /* don't report the release */ 1912 /* don't report the release */
1617 MEvent.clicks = 0; 1913 MEvent.clicks = 0;
1618 MEvent.button = AnyButton; 1914 MEvent.button = AnyButton;
1619 }
1620 } 1915 }
1621 else
1622 {
1623 /* different button, or time expired */
1624 MEvent.clicks = 1;
1625 MEvent.button = ev.button;
1626 mouse_report (ev);
1627 }
1628#else
1629 MEvent.button = ev.button;
1630 mouse_report (ev);
1631#endif /* MOUSE_REPORT_DOUBLECLICK */
1632
1633 } 1916 }
1634 else 1917 else
1635 { 1918 {
1919 /* different button, or time expired */
1920 MEvent.clicks = 1;
1921 MEvent.button = ev.button;
1922 mouse_report (ev);
1923 }
1924#else
1925 MEvent.button = ev.button;
1926 mouse_report (ev);
1927#endif /* MOUSE_REPORT_DOUBLECLICK */
1928
1929 }
1930 else
1931 {
1636 if (ev.button != MEvent.button) 1932 if (ev.button != MEvent.button)
1637 MEvent.clicks = 0; 1933 MEvent.clicks = 0;
1934
1638 switch (ev.button) 1935 switch (ev.button)
1639 { 1936 {
1640 case Button1: 1937 case Button1:
1938 /* allow meta + click to select rectangular areas */
1939 /* should be done in screen.C */
1940#if ENABLE_FRILLS
1941 selection.rect = !!(ev.state & ModMetaMask);
1942#else
1943 selection.rect = false;
1944#endif
1945
1641 /* allow shift+left click to extend selection */ 1946 /* allow shift+left click to extend selection */
1642 if (ev.state & ShiftMask && !(PrivateModes & PrivMode_mouse_report)) 1947 if (ev.state & ShiftMask && !(priv_modes & PrivMode_mouse_report))
1643 { 1948 {
1644 if (MEvent.button == Button1 && clickintime)
1645 selection_rotate (ev.x, ev.y);
1646 else
1647 selection_extend (ev.x, ev.y, 1);
1648 }
1649 else
1650 {
1651 if (MEvent.button == Button1 && clickintime)
1652 MEvent.clicks++;
1653 else
1654 MEvent.clicks = 1;
1655
1656 selection_click (MEvent.clicks, ev.x, ev.y);
1657 }
1658
1659 MEvent.button = Button1;
1660 break;
1661
1662 case Button3:
1663 if (MEvent.button == Button3 && clickintime) 1949 if (MEvent.button == Button1 && clickintime)
1664 selection_rotate (ev.x, ev.y); 1950 selection_rotate (ev.x, ev.y);
1665 else 1951 else
1666 selection_extend (ev.x, ev.y, 1); 1952 selection_extend (ev.x, ev.y, 1);
1953 }
1954 else
1955 {
1956 if (MEvent.button == Button1 && clickintime)
1957 MEvent.clicks++;
1958 else
1959 MEvent.clicks = 1;
1960
1961 selection_click (MEvent.clicks, ev.x, ev.y);
1962 }
1963
1964 MEvent.button = Button1;
1965 break;
1966
1967 case Button3:
1968 if (MEvent.button == Button3 && clickintime)
1969 selection_rotate (ev.x, ev.y);
1970 else
1971 selection_extend (ev.x, ev.y, 1);
1972
1667 MEvent.button = Button3; 1973 MEvent.button = Button3;
1668 break; 1974 break;
1669 }
1670 } 1975 }
1976 }
1977
1671 MEvent.time = ev.time; 1978 MEvent.time = ev.time;
1672 return; 1979 return;
1673 }
1674 } 1980 }
1675 1981
1676 /* 1982 /*
1677 * Scrollbar window processing of button press 1983 * Scrollbar window processing of button press
1678 */ 1984 */
1679 if (isScrollbarWindow(ev.window)) 1985 if (scrollBar.state && ev.window == scrollBar.win)
1680 { 1986 {
1681 scrollBar.setIdle (); 1987 page_dirn direction = NO_DIR;
1988
1989 if (scrollBar.upButton (ev.y))
1990 direction = UP; /* up */
1991 else if (scrollBar.dnButton (ev.y))
1992 direction = DN; /* down */
1993
1994 scrollBar.state = SB_STATE_IDLE;
1682 /* 1995 /*
1683 * Rxvt-style scrollbar: 1996 * Rxvt-style scrollbar:
1684 * move up if mouse is above slider 1997 * move up if mouse is above slider
1685 * move dn if mouse is below slider 1998 * move dn if mouse is below slider
1686 * 1999 *
1695 /* 2008 /*
1696 * Mouse report disabled scrollbar: 2009 * Mouse report disabled scrollbar:
1697 * arrow buttons - send up/down 2010 * arrow buttons - send up/down
1698 * click on scrollbar - send pageup/down 2011 * click on scrollbar - send pageup/down
1699 */ 2012 */
1700 if ((scrollBar.style == R_SB_NEXT 2013 if (direction == UP)
1701 && scrollbarnext_upButton(ev.y))
1702 || (scrollBar.style == R_SB_RXVT
1703 && scrollbarrxvt_upButton(ev.y)))
1704 tt_printf("\033[A"); 2014 tt_printf ("\033[A");
1705 else if ((scrollBar.style == R_SB_NEXT 2015 else if (direction == DN)
1706 && scrollbarnext_dnButton(ev.y))
1707 || (scrollBar.style == R_SB_RXVT
1708 && scrollbarrxvt_dnButton(ev.y)))
1709 tt_printf("\033[B"); 2016 tt_printf ("\033[B");
1710 else 2017 else
1711 switch (ev.button) 2018 switch (ev.button)
1712 { 2019 {
1713 case Button2: 2020 case Button2:
1714 tt_printf("\014"); 2021 tt_printf ("\014");
1715 break; 2022 break;
1716 case Button1: 2023 case Button1:
1717 tt_printf("\033[6~"); 2024 tt_printf ("\033[6~");
1718 break; 2025 break;
1719 case Button3: 2026 case Button3:
1720 tt_printf("\033[5~"); 2027 tt_printf ("\033[5~");
1721 break; 2028 break;
1722 } 2029 }
1723 } 2030 }
1724 else 2031 else
1725#endif /* NO_SCROLLBAR_REPORT */ 2032#endif /* NO_SCROLLBAR_REPORT */
1726
1727 {
1728 char upordown = 0;
1729
1730 if (scrollBar.style == R_SB_NEXT)
1731 { 2033 {
1732 if (scrollbarnext_upButton(ev.y)) 2034 if (direction != NO_DIR)
1733 upordown = -1; /* up */
1734 else if (scrollbarnext_dnButton(ev.y))
1735 upordown = 1; /* down */
1736 }
1737 else if (scrollBar.style == R_SB_RXVT)
1738 {
1739 if (scrollbarrxvt_upButton(ev.y))
1740 upordown = -1; /* up */
1741 else if (scrollbarrxvt_dnButton(ev.y))
1742 upordown = 1; /* down */
1743 }
1744 if (upordown)
1745 { 2035 {
1746#ifndef NO_SCROLLBAR_BUTTON_CONTINUAL_SCROLLING 2036#ifndef NO_SCROLLBAR_BUTTON_CONTINUAL_SCROLLING
1747 scroll_arrow_delay = SCROLLBAR_INITIAL_DELAY; 2037 if (!cont_scroll_ev.is_active ())
2038 cont_scroll_ev.start (SCROLLBAR_INITIAL_DELAY, SCROLLBAR_CONTINUOUS_DELAY);
1748#endif 2039#endif
1749 if (scr_page (upordown < 0 ? UP : DN, 1)) 2040 if (scr_page (direction, 1))
1750 { 2041 {
1751 if (upordown < 0) 2042 if (direction == UP)
1752 scrollBar.setUp (); 2043 scrollBar.state = SB_STATE_UP;
1753 else 2044 else
1754 scrollBar.setDn (); 2045 scrollBar.state = SB_STATE_DOWN;
1755 } 2046 }
1756 } 2047 }
1757 else 2048 else
1758 switch (ev.button) 2049 switch (ev.button)
1759 { 2050 {
1760 case Button2: 2051 case Button2:
1761 switch (scrollbar_align) 2052 switch (scrollBar.align)
1762 { 2053 {
1763 case R_SB_ALIGN_TOP: 2054 case SB_ALIGN_TOP:
1764 csrO = 0; 2055 csrO = 0;
1765 break; 2056 break;
1766 case R_SB_ALIGN_CENTRE: 2057 case SB_ALIGN_CENTRE:
1767 csrO = (scrollBar.bot - scrollBar.top) / 2; 2058 csrO = (scrollBar.bot - scrollBar.top) / 2;
1768 break; 2059 break;
1769 case R_SB_ALIGN_BOTTOM: 2060 case SB_ALIGN_BOTTOM:
1770 csrO = scrollBar.bot - scrollBar.top; 2061 csrO = scrollBar.bot - scrollBar.top;
1771 break; 2062 break;
1772 } 2063 }
2064
1773 if (scrollBar.style == R_SB_XTERM 2065 if (scrollBar.style == SB_STYLE_XTERM
1774 || scrollbar_above_slider(ev.y) 2066 || scrollBar.above_slider (ev.y)
1775 || scrollbar_below_slider(ev.y)) 2067 || scrollBar.below_slider (ev.y))
1776 scr_move_to ( scrollbar_position(ev.y) - csrO, 2068 scr_move_to (scrollBar.position (ev.y) - csrO, scrollBar.size ());
1777 scrollbar_size()); 2069
1778 scrollBar.setMotion (); 2070 scrollBar.state = SB_STATE_MOTION;
1779 break; 2071 break;
1780 2072
1781 case Button1: 2073 case Button1:
1782 if (scrollbar_align == R_SB_ALIGN_CENTRE) 2074 if (scrollBar.align == SB_ALIGN_CENTRE)
1783 csrO = ev.y - scrollBar.top; 2075 csrO = ev.y - scrollBar.top;
1784 /* FALLTHROUGH */ 2076 /* FALLTHROUGH */
1785 2077
1786 case Button3: 2078 case Button3:
1787 if (scrollBar.style != R_SB_XTERM) 2079 if (scrollBar.style != SB_STYLE_XTERM)
1788 { 2080 {
1789 if (scrollbar_above_slider(ev.y)) 2081 if (scrollBar.above_slider (ev.y))
1790# ifdef RXVT_SCROLL_FULL 2082# ifdef RXVT_SCROLL_FULL
1791 scr_page (UP, TermWin.nrow - 1); 2083 scr_page (UP, nrow - 1);
1792# else 2084# else
1793 scr_page (UP, TermWin.nrow / 4); 2085 scr_page (UP, nrow / 4);
1794# endif 2086# endif
1795 else if (scrollbar_below_slider(ev.y)) 2087 else if (scrollBar.below_slider (ev.y))
1796# ifdef RXVT_SCROLL_FULL 2088# ifdef RXVT_SCROLL_FULL
1797 scr_page (DN, TermWin.nrow - 1); 2089 scr_page (DN, nrow - 1);
1798# else 2090# else
1799 scr_page (DN, TermWin.nrow / 4); 2091 scr_page (DN, nrow / 4);
1800# endif 2092# endif
1801 else 2093 else
1802 scrollBar.setMotion (); 2094 scrollBar.state = SB_STATE_MOTION;
1803 } 2095 }
1804 else 2096 else
1805 { 2097 {
1806 scr_page ((ev.button == Button1 ? DN : UP), 2098 scr_page ((ev.button == Button1 ? DN : UP),
1807 (TermWin.nrow 2099 (nrow
1808 * scrollbar_position(ev.y) 2100 * scrollBar.position (ev.y)
1809 / scrollbar_size())); 2101 / scrollBar.size ()));
1810 } 2102 }
2103
1811 break; 2104 break;
1812 } 2105 }
1813 } 2106 }
2107
1814 return; 2108 return;
1815 } 2109 }
1816#if MENUBAR
1817 /*
1818 * Menubar window processing of button press
1819 */
1820 if (isMenuBarWindow(ev.window))
1821 menubar_control (ev);
1822#endif
1823} 2110}
1824 2111
1825void 2112void
1826rxvt_term::button_release (const XButtonEvent &ev) 2113rxvt_term::button_release (XButtonEvent &ev)
1827{ 2114{
1828 int reportmode = 0; 2115 int reportmode = 0;
1829 2116
1830 csrO = 0; /* reset csr Offset */ 2117 csrO = 0; /* reset csr Offset */
1831 if (!bypass_keystate) 2118 if (!bypass_keystate)
1832 reportmode = !!(PrivateModes & PrivMode_mouse_report); 2119 reportmode = !! (priv_modes & PrivMode_mouse_report);
1833 2120
1834 if (scrollbar_isUpDn()) 2121 if (scrollBar.state == SB_STATE_UP || scrollBar.state == SB_STATE_DOWN)
1835 { 2122 {
1836 scrollBar.setIdle (); 2123 scrollBar.state = SB_STATE_IDLE;
1837 scrollbar_show (0); 2124 scrollBar.show (0);
1838#ifndef NO_SCROLLBAR_BUTTON_CONTINUAL_SCROLLING
1839 refresh_type &= ~SMOOTH_REFRESH;
1840#endif
1841
1842 } 2125 }
2126
1843#ifdef SELECTION_SCROLLING 2127#ifdef SELECTION_SCROLLING
1844 pending_scroll_selection=0; 2128 sel_scroll_ev.stop();
1845#endif 2129#endif
2130
1846 if (ev.window == TermWin.vt) 2131 if (ev.window == vt)
1847 { 2132 {
1848#ifdef RXVT_GRAPHICS 2133 if (HOOK_INVOKE ((this, HOOK_BUTTON_RELEASE, DT_XEVENT, &ev, DT_END)))
1849 if (ev.subwindow != None) 2134 return;
1850 rxvt_Gr_ButtonRelease(ev.x, ev.y);
1851 else
1852#endif
1853 2135
1854 { 2136#if ISO_14755
2137 // 5.4
2138 if (iso14755buf & (ISO_14755_STARTED | ISO_14755_54))
2139 return;
2140#endif
2141
1855 if (reportmode) 2142 if (reportmode)
2143 {
2144 /* mouse report from vt window */
2145 /* don't report release of wheel "buttons" */
2146 if (ev.button >= 4)
2147 return;
2148#ifdef MOUSE_REPORT_DOUBLECLICK
2149 /* only report the release of 'slow' single clicks */
2150 if (MEvent.button != AnyButton
2151 && (ev.button != MEvent.button
2152 || (ev.time - MEvent.time
2153 > multiClickTime / 2)))
1856 { 2154 {
1857 /* mouse report from vt window */ 2155 MEvent.clicks = 0;
1858 /* don't report release of wheel "buttons" */ 2156 MEvent.button = ev.button;
1859 if (ev.button >= 4) 2157 mouse_report (ev);
2158 }
2159#else /* MOUSE_REPORT_DOUBLECLICK */
2160 MEvent.button = ev.button;
2161 mouse_report (ev);
2162#endif /* MOUSE_REPORT_DOUBLECLICK */
1860 return; 2163 return;
1861#ifdef MOUSE_REPORT_DOUBLECLICK 2164 }
1862 /* only report the release of 'slow' single clicks */ 2165
1863 if (MEvent.button != AnyButton 2166 /*
1864 && (ev.button != MEvent.button 2167 * dumb hack to compensate for the failure of click-and-drag
1865 || (ev.time - MEvent.time 2168 * when overriding mouse reporting
1866 > MULTICLICK_TIME / 2))) 2169 */
2170 if (priv_modes & PrivMode_mouse_report
2171 && bypass_keystate
2172 && ev.button == Button1 && MEvent.clicks <= 1)
2173 selection_extend (ev.x, ev.y, 0);
2174
2175 switch (ev.button)
2176 {
2177 case Button1:
2178 case Button3:
2179 selection_make (ev.time);
2180 break;
2181
2182 case Button2:
2183 if (IN_RANGE_EXC (ev.x, 0, vt_width) && IN_RANGE_EXC (ev.y, 0, vt_height)) // inside window?
2184 selection_request (ev.time, ev.state & ModMetaMask ? Sel_Clipboard : Sel_Primary);
2185 break;
2186
2187#ifdef MOUSE_WHEEL
2188 case Button4:
2189 case Button5:
2190 {
2191 int lines;
2192 page_dirn dirn;
2193
2194 dirn = ev.button == Button4 ? UP : DN;
2195
2196 if (ev.state & ShiftMask)
2197 lines = 1;
2198 else if (option (Opt_mouseWheelScrollPage))
2199 lines = nrow - 1;
2200 else
2201 lines = 5;
2202
2203# ifdef MOUSE_SLIP_WHEELING
2204 if (ev.state & ControlMask)
1867 { 2205 {
1868 MEvent.clicks = 0; 2206 mouse_slip_wheel_speed += dirn;
1869 MEvent.button = AnyButton; 2207 clamp_it (mouse_slip_wheel_speed, -nrow, nrow);
1870 mouse_report (ev); 2208
2209 if (!slip_wheel_ev.is_active ())
2210 slip_wheel_ev.start (SCROLLBAR_CONTINUOUS_DELAY, SCROLLBAR_CONTINUOUS_DELAY);
1871 } 2211 }
1872#else /* MOUSE_REPORT_DOUBLECLICK */
1873 MEvent.button = AnyButton;
1874 mouse_report (ev);
1875#endif /* MOUSE_REPORT_DOUBLECLICK */
1876 return;
1877 } 2212 else
1878 /* 2213# endif
1879 * dumb hack to compensate for the failure of click-and-drag
1880 * when overriding mouse reporting
1881 */
1882 if (PrivateModes & PrivMode_mouse_report
1883 && bypass_keystate
1884 && ev.button == Button1 && MEvent.clicks <= 1)
1885 selection_extend (ev.x, ev.y, 0);
1886
1887 switch (ev.button)
1888 {
1889 case Button1:
1890 case Button3:
1891 selection_make (ev.time);
1892 break;
1893 case Button2:
1894 selection_request (ev.time, ev.x, ev.y);
1895 break;
1896#ifdef MOUSE_WHEEL
1897 case Button4:
1898 case Button5:
1899 { 2214 {
1900 int i;
1901 page_dirn v;
1902
1903 v = (ev.button == Button4) ? UP : DN;
1904 if (ev.state & ShiftMask)
1905 i = 1;
1906 else if ((Options & Opt_mouseWheelScrollPage))
1907 i = TermWin.nrow - 1;
1908 else
1909 i = 5;
1910# ifdef MOUSE_SLIP_WHEELING
1911 if (ev.state & ControlMask)
1912 {
1913 mouse_slip_wheel_speed += (v ? -1 : 1);
1914 mouse_slip_wheel_delay = SCROLLBAR_CONTINUOUS_DELAY;
1915 }
1916# endif
1917# ifdef JUMP_MOUSE_WHEEL
1918 scr_page (v, i); 2215 scr_page (dirn, lines);
1919 scr_refresh (SMOOTH_REFRESH);
1920 scrollbar_show (1); 2216 scrollBar.show (1);
1921# else
1922 while (i--)
1923 {
1924 scr_page (v, 1);
1925 scr_refresh (SMOOTH_REFRESH);
1926 scrollbar_show (1);
1927 }
1928# endif
1929
1930 }
1931 break;
1932#endif
1933
1934 }
1935 }
1936 }
1937#ifdef MENUBAR
1938 else if (isMenuBarWindow(ev.window))
1939 menubar_control (ev);
1940#endif
1941}
1942
1943
1944#ifdef TRANSPARENT
1945/*
1946 * Check our parents are still who we think they are.
1947 * Do transparency updates if required
1948 */
1949int
1950rxvt_term::check_our_parents ()
1951{
1952 int i, pchanged, aformat, have_pixmap, rootdepth;
1953 unsigned long nitems, bytes_after;
1954 Atom atype;
1955 unsigned char *prop = NULL;
1956 Window root, oldp, *list;
1957 Pixmap rootpixmap = None;
1958 XWindowAttributes wattr, wrootattr;
1959
1960 pchanged = 0;
1961
1962 if (!(Options & Opt_transparent))
1963 return pchanged; /* Don't try any more */
1964
1965 XGetWindowAttributes(display->display, display->root, &wrootattr);
1966 rootdepth = wrootattr.depth;
1967
1968 XGetWindowAttributes(display->display, TermWin.parent[0], &wattr);
1969 if (rootdepth != wattr.depth)
1970 {
1971 if (am_transparent)
1972 {
1973 pchanged = 1;
1974 XSetWindowBackground(display->display, TermWin.vt,
1975 PixColors[Color_bg]);
1976 am_transparent = am_pixmap_trans = 0;
1977 }
1978 return pchanged; /* Don't try any more */
1979 }
1980
1981 /* Get all X ops out of the queue so that our information is up-to-date. */
1982 XSync(display->display, False);
1983
1984 /*
1985 * Make the frame window set by the window manager have
1986 * the root background. Some window managers put multiple nested frame
1987 * windows for each client, so we have to take care about that.
1988 */
1989 i = (xa[XA_XROOTPMAPID] != 0
1990 && (XGetWindowProperty(display->display, display->root, xa[XA_XROOTPMAPID],
1991 0L, 1L, False, XA_PIXMAP, &atype, &aformat,
1992 &nitems, &bytes_after, &prop) == Success));
1993 if (!i || prop == NULL)
1994 have_pixmap = 0;
1995 else
1996 {
1997 have_pixmap = 1;
1998 rootpixmap = *((Pixmap *)prop);
1999 XFree(prop);
2000 }
2001 if (have_pixmap)
2002 {
2003 /*
2004 * Copy display->root pixmap transparency
2005 */
2006 int sx, sy, nx, ny;
2007 unsigned int nw, nh;
2008 Window cr;
2009 XImage *image;
2010 GC gc;
2011 XGCValues gcvalue;
2012
2013 XTranslateCoordinates(display->display, TermWin.parent[0], display->root,
2014 0, 0, &sx, &sy, &cr);
2015 nw = (unsigned int)szHint.width;
2016 nh = (unsigned int)szHint.height;
2017 nx = ny = 0;
2018 if (sx < 0)
2019 {
2020 nw += sx;
2021 nx = -sx;
2022 sx = 0;
2023 }
2024 if (sy < 0)
2025 {
2026 nh += sy;
2027 ny = -sy;
2028 sy = 0;
2029 }
2030 MIN_IT(nw, (unsigned int)(wrootattr.width - sx));
2031 MIN_IT(nh, (unsigned int)(wrootattr.height - sy));
2032 allowedxerror = -1;
2033 image = XGetImage(display->display, rootpixmap, sx, sy, nw, nh, AllPlanes,
2034 ZPixmap);
2035 /* XXX: handle BadMatch - usually because we're outside the pixmap */
2036 /* XXX: may need a delay here? */
2037 allowedxerror = 0;
2038 if (image == NULL)
2039 {
2040 if (am_transparent && am_pixmap_trans)
2041 {
2042 pchanged = 1;
2043 if (TermWin.pixmap != None)
2044 {
2045 XFreePixmap(display->display, TermWin.pixmap);
2046 TermWin.pixmap = None;
2047 } 2217 }
2048 } 2218 }
2049 am_pixmap_trans = 0; 2219 break;
2220#endif
2221 }
2222 }
2223}
2224
2225/*}}} */
2226
2227void ecb_hot
2228rxvt_term::cmd_parse ()
2229{
2230 wchar_t ch = NOCHAR;
2231 char *seq_begin; // remember start of esc-sequence here
2232
2233 for (;;)
2234 {
2235 if (ecb_unlikely (ch == NOCHAR))
2236 {
2237 seq_begin = cmdbuf_ptr;
2238 ch = next_char ();
2239
2240 if (ch == NOCHAR)
2241 break;
2242 }
2243
2244 if (ecb_likely (!IS_CONTROL (ch) || ch == C0_LF || ch == C0_CR || ch == C0_HT))
2245 {
2246 if (ecb_unlikely (!seen_input))
2247 {
2248 seen_input = 1;
2249 // many badly-written programs (e.g. jed) contain a race condition:
2250 // they first read the screensize and then install a SIGWINCH handler.
2251 // some window managers resize the window early, and these programs
2252 // then sometimes get the size wrong.
2253 // unfortunately other programs are even more buggy and dislike
2254 // being sent SIGWINCH, so only do it when we were in fact being
2255 // resized.
2256 if (seen_resize && cmd_pid)
2257 kill (-cmd_pid, SIGWINCH);
2258 }
2259
2260 /* Read a text string from the input buffer */
2261 wchar_t buf[UBUFSIZ];
2262 bool refreshnow = false;
2263 int nlines = 0;
2264 wchar_t *str = buf;
2265 wchar_t *eol = str + min (ncol, UBUFSIZ);
2266
2267 for (;;)
2268 {
2269 if (ecb_unlikely (ch == NOCHAR || (IS_CONTROL (ch) && ch != C0_LF && ch != C0_CR && ch != C0_HT)))
2270 break;
2271
2272 *str++ = ch;
2273
2274 if (ecb_unlikely (ch == C0_LF || str >= eol))
2275 {
2276 if (ch == C0_LF)
2277 nlines++;
2278
2279 refresh_count++;
2280
2281 if (!option (Opt_jumpScroll) || refresh_count >= nrow - 1)
2282 {
2283 refresh_count = 0;
2284
2285 if (!option (Opt_skipScroll) || ev_time () > ev::now () + 1. / 60.)
2286 {
2287 refreshnow = true;
2288 ch = NOCHAR;
2289 break;
2290 }
2291 }
2292
2293 // scr_add_lines only works for nlines <= nrow - 1.
2294 if (nlines >= nrow - 1)
2295 {
2296 if (!(SHOULD_INVOKE (HOOK_ADD_LINES)
2297 && HOOK_INVOKE ((this, HOOK_ADD_LINES, DT_WCS_LEN, buf, str - buf, DT_END))))
2298 scr_add_lines (buf, str - buf, nlines);
2299
2300 nlines = 0;
2301 str = buf;
2302 eol = str + min (ncol, UBUFSIZ);
2303 }
2304
2305 if (str >= eol)
2306 {
2307 if (eol >= buf + UBUFSIZ)
2308 {
2309 ch = NOCHAR;
2310 break;
2311 }
2312 else
2313 eol = min (eol + ncol, buf + UBUFSIZ);
2314 }
2315
2316 }
2317
2318 seq_begin = cmdbuf_ptr;
2319 ch = next_char ();
2320 }
2321
2322 if (!(SHOULD_INVOKE (HOOK_ADD_LINES)
2323 && HOOK_INVOKE ((this, HOOK_ADD_LINES, DT_WCS_LEN, buf, str - buf, DT_END))))
2324 scr_add_lines (buf, str - buf, nlines);
2325
2326 /*
2327 * If there have been a lot of new lines, then update the screen
2328 * What the heck we'll cheat and only refresh less than every page-full.
2329 * if skipScroll is enabled.
2330 */
2331 if (refreshnow)
2332 {
2333 scr_refresh ();
2334 want_refresh = 1;
2335 }
2050 } 2336 }
2051 else 2337 else
2052 { 2338 {
2053 if (TermWin.pixmap != None) 2339 try
2054 XFreePixmap(display->display, TermWin.pixmap);
2055 TermWin.pixmap = XCreatePixmap(display->display, TermWin.vt,
2056 (unsigned int)szHint.width,
2057 (unsigned int)szHint.height,
2058 (unsigned int)image->depth);
2059 gc = XCreateGC(display->display, TermWin.vt, 0UL, &gcvalue);
2060 XPutImage(display->display, TermWin.pixmap, gc, image, 0, 0,
2061 nx, ny, (unsigned int)image->width,
2062 (unsigned int)image->height);
2063 XFreeGC(display->display, gc);
2064 XDestroyImage(image);
2065 XSetWindowBackgroundPixmap(display->display, TermWin.vt,
2066 TermWin.pixmap);
2067 if (!am_transparent || !am_pixmap_trans)
2068 pchanged = 1;
2069 am_transparent = am_pixmap_trans = 1;
2070 }
2071 }
2072 if (!am_pixmap_trans)
2073 {
2074 unsigned int n;
2075 /*
2076 * InheritPixmap transparency
2077 */
2078 D_X((stderr, "InheritPixmap Seeking to %08lx", display->root));
2079 for (i = 1; i < (int)(sizeof(TermWin.parent) / sizeof(Window));
2080 i++)
2081 {
2082 oldp = TermWin.parent[i];
2083 XQueryTree(display->display, TermWin.parent[i - 1], &root,
2084 &TermWin.parent[i], &list, &n);
2085 XFree(list);
2086 D_X((stderr, "InheritPixmap Parent[%d] = %08lx", i, TermWin.parent[i]));
2087 if (TermWin.parent[i] == display->root)
2088 { 2340 {
2089 if (oldp != None) 2341 process_nonprinting (ch);
2090 pchanged = 1; 2342 }
2343 catch (const class out_of_input &o)
2344 {
2345 // we ran out of input, retry later
2346 cmdbuf_ptr = seq_begin;
2091 break; 2347 break;
2092 } 2348 }
2093 if (oldp != TermWin.parent[i]) 2349
2094 pchanged = 1; 2350 ch = NOCHAR;
2095 }
2096 n = 0;
2097 if (pchanged)
2098 { 2351 }
2099 for (; n < (unsigned int)i; n++) 2352 }
2100 { 2353}
2101 XGetWindowAttributes(display->display, TermWin.parent[n], &wattr); 2354
2102 D_X((stderr, "InheritPixmap Checking Parent[%d]: %s", n, (wattr.depth == rootdepth && wattr.class != InputOnly) ? "OK" : "FAIL")); 2355// read the next character
2103 if (wattr.depth != rootdepth || wattr.c_class == InputOnly) 2356wchar_t ecb_hot
2104 { 2357rxvt_term::next_char () noexcept
2105 n = (int)(sizeof(TermWin.parent) / sizeof(Window)) + 1; 2358{
2106 break; 2359 while (cmdbuf_ptr < cmdbuf_endp)
2107 } 2360 {
2108 } 2361 // assume 7-bit to be ascii ALWAYS (always true in POSIX)
2362 if (ecb_likely ((unsigned char)*cmdbuf_ptr <= 0x7f))
2363 return *cmdbuf_ptr++;
2364
2365 wchar_t wc;
2366 size_t len = mbrtowc (&wc, cmdbuf_ptr, cmdbuf_endp - cmdbuf_ptr, mbstate);
2367
2368 if (len == (size_t)-2)
2109 } 2369 {
2110 if (n > (int)(sizeof(TermWin.parent) 2370 // the mbstate stores incomplete sequences. didn't know this :/
2111 / sizeof(TermWin.parent[0]))) 2371 cmdbuf_ptr = cmdbuf_endp;
2372 break;
2112 { 2373 }
2113 D_X((stderr, "InheritPixmap Turning off")); 2374
2114 XSetWindowBackground(display->display, TermWin.parent[0], 2375 if (len == (size_t)-1)
2115 PixColors[Color_fg]);
2116 XSetWindowBackground(display->display, TermWin.vt,
2117 PixColors[Color_bg]);
2118 am_transparent = 0;
2119 /* XXX: also turn off Opt_transparent? */
2120 } 2376 {
2121 else 2377 mbstate.reset (); // reset now undefined conversion state
2378 // a -1 might indicate that a previous incomplete char is invalid (previous return -2)
2379 // in which case we "erroneously" return the next byte which might be valid.
2380 return (unsigned char)*cmdbuf_ptr++; // the _occasional_ latin1 character is allowed to slip through
2122 { 2381 }
2123 /* wait (an arbitrary period) for the WM to do its thing
2124 * needed for fvwm2.2.2 (and before?) */
2125# ifdef HAVE_NANOSLEEP
2126 struct timespec rqt;
2127 2382
2128 rqt.tv_sec = 1; 2383 // assume wchar == unicode
2129 rqt.tv_nsec = 0; 2384 cmdbuf_ptr += len;
2130 nanosleep(&rqt, NULL); 2385 return wc & UNICODE_MASK;
2131# else
2132 sleep(1);
2133# endif
2134 D_X((stderr, "InheritPixmap Turning on (%d parents)", i - 1));
2135 for (n = 0; n < (unsigned int)i; n++)
2136 XSetWindowBackgroundPixmap(display->display, TermWin.parent[n],
2137 ParentRelative);
2138 XSetWindowBackgroundPixmap(display->display, TermWin.vt,
2139 ParentRelative);
2140 am_transparent = 1;
2141 }
2142 for (; i < (int)(sizeof(TermWin.parent) / sizeof(Window)); i++)
2143 TermWin.parent[i] = None;
2144 } 2386 }
2387
2388 return NOCHAR;
2389}
2390
2391// read the next octet
2392uint32_t ecb_hot
2393rxvt_term::next_octet () noexcept
2394{
2395 return cmdbuf_ptr < cmdbuf_endp
2396 ? (unsigned char)*cmdbuf_ptr++
2397 : NOCHAR;
2398}
2399
2400static class out_of_input out_of_input;
2401
2402wchar_t ecb_hot
2403rxvt_term::cmd_getc ()
2404{
2405 wchar_t c = next_char ();
2406
2407 if (c == NOCHAR)
2408 throw out_of_input;
2409
2145 return pchanged; 2410 return c;
2146} 2411}
2147#endif
2148 2412
2149/*}}} */ 2413uint32_t ecb_hot
2414rxvt_term::cmd_get8 ()
2415{
2416 uint32_t c = next_octet ();
2417
2418 if (c == NOCHAR)
2419 throw out_of_input;
2420
2421 return c;
2422}
2150 2423
2151/*{{{ print pipe */ 2424/*{{{ print pipe */
2152/*----------------------------------------------------------------------*/ 2425/*----------------------------------------------------------------------*/
2153#ifdef PRINTPIPE 2426#ifdef PRINTPIPE
2154FILE * 2427FILE * ecb_cold
2155rxvt_term::popen_printer () 2428rxvt_term::popen_printer ()
2156{ 2429{
2157 FILE *stream = popen(rs[Rs_print_pipe], "w"); 2430 FILE *stream = popen (rs[Rs_print_pipe] ? rs[Rs_print_pipe] : PRINTPIPE, "w");
2158 2431
2159 if (stream == NULL) 2432 if (stream == NULL)
2160 rxvt_print_error("can't open printer pipe"); 2433 rxvt_warn ("can't open printer pipe, not printing.\n");
2434
2161 return stream; 2435 return stream;
2162} 2436}
2163 2437
2164int 2438int ecb_cold
2165rxvt_term::pclose_printer (FILE *stream) 2439rxvt_term::pclose_printer (FILE *stream)
2166{ 2440{
2167 fflush (stream); 2441 fflush (stream);
2168 /* pclose() reported not to work on SunOS 4.1.3 */
2169# if defined (__sun__) /* TODO: RESOLVE THIS */
2170 /* pclose works provided SIGCHLD handler uses waitpid */
2171 return pclose (stream); /* return fclose (stream); */
2172# else
2173 return pclose (stream); 2442 return pclose (stream);
2174# endif
2175} 2443}
2176 2444
2177/* 2445/*
2178 * simulate attached vt100 printer 2446 * simulate attached vt100 printer
2179 */ 2447 */
2180void 2448void ecb_cold
2181rxvt_term::process_print_pipe () 2449rxvt_term::process_print_pipe ()
2182{ 2450{
2183 int done; 2451 FILE *fd = popen_printer ();
2184 FILE *fd;
2185 2452
2186 if ((fd = popen_printer ()) == NULL) 2453 if (!fd)
2187 return; 2454 return;
2188 2455
2189 /* 2456 /*
2190 * Send all input to the printer until either ESC[4i or ESC[?4i 2457 * Send all input to the printer until either ESC[4i or ESC[?4i
2191 * is received. 2458 * is received.
2192 */ 2459 */
2193 for (done = 0; !done;) 2460 for (int done = 0; !done; )
2194 { 2461 {
2195 unsigned char buf[8]; 2462 unsigned char buf[8];
2196 unsigned char ch; 2463 unicode_t ch;
2197 unsigned int i, len; 2464 unsigned int i, len;
2198 2465
2199 if ((ch = cmd_getc ()) != C0_ESC) 2466 if ((ch = cmd_getc ()) != C0_ESC)
2200 { 2467 {
2201 if (putc(ch, fd) == EOF) 2468 if (putc (ch, fd) == EOF)
2202 break; /* done = 1 */ 2469 break; /* done = 1 */
2203 } 2470 }
2204 else 2471 else
2205 { 2472 {
2206 len = 0; 2473 len = 0;
2217 { 2484 {
2218 if ((buf[len++] = cmd_getc ()) == 'i') 2485 if ((buf[len++] = cmd_getc ()) == 'i')
2219 break; /* done = 1 */ 2486 break; /* done = 1 */
2220 } 2487 }
2221 } 2488 }
2489
2222 for (i = 0; i < len; i++) 2490 for (i = 0; i < len; i++)
2223 if (putc(buf[i], fd) == EOF) 2491 if (putc (buf[i], fd) == EOF)
2224 { 2492 {
2225 done = 1; 2493 done = 1;
2226 break; 2494 break;
2227 } 2495 }
2228 } 2496 }
2229 } 2497 }
2498
2230 pclose_printer (fd); 2499 pclose_printer (fd);
2231} 2500}
2232#endif /* PRINTPIPE */ 2501#endif /* PRINTPIPE */
2233/*}}} */ 2502/*}}} */
2234 2503
2235/* *INDENT-OFF* */
2236enum { 2504enum {
2237 C1_40 = 0x40, 2505 C1_40 = 0x40,
2238 C1_41 , C1_BPH, C1_NBH, C1_44 , C1_NEL, C1_SSA, C1_ESA, 2506 C1_41 , C1_BPH, C1_NBH, C1_44 , C1_NEL, C1_SSA, C1_ESA,
2239 C1_HTS, C1_HTJ, C1_VTS, C1_PLD, C1_PLU, C1_RI , C1_SS2, C1_SS3, 2507 C1_HTS, C1_HTJ, C1_VTS, C1_PLD, C1_PLU, C1_RI , C1_SS2, C1_SS3,
2240 C1_DCS, C1_PU1, C1_PU2, C1_STS, C1_CCH, C1_MW , C1_SPA, C1_EPA, 2508 C1_DCS, C1_PU1, C1_PU2, C1_STS, C1_CCH, C1_MW , C1_SPA, C1_EPA,
2241 C1_SOS, C1_59 , C1_SCI, C1_CSI, CS_ST , C1_OSC, C1_PM , C1_APC 2509 C1_SOS, C1_59 , C1_SCI, C1_CSI, CS_ST , C1_OSC, C1_PM , C1_APC,
2242}; 2510};
2243/* *INDENT-ON* */
2244 2511
2245/*{{{ process non-printing single characters */ 2512/*{{{ process non-printing single characters */
2246void 2513void ecb_hot
2247rxvt_term::process_nonprinting (unsigned char ch) 2514rxvt_term::process_nonprinting (unicode_t ch)
2248{ 2515{
2249 switch (ch) 2516 switch (ch)
2250 { 2517 {
2518 case C0_ESC:
2519 process_escape_seq ();
2520 break;
2251 case C0_ENQ: /* terminal Status */ 2521 case C0_ENQ: /* terminal Status */
2252 if (rs[Rs_answerbackstring]) 2522 if (rs[Rs_answerbackstring])
2253 tt_write( 2523 tt_write (rs [Rs_answerbackstring], strlen (rs [Rs_answerbackstring]));
2254 (const unsigned char *)rs[Rs_answerbackstring],
2255 (unsigned int)STRLEN(rs[Rs_answerbackstring]));
2256 else 2524 else
2257 tt_write((unsigned char *)VT100_ANS, 2525 tt_write (VT100_ANS, strlen (VT100_ANS));
2258 (unsigned int)STRLEN(VT100_ANS));
2259 break; 2526 break;
2260 case C0_BEL: /* bell */ 2527 case C0_BEL: /* bell */
2261 scr_bell (); 2528 scr_bell ();
2262 break; 2529 break;
2263 case C0_BS: /* backspace */ 2530 case C0_BS: /* backspace */
2278 scr_charset_choose (1); 2545 scr_charset_choose (1);
2279 break; 2546 break;
2280 case C0_SI: /* shift in - acs */ 2547 case C0_SI: /* shift in - acs */
2281 scr_charset_choose (0); 2548 scr_charset_choose (0);
2282 break; 2549 break;
2550
2551#ifdef EIGHT_BIT_CONTROLS
2552 // 8-bit controls
2553 case 0x90: /* DCS */
2554 process_dcs_seq ();
2555 break;
2556 case 0x9b: /* CSI */
2557 process_csi_seq ();
2558 break;
2559 case 0x9d: /* OSC */
2560 process_osc_seq ();
2561 break;
2562#endif
2283 } 2563 }
2284} 2564}
2285/*}}} */ 2565/*}}} */
2286 2566
2287 2567
2288/*{{{ process VT52 escape sequences */ 2568/*{{{ process VT52 escape sequences */
2289void 2569void ecb_cold
2290rxvt_term::process_escape_vt52 (unsigned char ch) 2570rxvt_term::process_escape_vt52 (unicode_t ch)
2291{ 2571{
2292 int row, col; 2572 int row, col;
2293 2573
2294 switch (ch) 2574 switch (ch)
2295 { 2575 {
2325 row = cmd_getc () - ' '; 2605 row = cmd_getc () - ' ';
2326 col = cmd_getc () - ' '; 2606 col = cmd_getc () - ' ';
2327 scr_gotorc (row, col, 0); 2607 scr_gotorc (row, col, 0);
2328 break; 2608 break;
2329 case 'Z': /* identify the terminal type */ 2609 case 'Z': /* identify the terminal type */
2330 tt_printf("\033/Z"); /* I am a VT100 emulating a VT52 */ 2610 tt_printf ("\033/Z"); /* I am a VT100 emulating a VT52 */
2331 break; 2611 break;
2332 case '<': /* turn off VT52 mode */ 2612 case '<': /* turn off VT52 mode */
2333 PrivMode(0, PrivMode_vt52); 2613 priv_modes &= ~PrivMode_vt52;
2334 break; 2614 break;
2335 case 'F': /* use special graphics character set */ 2615 case 'F': /* use special graphics character set */
2336 case 'G': /* use regular character set */ 2616 case 'G': /* use regular character set */
2337 /* unimplemented */ 2617 /* unimplemented */
2338 break; 2618 break;
2344} 2624}
2345/*}}} */ 2625/*}}} */
2346 2626
2347 2627
2348/*{{{ process escape sequences */ 2628/*{{{ process escape sequences */
2349void 2629void ecb_hot
2350rxvt_term::process_escape_seq () 2630rxvt_term::process_escape_seq ()
2351{ 2631{
2352 unsigned char ch = cmd_getc (); 2632 unicode_t ch = cmd_getc ();
2353 2633
2354 if (PrivateModes & PrivMode_vt52) 2634 if (priv_modes & PrivMode_vt52)
2355 { 2635 {
2356 process_escape_vt52 (ch); 2636 process_escape_vt52 (ch);
2357 return; 2637 return;
2358 } 2638 }
2359 2639
2360 switch (ch) 2640 switch (ch)
2361 { 2641 {
2362 /* case 1: do_tek_mode (); break; */
2363 case '#': 2642 case '#':
2364 if (cmd_getc () == '8') 2643 if (cmd_getc () == '8')
2365 scr_E (); 2644 scr_E ();
2366 break; 2645 break;
2367 case '(': 2646 case '(':
2374 scr_charset_set (2, (unsigned int)cmd_getc ()); 2653 scr_charset_set (2, (unsigned int)cmd_getc ());
2375 break; 2654 break;
2376 case '+': 2655 case '+':
2377 scr_charset_set (3, (unsigned int)cmd_getc ()); 2656 scr_charset_set (3, (unsigned int)cmd_getc ());
2378 break; 2657 break;
2379#ifdef MULTICHAR_SET 2658#if !ENABLE_MINIMAL
2380 case '$':
2381 scr_charset_set (-2, (unsigned int)cmd_getc ());
2382 break;
2383#endif
2384#ifndef NO_FRILLS
2385 case '6': 2659 case '6':
2386 scr_backindex (); 2660 scr_backindex ();
2387 break; 2661 break;
2388#endif 2662#endif
2389 case '7': 2663 case '7':
2390 scr_cursor (SAVE); 2664 scr_cursor (SAVE);
2391 break; 2665 break;
2392 case '8': 2666 case '8':
2393 scr_cursor (RESTORE); 2667 scr_cursor (RESTORE);
2394 break; 2668 break;
2395#ifndef NO_FRILLS 2669#if !ENABLE_MINIMAL
2396 case '9': 2670 case '9':
2397 scr_forwardindex (); 2671 scr_forwardindex ();
2398 break; 2672 break;
2399#endif 2673#endif
2674 // DECPAM/DECPNM
2400 case '=': 2675 case '=':
2676 priv_modes |= PrivMode_aplKP;
2677 break;
2401 case '>': 2678 case '>':
2402 PrivMode((ch == '='), PrivMode_aplKP); 2679 priv_modes &= ~PrivMode_aplKP;
2403 break; 2680 break;
2404 2681
2405 case C1_40: 2682 case C1_40:
2406 cmd_getc (); 2683 cmd_getc ();
2407 break; 2684 break;
2410 break; 2687 break;
2411 2688
2412 /* 8.3.87: NEXT LINE */ 2689 /* 8.3.87: NEXT LINE */
2413 case C1_NEL: /* ESC E */ 2690 case C1_NEL: /* ESC E */
2414 { 2691 {
2415 uint32_t nlcr[] = { '\n', '\r' }; 2692 wchar_t nlcr[] = { C0_LF, C0_CR };
2416 scr_add_lines (nlcr, 1, 2); 2693 scr_add_lines (nlcr, ecb_array_length (nlcr), 1);
2417 } 2694 }
2418 break; 2695 break;
2419 2696
2697#if 0 // disabled because embedded newlines can make exploits easier
2420 /* kidnapped escape sequence: Should be 8.3.48 */ 2698 /* kidnapped escape sequence: Should be 8.3.48 */
2421 case C1_ESA: /* ESC G */ 2699 case C1_ESA: /* ESC G */
2422 process_graphics (); 2700 // used by original rxvt for rob nations own graphics mode
2701 if (cmd_getc () == 'Q' && option (Opt_insecure))
2702 tt_printf ("\033G0\012"); /* query graphics - no graphics */
2423 break; 2703 break;
2704#endif
2424 2705
2425 /* 8.3.63: CHARACTER TABULATION SET */ 2706 /* 8.3.63: CHARACTER TABULATION SET */
2426 case C1_HTS: /* ESC H */ 2707 case C1_HTS: /* ESC H */
2427 scr_set_tab (1); 2708 scr_set_tab (1);
2428 break; 2709 break;
2431 case C1_RI: /* ESC M */ 2712 case C1_RI: /* ESC M */
2432 scr_index (DN); 2713 scr_index (DN);
2433 break; 2714 break;
2434 2715
2435 /* 8.3.142: SINGLE-SHIFT TWO */ 2716 /* 8.3.142: SINGLE-SHIFT TWO */
2436 /*case C1_SS2: scr_single_shift (2); break; */ 2717 /* case C1_SS2: break; */
2437 2718
2438 /* 8.3.143: SINGLE-SHIFT THREE */ 2719 /* 8.3.143: SINGLE-SHIFT THREE */
2439 /*case C1_SS3: scr_single_shift (3); break; */ 2720 /* case C1_SS3: break; */
2440 2721
2441 /* 8.3.27: DEVICE CONTROL STRING */ 2722 /* 8.3.27: DEVICE CONTROL STRING */
2442 case C1_DCS: /* ESC P */ 2723 case C1_DCS: /* ESC P */
2443 process_dcs_seq (); 2724 process_dcs_seq ();
2444 break; 2725 break;
2445 2726
2446 /* 8.3.110: SINGLE CHARACTER INTRODUCER */ 2727 /* 8.3.110: SINGLE CHARACTER INTRODUCER */
2447 case C1_SCI: /* ESC Z */ 2728 case C1_SCI: /* ESC Z */
2448 tt_write((const unsigned char *)ESCZ_ANSWER, 2729 tt_write (ESCZ_ANSWER, sizeof (ESCZ_ANSWER) - 1);
2449 (unsigned int)(sizeof(ESCZ_ANSWER) - 1));
2450 break; /* steal obsolete ESC [ c */ 2730 break; /* steal obsolete ESC [ c */
2451 2731
2452 /* 8.3.16: CONTROL SEQUENCE INTRODUCER */ 2732 /* 8.3.16: CONTROL SEQUENCE INTRODUCER (CSI) */
2453 case C1_CSI: /* ESC [ */ 2733 case C1_CSI: /* ESC [ */
2454 process_csi_seq (); 2734 process_csi_seq ();
2455 break; 2735 break;
2456 2736
2457 /* 8.3.90: OPERATING SYSTEM COMMAND */ 2737 /* 8.3.90: OPERATING SYSTEM COMMAND (OSC) */
2458 case C1_OSC: /* ESC ] */ 2738 case C1_OSC: /* ESC ] */
2459 process_osc_seq (); 2739 process_osc_seq ();
2460 break; 2740 break;
2461 2741
2462 /* 8.3.106: RESET TO INITIAL STATE */ 2742 /* 8.3.106: RESET TO INITIAL STATE (RIS) */
2463 case 'c': 2743 case 'c':
2744 mbstate.reset ();
2464 scr_poweron (); 2745 scr_poweron ();
2465 scrollbar_show (1); 2746 scrollBar.show (1);
2466 break; 2747 break;
2467 2748
2468 /* 8.3.79: LOCKING-SHIFT TWO (see ISO2022) */ 2749 /* 8.3.79: LOCKING-SHIFT TWO (see ISO2022) */
2469 case 'n': 2750 case 'n':
2470 scr_charset_choose (2); 2751 scr_charset_choose (2);
2477 } 2758 }
2478} 2759}
2479/*}}} */ 2760/*}}} */
2480 2761
2481/*{{{ process CONTROL SEQUENCE INTRODUCER (CSI) sequences `ESC[' */ 2762/*{{{ process CONTROL SEQUENCE INTRODUCER (CSI) sequences `ESC[' */
2482/* *INDENT-OFF* */
2483enum { 2763enum {
2484 CSI_ICH = 0x40, 2764 CSI_ICH = 0x40,
2485 CSI_CUU, CSI_CUD, CSI_CUF, CSI_CUB, CSI_CNL, CSI_CPL, CSI_CHA, 2765 CSI_CUU, CSI_CUD, CSI_CUF, CSI_CUB, CSI_CNL, CSI_CPL, CSI_CHA,
2486 CSI_CUP, CSI_CHT, CSI_ED , CSI_EL , CSI_IL , CSI_DL , CSI_EF , CSI_EA , 2766 CSI_CUP, CSI_CHT, CSI_ED , CSI_EL , CSI_IL , CSI_DL , CSI_EF , CSI_EA ,
2487 CSI_DCH, CSI_SEE, CSI_CPR, CSI_SU , CSI_SD , CSI_NP , CSI_PP , CSI_CTC, 2767 CSI_DCH, CSI_SEE, CSI_CPR, CSI_SU , CSI_SD , CSI_NP , CSI_PP , CSI_CTC,
2488 CSI_ECH, CSI_CVT, CSI_CBT, CSI_SRS, CSI_PTX, CSI_SDS, CSI_SIMD, CSI_5F, 2768 CSI_ECH, CSI_CVT, CSI_CBT, CSI_SRS, CSI_PTX, CSI_SDS, CSI_SIMD, CSI_5F,
2489 CSI_HPA, CSI_HPR, CSI_REP, CSI_DA , CSI_VPA, CSI_VPR, CSI_HVP, CSI_TBC, 2769 CSI_HPA, CSI_HPR, CSI_REP, CSI_DA , CSI_VPA, CSI_VPR, CSI_HVP, CSI_TBC,
2490 CSI_SM , CSI_MC , CSI_HPB, CSI_VPB, CSI_RM , CSI_SGR, CSI_DSR, CSI_DAQ, 2770 CSI_SM , CSI_MC , CSI_HPB, CSI_VPB, CSI_RM , CSI_SGR, CSI_DSR, CSI_DAQ,
2491 CSI_70 , CSI_71 , CSI_72 , CSI_73 , CSI_74 , CSI_75 , CSI_76 , CSI_77 , 2771 CSI_70 , CSI_71 , CSI_72 , CSI_73 , CSI_74 , CSI_75 , CSI_76 , CSI_77 ,
2492 CSI_78 , CSI_79 , CSI_7A , CSI_7B , CSI_7C , CSI_7D , CSI_7E , CSI_7F 2772 CSI_78 , CSI_79 , CSI_7A , CSI_7B , CSI_7C , CSI_7D , CSI_7E , CSI_7F
2493}; 2773};
2494 2774
2495#define make_byte(b7,b6,b5,b4,b3,b2,b1,b0) \ 2775#define make_byte(b0,b1,b2,b3,b4,b5,b6,b7) \
2496 (((b7) << 7) | ((b6) << 6) | ((b5) << 5) | ((b4) << 4) \ 2776 (((b7) << 7) | ((b6) << 6) | ((b5) << 5) | ((b4) << 4) \
2497 | ((b3) << 3) | ((b2) << 2) | ((b1) << 1) | (b0)) 2777 | ((b3) << 3) | ((b2) << 2) | ((b1) << 1) | (b0))
2498#define get_byte_array_bit(array, bit) \ 2778#define get_byte_array_bit(array, bit) \
2499 (!!((array)[(bit) / 8] & (128 >> ((bit) & 7)))) 2779 (!! ((array)[(bit) >> 3] & (1 << ((bit) & 7))))
2500 2780
2501const unsigned char csi_defaults[] = 2781static const unsigned char csi_defaults[] =
2502 { 2782 {
2503 make_byte(1,1,1,1,1,1,1,1), /* @, A, B, C, D, E, F, G, */ 2783 make_byte (1,1,1,1,1,1,1,1), /* @, A, B, C, D, E, F, G, */
2504 make_byte(1,1,0,0,1,1,0,0), /* H, I, J, K, L, M, N, O, */ 2784 make_byte (1,1,0,0,1,1,0,0), /* H, I, J, K, L, M, N, O, */
2505 make_byte(1,0,1,1,1,1,1,0), /* P, Q, R, S, T, U, V, W, */ 2785 make_byte (1,0,1,1,1,1,1,0), /* P, Q, R, S, T, U, V, W, */
2506 make_byte(1,1,1,0,0,0,1,0), /* X, Y, Z, [, \, ], ^, _, */ 2786 make_byte (1,1,1,0,0,0,1,0), /* X, Y, Z, [, \, ], ^, _, */
2507 make_byte(1,1,1,0,1,1,1,0), /* `, a, b, c, d, e, f, g, */ 2787 make_byte (1,1,1,0,1,1,1,0), /* `, a, b, c, d, e, f, g, */
2508 make_byte(0,0,1,1,0,0,0,0), /* h, i, j, k, l, m, n, o, */ 2788 make_byte (0,0,1,1,0,0,0,0), /* h, i, j, k, l, m, n, o, */
2509 make_byte(0,0,0,0,0,0,0,0), /* p, q, r, s, t, u, v, w, */ 2789 make_byte (0,0,0,0,0,0,0,0), /* p, q, r, s, t, u, v, w, */
2510 make_byte(0,0,0,0,0,0,0,0) /* x, y, z, {, |, }, ~, */ 2790 make_byte (0,0,0,0,0,0,0,0), /* x, y, z, {, |, }, ~, */
2511 }; 2791 };
2512/* *INDENT-ON* */
2513 2792
2514void 2793void ecb_hot
2515rxvt_term::process_csi_seq () 2794rxvt_term::process_csi_seq ()
2516{ 2795{
2517 unsigned char ch, priv, i; 2796 unicode_t ch, priv, prev_ch, i;
2518 unsigned int nargs, p; 2797 unsigned int nargs, p;
2519 int n, ndef; 2798 int n, ndef;
2520 int arg[ESC_ARGS]; 2799 int arg[ESC_ARGS] = { };
2521 2800
2522 for (nargs = ESC_ARGS; nargs > 0;) 2801 nargs = 0;
2523 arg[--nargs] = 0;
2524 2802
2525 priv = 0; 2803 priv = 0;
2526 ch = cmd_getc (); 2804 ch = cmd_getc ();
2527 if (ch >= '<' && ch <= '?') 2805 if ((ch >= '<' && ch <= '?') || ch == '!')
2806 {
2528 { /* '<' '=' '>' '?' */ 2807 /* '<' '=' '>' '?' '!' */
2529 priv = ch; 2808 priv = ch;
2530 ch = cmd_getc (); 2809 ch = cmd_getc ();
2531 } 2810 }
2811
2812 prev_ch = 0;
2532 /* read any numerical arguments */ 2813 /* read any numerical arguments */
2533 for (n = -1; ch < CSI_ICH; ) 2814 for (n = -1; ch < CSI_ICH; )
2534 { 2815 {
2535 if (isdigit(ch)) 2816 if (isdigit (ch))
2536 { 2817 {
2537 if (n < 0) 2818 if (n < 0)
2538 n = ch - '0'; 2819 n = ch - '0';
2539 else 2820 else
2540 n = n * 10 + ch - '0'; 2821 n = n * 10 + ch - '0';
2543 { 2824 {
2544 if (nargs < ESC_ARGS) 2825 if (nargs < ESC_ARGS)
2545 arg[nargs++] = n; 2826 arg[nargs++] = n;
2546 n = -1; 2827 n = -1;
2547 } 2828 }
2548 else if (ch == '\b') 2829 else if (IS_CONTROL (ch))
2549 {
2550 scr_backspace ();
2551 }
2552 else if (ch == C0_ESC)
2553 {
2554 process_escape_seq ();
2555 return;
2556 }
2557 else if (ch < ' ')
2558 {
2559 process_nonprinting (ch); 2830 process_nonprinting (ch);
2560 } 2831
2832 prev_ch = ch;
2561 ch = cmd_getc (); 2833 ch = cmd_getc ();
2562 } 2834 }
2563 2835
2564 if (ch > CSI_7F) 2836 if (ch > CSI_7F)
2565 return; 2837 return;
2566 2838
2567 if (nargs < ESC_ARGS) 2839 if (nargs < ESC_ARGS)
2568 arg[nargs++] = n; 2840 arg[nargs++] = n;
2569 2841
2570 i = ch - CSI_ICH; 2842 i = ch - CSI_ICH;
2571 ndef = get_byte_array_bit(csi_defaults, i); 2843 ndef = get_byte_array_bit (csi_defaults, i);
2572 for (p = 0; p < nargs; p++) 2844 for (p = 0; p < nargs; p++)
2573 if (arg[p] == -1) 2845 if (arg[p] == -1)
2574 arg[p] = ndef; 2846 arg[p] = ndef;
2575
2576#ifdef DEBUG_CMD
2577 fprintf(stderr, "CSI ");
2578 for (p = 0; p < nargs; p++)
2579 fprintf(stderr, "%d%s", arg[p], p < nargs - 1 ? ";" : "");
2580 fprintf(stderr, "%c\n", ch);
2581#endif
2582 2847
2583 /* 2848 /*
2584 * private mode handling 2849 * private mode handling
2585 */ 2850 */
2586 if (priv) 2851 if (priv)
2587 { 2852 {
2588 switch (priv) 2853 switch (priv)
2589 { 2854 {
2590 case '>': 2855 case '>':
2591 if (ch == CSI_DA) /* secondary device attributes */ 2856 if (ch == CSI_DA) /* secondary device attributes */
2857 {
2858 // first parameter is normally 0 for vt100, 1 for vt220, 'R' for rxvt,
2859 // 'U' for rxvt-unicode != 7.[34] (where it was broken).
2860 //
2861 // second parameter is xterm patch level for xterm, MMmmpp (e.g. 20703) for rxvt
2862 // and Mm (e.g. 72 for 7.2) for urxvt <= 7.2, 94 for urxvt <= 8.3, and 95 for later
2863 // versions.
2864 //
2592 tt_printf("\033[>%d;%-.8s;0c", 'R', VSTRING); 2865 tt_printf ("\033[>%d;95;0c", 'U');
2866 }
2593 break; 2867 break;
2868
2594 case '?': 2869 case '?':
2595 if (ch == 'h' || ch == 'l' || ch == 'r' || ch == 's' || ch == 't') 2870 if (ch == 'h' || ch == 'l' || ch == 'r' || ch == 's' || ch == 't')
2596 process_terminal_mode (ch, priv, nargs, arg); 2871 process_terminal_mode (ch, priv, nargs, arg);
2872 if (prev_ch == '$' && ch == 'p')
2873 process_terminal_mode (ch, priv, nargs, arg);
2597 break; 2874 break;
2875
2876 case '!':
2877 if (ch == CSI_70)
2878 {
2879 /* DECSTR: soft terminal reset, used by our terminfo since 9.06 */
2880 scr_soft_reset ();
2881
2882 static const int pm_h[] = { 7, 25 };
2883 static const int pm_l[] = { 1, 3, 4, 5, 6, 9, 66, 1000, 1001, 1005, 1006, 1015, 1049 };
2884
2885 process_terminal_mode ('h', 0, ecb_array_length (pm_h), pm_h);
2886 process_terminal_mode ('l', 0, ecb_array_length (pm_l), pm_l);
2598 } 2887 }
2888 break;
2889 }
2890
2599 return; 2891 return;
2600 } 2892 }
2601 2893
2602 switch (ch) 2894 switch (ch)
2603 { 2895 {
2604 /* 2896 /*
2605 * ISO/IEC 6429:1992(E) CSI sequences (defaults in parentheses) 2897 * ISO/IEC 6429:1992 (E) CSI sequences (defaults in parentheses)
2606 */ 2898 */
2607#ifdef PRINTPIPE 2899#ifdef PRINTPIPE
2608 case CSI_MC: /* 8.3.83: (0) MEDIA COPY */ 2900 case CSI_MC: /* 8.3.83: (0) MEDIA COPY */
2609 switch (arg[0]) 2901 switch (arg[0])
2610 { 2902 {
2617 } 2909 }
2618 break; 2910 break;
2619#endif 2911#endif
2620 2912
2621 case CSI_CUU: /* 8.3.22: (1) CURSOR UP */ 2913 case CSI_CUU: /* 8.3.22: (1) CURSOR UP */
2622 case CSI_VPR: /* 8.3.161: (1) LINE POSITION FORWARD */ 2914 case CSI_VPB: /* 8.3.160: (1) LINE POSITION BACKWARD */
2623 arg[0] = -arg[0]; 2915 arg[0] = -arg[0];
2624 /* FALLTHROUGH */ 2916 /* FALLTHROUGH */
2625 case CSI_CUD: /* 8.3.19: (1) CURSOR DOWN */ 2917 case CSI_CUD: /* 8.3.19: (1) CURSOR DOWN */
2626 case CSI_VPB: /* 8.3.160: (1) LINE POSITION BACKWARD */ 2918 case CSI_VPR: /* 8.3.161: (1) LINE POSITION FORWARD */
2627 scr_gotorc (arg[0], 0, RELATIVE); 2919 scr_gotorc (arg[0], 0, RELATIVE);
2628 break; 2920 break;
2629 2921
2630 case CSI_CUB: /* 8.3.18: (1) CURSOR LEFT */ 2922 case CSI_CUB: /* 8.3.18: (1) CURSOR LEFT */
2631 case CSI_HPB: /* 8.3.59: (1) CHARACTER POSITION BACKWARD */ 2923 case CSI_HPB: /* 8.3.59: (1) CHARACTER POSITION BACKWARD */
2632#ifdef ISO6429 2924#ifdef ISO6429
2633 arg[0] = -arg[0]; 2925 arg[0] = -arg[0];
2634#else /* emulate common DEC VTs */ 2926#else /* emulate common DEC VTs */
2635 arg[0] = arg[0] ? -arg[0] : -1; 2927 arg[0] = arg[0] ? -arg[0] : -1;
2636#endif 2928#endif
2702 2994
2703 case CSI_SD: /* 8.3.114: (1) SCROLL DOWN */ 2995 case CSI_SD: /* 8.3.114: (1) SCROLL DOWN */
2704 arg[0] = -arg[0]; 2996 arg[0] = -arg[0];
2705 /* FALLTHROUGH */ 2997 /* FALLTHROUGH */
2706 case CSI_SU: /* 8.3.148: (1) SCROLL UP */ 2998 case CSI_SU: /* 8.3.148: (1) SCROLL UP */
2707 scr_scroll_text (screen.tscroll, screen.bscroll, arg[0], 0); 2999 scr_scroll_text (screen.tscroll, screen.bscroll, arg[0]);
2708 break; 3000 break;
2709 3001
2710 case CSI_DA: /* 8.3.24: (0) DEVICE ATTRIBUTES */ 3002 case CSI_DA: /* 8.3.24: (0) DEVICE ATTRIBUTES */
2711 tt_write((const unsigned char *)VT100_ANS, 3003 tt_write (VT100_ANS, sizeof (VT100_ANS) - 1);
2712 (unsigned int)(sizeof(VT100_ANS) - 1));
2713 break; 3004 break;
2714 3005
2715 case CSI_SGR: /* 8.3.118: (0) SELECT GRAPHIC RENDITION */ 3006 case CSI_SGR: /* 8.3.118: (0) SELECT GRAPHIC RENDITION */
2716 process_sgr_mode (nargs, arg); 3007 process_sgr_mode (nargs, arg);
2717 break; 3008 break;
2718 3009
2719 case CSI_DSR: /* 8.3.36: (0) DEVICE STATUS REPORT */ 3010 case CSI_DSR: /* 8.3.36: (0) DEVICE STATUS REPORT */
2720 switch (arg[0]) 3011 switch (arg[0])
2721 { 3012 {
2722 case 5: /* DSR requested */ 3013 case 5: /* DSR requested */
2723 tt_printf("\033[0n"); 3014 tt_printf ("\033[0n");
2724 break; 3015 break;
2725 case 6: /* CPR requested */ 3016 case 6: /* CPR requested */
2726 scr_report_position (); 3017 scr_report_position ();
2727 break; 3018 break;
2728#if defined (ENABLE_DISPLAY_ANSWER)
2729 case 7: /* unofficial extension */ 3019 case 7: /* unofficial extension */
3020 if (option (Opt_insecure))
2730 tt_printf("%-.250s\n", rs[Rs_display_name]); 3021 tt_printf ("%-.250s\012", rs[Rs_display_name]);
2731 break; 3022 break;
2732#endif
2733 case 8: /* unofficial extension */ 3023 case 8: /* unofficial extension */
2734 xterm_seq (XTerm_title, APL_NAME "-" VERSION, CHAR_ST); 3024 process_xterm_seq (XTerm_title, (char *)RESNAME "-" VERSION, CHAR_ST); // char * cast verified
2735 break; 3025 break;
2736 } 3026 }
2737 break; 3027 break;
2738 3028
2739 case CSI_TBC: /* 8.3.155: (0) TABULATION CLEAR */ 3029 case CSI_TBC: /* 8.3.155: (0) TABULATION CLEAR */
2772 break; 3062 break;
2773 3063
2774 case CSI_RM: /* 8.3.107: RESET MODE */ 3064 case CSI_RM: /* 8.3.107: RESET MODE */
2775 if (arg[0] == 4) 3065 if (arg[0] == 4)
2776 scr_insert_mode (0); 3066 scr_insert_mode (0);
3067 else if (arg[0] == 20)
3068 priv_modes &= ~PrivMode_LFNL;
2777 break; 3069 break;
2778 3070
2779 case CSI_SM: /* 8.3.126: SET MODE */ 3071 case CSI_SM: /* 8.3.126: SET MODE */
2780 if (arg[0] == 4) 3072 if (arg[0] == 4)
2781 scr_insert_mode (1); 3073 scr_insert_mode (1);
3074 else if (arg[0] == 20)
3075 priv_modes |= PrivMode_LFNL;
3076 break;
3077
3078 case CSI_71: // DECSCUSR: set cursor style
3079 if (prev_ch == ' ')
3080 set_cursor_style (arg[0]);
2782 break; 3081 break;
2783 3082
2784 /* 3083 /*
2785 * PRIVATE USE beyond this point. All CSI_7? sequences here 3084 * PRIVATE USE beyond this point. All CSI_7? sequences here
2786 */ 3085 */
2798 break; 3097 break;
2799 case CSI_75: 3098 case CSI_75:
2800 scr_cursor (RESTORE); 3099 scr_cursor (RESTORE);
2801 break; 3100 break;
2802 3101
2803#ifndef NO_FRILLS 3102#if !ENABLE_MINIMAL
2804 case CSI_74: 3103 case CSI_74:
2805 process_window_ops (arg, nargs); 3104 process_window_ops (arg, nargs);
2806 break; 3105 break;
2807#endif 3106#endif
2808 3107
2809 case CSI_78: /* DECREQTPARM */ 3108 case CSI_78: /* DECREQTPARM */
2810 if (arg[0] == 0 || arg[0] == 1) 3109 if (arg[0] == 0 || arg[0] == 1)
2811 tt_printf("\033[%d;1;1;128;128;1;0x", arg[0] + 2); 3110 tt_printf ("\033[%d;1;1;128;128;1;0x", arg[0] + 2);
2812 /* FALLTHROUGH */ 3111 break;
2813 3112
2814 default: 3113 default:
2815 break; 3114 break;
2816 } 3115 }
2817} 3116}
2818/*}}} */ 3117/*}}} */
2819 3118
2820#ifndef NO_FRILLS 3119#if !ENABLE_MINIMAL
2821/* ARGSUSED */
2822void 3120void
2823rxvt_term::process_window_ops (const int *args, unsigned int nargs) 3121rxvt_term::process_window_ops (const int *args, unsigned int nargs)
2824{ 3122{
2825 int x, y; 3123 int x, y;
2826#if 0
2827 char *s;
2828#endif
2829 XWindowAttributes wattr; 3124 XWindowAttributes wattr;
2830 Window wdummy; 3125 Window wdummy;
3126
3127 dLocal (Display *, dpy);
2831 3128
2832 if (nargs == 0) 3129 if (nargs == 0)
2833 return; 3130 return;
3131
2834 switch (args[0]) 3132 switch (args[0])
2835 { 3133 {
2836 /* 3134 /*
2837 * commands 3135 * commands
2838 */ 3136 */
2839 case 1: /* deiconify window */ 3137 case 1: /* deiconify window */
2840 XMapWindow(display->display, TermWin.parent[0]); 3138 XMapWindow (dpy, parent);
2841 break; 3139 break;
2842 case 2: /* iconify window */ 3140 case 2: /* iconify window */
2843 XIconifyWindow(display->display, TermWin.parent[0], 3141 XIconifyWindow (dpy, parent, display->screen);
2844 DefaultScreen(display->display));
2845 break; 3142 break;
2846 case 3: /* set position (pixels) */ 3143 case 3: /* set position (pixels) */
2847 XMoveWindow(display->display, TermWin.parent[0], args[1], args[2]); 3144 XMoveWindow (dpy, parent, args[1], args[2]);
2848 break; 3145 break;
2849 case 4: /* set size (pixels) */ 3146 case 4: /* set size (pixels) */
2850 set_widthheight ((unsigned int)args[2], (unsigned int)args[1]); 3147 set_widthheight ((unsigned int)args[2], (unsigned int)args[1]);
2851 break; 3148 break;
2852 case 5: /* raise window */ 3149 case 5: /* raise window */
2853 XRaiseWindow(display->display, TermWin.parent[0]); 3150 XRaiseWindow (dpy, parent);
2854 break; 3151 break;
2855 case 6: /* lower window */ 3152 case 6: /* lower window */
2856 XLowerWindow(display->display, TermWin.parent[0]); 3153 XLowerWindow (dpy, parent);
2857 break; 3154 break;
2858 case 7: /* refresh window */ 3155 case 7: /* refresh window */
2859 scr_touch (true); 3156 scr_touch (true);
2860 break; 3157 break;
2861 case 8: /* set size (chars) */ 3158 case 8: /* set size (chars) */
2862 set_widthheight ((unsigned int)(args[2] * TermWin.fwidth), 3159 set_widthheight ((unsigned int) (args[2] * fwidth),
2863 (unsigned int)(args[1] * TermWin.fheight)); 3160 (unsigned int) (args[1] * fheight));
2864 break; 3161 break;
3162
3163 //case 9: NYI, TODO, restore maximized window or maximize window
2865 default: 3164 default:
2866 if (args[0] >= 24) /* set height (chars) */ 3165 if (args[0] >= 24) /* set height (chars) */
2867 set_widthheight ((unsigned int)TermWin.width, 3166 set_widthheight ((unsigned int)vt_width,
2868 (unsigned int)(args[1] * TermWin.fheight)); 3167 (unsigned int) (args[1] * fheight));
2869 break; 3168 break;
3169
2870 /* 3170 /*
2871 * reports - some output format copied from XTerm 3171 * reports - some output format copied from XTerm
2872 */ 3172 */
2873 case 11: /* report window state */ 3173 case 11: /* report window state */
2874 XGetWindowAttributes(display->display, TermWin.parent[0], &wattr); 3174 XGetWindowAttributes (dpy, parent, &wattr);
2875 tt_printf("\033[%dt", wattr.map_state == IsViewable ? 1 : 2); 3175 tt_printf ("\033[%dt", wattr.map_state == IsViewable ? 1 : 2);
2876 break; 3176 break;
2877 case 13: /* report window position */ 3177 case 13: /* report window position */
2878 XGetWindowAttributes(display->display, TermWin.parent[0], &wattr); 3178 XGetWindowAttributes (dpy, parent, &wattr);
2879 XTranslateCoordinates(display->display, TermWin.parent[0], wattr.root, 3179 XTranslateCoordinates (dpy, parent, wattr.root,
2880 -wattr.border_width, -wattr.border_width, 3180 -wattr.border_width, -wattr.border_width,
2881 &x, &y, &wdummy); 3181 &x, &y, &wdummy);
2882 tt_printf("\033[3;%d;%dt", x, y); 3182 tt_printf ("\033[3;%d;%dt", x, y);
2883 break; 3183 break;
2884 case 14: /* report window size (pixels) */ 3184 case 14: /* report window size (pixels) */
2885 XGetWindowAttributes(display->display, TermWin.parent[0], &wattr); 3185 XGetWindowAttributes (dpy, parent, &wattr);
2886 tt_printf("\033[4;%d;%dt", wattr.height, wattr.width); 3186 tt_printf ("\033[4;%d;%dt", wattr.height, wattr.width);
2887 break; 3187 break;
3188 case 18: /* report text area size (chars) */
3189 tt_printf ("\033[8;%d;%dt", nrow, ncol);
3190 break;
2888 case 18: /* report window size (chars) */ 3191 case 19: /* report window size (chars) */
2889 tt_printf("\033[8;%d;%dt", TermWin.nrow, TermWin.ncol); 3192 tt_printf ("\033[9;%d;%dt", nrow, ncol);
2890 break; 3193 break;
2891#if 0 /* XXX: currently disabled due to security concerns */
2892 case 20: /* report icon label */ 3194 case 20: /* report icon label */
2893 XGetIconName(display->display, TermWin.parent[0], &s); 3195 {
3196 char *s;
3197 XGetIconName (dpy, parent, &s);
2894 tt_printf("\033]L%-.200s\234", s ? s : ""); /* 8bit ST */ 3198 tt_printf ("\033]L%-.250s\234", option (Opt_insecure) && s ? s : ""); /* 8bit ST */
3199 XFree (s);
3200 }
2895 break; 3201 break;
2896 case 21: /* report window title */ 3202 case 21: /* report window title */
2897 XFetchName(display->display, TermWin.parent[0], &s); 3203 {
3204 char *s;
3205 XFetchName (dpy, parent, &s);
2898 tt_printf("\033]l%-.200s\234", s ? s : ""); /* 8bit ST */ 3206 tt_printf ("\033]l%-.250s\234", option (Opt_insecure) && s ? s : ""); /* 8bit ST */
3207 XFree (s);
3208 }
2899 break; 3209 break;
2900#endif
2901
2902 } 3210 }
2903} 3211}
2904#endif 3212#endif
2905 3213
2906/*----------------------------------------------------------------------*/ 3214/*----------------------------------------------------------------------*/
2907/* 3215/*
2908 * get input up until STRING TERMINATOR (or BEL) 3216 * get input up until STRING TERMINATOR (or BEL)
2909 * ends_how is terminator used. returned input must be free()d 3217 * ends_how is terminator used. returned input must be free()'d
2910 */ 3218 */
2911unsigned char * 3219char *
2912rxvt_term::get_to_st (unsigned char *ends_how) 3220rxvt_term::get_to_st (unicode_t &ends_how)
2913{ 3221{
2914 int seen_esc = 0; /* seen escape? */ 3222 unicode_t ch;
3223 bool seen_esc = false;
2915 unsigned int n = 0; 3224 unsigned int n = 0;
2916 unsigned char *s; 3225 wchar_t string[CBUFSIZ];
2917 unsigned char ch, string[STRING_MAX];
2918 3226
2919 for (; (ch = cmd_getc ());) 3227 while ((ch = cmd_getc ()) != NOCHAR)
2920 { 3228 {
2921 if (ch == C0_BEL 3229 if (seen_esc)
2922 || ch == CHAR_ST 3230 {
2923 || (ch == 0x5c && seen_esc)) /* 7bit ST */ 3231 if (ch == 0x5c) /* 7bit ST */
2924 break; 3232 break;
3233 else
3234 return NULL;
3235 }
2925 if (ch == C0_ESC) 3236 else if (ch == C0_ESC)
2926 { 3237 {
2927 seen_esc = 1; 3238 seen_esc = true;
2928 continue; 3239 continue;
2929 } 3240 }
3241 else if (ch == C0_BEL || ch == CHAR_ST)
3242 break;
2930 else if (ch == '\t') 3243 else if (ch == C0_SYN)
2931 ch = ' '; /* translate '\t' to space */ 3244 ch = cmd_get8 ();
2932 else if (ch < 0x08 || (ch > 0x0d && ch < 0x20)) 3245 else if (ch < 0x20)
2933 return NULL; /* other control character - exit */ 3246 return NULL; /* other control character - exit */
3247
3248 seen_esc = false;
3249
2934 if (n < sizeof(string) - 1) 3250 if (n >= sizeof (string) - 1)
3251 // stop at some sane length
3252 return NULL;
3253
2935 string[n++] = ch; 3254 string[n++] = ch;
2936 seen_esc = 0;
2937 } 3255 }
3256
2938 string[n++] = '\0'; 3257 string[n++] = '\0';
2939 if ((s = (unsigned char *)rxvt_malloc(n)) == NULL) 3258
2940 return NULL;
2941 *ends_how = (ch == 0x5c ? C0_ESC : ch); 3259 ends_how = (ch == 0x5c ? C0_ESC : ch);
2942 STRNCPY(s, string, n); 3260
2943 return s; 3261 return rxvt_wcstombs (string);
2944} 3262}
2945 3263
2946/*----------------------------------------------------------------------*/ 3264/*----------------------------------------------------------------------*/
2947/* 3265/*
2948 * process DEVICE CONTROL STRING `ESC P ... (ST|BEL)' or `0x90 ... (ST|BEL)' 3266 * process DEVICE CONTROL STRING `ESC P ... (ST|BEL)' or `0x90 ... (ST|BEL)'
2949 */ 3267 */
2950void 3268void
2951rxvt_term::process_dcs_seq () 3269rxvt_term::process_dcs_seq ()
2952{ 3270{
2953 unsigned char eh, *s;
2954 /* 3271 /*
2955 * Not handled yet 3272 * Not handled yet
2956 */ 3273 */
3274
3275 unicode_t eh;
2957 s = get_to_st (&eh); 3276 char *s = get_to_st (eh);
2958 if (s) 3277 if (s)
2959 free(s); 3278 free (s);
3279
2960 return; 3280 return;
2961} 3281}
2962 3282
2963/*----------------------------------------------------------------------*/ 3283/*----------------------------------------------------------------------*/
2964/* 3284/*
2965 * process OPERATING SYSTEM COMMAND sequence `ESC ] Ps ; Pt (ST|BEL)' 3285 * process OPERATING SYSTEM COMMAND sequence `ESC ] Ps ; Pt (ST|BEL)'
2966 */ 3286 */
2967void 3287void
2968rxvt_term::process_osc_seq () 3288rxvt_term::process_osc_seq ()
2969{ 3289{
2970 unsigned char ch, eh, *s; 3290 int arg;
2971 int arg;
2972 3291
2973 ch = cmd_getc (); 3292 unicode_t ch = cmd_getc ();
2974 for (arg = 0; isdigit(ch); ch = cmd_getc ()) 3293 for (arg = 0; isdigit (ch); ch = cmd_getc ())
2975 arg = arg * 10 + (ch - '0'); 3294 arg = arg * 10 + (ch - '0');
2976 3295
2977 if (ch == ';') 3296 if (ch == ';')
2978 { 3297 {
3298 unicode_t eh;
2979 s = get_to_st (&eh); 3299 char *s = get_to_st (eh);
3300
2980 if (s) 3301 if (s)
2981 { 3302 {
2982 /*
2983 * rxvt_menubar_dispatch() violates the constness of the string,
2984 * so do it here
2985 */
2986 if (arg == XTerm_Menu)
2987#if 0 /* XXX: currently disabled due to security concerns */
2988 menubar_dispatch ((char *)s);
2989#else
2990 (void)0;
2991#endif
2992 else
2993 xterm_seq (arg, (char *)s, eh); 3303 process_xterm_seq (arg, s, eh);
2994 free(s); 3304 free (s);
3305 }
3306 }
3307}
3308
3309static unsigned int
3310colorcube_index (unsigned int idx_r,
3311 unsigned int idx_g,
3312 unsigned int idx_b)
3313{
3314 assert (idx_r < Red_levels);
3315 assert (idx_g < Green_levels);
3316 assert (idx_b < Blue_levels);
3317
3318 return idx_r * Blue_levels * Green_levels +
3319 idx_g * Blue_levels +
3320 idx_b;
3321}
3322
3323/*
3324 * Find the nearest color slot in the hidden color cube,
3325 * adapt its value to the 32bit RGBA color.
3326 */
3327unsigned int
3328rxvt_term::map_rgb24_color (unsigned int r, unsigned int g, unsigned int b, unsigned int a)
3329{
3330 r &= 0xff;
3331 g &= 0xff;
3332 b &= 0xff;
3333 a &= 0xff;
3334
3335 uint32_t color = (a << 24) | (r << 16) | (g << 8) | b;
3336
3337 /* we allow one of the 6 closest neighbouring colours */
3338 /* to replace the current color, if they not used recently */
3339 static const signed char dxyz[][3] = {
3340 0, 0, 0,
3341 0, 0, 4,
3342 0, 4, 0,
3343 4, 0, 0,
3344 0, 4, 4,
3345 4, 4, 0,
3346 4, 0, 4,
3347 };
3348
3349 static const unsigned char color_level[8][32] = {
3350 // neighbour index
3351 {0, 0, 1, 0, 0, 1, 1, 2, 2, 1, 1, 1, 2, 2, 2, 2, 3, 3, 3, 2, 2, 2, 2, 3, 3, 3, 3, 3, 3, 3, 3, 3},
3352 {0, 1, 0, 1, 1, 2, 1, 1, 2, 2, 3, 3, 2, 2, 2, 3, 3, 3, 4, 4, 4, 3, 3, 3, 3, 4, 4, 4, 4, 4, 4, 4},
3353 {0, 0, 1, 2, 1, 1, 2, 3, 3, 2, 2, 3, 3, 4, 4, 3, 3, 3, 4, 4, 5, 5, 5, 4, 4, 4, 5, 5, 5, 5, 5, 5},
3354 {0, 0, 2, 1, 2, 3, 2, 2, 3, 4, 4, 3, 3, 4, 4, 5, 5, 4, 4, 5, 5, 5, 6, 6, 5, 5, 5, 6, 6, 6, 6, 6},
3355 // Red_levels/Green_levels/Blue_levels index
3356 {0, 0, 0, 1, 1, 1, 1, 1, 1, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 3, 3, 3, 3, 3, 3, 3, 3, 3, 3, 3, 3, 3},
3357 {0, 0, 1, 1, 1, 1, 2, 2, 2, 2, 2, 2, 3, 3, 3, 3, 3, 3, 3, 3, 3, 4, 4, 4, 4, 4, 4, 4, 4, 4, 4, 4},
3358 {0, 1, 1, 1, 2, 2, 2, 2, 2, 3, 3, 3, 3, 3, 3, 4, 4, 4, 4, 4, 4, 4, 4, 5, 5, 5, 5, 5, 5, 5, 5, 5},
3359 {0, 1, 1, 2, 2, 2, 3, 3, 3, 3, 3, 4, 4, 4, 4, 4, 4, 5, 5, 5, 5, 5, 5, 5, 6, 6, 6, 6, 6, 6, 6, 6},
3360 };
3361
3362 unsigned int idx;
3363
3364 for (int n = 0; n < ecb_array_length (dxyz); ++n)
3365 {
3366 unsigned int idx_r = color_level[ Red_levels - dxyz[n][0]][r / 8];
3367 unsigned int idx_g = color_level[Green_levels - dxyz[n][1]][g / 8];
3368 unsigned int idx_b = color_level[ Blue_levels - dxyz[n][2]][b / 8];
3369 unsigned int index = colorcube_index (idx_r, idx_g, idx_b);
3370
3371 if (n == 0)
3372 idx = index;
3373
3374 if (rgb24_color[index] == color)
2995 } 3375 {
3376 rgb24_seqno[index] = ++rgb24_sequence;
3377 return index + minTermCOLOR24;
3378 }
3379
3380 // minor issue: could update index 0 few more times
3381 if ((rgb24_seqno[index] | rgb24_color[index]) == 0)
3382 {
3383 idx = index;
3384 goto update;
3385 }
3386
3387 // like (rgb24_seqno[idx] > rgb24_seqno[index])
3388 // but also handles wrap around values good enough
3389 if ((uint16_t)(rgb24_seqno[idx] - rgb24_seqno[index]) < 0x7fff)
3390 idx = index;
3391 }
3392
3393update:
3394 rgb24_color[idx] = color;
3395 rgb24_seqno[idx] = ++rgb24_sequence;
3396
3397 idx += minTermCOLOR24;
3398 pix_colors_focused [idx].free (this);
3399 pix_colors_focused [idx].set (this, rgba (r * 0x0101, g * 0x0101, b * 0x0101, a * 0x0101));
3400 update_fade_color (idx, false);
3401
3402 return idx;
3403}
3404
3405void
3406rxvt_term::process_color_seq (int report, int color, const char *str, char resp)
3407{
3408 if (str[0] == '?' && !str[1])
2996 } 3409 {
3410 if (!IN_RANGE_INC (color, minCOLOR, maxTermCOLOR))
3411 return;
3412
3413 rgba c;
3414 pix_colors_focused[color].get (c);
3415 color -= minCOLOR;
3416
3417#if XFT
3418 if (c.a != rgba::MAX_CC)
3419 tt_printf ("\033]%d;%d;rgba:%04x/%04x/%04x/%04x%c", report, color, c.r, c.g, c.b, c.a, resp);
3420 else
3421#endif
3422 tt_printf ("\033]%d;%d;rgb:%04x/%04x/%04x%c", report, color, c.r, c.g, c.b, resp);
3423 }
3424 else
3425 set_window_color (color, str);
2997} 3426}
3427
2998/* 3428/*
2999 * XTerm escape sequences: ESC ] Ps;Pt (ST|BEL) 3429 * XTerm escape sequences: ESC ] Ps;Pt (ST|BEL)
3000 * 0 = change iconName/title
3001 * 1 = change iconName
3002 * 2 = change title
3003 * 4 = change color
3004 * 12 = change text color
3005 * 13 = change mouse foreground color
3006 * 17 = change highlight character colour
3007 * 18 = change bold character color
3008 * 19 = change underlined character color
3009 * 46 = change logfile (not implemented)
3010 * 50 = change font
3011 *
3012 * rxvt extensions:
3013 * 10 = menu (may change in future)
3014 * 20 = bg pixmap
3015 * 39 = change default fg color
3016 * 49 = change default bg color
3017 * 55 = dump scrollback buffer and all of screen
3018 */ 3430 */
3019void 3431void
3020rxvt_term::xterm_seq (int op, const char *str, unsigned char resp __attribute__((unused))) 3432rxvt_term::process_xterm_seq (int op, char *str, char resp)
3021{ 3433{
3022 int changed = 0; 3434 int color;
3023 int color;
3024 char *buf, *name; 3435 char *buf, *name;
3436 bool query = str[0] == '?' && !str[1];
3437 int saveop = op;
3025 3438
3439 dLocal (Display *, dpy);
3440
3026 assert(str != NULL); 3441 assert (str != NULL);
3442
3443 if (HOOK_INVOKE ((this, HOOK_OSC_SEQ, DT_INT, op, DT_STR, str, DT_END)))
3444 return;
3445
3027 switch (op) 3446 switch (op)
3028 { 3447 {
3029 case XTerm_name: 3448 case XTerm_name:
3030 set_title (str); 3449 set_title (str);
3031 /* FALLTHROUGH */ 3450 /* FALLTHROUGH */
3032 case XTerm_iconName: 3451 case XTerm_iconName:
3033 set_iconName (str); 3452 set_icon_name (str);
3034 break; 3453 break;
3035 case XTerm_title: 3454 case XTerm_title:
3036 set_title (str); 3455 set_title (str);
3037 break; 3456 break;
3457 case XTerm_property:
3458 if (str[0] == '?')
3459 {
3460 Atom prop = display->atom (str + 1);
3461 Atom actual_type;
3462 int actual_format;
3463 unsigned long nitems;
3464 unsigned long bytes_after;
3465 unsigned char *value = 0;
3466 const char *str = "";
3467
3468 if (prop
3469 && XGetWindowProperty (dpy, parent,
3470 prop, 0, 1<<16, 0, AnyPropertyType,
3471 &actual_type, &actual_format,
3472 &nitems, &bytes_after, &value) == Success
3473 && actual_type != None
3474 && actual_format == 8)
3475 str = (const char *)(value);
3476
3477 tt_printf ("\033]%d;%s%c", op, option (Opt_insecure) ? str : "", resp);
3478
3479 XFree (value);
3480 }
3481 else
3482 {
3483 char *eq = strchr (str, '=');
3484
3485 if (eq)
3486 {
3487 *eq = 0;
3488 set_utf8_property (display->atom (str), eq + 1);
3489 }
3490 else
3491 XDeleteProperty (dpy, parent,
3492 display->atom (str));
3493 }
3494 break;
3495
3038 case XTerm_Color: 3496 case XTerm_Color:
3039 for (buf = (char *)str; buf && *buf;) 3497 for (buf = (char *)str; buf && *buf;)
3040 { 3498 {
3041 if ((name = STRCHR(buf, ';')) == NULL) 3499 if ((name = strchr (buf, ';')) == NULL)
3042 break; 3500 break;
3501
3043 *name++ = '\0'; 3502 *name++ = '\0';
3044 color = atoi(buf); 3503 color = atoi (buf) + minCOLOR;
3045 if (color < 0 || color >= TOTAL_COLORS) 3504
3505 if (!IN_RANGE_INC (color, minCOLOR, maxTermCOLOR))
3046 break; 3506 break;
3507
3047 if ((buf = STRCHR(name, ';')) != NULL) 3508 if ((buf = strchr (name, ';')) != NULL)
3048 *buf++ = '\0'; 3509 *buf++ = '\0';
3049 set_window_color (color + minCOLOR, name); 3510
3511 process_color_seq (op, color, name, resp);
3050 } 3512 }
3513 break;
3514 case Rxvt_restoreFG:
3515 case XTerm_Color00:
3516 process_color_seq (op, Color_fg, str, resp);
3517 break;
3518 case Rxvt_restoreBG:
3519 case XTerm_Color01:
3520 process_color_seq (op, Color_bg, str, resp);
3051 break; 3521 break;
3052#ifndef NO_CURSORCOLOR 3522#ifndef NO_CURSORCOLOR
3053 case XTerm_Color_cursor: 3523 case XTerm_Color_cursor:
3054 set_window_color (Color_cursor, str); 3524 process_color_seq (op, Color_cursor, str, resp);
3055 break; 3525 break;
3056#endif 3526#endif
3057 case XTerm_Color_pointer: 3527 case XTerm_Color_pointer_fg:
3058 set_window_color (Color_pointer, str); 3528 process_color_seq (op, Color_pointer_fg, str, resp);
3059 break; 3529 break;
3530 case XTerm_Color_pointer_bg:
3531 process_color_seq (op, Color_pointer_bg, str, resp);
3532 break;
3533#ifdef OPTION_HC
3534 case XTerm_Color_HC:
3535 process_color_seq (op, Color_HC, str, resp);
3536 break;
3537 case XTerm_Color_HTC:
3538 process_color_seq (op, Color_HTC, str, resp);
3539 break;
3540#endif
3060#ifndef NO_BOLD_UNDERLINE_REVERSE 3541#ifndef NO_BOLD_UNDERLINE_REVERSE
3061 case XTerm_Color_BD: 3542 case URxvt_Color_BD:
3062 set_window_color (Color_BD, str); 3543 process_color_seq (op, Color_BD, str, resp);
3063 break; 3544 break;
3064 case XTerm_Color_UL: 3545 case URxvt_Color_UL:
3065 set_window_color (Color_UL, str); 3546 process_color_seq (op, Color_UL, str, resp);
3066 break; 3547 break;
3067 case XTerm_Color_RV: 3548 case URxvt_Color_IT:
3068 set_window_color (Color_RV, str); 3549 process_color_seq (op, Color_IT, str, resp);
3069 break; 3550 break;
3070#endif 3551#endif
3071 3552 case URxvt_Color_border:
3072 case XTerm_Menu: 3553 process_color_seq (op, Color_border, str, resp);
3073 /*
3074 * rxvt_menubar_dispatch() violates the constness of the string,
3075 * so DON'T do it here
3076 */
3077 break; 3554 break;
3078 case XTerm_Pixmap:
3079 if (*str != ';')
3080 {
3081#if XPM_BACKGROUND
3082 scale_pixmap (""); /* reset to default scaling */
3083 set_bgPixmap (str); /* change pixmap */
3084#endif
3085 scr_touch (true);
3086 }
3087 while ((str = STRCHR(str, ';')) != NULL)
3088 {
3089 str++;
3090#if XPM_BACKGROUND
3091 changed += scale_pixmap (str);
3092#endif
3093 3555
3094 }
3095 if (changed)
3096 {
3097#ifdef XPM_BACKGROUND
3098 resize_pixmap ();
3099#endif
3100 scr_touch (true);
3101 }
3102 break;
3103
3104 case XTerm_restoreFG:
3105 set_window_color (Color_fg, str);
3106 break;
3107 case XTerm_restoreBG:
3108 set_window_color (Color_bg, str);
3109 break;
3110 case XTerm_logfile: 3556 case XTerm_logfile:
3557 // TODO, when secure mode?
3111 break; 3558 break;
3112 case XTerm_font: 3559
3113 change_font (0, str);
3114 break;
3115#if 0 3560#if 0
3116 case XTerm_dumpscreen: /* no error notices */ 3561 case Rxvt_dumpscreen: /* no error notices */
3117 { 3562 {
3118 int fd; 3563 int fd;
3119 if ((fd = open(str, O_RDWR | O_CREAT | O_EXCL, 0600)) >= 0) 3564 if ((fd = open (str, O_RDWR | O_CREAT | O_EXCL, 0600)) >= 0)
3120 { 3565 {
3121 scr_dump (fd); 3566 scr_dump (fd);
3122 close(fd); 3567 close (fd);
3123 } 3568 }
3124 } 3569 }
3125 break; 3570 break;
3126#endif 3571#endif
3572 case XTerm_font:
3573 op = URxvt_font;
3574 case URxvt_font:
3575#if ENABLE_STYLES
3576 case URxvt_boldFont:
3577 case URxvt_italicFont:
3578 case URxvt_boldItalicFont:
3579#endif
3580 if (query)
3581 tt_printf ("\33]%d;%-.250s%c", saveop,
3582 option (Opt_insecure) && fontset[op - URxvt_font]->fontdesc
3583 ? fontset[op - URxvt_font]->fontdesc : "",
3584 resp);
3585 else
3586 {
3587 const char *&res = rs[Rs_font + (op - URxvt_font)];
3127 3588
3589 res = strdup (str);
3590 allocated.push_back ((void *)res);
3591 set_fonts ();
3592 }
3593 break;
3594
3595 case URxvt_version:
3596 if (query)
3597 tt_printf ("\33]%d;rxvt-unicode;%-.20s;%c;%c%c",
3598 op,
3599 rs[Rs_name], VERSION[0], VERSION[2],
3600 resp);
3601 break;
3602
3603#if !ENABLE_MINIMAL
3604 case URxvt_cellinfo:
3605 if (query)
3606 tt_printf ("\33]%d;%d;%d;%d%c", saveop,
3607 fwidth, fheight, fbase,
3608 resp);
3609 break;
3610
3611 case URxvt_locale:
3612 if (query)
3613 tt_printf ("\33]%d;%-.250s%c", op, option (Opt_insecure) ? locale : "", resp);
3614 else
3615 {
3616 set_locale (str);
3617 pty->set_utf8_mode (enc_utf8);
3618 init_xlocale ();
3619 }
3620 break;
3621
3622 case URxvt_view_up:
3623 case URxvt_view_down:
3624 {
3625 int lines = atoi (str);
3626
3627 if (lines)
3628 scr_page (op == URxvt_view_up ? UP : DN, lines);
3629 else
3630 scr_erase_savelines ();
3631 }
3632
3633 break;
3634#endif
3635
3636#if ENABLE_PERL
3637 case URxvt_perl:
3638 HOOK_INVOKE ((this, HOOK_OSC_SEQ_PERL, DT_STR, str, DT_STR_LEN, &resp, 1, DT_END));
3639 break;
3640#endif
3128 } 3641 }
3129} 3642}
3130/*----------------------------------------------------------------------*/ 3643/*----------------------------------------------------------------------*/
3131 3644
3132/*{{{ process DEC private mode sequences `ESC [ ? Ps mode' */ 3645/*{{{ process DEC private mode sequences `ESC [ ? Ps mode' */
3137 * 's' = save 3650 * 's' = save
3138 * 'r' = restore 3651 * 'r' = restore
3139 * 't' = toggle 3652 * 't' = toggle
3140 * so no need for fancy checking 3653 * so no need for fancy checking
3141 */ 3654 */
3142int 3655int ecb_cold
3143rxvt_term::privcases (int mode, unsigned long bit) 3656rxvt_term::privcases (int mode, unsigned long bit)
3144{ 3657{
3145 int state; 3658 int state;
3146 3659
3147 if (mode == 's') 3660 if (mode == 's')
3148 { 3661 {
3149 SavedModes |= (PrivateModes & bit); 3662 if (priv_modes & bit)
3663 SavedModes |= bit;
3664 else
3665 SavedModes &= ~bit;
3150 return -1; 3666 return -1;
3151 } 3667 }
3152 else 3668 else
3153 { 3669 {
3154 if (mode == 'r') 3670 if (mode == 'r')
3155 state = (SavedModes & bit) ? 1 : 0; /* no overlapping */ 3671 state = (SavedModes & bit) ? 1 : 0; /* no overlapping */
3156 else 3672 else
3157 state = (mode == 't') ? !(PrivateModes & bit) : mode; 3673 state = (mode == 't') ? ! (priv_modes & bit) : mode;
3158 PrivMode(state, bit); 3674
3675 if (state)
3676 priv_modes |= bit;
3677 else
3678 priv_modes &= ~bit;
3159 } 3679 }
3680
3160 return state; 3681 return state;
3161} 3682}
3162 3683
3163/* we're not using priv _yet_ */ 3684/* we're not using priv _yet_ */
3164void 3685void
3165rxvt_term::process_terminal_mode (int mode, int priv __attribute__((unused)), unsigned int nargs, const int *arg) 3686rxvt_term::process_terminal_mode (int mode, int priv ecb_unused, unsigned int nargs, const int *arg)
3166{ 3687{
3167 unsigned int i, j; 3688 unsigned int i, j;
3168 int state; 3689 int state;
3690
3169 static const struct 3691 static const struct
3170 { 3692 {
3171 const int argval; 3693 const int argval;
3172 const unsigned long bit; 3694 const unsigned long bit;
3173 }
3174 argtopriv[] = { 3695 } argtopriv[] = {
3175 { 1, PrivMode_aplCUR }, 3696 { 1, PrivMode_aplCUR }, // DECCKM
3176 { 2, PrivMode_vt52 }, 3697 { 2, PrivMode_vt52 }, // DECANM
3177 { 3, PrivMode_132 }, 3698 { 3, PrivMode_132 }, // DECCOLM
3178 { 4, PrivMode_smoothScroll }, 3699 { 4, PrivMode_smoothScroll }, // DECSCLM
3179 { 5, PrivMode_rVideo }, 3700 { 5, PrivMode_rVideo }, // DECSCNM
3180 { 6, PrivMode_relOrigin }, 3701 { 6, PrivMode_relOrigin }, // DECOM
3181 { 7, PrivMode_Autowrap }, 3702 { 7, PrivMode_Autowrap }, // DECAWM
3703 // 8, auto-repeat keys // DECARM
3182 { 9, PrivMode_MouseX10 }, 3704 { 9, PrivMode_MouseX10 },
3183#ifdef menuBar_esc 3705 { 12, PrivMode_BlinkingCursor },
3184 { menuBar_esc, PrivMode_menuBar }, 3706 // 18 end FF to printer after print screen
3185#endif 3707 // 19 Print screen prints full screen/scroll region
3708 { 25, PrivMode_VisibleCursor }, // DECTCEM cnorm/cvvis/civis
3186#ifdef scrollBar_esc 3709#ifdef scrollBar_esc
3187 { scrollBar_esc, PrivMode_scrollBar }, 3710 { scrollBar_esc, PrivMode_scrollBar },
3188#endif 3711#endif
3189 { 25, PrivMode_VisibleCursor },
3190 { 35, PrivMode_ShiftKeys }, 3712 { 35, PrivMode_ShiftKeys }, // rxvt extension
3713 // 38, tektronix mode // DECTEK
3191 { 40, PrivMode_132OK }, 3714 { 40, PrivMode_132OK },
3715 // 41 xterm more fixes NYI
3716 // 45 margin bell NYI
3717 // 46 start logging
3192 { 47, PrivMode_Screen }, 3718 { 47, PrivMode_Screen },
3193 { 66, PrivMode_aplKP }, 3719 { 66, PrivMode_aplKP }, // DECNKM
3194#ifndef NO_BACKSPACE_KEY 3720#ifndef NO_BACKSPACE_KEY
3195 { 67, PrivMode_BackSpace }, 3721 { 67, PrivMode_BackSpace }, // DECBKM
3196#endif 3722#endif
3197 { 1000, PrivMode_MouseX11 }, 3723 { 1000, PrivMode_MouseX11 },
3724 { 1002, PrivMode_MouseBtnEvent },
3725 { 1003, PrivMode_MouseAnyEvent },
3726#if ENABLE_FRILLS
3727 { 1004, PrivMode_FocusEvent },
3728 { 1005, PrivMode_ExtMouseUTF8 },
3729 { 1006, PrivMode_ExtMouseSGR },
3730#endif
3198 { 1010, PrivMode_TtyOutputInh }, 3731 { 1010, PrivMode_TtyOutputInh }, // rxvt extension
3199 { 1011, PrivMode_Keypress }, 3732 { 1011, PrivMode_Keypress }, // rxvt extension
3733#if ENABLE_FRILLS
3734 { 1015, PrivMode_ExtMouseUrxvt }, // urxvt extension of 1005
3735#endif
3736 // 1035 enable modifiers for alt, numlock NYI
3737 // 1036 send ESC for meta keys NYI
3738 // 1037 send DEL for keypad delete NYI
3200 { 1047, PrivMode_Screen }, 3739 { 1047, PrivMode_Screen },
3740 // 1048 save and restore cursor, implemented in code
3201 { 1049, PrivMode_Screen }, /* xterm extension, not fully implemented */ 3741 { 1049, PrivMode_Screen }, /* xterm extension, clear screen on ti rather than te */
3742 // 1051, 1052, 1060, 1061 keyboard emulation NYI
3743#if ENABLE_FRILLS
3744 { 2004, PrivMode_BracketPaste },
3745#endif
3202 }; 3746 };
3203 3747
3204 if (nargs == 0) 3748 if (nargs == 0)
3205 return; 3749 return;
3750
3751 // DECRQM
3752 if (mode == 'p')
3753 {
3754 int status = 0;
3755 if (nargs != 1)
3756 return;
3757
3758 for (j = 0; j < ecb_array_length (argtopriv); j++)
3759 if (argtopriv[j].argval == arg[0])
3760 {
3761 status = (priv_modes & argtopriv[j].bit) ? 1 : 2;
3762 break;
3763 }
3764
3765 tt_printf ("\33[?%d;%d$y", arg[0], status);
3766 return;
3767 }
3206 3768
3207 /* make lo/hi boolean */ 3769 /* make lo/hi boolean */
3208 if (mode == 'l') 3770 if (mode == 'l')
3209 mode = 0; /* reset */ 3771 mode = 0; /* reset */
3210 else if (mode == 'h') 3772 else if (mode == 'h')
3213 for (i = 0; i < nargs; i++) 3775 for (i = 0; i < nargs; i++)
3214 { 3776 {
3215 state = -1; 3777 state = -1;
3216 3778
3217 /* basic handling */ 3779 /* basic handling */
3218 for (j = 0; j < (sizeof(argtopriv)/sizeof(argtopriv[0])); j++) 3780 for (j = 0; j < ecb_array_length (argtopriv); j++)
3219 if (argtopriv[j].argval == arg[i]) 3781 if (argtopriv[j].argval == arg[i])
3220 { 3782 {
3221 state = privcases (mode, argtopriv[j].bit); 3783 state = privcases (mode, argtopriv[j].bit);
3222 break; 3784 break;
3223 } 3785 }
3224 3786
3225 /* extra handling for values with state unkept */ 3787 /* extra handling for values with state unkept */
3226 if (state == -1)
3227 switch (arg[i]) 3788 switch (arg[i])
3228 { 3789 {
3790#if ENABLE_STYLES
3791 case 1021:
3792 set_option (Opt_intensityStyles, mode);
3793
3794 scr_touch (true);
3795 break;
3796#endif
3229 case 1048: /* alternative cursor save */ 3797 case 1048: /* alternative cursor save */
3798 if (option (Opt_secondaryScreen))
3230 if (mode == 0) 3799 if (mode == 0)
3231 scr_cursor (RESTORE); 3800 scr_cursor (RESTORE);
3232 else if (mode == 1) 3801 else if (mode == 1)
3233 scr_cursor (SAVE); 3802 scr_cursor (SAVE);
3234 /* FALLTHROUGH */
3235 default:
3236 continue; /* for(;i;) */
3237 }
3238
3239 /* extra handling for values with valid 0 or 1 state */
3240 switch (arg[i])
3241 {
3242 /* case 1: - application cursor keys */
3243 case 2: /* VT52 mode */
3244 /* oddball mode. should be set regardless of set/reset
3245 * parameter. Return from VT52 mode with an ESC < from
3246 * within VT52 mode
3247 */
3248 PrivMode(1, PrivMode_vt52);
3249 break; 3803 break;
3804 }
3805
3806 if (state >= 0)
3807 /* extra handling for values with valid 0 or 1 state */
3808 switch (arg[i])
3809 {
3810 /* case 1: - application cursor keys */
3811 case 2: /* VT52 mode */
3812 /* oddball mode. should be set regardless of set/reset
3813 * parameter. Return from VT52 mode with an ESC < from
3814 * within VT52 mode
3815 */
3816 priv_modes |= PrivMode_vt52;
3817 break;
3250 case 3: /* 80/132 */ 3818 case 3: /* 80/132 */
3251 if (PrivateModes & PrivMode_132OK) 3819 if (priv_modes & PrivMode_132OK)
3252 set_widthheight ( (unsigned int)((state ? 132 : 80) * TermWin.fwidth), 3820 set_widthheight ((state ? 132 : 80) * fwidth, 24 * fheight);
3253 (unsigned int)TermWin.height);
3254 break; 3821 break;
3255 case 4: /* smooth scrolling */ 3822 case 4: /* smooth scrolling */
3256 if (state)
3257 Options &= ~Opt_jumpScroll;
3258 else
3259 Options |= Opt_jumpScroll; 3823 set_option (Opt_jumpScroll, !state);
3260 break; 3824 break;
3261 case 5: /* reverse video */ 3825 case 5: /* reverse video */
3262 scr_rvideo_mode (state); 3826 scr_rvideo_mode (state);
3263 break; 3827 break;
3264 case 6: /* relative/absolute origins */ 3828 case 6: /* relative/absolute origins */
3265 scr_relative_origin (state); 3829 scr_relative_origin (state);
3266 break; 3830 break;
3267 case 7: /* autowrap */ 3831 case 7: /* autowrap */
3268 scr_autowrap (state); 3832 scr_autowrap (state);
3269 break; 3833 break;
3270 /* case 8: - auto repeat, can't do on a per window basis */ 3834 /* case 8: - auto repeat, can't do on a per window basis */
3271 case 9: /* X10 mouse reporting */ 3835 case 9: /* X10 mouse reporting */
3272 if (state) /* orthogonal */ 3836 if (state) /* orthogonal */
3273 PrivateModes &= ~(PrivMode_MouseX11); 3837 priv_modes &= ~(PrivMode_MouseX11|PrivMode_MouseBtnEvent|PrivMode_MouseAnyEvent);
3274 break; 3838 break;
3275#ifdef menuBar_esc
3276 case menuBar_esc:
3277#ifdef MENUBAR
3278 map_menuBar (state);
3279#endif
3280 break;
3281#endif
3282#ifdef scrollBar_esc 3839#ifdef scrollBar_esc
3283 case scrollBar_esc: 3840 case scrollBar_esc:
3284 if (scrollbar_mapping (state)) 3841 scrollBar.map (state);
3285 {
3286 resize_all_windows (0, 0, 0); 3842 resize_all_windows (0, 0, 0);
3287 scr_touch (true); 3843 scr_touch (true);
3288 }
3289 break; 3844 break;
3290#endif 3845#endif
3846#ifdef CURSOR_BLINK
3847 case 12:
3848 cursor_blink_reset ();
3849 break;
3850#endif
3291 case 25: /* visible/invisible cursor */ 3851 case 25: /* visible/invisible cursor */
3292 scr_cursor_visible (state); 3852 scr_cursor_visible (state);
3293 break; 3853 break;
3294 /* case 35: - shift keys */ 3854 /* case 35: - shift keys */
3295 /* case 40: - 80 <--> 132 mode */ 3855 /* case 40: - 80 <--> 132 mode */
3296 case 47: /* secondary screen */ 3856 case 47: /* secondary screen */
3297 scr_change_screen (state); 3857 scr_change_screen (state);
3298 break; 3858 break;
3299 /* case 66: - application key pad */ 3859 /* case 66: - application key pad */
3300 /* case 67: - backspace key */ 3860 /* case 67: - backspace key */
3301 case 1000: /* X11 mouse reporting */ 3861 case 1000: /* X11 mouse reporting */
3302 if (state) /* orthogonal */ 3862 if (state) /* orthogonal */
3303 PrivateModes &= ~(PrivMode_MouseX10); 3863 priv_modes &= ~(PrivMode_MouseX10|PrivMode_MouseBtnEvent|PrivMode_MouseAnyEvent);
3304 break; 3864 break;
3305#if 0
3306 case 1001: 3865 case 1002:
3307 break; /* X11 mouse highlighting */ 3866 case 1003:
3308#endif 3867 if (state)
3868 {
3869 priv_modes &= ~(PrivMode_MouseX10|PrivMode_MouseX11);
3870 priv_modes &= arg[i] == 1003 ? ~PrivMode_MouseBtnEvent : ~PrivMode_MouseAnyEvent;
3871 mouse_row = mouse_col = 0;
3872 vt_emask_mouse = PointerMotionMask;
3873 }
3874 else
3875 vt_emask_mouse = NoEventMask;
3876
3877 vt_select_input ();
3878 break;
3309 case 1010: /* scroll to bottom on TTY output inhibit */ 3879 case 1010: /* scroll to bottom on TTY output inhibit */
3310 if (state)
3311 Options &= ~Opt_scrollTtyOutput;
3312 else
3313 Options |= Opt_scrollTtyOutput; 3880 set_option (Opt_scrollTtyOutput, !state);
3314 break; 3881 break;
3315 case 1011: /* scroll to bottom on key press */ 3882 case 1011: /* scroll to bottom on key press */
3316 if (state)
3317 Options |= Opt_scrollTtyKeypress; 3883 set_option (Opt_scrollTtyKeypress, state);
3318 else
3319 Options &= ~Opt_scrollTtyKeypress;
3320 break; 3884 break;
3321 case 1047: /* secondary screen w/ clearing */ 3885 case 1047: /* secondary screen w/ clearing last */
3322 case 1049: /* better secondary screen w/ clearing, but not fully implemented */ 3886 if (option (Opt_secondaryScreen))
3323 if (current_screen != PRIMARY) 3887 if (!state)
3324 scr_erase_screen (2); 3888 scr_erase_screen (2);
3889
3325 scr_change_screen (state); 3890 scr_change_screen (state);
3326 /* FALLTHROUGH */
3327 default:
3328 break; 3891 break;
3892 case 1049: /* secondary screen w/ clearing first */
3893 if (option (Opt_secondaryScreen))
3894 if (state)
3895 scr_cursor (SAVE);
3896
3897 scr_change_screen (state);
3898
3899 if (option (Opt_secondaryScreen))
3900 if (state)
3901 scr_erase_screen (2);
3902 else
3903 scr_cursor (RESTORE);
3904 break;
3905 default:
3906 break;
3329 } 3907 }
3330 } 3908 }
3331} 3909}
3332/*}}} */ 3910/*}}} */
3333 3911
3334/*{{{ process sgr sequences */ 3912/*{{{ process sgr sequences */
3335void 3913void ecb_hot
3336rxvt_term::process_sgr_mode (unsigned int nargs, const int *arg) 3914rxvt_term::process_sgr_mode (unsigned int nargs, const int *arg)
3337{ 3915{
3338 unsigned int i; 3916 unsigned int i;
3339 short rendset; 3917 short rendset;
3340 int rendstyle; 3918 int rendstyle;
3341 3919
3342 if (nargs == 0) 3920 if (nargs == 0)
3343 { 3921 {
3344 scr_rendition (0, ~RS_None); 3922 scr_rendition (0, ~RS_None);
3345 return; 3923 return;
3346 } 3924 }
3925
3347 for (i = 0; i < nargs; i++) 3926 for (i = 0; i < nargs; i++)
3348 { 3927 {
3349 rendset = -1; 3928 rendset = -1;
3350 switch (arg[i]) 3929 switch (arg[i])
3351 { 3930 {
3353 rendset = 0, rendstyle = ~RS_None; 3932 rendset = 0, rendstyle = ~RS_None;
3354 break; 3933 break;
3355 case 1: 3934 case 1:
3356 rendset = 1, rendstyle = RS_Bold; 3935 rendset = 1, rendstyle = RS_Bold;
3357 break; 3936 break;
3937 //case 2: // low intensity
3938 case 3:
3939 rendset = 1, rendstyle = RS_Italic;
3940 break;
3358 case 4: 3941 case 4:
3359 rendset = 1, rendstyle = RS_Uline; 3942 rendset = 1, rendstyle = RS_Uline;
3360 break; 3943 break;
3361 case 5: 3944 case 5: // slowly blinking
3945 case 6: // rapidly blinking
3362 rendset = 1, rendstyle = RS_Blink; 3946 rendset = 1, rendstyle = RS_Blink;
3363 break; 3947 break;
3948 //case 6: // scoansi light background
3364 case 7: 3949 case 7:
3365 rendset = 1, rendstyle = RS_RVid; 3950 rendset = 1, rendstyle = RS_RVid;
3366 break; 3951 break;
3367 case 22: 3952 case 8:
3953 // invisible. NYI
3954 break;
3955 //case 9: // crossed out
3956 //case 10: // scoansi acs off, primary font
3957 //case 11: // scoansi acs on, first alt font
3958 //case 12: // scoansi acs on, |0x80, second alt font
3959 //...
3960 //case 19: // ninth alt font
3961 //case 20: // gothic
3962 case 21: // disable bold, faint, sometimes doubly underlined (iso 8613)
3368 rendset = 0, rendstyle = RS_Bold; 3963 rendset = 0, rendstyle = RS_Bold;
3369 break; 3964 break;
3370 case 24: 3965 case 22: // bold off (vt220)
3966 rendset = 0, rendstyle = RS_Bold;
3967 break;
3968 case 23: // disable italic
3969 rendset = 0, rendstyle = RS_Italic;
3970 break;
3971 case 24: // underline off (vt220)
3371 rendset = 0, rendstyle = RS_Uline; 3972 rendset = 0, rendstyle = RS_Uline;
3372 break; 3973 break;
3373 case 25: 3974 case 25: // blink off (vt220)
3374 rendset = 0, rendstyle = RS_Blink; 3975 rendset = 0, rendstyle = RS_Blink;
3375 break; 3976 break;
3376 case 27: 3977 case 26: // variable spacing (iso 8613)
3978 rendset = 0, rendstyle = RS_Blink;
3979 break;
3980 case 27: // reverse off (vt220)
3377 rendset = 0, rendstyle = RS_RVid; 3981 rendset = 0, rendstyle = RS_RVid;
3378 break; 3982 break;
3983 //case 28: // visible. NYI
3984 //case 29: // not crossed-out
3379 } 3985 }
3986
3380 if (rendset != -1) 3987 if (rendset != -1)
3381 { 3988 {
3382 scr_rendition (rendset, rendstyle); 3989 scr_rendition (rendset, rendstyle);
3383 continue; /* for(;i;) */ 3990 continue; /* for (;i;) */
3384 } 3991 }
3385 3992
3386 switch (arg[i]) 3993 switch (arg[i])
3387 { 3994 {
3388 case 30: 3995 case 30:
3391 case 33: 3998 case 33:
3392 case 34: 3999 case 34:
3393 case 35: 4000 case 35:
3394 case 36: 4001 case 36:
3395 case 37: 4002 case 37:
3396 scr_color ((unsigned int)(minCOLOR + (arg[i] - 30)), 4003 scr_color ((unsigned int) (minCOLOR + (arg[i] - 30)), Color_fg);
3397 Color_fg);
3398 break; 4004 break;
3399#ifdef TTY_256COLOR
3400 case 38:
3401 if (nargs > i + 2 && arg[i + 1] == 5)
3402 {
3403 scr_color ((unsigned int)(minCOLOR + arg[i + 2]),
3404 Color_fg);
3405 i += 2;
3406 }
3407 break;
3408#endif
3409 case 39: /* default fg */ 4005 case 39: /* default fg */
3410 scr_color (Color_fg, Color_fg); 4006 scr_color (Color_fg, Color_fg);
3411 break; 4007 break;
3412 4008
3413 case 40: 4009 case 40:
3416 case 43: 4012 case 43:
3417 case 44: 4013 case 44:
3418 case 45: 4014 case 45:
3419 case 46: 4015 case 46:
3420 case 47: 4016 case 47:
3421 scr_color ((unsigned int)(minCOLOR + (arg[i] - 40)), 4017 scr_color ((unsigned int) (minCOLOR + (arg[i] - 40)), Color_bg);
3422 Color_bg);
3423 break; 4018 break;
3424#ifdef TTY_256COLOR
3425 case 48:
3426 if (nargs > i + 2 && arg[i + 1] == 5)
3427 {
3428 scr_color ((unsigned int)(minCOLOR + arg[i + 2]),
3429 Color_bg);
3430 i += 2;
3431 }
3432 break;
3433#endif
3434 case 49: /* default bg */ 4019 case 49: /* default bg */
3435 scr_color (Color_bg, Color_bg); 4020 scr_color (Color_bg, Color_bg);
3436 break; 4021 break;
3437 4022
3438#ifndef NO_BRIGHTCOLOR 4023 case 38: // set fg color, ISO 8613-6
4024 case 48: // set bg color, ISO 8613-6
4025 {
4026 unsigned int fgbg = arg[i] == 38 ? Color_fg : Color_bg;
4027 unsigned int idx;
4028
4029 if (nargs > i + 2 && arg[i + 1] == 5)
4030 {
4031 idx = minCOLOR + arg[i + 2];
4032 i += 2;
4033
4034 scr_color (idx, fgbg);
4035 }
4036 else if (nargs > i + 4 && arg[i + 1] == 2)
4037 {
4038 unsigned int r = arg[i + 2];
4039 unsigned int g = arg[i + 3];
4040 unsigned int b = arg[i + 4];
4041 unsigned int a = 0xff;
4042
4043 idx = map_rgb24_color (r, g, b, a);
4044
4045 i += 4;
4046
4047 scr_color (idx, fgbg);
4048 }
4049 }
4050 break;
4051
4052 //case 50: // not variable spacing
4053
4054#if !ENABLE_MINIMAL
3439 case 90: 4055 case 90:
3440 case 91: /* set bright fg color */ 4056 case 91: /* set bright fg color */
3441 case 92: 4057 case 92:
3442 case 93: 4058 case 93:
3443 case 94: 4059 case 94:
3444 case 95: 4060 case 95:
3445 case 96: 4061 case 96:
3446 case 97: 4062 case 97:
3447 scr_color ((unsigned int)(minBrightCOLOR + (arg[i] - 90)), 4063 scr_color ((unsigned int) (minBrightCOLOR + (arg[i] - 90)), Color_fg);
3448 Color_fg);
3449 break; 4064 break;
3450 case 100: 4065 case 100:
3451 case 101: /* set bright bg color */ 4066 case 101: /* set bright bg color */
3452 case 102: 4067 case 102:
3453 case 103: 4068 case 103:
3454 case 104: 4069 case 104:
3455 case 105: 4070 case 105:
3456 case 106: 4071 case 106:
3457 case 107: 4072 case 107:
3458 scr_color ((unsigned int)(minBrightCOLOR + (arg[i] - 100)), 4073 scr_color ((unsigned int) (minBrightCOLOR + (arg[i] - 100)), Color_bg);
3459 Color_bg);
3460 break; 4074 break;
3461#endif 4075#endif
3462
3463 } 4076 }
3464 } 4077 }
4078}
4079
4080void
4081rxvt_term::set_cursor_style (int style)
4082{
4083 if (!IN_RANGE_INC (style, 0, 6))
4084 return;
4085
4086 if (style == 0)
4087 style = 1;
4088
4089 cursor_type = (style - 1) / 2;
4090 set_option (Opt_cursorUnderline, cursor_type == 1);
4091
4092#ifdef CURSOR_BLINK
4093 set_option (Opt_cursorBlink, style & 1);
4094 cursor_blink_reset ();
4095#endif
4096
4097 want_refresh = 1;
3465} 4098}
3466/*}}} */ 4099/*}}} */
3467 4100
3468/*{{{ process Rob Nation's own graphics mode sequences */
3469void
3470rxvt_term::process_graphics ()
3471{
3472 unsigned char ch, cmd = cmd_getc ();
3473
3474#ifndef RXVT_GRAPHICS
3475 if (cmd == 'Q')
3476 { /* query graphics */
3477 tt_printf("\033G0\n"); /* no graphics */
3478 return;
3479 }
3480 /* swallow other graphics sequences until terminating ':' */
3481 do
3482 ch = cmd_getc ();
3483 while (ch != ':');
3484#else
3485 unsigned int nargs;
3486 int args[NGRX_PTS];
3487 unsigned char *text = NULL;
3488
3489 if (cmd == 'Q')
3490 { /* query graphics */
3491 tt_printf("\033G1\n"); /* yes, graphics (color) */
3492 return;
3493 }
3494 for (nargs = 0; nargs < (sizeof(args) / sizeof(args[0])) - 1;)
3495 {
3496 int neg;
3497
3498 ch = cmd_getc ();
3499 neg = (ch == '-');
3500 if (neg || ch == '+')
3501 ch = cmd_getc ();
3502
3503 for (args[nargs] = 0; isdigit(ch); ch = cmd_getc ())
3504 args[nargs] = args[nargs] * 10 + (ch - '0');
3505 if (neg)
3506 args[nargs] = -args[nargs];
3507
3508 nargs++;
3509 args[nargs] = 0;
3510 if (ch != ';')
3511 break;
3512 }
3513
3514 if ((cmd == 'T') && (nargs >= 5))
3515 {
3516 int i, len = args[4];
3517
3518 text = (unsigned char *)rxvt_malloc((len + 1) * sizeof(char));
3519
3520 if (text != NULL)
3521 {
3522 for (i = 0; i < len; i++)
3523 text[i] = cmd_getc ();
3524 text[len] = '\0';
3525 }
3526 }
3527 Gr_do_graphics (cmd, nargs, args, text);
3528#endif
3529}
3530/*}}} */
3531
3532/* ------------------------------------------------------------------------- */ 4101/* ---------------------------------------------------------------------- */
4102/* Write data to the pty as typed by the user, pasted with the mouse,
4103 * or generated by us in response to a query ESC sequence.
4104 */
3533 4105
3534/* 4106/*
3535 * Send printf() formatted output to the command. 4107 * Send printf () formatted output to the command.
3536 * Only use for small amounts of data. 4108 * Only use for small amounts of data.
3537 */ 4109 */
3538void 4110void
3539rxvt_term::tt_printf (const char *fmt,...) 4111rxvt_term::tt_printf (const char *fmt,...)
3540{ 4112{
3541 va_list arg_ptr; 4113 va_list arg_ptr;
3542 unsigned char buf[256]; 4114 char buf[256];
3543 4115
3544 va_start (arg_ptr, fmt); 4116 va_start (arg_ptr, fmt);
3545 vsnprintf ((char *)buf, 256, fmt, arg_ptr); 4117 vsnprintf ((char *)buf, 256, fmt, arg_ptr);
3546 va_end (arg_ptr); 4118 va_end (arg_ptr);
3547 tt_write (buf, STRLEN (buf)); 4119 tt_write (buf, strlen (buf));
3548} 4120}
3549 4121
3550/* ---------------------------------------------------------------------- */
3551/* Write data to the pty as typed by the user, pasted with the mouse, 4122/* Write data to the pty as typed by the user. */
3552 * or generated by us in response to a query ESC sequence.
3553 */
3554void 4123void
3555rxvt_term::tt_write (const unsigned char *data, unsigned int len) 4124rxvt_term::tt_write_user_input (const char *data, unsigned int len)
3556{ 4125{
3557 enum { MAX_PTY_WRITE = 255 }; // minimum MAX_INPUT 4126 if (HOOK_INVOKE ((this, HOOK_TT_WRITE, DT_STR_LEN, data, len, DT_END)))
4127 return;
3558 4128
3559 if (len) 4129 if (option (Opt_scrollTtyKeypress))
4130 if (view_start)
3560 { 4131 {
4132 view_start = 0;
4133 want_refresh = 1;
4134 }
4135
4136 tt_write_ (data, len);
4137}
4138
4139void
4140rxvt_term::tt_write (const char *data, unsigned int len)
4141{
4142 if (HOOK_INVOKE ((this, HOOK_TT_WRITE, DT_STR_LEN, data, len, DT_END)))
4143 return;
4144
4145 tt_write_ (data, len);
4146}
4147
4148static const unsigned int MAX_PTY_WRITE = 255; // minimum MAX_INPUT
4149
4150void
4151rxvt_term::tt_write_ (const char *data, unsigned int len)
4152{
4153 if (pty->pty < 0)
4154 return;
4155
4156 if (v_buflen == 0)
4157 {
4158 ssize_t written = write (pty->pty, data, min (len, MAX_PTY_WRITE));
4159
4160 max_it (written, 0);
4161
4162 if (written == len)
4163 return;
4164
4165 data += written;
4166 len -= written;
4167 }
4168
4169 v_buffer = (char *)rxvt_realloc (v_buffer, v_buflen + len);
4170
4171 memcpy (v_buffer + v_buflen, data, len);
4172 v_buflen += len;
4173
4174 pty_ev.set (ev::READ | ev::WRITE);
4175}
4176
4177void rxvt_term::pty_write ()
4178{
4179 int written = write (pty->pty, v_buffer, min (v_buflen, MAX_PTY_WRITE));
4180
4181 if (written > 0)
4182 {
4183 v_buflen -= written;
4184
3561 if (v_buflen == 0) 4185 if (v_buflen == 0)
3562 { 4186 {
3563 ssize_t written = write (cmd_fd, data, min (MAX_PTY_WRITE, len));
3564
3565 if ((unsigned int)written == len)
3566 return;
3567
3568 data += written;
3569 len -= written;
3570 }
3571
3572
3573 v_buffer = (unsigned char *)realloc (v_buffer, v_buflen + len);
3574
3575 memcpy (v_buffer + v_buflen, data, len);
3576 v_buflen += len;
3577 }
3578
3579 for (;;)
3580 {
3581 int written = write (cmd_fd, v_buffer, min (MAX_PTY_WRITE, v_buflen));
3582
3583 if (written > 0)
3584 {
3585 v_buflen -= written;
3586
3587 if (v_buflen == 0)
3588 {
3589 free (v_buffer); 4187 free (v_buffer);
3590 v_buffer = 0; 4188 v_buffer = 0;
3591 v_buflen = 0;
3592 4189
3593 pty_ev.set (EVENT_READ); 4190 pty_ev.set (ev::READ);
3594 return;
3595 }
3596
3597 memmove (v_buffer, v_buffer + written, v_buflen);
3598 }
3599 else if (written != -1 || (errno != EAGAIN && errno != EINTR))
3600 // original code just ignores this...
3601 destroy ();
3602 else
3603 {
3604 pty_ev.set (EVENT_READ | EVENT_WRITE);
3605 return; 4191 return;
3606 } 4192 }
4193
4194 memmove (v_buffer, v_buffer + written, v_buflen);
3607 } 4195 }
4196 else if (written != -1 || (errno != EAGAIN && errno != EINTR))
4197 pty_ev.set (ev::READ);
3608} 4198}
3609 4199
3610/*----------------------- end-of-file (C source) -----------------------*/ 4200/*----------------------- end-of-file (C source) -----------------------*/
3611 4201

Diff Legend

Removed lines
+ Added lines
< Changed lines
> Changed lines