1 |
/*----------------------------------------------------------------------* |
2 |
* File: xdefaults.C |
3 |
*----------------------------------------------------------------------* |
4 |
* |
5 |
* All portions of code are copyright by their respective author/s. |
6 |
* Copyright (c) 1994 Robert Nation <nation@rocket.sanders.lockheed.com> |
7 |
* - original version |
8 |
* Copyright (c) 1997,1998 mj olesen <olesen@me.queensu.ca> |
9 |
* Copyright (c) 2003-2006 Marc Lehmann <schmorp@schmorp.de> |
10 |
* Copyright (c) 2007 Emanuele Giaquinta <e.giaquinta@glauco.it> |
11 |
* |
12 |
* This program is free software; you can redistribute it and/or modify |
13 |
* it under the terms of the GNU General Public License as published by |
14 |
* the Free Software Foundation; either version 3 of the License, or |
15 |
* (at your option) any later version. |
16 |
* |
17 |
* This program is distributed in the hope that it will be useful, |
18 |
* but WITHOUT ANY WARRANTY; without even the implied warranty of |
19 |
* MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the |
20 |
* GNU General Public License for more details. |
21 |
* |
22 |
* You should have received a copy of the GNU General Public License |
23 |
* along with this program; if not, write to the Free Software |
24 |
* Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA. |
25 |
*----------------------------------------------------------------------*/ |
26 |
|
27 |
#include "../config.h" |
28 |
#include "rxvt.h" |
29 |
#include "version.h" |
30 |
|
31 |
#ifdef KEYSYM_RESOURCE |
32 |
# include "keyboard.h" |
33 |
#endif |
34 |
|
35 |
/* place holders used for parsing command-line options */ |
36 |
#define Optflag_Reverse 1 |
37 |
#define Optflag_Boolean 2 |
38 |
#define Optflag_Switch 4 |
39 |
#define Optflag_Info 8 |
40 |
|
41 |
/* monolithic option/resource structure: */ |
42 |
/* |
43 |
* `string' options MUST have a usage argument |
44 |
* `switch' and `boolean' options have no argument |
45 |
* if there's no desc (ription), it won't appear in rxvt_usage () |
46 |
*/ |
47 |
|
48 |
/* INFO () - descriptive information only */ |
49 |
#define INFO(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} |
54 |
|
55 |
/* STRG () - command-line option, with/without resource */ |
56 |
#define STRG(rsp, kw, opt, arg, desc) \ |
57 |
{0, 0, (rsp), (kw), (opt), (arg), (desc)} |
58 |
|
59 |
/* RSTRG () - resource/long-option */ |
60 |
#define RSTRG(rsp, kw, arg) \ |
61 |
{0, 0, (rsp), (kw), NULL, (arg), NULL} |
62 |
|
63 |
/* BOOL () - regular boolean `-/+' flag */ |
64 |
#define BOOL(rsp, kw, opt, option, flag, desc) \ |
65 |
{ (option), (Optflag_Boolean | (flag)), (rsp), (kw), (opt), NULL, (desc)} |
66 |
|
67 |
/* SWCH () - `-' flag */ |
68 |
#define SWCH(opt, option, flag, desc) \ |
69 |
{ (option), (Optflag_Switch | (flag)), -1, NULL, (opt), NULL, (desc)} |
70 |
|
71 |
/* convenient macros */ |
72 |
#define optList_isString(i) \ |
73 |
(optList[i].flag == 0) |
74 |
#define optList_isBool(i) \ |
75 |
(optList[i].flag & Optflag_Boolean) |
76 |
#define optList_isReverse(i) \ |
77 |
(optList[i].flag & Optflag_Reverse) |
78 |
#define optList_isInfo(i) \ |
79 |
(optList[i].flag & Optflag_Info) |
80 |
|
81 |
static const struct |
82 |
{ |
83 |
const uint8_t index; /* Option index */ |
84 |
const uint8_t flag; /* Option flag */ |
85 |
const int16_t doff; /* resource value index or -1 */ |
86 |
const char *kw; /* keyword */ |
87 |
const char *opt; /* option */ |
88 |
const char *arg; /* argument */ |
89 |
const char *desc; /* description */ |
90 |
} |
91 |
optList[] = { |
92 |
STRG (Rs_display_name, NULL, "d", NULL, NULL), /* short form */ |
93 |
STRG (Rs_display_name, NULL, "display", "string", "X server to contact"), |
94 |
STRG (Rs_term_name, "termName", "tn", "string", "value of the TERM environment variable"), |
95 |
STRG (Rs_geometry, NULL, "g", NULL, NULL), /* short form */ |
96 |
STRG (Rs_geometry, "geometry", "geometry", "geometry", "size (in characters) and position"), |
97 |
SWCH ("C", Opt_console, 0, "intercept console messages"), |
98 |
SWCH ("iconic", Opt_iconic, 0, "start iconic"), |
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"), |
102 |
BOOL (Rs_reverseVideo, "reverseVideo", "rv", Opt_reverseVideo, 0, "reverse video"), |
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"), |
105 |
BOOL (Rs_jumpScroll, "jumpScroll", "j", Opt_jumpScroll, 0, "jump scrolling"), |
106 |
BOOL (Rs_skipScroll, "skipScroll", "ss", Opt_skipScroll, 0, "skip scrolling"), |
107 |
BOOL (Rs_pastableTabs, "pastableTabs", "ptab", Opt_pastableTabs, 0, "tab characters are pastable"), |
108 |
RSTRG (Rs_scrollstyle, "scrollstyle", "mode"), |
109 |
BOOL (Rs_scrollBar, "scrollBar", "sb", Opt_scrollBar, 0, "scrollbar"), |
110 |
BOOL (Rs_scrollBar_right, "scrollBar_right", "sr", Opt_scrollBar_right, 0, "scrollbar right"), |
111 |
BOOL (Rs_scrollBar_floating, "scrollBar_floating", "st", Opt_scrollBar_floating, 0, "scrollbar without a trough"), |
112 |
RSTRG (Rs_scrollBar_align, "scrollBar_align", "mode"), |
113 |
STRG (Rs_scrollBar_thickness, "thickness", "sbt", "number", "scrollbar thickness/width in pixels"), |
114 |
BOOL (Rs_scrollTtyOutput, "scrollTtyOutput", NULL, Opt_scrollTtyOutput, 0, NULL), |
115 |
BOOL (Rs_scrollTtyOutput, NULL, "si", Opt_scrollTtyOutput, Optflag_Reverse, "scroll-on-tty-output inhibit"), |
116 |
BOOL (Rs_scrollTtyKeypress, "scrollTtyKeypress", "sk", Opt_scrollTtyKeypress, 0, "scroll-on-keypress"), |
117 |
BOOL (Rs_scrollWithBuffer, "scrollWithBuffer", "sw", Opt_scrollWithBuffer, 0, "scroll-with-buffer"), |
118 |
#if BG_IMAGE_FROM_ROOT |
119 |
BOOL (Rs_transparent, "inheritPixmap", "ip", Opt_transparent, 0, "inherit parent pixmap"), |
120 |
BOOL (Rs_transparent, "transparent", "tr", Opt_transparent, 0, "inherit parent pixmap"), |
121 |
STRG (Rs_color + Color_tint, "tintColor", "tint", "color", "tint color"), |
122 |
STRG (Rs_shade, "shading", "sh", "number", "shade background by number %."), |
123 |
STRG (Rs_blurradius, "blurRadius", "blr", "HxV", "gaussian blur radii to apply to the root background"), |
124 |
#endif |
125 |
#if OFF_FOCUS_FADING |
126 |
STRG (Rs_fade, "fading", "fade", "number", "fade colors by number % when losing focus"), |
127 |
STRG (Rs_color + Color_fade, "fadeColor", "fadecolor", "color", "target color for off-focus fading"), |
128 |
#endif |
129 |
BOOL (Rs_utmpInhibit, "utmpInhibit", "ut", Opt_utmpInhibit, 0, "utmp inhibit"), |
130 |
#ifndef NO_BELL |
131 |
# if ENABLE_FRILLS |
132 |
BOOL (Rs_urgentOnBell, "urgentOnBell", NULL, Opt_urgentOnBell, 0, NULL), |
133 |
# endif |
134 |
BOOL (Rs_visualBell, "visualBell", "vb", Opt_visualBell, 0, "visual bell"), |
135 |
# if ! defined(NO_MAPALERT) && defined(MAPALERT_OPTION) |
136 |
BOOL (Rs_mapAlert, "mapAlert", NULL, Opt_mapAlert, 0, NULL), |
137 |
# endif |
138 |
#endif |
139 |
#ifdef META8_OPTION |
140 |
BOOL (Rs_meta8, "meta8", NULL, Opt_meta8, 0, NULL), |
141 |
#endif |
142 |
#ifdef MOUSE_WHEEL |
143 |
BOOL (Rs_mouseWheelScrollPage, "mouseWheelScrollPage", NULL, Opt_mouseWheelScrollPage, 0, NULL), |
144 |
#endif |
145 |
#if ENABLE_FRILLS |
146 |
BOOL (Rs_tripleclickwords, "tripleclickwords", "tcw", Opt_tripleclickwords, 0, "triple click word selection"), |
147 |
BOOL (Rs_insecure, "insecure", "insecure", Opt_insecure, 0, "enable possibly insecure escape sequences"), |
148 |
BOOL (Rs_cursorUnderline, "cursorUnderline", "uc", Opt_cursorUnderline, 0, "underline cursor"), |
149 |
#endif |
150 |
#if CURSOR_BLINK |
151 |
BOOL (Rs_cursorBlink, "cursorBlink", "bc", Opt_cursorBlink, 0, "blinking cursor"), |
152 |
#endif |
153 |
#ifdef POINTER_BLANK |
154 |
BOOL (Rs_pointerBlank, "pointerBlank", "pb", Opt_pointerBlank, 0, "switch off pointer after delay"), |
155 |
#endif |
156 |
STRG (Rs_color + Color_bg, "background", "bg", "color", "background color"), |
157 |
STRG (Rs_color + Color_fg, "foreground", "fg", "color", "foreground color"), |
158 |
RSTRG (Rs_color + minCOLOR + 0, "color0", "color"), |
159 |
RSTRG (Rs_color + minCOLOR + 1, "color1", "color"), |
160 |
RSTRG (Rs_color + minCOLOR + 2, "color2", "color"), |
161 |
RSTRG (Rs_color + minCOLOR + 3, "color3", "color"), |
162 |
RSTRG (Rs_color + minCOLOR + 4, "color4", "color"), |
163 |
RSTRG (Rs_color + minCOLOR + 5, "color5", "color"), |
164 |
RSTRG (Rs_color + minCOLOR + 6, "color6", "color"), |
165 |
RSTRG (Rs_color + minCOLOR + 7, "color7", "color"), |
166 |
RSTRG (Rs_color + minBrightCOLOR + 0, "color8", "color"), |
167 |
RSTRG (Rs_color + minBrightCOLOR + 1, "color9", "color"), |
168 |
RSTRG (Rs_color + minBrightCOLOR + 2, "color10", "color"), |
169 |
RSTRG (Rs_color + minBrightCOLOR + 3, "color11", "color"), |
170 |
RSTRG (Rs_color + minBrightCOLOR + 4, "color12", "color"), |
171 |
RSTRG (Rs_color + minBrightCOLOR + 5, "color13", "color"), |
172 |
RSTRG (Rs_color + minBrightCOLOR + 6, "color14", "color"), |
173 |
RSTRG (Rs_color + minBrightCOLOR + 7, "color15", "color"), |
174 |
#ifndef NO_BOLD_UNDERLINE_REVERSE |
175 |
RSTRG (Rs_color + Color_BD, "colorBD", "color"), |
176 |
RSTRG (Rs_color + Color_IT, "colorIT", "color"), |
177 |
RSTRG (Rs_color + Color_UL, "colorUL", "color"), |
178 |
RSTRG (Rs_color + Color_RV, "colorRV", "color"), |
179 |
#endif /* ! NO_BOLD_UNDERLINE_REVERSE */ |
180 |
#if ENABLE_FRILLS |
181 |
RSTRG (Rs_color + Color_underline, "underlineColor", "color"), |
182 |
#endif |
183 |
RSTRG (Rs_color + Color_scroll, "scrollColor", "color"), |
184 |
#ifdef RXVT_SCROLLBAR |
185 |
RSTRG (Rs_color + Color_trough, "troughColor", "color"), |
186 |
#endif |
187 |
#ifdef OPTION_HC |
188 |
STRG (Rs_color + Color_HC, "highlightColor", "hc", "color", "highlight color"), |
189 |
RSTRG (Rs_color + Color_HTC, "highlightTextColor", "color"), |
190 |
#endif |
191 |
#ifndef NO_CURSORCOLOR |
192 |
STRG (Rs_color + Color_cursor, "cursorColor", "cr", "color", "cursor color"), |
193 |
/* command-line option = resource name */ |
194 |
RSTRG (Rs_color + Color_cursor2, "cursorColor2", "color"), |
195 |
#endif /* NO_CURSORCOLOR */ |
196 |
STRG (Rs_color + Color_pointer_fg, "pointerColor", "pr", "color", "pointer color"), |
197 |
STRG (Rs_color + Color_pointer_bg, "pointerColor2", "pr2", "color", "pointer bg color"), |
198 |
STRG (Rs_color + Color_border, "borderColor", "bd", "color", "border color"), |
199 |
#if BG_IMAGE_FROM_FILE |
200 |
RSTRG (Rs_path, "path", "search path"), |
201 |
STRG (Rs_backgroundPixmap, "backgroundPixmap", "pixmap", "file[;geom]", "background pixmap"), |
202 |
#endif |
203 |
#if ENABLE_EWMH |
204 |
STRG (Rs_iconfile, "iconFile", "icon", "file", "path to application icon image"), |
205 |
#endif |
206 |
/* fonts: command-line option = resource name */ |
207 |
STRG (Rs_font, "font", "fn", "fontname", "normal text font"), |
208 |
#if ENABLE_STYLES |
209 |
STRG (Rs_boldFont, "boldFont", "fb", "fontname", "bold font"), |
210 |
STRG (Rs_italicFont, "italicFont", "fi", "fontname", "italic font"), |
211 |
STRG (Rs_boldItalicFont, "boldItalicFont", "fbi", "fontname", "bold italic font"), |
212 |
BOOL (Rs_intensityStyles, "intensityStyles", "is", Opt_intensityStyles, 0, "font styles imply intensity changes"), |
213 |
#endif |
214 |
#if USE_XIM |
215 |
STRG (Rs_inputMethod, "inputMethod", "im", "name", "name of input method"), |
216 |
STRG (Rs_preeditType, "preeditType", "pt", "style", "input style: style = OverTheSpot|OffTheSpot|Root"), |
217 |
STRG (Rs_imLocale, "imLocale", "imlocale", "string", "locale to use for input method"), |
218 |
STRG (Rs_imFont, "imFont", "imfont", "fontname", "fontset for styles OverTheSpot and OffTheSpot"), |
219 |
#endif /* USE_XIM */ |
220 |
STRG (Rs_name, NULL, "name", "string", "client instance, icon, and title strings"), |
221 |
STRG (Rs_title, "title", "title", "string", "title name for window"), |
222 |
STRG (Rs_title, NULL, "T", NULL, NULL), /* short form */ |
223 |
STRG (Rs_iconName, "iconName", "n", "string", "icon name for window"), |
224 |
STRG (Rs_saveLines, "saveLines", "sl", "number", "number of scrolled lines to save"), |
225 |
#if ENABLE_XEMBED |
226 |
STRG (Rs_embed, NULL, "embed", "windowid", "window id to embed terminal in"), |
227 |
#endif |
228 |
#if XFT |
229 |
BOOL (Rs_buffered, "buffered", NULL, Opt_buffered, 0, NULL), |
230 |
#endif |
231 |
#if ENABLE_FRILLS |
232 |
STRG (Rs_depth, "depth", "depth", "number", "depth of visual to request"), |
233 |
STRG (Rs_visual, "visual", "visual", "number", "visual id to request"), |
234 |
RSTRG (Rs_transient_for, "transient-for", "windowid"), |
235 |
BOOL (Rs_override_redirect, "override-redirect", "override-redirect", Opt_override_redirect, 0, "set override-redirect on the terminal window"), |
236 |
STRG (Rs_pty_fd, NULL, "pty-fd", "fileno", "file descriptor of pty to use"), |
237 |
BOOL (Rs_hold, "hold", "hold", Opt_hold, 0, "retain window after shell exit"), |
238 |
STRG (Rs_ext_bwidth, "externalBorder", "w", "number", "external border in pixels"), |
239 |
STRG (Rs_ext_bwidth, NULL, "bw", NULL, NULL), |
240 |
STRG (Rs_ext_bwidth, NULL, "borderwidth", NULL, NULL), |
241 |
STRG (Rs_int_bwidth, "internalBorder", "b", "number", "internal border in pixels"), |
242 |
BOOL (Rs_borderLess, "borderLess", "bl", Opt_borderLess, 0, "borderless window"), |
243 |
STRG (Rs_lineSpace, "lineSpace", "lsp", "number", "number of extra pixels between rows"), |
244 |
STRG (Rs_letterSpace, "letterSpace", "letsp", "number", "letter spacing adjustment"), |
245 |
#endif |
246 |
#ifdef BUILTIN_GLYPHS |
247 |
BOOL (Rs_skipBuiltinGlyphs, "skipBuiltinGlyphs", "sbg", Opt_skipBuiltinGlyphs, 0, "do not use internal glyphs"), |
248 |
#endif |
249 |
#ifdef POINTER_BLANK |
250 |
RSTRG (Rs_pointerBlankDelay, "pointerBlankDelay", "number"), |
251 |
#endif |
252 |
#ifndef NO_BACKSPACE_KEY |
253 |
RSTRG (Rs_backspace_key, "backspacekey", "string"), |
254 |
#endif |
255 |
#ifndef NO_DELETE_KEY |
256 |
RSTRG (Rs_delete_key, "deletekey", "string"), |
257 |
#endif |
258 |
#ifdef PRINTPIPE |
259 |
RSTRG (Rs_print_pipe, "print-pipe", "string"), |
260 |
#endif |
261 |
STRG (Rs_modifier, "modifier", "mod", "modifier", "meta modifier = alt|meta|hyper|super|mod1|...|mod5"), |
262 |
RSTRG (Rs_cutchars, "cutchars", "string"), |
263 |
RSTRG (Rs_answerbackstring, "answerbackString", "string"), |
264 |
#ifndef NO_SECONDARY_SCREEN |
265 |
BOOL (Rs_secondaryScreen, "secondaryScreen", "ssc", Opt_secondaryScreen, 0, "enable secondary screen"), |
266 |
BOOL (Rs_secondaryScroll, "secondaryScroll", "ssr", Opt_secondaryScroll, 0, "enable secondary screen scroll"), |
267 |
#endif |
268 |
#if ENABLE_PERL |
269 |
RSTRG (Rs_perl_lib, "perl-lib", "string"), //, "colon-separated directories with extension scripts"),TODO |
270 |
RSTRG (Rs_perl_eval, "perl-eval", "perl-eval"), // "string", "code to be evaluated after all extensions have been loaded"),TODO |
271 |
RSTRG (Rs_perl_ext_1, "perl-ext-common", "string"), //, "colon-separated list of perl extensions to enable"),TODO |
272 |
STRG (Rs_perl_ext_2, "perl-ext", "pe", "string", "colon-separated list of perl extensions to enable for this instance"), |
273 |
#endif |
274 |
#if ISO_14755 |
275 |
BOOL (Rs_iso14755, "iso14755", NULL, Opt_iso14755, 0, NULL), |
276 |
BOOL (Rs_iso14755_52, "iso14755_52", NULL, Opt_iso14755_52, 0, NULL), |
277 |
#endif |
278 |
#ifndef NO_RESOURCES |
279 |
RINFO ("xrm", "string"), |
280 |
#endif |
281 |
#ifdef KEYSYM_RESOURCE |
282 |
RINFO ("keysym.sym", "keysym"), |
283 |
#endif |
284 |
INFO ("e", "command arg ...", "command to execute") |
285 |
}; |
286 |
|
287 |
#undef INFO |
288 |
#undef RINFO |
289 |
#undef STRG |
290 |
#undef RSTRG |
291 |
#undef SWCH |
292 |
#undef BOOL |
293 |
|
294 |
static const char releasestring[] = "rxvt-unicode (" RXVTNAME ") v" VERSION " - released: " DATE "\n"; |
295 |
static const char optionsstring[] = "options: " |
296 |
#if ENABLE_PERL |
297 |
"perl," |
298 |
#endif |
299 |
#if XFT |
300 |
"xft," |
301 |
#endif |
302 |
#if ENABLE_STYLES |
303 |
"styles," |
304 |
#endif |
305 |
#if ENABLE_COMBINING |
306 |
"combining," |
307 |
#endif |
308 |
#if TEXT_BLINK |
309 |
"blink," |
310 |
#endif |
311 |
#if ISO_14755 |
312 |
"iso14755," |
313 |
#endif |
314 |
#if UNICODE_3 |
315 |
"unicode3," |
316 |
#endif |
317 |
"encodings=eu+vn" |
318 |
#if ENCODING_JP |
319 |
"+jp" |
320 |
#endif |
321 |
#if ENCODING_JP_EXT |
322 |
"+jp-ext" |
323 |
#endif |
324 |
#if ENCODING_KR |
325 |
"+kr" |
326 |
#endif |
327 |
#if ENCODING_ZH |
328 |
"+zh" |
329 |
#endif |
330 |
#if ENCODING_ZH_EXT |
331 |
"+zh-ext" |
332 |
#endif |
333 |
"," |
334 |
#if OFF_FOCUS_FADING |
335 |
"fade," |
336 |
#endif |
337 |
#if defined(ENABLE_TRANSPARENCY) |
338 |
"transparent," |
339 |
"tint," |
340 |
#endif |
341 |
#if HAVE_PIXBUF |
342 |
"pixbuf," |
343 |
#endif |
344 |
#if defined(USE_XIM) |
345 |
"XIM," |
346 |
#endif |
347 |
#if defined(NO_BACKSPACE_KEY) |
348 |
"no_backspace," |
349 |
#endif |
350 |
#if defined(NO_DELETE_KEY) |
351 |
"no_delete," |
352 |
#endif |
353 |
#if EIGHT_BIT_CONTROLS |
354 |
"8bitctrls," |
355 |
#endif |
356 |
#if defined(ENABLE_FRILLS) |
357 |
"frills," |
358 |
#endif |
359 |
#if defined(SELECTION_SCROLLING) |
360 |
"selectionscrolling," |
361 |
#endif |
362 |
#if MOUSE_WHEEL |
363 |
"wheel," |
364 |
#endif |
365 |
#if MOUSE_SLIP_WHEELING |
366 |
"slipwheel," |
367 |
#endif |
368 |
#if defined(SMART_RESIZE) |
369 |
"smart-resize," |
370 |
#endif |
371 |
#if defined(CURSOR_BLINK) |
372 |
"cursorBlink," |
373 |
#endif |
374 |
#if defined(POINTER_BLANK) |
375 |
"pointerBlank," |
376 |
#endif |
377 |
#if defined(NO_RESOURCES) |
378 |
"NoResources," |
379 |
#endif |
380 |
"scrollbars=plain" |
381 |
#if defined(RXVT_SCROLLBAR) |
382 |
"+rxvt" |
383 |
#endif |
384 |
#if defined(NEXT_SCROLLBAR) |
385 |
"+NeXT" |
386 |
#endif |
387 |
#if defined(XTERM_SCROLLBAR) |
388 |
"+xterm" |
389 |
#endif |
390 |
"\nUsage: "; /* Usage */ |
391 |
|
392 |
#define INDENT 28 |
393 |
|
394 |
const char rxvt_term::resval_undef [] = "<undef>"; |
395 |
const char rxvt_term::resval_on [] = "on"; |
396 |
const char rxvt_term::resval_off [] = "off"; |
397 |
|
398 |
/*{{{ usage: */ |
399 |
/*----------------------------------------------------------------------*/ |
400 |
void |
401 |
rxvt_term::rxvt_usage (int type) |
402 |
{ |
403 |
unsigned int i, col; |
404 |
|
405 |
rxvt_log ("%s%s%s", releasestring, optionsstring, RESNAME); |
406 |
|
407 |
switch (type) |
408 |
{ |
409 |
case 0: /* brief listing */ |
410 |
rxvt_log (" [-help] [--help]\n"); |
411 |
|
412 |
for (col = 1, i = 0; i < ecb_array_length (optList); i++) |
413 |
if (optList[i].desc != NULL) |
414 |
{ |
415 |
int len = 0; |
416 |
|
417 |
if (optList[i].arg) |
418 |
len = strlen (optList[i].arg) + 1; |
419 |
|
420 |
assert (optList[i].opt != NULL); |
421 |
len += 4 + strlen (optList[i].opt) + (optList_isBool (i) ? 2 : 0); |
422 |
col += len; |
423 |
|
424 |
if (col > 79) |
425 |
{ |
426 |
/* assume regular width */ |
427 |
rxvt_log ("\n"); |
428 |
col = 1 + len; |
429 |
} |
430 |
|
431 |
rxvt_log (" [-%s%s", (optList_isBool (i) ? "/+" : ""), optList[i].opt); |
432 |
|
433 |
if (optList[i].arg) |
434 |
rxvt_log (" %s]", optList[i].arg); |
435 |
else |
436 |
rxvt_log ("]"); |
437 |
} |
438 |
break; |
439 |
|
440 |
case 1: /* full command-line listing */ |
441 |
rxvt_log (" [options] [-e command args]\n\nwhere options include:\n"); |
442 |
|
443 |
for (i = 0; i < ecb_array_length (optList); i++) |
444 |
if (optList[i].desc != NULL) |
445 |
{ |
446 |
assert (optList[i].opt != NULL); |
447 |
rxvt_log (" %s%s %-*s%s%s\n", |
448 |
(optList_isBool (i) ? "-/+" : "-"), optList[i].opt, |
449 |
(INDENT - strlen (optList[i].opt) |
450 |
+ (optList_isBool (i) ? 0 : 2)), |
451 |
(optList[i].arg ? optList[i].arg : ""), |
452 |
(optList_isBool (i) ? "turn on/off " : ""), |
453 |
optList[i].desc); |
454 |
} |
455 |
|
456 |
#if ENABLE_PERL |
457 |
rxvt_perl.init (this); |
458 |
rxvt_perl.usage (this, 1); |
459 |
#endif |
460 |
|
461 |
rxvt_log ("\n --help to list long-options"); |
462 |
break; |
463 |
|
464 |
case 2: /* full resource listing */ |
465 |
rxvt_log (" [options] [-e command args]\n\n" |
466 |
"where resources (long-options) include:\n"); |
467 |
|
468 |
for (i = 0; i < ecb_array_length (optList); i++) |
469 |
if (optList[i].kw != NULL) |
470 |
rxvt_log (" %s: %*s%s\n", |
471 |
optList[i].kw, |
472 |
(INDENT + 2 - strlen (optList[i].kw)), "", /* XXX */ |
473 |
(optList_isBool (i) ? "boolean" : optList[i].arg)); |
474 |
|
475 |
#if ENABLE_PERL |
476 |
rxvt_perl.init (this); |
477 |
rxvt_perl.usage (this, 2); |
478 |
#endif |
479 |
|
480 |
rxvt_log ("\n -help to list options"); |
481 |
break; |
482 |
} |
483 |
|
484 |
rxvt_log ("\n\n"); |
485 |
rxvt_exit_failure (); |
486 |
} |
487 |
|
488 |
/*}}} */ |
489 |
|
490 |
/*{{{ get command-line options before getting resources */ |
491 |
const char ** |
492 |
rxvt_term::get_options (int argc, const char *const *argv) |
493 |
{ |
494 |
int i, bad_option = 0; |
495 |
|
496 |
for (i = 1; i < argc; i++) |
497 |
{ |
498 |
unsigned int entry, longopt = 0; |
499 |
const char *opt; |
500 |
int flag; |
501 |
|
502 |
opt = argv[i]; |
503 |
|
504 |
if (*opt == '-') |
505 |
{ |
506 |
flag = 1; |
507 |
|
508 |
if (*++opt == '-') |
509 |
longopt = *opt++; /* long option */ |
510 |
} |
511 |
else if (*opt == '+') |
512 |
{ |
513 |
flag = 0; |
514 |
|
515 |
if (*++opt == '+') |
516 |
longopt = *opt++; /* long option */ |
517 |
} |
518 |
else |
519 |
{ |
520 |
bad_option = 1; |
521 |
rxvt_warn ("\"%s\": malformed option.\n", opt); |
522 |
continue; |
523 |
} |
524 |
|
525 |
if (!strcmp (opt, "help")) |
526 |
rxvt_usage (longopt ? 2 : 1); |
527 |
|
528 |
if (!strcmp (opt, "h")) |
529 |
rxvt_usage (0); |
530 |
|
531 |
/* feature: always try to match long-options */ |
532 |
for (entry = 0; entry < ecb_array_length (optList); entry++) |
533 |
if ((optList[entry].kw && !strcmp (opt, optList[entry].kw)) |
534 |
|| (!longopt |
535 |
&& optList[entry].opt && !strcmp (opt, optList[entry].opt))) |
536 |
break; |
537 |
|
538 |
if (entry < ecb_array_length (optList) |
539 |
&& !optList_isInfo (entry)) |
540 |
{ |
541 |
if (optList_isReverse (entry)) |
542 |
flag = !flag; |
543 |
|
544 |
if (optList_isString (entry)) |
545 |
{ |
546 |
/* |
547 |
* special cases are handled in init_resources () to allow |
548 |
* X resources to set these values before we settle for |
549 |
* default values |
550 |
*/ |
551 |
|
552 |
if (optList[entry].doff != -1) |
553 |
{ |
554 |
if (flag && i + 1 == argc) |
555 |
rxvt_fatal ("option '%s' requires an argument, aborting.\n", argv [i]); |
556 |
|
557 |
rs[optList[entry].doff] = flag ? argv[++i] : resval_undef; |
558 |
} |
559 |
} |
560 |
else |
561 |
{ |
562 |
/* boolean value */ |
563 |
set_option (optList[entry].index, flag); |
564 |
|
565 |
if (optList[entry].doff != -1) |
566 |
rs[optList[entry].doff] = flag ? resval_on : resval_off; |
567 |
} |
568 |
} |
569 |
#ifndef NO_RESOURCES |
570 |
else if (!strcmp (opt, "xrm")) |
571 |
{ |
572 |
if (i + 1 < argc) |
573 |
XrmPutLineResource (&option_db, argv[++i]); |
574 |
} |
575 |
#endif |
576 |
#ifdef KEYSYM_RESOURCE |
577 |
else if (!strncmp (opt, "keysym.", sizeof ("keysym.") - 1)) |
578 |
{ |
579 |
if (i + 1 < argc) |
580 |
{ |
581 |
char *res = rxvt_temp_buf<char> (strlen (opt) + strlen (argv[++i]) + 6); |
582 |
sprintf (res, "*.%s: %s\n", opt, argv[i]); |
583 |
XrmPutLineResource (&option_db, res); |
584 |
} |
585 |
} |
586 |
#endif |
587 |
else if (!strcmp (opt, "e")) |
588 |
{ |
589 |
if (i + 1 < argc) |
590 |
return (const char **)argv + i + 1; |
591 |
|
592 |
rxvt_warn ("option '-e' requires an argument, aborting.\n"); |
593 |
bad_option = 1; |
594 |
} |
595 |
else |
596 |
{ |
597 |
#if ENABLE_PERL |
598 |
rxvt_perl.init (this); |
599 |
|
600 |
if (int flags = rxvt_perl.parse_resource (this, opt, true, longopt, flag, argv [i + 1])) |
601 |
{ |
602 |
if (flags & rxvt_perl.RESOURCE_ARG) |
603 |
{ |
604 |
if (i + 1 == argc) |
605 |
{ |
606 |
rxvt_warn ("option '%s' requires an argument.\n", argv [i]); |
607 |
bad_option = 1; |
608 |
} |
609 |
else |
610 |
++i; |
611 |
} |
612 |
} |
613 |
else |
614 |
#endif |
615 |
{ |
616 |
rxvt_warn ("\"%s\": unknown or malformed option.\n", opt); |
617 |
bad_option = 1; |
618 |
} |
619 |
} |
620 |
} |
621 |
|
622 |
if (bad_option) |
623 |
rxvt_usage (0); |
624 |
|
625 |
return 0; |
626 |
} |
627 |
|
628 |
/*}}} */ |
629 |
|
630 |
#ifndef NO_RESOURCES |
631 |
/*----------------------------------------------------------------------*/ |
632 |
|
633 |
# ifdef KEYSYM_RESOURCE |
634 |
static void |
635 |
rxvt_define_key (rxvt_term *term, const char *k, const char *v) |
636 |
{ |
637 |
term->bind_action (k, v); |
638 |
} |
639 |
|
640 |
/* |
641 |
* Define key from XrmEnumerateDatabase. |
642 |
* quarks will be something like |
643 |
* "rxvt" "keysym" "0xFF01" |
644 |
* value will be a string |
645 |
*/ |
646 |
static int |
647 |
rxvt_keysym_enumerate_helper ( |
648 |
XrmDatabase *database ecb_unused, |
649 |
XrmBindingList bindings ecb_unused, |
650 |
XrmQuarkList quarks, |
651 |
XrmRepresentation *type ecb_unused, |
652 |
XrmValue *value, |
653 |
XPointer closure |
654 |
) |
655 |
{ |
656 |
int last; |
657 |
|
658 |
for (last = 0; quarks[last] != NULLQUARK; last++) /* look for last quark in list */ |
659 |
; |
660 |
|
661 |
rxvt_term *term = (rxvt_term *)(((void **)closure)[0]); |
662 |
void (*cb)(rxvt_term *, const char *, const char *) |
663 |
= (void (*)(rxvt_term *, const char *, const char *)) |
664 |
(((void **)closure)[1]); |
665 |
|
666 |
cb (term, XrmQuarkToString (quarks[last - 1]), (char *)value->addr); |
667 |
|
668 |
return False; |
669 |
} |
670 |
|
671 |
/* |
672 |
* look for something like this (XK_Delete) |
673 |
* rxvt*keysym.0xFFFF: "\177" |
674 |
*/ |
675 |
|
676 |
struct keysym_vocabulary_t |
677 |
{ |
678 |
const char *name; |
679 |
unsigned short len; |
680 |
unsigned short value; |
681 |
}; |
682 |
static const keysym_vocabulary_t keysym_vocabulary[] = |
683 |
{ |
684 |
{ "ISOLevel3", 9, Level3Mask }, |
685 |
{ "AppKeypad", 9, AppKeypadMask }, |
686 |
{ "Control", 7, ControlMask }, |
687 |
{ "NumLock", 7, NumLockMask }, |
688 |
{ "Shift", 5, ShiftMask }, |
689 |
{ "Meta", 4, MetaMask }, |
690 |
{ "Lock", 4, LockMask }, |
691 |
{ "Mod1", 4, Mod1Mask }, |
692 |
{ "Mod2", 4, Mod2Mask }, |
693 |
{ "Mod3", 4, Mod3Mask }, |
694 |
{ "Mod4", 4, Mod4Mask }, |
695 |
{ "Mod5", 4, Mod5Mask }, |
696 |
{ "I", 1, Level3Mask }, |
697 |
{ "K", 1, AppKeypadMask }, |
698 |
{ "C", 1, ControlMask }, |
699 |
{ "N", 1, NumLockMask }, |
700 |
{ "S", 1, ShiftMask }, |
701 |
{ "M", 1, MetaMask }, |
702 |
{ "A", 1, MetaMask }, |
703 |
{ "L", 1, LockMask }, |
704 |
{ "1", 1, Mod1Mask }, |
705 |
{ "2", 1, Mod2Mask }, |
706 |
{ "3", 1, Mod3Mask }, |
707 |
{ "4", 1, Mod4Mask }, |
708 |
{ "5", 1, Mod5Mask }, |
709 |
}; |
710 |
|
711 |
int |
712 |
rxvt_term::parse_keysym (const char *str, unsigned int &state) |
713 |
{ |
714 |
int sym; |
715 |
const char *key = strrchr (str, '-'); |
716 |
|
717 |
state = 0; |
718 |
|
719 |
if (!key) |
720 |
key = str; |
721 |
else |
722 |
key++; |
723 |
|
724 |
// string or key is empty |
725 |
if (*key == '\0') |
726 |
return -1; |
727 |
|
728 |
// parse modifiers |
729 |
while (str < key) |
730 |
{ |
731 |
unsigned int i; |
732 |
|
733 |
for (i = 0; i < ecb_array_length (keysym_vocabulary); ++i) |
734 |
{ |
735 |
if (strncmp (str, keysym_vocabulary [i].name, keysym_vocabulary [i].len) == 0) |
736 |
{ |
737 |
state |= keysym_vocabulary[i].value; |
738 |
str += keysym_vocabulary[i].len; |
739 |
break; |
740 |
} |
741 |
} |
742 |
|
743 |
if (i >= ecb_array_length (keysym_vocabulary)) |
744 |
return -1; |
745 |
|
746 |
if (*str == '-') |
747 |
++str; |
748 |
} |
749 |
|
750 |
// convert keysym name to keysym number |
751 |
if ((sym = XStringToKeysym (str)) == None) |
752 |
{ |
753 |
// fallback on hexadecimal parsing |
754 |
char *end; |
755 |
sym = strtol (str, &end, 16); |
756 |
if (*end) |
757 |
return -1; |
758 |
} |
759 |
|
760 |
return sym; |
761 |
} |
762 |
|
763 |
int |
764 |
rxvt_term::bind_action (const char *str, const char *arg) |
765 |
{ |
766 |
int sym; |
767 |
unsigned int state; |
768 |
|
769 |
if (*arg == '\0' || (sym = parse_keysym (str, state)) == -1) |
770 |
return -1; |
771 |
|
772 |
wchar_t *ws = rxvt_mbstowcs (arg); |
773 |
keyboard->register_action (sym, state, ws); |
774 |
|
775 |
free (ws); |
776 |
return 1; |
777 |
} |
778 |
|
779 |
# endif /* KEYSYM_RESOURCE */ |
780 |
#endif /* NO_RESOURCES */ |
781 |
|
782 |
static char * |
783 |
get_res (XrmDatabase database, const char *program, const char *option) |
784 |
{ |
785 |
char resource[512]; |
786 |
char *type; |
787 |
XrmValue result; |
788 |
|
789 |
snprintf (resource, sizeof (resource), "%s.%s", program, option); |
790 |
XrmGetResource (database, resource, resource, &type, &result); |
791 |
|
792 |
return result.addr; |
793 |
} |
794 |
|
795 |
const char * |
796 |
rxvt_term::x_resource (const char *name) |
797 |
{ |
798 |
XrmDatabase database = XrmGetDatabase (dpy); |
799 |
|
800 |
const char *p = get_res (database, rs[Rs_name], name); |
801 |
const char *p0 = get_res (database, "!INVALIDPROGRAMMENAMEDONTMATCH!", name); |
802 |
|
803 |
if (p == NULL || (p0 && strcmp (p, p0) == 0)) |
804 |
{ |
805 |
p = get_res (database, RESCLASS, name); |
806 |
#ifdef RESFALLBACK |
807 |
if (p == NULL || (p0 && strcmp (p, p0) == 0)) |
808 |
p = get_res (database, RESFALLBACK, name); |
809 |
#endif |
810 |
} |
811 |
|
812 |
if (p == NULL && p0) |
813 |
p = p0; |
814 |
|
815 |
return p; |
816 |
} |
817 |
|
818 |
void |
819 |
rxvt_term::extract_resources () |
820 |
{ |
821 |
#ifndef NO_RESOURCES |
822 |
XrmDatabase database = XrmGetDatabase (dpy); |
823 |
XrmMergeDatabases (option_db, &database); |
824 |
option_db = NULL; |
825 |
/* |
826 |
* Query resources for options that affect us |
827 |
*/ |
828 |
for (int entry = 0; entry < ecb_array_length (optList); entry++) |
829 |
{ |
830 |
int s; |
831 |
const char *kw = optList[entry].kw; |
832 |
|
833 |
if (kw == NULL || rs[optList[entry].doff] != NULL) |
834 |
continue; // previously set |
835 |
|
836 |
const char *p = x_resource (kw); |
837 |
|
838 |
if (p) |
839 |
{ |
840 |
p = strdup (p); |
841 |
allocated.push_back ((void *)p); |
842 |
rs[optList[entry].doff] = p; |
843 |
|
844 |
if (optList_isBool (entry)) |
845 |
{ |
846 |
s = strcasecmp (p, "TRUE") == 0 |
847 |
|| strcasecmp (p, "YES") == 0 |
848 |
|| strcasecmp (p, "ON") == 0 |
849 |
|| strcasecmp (p, "1") == 0; |
850 |
|
851 |
if (optList_isReverse (entry)) |
852 |
s = !s; |
853 |
|
854 |
set_option (optList[entry].index, s); |
855 |
} |
856 |
} |
857 |
} |
858 |
#endif /* NO_RESOURCES */ |
859 |
} |
860 |
|
861 |
void |
862 |
rxvt_term::enumerate_keysym_resources (void (*cb)(rxvt_term *, const char *, const char *)) |
863 |
{ |
864 |
#ifndef NO_RESOURCES |
865 |
/* |
866 |
* [R5 or later]: enumerate the resource database |
867 |
*/ |
868 |
# ifdef KEYSYM_RESOURCE |
869 |
void *closure[2] = { |
870 |
(void *)this, |
871 |
(void *)cb, |
872 |
}; |
873 |
|
874 |
XrmDatabase database = XrmGetDatabase (dpy); |
875 |
XrmName name_prefix[3]; |
876 |
XrmClass class_prefix[3]; |
877 |
|
878 |
name_prefix[0] = XrmStringToName (rs[Rs_name]); |
879 |
name_prefix[1] = XrmStringToName ("keysym"); |
880 |
name_prefix[2] = NULLQUARK; |
881 |
class_prefix[0] = XrmStringToName (RESCLASS); |
882 |
class_prefix[1] = XrmStringToName ("Keysym"); |
883 |
class_prefix[2] = NULLQUARK; |
884 |
/* XXX: Need to check sizeof (rxvt_t) == sizeof (XPointer) */ |
885 |
XrmEnumerateDatabase (database, name_prefix, class_prefix, |
886 |
XrmEnumOneLevel, rxvt_keysym_enumerate_helper, (XPointer)closure); |
887 |
# ifdef RESFALLBACK |
888 |
name_prefix[0] = class_prefix[0] = XrmStringToName (RESFALLBACK); |
889 |
/* XXX: Need to check sizeof (rxvt_t) == sizeof (XPointer) */ |
890 |
XrmEnumerateDatabase (database, name_prefix, class_prefix, |
891 |
XrmEnumOneLevel, rxvt_keysym_enumerate_helper, (XPointer)closure); |
892 |
# endif |
893 |
# endif |
894 |
|
895 |
#endif /* NO_RESOURCES */ |
896 |
} |
897 |
|
898 |
void |
899 |
rxvt_term::extract_keysym_resources () |
900 |
{ |
901 |
enumerate_keysym_resources (rxvt_define_key); |
902 |
} |
903 |
|
904 |
/*----------------------- end-of-file (C source) -----------------------*/ |
905 |
|