ViewVC Help
View File | Revision Log | Show Annotations | Download File
/cvs/rxvt-unicode/src/command.C
Revision: 1.53
Committed: Sun Feb 22 12:34:53 2004 UTC (20 years, 2 months ago) by pcg
Content type: text/plain
Branch: MAIN
Changes since 1.52: +4 -0 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 pcg 1.53
2700     case XTerm_locale: /* unofficial extension */
2701     tt_printf ("%-.250s\n", locale);
2702     break;
2703 pcg 1.36 }
2704     break;
2705 pcg 1.1
2706 pcg 1.36 case CSI_TBC: /* 8.3.155: (0) TABULATION CLEAR */
2707     switch (arg[0])
2708     {
2709     case 0: /* char tab stop cleared at active position */
2710     scr_set_tab (0);
2711     break;
2712     /* case 1: */ /* line tab stop cleared in active line */
2713     /* case 2: */ /* char tab stops cleared in active line */
2714     case 3: /* all char tab stops are cleared */
2715     /* case 4: */ /* all line tab stops are cleared */
2716     case 5: /* all tab stops are cleared */
2717     scr_set_tab (-1);
2718     break;
2719     }
2720     break;
2721    
2722     case CSI_CTC: /* 8.3.17: (0) CURSOR TABULATION CONTROL */
2723     switch (arg[0])
2724     {
2725     case 0: /* char tab stop set at active position */
2726     scr_set_tab (1);
2727     break; /* = ESC H */
2728     /* case 1: */ /* line tab stop set at active line */
2729     case 2: /* char tab stop cleared at active position */
2730     scr_set_tab (0);
2731     break; /* = ESC [ 0 g */
2732     /* case 3: */ /* line tab stop cleared at active line */
2733     /* case 4: */ /* char tab stops cleared at active line */
2734     case 5: /* all char tab stops are cleared */
2735     scr_set_tab (-1);
2736     break; /* = ESC [ 3 g */
2737     /* case 6: */ /* all line tab stops are cleared */
2738     }
2739     break;
2740    
2741     case CSI_RM: /* 8.3.107: RESET MODE */
2742     if (arg[0] == 4)
2743     scr_insert_mode (0);
2744     break;
2745    
2746     case CSI_SM: /* 8.3.126: SET MODE */
2747     if (arg[0] == 4)
2748     scr_insert_mode (1);
2749     break;
2750    
2751     /*
2752     * PRIVATE USE beyond this point. All CSI_7? sequences here
2753     */
2754     case CSI_72: /* DECSTBM: set top and bottom margins */
2755     if (nargs == 1)
2756     scr_scroll_region (arg[0] - 1, MAX_ROWS - 1);
2757     else if (nargs == 0 || arg[0] >= arg[1])
2758     scr_scroll_region (0, MAX_ROWS - 1);
2759     else
2760     scr_scroll_region (arg[0] - 1, arg[1] - 1);
2761     break;
2762    
2763     case CSI_73:
2764     scr_cursor (SAVE);
2765     break;
2766     case CSI_75:
2767     scr_cursor (RESTORE);
2768     break;
2769 pcg 1.1
2770     #ifndef NO_FRILLS
2771 pcg 1.36 case CSI_74:
2772     process_window_ops (arg, nargs);
2773     break;
2774 pcg 1.1 #endif
2775    
2776 pcg 1.36 case CSI_78: /* DECREQTPARM */
2777     if (arg[0] == 0 || arg[0] == 1)
2778 pcg 1.43 tt_printf ("\033[%d;1;1;128;128;1;0x", arg[0] + 2);
2779 pcg 1.36 /* FALLTHROUGH */
2780 pcg 1.1
2781 pcg 1.36 default:
2782     break;
2783 pcg 1.1 }
2784     }
2785     /*}}} */
2786    
2787     #ifndef NO_FRILLS
2788     /* ARGSUSED */
2789     void
2790 pcg 1.34 rxvt_term::process_window_ops (const int *args, unsigned int nargs)
2791 pcg 1.1 {
2792 pcg 1.36 int x, y;
2793 pcg 1.1 #if 0
2794 pcg 1.36 char *s;
2795 pcg 1.1 #endif
2796 pcg 1.36 XWindowAttributes wattr;
2797     Window wdummy;
2798 pcg 1.1
2799 pcg 1.36 if (nargs == 0)
2800     return;
2801     switch (args[0])
2802     {
2803     /*
2804     * commands
2805     */
2806     case 1: /* deiconify window */
2807 pcg 1.43 XMapWindow (display->display, TermWin.parent[0]);
2808 pcg 1.36 break;
2809     case 2: /* iconify window */
2810 pcg 1.43 XIconifyWindow (display->display, TermWin.parent[0],
2811     DefaultScreen (display->display));
2812 pcg 1.36 break;
2813     case 3: /* set position (pixels) */
2814 pcg 1.43 XMoveWindow (display->display, TermWin.parent[0], args[1], args[2]);
2815 pcg 1.36 break;
2816     case 4: /* set size (pixels) */
2817     set_widthheight ((unsigned int)args[2], (unsigned int)args[1]);
2818     break;
2819     case 5: /* raise window */
2820 pcg 1.43 XRaiseWindow (display->display, TermWin.parent[0]);
2821 pcg 1.36 break;
2822     case 6: /* lower window */
2823 pcg 1.43 XLowerWindow (display->display, TermWin.parent[0]);
2824 pcg 1.36 break;
2825     case 7: /* refresh window */
2826     scr_touch (true);
2827     break;
2828     case 8: /* set size (chars) */
2829 pcg 1.43 set_widthheight ((unsigned int) (args[2] * TermWin.fwidth),
2830     (unsigned int) (args[1] * TermWin.fheight));
2831 pcg 1.36 break;
2832     default:
2833     if (args[0] >= 24) /* set height (chars) */
2834     set_widthheight ((unsigned int)TermWin.width,
2835 pcg 1.43 (unsigned int) (args[1] * TermWin.fheight));
2836 pcg 1.36 break;
2837     /*
2838     * reports - some output format copied from XTerm
2839     */
2840     case 11: /* report window state */
2841 pcg 1.43 XGetWindowAttributes (display->display, TermWin.parent[0], &wattr);
2842     tt_printf ("\033[%dt", wattr.map_state == IsViewable ? 1 : 2);
2843 pcg 1.36 break;
2844     case 13: /* report window position */
2845 pcg 1.43 XGetWindowAttributes (display->display, TermWin.parent[0], &wattr);
2846     XTranslateCoordinates (display->display, TermWin.parent[0], wattr.root,
2847 pcg 1.36 -wattr.border_width, -wattr.border_width,
2848     &x, &y, &wdummy);
2849 pcg 1.43 tt_printf ("\033[3;%d;%dt", x, y);
2850 pcg 1.36 break;
2851     case 14: /* report window size (pixels) */
2852 pcg 1.43 XGetWindowAttributes (display->display, TermWin.parent[0], &wattr);
2853     tt_printf ("\033[4;%d;%dt", wattr.height, wattr.width);
2854 pcg 1.36 break;
2855     case 18: /* report window size (chars) */
2856 pcg 1.43 tt_printf ("\033[8;%d;%dt", TermWin.nrow, TermWin.ncol);
2857 pcg 1.36 break;
2858 pcg 1.1 #if 0 /* XXX: currently disabled due to security concerns */
2859 pcg 1.36 case 20: /* report icon label */
2860 pcg 1.43 XGetIconName (display->display, TermWin.parent[0], &s);
2861     tt_printf ("\033]L%-.200s\234", s ? s : ""); /* 8bit ST */
2862 pcg 1.36 break;
2863     case 21: /* report window title */
2864 pcg 1.43 XFetchName (display->display, TermWin.parent[0], &s);
2865     tt_printf ("\033]l%-.200s\234", s ? s : ""); /* 8bit ST */
2866 pcg 1.36 break;
2867 pcg 1.1 #endif
2868 pcg 1.36
2869 pcg 1.1 }
2870     }
2871     #endif
2872    
2873     /*----------------------------------------------------------------------*/
2874     /*
2875     * get input up until STRING TERMINATOR (or BEL)
2876 pcg 1.43 * ends_how is terminator used. returned input must be free ()d
2877 pcg 1.1 */
2878     unsigned char *
2879 pcg 1.34 rxvt_term::get_to_st (unsigned char *ends_how)
2880 pcg 1.1 {
2881 pcg 1.36 int seen_esc = 0; /* seen escape? */
2882     unsigned int n = 0;
2883     unsigned char *s;
2884     unsigned char ch, string[STRING_MAX];
2885    
2886     for (; (ch = cmd_getc ());)
2887     {
2888     if (ch == C0_BEL
2889     || ch == CHAR_ST
2890     || (ch == 0x5c && seen_esc)) /* 7bit ST */
2891     break;
2892     if (ch == C0_ESC)
2893     {
2894     seen_esc = 1;
2895     continue;
2896     }
2897     else if (ch == '\t')
2898     ch = ' '; /* translate '\t' to space */
2899     else if (ch < 0x08 || (ch > 0x0d && ch < 0x20))
2900     return NULL; /* other control character - exit */
2901 pcg 1.43 if (n < sizeof (string) - 1)
2902 pcg 1.36 string[n++] = ch;
2903     seen_esc = 0;
2904     }
2905     string[n++] = '\0';
2906 pcg 1.43 if ((s = (unsigned char *)rxvt_malloc (n)) == NULL)
2907 pcg 1.36 return NULL;
2908     *ends_how = (ch == 0x5c ? C0_ESC : ch);
2909 pcg 1.43 STRNCPY (s, string, n);
2910 pcg 1.36 return s;
2911 pcg 1.1 }
2912    
2913     /*----------------------------------------------------------------------*/
2914     /*
2915     * process DEVICE CONTROL STRING `ESC P ... (ST|BEL)' or `0x90 ... (ST|BEL)'
2916     */
2917     void
2918 pcg 1.34 rxvt_term::process_dcs_seq ()
2919 pcg 1.1 {
2920 pcg 1.36 unsigned char eh, *s;
2921     /*
2922     * Not handled yet
2923     */
2924     s = get_to_st (&eh);
2925     if (s)
2926 pcg 1.43 free (s);
2927 pcg 1.36 return;
2928 pcg 1.1 }
2929    
2930     /*----------------------------------------------------------------------*/
2931     /*
2932     * process OPERATING SYSTEM COMMAND sequence `ESC ] Ps ; Pt (ST|BEL)'
2933     */
2934     void
2935 pcg 1.34 rxvt_term::process_osc_seq ()
2936 pcg 1.1 {
2937 pcg 1.36 unsigned char ch, eh, *s;
2938     int arg;
2939 pcg 1.1
2940 pcg 1.36 ch = cmd_getc ();
2941 pcg 1.43 for (arg = 0; isdigit (ch); ch = cmd_getc ())
2942 pcg 1.36 arg = arg * 10 + (ch - '0');
2943 pcg 1.1
2944 pcg 1.36 if (ch == ';')
2945     {
2946     s = get_to_st (&eh);
2947     if (s)
2948     {
2949     /*
2950 pcg 1.43 * rxvt_menubar_dispatch () violates the constness of the string,
2951 pcg 1.36 * so do it here
2952     */
2953     if (arg == XTerm_Menu)
2954 pcg 1.1 #if 0 /* XXX: currently disabled due to security concerns */
2955 pcg 1.36 menubar_dispatch ((char *)s);
2956 pcg 1.1 #else
2957 pcg 1.36 (void)0;
2958 pcg 1.1 #endif
2959 pcg 1.36 else
2960     xterm_seq (arg, (char *)s, eh);
2961 pcg 1.43 free (s);
2962 pcg 1.36 }
2963 pcg 1.1 }
2964     }
2965     /*
2966     * XTerm escape sequences: ESC ] Ps;Pt (ST|BEL)
2967     * 0 = change iconName/title
2968     * 1 = change iconName
2969     * 2 = change title
2970     * 4 = change color
2971     * 12 = change text color
2972     * 13 = change mouse foreground color
2973     * 17 = change highlight character colour
2974     * 18 = change bold character color
2975     * 19 = change underlined character color
2976     * 46 = change logfile (not implemented)
2977     * 50 = change font
2978     *
2979     * rxvt extensions:
2980 pcg 1.51 * 9 = change locale (NYI)
2981 pcg 1.1 * 10 = menu (may change in future)
2982     * 20 = bg pixmap
2983     * 39 = change default fg color
2984     * 49 = change default bg color
2985     * 55 = dump scrollback buffer and all of screen
2986     */
2987     void
2988 pcg 1.43 rxvt_term::xterm_seq (int op, const char *str, unsigned char resp __attribute__ ((unused)))
2989 pcg 1.1 {
2990 pcg 1.36 int changed = 0;
2991     int color;
2992     char *buf, *name;
2993    
2994 pcg 1.43 assert (str != NULL);
2995 pcg 1.36 switch (op)
2996     {
2997     case XTerm_name:
2998     set_title (str);
2999     /* FALLTHROUGH */
3000     case XTerm_iconName:
3001     set_iconName (str);
3002     break;
3003     case XTerm_title:
3004     set_title (str);
3005     break;
3006     case XTerm_Color:
3007     for (buf = (char *)str; buf && *buf;)
3008     {
3009 pcg 1.43 if ((name = STRCHR (buf, ';')) == NULL)
3010 pcg 1.36 break;
3011     *name++ = '\0';
3012 pcg 1.43 color = atoi (buf);
3013 pcg 1.36 if (color < 0 || color >= TOTAL_COLORS)
3014     break;
3015 pcg 1.43 if ((buf = STRCHR (name, ';')) != NULL)
3016 pcg 1.36 *buf++ = '\0';
3017     set_window_color (color + minCOLOR, name);
3018     }
3019     break;
3020 pcg 1.1 #ifndef NO_CURSORCOLOR
3021 pcg 1.36 case XTerm_Color_cursor:
3022     set_window_color (Color_cursor, str);
3023     break;
3024     #endif
3025     case XTerm_Color_pointer:
3026     set_window_color (Color_pointer, str);
3027     break;
3028 pcg 1.1 #ifndef NO_BOLD_UNDERLINE_REVERSE
3029 pcg 1.36 case XTerm_Color_BD:
3030     set_window_color (Color_BD, str);
3031     break;
3032     case XTerm_Color_UL:
3033     set_window_color (Color_UL, str);
3034     break;
3035     case XTerm_Color_RV:
3036     set_window_color (Color_RV, str);
3037     break;
3038 pcg 1.1 #endif
3039    
3040 pcg 1.36 case XTerm_Menu:
3041 pcg 1.1 /*
3042 pcg 1.43 * rxvt_menubar_dispatch () violates the constness of the string,
3043 pcg 1.1 * so DON'T do it here
3044     */
3045 pcg 1.36 break;
3046     case XTerm_Pixmap:
3047     if (*str != ';')
3048     {
3049 pcg 1.1 #if XPM_BACKGROUND
3050 pcg 1.36 scale_pixmap (""); /* reset to default scaling */
3051     set_bgPixmap (str); /* change pixmap */
3052 pcg 1.1 #endif
3053 pcg 1.36 scr_touch (true);
3054     }
3055 pcg 1.43 while ((str = STRCHR (str, ';')) != NULL)
3056 pcg 1.36 {
3057     str++;
3058 pcg 1.1 #if XPM_BACKGROUND
3059 pcg 1.36 changed += scale_pixmap (str);
3060 pcg 1.1 #endif
3061 pcg 1.36
3062     }
3063     if (changed)
3064     {
3065 pcg 1.1 #ifdef XPM_BACKGROUND
3066 pcg 1.36 resize_pixmap ();
3067 pcg 1.1 #endif
3068 pcg 1.36 scr_touch (true);
3069     }
3070     break;
3071    
3072     case XTerm_restoreFG:
3073     set_window_color (Color_fg, str);
3074     break;
3075     case XTerm_restoreBG:
3076     set_window_color (Color_bg, str);
3077     break;
3078     case XTerm_logfile:
3079     break;
3080     case XTerm_font:
3081 pcg 1.51 change_font (str);
3082     break;
3083     case XTerm_locale:
3084 pcg 1.52 set_locale (str);
3085     im_cb ();
3086 pcg 1.36 break;
3087 pcg 1.1 #if 0
3088 pcg 1.36 case XTerm_dumpscreen: /* no error notices */
3089     {
3090     int fd;
3091 pcg 1.43 if ((fd = open (str, O_RDWR | O_CREAT | O_EXCL, 0600)) >= 0)
3092 pcg 1.36 {
3093     scr_dump (fd);
3094 pcg 1.43 close (fd);
3095 pcg 1.36 }
3096     }
3097     break;
3098 pcg 1.1 #endif
3099 pcg 1.36
3100 pcg 1.1 }
3101     }
3102     /*----------------------------------------------------------------------*/
3103    
3104     /*{{{ process DEC private mode sequences `ESC [ ? Ps mode' */
3105     /*
3106     * mode can only have the following values:
3107     * 'l' = low
3108     * 'h' = high
3109     * 's' = save
3110     * 'r' = restore
3111     * 't' = toggle
3112     * so no need for fancy checking
3113     */
3114     int
3115 pcg 1.34 rxvt_term::privcases (int mode, unsigned long bit)
3116 pcg 1.1 {
3117 pcg 1.36 int state;
3118 pcg 1.1
3119 pcg 1.36 if (mode == 's')
3120     {
3121     SavedModes |= (PrivateModes & bit);
3122     return -1;
3123 pcg 1.1 }
3124 pcg 1.36 else
3125     {
3126     if (mode == 'r')
3127     state = (SavedModes & bit) ? 1 : 0; /* no overlapping */
3128     else
3129 pcg 1.43 state = (mode == 't') ? ! (PrivateModes & bit) : mode;
3130     PrivMode (state, bit);
3131 pcg 1.36 }
3132     return state;
3133 pcg 1.1 }
3134    
3135     /* we're not using priv _yet_ */
3136     void
3137 pcg 1.43 rxvt_term::process_terminal_mode (int mode, int priv __attribute__ ((unused)), unsigned int nargs, const int *arg)
3138 pcg 1.1 {
3139 pcg 1.36 unsigned int i, j;
3140     int state;
3141     static const struct
3142     {
3143     const int argval;
3144     const unsigned long bit;
3145     }
3146     argtopriv[] = {
3147     { 1, PrivMode_aplCUR },
3148     { 2, PrivMode_vt52 },
3149     { 3, PrivMode_132 },
3150     { 4, PrivMode_smoothScroll },
3151     { 5, PrivMode_rVideo },
3152     { 6, PrivMode_relOrigin },
3153     { 7, PrivMode_Autowrap },
3154     { 9, PrivMode_MouseX10 },
3155 pcg 1.1 #ifdef menuBar_esc
3156 pcg 1.36 { menuBar_esc, PrivMode_menuBar },
3157 pcg 1.1 #endif
3158     #ifdef scrollBar_esc
3159 pcg 1.36 { scrollBar_esc, PrivMode_scrollBar },
3160 pcg 1.1 #endif
3161 pcg 1.36 { 25, PrivMode_VisibleCursor },
3162     { 35, PrivMode_ShiftKeys },
3163     { 40, PrivMode_132OK },
3164     { 47, PrivMode_Screen },
3165     { 66, PrivMode_aplKP },
3166 pcg 1.1 #ifndef NO_BACKSPACE_KEY
3167 pcg 1.36 { 67, PrivMode_BackSpace },
3168 pcg 1.1 #endif
3169 pcg 1.36 { 1000, PrivMode_MouseX11 },
3170     { 1010, PrivMode_TtyOutputInh },
3171     { 1011, PrivMode_Keypress },
3172     { 1047, PrivMode_Screen },
3173     { 1049, PrivMode_Screen }, /* xterm extension, not fully implemented */
3174     };
3175    
3176     if (nargs == 0)
3177     return;
3178    
3179     /* make lo/hi boolean */
3180     if (mode == 'l')
3181     mode = 0; /* reset */
3182     else if (mode == 'h')
3183     mode = 1; /* set */
3184    
3185     for (i = 0; i < nargs; i++)
3186     {
3187     state = -1;
3188    
3189     /* basic handling */
3190 pcg 1.43 for (j = 0; j < (sizeof (argtopriv)/sizeof (argtopriv[0])); j++)
3191 pcg 1.36 if (argtopriv[j].argval == arg[i])
3192     {
3193     state = privcases (mode, argtopriv[j].bit);
3194     break;
3195     }
3196 pcg 1.1
3197 pcg 1.36 /* extra handling for values with state unkept */
3198     if (state == -1)
3199     switch (arg[i])
3200     {
3201     case 1048: /* alternative cursor save */
3202     if (mode == 0)
3203     scr_cursor (RESTORE);
3204     else if (mode == 1)
3205     scr_cursor (SAVE);
3206     /* FALLTHROUGH */
3207     default:
3208 pcg 1.43 continue; /* for (;i;) */
3209 pcg 1.36 }
3210 pcg 1.1
3211 pcg 1.36 /* extra handling for values with valid 0 or 1 state */
3212     switch (arg[i])
3213     {
3214     /* case 1: - application cursor keys */
3215     case 2: /* VT52 mode */
3216     /* oddball mode. should be set regardless of set/reset
3217     * parameter. Return from VT52 mode with an ESC < from
3218     * within VT52 mode
3219     */
3220 pcg 1.43 PrivMode (1, PrivMode_vt52);
3221 pcg 1.36 break;
3222     case 3: /* 80/132 */
3223     if (PrivateModes & PrivMode_132OK)
3224 pcg 1.43 set_widthheight ( (unsigned int) ((state ? 132 : 80) * TermWin.fwidth),
3225 pcg 1.36 (unsigned int)TermWin.height);
3226     break;
3227     case 4: /* smooth scrolling */
3228     if (state)
3229     Options &= ~Opt_jumpScroll;
3230     else
3231     Options |= Opt_jumpScroll;
3232     break;
3233     case 5: /* reverse video */
3234     scr_rvideo_mode (state);
3235     break;
3236     case 6: /* relative/absolute origins */
3237     scr_relative_origin (state);
3238     break;
3239     case 7: /* autowrap */
3240     scr_autowrap (state);
3241     break;
3242     /* case 8: - auto repeat, can't do on a per window basis */
3243     case 9: /* X10 mouse reporting */
3244     if (state) /* orthogonal */
3245 pcg 1.43 PrivateModes &= ~ (PrivMode_MouseX11);
3246 pcg 1.36 break;
3247 pcg 1.1 #ifdef menuBar_esc
3248 pcg 1.36 case menuBar_esc:
3249 pcg 1.1 #ifdef MENUBAR
3250 pcg 1.36 map_menuBar (state);
3251 pcg 1.1 #endif
3252 pcg 1.36 break;
3253 pcg 1.1 #endif
3254     #ifdef scrollBar_esc
3255 pcg 1.36 case scrollBar_esc:
3256     if (scrollbar_mapping (state))
3257     {
3258     resize_all_windows (0, 0, 0);
3259 pcg 1.34 scr_touch (true);
3260 pcg 1.36 }
3261     break;
3262 pcg 1.1 #endif
3263 pcg 1.36 case 25: /* visible/invisible cursor */
3264     scr_cursor_visible (state);
3265     break;
3266     /* case 35: - shift keys */
3267     /* case 40: - 80 <--> 132 mode */
3268     case 47: /* secondary screen */
3269     scr_change_screen (state);
3270     break;
3271     /* case 66: - application key pad */
3272     /* case 67: - backspace key */
3273     case 1000: /* X11 mouse reporting */
3274     if (state) /* orthogonal */
3275 pcg 1.43 PrivateModes &= ~ (PrivMode_MouseX10);
3276 pcg 1.36 break;
3277 pcg 1.1 #if 0
3278 pcg 1.36 case 1001:
3279     break; /* X11 mouse highlighting */
3280 pcg 1.1 #endif
3281 pcg 1.36 case 1010: /* scroll to bottom on TTY output inhibit */
3282     if (state)
3283     Options &= ~Opt_scrollTtyOutput;
3284     else
3285     Options |= Opt_scrollTtyOutput;
3286     break;
3287     case 1011: /* scroll to bottom on key press */
3288     if (state)
3289     Options |= Opt_scrollTtyKeypress;
3290     else
3291     Options &= ~Opt_scrollTtyKeypress;
3292     break;
3293     case 1047: /* secondary screen w/ clearing */
3294     case 1049: /* better secondary screen w/ clearing, but not fully implemented */
3295     if (current_screen != PRIMARY)
3296     scr_erase_screen (2);
3297     scr_change_screen (state);
3298     /* FALLTHROUGH */
3299     default:
3300     break;
3301     }
3302 pcg 1.1 }
3303     }
3304     /*}}} */
3305    
3306     /*{{{ process sgr sequences */
3307     void
3308 pcg 1.34 rxvt_term::process_sgr_mode (unsigned int nargs, const int *arg)
3309 pcg 1.1 {
3310 pcg 1.36 unsigned int i;
3311     short rendset;
3312     int rendstyle;
3313    
3314     if (nargs == 0)
3315     {
3316     scr_rendition (0, ~RS_None);
3317     return;
3318     }
3319     for (i = 0; i < nargs; i++)
3320     {
3321     rendset = -1;
3322     switch (arg[i])
3323     {
3324     case 0:
3325     rendset = 0, rendstyle = ~RS_None;
3326     break;
3327     case 1:
3328     rendset = 1, rendstyle = RS_Bold;
3329     break;
3330     case 4:
3331     rendset = 1, rendstyle = RS_Uline;
3332     break;
3333     case 5:
3334     rendset = 1, rendstyle = RS_Blink;
3335     break;
3336     case 7:
3337     rendset = 1, rendstyle = RS_RVid;
3338     break;
3339     case 22:
3340     rendset = 0, rendstyle = RS_Bold;
3341     break;
3342     case 24:
3343     rendset = 0, rendstyle = RS_Uline;
3344     break;
3345     case 25:
3346     rendset = 0, rendstyle = RS_Blink;
3347     break;
3348     case 27:
3349     rendset = 0, rendstyle = RS_RVid;
3350     break;
3351     }
3352     if (rendset != -1)
3353     {
3354     scr_rendition (rendset, rendstyle);
3355 pcg 1.43 continue; /* for (;i;) */
3356 pcg 1.36 }
3357    
3358     switch (arg[i])
3359     {
3360     case 30:
3361     case 31: /* set fg color */
3362     case 32:
3363     case 33:
3364     case 34:
3365     case 35:
3366     case 36:
3367     case 37:
3368 pcg 1.43 scr_color ((unsigned int) (minCOLOR + (arg[i] - 30)),
3369 pcg 1.36 Color_fg);
3370     break;
3371 pcg 1.1 #ifdef TTY_256COLOR
3372 pcg 1.36 case 38:
3373     if (nargs > i + 2 && arg[i + 1] == 5)
3374     {
3375 pcg 1.43 scr_color ((unsigned int) (minCOLOR + arg[i + 2]),
3376 pcg 1.36 Color_fg);
3377     i += 2;
3378     }
3379     break;
3380     #endif
3381     case 39: /* default fg */
3382     scr_color (Color_fg, Color_fg);
3383     break;
3384    
3385     case 40:
3386     case 41: /* set bg color */
3387     case 42:
3388     case 43:
3389     case 44:
3390     case 45:
3391     case 46:
3392     case 47:
3393 pcg 1.43 scr_color ((unsigned int) (minCOLOR + (arg[i] - 40)),
3394 pcg 1.36 Color_bg);
3395     break;
3396 pcg 1.1 #ifdef TTY_256COLOR
3397 pcg 1.36 case 48:
3398     if (nargs > i + 2 && arg[i + 1] == 5)
3399     {
3400 pcg 1.43 scr_color ((unsigned int) (minCOLOR + arg[i + 2]),
3401 pcg 1.36 Color_bg);
3402     i += 2;
3403     }
3404     break;
3405     #endif
3406     case 49: /* default bg */
3407     scr_color (Color_bg, Color_bg);
3408     break;
3409 pcg 1.1
3410     #ifndef NO_BRIGHTCOLOR
3411 pcg 1.36 case 90:
3412     case 91: /* set bright fg color */
3413     case 92:
3414     case 93:
3415     case 94:
3416     case 95:
3417     case 96:
3418     case 97:
3419 pcg 1.43 scr_color ((unsigned int) (minBrightCOLOR + (arg[i] - 90)),
3420 pcg 1.36 Color_fg);
3421     break;
3422     case 100:
3423     case 101: /* set bright bg color */
3424     case 102:
3425     case 103:
3426     case 104:
3427     case 105:
3428     case 106:
3429     case 107:
3430 pcg 1.43 scr_color ((unsigned int) (minBrightCOLOR + (arg[i] - 100)),
3431 pcg 1.36 Color_bg);
3432     break;
3433 pcg 1.1 #endif
3434 pcg 1.36
3435     }
3436 pcg 1.1 }
3437     }
3438     /*}}} */
3439    
3440     /*{{{ process Rob Nation's own graphics mode sequences */
3441     void
3442 pcg 1.34 rxvt_term::process_graphics ()
3443 pcg 1.1 {
3444 pcg 1.36 unsigned char ch, cmd = cmd_getc ();
3445 pcg 1.1
3446 pcg 1.36 if (cmd == 'Q')
3447     { /* query graphics */
3448 pcg 1.43 tt_printf ("\033G0\n"); /* no graphics */
3449 pcg 1.36 return;
3450     }
3451     /* swallow other graphics sequences until terminating ':' */
3452     do
3453     ch = cmd_getc ();
3454     while (ch != ':');
3455 pcg 1.1 }
3456     /*}}} */
3457    
3458     /* ------------------------------------------------------------------------- */
3459    
3460     /*
3461 pcg 1.43 * Send printf () formatted output to the command.
3462 pcg 1.1 * Only use for small amounts of data.
3463     */
3464     void
3465 pcg 1.10 rxvt_term::tt_printf (const char *fmt,...)
3466 pcg 1.1 {
3467 pcg 1.10 va_list arg_ptr;
3468     unsigned char buf[256];
3469 pcg 1.1
3470 pcg 1.10 va_start (arg_ptr, fmt);
3471     vsnprintf ((char *)buf, 256, fmt, arg_ptr);
3472     va_end (arg_ptr);
3473     tt_write (buf, STRLEN (buf));
3474 pcg 1.1 }
3475    
3476     /* ---------------------------------------------------------------------- */
3477 pcg 1.10 /* Write data to the pty as typed by the user, pasted with the mouse,
3478 pcg 1.1 * or generated by us in response to a query ESC sequence.
3479     */
3480     void
3481 pcg 1.10 rxvt_term::tt_write (const unsigned char *data, unsigned int len)
3482 pcg 1.1 {
3483 pcg 1.10 enum { MAX_PTY_WRITE = 255 }; // minimum MAX_INPUT
3484    
3485     if (len)
3486     {
3487     if (v_buflen == 0)
3488     {
3489 pcg 1.34 ssize_t written = write (cmd_fd, data, min (MAX_PTY_WRITE, len));
3490    
3491     if ((unsigned int)written == len)
3492 pcg 1.10 return;
3493    
3494     data += written;
3495     len -= written;
3496     }
3497    
3498    
3499     v_buffer = (unsigned char *)realloc (v_buffer, v_buflen + len);
3500    
3501     memcpy (v_buffer + v_buflen, data, len);
3502     v_buflen += len;
3503 pcg 1.1 }
3504    
3505 pcg 1.10 for (;;)
3506     {
3507     int written = write (cmd_fd, v_buffer, min (MAX_PTY_WRITE, v_buflen));
3508    
3509     if (written > 0)
3510     {
3511     v_buflen -= written;
3512    
3513     if (v_buflen == 0)
3514     {
3515     free (v_buffer);
3516     v_buffer = 0;
3517     v_buflen = 0;
3518    
3519     pty_ev.set (EVENT_READ);
3520     return;
3521     }
3522 pcg 1.1
3523 pcg 1.10 memmove (v_buffer, v_buffer + written, v_buflen);
3524     }
3525     else if (written != -1 || (errno != EAGAIN && errno != EINTR))
3526     // original code just ignores this...
3527     destroy ();
3528     else
3529     {
3530     pty_ev.set (EVENT_READ | EVENT_WRITE);
3531     return;
3532     }
3533 pcg 1.1 }
3534     }
3535 pcg 1.10
3536 pcg 1.1 /*----------------------- end-of-file (C source) -----------------------*/
3537