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

Diff Legend

Removed lines
+ Added lines
< Changed lines
> Changed lines