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

Diff Legend

Removed lines
+ Added lines
< Changed lines
> Changed lines