ViewVC Help
View File | Revision Log | Show Annotations | Download File
/cvs/rxvt-unicode/src/command.C
Revision: 1.54
Committed: Sun Feb 22 12:58:02 2004 UTC (20 years, 2 months ago) by pcg
Content type: text/plain
Branch: MAIN
Changes since 1.53: +7 -6 lines
Log Message:
*** empty log message ***

File Contents

# User Rev Content
1 pcg 1.1 /*--------------------------------*-C-*---------------------------------*
2     * File: command.c
3     *----------------------------------------------------------------------*
4     *
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>
7     * - original version
8     * Copyright (c) 1994 Robert Nation <nation@rocket.sanders.lockheed.com>
9     * - extensive modifications
10     * Copyright (c) 1995 Garrett D'Amore <garrett@netcom.com>
11     * - vt100 printing
12     * Copyright (c) 1995 Steven Hirsch <hirsch@emba.uvm.edu>
13     * - X11 mouse report mode and support for
14     * DEC "private mode" save/restore functions.
15     * Copyright (c) 1995 Jakub Jelinek <jj@gnu.ai.mit.edu>
16     * - key-related changes to handle Shift+function
17     * keys properly.
18     * Copyright (c) 1997 MJ Olesen <olesen@me.queensu.ca>
19     * - extensive modifications
20     * Copyright (c) 1997 Raul Garcia Garcia <rgg@tid.es>
21     * - modification and cleanups for Solaris 2.x
22     * and Linux 1.2.x
23     * Copyright (c) 1997,1998 Oezguer Kesim <kesim@math.fu-berlin.de>
24     * Copyright (c) 1998-2001 Geoff Wing <gcw@pobox.com>
25     * - extensive modifications
26     * Copyright (c) 1998 Alfredo K. Kojima <kojima@windowmaker.org>
27     * Copyright (c) 2001 Marius Gedminas
28     * - Ctrl/Mod4+Tab works like Meta+Tab (options)
29     * Copyright (c) 2003 Rob McMullen <robm@flipturn.org>
30 pcg 1.49 * Copyright (c) 2003-2004 Marc Lehmann <pcg@goof.com>
31 pcg 1.1 *
32     * 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     * the Free Software Foundation; either version 2 of the License, or
35     * (at your option) any later version.
36     *
37     * This program is distributed in the hope that it will be useful,
38     * but WITHOUT ANY WARRANTY; without even the implied warranty of
39     * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
40     * GNU General Public License for more details.
41     *
42     * You should have received a copy of the GNU General Public License
43     * along with this program; if not, write to the Free Software
44     * Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.
45     *----------------------------------------------------------------------*/
46    
47     /*{{{ includes: */
48     #include "../config.h" /* NECESSARY */
49     #include "rxvt.h" /* NECESSARY */
50     #include "version.h"
51     #include "command.h"
52    
53 pcg 1.20 #include <wchar.h>
54    
55 pcg 1.1 /*----------------------------------------------------------------------*/
56    
57     /*{{{ Convert the keypress event into a string */
58     void
59 pcg 1.38 rxvt_term::lookup_key (XKeyEvent &ev)
60 pcg 1.1 {
61 pcg 1.49 int ctrl, meta, shft, len;
62     unsigned int newlen;
63     KeySym keysym;
64 pcg 1.1 #ifdef DEBUG_CMD
65 pcg 1.49 static int debug_key = 1; /* accessible by a debugger only */
66 pcg 1.1 #endif
67 pcg 1.49 int valid_keysym;
68 pcg 1.36 unsigned char kbuf[KBUFSZ];
69 pcg 1.1
70 pcg 1.36 /*
71     * use Num_Lock to toggle Keypad on/off. If Num_Lock is off, allow an
72     * escape sequence to toggle the Keypad.
73     *
74     * Always permit `shift' to override the current setting
75     */
76 pcg 1.38 shft = (ev.state & ShiftMask);
77     ctrl = (ev.state & ControlMask);
78     meta = (ev.state & ModMetaMask);
79 pcg 1.14
80 pcg 1.38 if (numlock_state || (ev.state & ModNumLockMask))
81 pcg 1.36 {
82 pcg 1.38 numlock_state = (ev.state & ModNumLockMask);
83 pcg 1.43 PrivMode ((!numlock_state), PrivMode_aplKP);
84 pcg 1.36 }
85 pcg 1.14
86 pcg 1.36 kbuf[0] = 0;
87 pcg 1.14
88 pcg 1.1 #ifdef USE_XIM
89 pcg 1.36 if (Input_Context)
90     {
91     Status status_return;
92 pcg 1.1
93     #ifdef X_HAVE_UTF8_STRING
94 pcg 1.48 if (enc_utf8 && 0) // currently disabled, doesn't seem to work, nor is useful
95 pcg 1.38 len = Xutf8LookupString (Input_Context, &ev, (char *)kbuf,
96 pcg 1.36 KBUFSZ, &keysym, &status_return);
97     else
98 pcg 1.20 #endif
99 pcg 1.36 {
100     wchar_t wkbuf[KBUFSZ + 1];
101    
102     // the XOpenIM manpage lies about hardcoding the locale
103     // at the point of XOpenIM, so temporarily switch locales
104     if (rs[Rs_imLocale])
105     SET_LOCALE (rs[Rs_imLocale]);
106     // assume wchar_t == unicode or better
107 pcg 1.38 len = XwcLookupString (Input_Context, &ev, wkbuf,
108 pcg 1.36 KBUFSZ, &keysym, &status_return);
109     if (rs[Rs_imLocale])
110     SET_LOCALE (locale);
111 pcg 1.17
112 pcg 1.36 if (status_return == XLookupChars
113 pcg 1.49 || status_return == XLookupBoth)
114 pcg 1.36 {
115     wkbuf[len] = 0;
116     len = wcstombs ((char *)kbuf, wkbuf, KBUFSZ);
117     if (len < 0)
118     len = 0;
119     }
120     else
121     len = 0;
122     }
123 pcg 1.20
124 pcg 1.36 valid_keysym = status_return == XLookupKeySym
125 pcg 1.49 || status_return == XLookupBoth;
126 pcg 1.36 }
127     else
128 pcg 1.14 #endif
129 pcg 1.36 {
130 pcg 1.38 len = XLookupString (&ev, (char *)kbuf, KBUFSZ, &keysym, &compose);
131 pcg 1.49 valid_keysym = keysym != NoSymbol;
132 pcg 1.36 }
133    
134     if (valid_keysym)
135     {
136     /* for some backwards compatibility */
137 pcg 1.1 #if defined(HOTKEY_CTRL) || defined(HOTKEY_META)
138     # ifdef HOTKEY_CTRL
139 pcg 1.36 if (ctrl)
140 pcg 1.1 # else
141 pcg 1.36 if (meta)
142 pcg 1.1 # endif
143 pcg 1.36 {
144     if (keysym == ks_bigfont)
145     {
146 pcg 1.51 change_font (FONT_UP);
147 pcg 1.36 return;
148     }
149     else if (keysym == ks_smallfont)
150     {
151 pcg 1.51 change_font (FONT_DN);
152 pcg 1.36 return;
153     }
154     }
155 pcg 1.1 #endif
156    
157 pcg 1.36 if (TermWin.saveLines)
158     {
159 pcg 1.1 #ifdef UNSHIFTED_SCROLLKEYS
160 pcg 1.36 if (!ctrl && !meta)
161     {
162 pcg 1.1 #else
163 pcg 1.36 if (IS_SCROLL_MOD)
164     {
165 pcg 1.1 #endif
166 pcg 1.49 int lnsppg;
167 pcg 1.1
168     #ifdef PAGING_CONTEXT_LINES
169 pcg 1.36 lnsppg = TermWin.nrow - PAGING_CONTEXT_LINES;
170 pcg 1.1 #else
171 pcg 1.36 lnsppg = TermWin.nrow * 4 / 5;
172 pcg 1.1 #endif
173 pcg 1.36 if (keysym == XK_Prior)
174     {
175     scr_page (UP, lnsppg);
176     return;
177     }
178     else if (keysym == XK_Next)
179     {
180     scr_page (DN, lnsppg);
181     return;
182     }
183     }
184 pcg 1.1 #ifdef SCROLL_ON_UPDOWN_KEYS
185 pcg 1.36 if (IS_SCROLL_MOD)
186     {
187     if (keysym == XK_Up)
188     {
189     scr_page (UP, 1);
190     return;
191     }
192     else if (keysym == XK_Down)
193     {
194     scr_page (DN, 1);
195     return;
196     }
197     }
198 pcg 1.1 #endif
199     #ifdef SCROLL_ON_HOMEEND_KEYS
200 pcg 1.36 if (IS_SCROLL_MOD)
201     {
202     if (keysym == XK_Home)
203     {
204     scr_move_to (0, 1);
205     return;
206     }
207     else if (keysym == XK_End)
208     {
209     scr_move_to (1, 0);
210     return;
211     }
212     }
213     #endif
214     }
215    
216     if (shft)
217     {
218     /* Shift + F1 - F10 generates F11 - F20 */
219     if (keysym >= XK_F1 && keysym <= XK_F10)
220     {
221     keysym += (XK_F11 - XK_F1);
222     shft = 0; /* turn off Shift */
223     }
224     else if (!ctrl && !meta && (PrivateModes & PrivMode_ShiftKeys))
225     {
226     switch (keysym)
227     {
228     /* normal XTerm key bindings */
229     case XK_Insert: /* Shift+Insert = paste mouse selection */
230 pcg 1.38 selection_request (ev.time, 0, 0);
231 pcg 1.36 return;
232     /* rxvt extras */
233     case XK_KP_Add: /* Shift+KP_Add = bigger font */
234 pcg 1.51 change_font (FONT_UP);
235 pcg 1.36 return;
236     case XK_KP_Subtract: /* Shift+KP_Subtract = smaller font */
237 pcg 1.51 change_font (FONT_DN);
238 pcg 1.36 return;
239     }
240     }
241     }
242 pcg 1.1 #ifdef PRINTPIPE
243 pcg 1.36 if (keysym == XK_Print)
244     {
245     scr_printscreen (ctrl | shft);
246     return;
247     }
248 pcg 1.1 #endif
249    
250 pcg 1.36 if (keysym >= 0xFF00 && keysym <= 0xFFFF)
251     {
252 pcg 1.1 #ifdef KEYSYM_RESOURCE
253 pcg 1.43 if (! (shft | ctrl) && Keysym_map[keysym & 0xFF] != NULL)
254 pcg 1.36 {
255     unsigned int l;
256     const unsigned char *kbuf0;
257     const unsigned char ch = C0_ESC;
258 pcg 1.1
259 pcg 1.36 kbuf0 = (Keysym_map[keysym & 0xFF]);
260     l = (unsigned int)*kbuf0++;
261 pcg 1.1
262 pcg 1.36 /* escape prefix */
263     if (meta)
264 pcg 1.1 # ifdef META8_OPTION
265 pcg 1.36 if (meta_char == C0_ESC)
266 pcg 1.1 # endif
267 pcg 1.36 tt_write (&ch, 1);
268     tt_write (kbuf0, l);
269     return;
270     }
271     else
272     #endif
273     {
274     newlen = 1;
275     switch (keysym)
276     {
277 pcg 1.1 #ifndef NO_BACKSPACE_KEY
278 pcg 1.36 case XK_BackSpace:
279     if (PrivateModes & PrivMode_HaveBackSpace)
280     {
281 pcg 1.43 kbuf[0] = (!! (PrivateModes & PrivMode_BackSpace)
282 pcg 1.36 ^ !!ctrl) ? '\b' : '\177';
283     kbuf[1] = '\0';
284     }
285     else
286 pcg 1.43 STRCPY (kbuf, key_backspace);
287 pcg 1.1 # ifdef MULTICHAR_SET
288 pcg 1.36 if ((Options & Opt_mc_hack) && screen.cur.col > 0)
289     {
290     int col, row;
291 pcg 1.1
292 pcg 1.43 newlen = STRLEN (kbuf);
293 pcg 1.36 col = screen.cur.col - 1;
294     row = screen.cur.row + TermWin.saveLines;
295 pcg 1.43 if (IS_MULTI2 (screen.rend[row][col]))
296     MEMMOVE (kbuf + newlen, kbuf, newlen + 1);
297 pcg 1.36 }
298 pcg 1.1 # endif
299 pcg 1.36 break;
300 pcg 1.1 #endif
301     #ifndef NO_DELETE_KEY
302 pcg 1.36 case XK_Delete:
303 pcg 1.43 STRCPY (kbuf, key_delete);
304 pcg 1.1 # ifdef MULTICHAR_SET
305 pcg 1.36 if (Options & Opt_mc_hack)
306     {
307     int col, row;
308    
309 pcg 1.43 newlen = STRLEN (kbuf);
310 pcg 1.36 col = screen.cur.col;
311     row = screen.cur.row + TermWin.saveLines;
312 pcg 1.43 if (IS_MULTI1 (screen.rend[row][col]))
313     MEMMOVE (kbuf + newlen, kbuf, newlen + 1);
314 pcg 1.36 }
315 pcg 1.1 # endif
316 pcg 1.36 break;
317 pcg 1.1 #endif
318 pcg 1.36 case XK_Tab:
319     if (shft)
320 pcg 1.43 STRCPY (kbuf, "\033[Z");
321 pcg 1.36 else
322     {
323 pcg 1.1 #ifdef CTRL_TAB_MAKES_META
324 pcg 1.36 if (ctrl)
325     meta = 1;
326 pcg 1.1 #endif
327     #ifdef MOD4_TAB_MAKES_META
328 pcg 1.38 if (ev.state & Mod4Mask)
329 pcg 1.36 meta = 1;
330 pcg 1.1 #endif
331 pcg 1.36 newlen = 0;
332     }
333     break;
334 pcg 1.1
335     #ifdef XK_KP_Left
336 pcg 1.36 case XK_KP_Up: /* \033Ox or standard */
337     case XK_KP_Down: /* \033Or or standard */
338     case XK_KP_Right: /* \033Ov or standard */
339     case XK_KP_Left: /* \033Ot or standard */
340     if ((PrivateModes & PrivMode_aplKP) ? !shft : shft)
341     {
342 pcg 1.43 STRCPY (kbuf, "\033OZ");
343 pcg 1.46 kbuf[2] = "txvr"[keysym - XK_KP_Left];
344 pcg 1.36 break;
345     }
346     else
347     /* translate to std. cursor key */
348     keysym = XK_Left + (keysym - XK_KP_Left);
349     /* FALLTHROUGH */
350     #endif
351     case XK_Up: /* "\033[A" */
352     case XK_Down: /* "\033[B" */
353     case XK_Right: /* "\033[C" */
354     case XK_Left: /* "\033[D" */
355 pcg 1.43 STRCPY (kbuf, "\033[Z");
356 pcg 1.47 kbuf[2] = "DACB"[keysym - XK_Left];
357 pcg 1.36 /* do Shift first */
358     if (shft)
359 pcg 1.47 kbuf[2] = "dacb"[keysym - XK_Left];
360 pcg 1.36 else if (ctrl)
361     {
362     kbuf[1] = 'O';
363 pcg 1.47 kbuf[2] = "dacb"[keysym - XK_Left];
364 pcg 1.36 }
365     else if (PrivateModes & PrivMode_aplCUR)
366     kbuf[1] = 'O';
367 pcg 1.1 #ifdef MULTICHAR_SET
368     //TODO: ??
369 pcg 1.36 if (Options & Opt_mc_hack)
370     {
371     int col, row, m;
372 pcg 1.1
373 pcg 1.36 col = screen.cur.col;
374     row = screen.cur.row + TermWin.saveLines;
375     m = 0;
376     if (keysym == XK_Right
377 pcg 1.43 && IS_MULTI1 (screen.rend[row][col]))
378 pcg 1.36 m = 1;
379     else if (keysym == XK_Left)
380     {
381     if (col > 0)
382     {
383 pcg 1.43 if (IS_MULTI2 (screen.rend[row][col - 1]))
384 pcg 1.36 m = 1;
385     }
386     else if (screen.cur.row > 0)
387     {
388     col = screen.tlen[--row];
389     if (col == -1)
390     col = TermWin.ncol - 1;
391     else
392     col--;
393     if (col > 0
394 pcg 1.43 && IS_MULTI2 (screen.rend[row][col]))
395 pcg 1.36 m = 1;
396     }
397     }
398     if (m)
399 pcg 1.43 MEMMOVE (kbuf + 3, kbuf, 3 + 1);
400 pcg 1.36 }
401 pcg 1.1 #endif
402 pcg 1.36 break;
403 pcg 1.1
404     #ifndef UNSHIFTED_SCROLLKEYS
405     # ifdef XK_KP_Prior
406 pcg 1.36 case XK_KP_Prior:
407     /* allow shift to override */
408     if ((PrivateModes & PrivMode_aplKP) ? !shft : shft)
409     {
410 pcg 1.43 STRCPY (kbuf, "\033Oy");
411 pcg 1.36 break;
412     }
413     /* FALLTHROUGH */
414 pcg 1.1 # endif
415 pcg 1.36 case XK_Prior:
416 pcg 1.43 STRCPY (kbuf, "\033[5~");
417 pcg 1.36 break;
418 pcg 1.1 # ifdef XK_KP_Next
419 pcg 1.36 case XK_KP_Next:
420     /* allow shift to override */
421     if ((PrivateModes & PrivMode_aplKP) ? !shft : shft)
422     {
423 pcg 1.43 STRCPY (kbuf, "\033Os");
424 pcg 1.36 break;
425     }
426     /* FALLTHROUGH */
427 pcg 1.1 # endif
428 pcg 1.36 case XK_Next:
429 pcg 1.43 STRCPY (kbuf, "\033[6~");
430 pcg 1.36 break;
431     #endif
432     case XK_KP_Enter:
433     /* allow shift to override */
434     if ((PrivateModes & PrivMode_aplKP) ? !shft : shft)
435     {
436 pcg 1.43 STRCPY (kbuf, "\033OM");
437 pcg 1.36 }
438     else
439     {
440     kbuf[0] = '\r';
441     kbuf[1] = '\0';
442     }
443     break;
444 pcg 1.1
445     #ifdef XK_KP_Begin
446 pcg 1.36 case XK_KP_Begin:
447 pcg 1.43 STRCPY (kbuf, "\033Ou");
448 pcg 1.36 break;
449    
450     case XK_KP_Insert:
451 pcg 1.43 STRCPY (kbuf, "\033Op");
452 pcg 1.36 break;
453    
454     case XK_KP_Delete:
455 pcg 1.43 STRCPY (kbuf, "\033On");
456 pcg 1.36 break;
457     #endif
458     case XK_KP_F1: /* "\033OP" */
459     case XK_KP_F2: /* "\033OQ" */
460     case XK_KP_F3: /* "\033OR" */
461     case XK_KP_F4: /* "\033OS" */
462 pcg 1.43 STRCPY (kbuf, "\033OP");
463 pcg 1.36 kbuf[2] += (keysym - XK_KP_F1);
464     break;
465    
466     case XK_KP_Multiply: /* "\033Oj" : "*" */
467 pcg 1.49 case XK_KP_Add: /* "\033Ok" : "+" */
468 pcg 1.36 case XK_KP_Separator: /* "\033Ol" : "," */
469     case XK_KP_Subtract: /* "\033Om" : "-" */
470     case XK_KP_Decimal: /* "\033On" : "." */
471     case XK_KP_Divide: /* "\033Oo" : "/" */
472     case XK_KP_0: /* "\033Op" : "0" */
473     case XK_KP_1: /* "\033Oq" : "1" */
474     case XK_KP_2: /* "\033Or" : "2" */
475     case XK_KP_3: /* "\033Os" : "3" */
476     case XK_KP_4: /* "\033Ot" : "4" */
477     case XK_KP_5: /* "\033Ou" : "5" */
478     case XK_KP_6: /* "\033Ov" : "6" */
479     case XK_KP_7: /* "\033Ow" : "7" */
480     case XK_KP_8: /* "\033Ox" : "8" */
481     case XK_KP_9: /* "\033Oy" : "9" */
482     /* allow shift to override */
483     if ((PrivateModes & PrivMode_aplKP) ? !shft : shft)
484     {
485 pcg 1.43 STRCPY (kbuf, "\033Oj");
486 pcg 1.36 kbuf[2] += (keysym - XK_KP_Multiply);
487     }
488     else
489     {
490     kbuf[0] = ('*' + (keysym - XK_KP_Multiply));
491     kbuf[1] = '\0';
492     }
493     break;
494    
495     case XK_Find:
496 pcg 1.43 STRCPY (kbuf, "\033[1~");
497 pcg 1.36 break;
498     case XK_Insert:
499 pcg 1.43 STRCPY (kbuf, "\033[2~");
500 pcg 1.36 break;
501 pcg 1.1 #ifdef DXK_Remove /* support for DEC remove like key */
502 pcg 1.36 case DXK_Remove:
503     /* FALLTHROUGH */
504 pcg 1.1 #endif
505 pcg 1.36 case XK_Execute:
506 pcg 1.43 STRCPY (kbuf, "\033[3~");
507 pcg 1.36 break;
508     case XK_Select:
509 pcg 1.43 STRCPY (kbuf, "\033[4~");
510 pcg 1.36 break;
511 pcg 1.1 #ifdef XK_KP_End
512 pcg 1.36 case XK_KP_End:
513     /* allow shift to override */
514     if ((PrivateModes & PrivMode_aplKP) ? !shft : shft)
515     {
516 pcg 1.43 STRCPY (kbuf, "\033Oq");
517 pcg 1.36 break;
518     }
519     /* FALLTHROUGH */
520     #endif
521     case XK_End:
522 pcg 1.43 STRCPY (kbuf, KS_END);
523 pcg 1.36 break;
524 pcg 1.1 #ifdef XK_KP_Home
525 pcg 1.36 case XK_KP_Home:
526     /* allow shift to override */
527     if ((PrivateModes & PrivMode_aplKP) ? !shft : shft)
528     {
529 pcg 1.43 STRCPY (kbuf, "\033Ow");
530 pcg 1.36 break;
531     }
532     /* FALLTHROUGH */
533     #endif
534     case XK_Home:
535 pcg 1.43 STRCPY (kbuf, KS_HOME);
536 pcg 1.36 break;
537 pcg 1.1
538     #define FKEY(n, fkey) \
539 pcg 1.43 sprintf ((char *)kbuf,"\033[%2d~", (int) ((n) + (keysym - fkey)))
540 pcg 1.1
541 pcg 1.36 case XK_F1: /* "\033[11~" */
542     case XK_F2: /* "\033[12~" */
543     case XK_F3: /* "\033[13~" */
544     case XK_F4: /* "\033[14~" */
545     case XK_F5: /* "\033[15~" */
546 pcg 1.43 FKEY (11, XK_F1);
547 pcg 1.36 break;
548     case XK_F6: /* "\033[17~" */
549     case XK_F7: /* "\033[18~" */
550     case XK_F8: /* "\033[19~" */
551     case XK_F9: /* "\033[20~" */
552     case XK_F10: /* "\033[21~" */
553 pcg 1.43 FKEY (17, XK_F6);
554 pcg 1.36 break;
555     case XK_F11: /* "\033[23~" */
556     case XK_F12: /* "\033[24~" */
557     case XK_F13: /* "\033[25~" */
558     case XK_F14: /* "\033[26~" */
559 pcg 1.43 FKEY (23, XK_F11);
560 pcg 1.36 break;
561     case XK_F15: /* "\033[28~" */
562     case XK_F16: /* "\033[29~" */
563 pcg 1.43 FKEY (28, XK_F15);
564 pcg 1.36 break;
565     case XK_Help: /* "\033[28~" */
566 pcg 1.43 FKEY (28, XK_Help);
567 pcg 1.36 break;
568     case XK_Menu: /* "\033[29~" */
569 pcg 1.43 FKEY (29, XK_Menu);
570 pcg 1.36 break;
571     case XK_F17: /* "\033[31~" */
572     case XK_F18: /* "\033[32~" */
573     case XK_F19: /* "\033[33~" */
574     case XK_F20: /* "\033[34~" */
575     case XK_F21: /* "\033[35~" */
576     case XK_F22: /* "\033[36~" */
577     case XK_F23: /* "\033[37~" */
578     case XK_F24: /* "\033[38~" */
579     case XK_F25: /* "\033[39~" */
580     case XK_F26: /* "\033[40~" */
581     case XK_F27: /* "\033[41~" */
582     case XK_F28: /* "\033[42~" */
583     case XK_F29: /* "\033[43~" */
584     case XK_F30: /* "\033[44~" */
585     case XK_F31: /* "\033[45~" */
586     case XK_F32: /* "\033[46~" */
587     case XK_F33: /* "\033[47~" */
588     case XK_F34: /* "\033[48~" */
589     case XK_F35: /* "\033[49~" */
590 pcg 1.43 FKEY (31, XK_F17);
591 pcg 1.36 break;
592 pcg 1.1 #undef FKEY
593 pcg 1.36 default:
594     newlen = 0;
595     break;
596     }
597     if (newlen)
598 pcg 1.43 len = STRLEN (kbuf);
599 pcg 1.36 }
600     /*
601     * Pass meta for all function keys, if 'meta' option set
602     */
603 pcg 1.1 #ifdef META8_OPTION
604 pcg 1.36 if (meta && (meta_char == 0x80) && len > 0)
605     kbuf[len - 1] |= 0x80;
606 pcg 1.1 #endif
607 pcg 1.36
608     }
609     else if (ctrl && keysym == XK_minus)
610     {
611     len = 1;
612     kbuf[0] = '\037'; /* Ctrl-Minus generates ^_ (31) */
613     }
614     else
615     {
616 pcg 1.1 #ifdef META8_OPTION
617 pcg 1.36 /* set 8-bit on */
618     if (meta && (meta_char == 0x80))
619     {
620     unsigned char *ch;
621    
622     for (ch = kbuf; ch < kbuf + len; ch++)
623     *ch |= 0x80;
624     meta = 0;
625     }
626 pcg 1.1 #endif
627 pcg 1.36 /* nil */ ;
628     }
629     }
630 pcg 1.1
631 pcg 1.36 if (len <= 0)
632     return; /* not mapped */
633 pcg 1.1
634 pcg 1.36 if (Options & Opt_scrollTtyKeypress)
635     if (TermWin.view_start)
636     {
637     TermWin.view_start = 0;
638     want_refresh = 1;
639     }
640 pcg 1.1
641 pcg 1.36 /*
642     * these modifications only affect the static keybuffer
643     * pass Shift/Control indicators for function keys ending with `~'
644     *
645     * eg,
646     * Prior = "ESC[5~"
647     * Shift+Prior = "ESC[5$"
648     * Ctrl+Prior = "ESC[5^"
649     * Ctrl+Shift+Prior = "ESC[5@"
650     * Meta adds an Escape prefix (with META8_OPTION, if meta == <escape>).
651     */
652     if (kbuf[0] == C0_ESC && kbuf[1] == '[' && kbuf[len - 1] == '~')
653     kbuf[len - 1] = (shft ? (ctrl ? '@' : '$') : (ctrl ? '^' : '~'));
654 pcg 1.1
655 pcg 1.36 /* escape prefix */
656     if (meta
657 pcg 1.1 #ifdef META8_OPTION
658 pcg 1.36 && (meta_char == C0_ESC)
659 pcg 1.1 #endif
660 pcg 1.36 )
661     {
662     const unsigned char ch = C0_ESC;
663 pcg 1.1
664 pcg 1.43 tt_write (&ch, 1);
665 pcg 1.1 }
666     #ifdef DEBUG_CMD
667 pcg 1.36 if (debug_key)
668     { /* Display keyboard buffer contents */
669     char *p;
670     int i;
671    
672 pcg 1.43 fprintf (stderr, "key 0x%04X [%d]: `", (unsigned int)keysym, len);
673 pcg 1.36 for (i = 0, p = kbuf; i < len; i++, p++)
674 pcg 1.43 fprintf (stderr, (*p >= ' ' && *p < '\177' ? "%c" : "\\%03o"), *p);
675     fprintf (stderr, "'\n");
676 pcg 1.1 }
677     #endif /* DEBUG_CMD */
678 pcg 1.36 tt_write (kbuf, (unsigned int)len);
679 pcg 1.1 }
680     /*}}} */
681    
682     #if (MENUBAR_MAX)
683 pcg 1.43 /*{{{ rxvt_cmd_write (), rxvt_cmd_getc () */
684 pcg 1.1 /* attempt to `write' count to the input buffer */
685     unsigned int
686 pcg 1.34 rxvt_term::cmd_write (const unsigned char *str, unsigned int count)
687 pcg 1.1 {
688 pcg 1.36 unsigned int n, s;
689 pcg 1.1
690 pcg 1.36 n = cmdbuf_ptr - cmdbuf_base;
691     s = cmdbuf_base + BUFSIZ - 1 - cmdbuf_endp;
692     if (n > 0 && s < count)
693     {
694 pcg 1.43 MEMMOVE (cmdbuf_base, cmdbuf_ptr,
695     (unsigned int) (cmdbuf_endp - cmdbuf_ptr));
696 pcg 1.36 cmdbuf_ptr = cmdbuf_base;
697     cmdbuf_endp -= n;
698     s += n;
699     }
700     if (count > s)
701     {
702 pcg 1.43 rxvt_print_error ("data loss: cmd_write too large");
703 pcg 1.36 count = s;
704     }
705     for (; count--;)
706     *cmdbuf_endp++ = *str++;
707     return 0;
708 pcg 1.1 }
709     #endif /* MENUBAR_MAX */
710    
711 pcg 1.3 void
712 pcg 1.11 rxvt_term::flush ()
713     {
714     #ifdef TRANSPARENT
715     if (want_full_refresh)
716     {
717     want_full_refresh = 0;
718 pcg 1.22 scr_clear ();
719     scr_touch (false);
720 pcg 1.11 want_refresh = 1;
721     }
722     #endif
723    
724     if (want_refresh)
725     {
726 pcg 1.22 scr_refresh (refresh_type);
727 pcg 1.34 scrollbar_show (1);
728 pcg 1.11 #ifdef USE_XIM
729 pcg 1.34 IMSendSpot ();
730 pcg 1.11 #endif
731 pcg 1.36
732 pcg 1.11 }
733    
734 pcg 1.42 display->flush ();
735 pcg 1.11 }
736    
737     void
738     rxvt_term::check_cb (check_watcher &w)
739     {
740     SET_R (this);
741 pcg 1.19 SET_LOCALE (locale);
742 pcg 1.11
743     flush ();
744     }
745    
746 pcg 1.27 #ifdef CURSOR_BLINK
747 pcg 1.3 void
748 pcg 1.31 rxvt_term::cursor_blink_cb (time_watcher &w)
749 pcg 1.5 {
750     hidden_cursor = !hidden_cursor;
751     want_refresh = 1;
752 pcg 1.28
753     w.start (w.at + BLINK_INTERVAL);
754 pcg 1.5 }
755 pcg 1.27 #endif
756 pcg 1.5
757 pcg 1.31 #ifdef TEXT_BLINK
758     void
759     rxvt_term::text_blink_cb (time_watcher &w)
760     {
761     if (scr_refresh_rend (RS_Blink, RS_Blink))
762     {
763     hidden_text = !hidden_text;
764     want_refresh = 1;
765     w.start (w.at + TEXT_BLINK_INTERVAL);
766     }
767     }
768     #endif
769    
770 pcg 1.4 bool
771 pcg 1.8 rxvt_term::pty_fill ()
772 pcg 1.4 {
773     ssize_t n = cmdbuf_endp - cmdbuf_ptr;
774    
775     memmove (cmdbuf_base, cmdbuf_ptr, n);
776     cmdbuf_ptr = cmdbuf_base;
777     cmdbuf_endp = cmdbuf_ptr + n;
778 pcg 1.36
779 pcg 1.8 n = read (cmd_fd, cmdbuf_endp, BUFSIZ - n);
780 pcg 1.4
781     if (n > 0)
782     {
783     cmdbuf_endp += n;
784     return true;
785     }
786 pcg 1.13 else if (n < 0 && errno != EAGAIN)
787     destroy ();
788 pcg 1.4
789 pcg 1.13 return false;
790 pcg 1.4 }
791    
792 pcg 1.3 void
793     rxvt_term::pty_cb (io_watcher &w, short revents)
794     {
795 pcg 1.9 SET_R (this);
796 pcg 1.19 SET_LOCALE (locale);
797 pcg 1.9
798 pcg 1.10 if (revents & EVENT_WRITE)
799     tt_write (0, 0);
800     else if (revents & EVENT_READ)
801 pcg 1.12 {
802     bool flag = true;
803    
804     // loop, but don't allow a single term to monopolize us
805     // the number of loops is fully arbitrary, and thus wrong
806     while (flag && pty_fill ())
807     {
808     if (!seen_input)
809     {
810     seen_input = 1;
811     /* once we know the shell is running, send the screen size. Again! */
812     tt_winch ();
813     }
814    
815     uint32_t ch = NOCHAR;
816    
817     for (;;)
818     {
819     if (ch == NOCHAR)
820     ch = next_char ();
821    
822     if (ch == NOCHAR) // TODO: improve
823     break;
824    
825     if (ch >= ' ' || ch == '\t' || ch == '\n' || ch == '\r')
826     {
827     /* Read a text string from the input buffer */
828     uint32_t buf[BUFSIZ];
829     bool refreshnow = false;
830     int nlines = 0;
831     uint32_t *str = buf;
832    
833     *str++ = ch;
834    
835     for (;;)
836     {
837     ch = next_char ();
838    
839     if (ch == NOCHAR || (ch < ' ' && ch != '\t' && ch != '\n' && ch != '\r'))
840     break;
841     else
842     {
843     *str++ = ch;
844    
845     if (ch == '\n')
846     {
847     nlines++;
848     refresh_count++;
849    
850 pcg 1.43 if (! (Options & Opt_jumpScroll)
851 pcg 1.12 || (refresh_count >= (refresh_limit * (TermWin.nrow - 1))))
852     {
853     refreshnow = true;
854     flag = false;
855     ch = NOCHAR;
856     break;
857     }
858 pcg 1.37
859     // scr_add_lines only works for nlines < TermWin.nrow - 1.
860     if (nlines >= TermWin.nrow - 1)
861     {
862     scr_add_lines (buf, nlines, str - buf);
863     nlines = 0;
864     str = buf;
865     }
866 pcg 1.12 }
867    
868     if (str >= buf + BUFSIZ)
869     {
870     ch = NOCHAR;
871     break;
872     }
873     }
874     }
875    
876 pcg 1.34 scr_add_lines (buf, nlines, str - buf);
877 pcg 1.12
878     /*
879     * If there have been a lot of new lines, then update the screen
880     * What the heck I'll cheat and only refresh less than every page-full.
881     * the number of pages between refreshes is refresh_limit, which
882     * is incremented here because we must be doing flat-out scrolling.
883     *
884     * refreshing should be correct for small scrolls, because of the
885     * time-out
886     */
887     if (refreshnow)
888     {
889     if ((Options & Opt_jumpScroll) && refresh_limit < REFRESH_PERIOD)
890     refresh_limit++;
891    
892 pcg 1.22 scr_refresh (refresh_type);
893 pcg 1.12 }
894    
895     }
896     else
897     {
898     switch (ch)
899     {
900     default:
901 pcg 1.34 process_nonprinting (ch);
902 pcg 1.12 break;
903     case C0_ESC: /* escape char */
904 pcg 1.34 process_escape_seq ();
905 pcg 1.12 break;
906 pcg 1.36 /*case 0x9b: */ /* CSI */
907     /* process_csi_seq (); */
908 pcg 1.12 }
909    
910     ch = NOCHAR;
911     }
912     }
913     }
914     }
915 pcg 1.4 }
916 pcg 1.3
917 pcg 1.11 // read the next character, currently handles UTF-8
918     // will probably handle all sorts of other stuff in the future
919     uint32_t
920     rxvt_term::next_char ()
921 pcg 1.4 {
922 pcg 1.11 while (cmdbuf_ptr < cmdbuf_endp)
923 pcg 1.3 {
924 pcg 1.20 if (*cmdbuf_ptr < 0x80) // assume < 0x80 to be ascii ALWAYS (all shift-states etc.) uh-oh
925     return *cmdbuf_ptr++;
926 pcg 1.11
927 pcg 1.20 wchar_t wc;
928 pcg 1.45 size_t len = mbrtowc (&wc, (char *)cmdbuf_ptr, cmdbuf_endp - cmdbuf_ptr, mbstate);
929 pcg 1.11
930 pcg 1.20 if (len == (size_t)-2)
931     return NOCHAR;
932 pcg 1.11
933 pcg 1.20 if (len == (size_t)-1)
934     return *cmdbuf_ptr++; // the _occasional_ latin1 character is allowed to slip through
935 pcg 1.11
936 pcg 1.20 // assume wchar == unicode
937     cmdbuf_ptr += len;
938     return wc;
939 pcg 1.3 }
940 pcg 1.4
941 pcg 1.11 return NOCHAR;
942 pcg 1.3 }
943    
944 pcg 1.43 /* rxvt_cmd_getc () - Return next input character */
945 pcg 1.1 /*
946     * Return the next input character after first passing any keyboard input
947     * to the command.
948     */
949     uint32_t
950 pcg 1.34 rxvt_term::cmd_getc ()
951 pcg 1.1 {
952 pcg 1.4 for (;;)
953     {
954 pcg 1.34 uint32_t c = next_char ();
955 pcg 1.4 if (c != NOCHAR)
956     return c;
957    
958     // incomplete sequences should occur rarely, still, a better solution
959     // would be preferred. either setjmp/longjmp or better design.
960 pcg 1.34 fcntl (cmd_fd, F_SETFL, 0);
961     pty_fill ();
962     fcntl (cmd_fd, F_SETFL, O_NONBLOCK);
963 pcg 1.4 }
964 pcg 1.6 }
965 pcg 1.1
966 pcg 1.29 #ifdef POINTER_BLANK
967 pcg 1.6 void
968     rxvt_term::pointer_unblank ()
969     {
970 pcg 1.38 XDefineCursor (display->display, TermWin.vt, TermWin_cursor);
971 pcg 1.19 recolour_cursor ();
972 pcg 1.7
973 pcg 1.6 hidden_pointer = 0;
974 pcg 1.1
975 pcg 1.7 if (Options & Opt_pointerBlank)
976     pointer_ev.start (NOW + pointerBlankDelay);
977 pcg 1.1 }
978    
979     void
980 pcg 1.6 rxvt_term::pointer_blank ()
981 pcg 1.1 {
982 pcg 1.43 if (! (Options & Opt_pointerBlank))
983 pcg 1.6 return;
984    
985 pcg 1.38 XDefineCursor (display->display, TermWin.vt, blank_cursor);
986     XFlush (display->display);
987 pcg 1.1
988 pcg 1.6 hidden_pointer = 1;
989 pcg 1.1 }
990    
991     void
992 pcg 1.6 rxvt_term::pointer_cb (time_watcher &w)
993 pcg 1.1 {
994 pcg 1.9 SET_R (this);
995 pcg 1.19 SET_LOCALE (locale);
996 pcg 1.9
997 pcg 1.6 pointer_blank ();
998 pcg 1.1 }
999     #endif
1000    
1001     void
1002 pcg 1.38 rxvt_term::mouse_report (const XButtonEvent &ev)
1003 pcg 1.1 {
1004 pcg 1.36 int button_number, key_state = 0;
1005     int x, y;
1006    
1007 pcg 1.38 x = ev.x;
1008     y = ev.y;
1009 pcg 1.36 pixel_position (&x, &y);
1010    
1011     if (MEvent.button == AnyButton)
1012     {
1013     button_number = 3;
1014     }
1015     else
1016     {
1017     button_number = MEvent.button - Button1;
1018     /* add 0x3D for wheel events, like xterm does */
1019     if (button_number >= 3)
1020     button_number += (64 - 3);
1021     }
1022 pcg 1.1
1023 pcg 1.36 if (PrivateModes & PrivMode_MouseX10)
1024     {
1025     /*
1026     * do not report ButtonRelease
1027     * no state info allowed
1028     */
1029     key_state = 0;
1030     if (button_number == 3)
1031     return;
1032     }
1033     else
1034     {
1035     /* XTerm mouse reporting needs these values:
1036     * 4 = Shift
1037     * 8 = Meta
1038     * 16 = Control
1039     * plus will add in our own Double-Click reporting
1040     * 32 = Double Click
1041     */
1042     key_state = ((MEvent.state & ShiftMask) ? 4 : 0)
1043     + ((MEvent.state & ModMetaMask) ? 8 : 0)
1044     + ((MEvent.state & ControlMask) ? 16 : 0);
1045 pcg 1.1 #ifdef MOUSE_REPORT_DOUBLECLICK
1046 pcg 1.36 key_state += ((MEvent.clicks > 1) ? 32 : 0);
1047 pcg 1.1 #endif
1048 pcg 1.36
1049 pcg 1.1 }
1050    
1051     #ifdef DEBUG_MOUSEREPORT
1052 pcg 1.43 fprintf (stderr, "Mouse [");
1053 pcg 1.36 if (key_state & 16)
1054 pcg 1.43 fputc ('C', stderr);
1055 pcg 1.36 if (key_state & 4)
1056 pcg 1.43 fputc ('S', stderr);
1057 pcg 1.36 if (key_state & 8)
1058 pcg 1.43 fputc ('A', stderr);
1059 pcg 1.36 if (key_state & 32)
1060 pcg 1.43 fputc ('2', stderr);
1061     fprintf (stderr, "]: <%d>, %d/%d\n",
1062 pcg 1.36 button_number,
1063     x + 1,
1064     y + 1);
1065 pcg 1.1 #else
1066 pcg 1.43 tt_printf ("\033[M%c%c%c",
1067 pcg 1.36 (32 + button_number + key_state),
1068     (32 + x + 1),
1069     (32 + y + 1));
1070 pcg 1.1 #endif
1071     }
1072    
1073     #ifdef USING_W11LIB
1074     void
1075 pcg 1.43 rxvt_W11_process_x_event (XEvent *ev)
1076 pcg 1.1 {
1077 pcg 1.43 rxvt_t *r = rxvt_get_r ();
1078 pcg 1.1
1079 pcg 1.38 x_cb (*ev);
1080 pcg 1.1 }
1081     #endif
1082    
1083     /*{{{ process an X event */
1084     void
1085 pcg 1.38 rxvt_term::x_cb (XEvent &ev)
1086 pcg 1.1 {
1087 pcg 1.38 SET_R (this);
1088     SET_LOCALE (locale);
1089    
1090     #if defined(CURSOR_BLINK)
1091     if ((Options & Opt_cursorBlink) && ev.type == KeyPress)
1092     {
1093     if (hidden_cursor)
1094     {
1095     hidden_cursor = 0;
1096     want_refresh = 1;
1097     }
1098    
1099     cursor_blink_ev.start (NOW + BLINK_INTERVAL);
1100     }
1101     #endif
1102    
1103     #if defined(POINTER_BLANK)
1104     if ((Options & Opt_pointerBlank) && pointerBlankDelay > 0)
1105     {
1106     if (ev.type == MotionNotify
1107     || ev.type == ButtonPress
1108     || ev.type == ButtonRelease)
1109     if (hidden_pointer)
1110     pointer_unblank ();
1111    
1112     if (ev.type == KeyPress && hidden_pointer == 0)
1113     pointer_blank ();
1114     }
1115     #endif
1116    
1117     #ifdef USE_XIM
1118     if (XFilterEvent (&ev, None))
1119     return;
1120     #endif
1121    
1122 pcg 1.36 Window unused_root, unused_child;
1123     int unused_root_x, unused_root_y;
1124     unsigned int unused_mask;
1125 pcg 1.3
1126 pcg 1.1 #ifdef DEBUG_X
1127 pcg 1.36 const char *const eventnames[] =
1128 pcg 1.1 { /* mason - this matches my system */
1129 pcg 1.36 "",
1130     "",
1131     "KeyPress",
1132     "KeyRelease",
1133     "ButtonPress",
1134     "ButtonRelease",
1135     "MotionNotify",
1136     "EnterNotify",
1137     "LeaveNotify",
1138     "FocusIn",
1139     "FocusOut",
1140     "KeymapNotify",
1141     "Expose",
1142     "GraphicsExpose",
1143     "NoExpose",
1144     "VisibilityNotify",
1145     "CreateNotify",
1146     "DestroyNotify",
1147     "UnmapNotify",
1148     "MapNotify",
1149     "MapRequest",
1150     "ReparentNotify",
1151     "ConfigureNotify",
1152     "ConfigureRequest",
1153     "GravityNotify",
1154     "ResizeRequest",
1155     "CirculateNotify",
1156     "CirculateRequest",
1157     "PropertyNotify",
1158     "SelectionClear",
1159     "SelectionRequest",
1160     "SelectionNotify",
1161     "ColormapNotify",
1162     "ClientMessage",
1163     "MappingNotify"
1164 pcg 1.1 };
1165     #endif
1166    
1167     #ifdef DEBUG_X
1168 pcg 1.36 struct timeval tp;
1169     struct tm *ltt;
1170 pcg 1.43 (void)gettimeofday (&tp, NULL);
1171     ltt = localtime (& (tp.tv_sec));
1172     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));
1173 pcg 1.1 #endif
1174    
1175 pcg 1.38 switch (ev.type)
1176 pcg 1.36 {
1177     case KeyPress:
1178 pcg 1.38 lookup_key (ev.xkey);
1179 pcg 1.36 break;
1180 pcg 1.1
1181     #if defined(MOUSE_WHEEL) && defined(MOUSE_SLIP_WHEELING)
1182 pcg 1.36 case KeyRelease:
1183     {
1184 pcg 1.43 if (! (ev.xkey.state & ControlMask))
1185 pcg 1.36 mouse_slip_wheel_speed = 0;
1186     else
1187     {
1188     KeySym ks;
1189    
1190 pcg 1.43 ks = XKeycodeToKeysym (display->display, ev.xkey.keycode, 0);
1191 pcg 1.36 if (ks == XK_Control_L || ks == XK_Control_R)
1192     mouse_slip_wheel_speed = 0;
1193     }
1194     break;
1195     }
1196     #endif
1197    
1198     case ButtonPress:
1199 pcg 1.38 button_press (ev.xbutton);
1200 pcg 1.36 break;
1201    
1202     case ButtonRelease:
1203 pcg 1.38 button_release (ev.xbutton);
1204 pcg 1.36 break;
1205    
1206     case ClientMessage:
1207 pcg 1.38 if (ev.xclient.format == 32
1208     && (Atom)ev.xclient.data.l[0] == xa[XA_WMDELETEWINDOW])
1209 pcg 1.34 destroy ();
1210 pcg 1.1 #ifdef OFFIX_DND
1211 pcg 1.36 /* OffiX Dnd (drag 'n' drop) protocol */
1212 pcg 1.38 else if (ev.xclient.message_type == xa[XA_DNDPROTOCOL]
1213     && (ev.xclient.data.l[0] == DndFile
1214     || ev.xclient.data.l[0] == DndDir
1215     || ev.xclient.data.l[0] == DndLink))
1216 pcg 1.36 {
1217     /* Get Dnd data */
1218     Atom ActualType;
1219     int ActualFormat;
1220     unsigned char *data;
1221     unsigned long Size, RemainingBytes;
1222    
1223 pcg 1.43 XGetWindowProperty (display->display, display->root,
1224 pcg 1.36 xa[XA_DNDSELECTION],
1225     0L, 1000000L,
1226     False, AnyPropertyType,
1227     &ActualType, &ActualFormat,
1228     &Size, &RemainingBytes,
1229     &data);
1230 pcg 1.43 XChangeProperty (display->display, display->root,
1231 pcg 1.36 XA_CUT_BUFFER0, XA_STRING,
1232     8, PropModeReplace,
1233 pcg 1.43 data, STRLEN (data));
1234 pcg 1.38 selection_paste (display->root, XA_CUT_BUFFER0, True);
1235 pcg 1.43 XSetInputFocus (display->display, display->root, RevertToNone, CurrentTime);
1236 pcg 1.36 }
1237 pcg 1.1 #endif /* OFFIX_DND */
1238 pcg 1.36 break;
1239 pcg 1.1
1240 pcg 1.36 case MappingNotify:
1241 pcg 1.43 XRefreshKeyboardMapping (& (ev.xmapping));
1242 pcg 1.36 break;
1243    
1244     /*
1245     * XXX: this is not the _current_ arrangement
1246     * Here's my conclusion:
1247     * If the window is completely unobscured, use bitblt's
1248     * to scroll. Even then, they're only used when doing partial
1249     * screen scrolling. When partially obscured, we have to fill
1250     * in the GraphicsExpose parts, which means that after each refresh,
1251     * we need to wait for the graphics expose or Noexpose events,
1252     * which ought to make things real slow!
1253     */
1254     case VisibilityNotify:
1255 pcg 1.38 switch (ev.xvisibility.state)
1256 pcg 1.8 {
1257     case VisibilityUnobscured:
1258 pcg 1.34 refresh_type = FAST_REFRESH;
1259 pcg 1.8 break;
1260     case VisibilityPartiallyObscured:
1261 pcg 1.34 refresh_type = SLOW_REFRESH;
1262 pcg 1.8 break;
1263     default:
1264 pcg 1.34 refresh_type = NO_REFRESH;
1265 pcg 1.8 break;
1266     }
1267 pcg 1.36 break;
1268 pcg 1.1
1269 pcg 1.36 case FocusIn:
1270     if (!TermWin.focus)
1271     {
1272     TermWin.focus = 1;
1273     want_refresh = 1;
1274 pcg 1.1 #ifdef USE_XIM
1275 pcg 1.36 if (Input_Context != NULL)
1276 pcg 1.43 XSetICFocus (Input_Context);
1277 pcg 1.1 #endif
1278 pcg 1.5 #ifdef CURSOR_BLINK
1279 pcg 1.34 if (Options & Opt_cursorBlink)
1280     cursor_blink_ev.start (NOW + BLINK_INTERVAL);
1281 pcg 1.5 #endif
1282 pcg 1.1
1283 pcg 1.36 }
1284     break;
1285    
1286     case FocusOut:
1287     if (TermWin.focus)
1288     {
1289     TermWin.focus = 0;
1290     want_refresh = 1;
1291 pcg 1.1 #ifdef USE_XIM
1292 pcg 1.36 if (Input_Context != NULL)
1293 pcg 1.43 XUnsetICFocus (Input_Context);
1294 pcg 1.5 #endif
1295     #ifdef CURSOR_BLINK
1296 pcg 1.34 if (Options & Opt_cursorBlink)
1297     cursor_blink_ev.stop ();
1298     hidden_cursor = 0;
1299 pcg 1.1 #endif
1300    
1301 pcg 1.36 }
1302     break;
1303    
1304     case ConfigureNotify:
1305 pcg 1.38 if (ev.xconfigure.window == TermWin.parent[0])
1306 pcg 1.36 {
1307 pcg 1.38 int height, width;
1308 pcg 1.36
1309     do
1310     { /* Wrap lots of configures into one */
1311 pcg 1.38 width = ev.xconfigure.width;
1312     height = ev.xconfigure.height;
1313 pcg 1.43 D_SIZE ((stderr, "Size: ConfigureNotify: %4d x %4d", width, height));
1314 pcg 1.36 }
1315 pcg 1.43 while (XCheckTypedWindowEvent (display->display, ev.xconfigure.window, ConfigureNotify, &ev));
1316 pcg 1.38
1317 pcg 1.36 if (szHint.width != width || szHint.height != height)
1318     {
1319 pcg 1.43 D_SIZE ((stderr, "Size: Resizing from: %4d x %4d", szHint.width, szHint.height));
1320 pcg 1.36 resize_all_windows (width, height, 1);
1321     }
1322 pcg 1.1 #ifdef DEBUG_SIZE
1323 pcg 1.36 else
1324     {
1325 pcg 1.43 D_SIZE ((stderr, "Size: Not resizing"));
1326 pcg 1.36 }
1327 pcg 1.1 #endif
1328     #ifdef TRANSPARENT /* XXX: maybe not needed - leave in for now */
1329 pcg 1.36 if (Options & Opt_transparent)
1330     {
1331     check_our_parents ();
1332     if (am_transparent)
1333     want_full_refresh = 1;
1334     }
1335     #endif
1336    
1337     }
1338     break;
1339    
1340     case SelectionClear:
1341 pcg 1.41 display->set_selection_owner (0);
1342 pcg 1.36 break;
1343    
1344     case SelectionNotify:
1345     if (selection_wait == Sel_normal)
1346 pcg 1.38 selection_paste (ev.xselection.requestor,
1347     ev.xselection.property, True);
1348 pcg 1.36 break;
1349    
1350     case SelectionRequest:
1351 pcg 1.38 selection_send (ev.xselectionrequest);
1352 pcg 1.36 break;
1353 pcg 1.1
1354 pcg 1.36 case UnmapNotify:
1355     TermWin.mapped = 0;
1356 pcg 1.31 #ifdef TEXT_BLINK
1357 pcg 1.34 text_blink_ev.stop ();
1358 pcg 1.31 #endif
1359 pcg 1.36 break;
1360 pcg 1.1
1361 pcg 1.36 case MapNotify:
1362     TermWin.mapped = 1;
1363 pcg 1.31 #ifdef TEXT_BLINK
1364 pcg 1.34 text_blink_ev.start (NOW + TEXT_BLINK_INTERVAL);
1365 pcg 1.31 #endif
1366 pcg 1.36 break;
1367 pcg 1.1
1368     #ifdef TRANSPARENT
1369 pcg 1.36 case ReparentNotify:
1370 pcg 1.38 rootwin_cb (ev);
1371     break;
1372 pcg 1.1 #endif /* TRANSPARENT */
1373    
1374 pcg 1.36 case GraphicsExpose:
1375     case Expose:
1376 pcg 1.38 if (ev.xany.window == TermWin.vt)
1377 pcg 1.36 {
1378 pcg 1.1 #ifdef NO_SLOW_LINK_SUPPORT
1379 pcg 1.38 scr_expose (ev.xexpose.x, ev.xexpose.y,
1380     ev.xexpose.width, ev.xexpose.height, False);
1381 pcg 1.1 #else
1382     // don't understand this, so commented it out
1383 pcg 1.38 scr_expose (ev.xexpose.x, ev.xexpose.y,
1384     ev.xexpose.width, ev.xexpose.height, False);
1385     //scr_expose (ev.xexpose.x, 0,
1386     // ev.xexpose.width, TermWin.height, False);
1387 pcg 1.36 #endif
1388     want_refresh = 1;
1389     }
1390     else
1391     {
1392 pcg 1.38 XEvent unused_event;
1393 pcg 1.36
1394 pcg 1.43 while (XCheckTypedWindowEvent (display->display, ev.xany.window,
1395 pcg 1.36 Expose,
1396 pcg 1.38 &unused_event)) ;
1397 pcg 1.43 while (XCheckTypedWindowEvent (display->display, ev.xany.window,
1398 pcg 1.36 GraphicsExpose,
1399 pcg 1.38 &unused_event)) ;
1400 pcg 1.43 if (isScrollbarWindow (ev.xany.window))
1401 pcg 1.36 {
1402 pcg 1.43 scrollBar.setIdle ();
1403 pcg 1.36 scrollbar_show (0);
1404     }
1405 pcg 1.1 #ifdef MENUBAR
1406 pcg 1.43 if (menubar_visible () && isMenuBarWindow (ev.xany.window))
1407 pcg 1.36 menubar_expose ();
1408 pcg 1.1 #endif
1409 pcg 1.36 }
1410     break;
1411    
1412     case MotionNotify:
1413 pcg 1.1 #ifdef POINTER_BLANK
1414 pcg 1.36 if (hidden_pointer)
1415     pointer_unblank ();
1416 pcg 1.1 #endif
1417     #if MENUBAR
1418 pcg 1.43 if (isMenuBarWindow (ev.xany.window))
1419 pcg 1.36 {
1420 pcg 1.43 menubar_control (& (ev.xbutton));
1421 pcg 1.36 break;
1422     }
1423     #endif
1424 pcg 1.43 if ((PrivateModes & PrivMode_mouse_report) && ! (bypass_keystate))
1425 pcg 1.36 break;
1426    
1427 pcg 1.38 if (ev.xany.window == TermWin.vt)
1428 pcg 1.36 {
1429 pcg 1.38 if ((ev.xbutton.state & (Button1Mask | Button3Mask)))
1430 pcg 1.36 {
1431 pcg 1.38 while (XCheckTypedWindowEvent (display->display, TermWin.vt, MotionNotify, &ev))
1432     ;
1433    
1434 pcg 1.43 XQueryPointer (display->display, TermWin.vt,
1435 pcg 1.36 &unused_root, &unused_child,
1436     &unused_root_x, &unused_root_y,
1437 pcg 1.43 & (ev.xbutton.x), & (ev.xbutton.y),
1438 pcg 1.36 &unused_mask);
1439 pcg 1.1 #ifdef MOUSE_THRESHOLD
1440 pcg 1.36 /* deal with a `jumpy' mouse */
1441 pcg 1.38 if ((ev.xmotion.time - MEvent.time) > MOUSE_THRESHOLD)
1442 pcg 1.36 {
1443 pcg 1.1 #endif
1444 pcg 1.38 selection_extend ((ev.xbutton.x), (ev.xbutton.y),
1445     (ev.xbutton.state & Button3Mask) ? 2 : 0);
1446 pcg 1.1 #ifdef SELECTION_SCROLLING
1447 pcg 1.38 if (ev.xbutton.y < TermWin.int_bwidth
1448 pcg 1.43 || Pixel2Row (ev.xbutton.y) > (TermWin.nrow-1))
1449 pcg 1.36 {
1450     int dist;
1451    
1452     pending_scroll_selection=1;
1453    
1454     /* don't clobber the current delay if we are
1455     * already in the middle of scrolling.
1456     */
1457     if (scroll_selection_delay<=0)
1458     scroll_selection_delay=SCROLLBAR_CONTINUOUS_DELAY;
1459    
1460     /* save the event params so we can highlight
1461     * the selection in the pending-scroll loop
1462     */
1463 pcg 1.38 selection_save_x=ev.xbutton.x;
1464     selection_save_y=ev.xbutton.y;
1465 pcg 1.36 selection_save_state=
1466 pcg 1.38 (ev.xbutton.state & Button3Mask) ? 2 : 0;
1467 pcg 1.36
1468     /* calc number of lines to scroll */
1469 pcg 1.38 if (ev.xbutton.y<TermWin.int_bwidth)
1470 pcg 1.36 {
1471     scroll_selection_dir = UP;
1472 pcg 1.38 dist = TermWin.int_bwidth - ev.xbutton.y;
1473 pcg 1.36 }
1474     else
1475     {
1476     scroll_selection_dir = DN;
1477 pcg 1.38 dist = ev.xbutton.y -
1478 pcg 1.36 (TermWin.int_bwidth + TermWin.height);
1479     }
1480 pcg 1.43 scroll_selection_lines= (Pixel2Height (dist)/
1481 pcg 1.36 SELECTION_SCROLL_LINE_SPEEDUP)+1;
1482 pcg 1.43 MIN_IT (scroll_selection_lines,
1483 pcg 1.36 SELECTION_SCROLL_MAX_LINES);
1484     }
1485     else
1486     {
1487     /* we are within the text window, so we
1488     * shouldn't be scrolling
1489     */
1490     pending_scroll_selection = 0;
1491     }
1492 pcg 1.1 #endif
1493     #ifdef MOUSE_THRESHOLD
1494 pcg 1.36
1495     }
1496 pcg 1.1 #endif
1497 pcg 1.36
1498     }
1499     }
1500 pcg 1.43 else if (isScrollbarWindow (ev.xany.window) && scrollbar_isMotion ())
1501 pcg 1.36 {
1502 pcg 1.43 while (XCheckTypedWindowEvent (display->display, scrollBar.win,
1503 pcg 1.38 MotionNotify, &ev)) ;
1504 pcg 1.43 XQueryPointer (display->display, scrollBar.win,
1505 pcg 1.36 &unused_root, &unused_child,
1506     &unused_root_x, &unused_root_y,
1507 pcg 1.43 & (ev.xbutton.x), & (ev.xbutton.y),
1508 pcg 1.36 &unused_mask);
1509 pcg 1.43 scr_move_to (scrollbar_position (ev.xbutton.y) - csrO,
1510     scrollbar_size ());
1511 pcg 1.36 scr_refresh (refresh_type);
1512     refresh_limit = 0;
1513     scrollbar_show (1);
1514     }
1515     break;
1516     }
1517     }
1518 pcg 1.1
1519     void
1520 pcg 1.38 rxvt_term::rootwin_cb (XEvent &ev)
1521     {
1522     SET_R (this);
1523     SET_LOCALE (locale);
1524    
1525 pcg 1.40 switch (ev.type)
1526 pcg 1.38 {
1527 pcg 1.40 case PropertyNotify:
1528     if (ev.xproperty.atom == xa[XA_VT_SELECTION])
1529     {
1530     if (ev.xproperty.state == PropertyNewValue)
1531     selection_property (ev.xproperty.window, ev.xproperty.atom);
1532     break;
1533     }
1534     #ifdef TRANSPARENT
1535     else
1536     {
1537     /*
1538     * if user used some Esetroot compatible prog to set the root bg,
1539     * use the property to determine the pixmap. We use it later on.
1540     */
1541     if (xa[XA_XROOTPMAPID] == 0)
1542 pcg 1.43 xa[XA_XROOTPMAPID] = XInternAtom (display->display, "_XROOTPMAP_ID", False);
1543 pcg 1.38
1544 pcg 1.40 if (ev.xproperty.atom != xa[XA_XROOTPMAPID])
1545     return;
1546     }
1547 pcg 1.38
1548 pcg 1.40 /* FALLTHROUGH */
1549     case ReparentNotify:
1550     if ((Options & Opt_transparent) && check_our_parents ())
1551     if (am_transparent)
1552     want_full_refresh = 1;
1553     break;
1554     #endif
1555 pcg 1.38 }
1556     }
1557    
1558     void
1559     rxvt_term::button_press (const XButtonEvent &ev)
1560 pcg 1.1 {
1561 pcg 1.36 int reportmode = 0, clickintime;
1562 pcg 1.1
1563 pcg 1.38 bypass_keystate = ev.state & (ModMetaMask | ShiftMask);
1564 pcg 1.36 if (!bypass_keystate)
1565 pcg 1.43 reportmode = !! (PrivateModes & PrivMode_mouse_report);
1566 pcg 1.36 /*
1567     * VT window processing of button press
1568     */
1569 pcg 1.38 if (ev.window == TermWin.vt)
1570 pcg 1.36 {
1571 pcg 1.50 clickintime = ev.time - MEvent.time < MULTICLICK_TIME;
1572     if (reportmode)
1573 pcg 1.36 {
1574 pcg 1.50 /* mouse report from vt window */
1575     /* save the xbutton state (for ButtonRelease) */
1576     MEvent.state = ev.state;
1577     #ifdef MOUSE_REPORT_DOUBLECLICK
1578     if (ev.button == MEvent.button && clickintime)
1579 pcg 1.36 {
1580 pcg 1.50 /* same button, within alloted time */
1581     MEvent.clicks++;
1582     if (MEvent.clicks > 1)
1583 pcg 1.36 {
1584 pcg 1.50 /* only report double clicks */
1585     MEvent.clicks = 2;
1586 pcg 1.36 mouse_report (ev);
1587 pcg 1.50
1588     /* don't report the release */
1589     MEvent.clicks = 0;
1590     MEvent.button = AnyButton;
1591 pcg 1.36 }
1592 pcg 1.50 }
1593     else
1594     {
1595     /* different button, or time expired */
1596     MEvent.clicks = 1;
1597 pcg 1.38 MEvent.button = ev.button;
1598 pcg 1.36 mouse_report (ev);
1599 pcg 1.50 }
1600     #else
1601     MEvent.button = ev.button;
1602     mouse_report (ev);
1603 pcg 1.1 #endif /* MOUSE_REPORT_DOUBLECLICK */
1604 pcg 1.36
1605 pcg 1.50 }
1606     else
1607     {
1608     if (ev.button != MEvent.button)
1609     MEvent.clicks = 0;
1610     switch (ev.button)
1611 pcg 1.36 {
1612 pcg 1.50 case Button1:
1613     /* allow shift+left click to extend selection */
1614     if (ev.state & ShiftMask && ! (PrivateModes & PrivMode_mouse_report))
1615     {
1616     if (MEvent.button == Button1 && clickintime)
1617     selection_rotate (ev.x, ev.y);
1618     else
1619     selection_extend (ev.x, ev.y, 1);
1620     }
1621     else
1622     {
1623     if (MEvent.button == Button1 && clickintime)
1624     MEvent.clicks++;
1625 pcg 1.36 else
1626 pcg 1.50 MEvent.clicks = 1;
1627 pcg 1.21
1628 pcg 1.50 selection_click (MEvent.clicks, ev.x, ev.y);
1629     }
1630 pcg 1.21
1631 pcg 1.50 MEvent.button = Button1;
1632     break;
1633 pcg 1.1
1634 pcg 1.50 case Button3:
1635     if (MEvent.button == Button3 && clickintime)
1636     selection_rotate (ev.x, ev.y);
1637     else
1638     selection_extend (ev.x, ev.y, 1);
1639     MEvent.button = Button3;
1640     break;
1641 pcg 1.36 }
1642     }
1643 pcg 1.50 MEvent.time = ev.time;
1644     return;
1645 pcg 1.36 }
1646 pcg 1.1
1647 pcg 1.36 /*
1648     * Scrollbar window processing of button press
1649     */
1650 pcg 1.43 if (isScrollbarWindow (ev.window))
1651 pcg 1.36 {
1652     scrollBar.setIdle ();
1653     /*
1654     * Rxvt-style scrollbar:
1655     * move up if mouse is above slider
1656     * move dn if mouse is below slider
1657     *
1658     * XTerm-style scrollbar:
1659     * Move display proportional to pointer location
1660     * pointer near top -> scroll one line
1661     * pointer near bot -> scroll full page
1662     */
1663 pcg 1.1 #ifndef NO_SCROLLBAR_REPORT
1664 pcg 1.36 if (reportmode)
1665     {
1666     /*
1667     * Mouse report disabled scrollbar:
1668     * arrow buttons - send up/down
1669     * click on scrollbar - send pageup/down
1670     */
1671     if ((scrollBar.style == R_SB_NEXT
1672 pcg 1.43 && scrollbarnext_upButton (ev.y))
1673 pcg 1.36 || (scrollBar.style == R_SB_RXVT
1674 pcg 1.43 && scrollbarrxvt_upButton (ev.y)))
1675     tt_printf ("\033[A");
1676 pcg 1.36 else if ((scrollBar.style == R_SB_NEXT
1677 pcg 1.43 && scrollbarnext_dnButton (ev.y))
1678 pcg 1.36 || (scrollBar.style == R_SB_RXVT
1679 pcg 1.43 && scrollbarrxvt_dnButton (ev.y)))
1680     tt_printf ("\033[B");
1681 pcg 1.36 else
1682 pcg 1.38 switch (ev.button)
1683 pcg 1.36 {
1684     case Button2:
1685 pcg 1.43 tt_printf ("\014");
1686 pcg 1.36 break;
1687     case Button1:
1688 pcg 1.43 tt_printf ("\033[6~");
1689 pcg 1.36 break;
1690     case Button3:
1691 pcg 1.43 tt_printf ("\033[5~");
1692 pcg 1.36 break;
1693     }
1694     }
1695     else
1696 pcg 1.1 #endif /* NO_SCROLLBAR_REPORT */
1697    
1698 pcg 1.36 {
1699     char upordown = 0;
1700    
1701     if (scrollBar.style == R_SB_NEXT)
1702     {
1703 pcg 1.43 if (scrollbarnext_upButton (ev.y))
1704 pcg 1.36 upordown = -1; /* up */
1705 pcg 1.43 else if (scrollbarnext_dnButton (ev.y))
1706 pcg 1.36 upordown = 1; /* down */
1707     }
1708     else if (scrollBar.style == R_SB_RXVT)
1709     {
1710 pcg 1.43 if (scrollbarrxvt_upButton (ev.y))
1711 pcg 1.36 upordown = -1; /* up */
1712 pcg 1.43 else if (scrollbarrxvt_dnButton (ev.y))
1713 pcg 1.36 upordown = 1; /* down */
1714     }
1715     if (upordown)
1716     {
1717 pcg 1.1 #ifndef NO_SCROLLBAR_BUTTON_CONTINUAL_SCROLLING
1718 pcg 1.36 scroll_arrow_delay = SCROLLBAR_INITIAL_DELAY;
1719 pcg 1.1 #endif
1720 pcg 1.36 if (scr_page (upordown < 0 ? UP : DN, 1))
1721     {
1722     if (upordown < 0)
1723     scrollBar.setUp ();
1724     else
1725     scrollBar.setDn ();
1726     }
1727     }
1728     else
1729 pcg 1.38 switch (ev.button)
1730 pcg 1.36 {
1731     case Button2:
1732     switch (scrollbar_align)
1733     {
1734     case R_SB_ALIGN_TOP:
1735     csrO = 0;
1736     break;
1737     case R_SB_ALIGN_CENTRE:
1738     csrO = (scrollBar.bot - scrollBar.top) / 2;
1739     break;
1740     case R_SB_ALIGN_BOTTOM:
1741     csrO = scrollBar.bot - scrollBar.top;
1742     break;
1743     }
1744     if (scrollBar.style == R_SB_XTERM
1745 pcg 1.43 || scrollbar_above_slider (ev.y)
1746     || scrollbar_below_slider (ev.y))
1747     scr_move_to ( scrollbar_position (ev.y) - csrO,
1748     scrollbar_size ());
1749 pcg 1.36 scrollBar.setMotion ();
1750     break;
1751    
1752     case Button1:
1753     if (scrollbar_align == R_SB_ALIGN_CENTRE)
1754 pcg 1.38 csrO = ev.y - scrollBar.top;
1755 pcg 1.36 /* FALLTHROUGH */
1756    
1757     case Button3:
1758     if (scrollBar.style != R_SB_XTERM)
1759     {
1760 pcg 1.43 if (scrollbar_above_slider (ev.y))
1761 pcg 1.1 # ifdef RXVT_SCROLL_FULL
1762 pcg 1.36 scr_page (UP, TermWin.nrow - 1);
1763 pcg 1.1 # else
1764 pcg 1.36 scr_page (UP, TermWin.nrow / 4);
1765 pcg 1.1 # endif
1766 pcg 1.43 else if (scrollbar_below_slider (ev.y))
1767 pcg 1.1 # ifdef RXVT_SCROLL_FULL
1768 pcg 1.36 scr_page (DN, TermWin.nrow - 1);
1769 pcg 1.1 # else
1770 pcg 1.36 scr_page (DN, TermWin.nrow / 4);
1771 pcg 1.1 # endif
1772 pcg 1.36 else
1773     scrollBar.setMotion ();
1774     }
1775     else
1776     {
1777 pcg 1.38 scr_page ((ev.button == Button1 ? DN : UP),
1778 pcg 1.36 (TermWin.nrow
1779 pcg 1.43 * scrollbar_position (ev.y)
1780     / scrollbar_size ()));
1781 pcg 1.36 }
1782     break;
1783     }
1784     }
1785     return;
1786 pcg 1.1 }
1787     #if MENUBAR
1788 pcg 1.36 /*
1789     * Menubar window processing of button press
1790     */
1791 pcg 1.43 if (isMenuBarWindow (ev.window))
1792 pcg 1.36 menubar_control (ev);
1793 pcg 1.1 #endif
1794     }
1795    
1796     void
1797 pcg 1.38 rxvt_term::button_release (const XButtonEvent &ev)
1798 pcg 1.1 {
1799 pcg 1.38 int reportmode = 0;
1800 pcg 1.1
1801 pcg 1.36 csrO = 0; /* reset csr Offset */
1802     if (!bypass_keystate)
1803 pcg 1.43 reportmode = !! (PrivateModes & PrivMode_mouse_report);
1804 pcg 1.36
1805 pcg 1.43 if (scrollbar_isUpDn ())
1806 pcg 1.36 {
1807     scrollBar.setIdle ();
1808     scrollbar_show (0);
1809 pcg 1.1 #ifndef NO_SCROLLBAR_BUTTON_CONTINUAL_SCROLLING
1810 pcg 1.36 refresh_type &= ~SMOOTH_REFRESH;
1811 pcg 1.1 #endif
1812 pcg 1.36
1813 pcg 1.1 }
1814     #ifdef SELECTION_SCROLLING
1815 pcg 1.36 pending_scroll_selection=0;
1816 pcg 1.1 #endif
1817 pcg 1.38 if (ev.window == TermWin.vt)
1818 pcg 1.36 {
1819 pcg 1.50 if (reportmode)
1820 pcg 1.36 {
1821 pcg 1.50 /* mouse report from vt window */
1822     /* don't report release of wheel "buttons" */
1823     if (ev.button >= 4)
1824     return;
1825     #ifdef MOUSE_REPORT_DOUBLECLICK
1826     /* only report the release of 'slow' single clicks */
1827     if (MEvent.button != AnyButton
1828     && (ev.button != MEvent.button
1829     || (ev.time - MEvent.time
1830     > MULTICLICK_TIME / 2)))
1831 pcg 1.36 {
1832 pcg 1.50 MEvent.clicks = 0;
1833 pcg 1.36 MEvent.button = AnyButton;
1834     mouse_report (ev);
1835 pcg 1.50 }
1836     #else /* MOUSE_REPORT_DOUBLECLICK */
1837     MEvent.button = AnyButton;
1838     mouse_report (ev);
1839 pcg 1.1 #endif /* MOUSE_REPORT_DOUBLECLICK */
1840 pcg 1.50 return;
1841     }
1842     /*
1843     * dumb hack to compensate for the failure of click-and-drag
1844     * when overriding mouse reporting
1845     */
1846     if (PrivateModes & PrivMode_mouse_report
1847     && bypass_keystate
1848     && ev.button == Button1 && MEvent.clicks <= 1)
1849     selection_extend (ev.x, ev.y, 0);
1850    
1851     switch (ev.button)
1852     {
1853     case Button1:
1854     case Button3:
1855     selection_make (ev.time);
1856     break;
1857     case Button2:
1858     selection_request (ev.time, ev.x, ev.y);
1859     break;
1860     #ifdef MOUSE_WHEEL
1861     case Button4:
1862     case Button5:
1863 pcg 1.36 {
1864 pcg 1.50 int i;
1865     page_dirn v;
1866 pcg 1.36
1867 pcg 1.50 v = (ev.button == Button4) ? UP : DN;
1868     if (ev.state & ShiftMask)
1869     i = 1;
1870     else if ((Options & Opt_mouseWheelScrollPage))
1871     i = TermWin.nrow - 1;
1872     else
1873     i = 5;
1874 pcg 1.1 # ifdef MOUSE_SLIP_WHEELING
1875 pcg 1.50 if (ev.state & ControlMask)
1876     {
1877     mouse_slip_wheel_speed += (v ? -1 : 1);
1878     mouse_slip_wheel_delay = SCROLLBAR_CONTINUOUS_DELAY;
1879     }
1880 pcg 1.1 # endif
1881     # ifdef JUMP_MOUSE_WHEEL
1882 pcg 1.50 scr_page (v, i);
1883     scr_refresh (SMOOTH_REFRESH);
1884     scrollbar_show (1);
1885     # else
1886     while (i--)
1887     {
1888     scr_page (v, 1);
1889 pcg 1.36 scr_refresh (SMOOTH_REFRESH);
1890     scrollbar_show (1);
1891 pcg 1.50 }
1892 pcg 1.1 # endif
1893 pcg 1.36
1894 pcg 1.50 }
1895     break;
1896 pcg 1.1 #endif
1897 pcg 1.36
1898     }
1899     }
1900 pcg 1.1 #ifdef MENUBAR
1901 pcg 1.43 else if (isMenuBarWindow (ev.window))
1902 pcg 1.36 menubar_control (ev);
1903 pcg 1.1 #endif
1904     }
1905    
1906    
1907     #ifdef TRANSPARENT
1908     /*
1909     * Check our parents are still who we think they are.
1910     * Do transparency updates if required
1911     */
1912     int
1913 pcg 1.34 rxvt_term::check_our_parents ()
1914 pcg 1.1 {
1915 pcg 1.36 int i, pchanged, aformat, have_pixmap, rootdepth;
1916     unsigned long nitems, bytes_after;
1917     Atom atype;
1918     unsigned char *prop = NULL;
1919     Window root, oldp, *list;
1920     Pixmap rootpixmap = None;
1921     XWindowAttributes wattr, wrootattr;
1922    
1923     pchanged = 0;
1924    
1925 pcg 1.43 if (! (Options & Opt_transparent))
1926 pcg 1.36 return pchanged; /* Don't try any more */
1927    
1928 pcg 1.43 XGetWindowAttributes (display->display, display->root, &wrootattr);
1929 pcg 1.36 rootdepth = wrootattr.depth;
1930    
1931 pcg 1.43 XGetWindowAttributes (display->display, TermWin.parent[0], &wattr);
1932 pcg 1.36 if (rootdepth != wattr.depth)
1933     {
1934     if (am_transparent)
1935     {
1936     pchanged = 1;
1937 pcg 1.43 XSetWindowBackground (display->display, TermWin.vt,
1938 pcg 1.36 PixColors[Color_bg]);
1939     am_transparent = am_pixmap_trans = 0;
1940     }
1941     return pchanged; /* Don't try any more */
1942 pcg 1.1 }
1943    
1944 pcg 1.36 /* Get all X ops out of the queue so that our information is up-to-date. */
1945 pcg 1.43 XSync (display->display, False);
1946 pcg 1.1
1947 pcg 1.36 /*
1948     * Make the frame window set by the window manager have
1949     * the root background. Some window managers put multiple nested frame
1950     * windows for each client, so we have to take care about that.
1951     */
1952     i = (xa[XA_XROOTPMAPID] != 0
1953 pcg 1.43 && (XGetWindowProperty (display->display, display->root, xa[XA_XROOTPMAPID],
1954 pcg 1.36 0L, 1L, False, XA_PIXMAP, &atype, &aformat,
1955     &nitems, &bytes_after, &prop) == Success));
1956     if (!i || prop == NULL)
1957     have_pixmap = 0;
1958     else
1959     {
1960     have_pixmap = 1;
1961 pcg 1.43 rootpixmap = * ((Pixmap *)prop);
1962     XFree (prop);
1963 pcg 1.1 }
1964 pcg 1.36 if (have_pixmap)
1965     {
1966     /*
1967 pcg 1.38 * Copy display->root pixmap transparency
1968 pcg 1.36 */
1969     int sx, sy, nx, ny;
1970     unsigned int nw, nh;
1971     Window cr;
1972     XImage *image;
1973     GC gc;
1974     XGCValues gcvalue;
1975    
1976 pcg 1.43 XTranslateCoordinates (display->display, TermWin.parent[0], display->root,
1977 pcg 1.36 0, 0, &sx, &sy, &cr);
1978     nw = (unsigned int)szHint.width;
1979     nh = (unsigned int)szHint.height;
1980     nx = ny = 0;
1981     if (sx < 0)
1982     {
1983     nw += sx;
1984     nx = -sx;
1985     sx = 0;
1986     }
1987     if (sy < 0)
1988     {
1989     nh += sy;
1990     ny = -sy;
1991     sy = 0;
1992     }
1993 pcg 1.43 MIN_IT (nw, (unsigned int) (wrootattr.width - sx));
1994     MIN_IT (nh, (unsigned int) (wrootattr.height - sy));
1995 pcg 1.36 allowedxerror = -1;
1996 pcg 1.43 image = XGetImage (display->display, rootpixmap, sx, sy, nw, nh, AllPlanes,
1997 pcg 1.36 ZPixmap);
1998     /* XXX: handle BadMatch - usually because we're outside the pixmap */
1999     /* XXX: may need a delay here? */
2000     allowedxerror = 0;
2001     if (image == NULL)
2002     {
2003     if (am_transparent && am_pixmap_trans)
2004     {
2005     pchanged = 1;
2006     if (TermWin.pixmap != None)
2007     {
2008 pcg 1.43 XFreePixmap (display->display, TermWin.pixmap);
2009 pcg 1.36 TermWin.pixmap = None;
2010     }
2011     }
2012     am_pixmap_trans = 0;
2013     }
2014     else
2015     {
2016     if (TermWin.pixmap != None)
2017 pcg 1.43 XFreePixmap (display->display, TermWin.pixmap);
2018     TermWin.pixmap = XCreatePixmap (display->display, TermWin.vt,
2019 pcg 1.36 (unsigned int)szHint.width,
2020     (unsigned int)szHint.height,
2021     (unsigned int)image->depth);
2022 pcg 1.43 gc = XCreateGC (display->display, TermWin.vt, 0UL, &gcvalue);
2023     XPutImage (display->display, TermWin.pixmap, gc, image, 0, 0,
2024 pcg 1.36 nx, ny, (unsigned int)image->width,
2025     (unsigned int)image->height);
2026 pcg 1.43 XFreeGC (display->display, gc);
2027     XDestroyImage (image);
2028     XSetWindowBackgroundPixmap (display->display, TermWin.vt,
2029 pcg 1.36 TermWin.pixmap);
2030     if (!am_transparent || !am_pixmap_trans)
2031     pchanged = 1;
2032     am_transparent = am_pixmap_trans = 1;
2033     }
2034 pcg 1.1 }
2035 pcg 1.36 if (!am_pixmap_trans)
2036     {
2037     unsigned int n;
2038     /*
2039     * InheritPixmap transparency
2040     */
2041 pcg 1.43 D_X ((stderr, "InheritPixmap Seeking to %08lx", display->root));
2042     for (i = 1; i < (int) (sizeof (TermWin.parent) / sizeof (Window));
2043 pcg 1.36 i++)
2044     {
2045     oldp = TermWin.parent[i];
2046 pcg 1.43 XQueryTree (display->display, TermWin.parent[i - 1], &root,
2047 pcg 1.36 &TermWin.parent[i], &list, &n);
2048 pcg 1.43 XFree (list);
2049     D_X ((stderr, "InheritPixmap Parent[%d] = %08lx", i, TermWin.parent[i]));
2050 pcg 1.38 if (TermWin.parent[i] == display->root)
2051 pcg 1.36 {
2052     if (oldp != None)
2053     pchanged = 1;
2054     break;
2055     }
2056     if (oldp != TermWin.parent[i])
2057     pchanged = 1;
2058     }
2059     n = 0;
2060     if (pchanged)
2061     {
2062     for (; n < (unsigned int)i; n++)
2063     {
2064 pcg 1.43 XGetWindowAttributes (display->display, TermWin.parent[n], &wattr);
2065     D_X ((stderr, "InheritPixmap Checking Parent[%d]: %s", n, (wattr.depth == rootdepth && wattr.class != InputOnly) ? "OK" : "FAIL"));
2066 pcg 1.36 if (wattr.depth != rootdepth || wattr.c_class == InputOnly)
2067     {
2068 pcg 1.43 n = (int) (sizeof (TermWin.parent) / sizeof (Window)) + 1;
2069 pcg 1.36 break;
2070     }
2071     }
2072     }
2073 pcg 1.43 if (n > (int) (sizeof (TermWin.parent)
2074     / sizeof (TermWin.parent[0])))
2075 pcg 1.36 {
2076 pcg 1.43 D_X ((stderr, "InheritPixmap Turning off"));
2077     XSetWindowBackground (display->display, TermWin.parent[0],
2078 pcg 1.36 PixColors[Color_fg]);
2079 pcg 1.43 XSetWindowBackground (display->display, TermWin.vt,
2080 pcg 1.36 PixColors[Color_bg]);
2081     am_transparent = 0;
2082     /* XXX: also turn off Opt_transparent? */
2083     }
2084     else
2085     {
2086     /* wait (an arbitrary period) for the WM to do its thing
2087     * needed for fvwm2.2.2 (and before?) */
2088 pcg 1.1 # ifdef HAVE_NANOSLEEP
2089 pcg 1.36 struct timespec rqt;
2090 pcg 1.1
2091 pcg 1.36 rqt.tv_sec = 1;
2092     rqt.tv_nsec = 0;
2093 pcg 1.43 nanosleep (&rqt, NULL);
2094 pcg 1.1 # else
2095 pcg 1.43 sleep (1);
2096 pcg 1.1 # endif
2097 pcg 1.43 D_X ((stderr, "InheritPixmap Turning on (%d parents)", i - 1));
2098 pcg 1.36 for (n = 0; n < (unsigned int)i; n++)
2099 pcg 1.43 XSetWindowBackgroundPixmap (display->display, TermWin.parent[n],
2100 pcg 1.36 ParentRelative);
2101 pcg 1.43 XSetWindowBackgroundPixmap (display->display, TermWin.vt,
2102 pcg 1.36 ParentRelative);
2103     am_transparent = 1;
2104     }
2105 pcg 1.43 for (; i < (int) (sizeof (TermWin.parent) / sizeof (Window)); i++)
2106 pcg 1.36 TermWin.parent[i] = None;
2107 pcg 1.1 }
2108 pcg 1.36 return pchanged;
2109 pcg 1.1 }
2110     #endif
2111    
2112     /*}}} */
2113    
2114     /*{{{ print pipe */
2115     /*----------------------------------------------------------------------*/
2116     #ifdef PRINTPIPE
2117 pcg 1.34 FILE *
2118     rxvt_term::popen_printer ()
2119 pcg 1.1 {
2120 pcg 1.43 FILE *stream = popen (rs[Rs_print_pipe], "w");
2121 pcg 1.1
2122 pcg 1.36 if (stream == NULL)
2123 pcg 1.43 rxvt_print_error ("can't open printer pipe");
2124 pcg 1.36 return stream;
2125 pcg 1.1 }
2126    
2127     int
2128 pcg 1.34 rxvt_term::pclose_printer (FILE *stream)
2129 pcg 1.1 {
2130 pcg 1.11 fflush (stream);
2131 pcg 1.43 /* pclose () reported not to work on SunOS 4.1.3 */
2132 pcg 1.1 # if defined (__sun__) /* TODO: RESOLVE THIS */
2133 pcg 1.36 /* pclose works provided SIGCHLD handler uses waitpid */
2134 pcg 1.11 return pclose (stream); /* return fclose (stream); */
2135 pcg 1.1 # else
2136 pcg 1.11 return pclose (stream);
2137 pcg 1.1 # endif
2138     }
2139    
2140     /*
2141     * simulate attached vt100 printer
2142     */
2143     void
2144 pcg 1.34 rxvt_term::process_print_pipe ()
2145 pcg 1.1 {
2146 pcg 1.36 int done;
2147     FILE *fd;
2148    
2149     if ((fd = popen_printer ()) == NULL)
2150     return;
2151    
2152     /*
2153     * Send all input to the printer until either ESC[4i or ESC[?4i
2154     * is received.
2155     */
2156     for (done = 0; !done;)
2157     {
2158     unsigned char buf[8];
2159     unsigned char ch;
2160     unsigned int i, len;
2161 pcg 1.1
2162 pcg 1.36 if ((ch = cmd_getc ()) != C0_ESC)
2163     {
2164 pcg 1.43 if (putc (ch, fd) == EOF)
2165 pcg 1.36 break; /* done = 1 */
2166     }
2167     else
2168     {
2169     len = 0;
2170     buf[len++] = ch;
2171 pcg 1.1
2172 pcg 1.36 if ((buf[len++] = cmd_getc ()) == '[')
2173     {
2174     if ((ch = cmd_getc ()) == '?')
2175     {
2176     buf[len++] = '?';
2177     ch = cmd_getc ();
2178     }
2179     if ((buf[len++] = ch) == '4')
2180     {
2181     if ((buf[len++] = cmd_getc ()) == 'i')
2182     break; /* done = 1 */
2183     }
2184     }
2185     for (i = 0; i < len; i++)
2186 pcg 1.43 if (putc (buf[i], fd) == EOF)
2187 pcg 1.36 {
2188     done = 1;
2189     break;
2190     }
2191     }
2192 pcg 1.1 }
2193 pcg 1.36 pclose_printer (fd);
2194 pcg 1.1 }
2195     #endif /* PRINTPIPE */
2196     /*}}} */
2197    
2198     /* *INDENT-OFF* */
2199     enum {
2200 pcg 1.36 C1_40 = 0x40,
2201     C1_41 , C1_BPH, C1_NBH, C1_44 , C1_NEL, C1_SSA, C1_ESA,
2202     C1_HTS, C1_HTJ, C1_VTS, C1_PLD, C1_PLU, C1_RI , C1_SS2, C1_SS3,
2203     C1_DCS, C1_PU1, C1_PU2, C1_STS, C1_CCH, C1_MW , C1_SPA, C1_EPA,
2204     C1_SOS, C1_59 , C1_SCI, C1_CSI, CS_ST , C1_OSC, C1_PM , C1_APC
2205 pcg 1.1 };
2206     /* *INDENT-ON* */
2207    
2208     /*{{{ process non-printing single characters */
2209     void
2210 pcg 1.34 rxvt_term::process_nonprinting (unsigned char ch)
2211 pcg 1.1 {
2212 pcg 1.36 switch (ch)
2213     {
2214     case C0_ENQ: /* terminal Status */
2215     if (rs[Rs_answerbackstring])
2216 pcg 1.43 tt_write (
2217 pcg 1.36 (const unsigned char *)rs[Rs_answerbackstring],
2218 pcg 1.43 (unsigned int)STRLEN (rs[Rs_answerbackstring]));
2219 pcg 1.36 else
2220 pcg 1.43 tt_write ((unsigned char *)VT100_ANS,
2221     (unsigned int)STRLEN (VT100_ANS));
2222 pcg 1.36 break;
2223     case C0_BEL: /* bell */
2224     scr_bell ();
2225     break;
2226     case C0_BS: /* backspace */
2227     scr_backspace ();
2228     break;
2229     case C0_HT: /* tab */
2230     scr_tab (1);
2231     break;
2232     case C0_CR: /* carriage return */
2233     scr_gotorc (0, 0, R_RELATIVE);
2234     break;
2235     case C0_VT: /* vertical tab, form feed */
2236     case C0_FF:
2237     case C0_LF: /* line feed */
2238     scr_index (UP);
2239     break;
2240     case C0_SO: /* shift out - acs */
2241     scr_charset_choose (1);
2242     break;
2243     case C0_SI: /* shift in - acs */
2244     scr_charset_choose (0);
2245     break;
2246 pcg 1.1 }
2247     }
2248     /*}}} */
2249    
2250    
2251     /*{{{ process VT52 escape sequences */
2252     void
2253 pcg 1.34 rxvt_term::process_escape_vt52 (unsigned char ch)
2254 pcg 1.1 {
2255 pcg 1.36 int row, col;
2256    
2257     switch (ch)
2258     {
2259     case 'A': /* cursor up */
2260     scr_gotorc (-1, 0, R_RELATIVE | C_RELATIVE);
2261     break;
2262     case 'B': /* cursor down */
2263     scr_gotorc (1, 0, R_RELATIVE | C_RELATIVE);
2264     break;
2265     case 'C': /* cursor right */
2266     scr_gotorc (0, 1, R_RELATIVE | C_RELATIVE);
2267     break;
2268     case 'D': /* cursor left */
2269     scr_gotorc (0, -1, R_RELATIVE | C_RELATIVE);
2270     break;
2271     case 'H': /* cursor home */
2272     scr_gotorc (0, 0, 0);
2273     break;
2274     case 'I': /* cursor up and scroll down if needed */
2275     scr_index (DN);
2276     break;
2277     case 'J': /* erase to end of screen */
2278     scr_erase_screen (0);
2279     break;
2280     case 'K': /* erase to end of line */
2281     scr_erase_line (0);
2282     break;
2283     case 'Y': /* move to specified row and col */
2284     /* full command is 'ESC Y row col' where row and col
2285     * are encoded by adding 32 and sending the ascii
2286     * character. eg. SPACE = 0, '+' = 13, '0' = 18,
2287     * etc. */
2288     row = cmd_getc () - ' ';
2289     col = cmd_getc () - ' ';
2290     scr_gotorc (row, col, 0);
2291     break;
2292     case 'Z': /* identify the terminal type */
2293 pcg 1.43 tt_printf ("\033/Z"); /* I am a VT100 emulating a VT52 */
2294 pcg 1.1 break;
2295 pcg 1.36 case '<': /* turn off VT52 mode */
2296 pcg 1.43 PrivMode (0, PrivMode_vt52);
2297 pcg 1.36 break;
2298     case 'F': /* use special graphics character set */
2299     case 'G': /* use regular character set */
2300     /* unimplemented */
2301     break;
2302     case '=': /* use alternate keypad mode */
2303     case '>': /* use regular keypad mode */
2304     /* unimplemented */
2305     break;
2306 pcg 1.1 }
2307     }
2308     /*}}} */
2309    
2310    
2311     /*{{{ process escape sequences */
2312     void
2313 pcg 1.34 rxvt_term::process_escape_seq ()
2314 pcg 1.1 {
2315 pcg 1.36 unsigned char ch = cmd_getc ();
2316    
2317     if (PrivateModes & PrivMode_vt52)
2318     {
2319     process_escape_vt52 (ch);
2320     return;
2321     }
2322 pcg 1.1
2323 pcg 1.36 switch (ch)
2324     {
2325     /* case 1: do_tek_mode (); break; */
2326     case '#':
2327     if (cmd_getc () == '8')
2328     scr_E ();
2329     break;
2330 pcg 1.44 case '(':
2331 pcg 1.36 scr_charset_set (0, (unsigned int)cmd_getc ());
2332     break;
2333     case ')':
2334     scr_charset_set (1, (unsigned int)cmd_getc ());
2335     break;
2336     case '*':
2337     scr_charset_set (2, (unsigned int)cmd_getc ());
2338     break;
2339     case '+':
2340     scr_charset_set (3, (unsigned int)cmd_getc ());
2341     break;
2342 pcg 1.1 #ifdef MULTICHAR_SET
2343 pcg 1.36 case '$':
2344     scr_charset_set (-2, (unsigned int)cmd_getc ());
2345     break;
2346 pcg 1.1 #endif
2347     #ifndef NO_FRILLS
2348 pcg 1.36 case '6':
2349     scr_backindex ();
2350     break;
2351     #endif
2352     case '7':
2353     scr_cursor (SAVE);
2354     break;
2355     case '8':
2356     scr_cursor (RESTORE);
2357     break;
2358 pcg 1.1 #ifndef NO_FRILLS
2359 pcg 1.36 case '9':
2360     scr_forwardindex ();
2361     break;
2362     #endif
2363     case '=':
2364     case '>':
2365 pcg 1.43 PrivMode ((ch == '='), PrivMode_aplKP);
2366 pcg 1.36 break;
2367    
2368     case C1_40:
2369     cmd_getc ();
2370     break;
2371     case C1_44:
2372     scr_index (UP);
2373     break;
2374 pcg 1.1
2375 pcg 1.36 /* 8.3.87: NEXT LINE */
2376     case C1_NEL: /* ESC E */
2377 pcg 1.1 {
2378     uint32_t nlcr[] = { '\n', '\r' };
2379 pcg 1.34 scr_add_lines (nlcr, 1, 2);
2380 pcg 1.1 }
2381 pcg 1.36 break;
2382    
2383     /* kidnapped escape sequence: Should be 8.3.48 */
2384     case C1_ESA: /* ESC G */
2385     process_graphics ();
2386     break;
2387    
2388     /* 8.3.63: CHARACTER TABULATION SET */
2389     case C1_HTS: /* ESC H */
2390     scr_set_tab (1);
2391     break;
2392    
2393     /* 8.3.105: REVERSE LINE FEED */
2394     case C1_RI: /* ESC M */
2395     scr_index (DN);
2396     break;
2397    
2398     /* 8.3.142: SINGLE-SHIFT TWO */
2399     /*case C1_SS2: scr_single_shift (2); break; */
2400    
2401     /* 8.3.143: SINGLE-SHIFT THREE */
2402     /*case C1_SS3: scr_single_shift (3); break; */
2403    
2404     /* 8.3.27: DEVICE CONTROL STRING */
2405     case C1_DCS: /* ESC P */
2406     process_dcs_seq ();
2407     break;
2408    
2409     /* 8.3.110: SINGLE CHARACTER INTRODUCER */
2410     case C1_SCI: /* ESC Z */
2411 pcg 1.43 tt_write ((const unsigned char *)ESCZ_ANSWER,
2412     (unsigned int) (sizeof (ESCZ_ANSWER) - 1));
2413 pcg 1.36 break; /* steal obsolete ESC [ c */
2414    
2415     /* 8.3.16: CONTROL SEQUENCE INTRODUCER */
2416     case C1_CSI: /* ESC [ */
2417     process_csi_seq ();
2418     break;
2419 pcg 1.1
2420 pcg 1.36 /* 8.3.90: OPERATING SYSTEM COMMAND */
2421     case C1_OSC: /* ESC ] */
2422     process_osc_seq ();
2423     break;
2424    
2425     /* 8.3.106: RESET TO INITIAL STATE */
2426     case 'c':
2427     scr_poweron ();
2428     scrollbar_show (1);
2429     break;
2430    
2431     /* 8.3.79: LOCKING-SHIFT TWO (see ISO2022) */
2432     case 'n':
2433     scr_charset_choose (2);
2434     break;
2435    
2436     /* 8.3.81: LOCKING-SHIFT THREE (see ISO2022) */
2437     case 'o':
2438     scr_charset_choose (3);
2439     break;
2440 pcg 1.1 }
2441     }
2442     /*}}} */
2443    
2444     /*{{{ process CONTROL SEQUENCE INTRODUCER (CSI) sequences `ESC[' */
2445     /* *INDENT-OFF* */
2446     enum {
2447 pcg 1.36 CSI_ICH = 0x40,
2448     CSI_CUU, CSI_CUD, CSI_CUF, CSI_CUB, CSI_CNL, CSI_CPL, CSI_CHA,
2449     CSI_CUP, CSI_CHT, CSI_ED , CSI_EL , CSI_IL , CSI_DL , CSI_EF , CSI_EA ,
2450     CSI_DCH, CSI_SEE, CSI_CPR, CSI_SU , CSI_SD , CSI_NP , CSI_PP , CSI_CTC,
2451     CSI_ECH, CSI_CVT, CSI_CBT, CSI_SRS, CSI_PTX, CSI_SDS, CSI_SIMD, CSI_5F,
2452     CSI_HPA, CSI_HPR, CSI_REP, CSI_DA , CSI_VPA, CSI_VPR, CSI_HVP, CSI_TBC,
2453     CSI_SM , CSI_MC , CSI_HPB, CSI_VPB, CSI_RM , CSI_SGR, CSI_DSR, CSI_DAQ,
2454     CSI_70 , CSI_71 , CSI_72 , CSI_73 , CSI_74 , CSI_75 , CSI_76 , CSI_77 ,
2455     CSI_78 , CSI_79 , CSI_7A , CSI_7B , CSI_7C , CSI_7D , CSI_7E , CSI_7F
2456 pcg 1.1 };
2457    
2458     #define make_byte(b7,b6,b5,b4,b3,b2,b1,b0) \
2459     (((b7) << 7) | ((b6) << 6) | ((b5) << 5) | ((b4) << 4) \
2460     | ((b3) << 3) | ((b2) << 2) | ((b1) << 1) | (b0))
2461     #define get_byte_array_bit(array, bit) \
2462 pcg 1.43 (!! ((array)[ (bit) / 8] & (128 >> ((bit) & 7))))
2463 pcg 1.1
2464 pcg 1.36 const unsigned char csi_defaults[] =
2465     {
2466 pcg 1.43 make_byte (1,1,1,1,1,1,1,1), /* @, A, B, C, D, E, F, G, */
2467     make_byte (1,1,0,0,1,1,0,0), /* H, I, J, K, L, M, N, O, */
2468     make_byte (1,0,1,1,1,1,1,0), /* P, Q, R, S, T, U, V, W, */
2469     make_byte (1,1,1,0,0,0,1,0), /* X, Y, Z, [, \, ], ^, _, */
2470     make_byte (1,1,1,0,1,1,1,0), /* `, a, b, c, d, e, f, g, */
2471     make_byte (0,0,1,1,0,0,0,0), /* h, i, j, k, l, m, n, o, */
2472     make_byte (0,0,0,0,0,0,0,0), /* p, q, r, s, t, u, v, w, */
2473     make_byte (0,0,0,0,0,0,0,0) /* x, y, z, {, |, }, ~, */
2474 pcg 1.36 };
2475 pcg 1.1 /* *INDENT-ON* */
2476    
2477     void
2478 pcg 1.34 rxvt_term::process_csi_seq ()
2479 pcg 1.1 {
2480 pcg 1.36 unsigned char ch, priv, i;
2481     unsigned int nargs, p;
2482     int n, ndef;
2483     int arg[ESC_ARGS];
2484    
2485     for (nargs = ESC_ARGS; nargs > 0;)
2486     arg[--nargs] = 0;
2487    
2488     priv = 0;
2489     ch = cmd_getc ();
2490     if (ch >= '<' && ch <= '?')
2491     { /* '<' '=' '>' '?' */
2492     priv = ch;
2493     ch = cmd_getc ();
2494     }
2495     /* read any numerical arguments */
2496     for (n = -1; ch < CSI_ICH; )
2497     {
2498 pcg 1.43 if (isdigit (ch))
2499 pcg 1.36 {
2500     if (n < 0)
2501     n = ch - '0';
2502     else
2503     n = n * 10 + ch - '0';
2504     }
2505     else if (ch == ';')
2506     {
2507     if (nargs < ESC_ARGS)
2508     arg[nargs++] = n;
2509     n = -1;
2510     }
2511     else if (ch == '\b')
2512     {
2513     scr_backspace ();
2514     }
2515     else if (ch == C0_ESC)
2516     {
2517     process_escape_seq ();
2518     return;
2519     }
2520     else if (ch < ' ')
2521     {
2522     process_nonprinting (ch);
2523     }
2524     ch = cmd_getc ();
2525     }
2526 pcg 1.1
2527 pcg 1.36 if (ch > CSI_7F)
2528     return;
2529 pcg 1.1
2530 pcg 1.36 if (nargs < ESC_ARGS)
2531     arg[nargs++] = n;
2532    
2533     i = ch - CSI_ICH;
2534 pcg 1.43 ndef = get_byte_array_bit (csi_defaults, i);
2535 pcg 1.36 for (p = 0; p < nargs; p++)
2536     if (arg[p] == -1)
2537     arg[p] = ndef;
2538 pcg 1.1
2539     #ifdef DEBUG_CMD
2540 pcg 1.43 fprintf (stderr, "CSI ");
2541 pcg 1.36 for (p = 0; p < nargs; p++)
2542 pcg 1.43 fprintf (stderr, "%d%s", arg[p], p < nargs - 1 ? ";" : "");
2543     fprintf (stderr, "%c\n", ch);
2544 pcg 1.1 #endif
2545    
2546 pcg 1.36 /*
2547     * private mode handling
2548     */
2549     if (priv)
2550     {
2551     switch (priv)
2552     {
2553     case '>':
2554     if (ch == CSI_DA) /* secondary device attributes */
2555 pcg 1.43 tt_printf ("\033[>%d;%-.8s;0c", 'R', VSTRING);
2556 pcg 1.36 break;
2557     case '?':
2558     if (ch == 'h' || ch == 'l' || ch == 'r' || ch == 's' || ch == 't')
2559     process_terminal_mode (ch, priv, nargs, arg);
2560     break;
2561     }
2562     return;
2563 pcg 1.1 }
2564    
2565 pcg 1.36 switch (ch)
2566     {
2567     /*
2568 pcg 1.43 * ISO/IEC 6429:1992 (E) CSI sequences (defaults in parentheses)
2569 pcg 1.36 */
2570 pcg 1.1 #ifdef PRINTPIPE
2571 pcg 1.36 case CSI_MC: /* 8.3.83: (0) MEDIA COPY */
2572     switch (arg[0])
2573     {
2574     case 0: /* initiate transfer to primary aux device */
2575     scr_printscreen (0);
2576     break;
2577     case 5: /* start relay to primary aux device */
2578     process_print_pipe ();
2579     break;
2580     }
2581     break;
2582     #endif
2583 pcg 1.1
2584 pcg 1.36 case CSI_CUU: /* 8.3.22: (1) CURSOR UP */
2585     case CSI_VPR: /* 8.3.161: (1) LINE POSITION FORWARD */
2586     arg[0] = -arg[0];
2587     /* FALLTHROUGH */
2588     case CSI_CUD: /* 8.3.19: (1) CURSOR DOWN */
2589     case CSI_VPB: /* 8.3.160: (1) LINE POSITION BACKWARD */
2590     scr_gotorc (arg[0], 0, RELATIVE);
2591     break;
2592    
2593     case CSI_CUB: /* 8.3.18: (1) CURSOR LEFT */
2594     case CSI_HPB: /* 8.3.59: (1) CHARACTER POSITION BACKWARD */
2595 pcg 1.1 #ifdef ISO6429
2596 pcg 1.36 arg[0] = -arg[0];
2597 pcg 1.1 #else /* emulate common DEC VTs */
2598 pcg 1.36 arg[0] = arg[0] ? -arg[0] : -1;
2599 pcg 1.1 #endif
2600 pcg 1.36 /* FALLTHROUGH */
2601     case CSI_CUF: /* 8.3.20: (1) CURSOR RIGHT */
2602     case CSI_HPR: /* 8.3.60: (1) CHARACTER POSITION FORWARD */
2603 pcg 1.1 #ifdef ISO6429
2604 pcg 1.36 scr_gotorc (0, arg[0], RELATIVE);
2605 pcg 1.1 #else /* emulate common DEC VTs */
2606 pcg 1.36 scr_gotorc (0, arg[0] ? arg[0] : 1, RELATIVE);
2607 pcg 1.1 #endif
2608 pcg 1.36 break;
2609    
2610     case CSI_CPL: /* 8.3.13: (1) CURSOR PRECEDING LINE */
2611     arg[0] = -arg[0];
2612     /* FALLTHROUGH */
2613     case CSI_CNL: /* 8.3.12: (1) CURSOR NEXT LINE */
2614     scr_gotorc (arg[0], 0, R_RELATIVE);
2615     break;
2616    
2617     case CSI_CHA: /* 8.3.9: (1) CURSOR CHARACTER ABSOLUTE */
2618     case CSI_HPA: /* 8.3.58: (1) CURSOR POSITION ABSOLUTE */
2619     scr_gotorc (0, arg[0] - 1, R_RELATIVE);
2620     break;
2621    
2622     case CSI_VPA: /* 8.3.159: (1) LINE POSITION ABSOLUTE */
2623     scr_gotorc (arg[0] - 1, 0, C_RELATIVE);
2624     break;
2625    
2626     case CSI_CUP: /* 8.3.21: (1,1) CURSOR POSITION */
2627     case CSI_HVP: /* 8.3.64: (1,1) CHARACTER AND LINE POSITION */
2628     scr_gotorc (arg[0] - 1, nargs < 2 ? 0 : (arg[1] - 1), 0);
2629     break;
2630 pcg 1.1
2631 pcg 1.36 case CSI_CBT: /* 8.3.7: (1) CURSOR BACKWARD TABULATION */
2632     arg[0] = -arg[0];
2633     /* FALLTHROUGH */
2634     case CSI_CHT: /* 8.3.10: (1) CURSOR FORWARD TABULATION */
2635     scr_tab (arg[0]);
2636     break;
2637    
2638     case CSI_ED: /* 8.3.40: (0) ERASE IN PAGE */
2639     scr_erase_screen (arg[0]);
2640     break;
2641    
2642     case CSI_EL: /* 8.3.42: (0) ERASE IN LINE */
2643     scr_erase_line (arg[0]);
2644     break;
2645    
2646     case CSI_ICH: /* 8.3.65: (1) INSERT CHARACTER */
2647     scr_insdel_chars (arg[0], INSERT);
2648     break;
2649    
2650     case CSI_IL: /* 8.3.68: (1) INSERT LINE */
2651     scr_insdel_lines (arg[0], INSERT);
2652     break;
2653    
2654     case CSI_DL: /* 8.3.33: (1) DELETE LINE */
2655     scr_insdel_lines (arg[0], DELETE);
2656     break;
2657    
2658     case CSI_ECH: /* 8.3.39: (1) ERASE CHARACTER */
2659     scr_insdel_chars (arg[0], ERASE);
2660     break;
2661    
2662     case CSI_DCH: /* 8.3.26: (1) DELETE CHARACTER */
2663     scr_insdel_chars (arg[0], DELETE);
2664     break;
2665    
2666     case CSI_SD: /* 8.3.114: (1) SCROLL DOWN */
2667     arg[0] = -arg[0];
2668     /* FALLTHROUGH */
2669     case CSI_SU: /* 8.3.148: (1) SCROLL UP */
2670     scr_scroll_text (screen.tscroll, screen.bscroll, arg[0], 0);
2671     break;
2672    
2673     case CSI_DA: /* 8.3.24: (0) DEVICE ATTRIBUTES */
2674 pcg 1.43 tt_write ((const unsigned char *)VT100_ANS,
2675     (unsigned int) (sizeof (VT100_ANS) - 1));
2676 pcg 1.36 break;
2677    
2678     case CSI_SGR: /* 8.3.118: (0) SELECT GRAPHIC RENDITION */
2679     process_sgr_mode (nargs, arg);
2680     break;
2681    
2682     case CSI_DSR: /* 8.3.36: (0) DEVICE STATUS REPORT */
2683     switch (arg[0])
2684     {
2685     case 5: /* DSR requested */
2686 pcg 1.43 tt_printf ("\033[0n");
2687 pcg 1.36 break;
2688     case 6: /* CPR requested */
2689     scr_report_position ();
2690     break;
2691 pcg 1.1 #if defined (ENABLE_DISPLAY_ANSWER)
2692 pcg 1.36 case 7: /* unofficial extension */
2693 pcg 1.43 tt_printf ("%-.250s\n", rs[Rs_display_name]);
2694 pcg 1.36 break;
2695     #endif
2696     case 8: /* unofficial extension */
2697     xterm_seq (XTerm_title, APL_NAME "-" VERSION, CHAR_ST);
2698     break;
2699     }
2700     break;
2701 pcg 1.1
2702 pcg 1.36 case CSI_TBC: /* 8.3.155: (0) TABULATION CLEAR */
2703     switch (arg[0])
2704     {
2705     case 0: /* char tab stop cleared at active position */
2706     scr_set_tab (0);
2707     break;
2708     /* case 1: */ /* line tab stop cleared in active line */
2709     /* case 2: */ /* char tab stops cleared in active line */
2710     case 3: /* all char tab stops are cleared */
2711     /* case 4: */ /* all line tab stops are cleared */
2712     case 5: /* all tab stops are cleared */
2713     scr_set_tab (-1);
2714     break;
2715     }
2716     break;
2717    
2718     case CSI_CTC: /* 8.3.17: (0) CURSOR TABULATION CONTROL */
2719     switch (arg[0])
2720     {
2721     case 0: /* char tab stop set at active position */
2722     scr_set_tab (1);
2723     break; /* = ESC H */
2724     /* case 1: */ /* line tab stop set at active line */
2725     case 2: /* char tab stop cleared at active position */
2726     scr_set_tab (0);
2727     break; /* = ESC [ 0 g */
2728     /* case 3: */ /* line tab stop cleared at active line */
2729     /* case 4: */ /* char tab stops cleared at active line */
2730     case 5: /* all char tab stops are cleared */
2731     scr_set_tab (-1);
2732     break; /* = ESC [ 3 g */
2733     /* case 6: */ /* all line tab stops are cleared */
2734     }
2735     break;
2736    
2737     case CSI_RM: /* 8.3.107: RESET MODE */
2738     if (arg[0] == 4)
2739     scr_insert_mode (0);
2740     break;
2741    
2742     case CSI_SM: /* 8.3.126: SET MODE */
2743     if (arg[0] == 4)
2744     scr_insert_mode (1);
2745     break;
2746    
2747     /*
2748     * PRIVATE USE beyond this point. All CSI_7? sequences here
2749     */
2750     case CSI_72: /* DECSTBM: set top and bottom margins */
2751     if (nargs == 1)
2752     scr_scroll_region (arg[0] - 1, MAX_ROWS - 1);
2753     else if (nargs == 0 || arg[0] >= arg[1])
2754     scr_scroll_region (0, MAX_ROWS - 1);
2755     else
2756     scr_scroll_region (arg[0] - 1, arg[1] - 1);
2757     break;
2758    
2759     case CSI_73:
2760     scr_cursor (SAVE);
2761     break;
2762     case CSI_75:
2763     scr_cursor (RESTORE);
2764     break;
2765 pcg 1.1
2766     #ifndef NO_FRILLS
2767 pcg 1.36 case CSI_74:
2768     process_window_ops (arg, nargs);
2769     break;
2770 pcg 1.1 #endif
2771    
2772 pcg 1.36 case CSI_78: /* DECREQTPARM */
2773     if (arg[0] == 0 || arg[0] == 1)
2774 pcg 1.43 tt_printf ("\033[%d;1;1;128;128;1;0x", arg[0] + 2);
2775 pcg 1.36 /* FALLTHROUGH */
2776 pcg 1.1
2777 pcg 1.36 default:
2778     break;
2779 pcg 1.1 }
2780     }
2781     /*}}} */
2782    
2783     #ifndef NO_FRILLS
2784     /* ARGSUSED */
2785     void
2786 pcg 1.34 rxvt_term::process_window_ops (const int *args, unsigned int nargs)
2787 pcg 1.1 {
2788 pcg 1.36 int x, y;
2789 pcg 1.1 #if 0
2790 pcg 1.36 char *s;
2791 pcg 1.1 #endif
2792 pcg 1.36 XWindowAttributes wattr;
2793     Window wdummy;
2794 pcg 1.1
2795 pcg 1.36 if (nargs == 0)
2796     return;
2797     switch (args[0])
2798     {
2799     /*
2800     * commands
2801     */
2802     case 1: /* deiconify window */
2803 pcg 1.43 XMapWindow (display->display, TermWin.parent[0]);
2804 pcg 1.36 break;
2805     case 2: /* iconify window */
2806 pcg 1.43 XIconifyWindow (display->display, TermWin.parent[0],
2807     DefaultScreen (display->display));
2808 pcg 1.36 break;
2809     case 3: /* set position (pixels) */
2810 pcg 1.43 XMoveWindow (display->display, TermWin.parent[0], args[1], args[2]);
2811 pcg 1.36 break;
2812     case 4: /* set size (pixels) */
2813     set_widthheight ((unsigned int)args[2], (unsigned int)args[1]);
2814     break;
2815     case 5: /* raise window */
2816 pcg 1.43 XRaiseWindow (display->display, TermWin.parent[0]);
2817 pcg 1.36 break;
2818     case 6: /* lower window */
2819 pcg 1.43 XLowerWindow (display->display, TermWin.parent[0]);
2820 pcg 1.36 break;
2821     case 7: /* refresh window */
2822     scr_touch (true);
2823     break;
2824     case 8: /* set size (chars) */
2825 pcg 1.43 set_widthheight ((unsigned int) (args[2] * TermWin.fwidth),
2826     (unsigned int) (args[1] * TermWin.fheight));
2827 pcg 1.36 break;
2828     default:
2829     if (args[0] >= 24) /* set height (chars) */
2830     set_widthheight ((unsigned int)TermWin.width,
2831 pcg 1.43 (unsigned int) (args[1] * TermWin.fheight));
2832 pcg 1.36 break;
2833     /*
2834     * reports - some output format copied from XTerm
2835     */
2836     case 11: /* report window state */
2837 pcg 1.43 XGetWindowAttributes (display->display, TermWin.parent[0], &wattr);
2838     tt_printf ("\033[%dt", wattr.map_state == IsViewable ? 1 : 2);
2839 pcg 1.36 break;
2840     case 13: /* report window position */
2841 pcg 1.43 XGetWindowAttributes (display->display, TermWin.parent[0], &wattr);
2842     XTranslateCoordinates (display->display, TermWin.parent[0], wattr.root,
2843 pcg 1.36 -wattr.border_width, -wattr.border_width,
2844     &x, &y, &wdummy);
2845 pcg 1.43 tt_printf ("\033[3;%d;%dt", x, y);
2846 pcg 1.36 break;
2847     case 14: /* report window size (pixels) */
2848 pcg 1.43 XGetWindowAttributes (display->display, TermWin.parent[0], &wattr);
2849     tt_printf ("\033[4;%d;%dt", wattr.height, wattr.width);
2850 pcg 1.36 break;
2851     case 18: /* report window size (chars) */
2852 pcg 1.43 tt_printf ("\033[8;%d;%dt", TermWin.nrow, TermWin.ncol);
2853 pcg 1.36 break;
2854 pcg 1.1 #if 0 /* XXX: currently disabled due to security concerns */
2855 pcg 1.36 case 20: /* report icon label */
2856 pcg 1.43 XGetIconName (display->display, TermWin.parent[0], &s);
2857     tt_printf ("\033]L%-.200s\234", s ? s : ""); /* 8bit ST */
2858 pcg 1.36 break;
2859     case 21: /* report window title */
2860 pcg 1.43 XFetchName (display->display, TermWin.parent[0], &s);
2861     tt_printf ("\033]l%-.200s\234", s ? s : ""); /* 8bit ST */
2862 pcg 1.36 break;
2863 pcg 1.1 #endif
2864 pcg 1.36
2865 pcg 1.1 }
2866     }
2867     #endif
2868    
2869     /*----------------------------------------------------------------------*/
2870     /*
2871     * get input up until STRING TERMINATOR (or BEL)
2872 pcg 1.43 * ends_how is terminator used. returned input must be free ()d
2873 pcg 1.1 */
2874     unsigned char *
2875 pcg 1.34 rxvt_term::get_to_st (unsigned char *ends_how)
2876 pcg 1.1 {
2877 pcg 1.36 int seen_esc = 0; /* seen escape? */
2878     unsigned int n = 0;
2879     unsigned char *s;
2880     unsigned char ch, string[STRING_MAX];
2881    
2882     for (; (ch = cmd_getc ());)
2883     {
2884     if (ch == C0_BEL
2885     || ch == CHAR_ST
2886     || (ch == 0x5c && seen_esc)) /* 7bit ST */
2887     break;
2888     if (ch == C0_ESC)
2889     {
2890     seen_esc = 1;
2891     continue;
2892     }
2893     else if (ch == '\t')
2894     ch = ' '; /* translate '\t' to space */
2895     else if (ch < 0x08 || (ch > 0x0d && ch < 0x20))
2896     return NULL; /* other control character - exit */
2897 pcg 1.43 if (n < sizeof (string) - 1)
2898 pcg 1.36 string[n++] = ch;
2899     seen_esc = 0;
2900     }
2901     string[n++] = '\0';
2902 pcg 1.43 if ((s = (unsigned char *)rxvt_malloc (n)) == NULL)
2903 pcg 1.36 return NULL;
2904     *ends_how = (ch == 0x5c ? C0_ESC : ch);
2905 pcg 1.43 STRNCPY (s, string, n);
2906 pcg 1.36 return s;
2907 pcg 1.1 }
2908    
2909     /*----------------------------------------------------------------------*/
2910     /*
2911     * process DEVICE CONTROL STRING `ESC P ... (ST|BEL)' or `0x90 ... (ST|BEL)'
2912     */
2913     void
2914 pcg 1.34 rxvt_term::process_dcs_seq ()
2915 pcg 1.1 {
2916 pcg 1.36 unsigned char eh, *s;
2917     /*
2918     * Not handled yet
2919     */
2920     s = get_to_st (&eh);
2921     if (s)
2922 pcg 1.43 free (s);
2923 pcg 1.36 return;
2924 pcg 1.1 }
2925    
2926     /*----------------------------------------------------------------------*/
2927     /*
2928     * process OPERATING SYSTEM COMMAND sequence `ESC ] Ps ; Pt (ST|BEL)'
2929     */
2930     void
2931 pcg 1.34 rxvt_term::process_osc_seq ()
2932 pcg 1.1 {
2933 pcg 1.36 unsigned char ch, eh, *s;
2934     int arg;
2935 pcg 1.1
2936 pcg 1.36 ch = cmd_getc ();
2937 pcg 1.43 for (arg = 0; isdigit (ch); ch = cmd_getc ())
2938 pcg 1.36 arg = arg * 10 + (ch - '0');
2939 pcg 1.1
2940 pcg 1.36 if (ch == ';')
2941     {
2942     s = get_to_st (&eh);
2943     if (s)
2944     {
2945     /*
2946 pcg 1.43 * rxvt_menubar_dispatch () violates the constness of the string,
2947 pcg 1.36 * so do it here
2948     */
2949     if (arg == XTerm_Menu)
2950 pcg 1.1 #if 0 /* XXX: currently disabled due to security concerns */
2951 pcg 1.36 menubar_dispatch ((char *)s);
2952 pcg 1.1 #else
2953 pcg 1.36 (void)0;
2954 pcg 1.1 #endif
2955 pcg 1.36 else
2956     xterm_seq (arg, (char *)s, eh);
2957 pcg 1.43 free (s);
2958 pcg 1.36 }
2959 pcg 1.1 }
2960     }
2961     /*
2962     * XTerm escape sequences: ESC ] Ps;Pt (ST|BEL)
2963     * 0 = change iconName/title
2964     * 1 = change iconName
2965     * 2 = change title
2966     * 4 = change color
2967     * 12 = change text color
2968     * 13 = change mouse foreground color
2969     * 17 = change highlight character colour
2970     * 18 = change bold character color
2971     * 19 = change underlined character color
2972     * 46 = change logfile (not implemented)
2973     * 50 = change font
2974     *
2975     * rxvt extensions:
2976 pcg 1.51 * 9 = change locale (NYI)
2977 pcg 1.1 * 10 = menu (may change in future)
2978     * 20 = bg pixmap
2979     * 39 = change default fg color
2980     * 49 = change default bg color
2981     * 55 = dump scrollback buffer and all of screen
2982     */
2983     void
2984 pcg 1.43 rxvt_term::xterm_seq (int op, const char *str, unsigned char resp __attribute__ ((unused)))
2985 pcg 1.1 {
2986 pcg 1.36 int changed = 0;
2987     int color;
2988     char *buf, *name;
2989    
2990 pcg 1.43 assert (str != NULL);
2991 pcg 1.36 switch (op)
2992     {
2993     case XTerm_name:
2994     set_title (str);
2995     /* FALLTHROUGH */
2996     case XTerm_iconName:
2997     set_iconName (str);
2998     break;
2999     case XTerm_title:
3000     set_title (str);
3001     break;
3002     case XTerm_Color:
3003     for (buf = (char *)str; buf && *buf;)
3004     {
3005 pcg 1.43 if ((name = STRCHR (buf, ';')) == NULL)
3006 pcg 1.36 break;
3007     *name++ = '\0';
3008 pcg 1.43 color = atoi (buf);
3009 pcg 1.36 if (color < 0 || color >= TOTAL_COLORS)
3010     break;
3011 pcg 1.43 if ((buf = STRCHR (name, ';')) != NULL)
3012 pcg 1.36 *buf++ = '\0';
3013     set_window_color (color + minCOLOR, name);
3014     }
3015     break;
3016 pcg 1.1 #ifndef NO_CURSORCOLOR
3017 pcg 1.36 case XTerm_Color_cursor:
3018     set_window_color (Color_cursor, str);
3019     break;
3020     #endif
3021     case XTerm_Color_pointer:
3022     set_window_color (Color_pointer, str);
3023     break;
3024 pcg 1.1 #ifndef NO_BOLD_UNDERLINE_REVERSE
3025 pcg 1.36 case XTerm_Color_BD:
3026     set_window_color (Color_BD, str);
3027     break;
3028     case XTerm_Color_UL:
3029     set_window_color (Color_UL, str);
3030     break;
3031     case XTerm_Color_RV:
3032     set_window_color (Color_RV, str);
3033     break;
3034 pcg 1.1 #endif
3035    
3036 pcg 1.36 case XTerm_Menu:
3037 pcg 1.1 /*
3038 pcg 1.43 * rxvt_menubar_dispatch () violates the constness of the string,
3039 pcg 1.1 * so DON'T do it here
3040     */
3041 pcg 1.36 break;
3042     case XTerm_Pixmap:
3043     if (*str != ';')
3044     {
3045 pcg 1.1 #if XPM_BACKGROUND
3046 pcg 1.36 scale_pixmap (""); /* reset to default scaling */
3047     set_bgPixmap (str); /* change pixmap */
3048 pcg 1.1 #endif
3049 pcg 1.36 scr_touch (true);
3050     }
3051 pcg 1.43 while ((str = STRCHR (str, ';')) != NULL)
3052 pcg 1.36 {
3053     str++;
3054 pcg 1.1 #if XPM_BACKGROUND
3055 pcg 1.36 changed += scale_pixmap (str);
3056 pcg 1.1 #endif
3057 pcg 1.36
3058     }
3059     if (changed)
3060     {
3061 pcg 1.1 #ifdef XPM_BACKGROUND
3062 pcg 1.36 resize_pixmap ();
3063 pcg 1.1 #endif
3064 pcg 1.36 scr_touch (true);
3065     }
3066     break;
3067    
3068     case XTerm_restoreFG:
3069     set_window_color (Color_fg, str);
3070     break;
3071     case XTerm_restoreBG:
3072     set_window_color (Color_bg, str);
3073     break;
3074     case XTerm_logfile:
3075     break;
3076     case XTerm_font:
3077 pcg 1.51 change_font (str);
3078     break;
3079     case XTerm_locale:
3080 pcg 1.54 if (str[0] == '?' && !str[1])
3081     tt_printf ("%-.250s\n", locale);
3082     else
3083     {
3084     set_locale (str);
3085     im_cb ();
3086     }
3087 pcg 1.36 break;
3088 pcg 1.1 #if 0
3089 pcg 1.36 case XTerm_dumpscreen: /* no error notices */
3090     {
3091     int fd;
3092 pcg 1.43 if ((fd = open (str, O_RDWR | O_CREAT | O_EXCL, 0600)) >= 0)
3093 pcg 1.36 {
3094     scr_dump (fd);
3095 pcg 1.43 close (fd);
3096 pcg 1.36 }
3097     }
3098     break;
3099 pcg 1.1 #endif
3100 pcg 1.36
3101 pcg 1.1 }
3102     }
3103     /*----------------------------------------------------------------------*/
3104    
3105     /*{{{ process DEC private mode sequences `ESC [ ? Ps mode' */
3106     /*
3107     * mode can only have the following values:
3108     * 'l' = low
3109     * 'h' = high
3110     * 's' = save
3111     * 'r' = restore
3112     * 't' = toggle
3113     * so no need for fancy checking
3114     */
3115     int
3116 pcg 1.34 rxvt_term::privcases (int mode, unsigned long bit)
3117 pcg 1.1 {
3118 pcg 1.36 int state;
3119 pcg 1.1
3120 pcg 1.36 if (mode == 's')
3121     {
3122     SavedModes |= (PrivateModes & bit);
3123     return -1;
3124 pcg 1.1 }
3125 pcg 1.36 else
3126     {
3127     if (mode == 'r')
3128     state = (SavedModes & bit) ? 1 : 0; /* no overlapping */
3129     else
3130 pcg 1.43 state = (mode == 't') ? ! (PrivateModes & bit) : mode;
3131     PrivMode (state, bit);
3132 pcg 1.36 }
3133     return state;
3134 pcg 1.1 }
3135    
3136     /* we're not using priv _yet_ */
3137     void
3138 pcg 1.43 rxvt_term::process_terminal_mode (int mode, int priv __attribute__ ((unused)), unsigned int nargs, const int *arg)
3139 pcg 1.1 {
3140 pcg 1.36 unsigned int i, j;
3141     int state;
3142     static const struct
3143     {
3144     const int argval;
3145     const unsigned long bit;
3146     }
3147     argtopriv[] = {
3148     { 1, PrivMode_aplCUR },
3149     { 2, PrivMode_vt52 },
3150     { 3, PrivMode_132 },
3151     { 4, PrivMode_smoothScroll },
3152     { 5, PrivMode_rVideo },
3153     { 6, PrivMode_relOrigin },
3154     { 7, PrivMode_Autowrap },
3155     { 9, PrivMode_MouseX10 },
3156 pcg 1.1 #ifdef menuBar_esc
3157 pcg 1.36 { menuBar_esc, PrivMode_menuBar },
3158 pcg 1.1 #endif
3159     #ifdef scrollBar_esc
3160 pcg 1.36 { scrollBar_esc, PrivMode_scrollBar },
3161 pcg 1.1 #endif
3162 pcg 1.36 { 25, PrivMode_VisibleCursor },
3163     { 35, PrivMode_ShiftKeys },
3164     { 40, PrivMode_132OK },
3165     { 47, PrivMode_Screen },
3166     { 66, PrivMode_aplKP },
3167 pcg 1.1 #ifndef NO_BACKSPACE_KEY
3168 pcg 1.36 { 67, PrivMode_BackSpace },
3169 pcg 1.1 #endif
3170 pcg 1.36 { 1000, PrivMode_MouseX11 },
3171     { 1010, PrivMode_TtyOutputInh },
3172     { 1011, PrivMode_Keypress },
3173     { 1047, PrivMode_Screen },
3174     { 1049, PrivMode_Screen }, /* xterm extension, not fully implemented */
3175     };
3176    
3177     if (nargs == 0)
3178     return;
3179    
3180     /* make lo/hi boolean */
3181     if (mode == 'l')
3182     mode = 0; /* reset */
3183     else if (mode == 'h')
3184     mode = 1; /* set */
3185    
3186     for (i = 0; i < nargs; i++)
3187     {
3188     state = -1;
3189    
3190     /* basic handling */
3191 pcg 1.43 for (j = 0; j < (sizeof (argtopriv)/sizeof (argtopriv[0])); j++)
3192 pcg 1.36 if (argtopriv[j].argval == arg[i])
3193     {
3194     state = privcases (mode, argtopriv[j].bit);
3195     break;
3196     }
3197 pcg 1.1
3198 pcg 1.36 /* extra handling for values with state unkept */
3199     if (state == -1)
3200     switch (arg[i])
3201     {
3202     case 1048: /* alternative cursor save */
3203     if (mode == 0)
3204     scr_cursor (RESTORE);
3205     else if (mode == 1)
3206     scr_cursor (SAVE);
3207     /* FALLTHROUGH */
3208     default:
3209 pcg 1.43 continue; /* for (;i;) */
3210 pcg 1.36 }
3211 pcg 1.1
3212 pcg 1.36 /* extra handling for values with valid 0 or 1 state */
3213     switch (arg[i])
3214     {
3215     /* case 1: - application cursor keys */
3216     case 2: /* VT52 mode */
3217     /* oddball mode. should be set regardless of set/reset
3218     * parameter. Return from VT52 mode with an ESC < from
3219     * within VT52 mode
3220     */
3221 pcg 1.43 PrivMode (1, PrivMode_vt52);
3222 pcg 1.36 break;
3223     case 3: /* 80/132 */
3224     if (PrivateModes & PrivMode_132OK)
3225 pcg 1.43 set_widthheight ( (unsigned int) ((state ? 132 : 80) * TermWin.fwidth),
3226 pcg 1.36 (unsigned int)TermWin.height);
3227     break;
3228     case 4: /* smooth scrolling */
3229     if (state)
3230     Options &= ~Opt_jumpScroll;
3231     else
3232     Options |= Opt_jumpScroll;
3233     break;
3234     case 5: /* reverse video */
3235     scr_rvideo_mode (state);
3236     break;
3237     case 6: /* relative/absolute origins */
3238     scr_relative_origin (state);
3239     break;
3240     case 7: /* autowrap */
3241     scr_autowrap (state);
3242     break;
3243     /* case 8: - auto repeat, can't do on a per window basis */
3244     case 9: /* X10 mouse reporting */
3245     if (state) /* orthogonal */
3246 pcg 1.43 PrivateModes &= ~ (PrivMode_MouseX11);
3247 pcg 1.36 break;
3248 pcg 1.1 #ifdef menuBar_esc
3249 pcg 1.36 case menuBar_esc:
3250 pcg 1.1 #ifdef MENUBAR
3251 pcg 1.36 map_menuBar (state);
3252 pcg 1.1 #endif
3253 pcg 1.36 break;
3254 pcg 1.1 #endif
3255     #ifdef scrollBar_esc
3256 pcg 1.36 case scrollBar_esc:
3257     if (scrollbar_mapping (state))
3258     {
3259     resize_all_windows (0, 0, 0);
3260 pcg 1.34 scr_touch (true);
3261 pcg 1.36 }
3262     break;
3263 pcg 1.1 #endif
3264 pcg 1.36 case 25: /* visible/invisible cursor */
3265     scr_cursor_visible (state);
3266     break;
3267     /* case 35: - shift keys */
3268     /* case 40: - 80 <--> 132 mode */
3269     case 47: /* secondary screen */
3270     scr_change_screen (state);
3271     break;
3272     /* case 66: - application key pad */
3273     /* case 67: - backspace key */
3274     case 1000: /* X11 mouse reporting */
3275     if (state) /* orthogonal */
3276 pcg 1.43 PrivateModes &= ~ (PrivMode_MouseX10);
3277 pcg 1.36 break;
3278 pcg 1.1 #if 0
3279 pcg 1.36 case 1001:
3280     break; /* X11 mouse highlighting */
3281 pcg 1.1 #endif
3282 pcg 1.36 case 1010: /* scroll to bottom on TTY output inhibit */
3283     if (state)
3284     Options &= ~Opt_scrollTtyOutput;
3285     else
3286     Options |= Opt_scrollTtyOutput;
3287     break;
3288     case 1011: /* scroll to bottom on key press */
3289     if (state)
3290     Options |= Opt_scrollTtyKeypress;
3291     else
3292     Options &= ~Opt_scrollTtyKeypress;
3293     break;
3294     case 1047: /* secondary screen w/ clearing */
3295     case 1049: /* better secondary screen w/ clearing, but not fully implemented */
3296     if (current_screen != PRIMARY)
3297     scr_erase_screen (2);
3298     scr_change_screen (state);
3299     /* FALLTHROUGH */
3300     default:
3301     break;
3302     }
3303 pcg 1.1 }
3304     }
3305     /*}}} */
3306    
3307     /*{{{ process sgr sequences */
3308     void
3309 pcg 1.34 rxvt_term::process_sgr_mode (unsigned int nargs, const int *arg)
3310 pcg 1.1 {
3311 pcg 1.36 unsigned int i;
3312     short rendset;
3313     int rendstyle;
3314    
3315     if (nargs == 0)
3316     {
3317     scr_rendition (0, ~RS_None);
3318     return;
3319     }
3320     for (i = 0; i < nargs; i++)
3321     {
3322     rendset = -1;
3323     switch (arg[i])
3324     {
3325     case 0:
3326     rendset = 0, rendstyle = ~RS_None;
3327     break;
3328     case 1:
3329     rendset = 1, rendstyle = RS_Bold;
3330     break;
3331     case 4:
3332     rendset = 1, rendstyle = RS_Uline;
3333     break;
3334     case 5:
3335     rendset = 1, rendstyle = RS_Blink;
3336     break;
3337     case 7:
3338     rendset = 1, rendstyle = RS_RVid;
3339     break;
3340     case 22:
3341     rendset = 0, rendstyle = RS_Bold;
3342     break;
3343     case 24:
3344     rendset = 0, rendstyle = RS_Uline;
3345     break;
3346     case 25:
3347     rendset = 0, rendstyle = RS_Blink;
3348     break;
3349     case 27:
3350     rendset = 0, rendstyle = RS_RVid;
3351     break;
3352     }
3353     if (rendset != -1)
3354     {
3355     scr_rendition (rendset, rendstyle);
3356 pcg 1.43 continue; /* for (;i;) */
3357 pcg 1.36 }
3358    
3359     switch (arg[i])
3360     {
3361     case 30:
3362     case 31: /* set fg color */
3363     case 32:
3364     case 33:
3365     case 34:
3366     case 35:
3367     case 36:
3368     case 37:
3369 pcg 1.43 scr_color ((unsigned int) (minCOLOR + (arg[i] - 30)),
3370 pcg 1.36 Color_fg);
3371     break;
3372 pcg 1.1 #ifdef TTY_256COLOR
3373 pcg 1.36 case 38:
3374     if (nargs > i + 2 && arg[i + 1] == 5)
3375     {
3376 pcg 1.43 scr_color ((unsigned int) (minCOLOR + arg[i + 2]),
3377 pcg 1.36 Color_fg);
3378     i += 2;
3379     }
3380     break;
3381     #endif
3382     case 39: /* default fg */
3383     scr_color (Color_fg, Color_fg);
3384     break;
3385    
3386     case 40:
3387     case 41: /* set bg color */
3388     case 42:
3389     case 43:
3390     case 44:
3391     case 45:
3392     case 46:
3393     case 47:
3394 pcg 1.43 scr_color ((unsigned int) (minCOLOR + (arg[i] - 40)),
3395 pcg 1.36 Color_bg);
3396     break;
3397 pcg 1.1 #ifdef TTY_256COLOR
3398 pcg 1.36 case 48:
3399     if (nargs > i + 2 && arg[i + 1] == 5)
3400     {
3401 pcg 1.43 scr_color ((unsigned int) (minCOLOR + arg[i + 2]),
3402 pcg 1.36 Color_bg);
3403     i += 2;
3404     }
3405     break;
3406     #endif
3407     case 49: /* default bg */
3408     scr_color (Color_bg, Color_bg);
3409     break;
3410 pcg 1.1
3411     #ifndef NO_BRIGHTCOLOR
3412 pcg 1.36 case 90:
3413     case 91: /* set bright fg color */
3414     case 92:
3415     case 93:
3416     case 94:
3417     case 95:
3418     case 96:
3419     case 97:
3420 pcg 1.43 scr_color ((unsigned int) (minBrightCOLOR + (arg[i] - 90)),
3421 pcg 1.36 Color_fg);
3422     break;
3423     case 100:
3424     case 101: /* set bright bg color */
3425     case 102:
3426     case 103:
3427     case 104:
3428     case 105:
3429     case 106:
3430     case 107:
3431 pcg 1.43 scr_color ((unsigned int) (minBrightCOLOR + (arg[i] - 100)),
3432 pcg 1.36 Color_bg);
3433     break;
3434 pcg 1.1 #endif
3435 pcg 1.36
3436     }
3437 pcg 1.1 }
3438     }
3439     /*}}} */
3440    
3441     /*{{{ process Rob Nation's own graphics mode sequences */
3442     void
3443 pcg 1.34 rxvt_term::process_graphics ()
3444 pcg 1.1 {
3445 pcg 1.36 unsigned char ch, cmd = cmd_getc ();
3446 pcg 1.1
3447 pcg 1.36 if (cmd == 'Q')
3448     { /* query graphics */
3449 pcg 1.43 tt_printf ("\033G0\n"); /* no graphics */
3450 pcg 1.36 return;
3451     }
3452     /* swallow other graphics sequences until terminating ':' */
3453     do
3454     ch = cmd_getc ();
3455     while (ch != ':');
3456 pcg 1.1 }
3457     /*}}} */
3458    
3459     /* ------------------------------------------------------------------------- */
3460    
3461     /*
3462 pcg 1.43 * Send printf () formatted output to the command.
3463 pcg 1.1 * Only use for small amounts of data.
3464     */
3465     void
3466 pcg 1.10 rxvt_term::tt_printf (const char *fmt,...)
3467 pcg 1.1 {
3468 pcg 1.10 va_list arg_ptr;
3469     unsigned char buf[256];
3470 pcg 1.1
3471 pcg 1.10 va_start (arg_ptr, fmt);
3472     vsnprintf ((char *)buf, 256, fmt, arg_ptr);
3473     va_end (arg_ptr);
3474     tt_write (buf, STRLEN (buf));
3475 pcg 1.1 }
3476    
3477     /* ---------------------------------------------------------------------- */
3478 pcg 1.10 /* Write data to the pty as typed by the user, pasted with the mouse,
3479 pcg 1.1 * or generated by us in response to a query ESC sequence.
3480     */
3481     void
3482 pcg 1.10 rxvt_term::tt_write (const unsigned char *data, unsigned int len)
3483 pcg 1.1 {
3484 pcg 1.10 enum { MAX_PTY_WRITE = 255 }; // minimum MAX_INPUT
3485    
3486     if (len)
3487     {
3488     if (v_buflen == 0)
3489     {
3490 pcg 1.34 ssize_t written = write (cmd_fd, data, min (MAX_PTY_WRITE, len));
3491    
3492     if ((unsigned int)written == len)
3493 pcg 1.10 return;
3494    
3495     data += written;
3496     len -= written;
3497     }
3498    
3499    
3500     v_buffer = (unsigned char *)realloc (v_buffer, v_buflen + len);
3501    
3502     memcpy (v_buffer + v_buflen, data, len);
3503     v_buflen += len;
3504 pcg 1.1 }
3505    
3506 pcg 1.10 for (;;)
3507     {
3508     int written = write (cmd_fd, v_buffer, min (MAX_PTY_WRITE, v_buflen));
3509    
3510     if (written > 0)
3511     {
3512     v_buflen -= written;
3513    
3514     if (v_buflen == 0)
3515     {
3516     free (v_buffer);
3517     v_buffer = 0;
3518     v_buflen = 0;
3519    
3520     pty_ev.set (EVENT_READ);
3521     return;
3522     }
3523 pcg 1.1
3524 pcg 1.10 memmove (v_buffer, v_buffer + written, v_buflen);
3525     }
3526     else if (written != -1 || (errno != EAGAIN && errno != EINTR))
3527     // original code just ignores this...
3528     destroy ();
3529     else
3530     {
3531     pty_ev.set (EVENT_READ | EVENT_WRITE);
3532     return;
3533     }
3534 pcg 1.1 }
3535     }
3536 pcg 1.10
3537 pcg 1.1 /*----------------------- end-of-file (C source) -----------------------*/
3538