[ViewVC] Diff of: cvs/rxvt-unicode/src/main.C

Comparing rxvt-unicode/src/main.C (file contents):
Revision 1.12 by pcg, Tue Dec 16 23:04:13 2003 UTC vs.
Revision 1.120 by root, Mon Dec 13 19:16:36 2004 UTC

…		…
1	/---------------------------------C----------------------------------	1	/---------------------------------C----------------------------------
2	* File: main.c	2	* File: main.C
3	----------------------------------------------------------------------	3	----------------------------------------------------------------------
4	* $Id: main.C,v 1.12 2003/12/16 23:04:13 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>
12	* Copyright (c) 1997 mj olesen <olesen@me.QueensU.CA>	11	* Copyright (c) 1997 mj olesen <olesen@me.QueensU.CA>
13	* - extensive modifications	12	* - extensive modifications
14	* Copyright (c) 1997,1998 Oezguer Kesim <kesim@math.fu-berlin.de>	13	* Copyright (c) 1997,1998 Oezguer Kesim <kesim@math.fu-berlin.de>
15	* Copyright (c) 1998-2001 Geoff Wing <gcw@pobox.com>	14	* Copyright (c) 1998-2001 Geoff Wing <gcw@pobox.com>
16	* - extensive modifications	15	* - extensive modifications
		16	* Copyright (c) 2003-2004 Marc Lehmann <pcg@goof.com>
17	*	17	*
18	* This program is free software; you can redistribute it and/or modify	18	* This program is free software; you can redistribute it and/or modify
19	* it under the terms of the GNU General Public License as published by	19	* it under the terms of the GNU General Public License as published by
20	* the Free Software Foundation; either version 2 of the License, or	20	* the Free Software Foundation; either version 2 of the License, or
21	* (at your option) any later version.	21	* (at your option) any later version.
…		…
42		42
43	#ifdef HAVE_TERMIOS_H	43	#ifdef HAVE_TERMIOS_H
44	# include <termios.h>	44	# include <termios.h>
45	#endif	45	#endif
46		46
47	void *	47	#include <cstring>
48	rxvt_term::operator new (size_t s)
49	{
50	void *p = malloc (s);
51		48
52	MEMSET (p, 0, s);	49	vector<rxvt_term *> rxvt_term::termlist;
		50
		51	static char curlocale[128];
		52
		53	bool
		54	rxvt_set_locale (const char *locale)
		55	{
		56	if (!locale \|\| !strncmp (locale, curlocale, 128))
		57	return false;
		58
		59	strncpy (curlocale, locale, 128);
		60	setlocale (LC_CTYPE, curlocale);
		61	return true;
		62	}
		63
		64	#if ENABLE_COMBINING
		65	class rxvt_composite_vec rxvt_composite;
		66
		67	text_t rxvt_composite_vec::compose (unicode_t c1, unicode_t c2)
		68	{
		69	compose_char *cc;
		70
		71	// break compose chains, as stupid readline really likes to duplicate
		72	// composing characters for some reason near the end of a line.
		73	cc = (*this)[c1];
		74	while (cc)
		75	{
		76	if (cc->c2 == c2) return c1;
		77	cc = (*this)[cc->c1];
		78	}
		79
		80	// check to see wether this combination already exists otherwise
		81	for (cc = v.end (); cc-- > v.begin (); )
		82	{
		83	if (cc->c1 == c1 && cc->c2 == c2)
		84	return COMPOSE_LO + (cc - v.begin ());
		85	}
		86
		87	// allocate a new combination
		88	if (v.size () == COMPOSE_HI - COMPOSE_LO + 1)
		89	{
		90	static int seen;
		91
		92	if (!seen++)
		93	fprintf (stderr, "too many unrepresentable composite characters, try --enable-unicode3\n");
		94
		95	return REPLACEMENT_CHAR;
		96	}
		97
		98	v.push_back (compose_char (c1, c2));
		99
		100	return v.size () - 1 + COMPOSE_LO;
		101	}
		102
		103	int rxvt_composite_vec::expand (unicode_t c, wchar_t *r)
		104	{
		105	compose_char cc = (this)[c];
		106
		107	if (!cc)
		108	{
		109	if (r) *r = c;
		110	return 1;
		111	}
		112
		113	int len = expand (cc->c1, r);
		114
		115	if (r) r += len;
		116
		117	if (cc->c2 != NOCHAR)
		118	{
		119	len++;
		120	if (r) *r++ = cc->c2;
		121	}
		122
53	return p;	123	return len;
54	}
55		124
56	void
57	rxvt_term::operator delete (void *p, size_t s)
58	{
59	free (p);
60	}	125	}
		126	#endif
61		127
62	rxvt_term::rxvt_term ()	128	rxvt_term::rxvt_term ()
63	: pty_ev (this, &rxvt_term::pty_cb),	129	:
		130	#if TRANSPARENT
		131	rootwin_ev (this, &rxvt_term::rootwin_cb),
		132	#endif
		133	#ifdef HAVE_SCROLLBARS
		134	scrollbar_ev (this, &rxvt_term::x_cb),
		135	#endif
		136	#ifdef MENUBAR
		137	menubar_ev (this, &rxvt_term::x_cb),
		138	#endif
64	#ifdef CURSOR_BLINK	139	#ifdef CURSOR_BLINK
		140	cursor_blink_ev (this, &rxvt_term::cursor_blink_cb),
		141	#endif
		142	#ifdef TEXT_BLINK
65	blink_ev (this, &rxvt_term::blink_cb),	143	text_blink_ev (this, &rxvt_term::text_blink_cb),
		144	#endif
		145	#ifndef NO_SCROLLBAR_BUTTON_CONTINUAL_SCROLLING
		146	cont_scroll_ev (this, &rxvt_term::cont_scroll_cb),
		147	#endif
		148	#ifdef SELECTION_SCROLLING
		149	sel_scroll_ev (this, &rxvt_term::sel_scroll_cb),
		150	#endif
		151	#if defined(MOUSE_WHEEL) && defined(MOUSE_SLIP_WHEELING)
		152	slip_wheel_ev (this, &rxvt_term::slip_wheel_cb),
66	#endif	153	#endif
67	#ifdef POINTER_BLANK	154	#ifdef POINTER_BLANK
68	pointer_ev (this, &rxvt_term::pointer_cb),	155	pointer_ev (this, &rxvt_term::pointer_cb),
69	#endif	156	#endif
		157	#ifdef USE_XIM
		158	im_ev (this, &rxvt_term::im_cb),
		159	#endif
		160	sw_term (this, &rxvt_term::sig_term),
		161	sw_chld (this, &rxvt_term::sig_chld),
		162	termwin_ev (this, &rxvt_term::x_cb),
70	x_ev (this, &rxvt_term::x_cb),	163	vt_ev (this, &rxvt_term::x_cb),
		164	check_ev (this, &rxvt_term::check_cb),
		165	flush_ev (this, &rxvt_term::flush_cb),
71	destroy_ev (this, &rxvt_term::destroy_cb),	166	destroy_ev (this, &rxvt_term::destroy_cb),
72	check_ev (this, &rxvt_term::check_cb),	167	pty_ev (this, &rxvt_term::pty_cb),
73	incr_ev (this, &rxvt_term::incr_cb)	168	incr_ev (this, &rxvt_term::incr_cb)
74	{	169	{
75	cmdbuf_ptr = cmdbuf_endp = cmdbuf_base;	170	cmdbuf_ptr = cmdbuf_endp = cmdbuf_base;
		171
		172	termlist.push_back (this);
76	}	173	}
77		174
78	rxvt_term::~rxvt_term ()	175	rxvt_term::~rxvt_term ()
79	{	176	{
80	rxvt_scr_release (this);	177	termlist.erase (find (termlist.begin (), termlist.end(), this));
81		178
82	#ifndef NO_SETOWNER_TTYDEV	179	if (cmd_pid)
83	rxvt_privileged_ttydev (this, RESTORE);	180	kill (-cmd_pid, SIGHUP);
84	#endif	181
		182	pty.put ();
		183
85	#ifdef UTMP_SUPPORT	184	#ifdef UTMP_SUPPORT
86	rxvt_privileged_utmp (this, RESTORE);	185	privileged_utmp (RESTORE);
87	#endif	186	#endif
		187
		188	#if ENABLE_STYLES
		189	for (int i = RS_styleCount; --i; )
		190	if (TermWin.fontset[i] != TermWin.fontset[0])
		191	delete TermWin.fontset[i];
		192	#endif
		193	delete TermWin.fontset[0];
		194
		195	if (display)
		196	{
		197	selection_clear ();
		198
88	#ifdef USE_XIM	199	#ifdef USE_XIM
89	if (Input_Context != NULL)	200	im_destroy ();
		201	#endif
		202	#ifdef MENUBAR
		203	if (menubarGC) XFreeGC (display->display, menubarGC);
		204	#endif
		205	#ifdef XTERM_SCROLLBAR
		206	if (xscrollbarGC) XFreeGC (display->display, xscrollbarGC);
		207	if (ShadowGC) XFreeGC (display->display, ShadowGC);
		208	#endif
		209	#ifdef PLAIN_SCROLLBAR
		210	if (pscrollbarGC) XFreeGC (display->display, pscrollbarGC);
		211	#endif
		212	#ifdef NEXT_SCROLLBAR
		213	if (blackGC) XFreeGC (display->display, blackGC);
		214	if (whiteGC) XFreeGC (display->display, whiteGC);
		215	if (grayGC) XFreeGC (display->display, grayGC);
		216	if (darkGC) XFreeGC (display->display, darkGC);
		217	if (stippleGC) XFreeGC (display->display, stippleGC);
		218	if (dimple) XFreePixmap (display->display, dimple);
		219	if (upArrow) XFreePixmap (display->display, upArrow);
		220	if (downArrow) XFreePixmap (display->display, downArrow);
		221	if (upArrowHi) XFreePixmap (display->display, upArrowHi);
		222	if (downArrowHi) XFreePixmap (display->display, downArrowHi);
		223	#endif
		224	#if defined(MENUBAR) \|\| defined(RXVT_SCROLLBAR)
		225	if (topShadowGC) XFreeGC (display->display, topShadowGC);
		226	if (botShadowGC) XFreeGC (display->display, botShadowGC);
		227	if (scrollbarGC) XFreeGC (display->display, scrollbarGC);
		228	#endif
		229	if (TermWin.gc) XFreeGC (display->display, TermWin.gc);
		230
		231	#if defined(MENUBAR) && (MENUBAR_MAX > 1)
		232	delete menuBar.drawable;
		233	//if (menuBar.win)
		234	// XDestroyWindow (display->display, menuBar.win);
		235	#endif
		236	delete TermWin.drawable;
		237	// destroy all windows
		238	if (TermWin.parent[0])
		239	XDestroyWindow (display->display, TermWin.parent[0]);
90	{	240	}
91	XDestroyIC (Input_Context);
92	Input_Context = NULL;
93	}
94	#endif
95		241
96	if (cmd_fd >= 0)	242	// TODO: free pixcolours, colours should become part of rxvt_display
97	close (cmd_fd);
98		243
99	if (Xfd >= 0)	244	delete pix_colors_focused;
100	XCloseDisplay (Xdisplay);	245	#ifdef OFF_FOCUS_FADING
		246	delete pix_colors_unfocused;
		247	#endif
101		248
102	delete PixColors;	249	displays.put (display);
		250
		251	scr_release ();
		252
		253	/* clear all resources */
		254	for (int i = 0; i < allocated.size (); i++)
		255	free (allocated[i]);
		256
		257	free (selection.text);
		258	// TODO: manage env vars in child only(!)
		259	free (env_windowid);
		260	free (env_display);
		261	free (env_term);
		262	free (env_colorfgbg);
		263	free (locale);
		264	free (v_buffer);
		265	free (incr_buf);
		266
		267	delete envv;
		268	delete argv;
103	}	269	}
104		270
105	void	271	void
106	rxvt_term::destroy ()	272	rxvt_term::destroy ()
107	{	273	{
		274	if (destroy_ev.active)
		275	return;
		276
		277	#if ENABLE_OVERLAY
		278	scr_overlay_off ();
		279	#endif
		280
		281	if (display)
		282	{
		283	#if USE_XIM
		284	im_ev.stop (display);
		285	#endif
		286	#if HAVE_SCROLLBARS
		287	scrollbar_ev.stop (display);
		288	#endif
		289	#if MENUBAR
		290	menubar_ev.stop (display);
		291	#endif
		292	#if TRANSPARENT
		293	rootwin_ev.stop (display);
		294	#endif
		295	incr_ev.stop ();
		296	termwin_ev.stop (display);
		297	vt_ev.stop (display);
		298	}
		299
108	check_ev.stop ();	300	check_ev.stop ();
109	pty_ev.stop ();	301	pty_ev.stop ();
110	x_ev.stop ();
111	#ifdef CURSOR_BLINK	302	#ifdef CURSOR_BLINK
		303	cursor_blink_ev.stop ();
		304	#endif
		305	#ifdef TEXT_BLINK
112	blink_ev.stop ();	306	text_blink_ev.stop ();
		307	#endif
		308	#ifndef NO_SCROLLBAR_BUTTON_CONTINUAL_SCROLLING
		309	cont_scroll_ev.stop ();
		310	#endif
		311	#ifdef SELECTION_SCROLLING
		312	sel_scroll_ev.stop ();
113	#endif	313	#endif
114	#ifdef POINTER_BLANK	314	#ifdef POINTER_BLANK
115	pointer_ev.stop ();	315	pointer_ev.stop ();
116	#endif	316	#endif
117		317
…		…
125		325
126	delete this;	326	delete this;
127	}	327	}
128		328
129	/----------------------------------------------------------------------/	329	/----------------------------------------------------------------------/
130	/* rxvt_init() */	330	/* rxvt_init () */
131	/* LIBPROTO */
132	rxvt_t
133	rxvt_init (int argc, const char const argv)
134	{
135	SET_R (new rxvt_term);
136	dR;
137
138	if (!R->init_vars () \|\| !R->init (argc, argv))
139	{
140	delete R;
141	return NULL;
142	}
143
144	return R;
145	}
146
147	/* EXTPROTO */
148	void
149	rxvt_init_signals ()
150	{
151	/* install exit handler for cleanup */
152	#if 0
153	#ifdef HAVE_ATEXIT
154	atexit(rxvt_clean_exit);
155	#else
156	#endif
157	#endif
158
159	struct sigaction sa;
160
161	sigfillset (&sa.sa_mask);
162	sa.sa_flags = SA_NOCLDSTOP \| SA_RESTART;
163	sa.sa_handler = SIG_IGN; sigaction (SIGHUP , &sa, 0);
164	sa.sa_handler = SIG_IGN; sigaction (SIGPIPE, &sa, 0);
165	sa.sa_handler = rxvt_Exit_signal; sigaction (SIGINT , &sa, 0);
166	sa.sa_handler = rxvt_Exit_signal; sigaction (SIGQUIT, &sa, 0);
167	sa.sa_handler = rxvt_Exit_signal; sigaction (SIGTERM, &sa, 0);
168	sa.sa_handler = rxvt_Child_signal; sigaction (SIGCHLD, &sa, 0);
169
170	/* need to trap SIGURG for SVR4 (Unixware) rlogin */
171	/* signal (SIGURG, SIG_DFL); */
172
173	XSetErrorHandler ((XErrorHandler) rxvt_xerror_handler);
174	//XSetIOErrorHandler ((XErrorHandler) rxvt_xioerror_handler);
175	}
176
177	bool	331	bool
178	rxvt_term::init (int argc, const char const argv)	332	rxvt_term::init (int argc, const char const argv)
179	{	333	{
180	dR;//TODO (scrollbar, setidle)	334	SET_R (this);
181		335
		336	if (!init_vars ())
		337	return false;
		338
		339	init_secondary ();
		340
		341	const char **cmd_argv = init_resources (argc, argv);
		342
		343	set_locale ("");
		344
		345	#if MENUBAR_MAX
		346	menubar_read (rs[Rs_menu]);
		347	#endif
		348	#ifdef HAVE_SCROLLBARS
		349	if (options & Opt_scrollBar)
		350	scrollBar.setIdle (); /* set existence for size calculations */
		351	#endif
		352
		353	create_windows (argc, argv);
		354
		355	init_xlocale ();
		356
		357	scr_reset (); /* initialize screen */
		358
		359	#if 0
		360	XSynchronize (display->display, True);
		361	#endif
		362
		363	#ifdef HAVE_SCROLLBARS
		364	if (options & Opt_scrollBar)
		365	resize_scrollbar (); /* create and map scrollbar */
		366	#endif
		367	#if (MENUBAR_MAX)
		368	if (menubar_visible ())
		369	XMapWindow (display->display, menuBar.win);
		370	#endif
		371	#ifdef TRANSPARENT
		372	if (options & Opt_transparent)
		373	{
		374	XSelectInput (display->display, display->root, PropertyChangeMask);
		375	check_our_parents ();
		376	rootwin_ev.start (display, display->root);
		377	}
		378	#endif
		379
		380	XMapWindow (display->display, TermWin.vt);
		381	XMapWindow (display->display, TermWin.parent[0]);
		382
		383	set_colorfgbg ();
		384
		385	init_command (cmd_argv);
		386
		387	pty_ev.start (pty.pty, EVENT_READ);
		388
		389	check_ev.start ();
		390
		391	return true;
		392	}
		393
		394	static int (old_xerror_handler) (Display dpy, XErrorEvent *event);
		395
		396	void
		397	rxvt_init ()
		398	{
182	/*	399	/*
183	* Save and then give up any super-user privileges	400	* Save and then give up any super-user privileges
184	* If we need privileges in any area then we must specifically request it.	401	* If we need privileges in any area then we must specifically request it.
185	* We should only need to be root in these cases:	402	* We should only need to be root in these cases:
186	* 1. write utmp entries on some systems	403	* 1. write utmp entries on some systems
187	* 2. chown tty on some systems	404	* 2. chown tty on some systems
188	*/	405	*/
189	rxvt_privileges (this, SAVE);	406	rxvt_privileges (SAVE);
190	rxvt_privileges (this, IGNORE);	407	rxvt_privileges (IGNORE);
191		408
192	rxvt_init_secondary (this);	409	signal (SIGHUP, SIG_IGN);
		410	signal (SIGPIPE, SIG_IGN);
193		411
194	const char **cmd_argv = rxvt_init_resources (this, argc, argv);	412	/* need to trap SIGURG for SVR4 (Unixware) rlogin */
		413	/* signal (SIGURG, SIG_DFL); */
195		414
196	#if (MENUBAR_MAX)	415	old_xerror_handler = XSetErrorHandler ((XErrorHandler) rxvt_xerror_handler);
197	rxvt_menubar_read (this, rs[Rs_menu]);	416	// TODO: handle this with exceptions and tolerate the memory loss
198	#endif	417	//XSetIOErrorHandler ((XErrorHandler) rxvt_xioerror_handler);
199	#ifdef HAVE_SCROLLBARS
200	if (Options & Opt_scrollBar)
201	scrollbar_setIdle (); /* set existence for size calculations */
202	#endif
203
204	rxvt_Create_Windows (this, argc, argv);
205
206	rxvt_init_xlocale (this);
207
208	rxvt_scr_reset (this); /* initialize screen */
209	#ifdef RXVT_GRAPHICS
210	rxvt_Gr_reset (this); /* reset graphics */
211	#endif
212
213	#if 0
214	#ifdef DEBUG_X
215	XSynchronize(Xdisplay, True);
216	#endif
217	#endif
218
219	#ifdef HAVE_SCROLLBARS
220	if (Options & Opt_scrollBar)
221	rxvt_Resize_scrollBar (this); /* create and map scrollbar */
222	#endif
223	#if (MENUBAR_MAX)
224	if (menubar_visible(r))
225	XMapWindow (Xdisplay, menuBar.win);
226	#endif
227	#ifdef TRANSPARENT
228	if (Options & Opt_transparent)
229	{
230	XSelectInput (Xdisplay, Xroot, PropertyChangeMask);
231	rxvt_check_our_parents (this);
232	}
233	#endif
234	XMapWindow (Xdisplay, TermWin.vt);
235	XMapWindow (Xdisplay, TermWin.parent[0]);
236
237	rxvt_init_env (this);
238	rxvt_init_command (this, cmd_argv);
239
240	x_ev.start (Xfd, EVENT_READ);
241	pty_ev.start (cmd_fd, EVENT_READ);
242
243	check_ev.start ();
244
245	process_x_events ();
246
247	return true;
248	}	418	}
249		419
250	/* ------------------------------------------------------------------------- *	420	/* ------------------------------------------------------------------------- *
251	* SIGNAL HANDLING & EXIT HANDLER *	421	* SIGNAL HANDLING & EXIT HANDLER *
252	* ------------------------------------------------------------------------- */	422	* ------------------------------------------------------------------------- */
253	/*	423	/*
254	* Catch a SIGCHLD signal and exit if the direct child has died	424	* Catch a SIGCHLD signal and exit if the direct child has died
255	*/	425	*/
256	/* ARGSUSED */	426
257	/* EXTPROTO */	427	void
258	RETSIGTYPE	428	rxvt_term::sig_chld (sig_watcher &w)
259	rxvt_Child_signal(int sig __attribute__ ((unused)))
260	{	429	{
261	int pid, save_errno = errno;	430	// we are being called for every SIGCHLD, not just ours
		431	int pid;
		432
262	while ((pid = waitpid (-1, NULL, WNOHANG)) == -1 && errno == EINTR)	433	while ((pid = waitpid (-1, NULL, WNOHANG)) > 0)
263	;	434	for (rxvt_term **t = termlist.begin (); t < termlist.end (); t++)
264	errno = save_errno;
265
266	#if 0
267	if (pid == R->cmd_pid)	435	if (pid == (*t)->cmd_pid)
268	exit (EXIT_SUCCESS);	436	{
269	#endif
270	}
271
272	/*
273	* Catch a fatal signal and tidy up before quitting
274	*/
275	/* EXTPROTO */
276	RETSIGTYPE
277	rxvt_Exit_signal(int sig)
278	{
279	signal(sig, SIG_DFL);
280	#ifdef DEBUG_CMD
281	rxvt_print_error("signal %d", sig);
282	#endif
283	rxvt_clean_exit();
284	kill(getpid(), sig);
285	}
286
287	/* ARGSUSED */
288	/* INTPROTO */
289	int
290	rxvt_xerror_handler(const Display * display
291	__attribute__ ((unused)), const XErrorEvent * event)
292	{
293	dR;
294
295	if (R->allowedxerror == -1)
296	R->allowedxerror = event->error_code;
297	else
298	{
299	rxvt_print_error("XError: Request: %d . %d, Error: %d",
300	event->request_code, event->minor_code,
301	event->error_code);
302
303	R->destroy ();	437	(*t)->destroy ();
304	}	438	break;
305		439	}
306	return 0;
307	}	440	}
308		441
309	/----------------------------------------------------------------------/	442	/----------------------------------------------------------------------/
310	/*	443	/*
311	* Exit gracefully, clearing the utmp entry and restoring tty attributes	444	* Exit gracefully, clearing the utmp entry and restoring tty attributes
312	* TODO: if debugging, this should free up any known resources if we can	445	* TODO: if debugging, this should free up any known resources if we can
313	*/	446	*/
		447	void
		448	rxvt_destroy_all ()
		449	{
		450	// TODO: rxvtd should clean up all ressources
		451	for (rxvt_term **t = rxvt_term::termlist.begin (); t < rxvt_term::termlist.end (); t++)
		452	(*t)->destroy ();
		453	}
		454
		455	/*
		456	* Catch a fatal signal and tidy up before quitting
		457	*/
		458	void
		459	rxvt_term::sig_term (sig_watcher &w)
		460	{
		461	#ifdef DEBUG_CMD
		462	rxvt_warn ("caught signal %d, exiting.\n", w.signum);
		463	#endif
		464	rxvt_destroy_all ();
		465	signal (w.signum, SIG_DFL);
		466	kill (getpid (), w.signum);
		467	}
		468
314	/* EXTPROTO */	469	/* INTPROTO */
315	void	470	int
316	rxvt_clean_exit ()	471	rxvt_xerror_handler (Display display, XErrorEvent event)
317	{	472	{
318	dR;	473	if (GET_R->allowedxerror == -1)
319		474	GET_R->allowedxerror = event->error_code;
		475	else
		476	{
		477	old_xerror_handler (display, event);
320	R->destroy ();	478	GET_R->destroy ();
		479	}
		480
		481	return 0;
321	}	482	}
322		483
323	/* ------------------------------------------------------------------------- *	484	/* ------------------------------------------------------------------------- *
324	* MEMORY ALLOCATION WRAPPERS *	485	* MEMORY ALLOCATION WRAPPERS *
325	* ------------------------------------------------------------------------- */	486	* ------------------------------------------------------------------------- */
		487	void *
		488	rxvt_malloc (size_t size)
		489	{
		490	void *p = malloc (size);
		491
		492	if (!p)
		493	rxvt_fatal ("memory allocation failure. aborting.\n");
		494
		495	return p;
		496	}
		497
326	/* EXTPROTO */	498	/* INTPROTO */
327	void *	499	void *
328	rxvt_malloc(size_t size)	500	rxvt_calloc (size_t number, size_t size)
329	{	501	{
330	void *p;	502	void *p = calloc (number, size);
331		503
332	p = malloc(size);
333	if (p)	504	if (!p)
		505	rxvt_fatal ("memory allocation failure. aborting.\n");
		506
334	return p;	507	return p;
335
336	fprintf(stderr, APL_NAME ": memory allocation failure. Aborting");
337	rxvt_clean_exit();
338	exit(EXIT_FAILURE);
339	/* NOTREACHED */
340	}	508	}
341		509
342	/* EXTPROTO */	510	/* INTPROTO */
343	void *	511	void *
344	rxvt_calloc(size_t number, size_t size)
345	{
346	void *p;
347
348	p = calloc(number, size);
349	if (p)
350	return p;
351
352	fprintf(stderr, APL_NAME ": memory allocation failure. Aborting");
353	rxvt_clean_exit();
354	exit(EXIT_FAILURE);
355	/* NOTREACHED */
356	}
357
358	/* EXTPROTO */
359	void *
360	rxvt_realloc(void *ptr, size_t size)	512	rxvt_realloc (void *ptr, size_t size)
361	{	513	{
362	void *p;
363
364	if (ptr)
365	p = realloc(ptr, size);	514	void *p = realloc (ptr, size);
366	else	515
367	p = malloc(size);
368	if (p)	516	if (!p)
		517	rxvt_fatal ("memory allocation failure. aborting.\n");
		518
369	return p;	519	return p;
370
371	fprintf(stderr, APL_NAME ": memory allocation failure. Aborting");
372	rxvt_clean_exit();
373	exit(EXIT_FAILURE);
374	/* NOTREACHED */
375	}	520	}
376		521
377	/* ------------------------------------------------------------------------- *	522	/* ------------------------------------------------------------------------- *
378	* PRIVILEGED OPERATIONS *	523	* PRIVILEGED OPERATIONS *
379	* ------------------------------------------------------------------------- */	524	* ------------------------------------------------------------------------- */
380	/* take care of suid/sgid super-user (root) privileges */	525	/* take care of suid/sgid super-user (root) privileges */
381	/* INTPROTO */
382	void	526	void
383	rxvt_privileges(pR_ int mode)	527	rxvt_privileges (rxvt_privaction action)
384	{	528	{
		529	#if (defined(HAVE_SETEUID) \|\| defined(HAVE_SETREUID)) && !defined(__CYGWIN32__)
		530	static uid_t euid;
		531	static gid_t egid;
		532	#endif
		533
385	#if ! defined(__CYGWIN32__)	534	#if ! defined(__CYGWIN32__)
386	# if !defined(HAVE_SETEUID) && defined(HAVE_SETREUID)	535	# if !defined(HAVE_SETEUID) && defined(HAVE_SETREUID)
387	/* setreuid() is the poor man's setuid(), seteuid() */	536	/* setreuid () is the poor man's setuid (), seteuid () */
388	# define seteuid(a) setreuid(-1, (a))	537	# define seteuid(a) setreuid(-1, (a))
389	# define setegid(a) setregid(-1, (a))	538	# define setegid(a) setregid(-1, (a))
390	# define HAVE_SETEUID	539	# define HAVE_SETEUID
391	# endif	540	# endif
392	# ifdef HAVE_SETEUID	541	# ifdef HAVE_SETEUID
393	switch (mode) {	542	switch (action)
		543	{
394	case IGNORE:	544	case IGNORE:
395	/*	545	/*
396	* change effective uid/gid - not real uid/gid - so we can switch	546	* change effective uid/gid - not real uid/gid - so we can switch
397	* back to root later, as required	547	* back to root later, as required
398	*/	548	*/
399	seteuid(getuid());	549	seteuid (getuid ());
400	setegid(getgid());	550	setegid (getgid ());
401	break;	551	break;
402	case SAVE:	552	case SAVE:
403	R->euid = geteuid();	553	euid = geteuid ();
404	R->egid = getegid();	554	egid = getegid ();
405	break;	555	break;
406	case RESTORE:	556	case RESTORE:
407	seteuid(R->euid);	557	seteuid (euid);
408	setegid(R->egid);	558	setegid (egid);
409	break;	559	break;
410	}	560	}
411	# else	561	# else
412	switch (mode) {	562	switch (action)
		563	{
413	case IGNORE:	564	case IGNORE:
414	setuid(getuid());	565	setuid (getuid ());
415	setgid(getgid());	566	setgid (getgid ());
416	/* FALLTHROUGH */	567	/* FALLTHROUGH */
417	case SAVE:	568	case SAVE:
418	/* FALLTHROUGH */	569	/* FALLTHROUGH */
419	case RESTORE:	570	case RESTORE:
420	break;	571	break;
421	}	572	}
422	# endif	573	# endif
423	#endif	574	#endif
424	}	575	}
425		576
426	#ifdef UTMP_SUPPORT	577	#ifdef UTMP_SUPPORT
427	/* EXTPROTO */
428	void	578	void
429	rxvt_privileged_utmp(pR_ char action)	579	rxvt_term::privileged_utmp (rxvt_privaction action)
430	{	580	{
431	D_MAIN((stderr, "rxvt_privileged_utmp(%c); waiting for: %c (pid: %d)",
432	action, R->next_utmp_action, getpid()));
433	if (R->next_utmp_action != action \|\| (action != SAVE && action != RESTORE)
434	\|\| (R->Options & Opt_utmpInhibit)	581	if ((options & Opt_utmpInhibit)
435	\|\| R->ttydev == NULL \|\| *R->ttydev == '\0')	582	\|\| !pty.name \|\| !*pty.name)
436	return;	583	return;
437		584
438	rxvt_privileges(aR_ RESTORE);	585	rxvt_privileges (RESTORE);
		586
439	if (action == SAVE) {	587	if (action == SAVE)
440	R->next_utmp_action = RESTORE;	588	makeutent (pty.name, rs[Rs_display_name]);
441	rxvt_makeutent(aR_ R->ttydev, R->rs[Rs_display_name]);	589	else
442	} else { /* action == RESTORE */	590	cleanutent ();
443	R->next_utmp_action = IGNORE;	591
444	rxvt_cleanutent(aR);
445	}
446	rxvt_privileges(aR_ IGNORE);	592	rxvt_privileges (IGNORE);
447	}
448	#endif
449
450	#ifndef NO_SETOWNER_TTYDEV
451	/* EXTPROTO */
452	void
453	rxvt_privileged_ttydev(pR_ char action)
454	{
455	D_MAIN((stderr,
456	"rxvt_privileged_ttydev(aR_ %c); waiting for: %c (pid: %d)",
457	action, R->next_tty_action, getpid()));
458	if (R->next_tty_action != action \|\| (action != SAVE && action != RESTORE)
459	\|\| R->ttydev == NULL \|\| *R->ttydev == '\0')
460	return;
461
462	rxvt_privileges(aR_ RESTORE);
463
464	if (action == SAVE) {
465	R->next_tty_action = RESTORE;
466	# ifndef RESET_TTY_TO_COMMON_DEFAULTS
467	/* store original tty status for restoration rxvt_clean_exit() -- rgg 04/12/95 */
468	if (lstat(R->ttydev, &R->ttyfd_stat) < 0) /* you lose out */
469	R->next_tty_action = IGNORE;
470	else
471	# endif
472	{
473	chown(R->ttydev, getuid(), R->ttygid); /* fail silently */
474	chmod(R->ttydev, R->ttymode);
475	# ifdef HAVE_REVOKE
476	revoke(R->ttydev);
477	# endif
478	}
479	} else { /* action == RESTORE */
480	R->next_tty_action = IGNORE;
481	# ifndef RESET_TTY_TO_COMMON_DEFAULTS
482	chmod(R->ttydev, R->ttyfd_stat.st_mode);
483	chown(R->ttydev, R->ttyfd_stat.st_uid, R->ttyfd_stat.st_gid);
484	# else
485	chmod(R->ttydev,
486	(S_IRUSR \| S_IWUSR \| S_IRGRP \| S_IWGRP \| S_IROTH \| S_IWOTH));
487	chown(R->ttydev, 0, 0);
488	# endif
489	}
490
491	rxvt_privileges(aR_ IGNORE);
492
493	# ifndef RESET_TTY_TO_COMMON_DEFAULTS
494	D_MAIN((stderr, "%s \"%s\": mode %03o, uid %d, gid %d",
495	action == RESTORE ? "Restoring" : (action ==
496	SAVE ? "Saving" :
497	"UNKNOWN ERROR for"), R->ttydev,
498	R->ttyfd_stat.st_mode, R->ttyfd_stat.st_uid,
499	R->ttyfd_stat.st_gid));
500	# endif
501	}	593	}
502	#endif	594	#endif
503		595
504	/----------------------------------------------------------------------/	596	/----------------------------------------------------------------------/
505	/*	597	/*
506	* window size/position calculcations for XSizeHint and other storage.	598	* window size/position calculcations for XSizeHint and other storage.
507	* if width/height are non-zero then override calculated width/height	599	* if width/height are non-zero then override calculated width/height
508	*/	600	*/
509	/* EXTPROTO */
510	void	601	void
511	rxvt_window_calc(pR_ unsigned int width, unsigned int height)	602	rxvt_term::window_calc (unsigned int width, unsigned int height)
512	{	603	{
513	short recalc_x, recalc_y;	604	short recalc_x, recalc_y;
514	int x, y, sb_w, mb_h, flags;	605	int x, y, sb_w, mb_h, flags;
515	unsigned int w, h;	606	unsigned int w, h;
516	unsigned int max_width, max_height;	607	unsigned int max_width, max_height;
517		608
518	D_SIZE((stderr, "< Cols/Rows: %3d x %3d ; Width/Height: %4d x %4d",	609	D_SIZE ((stderr, "< Cols/Rows: %3d x %3d ; Width/Height: %4d x %4d",
519	R->TermWin.ncol, R->TermWin.nrow, R->szHint.width,	610	TermWin.ncol, TermWin.nrow, szHint.width,
520	R->szHint.height));	611	szHint.height));
521	R->szHint.flags = PMinSize \| PResizeInc \| PBaseSize \| PWinGravity;	612	szHint.flags = PMinSize \| PResizeInc \| PBaseSize \| PWinGravity;
522	R->szHint.win_gravity = NorthWestGravity;	613	szHint.win_gravity = NorthWestGravity;
523	/* R->szHint.min_aspect.x = R->szHint.min_aspect.y = 1; */	614	/* szHint.min_aspect.x = szHint.min_aspect.y = 1; */
524		615
525	recalc_x = recalc_y = 0;	616	recalc_x = recalc_y = 0;
526	flags = 0;	617	flags = 0;
527	if (!R->parsed_geometry) {	618	if (!parsed_geometry)
		619	{
528	R->parsed_geometry = 1;	620	parsed_geometry = 1;
529	if (R->rs[Rs_geometry])	621	if (rs[Rs_geometry])
530	flags = XParseGeometry(R->rs[Rs_geometry], &x, &y, &w, &h);	622	flags = XParseGeometry (rs[Rs_geometry], &x, &y, &w, &h);
531	if (flags & WidthValue) {	623	if (flags & WidthValue)
		624	{
532	R->TermWin.ncol = BOUND_POSITIVE_INT16(w);	625	TermWin.ncol = BOUND_POSITIVE_INT16 (w);
533	R->szHint.flags \|= USSize;	626	szHint.flags \|= USSize;
534	}	627	}
535	if (flags & HeightValue) {	628	if (flags & HeightValue)
		629	{
536	R->TermWin.nrow = BOUND_POSITIVE_INT16(h);	630	TermWin.nrow = BOUND_POSITIVE_INT16 (h);
537	R->szHint.flags \|= USSize;	631	szHint.flags \|= USSize;
538	}	632	}
539	if (flags & XValue) {	633	if (flags & XValue)
		634	{
540	R->szHint.x = x;	635	szHint.x = x;
541	R->szHint.flags \|= USPosition;	636	szHint.flags \|= USPosition;
542	if (flags & XNegative) {	637	if (flags & XNegative)
		638	{
543	recalc_x = 1;	639	recalc_x = 1;
544	R->szHint.win_gravity = NorthEastGravity;	640	szHint.win_gravity = NorthEastGravity;
545	}	641	}
546	}	642	}
547	if (flags & YValue) {	643	if (flags & YValue)
		644	{
548	R->szHint.y = y;	645	szHint.y = y;
549	R->szHint.flags \|= USPosition;	646	szHint.flags \|= USPosition;
550	if (flags & YNegative) {	647	if (flags & YNegative)
		648	{
551	recalc_y = 1;	649	recalc_y = 1;
552	if (R->szHint.win_gravity == NorthEastGravity)	650	if (szHint.win_gravity == NorthEastGravity)
553	R->szHint.win_gravity = SouthEastGravity;	651	szHint.win_gravity = SouthEastGravity;
554	else	652	else
555	R->szHint.win_gravity = SouthWestGravity;	653	szHint.win_gravity = SouthWestGravity;
556	}	654	}
557	}	655	}
558	}	656	}
		657
559	/* TODO: BOUNDS */	658	/* TODO: BOUNDS */
560	R->TermWin.width = R->TermWin.ncol * R->TermWin.fwidth;	659	TermWin.width = TermWin.ncol * TermWin.fwidth;
561	R->TermWin.height = R->TermWin.nrow * R->TermWin.fheight;	660	TermWin.height = TermWin.nrow * TermWin.fheight;
562	max_width = MAX_COLS * R->TermWin.fwidth;	661	max_width = MAX_COLS * TermWin.fwidth;
563	max_height = MAX_ROWS * R->TermWin.fheight;	662	max_height = MAX_ROWS * TermWin.fheight;
564		663
565	R->szHint.base_width = R->szHint.base_height = 2 * R->TermWin.int_bwidth;	664	szHint.base_width = szHint.base_height = 2 * TermWin.int_bwidth;
566		665
567	sb_w = mb_h = 0;	666	sb_w = mb_h = 0;
568	R->window_vt_x = R->window_vt_y = 0;	667	window_vt_x = window_vt_y = TermWin.int_bwidth;
		668
569	if (scrollbar_visible(R)) {	669	if (scrollbar_visible ())
		670	{
570	sb_w = scrollbar_TotalWidth();	671	sb_w = scrollbar_TotalWidth ();
571	R->szHint.base_width += sb_w;	672	szHint.base_width += sb_w;
572	if (!(R->Options & Opt_scrollBar_right))	673	if (!(options & Opt_scrollBar_right))
573	R->window_vt_x = sb_w;	674	window_vt_x += sb_w;
574	}	675	}
		676
575	if (menubar_visible(R)) {	677	if (menubar_visible ())
		678	{
576	mb_h = menuBar_TotalHeight();	679	mb_h = menuBar_TotalHeight ();
577	R->szHint.base_height += mb_h;	680	szHint.base_height += mb_h;
578	R->window_vt_y = mb_h;	681	window_vt_y += mb_h;
579	}	682	}
		683
580	R->szHint.width_inc = R->TermWin.fwidth;	684	szHint.width_inc = TermWin.fwidth;
581	R->szHint.height_inc = R->TermWin.fheight;	685	szHint.height_inc = TermWin.fheight;
582	R->szHint.min_width = R->szHint.base_width + R->szHint.width_inc;	686	szHint.min_width = szHint.base_width + szHint.width_inc;
583	R->szHint.min_height = R->szHint.base_height + R->szHint.height_inc;	687	szHint.min_height = szHint.base_height + szHint.height_inc;
584		688
585	if (width && width - R->szHint.base_width < max_width) {	689	if (width && width - szHint.base_width < max_width)
		690	{
586	R->szHint.width = width;	691	szHint.width = width;
587	R->TermWin.width = width - R->szHint.base_width;	692	TermWin.width = width - szHint.base_width;
588	} else {	693	}
		694	else
		695	{
589	MIN_IT(R->TermWin.width, max_width);	696	MIN_IT (TermWin.width, max_width);
590	R->szHint.width = R->szHint.base_width + R->TermWin.width;	697	szHint.width = szHint.base_width + TermWin.width;
591	}	698	}
		699
592	if (height && height - R->szHint.base_height < max_height) {	700	if (height && height - szHint.base_height < max_height)
		701	{
593	R->szHint.height = height;	702	szHint.height = height;
594	R->TermWin.height = height - R->szHint.base_height;	703	TermWin.height = height - szHint.base_height;
595	} else {	704	}
		705	else
		706	{
596	MIN_IT(R->TermWin.height, max_height);	707	MIN_IT (TermWin.height, max_height);
597	R->szHint.height = R->szHint.base_height + R->TermWin.height;	708	szHint.height = szHint.base_height + TermWin.height;
598	}	709	}
		710
599	if (scrollbar_visible(R) && (R->Options & Opt_scrollBar_right))	711	if (scrollbar_visible () && (options & Opt_scrollBar_right))
600	R->window_sb_x = R->szHint.width - sb_w;	712	window_sb_x = szHint.width - sb_w;
601		713
602	if (recalc_x)	714	if (recalc_x)
603	R->szHint.x += (DisplayWidth(R->Xdisplay, Xscreen)	715	szHint.x += (DisplayWidth (display->display, DefaultScreen (display->display))
604	- R->szHint.width - 2 * R->TermWin.ext_bwidth);	716	- szHint.width - 2 * TermWin.ext_bwidth);
605	if (recalc_y)	717	if (recalc_y)
606	R->szHint.y += (DisplayHeight(R->Xdisplay, Xscreen)	718	szHint.y += (DisplayHeight (display->display, DefaultScreen (display->display))
607	- R->szHint.height - 2 * R->TermWin.ext_bwidth);	719	- szHint.height - 2 * TermWin.ext_bwidth);
608		720
609	R->TermWin.ncol = R->TermWin.width / R->TermWin.fwidth;	721	TermWin.ncol = TermWin.width / TermWin.fwidth;
610	R->TermWin.nrow = R->TermWin.height / R->TermWin.fheight;	722	TermWin.nrow = TermWin.height / TermWin.fheight;
611	D_SIZE((stderr, "> Cols/Rows: %3d x %3d ; Width/Height: %4d x %4d",	723	D_SIZE ((stderr, "> Cols/Rows: %3d x %3d ; Width/Height: %4d x %4d",
612	R->TermWin.ncol, R->TermWin.nrow, R->szHint.width,	724	TermWin.ncol, TermWin.nrow, szHint.width,
613	R->szHint.height));	725	szHint.height));
614	return;	726	return;
615	}	727	}
616		728
617	/----------------------------------------------------------------------/	729	/----------------------------------------------------------------------/
618	/*	730	/*
619	* Tell the teletype handler what size the window is.	731	* Tell the teletype handler what size the window is.
620	* Called after a window size change.	732	* Called after a window size change.
621	*/	733	*/
622	void	734	void
623	rxvt_term::tt_winch ()	735	rxvt_term::tt_winch ()
624	{	736	{
625	struct winsize ws;	737	if (pty.pty < 0)
626
627	if (cmd_fd < 0)
628	return;	738	return;
		739
		740	struct winsize ws;
629		741
630	ws.ws_col = TermWin.ncol;	742	ws.ws_col = TermWin.ncol;
631	ws.ws_row = TermWin.nrow;	743	ws.ws_row = TermWin.nrow;
632	ws.ws_xpixel = ws.ws_ypixel = 0;	744	ws.ws_xpixel = TermWin.width;
633	#ifndef DEBUG_SIZE	745	ws.ws_ypixel = TermWin.height;
634	(void)ioctl (cmd_fd, TIOCSWINSZ, &ws);	746	(void)ioctl (pty.pty, TIOCSWINSZ, &ws);
635	#else	747
636	if (ioctl (cmd_fd, TIOCSWINSZ, &ws) < 0)	748	#if 0
637	D_SIZE((stderr, "Failed to send TIOCSWINSZ to fd %d", fd));	749	// TIOCSWINSZ⎈ is supposed to do this automatically and correctly
638	# ifdef SIGWINCH
639	else if (cmd_pid) /* force through to the command */	750	if (cmd_pid) /* force through to the command */
640	kill (cmd_pid, SIGWINCH);	751	kill (cmd_pid, SIGWINCH);
641	# endif
642	#endif	752	#endif
643	}	753	}
644		754
645	/----------------------------------------------------------------------/	755	/----------------------------------------------------------------------/
646	/* rxvt_change_font() - Switch to a new font */	756	/* set_fonts () - load and set the various fonts
647	/*	757	/*
648	* init = 1 - initialize	758	* init = 1 - initialize
649	*	759	*
650	* fontname == FONT_UP - switch to bigger font	760	* fontname == FONT_UP - switch to bigger font
651	* fontname == FONT_DN - switch to smaller font	761	* fontname == FONT_DN - switch to smaller font
652	*/	762	*/
653	/* EXTPROTO */	763	bool
654	void	764	rxvt_term::set_fonts ()
655	rxvt_change_font(pR_ int init, const char *fontname)
656	{	765	{
657	}	766	rxvt_fontset *fs = new rxvt_fontset (this);
		767	rxvt_fontprop prop;
658		768
659	/* INTPROTO */	769	if (!fs
660	void	770	\|\| !fs->populate (rs[Rs_font] ? rs[Rs_font] : "fixed")
661	rxvt_font_up_down(pR_ int n, int direction)	771	\|\| !fs->realize_font (1))
		772	{
		773	delete fs;
		774	return false;
		775	}
		776
		777	#if ENABLE_STYLES
		778	for (int i = RS_styleCount; --i; )
		779	if (TermWin.fontset[i] != TermWin.fontset[0])
		780	delete TermWin.fontset[i];
		781	#endif
		782
		783	delete TermWin.fontset[0];
		784	TermWin.fontset[0] = fs;
		785
		786	prop = (*fs)[1]->properties ();
		787	fs->set_prop (prop);
		788
		789	TermWin.fwidth = prop.width;
		790	TermWin.fheight = prop.height;
		791	TermWin.fweight = prop.weight;
		792	TermWin.fslant = prop.slant;
		793	TermWin.fbase = (*fs)[1]->ascent;
		794
		795	for (int style = 1; style < 4; style++)
		796	{
		797	#if ENABLE_STYLES
		798	const char *res = rs[Rs_font + style];
		799
		800	if (res && !*res)
		801	TermWin.fontset[style] = TermWin.fontset[0];
		802	else
		803	{
		804	TermWin.fontset[style] = fs = new rxvt_fontset (this);
		805	rxvt_fontprop prop2 = prop;
		806
		807	if (res)
		808	prop2.weight = prop2.slant = rxvt_fontprop::unset;
		809	else
		810	{
		811	res = TermWin.fontset[0]->fontdesc;
		812
		813	if (SET_STYLE (0, style) & RS_Bold) prop2.weight = rxvt_fontprop::bold;
		814	if (SET_STYLE (0, style) & RS_Italic) prop2.slant = rxvt_fontprop::italic;
		815	}
		816
		817	fs->populate (res);
		818	fs->set_prop (prop2);
		819	}
		820	#else
		821	TermWin.fontset[style] = TermWin.fontset[0];
		822	#endif
		823	}
		824
		825	if (TermWin.parent[0])
		826	{
		827	resize_all_windows (0, 0, 0);
		828	scr_remap_chars ();
		829	scr_touch (true);
		830	}
		831
		832	return true;
		833	}
		834
		835	void rxvt_term::set_string_property (Atom prop, const char *str, int len)
662	{	836	{
		837	// TODO: SMART_WINDOW_TITLE
		838	XChangeProperty (display->display, TermWin.parent[0],
		839	prop, XA_STRING, 8, PropModeReplace,
		840	(const unsigned char *)str, len >= 0 ? len : strlen (str));
		841	}
		842
		843	void rxvt_term::set_utf8_property (Atom prop, const char *str, int len)
		844	{
		845	// TODO: SMART_WINDOW_TITLE
		846	wchar_t *ws = rxvt_mbstowcs (str, len);
		847	char *s = rxvt_wcstoutf8 (ws);
		848
		849	XChangeProperty (display->display, TermWin.parent[0],
		850	prop, xa[XA_UTF8_STRING], 8, PropModeReplace,
		851	(const unsigned char *)s, strlen (s));
		852
		853	free (s);
		854	free (ws);
663	}	855	}
664		856
665	/----------------------------------------------------------------------/	857	/----------------------------------------------------------------------/
666	/----------------------------------------------------------------------/	858	/----------------------------------------------------------------------/
667	/* xterm sequences - title, iconName, color (exptl) */	859	/* xterm sequences - title, iconName, color (exptl) */
668	/* EXTPROTO */
669	void	860	void
670	rxvt_set_title(pR_ const char *str)	861	rxvt_term::set_title (const char *str)
671	{	862	{
672	#ifndef SMART_WINDOW_TITLE	863	set_string_property (XA_WM_NAME, str);
673	XStoreName(R->Xdisplay, R->TermWin.parent[0], str);	864	#if ENABLE_FRILLS
		865	set_utf8_property (display->atom ("_NET_WM_NAME"), str);
		866	#endif
		867	}
		868
		869	void
		870	rxvt_term::set_icon_name (const char *str)
		871	{
		872	set_string_property (XA_WM_ICON_NAME, str);
		873	#if ENABLE_FRILLS
		874	set_utf8_property (display->atom ("_NET_WM_ICON_NAME"), str);
		875	#endif
		876	}
		877
		878	#ifdef XTERM_COLOR_CHANGE
		879	void
		880	rxvt_term::set_window_color (int idx, const char *color)
		881	{
		882	rxvt_color xcol;
		883	int i;
		884
		885	if (color == NULL \|\| *color == '\0')
		886	return;
		887
		888	/* handle color aliases */
		889	if (isdigit (*color))
		890	{
		891	i = atoi (color);
		892	if (i >= 8 && i <= 15)
		893	{ /* bright colors */
		894	i -= 8;
		895	# ifndef NO_BRIGHTCOLOR
		896	pix_colors_focused[idx] = pix_colors_focused[minBrightCOLOR + i];
		897	SET_PIXCOLOR (idx);
		898	goto Done;
		899	# endif
		900
		901	}
		902	if (i >= 0 && i <= 7)
		903	{ /* normal colors */
		904	pix_colors_focused[idx] = pix_colors_focused[minCOLOR + i];
		905	SET_PIXCOLOR (idx);
		906	goto Done;
		907	}
		908	}
		909
		910	if (!rXParseAllocColor (& xcol, color))
		911	return;
		912
		913	/* XStoreColor (display->display, display->cmap, XColor); /
		914
		915	/*
		916	* FIXME: should free colors here, but no idea how to do it so instead,
		917	* so just keep gobbling up the colormap
		918	*/
		919	# if 0
		920	for (i = Color_Black; i <= Color_White; i++)
		921	if (pix_colors[idx] == pix_colors[i])
		922	break;
		923	if (i > Color_White)
		924	{
		925	/* fprintf (stderr, "XFreeColors: pix_colors [%d] = %lu\n", idx, pix_colors [idx]); */
		926	XFreeColors (display->display, display->cmap, (pix_colors + idx), 1,
		927	DisplayPlanes (display->display, display->screen));
		928	}
		929	# endif
		930
		931	pix_colors_focused[idx] = xcol;
		932	SET_PIXCOLOR (idx);
		933
		934	/* XSetWindowAttributes attr; */
		935	/* Cursor cursor; */
		936	Done:
		937	#ifdef OFF_FOCUS_FADING
		938	if (rs[Rs_fade])
		939	pix_colors_unfocused[idx] = pix_colors_focused[idx].fade (display, atoi (rs[Rs_fade]));
		940	#endif
		941
		942	/TODO: handle Color_BD, scrollbar background, etc. /
		943
		944	recolour_cursor ();
		945	scr_recolour ();
		946	}
		947
674	#else	948	#else
675	char *name;
676
677	if (XFetchName(R->Xdisplay, R->TermWin.parent[0], &name) == 0)
678	name = NULL;
679	if (name == NULL \|\| STRCMP(name, str))
680	XStoreName(R->Xdisplay, R->TermWin.parent[0], str);
681	if (name)
682	XFree(name);
683	#endif
684	}
685
686	/* EXTPROTO */
687	void
688	rxvt_set_iconName(pR_ const char *str)
689	{
690	#ifndef SMART_WINDOW_TITLE
691	XSetIconName(R->Xdisplay, R->TermWin.parent[0], str);
692	#else
693	char *name;
694
695	if (XGetIconName(R->Xdisplay, R->TermWin.parent[0], &name))
696	name = NULL;
697	if (name == NULL \|\| STRCMP(name, str))
698	XSetIconName(R->Xdisplay, R->TermWin.parent[0], str);
699	if (name)
700	XFree(name);
701	#endif
702	}
703
704	#ifdef XTERM_COLOR_CHANGE
705	/* EXTPROTO */
706	void
707	rxvt_set_window_color(pR_ int idx, const char *color)
708	{
709	rxvt_color xcol;
710	int i;
711
712	if (color == NULL \|\| *color == '\0')
713	return;
714
715	/* handle color aliases */
716	if (isdigit(*color)) {
717	i = atoi(color);
718	if (i >= 8 && i <= 15) { /* bright colors */
719	i -= 8;
720	# ifndef NO_BRIGHTCOLOR
721	R->PixColors[idx] = R->PixColors[minBrightCOLOR + i];
722	SET_PIXCOLOR(R, idx);
723	goto Done;
724	# endif
725	}
726	if (i >= 0 && i <= 7) { /* normal colors */
727	R->PixColors[idx] = R->PixColors[minCOLOR + i];
728	SET_PIXCOLOR(R, idx);
729	goto Done;
730	}
731	}
732	if (!rxvt_rXParseAllocColor(aR_ & xcol, color))
733	return;
734	/* XStoreColor (R->Xdisplay, XCMAP, XColor); /
735
736	/*
737	* FIXME: should free colors here, but no idea how to do it so instead,
738	* so just keep gobbling up the colormap
739	*/
740	# if 0
741	for (i = Color_Black; i <= Color_White; i++)
742	if (R->PixColors[idx] == R->PixColors[i])
743	break;
744	if (i > Color_White) {
745	/* fprintf (stderr, "XFreeColors: R->PixColors [%d] = %lu\n", idx, R->PixColors [idx]); */
746	XFreeColors(R->Xdisplay, XCMAP, (R->PixColors + idx), 1,
747	DisplayPlanes(R->Xdisplay, Xscreen));
748	}
749	# endif
750
751	R->PixColors[idx] = xcol;
752	SET_PIXCOLOR(R, idx);
753
754	/* XSetWindowAttributes attr; */
755	/* Cursor cursor; */
756	Done:
757	if (idx == Color_bg && !(R->Options & Opt_transparent))
758	XSetWindowBackground(R->Xdisplay, R->TermWin.vt,
759	R->PixColors[Color_bg]);
760
761	/* handle Color_BD, scrollbar background, etc. */
762
763	rxvt_set_colorfgbg(aR);
764	rxvt_recolour_cursor(aR);
765	/* the only reasonable way to enforce a clean update */
766	rxvt_scr_poweron(aR);
767	}
768
769	#else
770	# define rxvt_set_window_color(aR_ idx,color) ((void)0)	949	# define set_window_color (idx,color) ((void)0)
771	#endif /* XTERM_COLOR_CHANGE */	950	#endif /* XTERM_COLOR_CHANGE */
772		951
773	/* EXTPROTO */
774	void	952	void
775	rxvt_recolour_cursor(pR)	953	rxvt_term::recolour_cursor ()
776	{	954	{
777	rxvt_color xcol[2];	955	XColor xcol[2];
778		956
779	#if TODO	957	xcol[0].pixel = ISSET_PIXCOLOR (Color_pointer_fg)
780	xcol[0] = R->PixColors[Color_pointer];	958	? pix_colors_focused[Color_pointer_fg]
781	xcol[1] = R->PixColors[Color_bg];	959	: pix_colors_focused[Color_fg];
782	XQueryColors(R->Xdisplay, XCMAP, xcol, 2);	960	xcol[1].pixel = ISSET_PIXCOLOR (Color_pointer_bg)
		961	? pix_colors_focused[Color_pointer_bg]
		962	: pix_colors_focused[Color_bg];
		963
		964	XQueryColors (display->display, display->cmap, xcol, 2);
783	XRecolorCursor(R->Xdisplay, R->TermWin_cursor, &(xcol[0]), &(xcol[1]));	965	XRecolorCursor (display->display, TermWin_cursor, xcol + 0, xcol + 1);
784	#endif
785	}	966	}
786		967
787	/----------------------------------------------------------------------/	968	/----------------------------------------------------------------------/
788	/*	969	/*
789	* find if fg/bg matches any of the normal (low-intensity) colors	970	* find if fg/bg matches any of the normal (low-intensity) colors
790	*/	971	*/
791	/* INTPROTO */
792	void	972	void
793	rxvt_set_colorfgbg(pR)	973	rxvt_term::set_colorfgbg ()
794	{	974	{
795	unsigned int i;	975	unsigned int i;
796	const char *xpmb = "\0";	976	const char *xpmb = "\0";
797	char fstr[sizeof("default") + 1], bstr[sizeof("default") + 1];	977	char fstr[sizeof ("default") + 1], bstr[sizeof ("default") + 1];
798		978
799	R->env_colorfgbg =
800	(char *)rxvt_malloc(sizeof("COLORFGBG=default;default;bg") + 1);	979	env_colorfgbg = (char *)rxvt_malloc (sizeof ("COLORFGBG=default;default;bg") + 1);
801	STRCPY(fstr, "default");	980	strcpy (fstr, "default");
802	STRCPY(bstr, "default");	981	strcpy (bstr, "default");
803	for (i = Color_Black; i <= Color_White; i++)	982	for (i = Color_Black; i <= Color_White; i++)
804	if (R->PixColors[Color_fg] == R->PixColors[i]) {	983	if (pix_colors[Color_fg] == pix_colors[i])
		984	{
805	sprintf(fstr, "%d", (i - Color_Black));	985	sprintf (fstr, "%d", (i - Color_Black));
806	break;	986	break;
807	}	987	}
		988
808	for (i = Color_Black; i <= Color_White; i++)	989	for (i = Color_Black; i <= Color_White; i++)
809	if (R->PixColors[Color_bg] == R->PixColors[i]) {	990	if (pix_colors[Color_bg] == pix_colors[i])
		991	{
810	sprintf(bstr, "%d", (i - Color_Black));	992	sprintf (bstr, "%d", (i - Color_Black));
811	#ifdef XPM_BACKGROUND	993	#ifdef XPM_BACKGROUND
812	xpmb = "default;";	994	xpmb = "default;";
813	#endif	995	#endif
814	break;	996	break;
815	}	997	}
		998
816	sprintf(R->env_colorfgbg, "COLORFGBG=%s;%s%s", fstr, xpmb, bstr);	999	sprintf (env_colorfgbg, "COLORFGBG=%s;%s%s", fstr, xpmb, bstr);
817	putenv(R->env_colorfgbg);
818
819	#ifndef NO_BRIGHTCOLOR
820	R->colorfgbg = DEFAULT_RSTYLE;
821	for (i = minCOLOR; i <= maxCOLOR; i++) {
822	if (R->PixColors[Color_fg] == R->PixColors[i])
823	R->colorfgbg = SET_FGCOLOR(R->colorfgbg, i);
824	if (R->PixColors[Color_bg] == R->PixColors[i])
825	R->colorfgbg = SET_BGCOLOR(R->colorfgbg, i);
826	}
827	#endif
828	}	1000	}
829		1001
830	/----------------------------------------------------------------------/	1002	/----------------------------------------------------------------------/
831	/*	1003	/*
832	* Colour determination for low colour displays, routine from	1004	* Colour determination for low colour displays, routine from
833	* Hans de Goede <hans@highrise.nl>	1005	* Hans de Goede <hans@highrise.nl>
834	*/	1006	*/
835		1007
836	/* EXTPROTO */
837	int	1008	int
838	rxvt_rXParseAllocColor(pR_ rxvt_color * screen_in_out, const char *colour)	1009	rxvt_term::rXParseAllocColor (rxvt_color screen_in_out, const char colour)
839	{	1010	{
840	screen_in_out->set(aR_ colour);
841
842	if (!screen_in_out->set(aR_ colour)) {	1011	if (!screen_in_out->set (display, colour))
843	rxvt_print_error("can't allocate colour: %s", colour);	1012	{
		1013	rxvt_warn ("can't get colour '%s', continuing without.\n", colour);
844	return false;	1014	return false;
845	}	1015	}
846		1016
847	return true;	1017	return true;
848	}	1018	}
849		1019
850	/* -------------------------------------------------------------------- *	1020	/* -------------------------------------------------------------------- *
851	* - WINDOW RESIZING - *	1021	* - WINDOW RESIZING - *
852	* -------------------------------------------------------------------- */	1022	* -------------------------------------------------------------------- */
853	/* EXTPROTO */
854	void	1023	void
855	rxvt_resize_all_windows(pR_ unsigned int width, unsigned int height,	1024	rxvt_term::resize_all_windows (unsigned int width, unsigned int height, int ignoreparent)
856	int ignoreparent)
857	{	1025	{
858	int fix_screen;	1026	int fix_screen;
859		1027
860	#ifdef SMART_RESIZE	1028	#ifdef SMART_RESIZE
861	int old_width = R->szHint.width, old_height = R->szHint.height;	1029	int old_width = szHint.width, old_height = szHint.height;
862	#endif	1030	#endif
863		1031
864	rxvt_window_calc(aR_ width, height);	1032	window_calc (width, height);
865	XSetWMNormalHints(R->Xdisplay, R->TermWin.parent[0], &R->szHint);	1033	XSetWMNormalHints (display->display, TermWin.parent[0], &szHint);
		1034
866	if (!ignoreparent) {	1035	if (!ignoreparent)
		1036	{
867	#ifdef SMART_RESIZE	1037	#ifdef SMART_RESIZE
868	/*	1038	/*
869	* resize by Marius Gedminas <marius.gedminas@uosis.mif.vu.lt>	1039	* resize by Marius Gedminas <marius.gedminas@uosis.mif.vu.lt>
870	* reposition window on resize depending on placement on screen	1040	* reposition window on resize depending on placement on screen
871	*/	1041	*/
872	int x, y, x1, y1;	1042	int x, y, x1, y1;
873	int dx, dy;	1043	int dx, dy;
874	unsigned int unused_w1, unused_h1, unused_b1, unused_d1;	1044	unsigned int unused_w1, unused_h1, unused_b1, unused_d1;
875	Window unused_cr;	1045	Window unused_cr;
876		1046
877	XTranslateCoordinates(R->Xdisplay, R->TermWin.parent[0], Xroot,	1047	XTranslateCoordinates (display->display, TermWin.parent[0], display->root,
878	0, 0, &x, &y, &unused_cr);	1048	0, 0, &x, &y, &unused_cr);
879	XGetGeometry(R->Xdisplay, R->TermWin.parent[0], &unused_cr, &x1, &y1,	1049	XGetGeometry (display->display, TermWin.parent[0], &unused_cr, &x1, &y1,
880	&unused_w1, &unused_h1, &unused_b1, &unused_d1);	1050	&unused_w1, &unused_h1, &unused_b1, &unused_d1);
881	/*	1051	/*
882	* if Xroot isn't the parent window, a WM will probably have offset	1052	* if display->root isn't the parent window, a WM will probably have offset
883	* our position for handles and decorations. Counter it	1053	* our position for handles and decorations. Counter it
884	*/	1054	*/
885	if (x1 != x \|\| y1 != y) {	1055	if (x1 != x \|\| y1 != y)
		1056	{
886	x -= x1;	1057	x -= x1;
887	y -= y1;	1058	y -= y1;
888	}	1059	}
889		1060
890	x1 = (DisplayWidth(R->Xdisplay, Xscreen) - old_width) / 2;	1061	x1 = (DisplayWidth (display->display, display->screen) - old_width) / 2;
891	y1 = (DisplayHeight(R->Xdisplay, Xscreen) - old_height) / 2;	1062	y1 = (DisplayHeight (display->display, display->screen) - old_height) / 2;
892	dx = old_width - R->szHint.width;	1063	dx = old_width - szHint.width;
893	dy = old_height - R->szHint.height;	1064	dy = old_height - szHint.height;
894		1065
895	/* Check position of the center of the window */	1066	/* Check position of the center of the window */
896	if (x < x1) /* left half */	1067	if (x < x1) /* left half */
897	dx = 0;	1068	dx = 0;
898	else if (x == x1) /* exact center */	1069	else if (x == x1) /* exact center */
899	dx /= 2;	1070	dx /= 2;
900	if (y < y1) /* top half */	1071	if (y < y1) /* top half */
901	dy = 0;	1072	dy = 0;
902	else if (y == y1) /* exact center */	1073	else if (y == y1) /* exact center */
903	dy /= 2;	1074	dy /= 2;
904		1075
905	XMoveResizeWindow(R->Xdisplay, R->TermWin.parent[0], x + dx, y + dy,	1076	XMoveResizeWindow (display->display, TermWin.parent[0], x + dx, y + dy,
906	R->szHint.width, R->szHint.height);	1077	szHint.width, szHint.height);
907	#else	1078	#else
908	XResizeWindow(R->Xdisplay, R->TermWin.parent[0], R->szHint.width,	1079	XResizeWindow (display->display, TermWin.parent[0], szHint.width, szHint.height);
909	R->szHint.height);
910	#endif	1080	#endif
911	}	1081	}
912		1082
913	fix_screen = (R->TermWin.ncol != R->prev_ncol	1083	fix_screen = TermWin.ncol != prev_ncol \|\| TermWin.nrow != prev_nrow;
914	\|\| R->TermWin.nrow != R->prev_nrow);	1084
915	if (fix_screen \|\| width != R->old_width \|\| height != R->old_height) {	1085	if (fix_screen \|\| width != old_width \|\| height != old_height)
		1086	{
916	if (scrollbar_visible(R)) {	1087	if (scrollbar_visible ())
		1088	{
917	XMoveResizeWindow(R->Xdisplay, R->scrollBar.win, R->window_sb_x,	1089	XMoveResizeWindow (display->display, scrollBar.win,
		1090	window_sb_x, 0,
918	0, scrollbar_TotalWidth(), R->szHint.height);	1091	scrollbar_TotalWidth (), szHint.height);
919	rxvt_Resize_scrollBar(aR);	1092	resize_scrollbar ();
920	}	1093	}
		1094
921	if (menubar_visible(R))	1095	if (menubar_visible ())
922	XMoveResizeWindow(R->Xdisplay, R->menuBar.win, R->window_vt_x,	1096	XMoveResizeWindow (display->display, menuBar.win,
		1097	window_vt_x, 0,
923	0, TermWin_TotalWidth(), menuBar_TotalHeight());	1098	TermWin_TotalWidth (), menuBar_TotalHeight ());
924	XMoveResizeWindow(R->Xdisplay, R->TermWin.vt, R->window_vt_x,	1099
925	R->window_vt_y, TermWin_TotalWidth(),	1100	XMoveResizeWindow (display->display, TermWin.vt,
		1101	window_vt_x, window_vt_y,
926	TermWin_TotalHeight());	1102	TermWin_TotalWidth (), TermWin_TotalHeight ());
927	#ifdef RXVT_GRAPHICS
928	if (R->old_height)
929	rxvt_Gr_Resize(aR_ R->old_width - R->szHint.base_width,
930	R->old_height - R->szHint.base_height);
931	#endif
932	rxvt_scr_clear(aR);	1103	scr_clear ();
933	#ifdef XPM_BACKGROUND	1104	#ifdef XPM_BACKGROUND
934	rxvt_resize_pixmap(aR);	1105	resize_pixmap ();
935	#endif	1106	#endif
936	}	1107	}
937		1108
938	if (fix_screen \|\| R->old_height == 0) {	1109	if (fix_screen \|\| old_height == 0)
		1110	{
939	int curr_screen = -1;	1111	int curr_screen = -1;
940	uint16_t old_ncol = R->prev_ncol;	1112	int old_ncol = prev_ncol;
941		1113
942	/* scr_reset only works on the primary screen */	1114	/* scr_reset only works on the primary screen */
943	if (R->old_height) /* this is not the first time through */	1115	if (old_height) /* this is not the first time through */
		1116	{
		1117	unsigned int ncol = TermWin.ncol;
		1118	TermWin.ncol = prev_ncol; // save b/c scr_blank_screen_mem uses this
944	curr_screen = rxvt_scr_change_screen(aR_ PRIMARY);	1119	curr_screen = scr_change_screen (PRIMARY);
945	rxvt_scr_reset(aR);	1120	TermWin.ncol = ncol;
946	if (curr_screen >= 0) { /* this is not the first time through */
947	rxvt_scr_change_screen(aR_ curr_screen);
948	rxvt_selection_check(aR_(old_ncol != R->TermWin.ncol ? 4 : 0));
949	}	1121	}
950	}
951		1122
		1123	scr_reset ();
		1124
		1125	if (curr_screen >= 0) /* this is not the first time through */
		1126	{
		1127	scr_change_screen (curr_screen);
		1128	selection_check (old_ncol != TermWin.ncol ? 4 : 0);
		1129	}
		1130	}
		1131
952	R->old_width = R->szHint.width;	1132	old_width = szHint.width;
953	R->old_height = R->szHint.height;	1133	old_height = szHint.height;
954		1134
955	#ifdef USE_XIM	1135	#ifdef USE_XIM
956	rxvt_IMSetStatusPosition(aR);	1136	IMSetStatusPosition ();
957	#endif	1137	#endif
958	}	1138	}
959		1139
960	/*	1140	/*
961	* Set the width/height of the vt window in characters. Units are pixels.	1141	* Set the width/height of the vt window in characters. Units are pixels.
962	* good for toggling 80/132 columns	1142	* good for toggling 80/132 columns
963	*/	1143	*/
964	/* EXTPROTO */
965	void	1144	void
966	rxvt_set_widthheight(pR_ unsigned int width, unsigned int height)	1145	rxvt_term::set_widthheight (unsigned int width, unsigned int height)
967	{	1146	{
968	XWindowAttributes wattr;	1147	XWindowAttributes wattr;
969		1148
970	if (width == 0 \|\| height == 0) {	1149	if (width == 0 \|\| height == 0)
		1150	{
971	XGetWindowAttributes(R->Xdisplay, Xroot, &wattr);	1151	XGetWindowAttributes (display->display, display->root, &wattr);
972	if (width == 0)	1152	if (width == 0)
973	width = wattr.width - R->szHint.base_width;	1153	width = wattr.width - szHint.base_width;
974	if (height == 0)	1154	if (height == 0)
975	height = wattr.height - R->szHint.base_height;	1155	height = wattr.height - szHint.base_height;
976	}	1156	}
		1157
977	if (width != R->TermWin.width \|\| height != R->TermWin.height) {	1158	if (width != TermWin.width \|\| height != TermWin.height)
		1159	{
978	width += R->szHint.base_width;	1160	width += szHint.base_width;
979	height += R->szHint.base_height;	1161	height += szHint.base_height;
980	rxvt_resize_all_windows(aR_ width, height, 0);	1162	resize_all_windows (width, height, 0);
981	}	1163	}
982	}	1164	}
983		1165
984	/* -------------------------------------------------------------------- *	1166	/* -------------------------------------------------------------------- *
985	* - X INPUT METHOD ROUTINES - *	1167	* - X INPUT METHOD ROUTINES - *
986	* -------------------------------------------------------------------- */	1168	* -------------------------------------------------------------------- */
987	#ifdef USE_XIM	1169	#ifdef USE_XIM
988	/* INTPROTO */
989	void
990	rxvt_setSize(pR_ XRectangle * size)
991	{
992	size->x = R->TermWin.int_bwidth;
993	size->y = R->TermWin.int_bwidth;
994	size->width = Width2Pixel(R->TermWin.ncol);
995	size->height = Height2Pixel(R->TermWin.nrow);
996	}
997		1170
998	/* INTPROTO */
999	void	1171	void
1000	rxvt_setColor(pR_ unsigned long fg, unsigned long bg)	1172	rxvt_term::im_set_color (unsigned long &fg, unsigned long &bg)
1001	{	1173	{
1002	*fg = R->PixColors[Color_fg];	1174	fg = pix_colors[Color_fg];
1003	*bg = R->PixColors[Color_bg];	1175	bg = pix_colors[Color_bg];
		1176	}
		1177
		1178	void
		1179	rxvt_term::im_set_size (XRectangle &size)
		1180	{
		1181	// the int_bwidth terms make no sense to me
		1182	size.x = TermWin.int_bwidth;
		1183	size.y = TermWin.int_bwidth;
		1184	size.width = Width2Pixel (TermWin.ncol) + TermWin.int_bwidth;
		1185	size.height = Height2Pixel (TermWin.nrow) + TermWin.int_bwidth;
		1186	}
		1187
		1188	void
		1189	rxvt_term::im_set_preedit_area (XRectangle &preedit_rect,
		1190	XRectangle &status_rect,
		1191	const XRectangle &needed_rect)
		1192	{
		1193	preedit_rect.x = needed_rect.width;
		1194	preedit_rect.y = 0;
		1195	preedit_rect.width = Width2Pixel (TermWin.ncol) - needed_rect.width + 1;
		1196	preedit_rect.height = TermWin.fheight;
		1197
		1198	status_rect.x = 0;
		1199	status_rect.y = 0;
		1200	status_rect.width = needed_rect.width ? needed_rect.width : Width2Pixel (TermWin.ncol) + 1;
		1201	status_rect.height = TermWin.fheight;
1004	}	1202	}
1005		1203
1006	/* Checking whether input method is running. */	1204	/* Checking whether input method is running. */
1007	/* INTPROTO */
1008	Bool	1205	bool
1009	rxvt_IMisRunning(pR)	1206	rxvt_term::IMisRunning ()
1010	{	1207	{
1011	char *p;	1208	char *p;
1012	Atom atom;	1209	Atom atom;
1013	Window win;	1210	Window win;
1014	char server[IMBUFSIZ];	1211	char server[IMBUFSIZ];
1015		1212
1016	/* get current locale modifier */	1213	/* get current locale modifier */
1017	if ((p = XSetLocaleModifiers(NULL)) != NULL) {	1214	if ((p = XSetLocaleModifiers (NULL)) != NULL)
		1215	{
1018	STRCPY(server, "@server=");	1216	strcpy (server, "@server=");
1019	STRNCAT(server, &(p[4]), IMBUFSIZ - 9); /* skip "@im=" */	1217	strncat (server, & (p[4]), IMBUFSIZ - 9); /* skip "@im=" */
		1218
1020	if ((p = STRCHR(server + 1, '@')) != NULL) /* first one only */	1219	if ((p = strchr (server + 1, '@')) != NULL) /* first one only */
1021	*p = '\0';	1220	*p = '\0';
1022		1221
1023	atom = XInternAtom(R->Xdisplay, server, False);	1222	atom = XInternAtom (display->display, server, False);
1024	win = XGetSelectionOwner(R->Xdisplay, atom);	1223	win = XGetSelectionOwner (display->display, atom);
		1224
1025	if (win != None)	1225	if (win != None)
1026	return True;	1226	return True;
1027	}	1227	}
		1228
1028	return False;	1229	return False;
1029	}	1230	}
1030		1231
1031	/* EXTPROTO */
1032	void	1232	void
1033	rxvt_IMSendSpot(pR)	1233	rxvt_term::IMSendSpot ()
1034	{	1234	{
1035	XPoint spot;	1235	XPoint nspot;
1036	XVaNestedList preedit_attr;	1236	XVaNestedList preedit_attr;
1037		1237
1038	if (R->Input_Context == NULL	1238	if (!Input_Context
		1239	\|\| !TermWin.focus
1039	\|\| !R->TermWin.focus \|\| !(R->input_style & XIMPreeditPosition)	1240	\|\| !(input_style & XIMPreeditPosition))
1040	\|\| !(R->event_type == KeyPress
1041	\|\| R->event_type == Expose
1042	\|\| R->event_type == NoExpose
1043	\|\| R->event_type == SelectionNotify
1044	\|\| R->event_type == ButtonRelease \|\| R->event_type == FocusIn)
1045	\|\| !rxvt_IMisRunning(aR))
1046	return;	1241	return;
1047		1242
1048	rxvt_setPosition(aR_ & spot);	1243	im_set_position (nspot);
1049		1244
		1245	if (nspot.x == spot.x && nspot.y == spot.y)
		1246	return;
		1247
		1248	spot = nspot;
		1249
1050	preedit_attr = XVaCreateNestedList(0, XNSpotLocation, &spot, NULL);	1250	preedit_attr = XVaCreateNestedList (0, XNSpotLocation, &spot, NULL);
1051	XSetICValues(R->Input_Context, XNPreeditAttributes, preedit_attr, NULL);	1251	XSetICValues (Input_Context, XNPreeditAttributes, preedit_attr, NULL);
1052	XFree(preedit_attr);	1252	XFree (preedit_attr);
1053	}	1253	}
1054		1254
1055	/* EXTPROTO */
1056	void	1255	void
1057	rxvt_setTermFontSet(pR_ int idx)	1256	rxvt_term::im_destroy ()
1058	{	1257	{
1059	char *string;	1258	if (input_method)
1060	long length;	1259	{
1061	int success = 0;	1260	if (Input_Context && input_method->xim)
		1261	XDestroyIC (Input_Context);
1062		1262
1063	if (idx < 0 \|\| idx >= MAX_NFONTS)	1263	display->put_xim (input_method);
1064	return;	1264	input_method = 0;
1065	}	1265	}
1066		1266
1067	/* INTPROTO */
1068	void
1069	rxvt_setPreeditArea (pR_ XRectangle * preedit_rect, XRectangle * status_rect,
1070	XRectangle * needed_rect)
1071	{
1072	int mbh, vtx = 0;
1073
1074	if (scrollbar_visible(R) && !(R->Options & Opt_scrollBar_right))
1075	vtx = scrollbar_TotalWidth();
1076	mbh = menubar_visible(R) ? menuBar_TotalHeight() : 0;
1077	mbh -= R->TermWin.lineSpace;
1078
1079	preedit_rect->x = needed_rect->width + vtx;
1080	preedit_rect->y = Height2Pixel(R->TermWin.nrow - 1) + mbh;
1081
1082	preedit_rect->width = Width2Pixel(R->TermWin.ncol + 1) - needed_rect->width
1083	+ vtx;
1084	preedit_rect->height = Height2Pixel(1);
1085
1086	status_rect->x = vtx;
1087	status_rect->y = Height2Pixel(R->TermWin.nrow - 1) + mbh;
1088
1089	status_rect->width = needed_rect->width ? needed_rect->width
1090	: Width2Pixel(R->TermWin.ncol + 1);
1091	status_rect->height = Height2Pixel(1);
1092	}
1093
1094	/* ARGSUSED */
1095	/* INTPROTO */
1096	void
1097	rxvt_IMDestroyCallback(XIM xim __attribute__ ((unused)), XPointer client_data
1098	__attribute__ ((unused)), XPointer call_data
1099	__attribute__ ((unused)))
1100	{
1101	dR;
1102
1103	R->Input_Context = NULL;	1267	Input_Context = 0;
1104	/* To avoid Segmentation Fault in C locale: Solaris only? */
1105	if (STRCMP(R->locale, "C"))
1106	XRegisterIMInstantiateCallback(R->Xdisplay, NULL, NULL, NULL,
1107	rxvt_IMInstantiateCallback, NULL);
1108	}	1268	}
1109		1269
1110	/*	1270	/*
1111	* X manual pages and include files don't match on some systems:	1271	* Try to open a XIM with the current modifiers, then see if we can
1112	* some think this is an XIDProc and others an XIMProc so we can't	1272	* open a suitable preedit type
1113	* use the first argument - need to update this to be nice for
1114	* both types via some sort of configure detection
1115	*/	1273	*/
1116	/* ARGSUSED */	1274	bool
1117	/* EXTPROTO */	1275	rxvt_term::IM_get_IC (const char *modifiers)
1118	void
1119	rxvt_IMInstantiateCallback(Display * unused
1120	__attribute__ ((unused)), XPointer client_data
1121	__attribute__ ((unused)), XPointer call_data
1122	__attribute__ ((unused)))
1123	{	1276	{
1124	dR;	1277	int i, j, found;
		1278	XIM xim;
		1279	XPoint spot;
		1280	XRectangle rect, status_rect, needed_rect;
		1281	unsigned long fg, bg;
		1282	const char *p;
		1283	char **s;
		1284	XIMStyles *xim_styles;
		1285
		1286	if (! ((p = XSetLocaleModifiers (modifiers)) && *p))
		1287	return false;
		1288
		1289	D_MAIN ((stderr, "rxvt_IM_get_IC ()"));
		1290	input_method = display->get_xim (locale, modifiers);
		1291	if (input_method == NULL)
		1292	return false;
		1293
		1294	xim = input_method->xim;
		1295	spot.x = spot.y = -1;
		1296
		1297	xim_styles = NULL;
		1298	if (XGetIMValues (xim, XNQueryInputStyle, &xim_styles, NULL)
		1299	\|\| !xim_styles \|\| !xim_styles->count_styles)
		1300	{
		1301	im_destroy ();
		1302	return false;
		1303	}
		1304
		1305	const char *pet[] = { rs[Rs_preeditType], "OverTheSpot,OffTheSpot,Root,None" };
		1306
		1307	for (int pi = 0; pi < 2; pi++)
		1308	{
		1309	p = pet[pi];
		1310
		1311	if (!p)
		1312	continue;
		1313
		1314	s = rxvt_splitcommastring (p);
		1315
		1316	for (i = found = 0; !found && s[i]; i++)
		1317	{
		1318	if (!strcmp (s[i], "OverTheSpot"))
		1319	input_style = (XIMPreeditPosition \| XIMStatusNothing);
		1320	else if (!strcmp (s[i], "OffTheSpot"))
		1321	input_style = (XIMPreeditArea \| XIMStatusArea);
		1322	else if (!strcmp (s[i], "Root"))
		1323	input_style = (XIMPreeditNothing \| XIMStatusNothing);
		1324	else if (!strcmp (s[i], "None"))
		1325	input_style = (XIMPreeditNone \| XIMStatusNone);
		1326
		1327	for (j = 0; j < xim_styles->count_styles; j++)
		1328	if (input_style == xim_styles->supported_styles[j])
		1329	{
		1330	rxvt_freecommastring (s);
		1331
		1332	found = 1;
		1333	goto foundpet;
		1334	}
		1335
		1336	}
		1337
		1338	rxvt_freecommastring (s);
		1339	}
		1340
		1341	foundpet:
		1342
		1343	XFree (xim_styles);
		1344
		1345	if (!found)
		1346	{
		1347	im_destroy ();
		1348	return false;
		1349	}
		1350
		1351	XFontSet fs = 0;
		1352	XVaNestedList preedit_attr = 0, status_attr = 0;
		1353
		1354	if (input_style & (XIMPreeditPosition \| XIMPreeditArea))
		1355	{
		1356	// fake us a font-set, please
		1357	char **missing_charset_list;
		1358	int missing_charset_count;
		1359	char *def_string;
		1360	char pat[512];
		1361
		1362	sprintf (pat,
		1363	"----R---%d------*,"
		1364	"----R---%d------*,"
		1365	"----R---%d------*,"
		1366	"----R---%d------*,"
		1367	"----R---%d------*,"
		1368	"*",
		1369	TermWin.fheight,
		1370	TermWin.fheight + 1, TermWin.fheight - 1,
		1371	TermWin.fheight - 2, TermWin.fheight + 2);
		1372
		1373	fs = XCreateFontSet (display->display, pat,
		1374	&missing_charset_list, &missing_charset_count, &def_string);
		1375
		1376	if (missing_charset_list)
		1377	XFreeStringList (missing_charset_list);
		1378
		1379	if (!fs)
		1380	{
		1381	input_style &= ~(XIMPreeditPosition \| XIMPreeditArea);
		1382	rxvt_warn ("unable to create fontset for input method, try \"-pt Root\". Continuing.\n");
		1383	}
		1384	}
		1385
		1386	if (input_style & XIMPreeditPosition)
		1387	{
		1388	im_set_size (rect);
		1389	im_set_position (spot);
		1390	im_set_color (fg, bg);
		1391
		1392	preedit_attr = XVaCreateNestedList (0,
		1393	XNForeground, fg,
		1394	XNBackground, bg,
		1395	XNArea, &rect,
		1396	XNSpotLocation, &spot,
		1397	XNFontSet, fs,
		1398	NULL);
		1399	}
		1400	else if (input_style & XIMPreeditArea)
		1401	{
		1402	im_set_color (fg, bg);
		1403
		1404	/*
		1405	* The necessary width of preedit area is unknown
		1406	* until create input context.
		1407	*/
		1408	needed_rect.width = 0;
		1409	im_set_preedit_area (rect, status_rect, needed_rect);
		1410
		1411	preedit_attr = XVaCreateNestedList (0,
		1412	XNForeground, fg,
		1413	XNBackground, bg,
		1414	XNArea, &rect,
		1415	XNFontSet, fs,
		1416	NULL);
		1417	status_attr = XVaCreateNestedList (0,
		1418	XNForeground, fg,
		1419	XNBackground, bg,
		1420	XNArea, &status_rect,
		1421	XNFontSet, fs,
		1422	NULL);
		1423	}
		1424
		1425	Input_Context = XCreateIC (xim,
		1426	XNInputStyle, input_style,
		1427	XNClientWindow, TermWin.vt,
		1428	XNFocusWindow, TermWin.parent[0],
		1429	preedit_attr ? XNPreeditAttributes : NULL,
		1430	preedit_attr,
		1431	status_attr ? XNStatusAttributes : NULL,
		1432	status_attr, NULL);
		1433
		1434	if (preedit_attr) XFree (preedit_attr);
		1435	if (status_attr) XFree (status_attr);
		1436	if (fs) XFreeFontSet (display->display, fs);
		1437
		1438	if (Input_Context == NULL)
		1439	{
		1440	rxvt_warn ("failed to create input context, continuing without XIM.\n");
		1441	im_destroy ();
		1442	return false;
		1443	}
		1444
		1445	if (input_style & XIMPreeditArea)
		1446	IMSetStatusPosition ();
		1447
		1448	D_MAIN ((stderr, "rxvt_IM_get_IC () - successful connection"));
		1449	return true;
		1450	}
		1451
		1452	void
		1453	rxvt_term::im_cb ()
		1454	{
1125	int i, found, had_im;	1455	int i, found, had_im;
1126	const char *p;	1456	const char *p;
1127	char **s;	1457	char **s;
1128	char buf[IMBUFSIZ];	1458	char buf[IMBUFSIZ];
1129		1459
		1460	im_destroy ();
		1461
1130	D_MAIN((stderr, "rxvt_IMInstantiateCallback()"));	1462	D_MAIN ((stderr, "rxvt_IMInstantiateCallback ()"));
1131	if (R->Input_Context)	1463	if (Input_Context)
1132	return;	1464	return;
1133		1465
		1466	#if defined(HAVE_XSETLOCALE) \|\| defined(HAVE_SETLOCALE)
		1467	if (rs[Rs_imLocale])
		1468	SET_LOCALE (rs[Rs_imLocale]);
		1469	#endif
		1470
1134	p = R->rs[Rs_inputMethod];	1471	p = rs[Rs_inputMethod];
1135	if (p && *p)	1472	if (p && *p)
1136	{	1473	{
1137	bool found = false;	1474	bool found = false;
1138		1475
1139	s = rxvt_splitcommastring (p);	1476	s = rxvt_splitcommastring (p);
		1477
1140	for (i = 0; s[i]; i++)	1478	for (i = 0; s[i]; i++)
1141	{	1479	{
1142	if (*s[i])	1480	if (*s[i])
1143	{	1481	{
1144	STRCPY (buf, "@im=");	1482	strcpy (buf, "@im=");
1145	STRNCAT (buf, s[i], IMBUFSIZ - 5);	1483	strncat (buf, s[i], IMBUFSIZ - 5);
1146	if ((p = XSetLocaleModifiers (buf)) && *p	1484	if (IM_get_IC (buf))
1147	&& rxvt_IM_get_IC (aR))
1148	{	1485	{
1149	found = true;	1486	found = true;
1150	break;	1487	break;
1151	}	1488	}
1152	}	1489	}
1153	}	1490	}
1154	for (i = 0; s[i]; i++)	1491
1155	free(s[i]);	1492	rxvt_freecommastring (s);
1156	free(s);
1157		1493
1158	if (found)	1494	if (found)
1159	return;	1495	goto done;
1160	}	1496	}
1161		1497
1162	/* try with XMODIFIERS env. var. */	1498	/* try with XMODIFIERS env. var. */
1163	if ((p = XSetLocaleModifiers ("")) && *p	1499	if (IM_get_IC (""))
1164	&& rxvt_IM_get_IC (aR))	1500	goto done;
		1501
		1502	/* try with no modifiers base IF the user didn't specify an IM */
		1503	if (IM_get_IC ("@im=none"))
		1504	goto done;
		1505
		1506	done:
		1507	#if defined(HAVE_XSETLOCALE) \|\| defined(HAVE_SETLOCALE)
		1508	if (rs[Rs_imLocale])
		1509	SET_LOCALE (locale);
		1510	#endif
		1511	}
		1512
		1513	void
		1514	rxvt_term::IMSetStatusPosition ()
		1515	{
		1516	XRectangle preedit_rect, status_rect, *needed_rect;
		1517	XVaNestedList preedit_attr, status_attr;
		1518
		1519	if (!Input_Context
		1520	\|\| !TermWin.focus
		1521	\|\| !(input_style & XIMPreeditArea)
		1522	\|\| !IMisRunning ())
1165	return;	1523	return;
1166		1524
1167	/* try with no modifiers base IF the user didn't specify an IM */
1168	if ((p = XSetLocaleModifiers ("@im=none")) && *p
1169	&& rxvt_IM_get_IC (aR) == True)
1170	return;
1171	}
1172
1173	/*
1174	* Try to open a XIM with the current modifiers, then see if we can
1175	* open a suitable preedit type
1176	*/
1177	/* INTPROTO */
1178	Bool
1179	rxvt_IM_get_IC(pR)
1180	{
1181	int i, j, found;
1182	XIM xim;
1183	XPoint spot;
1184	XRectangle rect, status_rect, needed_rect;
1185	unsigned long fg, bg;
1186	const char *p;
1187	char **s;
1188	XIMStyles *xim_styles;
1189	XVaNestedList preedit_attr, status_attr;
1190	XIMCallback ximcallback;
1191
1192	D_MAIN((stderr, "rxvt_IM_get_IC()"));
1193	xim = XOpenIM(R->Xdisplay, NULL, NULL, NULL);
1194	if (xim == NULL)
1195	return False;
1196
1197	xim_styles = NULL;
1198	if (XGetIMValues(xim, XNQueryInputStyle, &xim_styles, NULL)
1199	\|\| !xim_styles \|\| !xim_styles->count_styles) {
1200	XCloseIM(xim);
1201	return False;
1202	}
1203
1204	p = R->rs[Rs_preeditType] ? R->rs[Rs_preeditType]
1205	: "OverTheSpot,OffTheSpot,Root";
1206	s = rxvt_splitcommastring(p);
1207	for (i = found = 0; !found && s[i]; i++) {
1208	if (!STRCMP(s[i], "OverTheSpot"))
1209	R->input_style = (XIMPreeditPosition \| XIMStatusNothing);
1210	else if (!STRCMP(s[i], "OffTheSpot"))
1211	R->input_style = (XIMPreeditArea \| XIMStatusArea);
1212	else if (!STRCMP(s[i], "Root"))
1213	R->input_style = (XIMPreeditNothing \| XIMStatusNothing);
1214
1215	for (j = 0; j < xim_styles->count_styles; j++)
1216	if (R->input_style == xim_styles->supported_styles[j]) {
1217	found = 1;
1218	break;
1219	}
1220	}
1221	for (i = 0; s[i]; i++)
1222	free(s[i]);
1223	free(s);
1224	XFree(xim_styles);
1225
1226	if (!found) {
1227	XCloseIM(xim);
1228	return False;
1229	}
1230
1231	ximcallback.callback = rxvt_IMDestroyCallback;
1232
1233	/* XXX: not sure why we need this (as well as IC one below) */
1234	XSetIMValues(xim, XNDestroyCallback, &ximcallback, NULL);
1235
1236	preedit_attr = status_attr = NULL;
1237
1238	if (R->input_style & XIMPreeditPosition) {
1239	rxvt_setSize(aR_ & rect);
1240	rxvt_setPosition(aR_ & spot);
1241	rxvt_setColor(aR_ & fg, &bg);
1242
1243	preedit_attr = XVaCreateNestedList(0, XNArea, &rect,
1244	XNSpotLocation, &spot,
1245	XNForeground, fg, XNBackground, bg,
1246	//XNFontSet, R->TermWin.fontset,
1247	NULL);
1248	} else if (R->input_style & XIMPreeditArea) {
1249	rxvt_setColor(aR_ & fg, &bg);
1250
1251	/*
1252	* The necessary width of preedit area is unknown
1253	* until create input context.
1254	*/
1255	needed_rect.width = 0;
1256
1257	rxvt_setPreeditArea(aR_ & rect, &status_rect, &needed_rect);
1258
1259	preedit_attr = XVaCreateNestedList(0, XNArea, &rect,
1260	XNForeground, fg, XNBackground, bg,
1261	//XNFontSet, R->TermWin.fontset,
1262	NULL);
1263	status_attr = XVaCreateNestedList(0, XNArea, &status_rect,
1264	XNForeground, fg, XNBackground, bg,
1265	//XNFontSet, R->TermWin.fontset,
1266	NULL);
1267	}
1268	R->Input_Context = XCreateIC(xim, XNInputStyle, R->input_style,
1269	XNClientWindow, R->TermWin.parent[0],
1270	XNFocusWindow, R->TermWin.parent[0],
1271	XNDestroyCallback, &ximcallback,
1272	preedit_attr ? XNPreeditAttributes : NULL,
1273	preedit_attr,
1274	status_attr ? XNStatusAttributes : NULL,
1275	status_attr, NULL);
1276	if (preedit_attr)
1277	XFree(preedit_attr);
1278	if (status_attr)
1279	XFree(status_attr);
1280	if (R->Input_Context == NULL) {
1281	rxvt_print_error("failed to create input context");
1282	XCloseIM(xim);
1283	return False;
1284	}
1285	if (R->input_style & XIMPreeditArea)
1286	rxvt_IMSetStatusPosition(aR);
1287	D_MAIN((stderr, "rxvt_IM_get_IC() - successful connection"));
1288	return True;
1289	}
1290
1291	/* EXTPROTO */
1292	void
1293	rxvt_IMSetStatusPosition(pR)
1294	{
1295	XRectangle preedit_rect, status_rect, *needed_rect;
1296	XVaNestedList preedit_attr, status_attr;
1297
1298	if (R->Input_Context == NULL
1299	\|\| !R->TermWin.focus \|\| !(R->input_style & XIMPreeditArea)
1300	\|\| !rxvt_IMisRunning(aR))
1301	return;
1302
1303	/* Getting the necessary width of preedit area */	1525	/* Getting the necessary width of preedit area */
1304	status_attr = XVaCreateNestedList(0, XNAreaNeeded, &needed_rect, NULL);	1526	status_attr = XVaCreateNestedList (0, XNAreaNeeded, &needed_rect, NULL);
1305	XGetICValues(R->Input_Context, XNStatusAttributes, status_attr, NULL);	1527	XGetICValues (Input_Context, XNStatusAttributes, status_attr, NULL);
1306	XFree(status_attr);	1528	XFree (status_attr);
1307		1529
1308	rxvt_setPreeditArea(aR_ & preedit_rect, &status_rect, needed_rect);	1530	im_set_preedit_area (preedit_rect, status_rect, *needed_rect);
		1531	XFree (needed_rect);
1309		1532
1310	preedit_attr = XVaCreateNestedList(0, XNArea, &preedit_rect, NULL);	1533	preedit_attr = XVaCreateNestedList (0, XNArea, &preedit_rect, NULL);
1311	status_attr = XVaCreateNestedList(0, XNArea, &status_rect, NULL);	1534	status_attr = XVaCreateNestedList (0, XNArea, &status_rect, NULL);
1312		1535
1313	XSetICValues(R->Input_Context,	1536	XSetICValues (Input_Context,
1314	XNPreeditAttributes, preedit_attr,	1537	XNPreeditAttributes, preedit_attr,
1315	XNStatusAttributes, status_attr, NULL);	1538	XNStatusAttributes, status_attr, NULL);
1316		1539
1317	XFree(preedit_attr);	1540	XFree (preedit_attr);
1318	XFree(status_attr);	1541	XFree (status_attr);
1319	}	1542	}
1320	#endif /* USE_XIM */	1543	#endif /* USE_XIM */
1321		1544
1322	/----------------------------------------------------------------------/	1545	/----------------------------------------------------------------------/
1323	rxvt_t rxvt_current_term;	1546	rxvt_t rxvt_current_term;

Diff Legend

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

Comparing rxvt-unicode/src/main.C (file contents): Revision 1.12 by pcg, Tue Dec 16 23:04:13 2003 UTC vs. Revision 1.120 by root, Mon Dec 13 19:16:36 2004 UTC

Diff Legend

Comparing rxvt-unicode/src/main.C (file contents):
Revision 1.12 by pcg, Tue Dec 16 23:04:13 2003 UTC vs.
Revision 1.120 by root, Mon Dec 13 19:16:36 2004 UTC