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

Comparing rxvt-unicode/src/xdefaults.C (file contents):
Revision 1.102 by sasha, Fri Jun 8 20:04:12 2007 UTC vs.
Revision 1.200 by root, Fri Dec 23 21:46:46 2022 UTC

…		…
4	*	4	*
5	* All portions of code are copyright by their respective author/s.	5	* All portions of code are copyright by their respective author/s.
6	* Copyright (c) 1994 Robert Nation <nation@rocket.sanders.lockheed.com>	6	* Copyright (c) 1994 Robert Nation <nation@rocket.sanders.lockheed.com>
7	* - original version	7	* - original version
8	* Copyright (c) 1997,1998 mj olesen <olesen@me.queensu.ca>	8	* Copyright (c) 1997,1998 mj olesen <olesen@me.queensu.ca>
9	* Copyright (c) 2003-2006 Marc Lehmann <pcg@goof.com>	9	* Copyright (c) 2003-2006 Marc Lehmann <schmorp@schmorp.de>
		10	* Copyright (c) 2007,2015 Emanuele Giaquinta <e.giaquinta@glauco.it>
10	*	11	*
11	* This program is free software; you can redistribute it and/or modify	12	* This program is free software; you can redistribute it and/or modify
12	* it under the terms of the GNU General Public License as published by	13	* it under the terms of the GNU General Public License as published by
13	* the Free Software Foundation; either version 2 of the License, or	14	* the Free Software Foundation; either version 3 of the License, or
14	* (at your option) any later version.	15	* (at your option) any later version.
15	*	16	*
16	* This program is distributed in the hope that it will be useful,	17	* This program is distributed in the hope that it will be useful,
17	* but WITHOUT ANY WARRANTY; without even the implied warranty of	18	* but WITHOUT ANY WARRANTY; without even the implied warranty of
18	* MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the	19	* MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
…		…
32	#endif	33	#endif
33		34
34	/* place holders used for parsing command-line options */	35	/* place holders used for parsing command-line options */
35	#define Optflag_Reverse 1	36	#define Optflag_Reverse 1
36	#define Optflag_Boolean 2	37	#define Optflag_Boolean 2
		38	#define Optflag_Switch 4
		39	#define Optflag_Info 8
37		40
38	/* monolithic option/resource structure: */	41	/* monolithic option/resource structure: */
39	/*	42	/*
40	* `string' options MUST have a usage argument	43	* `string' options MUST have a usage argument
41	* `switch' and `boolean' options have no argument	44	* `switch' and `boolean' options have no argument
42	* if there's no desc (ription), it won't appear in rxvt_usage ()	45	* if there's no desc (ription), it won't appear in rxvt_usage ()
43	*/	46	*/
44		47
45	/* INFO () - descriptive information only */	48	/* INFO () - descriptive information only */
46	#define INFO(opt, arg, desc) \	49	#define INFO(opt, arg, desc) \
47	{0, 0, -1, NULL, (opt), (arg), (desc)}	50	{0, Optflag_Info, -1, NULL, (opt), (arg), (desc)}
		51
		52	#define RINFO(kw, arg) \
		53	{0, Optflag_Info, -1, (kw), NULL, (arg), NULL}
48		54
49	/* STRG () - command-line option, with/without resource */	55	/* STRG () - command-line option, with/without resource */
50	#define STRG(rsp, kw, opt, arg, desc) \	56	#define STRG(rsp, kw, opt, arg, desc) \
51	{0, 0, (rsp), (kw), (opt), (arg), (desc)}	57	{0, 0, (rsp), (kw), (opt), (arg), (desc)}
52		58
…		…
58	#define BOOL(rsp, kw, opt, option, flag, desc) \	64	#define BOOL(rsp, kw, opt, option, flag, desc) \
59	{ (option), (Optflag_Boolean \| (flag)), (rsp), (kw), (opt), NULL, (desc)}	65	{ (option), (Optflag_Boolean \| (flag)), (rsp), (kw), (opt), NULL, (desc)}
60		66
61	/* SWCH () - `-' flag */	67	/* SWCH () - `-' flag */
62	#define SWCH(opt, option, flag, desc) \	68	#define SWCH(opt, option, flag, desc) \
63	{ (option), (flag), -1, NULL, (opt), NULL, (desc)}	69	{ (option), (Optflag_Switch \| (flag)), -1, NULL, (opt), NULL, (desc)}
64		70
65	/* convenient macros */	71	/* convenient macros */
66	#define optList_strlen(i) \	72	#define optList_isString(i) \
67	(optList[i].flag ? 0 : (optList[i].arg ? strlen (optList[i].arg) : 1))	73	(optList[i].flag == 0)
68	#define optList_isBool(i) \	74	#define optList_isBool(i) \
69	(optList[i].flag & Optflag_Boolean)	75	(optList[i].flag & Optflag_Boolean)
70	#define optList_isReverse(i) \	76	#define optList_isReverse(i) \
71	(optList[i].flag & Optflag_Reverse)	77	(optList[i].flag & Optflag_Reverse)
72	#define optList_size \	78	#define optList_isInfo(i) \
73	(sizeof (optList) / sizeof (optList[0]))	79	(optList[i].flag & Optflag_Info)
74		80
75	static const struct	81	static const struct
76	{	82	{
77	const uint8_t index; /* Option index */	83	const uint8_t index; /* Option index */
78	const uint8_t flag; /* Option flag */	84	const uint8_t flag; /* Option flag */
…		…
89	STRG (Rs_geometry, NULL, "g", NULL, NULL), /* short form */	95	STRG (Rs_geometry, NULL, "g", NULL, NULL), /* short form */
90	STRG (Rs_geometry, "geometry", "geometry", "geometry", "size (in characters) and position"),	96	STRG (Rs_geometry, "geometry", "geometry", "geometry", "size (in characters) and position"),
91	SWCH ("C", Opt_console, 0, "intercept console messages"),	97	SWCH ("C", Opt_console, 0, "intercept console messages"),
92	SWCH ("iconic", Opt_iconic, 0, "start iconic"),	98	SWCH ("iconic", Opt_iconic, 0, "start iconic"),
93	SWCH ("ic", Opt_iconic, 0, NULL), /* short form */	99	SWCH ("ic", Opt_iconic, 0, NULL), /* short form */
		100	STRG (Rs_chdir, "chdir", "cd", "string", "start shell in this directory"),
		101	SWCH ("dockapp", Opt_dockapp, 0, "start as dockapp"),
94	BOOL (Rs_reverseVideo, "reverseVideo", "rv", Opt_reverseVideo, 0, "reverse video"),	102	BOOL (Rs_reverseVideo, "reverseVideo", "rv", Opt_reverseVideo, 0, "reverse video"),
95	BOOL (Rs_loginShell, "loginShell", "ls", Opt_loginShell, 0, "login shell"),	103	BOOL (Rs_loginShell, "loginShell", "ls", Opt_loginShell, 0, "login shell"),
		104	STRG (Rs_multiClickTime, "multiClickTime", "mc", "number", "maximum time (in ms) between multi-click selections"),
96	BOOL (Rs_jumpScroll, "jumpScroll", "j", Opt_jumpScroll, 0, "jump scrolling"),	105	BOOL (Rs_jumpScroll, "jumpScroll", "j", Opt_jumpScroll, 0, "jump scrolling"),
		106	BOOL (Rs_skipScroll, "skipScroll", "ss", Opt_skipScroll, 0, "skip scrolling"),
97	BOOL (Rs_pastableTabs, "pastableTabs", "ptab", Opt_pastableTabs, 0, "tab characters are pastable"),	107	BOOL (Rs_pastableTabs, "pastableTabs", "ptab", Opt_pastableTabs, 0, "tab characters are pastable"),
98	#if HAVE_SCROLLBARS
99	RSTRG (Rs_scrollstyle, "scrollstyle", "mode"),	108	RSTRG (Rs_scrollstyle, "scrollstyle", "mode"),
100	BOOL (Rs_scrollBar, "scrollBar", "sb", Opt_scrollBar, 0, "scrollbar"),	109	BOOL (Rs_scrollBar, "scrollBar", "sb", Opt_scrollBar, 0, "scrollbar"),
101	BOOL (Rs_scrollBar_right, "scrollBar_right", "sr", Opt_scrollBar_right, 0, "scrollbar right"),	110	BOOL (Rs_scrollBar_right, "scrollBar_right", "sr", Opt_scrollBar_right, 0, "scrollbar right"),
102	BOOL (Rs_scrollBar_floating, "scrollBar_floating", "st", Opt_scrollBar_floating, 0, "scrollbar without a trough"),	111	BOOL (Rs_scrollBar_floating, "scrollBar_floating", "st", Opt_scrollBar_floating, 0, "scrollbar without a trough"),
103	RSTRG (Rs_scrollBar_align, "scrollBar_align", "mode"),	112	RSTRG (Rs_scrollBar_align, "scrollBar_align", "mode"),
104	STRG (Rs_scrollBar_thickness, "thickness", "sbt", "number", "scrollbar thickness/width in pixels"),	113	STRG (Rs_scrollBar_thickness, "thickness", "sbt", "number", "scrollbar thickness/width in pixels"),
105	#endif
106	BOOL (Rs_scrollTtyOutput, "scrollTtyOutput", NULL, Opt_scrollTtyOutput, 0, NULL),	114	BOOL (Rs_scrollTtyOutput, "scrollTtyOutput", NULL, Opt_scrollTtyOutput, 0, NULL),
107	BOOL (Rs_scrollTtyOutput, NULL, "si", Opt_scrollTtyOutput, Optflag_Reverse, "scroll-on-tty-output inhibit"),	115	BOOL (Rs_scrollTtyOutput, NULL, "si", Opt_scrollTtyOutput, Optflag_Reverse, "scroll-on-tty-output inhibit"),
108	BOOL (Rs_scrollTtyKeypress, "scrollTtyKeypress", "sk", Opt_scrollTtyKeypress, 0, "scroll-on-keypress"),	116	BOOL (Rs_scrollTtyKeypress, "scrollTtyKeypress", "sk", Opt_scrollTtyKeypress, 0, "scroll-on-keypress"),
109	BOOL (Rs_scrollWithBuffer, "scrollWithBuffer", "sw", Opt_scrollWithBuffer, 0, "scroll-with-buffer"),	117	BOOL (Rs_scrollWithBuffer, "scrollWithBuffer", "sw", Opt_scrollWithBuffer, 0, "scroll-with-buffer"),
110	#if TRANSPARENT
111	BOOL (Rs_transparent, "inheritPixmap", "ip", Opt_transparent, 0, "inherit parent pixmap"),
112	SWCH ("tr", Opt_transparent, 0, NULL),
113	# if TINTING
114	STRG (Rs_color + Color_tint, "tintColor", "tint", "color", "tint color"),
115	# endif
116	#endif
117	#if OFF_FOCUS_FADING	118	#if OFF_FOCUS_FADING
118	STRG (Rs_fade, "fading", "fade", "%", "fade colors x% percent when rxvt-unicode is losing focus"),	119	STRG (Rs_fade, "fading", "fade", "number", "fade colors by number % when losing focus"),
119	STRG (Rs_color + Color_fade, "fadeColor", "fadecolor", "color", "target color for off-focus fading"),	120	STRG (Rs_color + Color_fade, "fadeColor", "fadecolor", "color", "target color for off-focus fading"),
120	#endif
121	#if TINTING
122	STRG (Rs_shade, "shading", "sh", "%", "shade background by x % when tinting."),
123	#endif	121	#endif
124	BOOL (Rs_utmpInhibit, "utmpInhibit", "ut", Opt_utmpInhibit, 0, "utmp inhibit"),	122	BOOL (Rs_utmpInhibit, "utmpInhibit", "ut", Opt_utmpInhibit, 0, "utmp inhibit"),
125	#ifndef NO_BELL	123	#ifndef NO_BELL
126	# if ENABLE_FRILLS	124	# if ENABLE_FRILLS
127	BOOL (Rs_urgentOnBell, "urgentOnBell", NULL, Opt_urgentOnBell, 0, NULL),	125	BOOL (Rs_urgentOnBell, "urgentOnBell", NULL, Opt_urgentOnBell, 0, NULL),
…		…
136	#endif	134	#endif
137	#ifdef MOUSE_WHEEL	135	#ifdef MOUSE_WHEEL
138	BOOL (Rs_mouseWheelScrollPage, "mouseWheelScrollPage", NULL, Opt_mouseWheelScrollPage, 0, NULL),	136	BOOL (Rs_mouseWheelScrollPage, "mouseWheelScrollPage", NULL, Opt_mouseWheelScrollPage, 0, NULL),
139	#endif	137	#endif
140	#if ENABLE_FRILLS	138	#if ENABLE_FRILLS
		139	BOOL (Rs_disablePasteBrackets, "disablePasteBrackets", "dpb", Opt_disablePasteBrackets, 0, "paste bracket suppression"),
141	BOOL (Rs_tripleclickwords, "tripleclickwords", "tcw", Opt_tripleclickwords, 0, "triple click word selection"),	140	BOOL (Rs_tripleclickwords, "tripleclickwords", "tcw", Opt_tripleclickwords, 0, "triple click word selection"),
142	BOOL (Rs_insecure, "insecure", "insecure", Opt_insecure, 0, "enable possibly insecure escape sequences"),	141	BOOL (Rs_insecure, "insecure", "insecure", Opt_insecure, 0, "enable possibly insecure escape sequences"),
143	BOOL (Rs_cursorUnderline, "cursorUnderline", "uc", Opt_cursorUnderline, 0, "underline cursor"),	142	BOOL (Rs_cursorUnderline, "cursorUnderline", "uc", Opt_cursorUnderline, 0, "underline cursor"),
144	#endif	143	#endif
145	#if CURSOR_BLINK	144	#if CURSOR_BLINK
…		…
169	#ifndef NO_BOLD_UNDERLINE_REVERSE	168	#ifndef NO_BOLD_UNDERLINE_REVERSE
170	RSTRG (Rs_color + Color_BD, "colorBD", "color"),	169	RSTRG (Rs_color + Color_BD, "colorBD", "color"),
171	RSTRG (Rs_color + Color_IT, "colorIT", "color"),	170	RSTRG (Rs_color + Color_IT, "colorIT", "color"),
172	RSTRG (Rs_color + Color_UL, "colorUL", "color"),	171	RSTRG (Rs_color + Color_UL, "colorUL", "color"),
173	RSTRG (Rs_color + Color_RV, "colorRV", "color"),	172	RSTRG (Rs_color + Color_RV, "colorRV", "color"),
174	#endif /* ! NO_BOLD_UNDERLINE_REVERSE */	173	#endif /* ! NO_BOLD_UNDERLINE_REVERSE */
175	#if ENABLE_FRILLS	174	#if ENABLE_FRILLS
176	RSTRG (Rs_color + Color_underline, "underlineColor", "color"),	175	RSTRG (Rs_color + Color_underline, "underlineColor", "color"),
177	#endif	176	#endif
178	#ifdef KEEP_SCROLLCOLOR
179	RSTRG (Rs_color + Color_scroll, "scrollColor", "color"),	177	RSTRG (Rs_color + Color_scroll, "scrollColor", "color"),
		178	#ifdef RXVT_SCROLLBAR
180	RSTRG (Rs_color + Color_trough, "troughColor", "color"),	179	RSTRG (Rs_color + Color_trough, "troughColor", "color"),
181	#endif /* KEEP_SCROLLCOLOR */	180	#endif
182	#ifdef OPTION_HC	181	#ifdef OPTION_HC
183	STRG (Rs_color + Color_HC, "highlightColor", "hc", "color", "highlight color"),	182	STRG (Rs_color + Color_HC, "highlightColor", "hc", "color", "highlight color"),
		183	RSTRG (Rs_color + Color_HTC, "highlightTextColor", "color"),
184	#endif	184	#endif
185	#ifndef NO_CURSORCOLOR	185	#ifndef NO_CURSORCOLOR
186	STRG (Rs_color + Color_cursor, "cursorColor", "cr", "color", "cursor color"),	186	STRG (Rs_color + Color_cursor, "cursorColor", "cr", "color", "cursor color"),
187	/* command-line option = resource name */	187	/* command-line option = resource name */
188	RSTRG (Rs_color + Color_cursor2, "cursorColor2", "color"),	188	RSTRG (Rs_color + Color_cursor2, "cursorColor2", "color"),
189	#endif /* NO_CURSORCOLOR */	189	#endif /* NO_CURSORCOLOR */
190	STRG (Rs_color + Color_pointer_fg, "pointerColor", "pr", "color", "pointer color"),	190	STRG (Rs_color + Color_pointer_fg, "pointerColor", "pr", "color", "pointer color"),
191	STRG (Rs_color + Color_pointer_bg, "pointerColor2", "pr2", "color", "pointer bg color"),	191	STRG (Rs_color + Color_pointer_bg, "pointerColor2", "pr2", "color", "pointer bg color"),
192	STRG (Rs_color + Color_border, "borderColor", "bd", "color", "border color"),	192	STRG (Rs_color + Color_border, "borderColor", "bd", "color", "border color"),
193	#ifdef XPM_BACKGROUND	193	#if ENABLE_EWMH
194	RSTRG (Rs_path, "path", "search path"),	194	STRG (Rs_iconfile, "iconFile", "icon", "file", "path to application icon image"),
195	STRG (Rs_backgroundPixmap, "backgroundPixmap", "pixmap", "file[;geom]", "background pixmap"),	195	#endif
		196	#ifdef HAVE_XMU
		197	RSTRG (Rs_pointerShape, "pointerShape", "string"),
196	#endif	198	#endif
197	/* fonts: command-line option = resource name */	199	/* fonts: command-line option = resource name */
198	STRG (Rs_font, "font", "fn", "fontname", "normal text font"),	200	STRG (Rs_font, "font", "fn", "fontname", "normal text font"),
199	#if ENABLE_STYLES	201	#if ENABLE_STYLES
200	STRG (Rs_boldFont, "boldFont", "fb", "fontname", "bold font"),	202	STRG (Rs_boldFont, "boldFont", "fb", "fontname", "bold font"),
201	STRG (Rs_italicFont, "italicFont", "fi", "fontname", "italic font"),	203	STRG (Rs_italicFont, "italicFont", "fi", "fontname", "italic font"),
202	STRG (Rs_boldItalicFont, "boldItalicFont", "fbi", "fontname", "bold italic font"),	204	STRG (Rs_boldItalicFont, "boldItalicFont", "fbi", "fontname", "bold italic font"),
203	BOOL (Rs_intensityStyles, "intensityStyles", "is", Opt_intensityStyles, 0, "font styles imply intensity changes"),	205	BOOL (Rs_intensityStyles, "intensityStyles", "is", Opt_intensityStyles, 0, "font styles imply intensity changes"),
204	#endif	206	#endif
205	#ifdef USE_XIM	207	#if USE_XIM
206	STRG (Rs_inputMethod, "inputMethod", "im", "name", "name of input method"),	208	STRG (Rs_inputMethod, "inputMethod", "im", "name", "name of input method"),
207	STRG (Rs_preeditType, "preeditType", "pt", "style", "input style: style = OverTheSpot\|OffTheSpot\|Root"),	209	STRG (Rs_preeditType, "preeditType", "pt", "style", "input style: style = OverTheSpot\|OffTheSpot\|Root"),
208	STRG (Rs_imLocale, "imLocale", "imlocale", "string", "locale to use for input method"),	210	STRG (Rs_imLocale, "imLocale", "imlocale", "string", "locale to use for input method"),
209	STRG (Rs_imFont, "imFont", "imfont", "fontname", "fontset for styles OverTheSpot and OffTheSpot"),	211	STRG (Rs_imFont, "imFont", "imfont", "fontname", "fontset for styles OverTheSpot and OffTheSpot"),
210	#endif /* USE_XIM */	212	#endif /* USE_XIM */
211	STRG (Rs_name, NULL, "name", "string", "client instance, icon, and title strings"),	213	STRG (Rs_name, NULL, "name", "string", "client instance, icon, and title strings"),
212	STRG (Rs_title, "title", "title", "string", "title name for window"),	214	STRG (Rs_title, "title", "title", "string", "title name for window"),
213	STRG (Rs_title, NULL, "T", NULL, NULL), /* short form */	215	STRG (Rs_title, NULL, "T", NULL, NULL), /* short form */
214	STRG (Rs_iconName, "iconName", "n", "string", "icon name for window"),	216	STRG (Rs_iconName, "iconName", "n", "string", "icon name for window"),
215	STRG (Rs_saveLines, "saveLines", "sl", "number", "number of scrolled lines to save"),	217	STRG (Rs_saveLines, "saveLines", "sl", "number", "number of scrolled lines to save"),
216	#if ENABLE_XEMBED	218	#if ENABLE_XEMBED
217	STRG (Rs_embed, NULL, "embed", "windowid", "window id to embed terminal in"),	219	STRG (Rs_embed, NULL, "embed", "windowid", "window id to embed terminal in"),
218	#endif	220	#endif
219	#if XFT	221	#if XFT
		222	BOOL (Rs_buffered, "buffered", NULL, Opt_buffered, 0, NULL),
		223	#endif
		224	#if ENABLE_FRILLS
		225	STRG (Rs_refreshRate, "refreshRate", "fps", "number", "refresh rate / frames per second"),
220	STRG (Rs_depth, "depth", "depth", "number", "depth of visual to request"),	226	STRG (Rs_depth, "depth", "depth", "number", "depth of visual to request"),
221	#endif	227	STRG (Rs_visual, "visual", "visual", "number", "visual id to request"),
222	#if ENABLE_FRILLS
223	RSTRG (Rs_transient_for, "transient-for", "windowid"),	228	RSTRG (Rs_transient_for, "transient-for", "windowid"),
224	BOOL (Rs_override_redirect, "override-redirect", "override-redirect", Opt_override_redirect, 0, "set override-redirect on the terminal window"),	229	BOOL (Rs_override_redirect, "override-redirect", "override-redirect", Opt_override_redirect, 0, "override-redirect on the terminal window"),
225	STRG (Rs_pty_fd, NULL, "pty-fd", "fileno", "file descriptor of pty to use"),	230	STRG (Rs_pty_fd, NULL, "pty-fd", "fileno", "file descriptor of pty to use"),
226	BOOL (Rs_hold, "hold", "hold", Opt_hold, 0, "retain window after shell exit"),	231	BOOL (Rs_hold, "hold", "hold", Opt_hold, 0, "retain window after shell exit"),
227	STRG (Rs_ext_bwidth, "externalBorder", "w", "number", "external border in pixels"),	232	STRG (Rs_ext_bwidth, "externalBorder", "w", "number", "external border in pixels"),
228	STRG (Rs_ext_bwidth, NULL, "bw", NULL, NULL),	233	STRG (Rs_ext_bwidth, NULL, "bw", NULL, NULL),
229	STRG (Rs_ext_bwidth, NULL, "borderwidth", NULL, NULL),	234	STRG (Rs_ext_bwidth, NULL, "borderwidth", NULL, NULL),
230	STRG (Rs_int_bwidth, "internalBorder", "b", "number", "internal border in pixels"),	235	STRG (Rs_int_bwidth, "internalBorder", "b", "number", "internal border in pixels"),
231	BOOL (Rs_borderLess, "borderLess", "bl", Opt_borderLess, 0, "borderless window"),	236	BOOL (Rs_borderLess, "borderLess", "bl", Opt_borderLess, 0, "borderless window"),
232	BOOL (Rs_skipBuiltinGlyphs, "skipBuiltinGlyphs", "sbg", Opt_skipBuiltinGlyphs, 0, "do not use internal glyphs"),
233	STRG (Rs_lineSpace, "lineSpace", "lsp", "number", "number of extra pixels between rows"),	237	STRG (Rs_lineSpace, "lineSpace", "lsp", "number", "number of extra pixels between rows"),
		238	STRG (Rs_letterSpace, "letterSpace", "letsp", "number", "letter spacing adjustment"),
		239	#endif
		240	#ifdef BUILTIN_GLYPHS
		241	BOOL (Rs_skipBuiltinGlyphs, "skipBuiltinGlyphs", "sbg", Opt_skipBuiltinGlyphs, 0, "use of font glyphs instead of internal glyphs"),
234	#endif	242	#endif
235	#ifdef POINTER_BLANK	243	#ifdef POINTER_BLANK
236	RSTRG (Rs_pointerBlankDelay, "pointerBlankDelay", "number"),	244	RSTRG (Rs_pointerBlankDelay, "pointerBlankDelay", "number"),
237	#endif	245	#endif
238	#ifndef NO_BACKSPACE_KEY	246	#ifndef NO_BACKSPACE_KEY
239	RSTRG (Rs_backspace_key, "backspacekey", "string"),	247	RSTRG (Rs_backspace_key, "backspacekey", "string"),
240	#endif	248	#endif
241	#ifndef NO_DELETE_KEY	249	#ifndef NO_DELETE_KEY
242	RSTRG (Rs_delete_key, "deletekey", "string"),	250	RSTRG (Rs_delete_key, "deletekey", "string"),
243	#endif	251	#endif
244	RSTRG (Rs_selectstyle, "selectstyle", "mode"),
245	#ifdef PRINTPIPE	252	#ifdef PRINTPIPE
246	RSTRG (Rs_print_pipe, "print-pipe", "string"),	253	RSTRG (Rs_print_pipe, "print-pipe", "string"),
247	#endif	254	#endif
248	STRG (Rs_modifier, "modifier", "mod", "modifier", "meta modifier = alt\|meta\|hyper\|super\|mod1\|...\|mod5"),	255	STRG (Rs_modifier, "modifier", "mod", "modifier", "meta modifier = alt\|meta\|hyper\|super\|mod1\|...\|mod5"),
249	#ifdef CUTCHAR_RESOURCE
250	RSTRG (Rs_cutchars, "cutchars", "string"),	256	RSTRG (Rs_cutchars, "cutchars", "string"),
251	#endif /* CUTCHAR_RESOURCE */
252	RSTRG (Rs_answerbackstring, "answerbackString", "string"),	257	RSTRG (Rs_answerbackstring, "answerbackString", "string"),
253	#ifndef NO_SECONDARY_SCREEN	258	#ifndef NO_SECONDARY_SCREEN
254	BOOL (Rs_secondaryScreen, "secondaryScreen", "ssc", Opt_secondaryScreen, 0, "enable secondary screen"),	259	BOOL (Rs_secondaryScreen, "secondaryScreen", "ssc", Opt_secondaryScreen, 0, "secondary screen"),
255	BOOL (Rs_secondaryScroll, "secondaryScroll", "ssr", Opt_secondaryScroll, 0, "enable secondary screen scroll"),	260	BOOL (Rs_secondaryScroll, "secondaryScroll", "ssr", Opt_secondaryScroll, 0, "secondary screen scroll"),
		261	#endif
		262	#if ENABLE_FRILLS
		263	STRG (Rs_rewrapMode, "rewrapMode", "rm", "string", "rewrap mode (auto, always, never)"),
256	#endif	264	#endif
257	#if ENABLE_PERL	265	#if ENABLE_PERL
258	RSTRG (Rs_perl_lib, "perl-lib", "string"), //, "colon-separated directories with extension scripts"),TODO	266	RSTRG (Rs_perl_lib, "perl-lib", "string"), //, "colon-separated directories with extension scripts"),TODO
259	RSTRG (Rs_perl_eval, "perl-eval", "perl-eval"), // "string", "code to be evaluated after all extensions have been loaded"),TODO	267	RSTRG (Rs_perl_eval, "perl-eval", "perl-eval"), // "string", "code to be evaluated after all extensions have been loaded"),TODO
260	RSTRG (Rs_perl_ext_1, "perl-ext-common", "string"), //, "colon-separated list of perl extensions to enable"),TODO	268	RSTRG (Rs_perl_ext_1, "perl-ext-common", "string"), //, "colon-separated list of perl extensions to enable"),TODO
261	STRG (Rs_perl_ext_2, "perl-ext", "pe", "string", "colon-separated list of perl extensions to enable for this instance"),	269	STRG (Rs_perl_ext_2, "perl-ext", "pe", "string", "colon-separated list of perl extensions to enable for this instance"),
262	#endif	270	#endif
263		271	#if ISO_14755
264	#ifdef HAVE_AFTERIMAGE	272	BOOL (Rs_iso14755, "iso14755", NULL, Opt_iso14755, 0, NULL),
265	STRG (Rs_blendtype, "blendType", "blt", "string", "background image blending type - alpha, tint, etc..."),	273	BOOL (Rs_iso14755_52, "iso14755_52", NULL, Opt_iso14755_52, 0, NULL),
266	STRG (Rs_blurradius, "blurRadius", "blr", "number", "Gaussian Blur radius to apply to the root background"),
267	#endif	274	#endif
268	#ifndef NO_RESOURCES	275	#ifndef NO_RESOURCES
269	INFO ("xrm", "string", "X resource"),	276	RINFO ("xrm", "string"),
		277	#endif
		278	#ifdef KEYSYM_RESOURCE
		279	RINFO ("keysym.sym", "keysym"),
270	#endif	280	#endif
271	INFO ("e", "command arg ...", "command to execute")	281	INFO ("e", "command arg ...", "command to execute")
272	};	282	};
273		283
274	#undef INFO	284	#undef INFO
		285	#undef RINFO
275	#undef STRG	286	#undef STRG
276	#undef RSTRG	287	#undef RSTRG
277	#undef SWCH	288	#undef SWCH
278	#undef BOOL	289	#undef BOOL
279		290
…		…
318	#endif	329	#endif
319	","	330	","
320	#if OFF_FOCUS_FADING	331	#if OFF_FOCUS_FADING
321	"fade,"	332	"fade,"
322	#endif	333	#endif
323	#if defined(XPM_BACKGROUND)
324	"XPM,"
325	#endif
326	#if defined(TRANSPARENT)	334	#if defined(ENABLE_TRANSPARENCY)
327	"transparent,"	335	"transparent,"
328	#endif
329	#if TINTING
330	"tint,"	336	"tint,"
		337	#endif
		338	#if HAVE_PIXBUF
		339	"pixbuf,"
331	#endif	340	#endif
332	#if defined(USE_XIM)	341	#if defined(USE_XIM)
333	"XIM,"	342	"XIM,"
334	#endif	343	#endif
335	#if defined(NO_BACKSPACE_KEY)	344	#if defined(NO_BACKSPACE_KEY)
…		…
363	"pointerBlank,"	372	"pointerBlank,"
364	#endif	373	#endif
365	#if defined(NO_RESOURCES)	374	#if defined(NO_RESOURCES)
366	"NoResources,"	375	"NoResources,"
367	#endif	376	#endif
368	"scrollbars="	377	"scrollbars=plain"
369	#if !defined(HAVE_SCROLLBARS)
370	"NONE"
371	#else
372	# if defined(PLAIN_SCROLLBAR)
373	"plain"
374	# if defined(RXVT_SCROLLBAR) \|\| defined(NEXT_SCROLLBAR) \|\| defined(XTERM_SCROLLBAR)
375	"+"
376	# endif
377	# endif
378	# if defined(RXVT_SCROLLBAR)	378	#if defined(RXVT_SCROLLBAR)
379	"rxvt"	379	"+rxvt"
380	# if defined(NEXT_SCROLLBAR) \|\| defined(XTERM_SCROLLBAR)
381	"+"
382	# endif
383	# endif	380	#endif
384	# if defined(NEXT_SCROLLBAR)	381	#if defined(NEXT_SCROLLBAR)
385	"NeXT"	382	"+NeXT"
386	# if defined(XTERM_SCROLLBAR)
387	"+"
388	# endif
389	# endif	383	#endif
390	# if defined(XTERM_SCROLLBAR)	384	#if defined(XTERM_SCROLLBAR)
391	"xterm"	385	"+xterm"
392	# endif
393	#endif	386	#endif
394	"\nUsage: "; /* Usage */	387	"\nUsage: "; /* Usage */
395		388
396	#define INDENT 18	389	#define INDENT 28
397		390
398	const char rxvt_term::resval_undef [] = "<undef>";	391	const char rxvt_term::resval_undef [] = "<undef>";
399	const char rxvt_term::resval_on [] = "on";	392	const char rxvt_term::resval_on [] = "on";
400	const char rxvt_term::resval_off [] = "off";	393	const char rxvt_term::resval_off [] = "off";
401		394
402	/{{{ usage: /	395	/{{{ usage: /
403	/----------------------------------------------------------------------/	396	/----------------------------------------------------------------------/
404	static void	397	void
405	rxvt_usage (int type)	398	rxvt_term::rxvt_usage (int type)
406	{	399	{
407	unsigned int i, col;	400	unsigned int i, col;
408		401
409	rxvt_log ("%s%s%s", releasestring, optionsstring, RESNAME);	402	rxvt_log ("%s%s%s", releasestring, optionsstring, RESNAME);
410		403
411	switch (type)	404	switch (type)
412	{	405	{
413	case 0: /* brief listing */	406	case 0: /* brief listing */
414	rxvt_log (" [-help] [--help]\n");	407	rxvt_log (" [-help] [--help]\n");
415		408
416	for (col = 1, i = 0; i < optList_size; i++)	409	for (col = 1, i = 0; i < ecb_array_length (optList); i++)
417	if (optList[i].desc != NULL)	410	if (optList[i].desc != NULL)
418	{	411	{
419	int len = 0;	412	int len = 0;
420		413
421	if (!optList_isBool (i))	414	if (optList[i].arg)
		415	len = strlen (optList[i].arg) + 1;
		416
		417	assert (optList[i].opt != NULL);
		418	len += 4 + strlen (optList[i].opt) + (optList_isBool (i) ? 2 : 0);
		419	col += len;
		420
		421	if (col > 79)
422	{	422	{
423	len = optList_strlen (i);
424	if (len > 0)
425	len++; /* account for space */
426	}
427	#ifdef DEBUG_STRICT
428	assert (optList[i].opt != NULL);
429	#endif
430	len += 4 + strlen (optList[i].opt) + (optList_isBool (i) ? 2: 0);
431	col += len;
432	if (col > 79)
433	{ /* assume regular width */	423	/* assume regular width */
434	rxvt_log ("\n");	424	rxvt_log ("\n");
435	col = 1 + len;	425	col = 1 + len;
436	}	426	}
437		427
438	rxvt_log (" [-%s%s", (optList_isBool (i) ? "/+" : ""), optList[i].opt);	428	rxvt_log (" [-%s%s", (optList_isBool (i) ? "/+" : ""), optList[i].opt);
		429
439	if (optList_strlen (i))	430	if (optList[i].arg)
440	rxvt_log (" %s]", optList[i].arg);	431	rxvt_log (" %s]", optList[i].arg);
441	else	432	else
442	rxvt_log ("]");	433	rxvt_log ("]");
443	}	434	}
444	break;	435	break;
445		436
446	case 1: /* full command-line listing */	437	case 1: /* full command-line listing */
447	rxvt_log (" [options] [-e command args]\n\nwhere options include:\n");	438	rxvt_log (" [options] [-e command args]\n\nwhere options include:\n");
448		439
449	for (i = 0; i < optList_size; i++)	440	for (i = 0; i < ecb_array_length (optList); i++)
450	if (optList[i].desc != NULL)	441	if (optList[i].desc != NULL)
451	{	442	{
452	#ifdef DEBUG_STRICT
453	assert (optList[i].opt != NULL);	443	assert (optList[i].opt != NULL);
454	#endif
455	rxvt_log (" %s%s %-*s%s%s\n",	444	rxvt_log (" %s%s %-*s%s%s\n",
456	(optList_isBool (i) ? "-/+" : "-"), optList[i].opt,	445	(optList_isBool (i) ? "-/+" : "-"), optList[i].opt,
457	(INDENT - strlen (optList[i].opt)	446	(INDENT - strlen (optList[i].opt)
458	+ (optList_isBool (i) ? 0 : 2)),	447	+ (optList_isBool (i) ? 0 : 2)),
459	(optList[i].arg ? optList[i].arg : ""),	448	(optList[i].arg ? optList[i].arg : ""),
460	(optList_isBool (i) ? "turn on/off " : ""),	449	(optList_isBool (i) ? "turn on/off " : ""),
461	optList[i].desc);	450	optList[i].desc);
462	}	451	}
		452
		453	#if ENABLE_PERL
		454	rxvt_perl.init (this);
		455	rxvt_perl.usage (this, 1);
		456	#endif
		457
463	rxvt_log ("\n --help to list long-options");	458	rxvt_log ("\n --help to list long-options");
464	break;	459	break;
465		460
466	case 2: /* full resource listing */	461	case 2: /* full resource listing */
467	rxvt_log (" [options] [-e command args]\n\n"	462	rxvt_log (" [options] [-e command args]\n\n"
468	"where resources (long-options) include:\n");	463	"where resources (long-options) include:\n");
469		464
470	for (i = 0; i < optList_size; i++)	465	for (i = 0; i < ecb_array_length (optList); i++)
471	if (optList[i].kw != NULL)	466	if (optList[i].kw != NULL)
472	rxvt_log (" %s: %*s%s\n",	467	rxvt_log (" %s: %*s%s\n",
473	optList[i].kw,	468	optList[i].kw,
474	(INDENT - strlen (optList[i].kw)), "", /* XXX */	469	(INDENT + 2 - strlen (optList[i].kw)), "", /* XXX */
475	(optList_isBool (i) ? "boolean" : optList[i].arg));	470	(optList_isBool (i) ? "boolean" : optList[i].arg));
476	#ifdef KEYSYM_RESOURCE	471
477	rxvt_log (" " "keysym.sym" ": %*s%s\n",	472	#if ENABLE_PERL
478	(INDENT - sizeof ("keysym.sym") + 1), "", /* XXX */	473	rxvt_perl.init (this);
479	"keysym");	474	rxvt_perl.usage (this, 2);
480	#endif	475	#endif
		476
481	rxvt_log ("\n -help to list options");	477	rxvt_log ("\n -help to list options");
482	break;	478	break;
483	}	479	}
484		480
485	rxvt_log ("\n\n");	481	rxvt_log ("\n\n");
486	rxvt_exit_failure ();	482	rxvt_exit_failure ();
487	/* NOTREACHED */
488	}	483	}
489		484
490	/}}} /	485	/}}} /
491		486
492	/{{{ get command-line options before getting resources /	487	/{{{ get command-line options before getting resources /
493	void	488	const char **
494	rxvt_term::get_options (int argc, const char const argv)	489	rxvt_term::get_options (int argc, const char const argv)
495	{	490	{
496	int i, bad_option = 0;	491	int i, bad_option = 0;
497		492
498	for (i = 1; i < argc; i++)	493	for (i = 1; i < argc; i++)
499	{	494	{
500	unsigned int entry, longopt = 0;	495	unsigned int entry, longopt = 0;
501	const char flag, opt;	496	const char *opt;
		497	int flag;
502		498
503	opt = argv[i];	499	opt = argv[i];
504		500
505	if (*opt == '-')	501	if (*opt == '-')
506	{	502	{
507	flag = resval_on;	503	flag = 1;
508		504
509	if (*++opt == '-')	505	if (*++opt == '-')
510	longopt = opt++; / long option */	506	longopt = opt++; / long option */
511	}	507	}
512	else if (*opt == '+')	508	else if (*opt == '+')
513	{	509	{
514	flag = resval_off;	510	flag = 0;
515		511
516	if (*++opt == '+')	512	if (*++opt == '+')
517	longopt = opt++; / long option */	513	longopt = opt++; / long option */
518	}	514	}
519	else	515	else
…		…
528		524
529	if (!strcmp (opt, "h"))	525	if (!strcmp (opt, "h"))
530	rxvt_usage (0);	526	rxvt_usage (0);
531		527
532	/* feature: always try to match long-options */	528	/* feature: always try to match long-options */
533	for (entry = 0; entry < optList_size; entry++)	529	for (entry = 0; entry < ecb_array_length (optList); entry++)
534	if ((optList[entry].kw && !strcmp (opt, optList[entry].kw))	530	if ((optList[entry].kw && !strcmp (opt, optList[entry].kw))
535	\|\| (!longopt	531	\|\| (!longopt
536	&& optList[entry].opt && !strcmp (opt, optList[entry].opt)))	532	&& optList[entry].opt && !strcmp (opt, optList[entry].opt)))
537	break;	533	break;
538		534
539	if (entry < optList_size)	535	if (entry < ecb_array_length (optList)
		536	&& !optList_isInfo (entry))
540	{	537	{
541	if (optList_isReverse (entry))	538	if (optList_isReverse (entry))
542	flag = flag == resval_on ? resval_off : resval_on;	539	flag = !flag;
543		540
544	if (optList_strlen (entry))	541	if (optList_isString (entry))
545	{	542	{
546	/*	543	/*
547	* special cases are handled in main.c:main () to allow	544	* special cases are handled in init_resources () to allow
548	* X resources to set these values before we settle for	545	* X resources to set these values before we settle for
549	* default values	546	* default values
550	*/	547	*/
551		548
552	if (optList[entry].doff != -1)	549	if (optList[entry].doff != -1)
553	{	550	{
554	if (flag == resval_on && !argv [i+1])	551	if (flag && i + 1 == argc)
555	rxvt_fatal ("option '%s' needs an argument, aborting.\n", argv [i]);	552	rxvt_fatal ("option '%s' requires an argument, aborting.\n", argv [i]);
556		553
557	rs[optList[entry].doff] = flag == resval_on ? argv[++i] : resval_undef;	554	rs[optList[entry].doff] = flag ? argv[++i] : resval_undef;
558	}	555	}
559	}	556	}
560	else	557	else
		558	{
561	{ /* boolean value */	559	/* boolean value */
562	set_option (optList[entry].index, flag == resval_on);	560	set_option (optList[entry].index, flag);
563		561
564	if (optList[entry].doff != -1)	562	if (optList[entry].doff != -1)
565	rs[optList[entry].doff] = flag;	563	rs[optList[entry].doff] = flag ? resval_on : resval_off;
566	}	564	}
567	}	565	}
		566	#ifndef NO_RESOURCES
		567	else if (!strcmp (opt, "xrm"))
		568	{
		569	if (i + 1 < argc)
		570	XrmPutLineResource (&option_db, argv[++i]);
		571	}
		572	#endif
		573	#ifdef KEYSYM_RESOURCE
		574	else if (!strncmp (opt, "keysym.", sizeof ("keysym.") - 1))
		575	{
		576	if (i + 1 < argc)
		577	{
		578	char *res = rxvt_temp_buf<char> (strlen (opt) + strlen (argv[++i]) + 6);
		579	sprintf (res, "*.%s: %s\n", opt, argv[i]);
		580	XrmPutLineResource (&option_db, res);
		581	}
		582	}
		583	#endif
		584	else if (!strcmp (opt, "e"))
		585	{
		586	if (i + 1 < argc)
		587	return (const char **)argv + i + 1;
		588
		589	rxvt_warn ("option '-e' requires an argument, aborting.\n");
		590	bad_option = 1;
		591	}
568	else	592	else
569	#ifdef KEYSYM_RESOURCE	593	{
570	/* if (!strncmp (opt, "keysym.", sizeof ("keysym.") - 1)) */	594	#if ENABLE_PERL
571	if (rxvt_Str_match (opt, "keysym."))	595	rxvt_perl.init (this);
		596
		597	if (int flags = rxvt_perl.parse_resource (this, opt, true, longopt, flag, argv [i + 1]))
572	{	598	{
573	const char *str = argv[++i];	599	if (flags & rxvt_perl.RESOURCE_ARG)
574		600	{
575	if (str != NULL)	601	if (i + 1 == argc)
576	parse_keysym (opt + sizeof ("keysym.") - 1, str);	602	{
		603	rxvt_warn ("option '%s' requires an argument.\n", argv [i]);
		604	bad_option = 1;
		605	}
		606	else
		607	++i;
		608	}
577	}	609	}
578	else	610	else
579	#endif	611	#endif
580	{	612	{
581	bad_option = 1;
582	rxvt_warn ("\"%s\": unknown or malformed option.\n", opt);	613	rxvt_warn ("\"%s\": unknown or malformed option.\n", opt);
		614	bad_option = 1;
583	}	615	}
		616	}
584	}	617	}
585		618
586	if (bad_option)	619	if (bad_option)
587	rxvt_usage (0);	620	rxvt_usage (0);
		621
		622	return 0;
588	}	623	}
589		624
590	/}}} /	625	/}}} /
591		626
592	#ifndef NO_RESOURCES
593	/----------------------------------------------------------------------/	627	/----------------------------------------------------------------------/
594		628
595	# ifdef KEYSYM_RESOURCE	629	#ifdef KEYSYM_RESOURCE
596	/*	630	static void
597	* Define key from XrmEnumerateDatabase.	631	rxvt_define_key (rxvt_term term, const char k, const char *v)
598	* quarks will be something like
599	* "rxvt" "keysym" "0xFF01"
600	* value will be a string
601	*/
602	/* ARGSUSED */
603	int
604	rxvt_define_key (XrmDatabase *database UNUSED,
605	XrmBindingList bindings UNUSED,
606	XrmQuarkList quarks,
607	XrmRepresentation *type UNUSED,
608	XrmValue *value,
609	XPointer closure UNUSED)
610	{	632	{
611	int last;	633	term->bind_action (k, v);
612
613	for (last = 0; quarks[last] != NULLQUARK; last++) /* look for last quark in list */
614	;
615
616	last--;
617	GET_R->parse_keysym (XrmQuarkToString (quarks[last]), (char *)value->addr);//D//TODO
618	return False;
619	}	634	}
620		635
621	/*	636	/*
622	* look for something like this (XK_Delete)	637	* look for something like this (XK_Delete)
623	* rxvt*keysym.0xFFFF: "\177"	638	* rxvt*keysym.0xFFFF: "\177"
624	*
625	* arg will be
626	* NULL for ~/.Xdefaults and
627	* non-NULL for command-line options (need to allocate)
628	*/	639	*/
629	#define NEWARGLIM 500 /* `reasonable' size */
630		640
631	struct keysym_vocabulary_t	641	struct keysym_vocabulary_t
632	{	642	{
633	const char *name;	643	const char *name;
634	unsigned short len;	644	unsigned short len;
635	unsigned short value;	645	unsigned short value;
636	};	646	};
637	keysym_vocabulary_t keysym_vocabulary[] =	647	static const keysym_vocabulary_t keysym_vocabulary[] =
638	{	648	{
639	{ "ISOLevel3", 9, Level3Mask },	649	{ "ISOLevel3", 9, Level3Mask },
640	{ "AppKeypad", 9, AppKeypadMask },	650	{ "AppKeypad", 9, AppKeypadMask },
641	{ "Control", 7, ControlMask },	651	{ "Control", 7, ControlMask },
642	{ "NumLock", 7, NumLockMask },	652	{ "NumLock", 7, NumLockMask },
…		…
662	{ "4", 1, Mod4Mask },	672	{ "4", 1, Mod4Mask },
663	{ "5", 1, Mod5Mask },	673	{ "5", 1, Mod5Mask },
664	};	674	};
665		675
666	int	676	int
667	rxvt_term::parse_keysym (const char str, const char arg)	677	rxvt_term::parse_keysym (const char *str, unsigned int &state)
668	{	678	{
669	int n, sym;	679	int sym;
670	unsigned int state = 0;	680	const char *key = strrchr (str, '-');
671	const char *pmodend = NULL;
672	char *newarg = NULL;
673	char newargstr[NEWARGLIM];
674		681
675	if (arg == NULL)	682	state = 0;
676	{
677	if ((n = rxvt_Str_match (str, "keysym.")) == 0)
678	return 0;
679		683
680	str += n; /* skip `keysym.' */	684	if (!key)
681	if (!(pmodend = strchr (str, ':')))	685	key = str;
682	return -1;
683	}
684	else	686	else
685	pmodend = str + strlen(str);	687	key++;
686		688
687	for (--pmodend; str < pmodend; --pmodend)	689	// string or key is empty
688	if (*pmodend == '-')	690	if (*key == '\0')
689	break;	691	return -1;
690		692
		693	// parse modifiers
691	while (str < pmodend)	694	while (str < key)
692	{	695	{
693	unsigned int i;	696	unsigned int i;
694		697
695	for (i=0; i < sizeof (keysym_vocabulary) / sizeof (keysym_vocabulary_t); ++i)	698	for (i = 0; i < ecb_array_length (keysym_vocabulary); ++i)
696	{	699	{
697	if (strncmp (str, keysym_vocabulary [i].name, keysym_vocabulary [i].len) == 0)	700	if (strncmp (str, keysym_vocabulary [i].name, keysym_vocabulary [i].len) == 0)
698	{	701	{
699	state \|= keysym_vocabulary[i].value;	702	state \|= keysym_vocabulary[i].value;
700	str += keysym_vocabulary[i].len;	703	str += keysym_vocabulary[i].len;
701	break;	704	break;
702	}	705	}
703	}	706	}
704		707
705	if (i >= sizeof (keysym_vocabulary) / sizeof (keysym_vocabulary_t))	708	if (i >= ecb_array_length (keysym_vocabulary))
706	return -1;	709	return -1;
707		710
708	if (*str == '-')	711	if (*str == '-')
709	++str;	712	++str;
710	}	713	}
711		714
712	/* some scanf () have trouble with a 0x prefix */	715	// convert keysym name to keysym number
713	if (str[0] == '0' && toupper (str[1]) == 'X')	716	if ((sym = XStringToKeysym (str)) == None)
714	{	717	{
715	str += 2;	718	// fallback on hexadecimal parsing
716		719	char *end;
		720	sym = strtol (str, &end, 16);
717	if (arg)	721	if (*end)
718	{
719	if (sscanf (str, (strchr (str, ':') ? "%x:" : "%x"), &sym) != 1)
720	return -1;
721	}
722	else
723	{
724	if (sscanf (str, "%x:", &sym) != 1)
725	return -1;
726
727	/* cue to ':', it's there since sscanf () worked */
728	strncpy (newargstr, strchr (str, ':') + 1, NEWARGLIM - 1);
729	newargstr[NEWARGLIM - 1] = '\0';
730	newarg = newargstr;
731	}
732	}
733	else
734	{
735	/*
736	* convert keysym name to keysym number
737	*/
738	strncpy (newargstr, str, NEWARGLIM - 1);
739	newargstr[NEWARGLIM - 1] = '\0';
740
741	if (arg == NULL)
742	{
743	if ((newarg = strchr (newargstr, ':')) == NULL)
744	return -1;
745
746	newarg++ = '\0'; / terminate keysym name */
747	}
748
749	if ((sym = XStringToKeysym (newargstr)) == None)
750	return -1;	722	return -1;
751	}	723	}
752		724
753	if (newarg == NULL)	725	return sym;
754	{	726	}
755	strncpy (newargstr, arg, NEWARGLIM - 1);
756	newargstr[NEWARGLIM - 1] = '\0';
757	newarg = newargstr;
758	}
759		727
760	rxvt_Str_trim (newarg);	728	int
761	if (*newarg == '\0' \|\| (n = rxvt_Str_escaped (newarg)) == 0)	729	rxvt_term::bind_action (const char str, const char arg)
		730	{
		731	int sym;
		732	unsigned int state;
		733
		734	if (*arg == '\0' \|\| (sym = parse_keysym (str, state)) == -1)
762	return -1;	735	return -1;
763		736
		737	wchar_t *ws = rxvt_mbstowcs (arg);
		738	if (!HOOK_INVOKE ((this, HOOK_REGISTER_COMMAND, DT_INT, sym, DT_INT, state, DT_WCS_LEN, ws, wcslen (ws), DT_END)))
764	keyboard->register_user_translation (sym, state, newarg);	739	keyboard->register_action (sym, state, ws);
		740
		741	free (ws);
765	return 1;	742	return 1;
766	}	743	}
767		744
768	# endif /* KEYSYM_RESOURCE */	745	#endif /* KEYSYM_RESOURCE */
769	#endif /* NO_RESOURCES */
770		746
771	static char *	747	static char *
772	get_res (XrmDatabase database, const char program, const char option)	748	get_res (XrmDatabase database, const char program, const char option)
773	{	749	{
774	char resource[512];	750	char resource[512];
…		…
806		782
807	void	783	void
808	rxvt_term::extract_resources ()	784	rxvt_term::extract_resources ()
809	{	785	{
810	#ifndef NO_RESOURCES	786	#ifndef NO_RESOURCES
		787	XrmDatabase database = XrmGetDatabase (dpy);
		788	XrmMergeDatabases (option_db, &database);
		789	option_db = NULL;
811	/*	790	/*
812	* Query resources for options that affect us	791	* Query resources for options that affect us
813	*/	792	*/
814	for (int entry = 0; entry < optList_size; entry++)	793	for (int entry = 0; entry < ecb_array_length (optList); entry++)
815	{	794	{
816	int s;	795	int s;
817	const char *kw = optList[entry].kw;	796	const char *kw = optList[entry].kw;
818		797
819	if (kw == NULL \|\| rs[optList[entry].doff] != NULL)	798	if (kw == NULL \|\| rs[optList[entry].doff] != NULL)
…		…
839		818
840	set_option (optList[entry].index, s);	819	set_option (optList[entry].index, s);
841	}	820	}
842	}	821	}
843	}	822	}
		823	#endif /* NO_RESOURCES */
		824	}
844		825
		826	struct rxvt_enumerate_closure
		827	{
		828	rxvt_term *term;
		829	void (cb)(rxvt_term , const char , const char );
		830	int specific; // iterate over only a specific subhierarchy
		831	};
		832
		833	/*
		834	* Define key from XrmEnumerateDatabase.
		835	* quarks will be something like
		836	* "rxvt" "keysym" "0xFF01"
		837	* value will be a string
		838	*/
		839	static int
		840	rxvt_enumerate_helper (
		841	XrmDatabase *database ecb_unused,
		842	XrmBindingList bindings ecb_unused,
		843	XrmQuarkList quarks,
		844	XrmRepresentation *type ecb_unused,
		845	XrmValue *value,
		846	XPointer closure
		847	)
		848	{
		849	const rxvt_enumerate_closure data = (const rxvt_enumerate_closure )closure;
		850
		851	if (*quarks == NULLQUARK) return False;
		852
		853	// if the quark list starts with a tightly bound quark, we skip it,
		854	// as it exactly matched the prefix. Otherwise, it matched because
		855	// it started with "*", in which case we assume the prefix is part
		856	// of the "*".
		857	if (*bindings == XrmBindTightly)
		858	{
		859	++quarks, ++bindings; // skip if this is a fixed prefix, rather than a *-match
		860	if (*quarks == NULLQUARK) return False;
		861	}
		862
		863	// specific, a bit misleadingly named, is used when a specific "subclass"
		864	// is iterated over, e.g. "keysym", and is used to skip one more
		865	// component, as well as all generic prefixes
		866	// this is a bit of a hack, ideally, keysym (the only user) should use its
		867	// own iteration function, but this ought to be less bloated
		868	if (data->specific)
		869	{
		870	++quarks, ++bindings;
		871	if (*quarks == NULLQUARK) return False;
		872	}
		873
		874	char *pattern;
		875	if (quarks[1] == NULLQUARK)
		876	pattern = XrmQuarkToString (quarks[0]); // single component, fast path
		877	else
		878	{
		879	// multiple components, slow path - should be rare, don't optimize for speed
		880	int size = 0;
		881
		882	for (int i = 0; quarks[i] != NULLQUARK; ++i)
		883	size += strlen (XrmQuarkToString (quarks[i])) + 1;
		884
		885	pattern = rxvt_temp_buf<char> (size + 1);
		886
		887	// now print all components
		888	{
		889	char *cur = pattern;
		890
		891	for (int i = 0; quarks[i] != NULLQUARK; ++i)
		892	cur += sprintf (cur, ".%s", XrmQuarkToString (quarks[i]));
		893	}
		894
		895	++pattern; // skip initial dot
		896	}
		897
		898	data->cb (data->term, pattern, (char *)value->addr);
		899
		900	return False;
		901	}
		902
		903	void
		904	rxvt_term::enumerate_resources (void (cb)(rxvt_term , const char , const char ), const char name_p, const char class_p)
		905	{
845	/*	906	/*
846	* [R5 or later]: enumerate the resource database	907	* [R5 or later]: enumerate the resource database
847	*/	908	*/
		909	assert (!name_p == !class_p); // both must be specified, or missing
		910
848	# ifdef KEYSYM_RESOURCE	911	#ifdef KEYSYM_RESOURCE
		912	rxvt_enumerate_closure closure = { this, cb, name_p ? 1 : 0 };
		913
849	XrmDatabase database = XrmGetDatabase (dpy);	914	XrmDatabase database = XrmGetDatabase (dpy);
850	XrmName name_prefix[3];	915	XrmName name_prefix[3];
851	XrmClass class_prefix[3];	916	XrmClass class_prefix[3];
852		917
853	name_prefix[0] = XrmStringToName (rs[Rs_name]);	918	name_prefix[1] = name_p ? XrmStringToName (name_p) : NULLQUARK;
854	name_prefix[1] = XrmStringToName ("keysym");
855	name_prefix[2] = NULLQUARK;	919	name_prefix[2] = NULLQUARK;
856	class_prefix[0] = XrmStringToName (RESCLASS);	920	class_prefix[1] = class_p ? XrmStringToName (class_p) : NULLQUARK;
857	class_prefix[1] = XrmStringToName ("Keysym");
858	class_prefix[2] = NULLQUARK;	921	class_prefix[2] = NULLQUARK;
859	/* XXX: Need to check sizeof (rxvt_t) == sizeof (XPointer) */	922
		923	# ifdef RESFALLBACK
		924	name_prefix[0] = class_prefix[0] = XrmStringToName (RESFALLBACK);
860	XrmEnumerateDatabase (database, name_prefix, class_prefix,	925	XrmEnumerateDatabase (database, name_prefix, class_prefix,
861	XrmEnumOneLevel, rxvt_define_key, NULL);	926	XrmEnumAllLevels, rxvt_enumerate_helper, (XPointer)&closure);
862	# ifdef RESFALLBACK	927	# endif
863	name_prefix[0] = XrmStringToName (RESFALLBACK);	928
864	name_prefix[1] = XrmStringToName ("keysym");
865	class_prefix[0] = XrmStringToName (RESFALLBACK);	929	name_prefix[0] = class_prefix[0] = XrmStringToName (RESCLASS);
866	class_prefix[1] = XrmStringToName ("Keysym");
867	/* XXX: Need to check sizeof (rxvt_t) == sizeof (XPointer) */
868	XrmEnumerateDatabase (database, name_prefix, class_prefix,	930	XrmEnumerateDatabase (database, name_prefix, class_prefix,
869	XrmEnumOneLevel, rxvt_define_key, NULL);	931	XrmEnumAllLevels, rxvt_enumerate_helper, (XPointer)&closure);
870	# endif	932
		933	name_prefix[0] = class_prefix[0] = XrmStringToName (rs[Rs_name]);
		934	XrmEnumerateDatabase (database, name_prefix, class_prefix,
		935	XrmEnumAllLevels, rxvt_enumerate_helper, (XPointer)&closure);
871	# endif	936	#endif
		937	}
872		938
873	#endif /* NO_RESOURCES */	939	void
		940	rxvt_term::extract_keysym_resources ()
		941	{
		942	#ifdef KEYSYM_RESOURCE
		943	enumerate_keysym_resources (rxvt_define_key);
		944	#endif
874	}	945	}
875		946
876	/----------------------- end-of-file (C source) -----------------------/	947	/----------------------- end-of-file (C source) -----------------------/
		948

Diff Legend

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

Comparing rxvt-unicode/src/xdefaults.C (file contents): Revision 1.102 by sasha, Fri Jun 8 20:04:12 2007 UTC vs. Revision 1.200 by root, Fri Dec 23 21:46:46 2022 UTC

Diff Legend

Comparing rxvt-unicode/src/xdefaults.C (file contents):
Revision 1.102 by sasha, Fri Jun 8 20:04:12 2007 UTC vs.
Revision 1.200 by root, Fri Dec 23 21:46:46 2022 UTC