ViewVC Help

View File | Revision Log | Show Annotations | Download File

/cvs/rxvt-unicode/src/command.C

Comparing rxvt-unicode/src/command.C (file contents):
Revision 1.2 by pcg, Mon Nov 24 17:31:27 2003 UTC vs.
Revision 1.600 by sf-exg, Sun Feb 19 08:48:42 2023 UTC

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

Diff Legend

–	Removed lines
+	Added lines
<	Changed lines
>	Changed lines