1 |
/*--------------------------------*-C-*---------------------------------* |
2 |
* File: xdefaults.c |
3 |
*----------------------------------------------------------------------* |
4 |
* $Id: xdefaults.C,v 1.7 2004/01/16 22:26:18 pcg Exp $ |
5 |
* |
6 |
* All portions of code are copyright by their respective author/s. |
7 |
* Copyright (c) 1994 Robert Nation <nation@rocket.sanders.lockheed.com> |
8 |
* - original version |
9 |
* Copyright (c) 1997,1998 mj olesen <olesen@me.queensu.ca> |
10 |
* |
11 |
* 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 |
* the Free Software Foundation; either version 2 of the License, or |
14 |
* (at your option) any later version. |
15 |
* |
16 |
* This program is distributed in the hope that it will be useful, |
17 |
* but WITHOUT ANY WARRANTY; without even the implied warranty of |
18 |
* MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the |
19 |
* GNU General Public License for more details. |
20 |
* |
21 |
* You should have received a copy of the GNU General Public License |
22 |
* along with this program; if not, write to the Free Software |
23 |
* Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA. |
24 |
*----------------------------------------------------------------------*/ |
25 |
/*----------------------------------------------------------------------* |
26 |
* get resources from ~/.Xdefaults or ~/.Xresources with the memory-saving |
27 |
* default or with XGetDefault() (#define USE_XGETDEFAULT) |
28 |
*----------------------------------------------------------------------*/ |
29 |
|
30 |
#include "../config.h" /* NECESSARY */ |
31 |
#include "rxvt.h" /* NECESSARY */ |
32 |
#include "version.h" |
33 |
#include "xdefaults.intpro" /* PROTOS for internal routines */ |
34 |
|
35 |
/* #define DEBUG_RESOURCES */ |
36 |
|
37 |
static const char *const xnames[2] = { ".Xdefaults", ".Xresources" }; |
38 |
|
39 |
/*{{{ monolithic option/resource structure: */ |
40 |
/* |
41 |
* `string' options MUST have a usage argument |
42 |
* `switch' and `boolean' options have no argument |
43 |
* if there's no desc(ription), it won't appear in rxvt_usage() |
44 |
*/ |
45 |
|
46 |
/* INFO() - descriptive information only */ |
47 |
#define INFO(opt, arg, desc) \ |
48 |
{0, -1, NULL, (opt), (arg), (desc)} |
49 |
|
50 |
/* STRG() - command-line option, with/without resource */ |
51 |
#define STRG(rsp, kw, opt, arg, desc) \ |
52 |
{0, (rsp), (kw), (opt), (arg), (desc)} |
53 |
|
54 |
/* RSTRG() - resource/long-option */ |
55 |
#define RSTRG(rsp, kw, arg) \ |
56 |
{0, (rsp), (kw), NULL, (arg), NULL} |
57 |
|
58 |
/* BOOL() - regular boolean `-/+' flag */ |
59 |
#define BOOL(rsp, kw, opt, flag, desc) \ |
60 |
{(Opt_Boolean|(flag)), (rsp), (kw), (opt), NULL, (desc)} |
61 |
|
62 |
/* SWCH() - `-' flag */ |
63 |
#define SWCH(opt, flag, desc) \ |
64 |
{(flag), -1, NULL, (opt), NULL, (desc)} |
65 |
|
66 |
/* convenient macros */ |
67 |
#define optList_strlen(i) \ |
68 |
(optList[i].flag ? 0 : (optList[i].arg ? STRLEN(optList[i].arg) : 1)) |
69 |
#define optList_isBool(i) \ |
70 |
(optList[i].flag & Opt_Boolean) |
71 |
#define optList_isReverse(i) \ |
72 |
(optList[i].flag & Opt_Reverse) |
73 |
#define optList_size() \ |
74 |
(sizeof(optList) / sizeof(optList[0])) |
75 |
|
76 |
static const struct { |
77 |
const unsigned long flag; /* Option flag */ |
78 |
const int doff; /* data offset */ |
79 |
const char *kw; /* keyword */ |
80 |
const char *opt; /* option */ |
81 |
const char *arg; /* argument */ |
82 |
const char *desc; /* description */ |
83 |
} optList[] = { |
84 |
STRG(Rs_display_name, NULL, "d", NULL, NULL), /* short form */ |
85 |
STRG(Rs_display_name, NULL, "display", "string", "X server to contact"), |
86 |
STRG(Rs_term_name, "termName", "tn", "string", |
87 |
"value of the TERM environment variable"), |
88 |
STRG(Rs_geometry, NULL, "g", NULL, NULL), /* short form */ |
89 |
STRG(Rs_geometry, "geometry", "geometry", "geometry", |
90 |
"size (in characters) and position"), |
91 |
SWCH("C", Opt_console, "intercept console messages"), |
92 |
SWCH("iconic", Opt_iconic, "start iconic"), |
93 |
SWCH("ic", Opt_iconic, NULL), /* short form */ |
94 |
BOOL(Rs_reverseVideo, "reverseVideo", "rv", Opt_reverseVideo, |
95 |
"reverse video"), |
96 |
BOOL(Rs_loginShell, "loginShell", "ls", Opt_loginShell, "login shell"), |
97 |
BOOL(Rs_jumpScroll, "jumpScroll", "j", Opt_jumpScroll, "jump scrolling"), |
98 |
#ifdef HAVE_SCROLLBARS |
99 |
BOOL(Rs_scrollBar, "scrollBar", "sb", Opt_scrollBar, "scrollbar"), |
100 |
BOOL(Rs_scrollBar_right, "scrollBar_right", "sr", Opt_scrollBar_right, |
101 |
"scrollbar right"), |
102 |
BOOL(Rs_scrollBar_floating, "scrollBar_floating", "st", |
103 |
Opt_scrollBar_floating, "scrollbar without a trough"), |
104 |
#endif |
105 |
BOOL(Rs_scrollTtyOutput, "scrollTtyOutput", NULL, Opt_scrollTtyOutput, |
106 |
NULL), |
107 |
BOOL(Rs_scrollTtyOutput, NULL, "si", Opt_Reverse | Opt_scrollTtyOutput, |
108 |
"scroll-on-tty-output inhibit"), |
109 |
BOOL(Rs_scrollTtyKeypress, "scrollTtyKeypress", "sk", Opt_scrollTtyKeypress, |
110 |
"scroll-on-keypress"), |
111 |
BOOL(Rs_scrollWithBuffer, "scrollWithBuffer", "sw", Opt_scrollWithBuffer, |
112 |
"scroll-with-buffer"), |
113 |
#ifdef TRANSPARENT |
114 |
BOOL(Rs_transparent, "inheritPixmap", "ip", Opt_transparent, |
115 |
"inherit parent pixmap"), |
116 |
BOOL(Rs_transparent_all, "inheritPixmapforce", "ipf", Opt_transparent_all, |
117 |
"forcefully inherit root pixmap"), |
118 |
SWCH("tr", Opt_transparent, NULL), |
119 |
#endif |
120 |
BOOL(Rs_utmpInhibit, "utmpInhibit", "ut", Opt_utmpInhibit, "utmp inhibit"), |
121 |
#ifndef NO_BELL |
122 |
BOOL(Rs_visualBell, "visualBell", "vb", Opt_visualBell, "visual bell"), |
123 |
# if ! defined(NO_MAPALERT) && defined(MAPALERT_OPTION) |
124 |
BOOL(Rs_mapAlert, "mapAlert", NULL, Opt_mapAlert, NULL), |
125 |
# endif |
126 |
#endif |
127 |
#ifdef META8_OPTION |
128 |
BOOL(Rs_meta8, "meta8", NULL, Opt_meta8, NULL), |
129 |
#endif |
130 |
#ifdef MOUSE_WHEEL |
131 |
BOOL(Rs_mouseWheelScrollPage, "mouseWheelScrollPage", NULL, Opt_mouseWheelScrollPage, |
132 |
NULL), |
133 |
#endif |
134 |
#ifdef MULTICHAR_SET |
135 |
BOOL(Rs_mc_hack, "multibyte_cursor", "mcc", Opt_mc_hack, |
136 |
"Multibyte character cursor movement"), |
137 |
#endif |
138 |
#ifndef NO_FRILLS |
139 |
BOOL(Rs_tripleclickwords, "tripleclickwords", "tcw", Opt_tripleclickwords, |
140 |
"triple click word selection"), |
141 |
#endif |
142 |
#ifdef CURSOR_BLINK |
143 |
BOOL(Rs_cursorBlink, "cursorBlink", "bc", Opt_cursorBlink, "blinking cursor"), |
144 |
#endif |
145 |
#ifdef POINTER_BLANK |
146 |
BOOL(Rs_pointerBlank, "pointerBlank", "pb", Opt_pointerBlank, "switch off pointer after delay"), |
147 |
#endif |
148 |
STRG(Rs_color + Color_bg, "background", "bg", "color", "background color"), |
149 |
STRG(Rs_color + Color_fg, "foreground", "fg", "color", "foreground color"), |
150 |
RSTRG(Rs_color + minCOLOR + 0, "color0", "color"), |
151 |
RSTRG(Rs_color + minCOLOR + 1, "color1", "color"), |
152 |
RSTRG(Rs_color + minCOLOR + 2, "color2", "color"), |
153 |
RSTRG(Rs_color + minCOLOR + 3, "color3", "color"), |
154 |
RSTRG(Rs_color + minCOLOR + 4, "color4", "color"), |
155 |
RSTRG(Rs_color + minCOLOR + 5, "color5", "color"), |
156 |
RSTRG(Rs_color + minCOLOR + 6, "color6", "color"), |
157 |
RSTRG(Rs_color + minCOLOR + 7, "color7", "color"), |
158 |
#ifndef NO_BRIGHTCOLOR |
159 |
RSTRG(Rs_color + minBrightCOLOR + 0, "color8", "color"), |
160 |
RSTRG(Rs_color + minBrightCOLOR + 1, "color9", "color"), |
161 |
RSTRG(Rs_color + minBrightCOLOR + 2, "color10", "color"), |
162 |
RSTRG(Rs_color + minBrightCOLOR + 3, "color11", "color"), |
163 |
RSTRG(Rs_color + minBrightCOLOR + 4, "color12", "color"), |
164 |
RSTRG(Rs_color + minBrightCOLOR + 5, "color13", "color"), |
165 |
RSTRG(Rs_color + minBrightCOLOR + 6, "color14", "color"), |
166 |
RSTRG(Rs_color + minBrightCOLOR + 7, "color15", "color"), |
167 |
#endif /* NO_BRIGHTCOLOR */ |
168 |
#ifndef NO_BOLD_UNDERLINE_REVERSE |
169 |
RSTRG(Rs_color + Color_BD, "colorBD", "color"), |
170 |
RSTRG(Rs_color + Color_UL, "colorUL", "color"), |
171 |
RSTRG(Rs_color + Color_RV, "colorRV", "color"), |
172 |
#endif /* ! NO_BOLD_UNDERLINE_REVERSE */ |
173 |
#ifdef KEEP_SCROLLCOLOR |
174 |
RSTRG(Rs_color + Color_scroll, "scrollColor", "color"), |
175 |
RSTRG(Rs_color + Color_trough, "troughColor", "color"), |
176 |
#endif /* KEEP_SCROLLCOLOR */ |
177 |
#ifdef OPTION_HC |
178 |
STRG(Rs_color + Color_HC, "highlightColor", "hc", "color", "highlight color"), |
179 |
#endif |
180 |
#if defined (XPM_BACKGROUND) || (MENUBAR_MAX) |
181 |
RSTRG(Rs_path, "path", "search path"), |
182 |
#endif /* defined (XPM_BACKGROUND) || (MENUBAR_MAX) */ |
183 |
#ifdef XPM_BACKGROUND |
184 |
STRG(Rs_backgroundPixmap, "backgroundPixmap", "pixmap", "file[;geom]", |
185 |
"background pixmap"), |
186 |
#endif /* XPM_BACKGROUND */ |
187 |
#if (MENUBAR_MAX) |
188 |
RSTRG(Rs_menu, "menu", "name[;tag]"), |
189 |
#endif |
190 |
STRG(Rs_font, "font", "fn", "fontname", "normal text font"), |
191 |
/* fonts: command-line option = resource name */ |
192 |
#ifdef USE_XIM |
193 |
STRG(Rs_inputMethod, "inputMethod", "im", "name", "name of input method"), |
194 |
STRG(Rs_preeditType, "preeditType", "pt", "style", |
195 |
"input style: style = OverTheSpot|OffTheSpot|Root"), |
196 |
#if defined(HAVE_XSETLOCALE) || defined(HAVE_SETLOCALE) |
197 |
STRG(Rs_imLocale, "imLocale", "imlocale", "string", "locale to use for input method"), |
198 |
#endif |
199 |
#endif /* USE_XIM */ |
200 |
#ifdef GREEK_SUPPORT |
201 |
STRG(Rs_greek_keyboard, "greek_keyboard", "grk", "mode", |
202 |
"greek keyboard mapping; mode = iso | ibm"), |
203 |
RSTRG(Rs_greektoggle_key, "greektoggle_key", "keysym"), |
204 |
#endif |
205 |
STRG(Rs_name, NULL, "name", "string", |
206 |
"client instance, icon, and title strings"), |
207 |
STRG(Rs_title, "title", "title", "string", "title name for window"), |
208 |
STRG(Rs_title, NULL, "T", NULL, NULL), /* short form */ |
209 |
STRG(Rs_iconName, "iconName", "n", "string", "icon name for window"), |
210 |
#ifndef NO_CURSORCOLOR |
211 |
STRG(Rs_color + Color_cursor, "cursorColor", "cr", "color", "cursor color"), |
212 |
/* command-line option = resource name */ |
213 |
RSTRG(Rs_color + Color_cursor2, "cursorColor2", "color"), |
214 |
#endif /* NO_CURSORCOLOR */ |
215 |
STRG(Rs_color + Color_pointer, "pointerColor", "pr", "color", |
216 |
"pointer color"), |
217 |
STRG(Rs_color + Color_border, "borderColor", "bd", "color", |
218 |
"border color"), |
219 |
STRG(Rs_saveLines, "saveLines", "sl", "number", |
220 |
"number of scrolled lines to save"), |
221 |
#ifndef NO_FRILLS |
222 |
STRG(Rs_ext_bwidth, "externalBorder", "w", "number", |
223 |
"external border in pixels"), |
224 |
STRG(Rs_ext_bwidth, NULL, "bw", NULL, NULL), |
225 |
STRG(Rs_ext_bwidth, NULL, "borderwidth", NULL, NULL), |
226 |
STRG(Rs_int_bwidth, "internalBorder", "b", "number", |
227 |
"internal border in pixels"), |
228 |
#endif |
229 |
#ifndef NO_LINESPACE |
230 |
STRG(Rs_lineSpace, "lineSpace", "lsp", "number", |
231 |
"number of extra pixels between rows"), |
232 |
#endif |
233 |
STRG(Rs_scrollBar_thickness, "thickness", "sbt", "number", |
234 |
"scrollbar thickness/width in pixels"), |
235 |
#ifdef POINTER_BLANK |
236 |
RSTRG(Rs_pointerBlankDelay, "pointerBlankDelay", "number"), |
237 |
#endif |
238 |
#ifndef NO_BACKSPACE_KEY |
239 |
RSTRG(Rs_backspace_key, "backspacekey", "string"), |
240 |
#endif |
241 |
#ifndef NO_DELETE_KEY |
242 |
RSTRG(Rs_delete_key, "deletekey", "string"), |
243 |
#endif |
244 |
RSTRG(Rs_selectstyle, "selectstyle", "mode"), |
245 |
RSTRG(Rs_scrollstyle, "scrollstyle", "mode"), |
246 |
#ifdef HAVE_SCROLLBARS |
247 |
RSTRG(Rs_scrollBar_align, "scrollBar_align", "mode"), |
248 |
#endif |
249 |
#ifdef PRINTPIPE |
250 |
RSTRG(Rs_print_pipe, "print-pipe", "string"), |
251 |
#endif |
252 |
#if defined (HOTKEY_CTRL) || defined (HOTKEY_META) |
253 |
RSTRG(Rs_bigfont_key, "bigfont_key", "keysym"), |
254 |
RSTRG(Rs_smallfont_key, "smallfont_key", "keysym"), |
255 |
#endif |
256 |
STRG(Rs_modifier, "modifier", "mod", "modifier", |
257 |
"meta modifier = alt|meta|hyper|super|mod1|...|mod5"), |
258 |
INFO("xrm", "string", "X resource"), |
259 |
#ifdef CUTCHAR_RESOURCE |
260 |
RSTRG(Rs_cutchars, "cutchars", "string"), |
261 |
#endif /* CUTCHAR_RESOURCE */ |
262 |
#ifdef ACS_ASCII |
263 |
RSTRG(Rs_acs_chars, "acsChars", "string"), |
264 |
#endif /* ACS_ASCII */ |
265 |
RSTRG(Rs_answerbackstring, "answerbackString", "string"), |
266 |
INFO("e", "command arg ...", "command to execute") |
267 |
}; |
268 |
|
269 |
#undef INFO |
270 |
#undef STRG |
271 |
#undef RSTRG |
272 |
#undef SWCH |
273 |
#undef BOOL |
274 |
/*}}} */ |
275 |
|
276 |
static const char releasestring[] = "Rxvt v" VERSION " - released: " DATE "\n"; |
277 |
static const char optionsstring[] = "Options: " |
278 |
#if defined(XPM_BACKGROUND) |
279 |
"XPM," |
280 |
#endif |
281 |
#if defined(TRANSPARENT) |
282 |
"transparent," |
283 |
#endif |
284 |
#if defined(UTMP_SUPPORT) |
285 |
"utmp," |
286 |
#endif |
287 |
#if defined(MENUBAR) |
288 |
"menubar," |
289 |
#endif |
290 |
#if !defined(NO_FRILLS) |
291 |
"frills," |
292 |
#endif |
293 |
#if !defined(NO_LINESPACE) |
294 |
"linespace," |
295 |
#endif |
296 |
#if defined(PREFER_24BIT) |
297 |
"24bit," |
298 |
#endif |
299 |
#if defined(USE_XIM) |
300 |
"XIM," |
301 |
#endif |
302 |
#if defined(MULTICHAR_SET) |
303 |
"multichar_languages," |
304 |
#endif |
305 |
"scrollbars=" |
306 |
#if !defined(HAVE_SCROLLBARS) |
307 |
"NONE" |
308 |
#else |
309 |
# if defined(RXVT_SCROLLBAR) |
310 |
"rxvt" |
311 |
# if defined(NEXT_SCROLLBAR) || defined(XTERM_SCROLLBAR) |
312 |
"+" |
313 |
# endif |
314 |
# endif |
315 |
# if defined(NEXT_SCROLLBAR) |
316 |
"NeXT" |
317 |
# if defined(XTERM_SCROLLBAR) |
318 |
"+" |
319 |
# endif |
320 |
# endif |
321 |
# if defined(XTERM_SCROLLBAR) |
322 |
"xterm" |
323 |
# endif |
324 |
#endif |
325 |
"," |
326 |
#if defined(GREEK_SUPPORT) |
327 |
"Greek," |
328 |
#endif |
329 |
#if defined(RXVT_GRAPHICS) |
330 |
"graphics," |
331 |
#endif |
332 |
#if defined(NO_BACKSPACE_KEY) |
333 |
"no_backspace," |
334 |
#endif |
335 |
#if defined(NO_DELETE_KEY) |
336 |
"no_delete," |
337 |
#endif |
338 |
#if !defined(NO_STRINGS) |
339 |
"strings," |
340 |
#endif |
341 |
#if defined(TTY_256COLOR) |
342 |
"256colour," |
343 |
#endif |
344 |
#if defined(NO_RESOURCES) |
345 |
"NoResources" |
346 |
#else |
347 |
# if defined(USE_XGETDEFAULT) |
348 |
"XGetDefaults" |
349 |
# else |
350 |
".Xdefaults" |
351 |
# endif |
352 |
#endif |
353 |
"\nUsage: "; /* Usage */ |
354 |
|
355 |
#define INDENT 18 |
356 |
|
357 |
/*{{{ usage: */ |
358 |
/*----------------------------------------------------------------------*/ |
359 |
static void |
360 |
rxvt_usage(int type) |
361 |
{ |
362 |
unsigned int i, col; |
363 |
|
364 |
write(STDERR_FILENO, releasestring, sizeof(releasestring) - 1); |
365 |
write(STDERR_FILENO, optionsstring, sizeof(optionsstring) - 1); |
366 |
write(STDERR_FILENO, APL_NAME, sizeof(APL_NAME) - 1); |
367 |
|
368 |
switch (type) { |
369 |
case 0: /* brief listing */ |
370 |
fprintf(stderr, " [-help] [--help]\n"); |
371 |
for (col = 1, i = 0; i < optList_size(); i++) |
372 |
if (optList[i].desc != NULL) { |
373 |
int len = 0; |
374 |
|
375 |
if (!optList_isBool(i)) { |
376 |
len = optList_strlen(i); |
377 |
if (len > 0) |
378 |
len++; /* account for space */ |
379 |
} |
380 |
#ifdef DEBUG_STRICT |
381 |
assert(optList[i].opt != NULL); |
382 |
#endif |
383 |
len += 4 + STRLEN(optList[i].opt) + (optList_isBool(i) ? 2: 0); |
384 |
col += len; |
385 |
if (col > 79) { /* assume regular width */ |
386 |
putc('\n', stderr); |
387 |
col = 1 + len; |
388 |
} |
389 |
fprintf(stderr, " [-%s%s", (optList_isBool(i) ? "/+" : ""), |
390 |
optList[i].opt); |
391 |
if (optList_strlen(i)) |
392 |
fprintf(stderr, " %s]", optList[i].arg); |
393 |
else |
394 |
fprintf(stderr, "]"); |
395 |
} |
396 |
break; |
397 |
|
398 |
case 1: /* full command-line listing */ |
399 |
fprintf(stderr, " [options] [-e command args]\n\n" |
400 |
"where options include:\n"); |
401 |
for (i = 0; i < optList_size(); i++) |
402 |
if (optList[i].desc != NULL) { |
403 |
#ifdef DEBUG_STRICT |
404 |
assert(optList[i].opt != NULL); |
405 |
#endif |
406 |
fprintf(stderr, " %s%s %-*s%s%s\n", |
407 |
(optList_isBool(i) ? "-/+" : "-"), optList[i].opt, |
408 |
(INDENT - STRLEN(optList[i].opt) |
409 |
+ (optList_isBool(i) ? 0 : 2)), |
410 |
(optList[i].arg ? optList[i].arg : ""), |
411 |
(optList_isBool(i) ? "turn on/off " : ""), |
412 |
optList[i].desc); |
413 |
} |
414 |
fprintf(stderr, "\n --help to list long-options"); |
415 |
break; |
416 |
|
417 |
case 2: /* full resource listing */ |
418 |
fprintf(stderr, |
419 |
" [options] [-e command args]\n\n" |
420 |
"where resources (long-options) include:\n"); |
421 |
|
422 |
for (i = 0; i < optList_size(); i++) |
423 |
if (optList[i].kw != NULL) |
424 |
fprintf(stderr, " %s: %*s%s\n", |
425 |
optList[i].kw, |
426 |
(INDENT - STRLEN(optList[i].kw)), "", /* XXX */ |
427 |
(optList_isBool(i) ? "boolean" : optList[i].arg)); |
428 |
#ifdef KEYSYM_RESOURCE |
429 |
fprintf(stderr, " " "keysym.sym" ": %*s%s\n", |
430 |
(INDENT - sizeof("keysym.sym") + 1), "", /* XXX */ |
431 |
"keysym"); |
432 |
#endif |
433 |
fprintf(stderr, "\n -help to list options"); |
434 |
break; |
435 |
} |
436 |
fprintf(stderr, "\n\n"); |
437 |
exit(EXIT_FAILURE); |
438 |
/* NOTREACHED */ |
439 |
} |
440 |
|
441 |
/*}}} */ |
442 |
|
443 |
/*{{{ get command-line options before getting resources */ |
444 |
void |
445 |
rxvt_term::get_options (int argc, const char *const *argv) |
446 |
{ |
447 |
int i, bad_option = 0; |
448 |
static const char On[3] = "ON", Off[4] = "OFF"; |
449 |
|
450 |
for (i = 1; i < argc; i++) { |
451 |
unsigned int entry, longopt = 0; |
452 |
const char *flag, *opt; |
453 |
|
454 |
opt = argv[i]; |
455 |
#ifdef DEBUG_RESOURCES |
456 |
fprintf(stderr, "argv[%d] = %s: ", i, opt); |
457 |
#endif |
458 |
if (*opt == '-') { |
459 |
flag = On; |
460 |
if (*++opt == '-') |
461 |
longopt = *opt++; /* long option */ |
462 |
} else if (*opt == '+') { |
463 |
flag = Off; |
464 |
if (*++opt == '+') |
465 |
longopt = *opt++; /* long option */ |
466 |
} else { |
467 |
bad_option = 1; |
468 |
rxvt_print_error("bad option \"%s\"", opt); |
469 |
continue; |
470 |
} |
471 |
|
472 |
if (!STRCMP(opt, "help")) |
473 |
rxvt_usage(longopt ? 2 : 1); |
474 |
if (!STRCMP(opt, "h")) |
475 |
rxvt_usage(0); |
476 |
|
477 |
/* feature: always try to match long-options */ |
478 |
for (entry = 0; entry < optList_size(); entry++) |
479 |
if ((optList[entry].kw && !STRCMP(opt, optList[entry].kw)) |
480 |
|| (!longopt |
481 |
&& optList[entry].opt && !STRCMP(opt, optList[entry].opt))) |
482 |
break; |
483 |
|
484 |
if (entry < optList_size()) { |
485 |
if (optList_isReverse(entry)) |
486 |
flag = flag == On ? Off : On; |
487 |
if (optList_strlen(entry)) { /* string value */ |
488 |
const char *str = argv[++i]; |
489 |
|
490 |
#ifdef DEBUG_RESOURCES |
491 |
fprintf(stderr, "string (%s,%s) = ", |
492 |
optList[entry].opt ? optList[entry].opt : "nil", |
493 |
optList[entry].kw ? optList[entry].kw : "nil"); |
494 |
#endif |
495 |
if (flag == On && str && (optList[entry].doff != -1)) { |
496 |
#ifdef DEBUG_RESOURCES |
497 |
fprintf(stderr, "\"%s\"\n", str); |
498 |
#endif |
499 |
rs[optList[entry].doff] = str; |
500 |
/* |
501 |
* special cases are handled in main.c:main() to allow |
502 |
* X resources to set these values before we settle for |
503 |
* default values |
504 |
*/ |
505 |
} |
506 |
#ifdef DEBUG_RESOURCES |
507 |
else |
508 |
fprintf(stderr, "???\n"); |
509 |
#endif |
510 |
} else { /* boolean value */ |
511 |
#ifdef DEBUG_RESOURCES |
512 |
fprintf(stderr, "boolean (%s,%s) = %s\n", |
513 |
optList[entry].opt, optList[entry].kw, flag); |
514 |
#endif |
515 |
if (flag == On) |
516 |
Options |= (optList[entry].flag); |
517 |
else |
518 |
Options &= ~(optList[entry].flag); |
519 |
|
520 |
if (optList[entry].doff != -1) |
521 |
rs[optList[entry].doff] = flag; |
522 |
} |
523 |
} else |
524 |
#ifdef KEYSYM_RESOURCE |
525 |
/* if (!STRNCMP(opt, "keysym.", sizeof("keysym.") - 1)) */ |
526 |
if (rxvt_Str_match(opt, "keysym.")) { |
527 |
const char *str = argv[++i]; |
528 |
|
529 |
if (str != NULL) |
530 |
parse_keysym (opt + sizeof("keysym.") - 1, str); |
531 |
} else |
532 |
#endif |
533 |
bad_option = 1; |
534 |
} |
535 |
|
536 |
if (bad_option) |
537 |
rxvt_usage(0); |
538 |
} |
539 |
|
540 |
/*}}} */ |
541 |
|
542 |
#ifndef NO_RESOURCES |
543 |
/*----------------------------------------------------------------------*/ |
544 |
|
545 |
# ifdef KEYSYM_RESOURCE |
546 |
/* |
547 |
* Define key from XrmEnumerateDatabase. |
548 |
* quarks will be something like |
549 |
* "rxvt" "keysym" "0xFF01" |
550 |
* value will be a string |
551 |
*/ |
552 |
/* ARGSUSED */ |
553 |
bool |
554 |
rxvt_define_key(XrmDatabase *database __attribute__((unused)), XrmBindingList bindings __attribute__((unused)), XrmQuarkList quarks, XrmRepresentation *type __attribute__((unused)), XrmValue *value, XPointer closure __attribute__((unused))) |
555 |
{ |
556 |
int last; |
557 |
|
558 |
for (last = 0; quarks[last] != NULLQUARK; last++) /* look for last quark in list */ |
559 |
; |
560 |
last--; |
561 |
GET_R->parse_keysym (XrmQuarkToString(quarks[last]), (char *)value->addr);//D//TODO |
562 |
return False; |
563 |
} |
564 |
|
565 |
/* |
566 |
* look for something like this (XK_Delete) |
567 |
* rxvt*keysym.0xFFFF: "\177" |
568 |
* |
569 |
* arg will be |
570 |
* NULL for ~/.Xdefaults and |
571 |
* non-NULL for command-line options (need to allocate) |
572 |
*/ |
573 |
#define NEWARGLIM 500 /* `reasonable' size */ |
574 |
int |
575 |
rxvt_term::parse_keysym (const char *str, const char *arg) |
576 |
{ |
577 |
int n, sym; |
578 |
char *key_string, *newarg = NULL; |
579 |
char newargstr[NEWARGLIM]; |
580 |
|
581 |
if (arg == NULL) { |
582 |
if ((n = rxvt_Str_match(str, "keysym.")) == 0) |
583 |
return 0; |
584 |
str += n; /* skip `keysym.' */ |
585 |
} |
586 |
/* some scanf() have trouble with a 0x prefix */ |
587 |
if (isdigit(str[0])) { |
588 |
if (str[0] == '0' && toupper(str[1]) == 'X') |
589 |
str += 2; |
590 |
if (arg) { |
591 |
if (sscanf(str, (STRCHR(str, ':') ? "%x:" : "%x"), &sym) != 1) |
592 |
return -1; |
593 |
} else { |
594 |
if (sscanf(str, "%x:", &sym) != 1) |
595 |
return -1; |
596 |
|
597 |
/* cue to ':', it's there since sscanf() worked */ |
598 |
STRNCPY(newargstr, STRCHR(str, ':') + 1, NEWARGLIM - 1); |
599 |
newargstr[NEWARGLIM - 1] = '\0'; |
600 |
newarg = newargstr; |
601 |
} |
602 |
} else { |
603 |
/* |
604 |
* convert keysym name to keysym number |
605 |
*/ |
606 |
STRNCPY(newargstr, str, NEWARGLIM - 1); |
607 |
newargstr[NEWARGLIM - 1] = '\0'; |
608 |
if (arg == NULL) { |
609 |
if ((newarg = STRCHR(newargstr, ':')) == NULL) |
610 |
return -1; |
611 |
*newarg++ = '\0'; /* terminate keysym name */ |
612 |
} |
613 |
if ((sym = XStringToKeysym(newargstr)) == None) |
614 |
return -1; |
615 |
} |
616 |
|
617 |
if (sym < 0xFF00 || sym > 0xFFFF) /* we only do extended keys */ |
618 |
return -1; |
619 |
sym &= 0xFF; |
620 |
if (Keysym_map[sym] != NULL) /* already set ? */ |
621 |
return -1; |
622 |
|
623 |
if (newarg == NULL) { |
624 |
STRNCPY(newargstr, arg, NEWARGLIM - 1); |
625 |
newargstr[NEWARGLIM - 1] = '\0'; |
626 |
newarg = newargstr; |
627 |
} |
628 |
rxvt_Str_trim(newarg); |
629 |
if (*newarg == '\0' || (n = rxvt_Str_escaped(newarg)) == 0) |
630 |
return -1; |
631 |
MIN_IT(n, 255); |
632 |
key_string = (char *)rxvt_malloc((n + 1) * sizeof(char)); |
633 |
|
634 |
key_string[0] = n; |
635 |
STRNCPY(key_string + 1, newarg, n); |
636 |
Keysym_map[sym] = (unsigned char *)key_string; |
637 |
|
638 |
return 1; |
639 |
} |
640 |
|
641 |
# endif /* KEYSYM_RESOURCE */ |
642 |
|
643 |
# ifndef USE_XGETDEFAULT |
644 |
/*{{{ rxvt_get_xdefaults() */ |
645 |
/* |
646 |
* the matching algorithm used for memory-save fake resources |
647 |
*/ |
648 |
void |
649 |
rxvt_term::get_xdefaults (FILE *stream, const char *name) |
650 |
{ |
651 |
unsigned int len; |
652 |
char *str, buffer[256]; |
653 |
|
654 |
if (stream == NULL) |
655 |
return; |
656 |
len = STRLEN(name); |
657 |
while ((str = fgets(buffer, sizeof(buffer), stream)) != NULL) { |
658 |
unsigned int entry, n; |
659 |
|
660 |
while (*str && isspace(*str)) |
661 |
str++; /* leading whitespace */ |
662 |
|
663 |
if ((str[len] != '*' && str[len] != '.') |
664 |
|| (len && STRNCMP(str, name, len))) |
665 |
continue; |
666 |
str += (len + 1); /* skip `name*' or `name.' */ |
667 |
|
668 |
# ifdef KEYSYM_RESOURCE |
669 |
if (!parse_keysym (str, NULL)) |
670 |
# endif /* KEYSYM_RESOURCE */ |
671 |
for (entry = 0; entry < optList_size(); entry++) { |
672 |
const char *kw = optList[entry].kw; |
673 |
|
674 |
if (kw == NULL) |
675 |
continue; |
676 |
n = STRLEN (kw); |
677 |
if (str[n] == ':' && rxvt_Str_match(str, kw)) { |
678 |
/* skip `keyword:' */ |
679 |
str += (n + 1); |
680 |
rxvt_Str_trim(str); |
681 |
n = STRLEN(str); |
682 |
if (n && rs[optList[entry].doff] == NULL) { |
683 |
/* not already set */ |
684 |
int s; |
685 |
char *p = (char *)rxvt_malloc((n + 1) * sizeof(char)); |
686 |
|
687 |
STRCPY(p, str); |
688 |
rs[optList[entry].doff] = p; |
689 |
if (optList_isBool(entry)) { |
690 |
s = STRCASECMP(str, "TRUE") == 0 |
691 |
|| STRCASECMP(str, "YES") == 0 |
692 |
|| STRCASECMP(str, "ON") == 0 |
693 |
|| STRCASECMP(str, "1") == 0; |
694 |
if (optList_isReverse(entry)) |
695 |
s = !s; |
696 |
if (s) |
697 |
Options |= (optList[entry].flag); |
698 |
else |
699 |
Options &= ~(optList[entry].flag); |
700 |
} |
701 |
} |
702 |
break; |
703 |
} |
704 |
} |
705 |
} |
706 |
rewind(stream); |
707 |
} |
708 |
|
709 |
/*}}} */ |
710 |
# endif /* ! USE_XGETDEFAULT */ |
711 |
#endif /* NO_RESOURCES */ |
712 |
|
713 |
/*{{{ read the resources files */ |
714 |
/* |
715 |
* using XGetDefault() or the hand-rolled replacement |
716 |
*/ |
717 |
/* ARGSUSED */ |
718 |
void |
719 |
rxvt_term::extract_resources (Display *display __attribute__((unused)), const char *name) |
720 |
{ |
721 |
#ifndef NO_RESOURCES |
722 |
|
723 |
# if defined XAPPLOADDIR |
724 |
# if defined(HAVE_XSETLOCALE) || defined(HAVE_SETLOCALE) |
725 |
/* Compute the path of the possibly available localized Rxvt file */ |
726 |
char *localepath = NULL; |
727 |
|
728 |
if (locale != NULL) { /* XXX: must limit length of string */ |
729 |
localepath = (char *)rxvt_malloc(256); |
730 |
sprintf(localepath, XAPPLOADDIRLOCALE "/" APL_SUBCLASS, |
731 |
(int)(258 - sizeof(XAPPLOADDIRLOCALE) - sizeof(APL_SUBCLASS)), |
732 |
locale); /* 258 = 255 + 4 (-.*s) - 1 (/) */ |
733 |
} |
734 |
|
735 |
{ |
736 |
# endif |
737 |
# endif |
738 |
|
739 |
# ifdef USE_XGETDEFAULT |
740 |
/* |
741 |
* get resources using the X library function |
742 |
*/ |
743 |
int entry; |
744 |
|
745 |
# ifdef XrmEnumOneLevel |
746 |
int i; |
747 |
char *displayResource, *xe; |
748 |
XrmName name_prefix[3]; |
749 |
XrmClass class_prefix[3]; |
750 |
XrmDatabase database, rdb1; |
751 |
char fname[1024]; |
752 |
|
753 |
XrmInitialize(); |
754 |
database = NULL; |
755 |
|
756 |
/* Get any Xserver defaults */ |
757 |
|
758 |
displayResource = XResourceManagerString(display); |
759 |
if (displayResource != NULL) |
760 |
database = XrmGetStringDatabase(displayResource); |
761 |
|
762 |
# ifdef HAVE_EXTRA_XRESOURCE_FILES |
763 |
/* Add in ~/.Xdefaults or ~/.Xresources */ |
764 |
{ |
765 |
char *ptr; |
766 |
|
767 |
if ((ptr = (char *)getenv("HOME")) == NULL) |
768 |
ptr = "."; |
769 |
|
770 |
for (i = 0; i < (sizeof(xnames) / sizeof(xnames[0])); i++) { |
771 |
sprintf(fname, "%-.*s/%s", sizeof(fname) - STRLEN(xnames[i]) - 2, |
772 |
ptr, xnames[i]); |
773 |
if ((rdb1 = XrmGetFileDatabase(fname)) != NULL) { |
774 |
XrmMergeDatabases(rdb1, &database); |
775 |
# ifndef HAVE_BOTH_XRESOURCE_FILES |
776 |
break; |
777 |
# endif |
778 |
} |
779 |
} |
780 |
} |
781 |
# endif |
782 |
|
783 |
/* Add in XENVIRONMENT file */ |
784 |
|
785 |
if ((xe = (char *)getenv("XENVIRONMENT")) != NULL |
786 |
&& (rdb1 = XrmGetFileDatabase(xe)) != NULL) |
787 |
XrmMergeDatabases(rdb1, &database); |
788 |
|
789 |
/* Add in Rxvt file */ |
790 |
# if defined(HAVE_XSETLOCALE) || defined(HAVE_SETLOCALE) |
791 |
if (localepath == NULL || (rdb1 = XrmGetFileDatabase(localepath)) == NULL) |
792 |
# endif |
793 |
rdb1 = XrmGetFileDatabase(XAPPLOADDIR "/" APL_SUBCLASS); |
794 |
if (rdb1 != NULL) |
795 |
XrmMergeDatabases(rdb1, &database); |
796 |
|
797 |
/* Add in $XAPPLRESDIR/Rxvt only; not bothering with XUSERFILESEARCHPATH */ |
798 |
if ((xe = (char *)getenv("XAPPLRESDIR")) != NULL) { |
799 |
sprintf(fname, "%-.*s/" APL_SUBCLASS, sizeof(fname) |
800 |
- sizeof(APL_SUBCLASS) - 2, xe); |
801 |
if ((rdb1 = XrmGetFileDatabase(fname)) != NULL) |
802 |
XrmMergeDatabases(rdb1, &database); |
803 |
} |
804 |
|
805 |
XrmSetDatabase(display, database); |
806 |
# endif |
807 |
|
808 |
/* |
809 |
* Query resources for options that affect us |
810 |
*/ |
811 |
for (entry = 0; entry < optList_size(); entry++) { |
812 |
int s; |
813 |
char *p, *p0; |
814 |
const char *kw = optList[entry].kw; |
815 |
|
816 |
if (kw == NULL || rs[optList[entry].doff] != NULL) |
817 |
continue; /* previously set */ |
818 |
|
819 |
p = XGetDefault(display, name, kw); |
820 |
p0 = XGetDefault(display, "!INVALIDPROGRAMMENAMEDONTMATCH!", kw); |
821 |
if (p == NULL || (p0 && STRCMP(p, p0) == 0)) { |
822 |
p = XGetDefault(display, APL_SUBCLASS, kw); |
823 |
if (p == NULL || (p0 && STRCMP(p, p0) == 0)) |
824 |
p = XGetDefault(display, APL_CLASS, kw); |
825 |
} |
826 |
if (p == NULL && p0) |
827 |
p = p0; |
828 |
if (p) { |
829 |
rs[optList[entry].doff] = p; |
830 |
|
831 |
if (optList_isBool(entry)) { |
832 |
s = STRCASECMP(p, "TRUE") == 0 |
833 |
|| STRCASECMP(p, "YES") == 0 |
834 |
|| STRCASECMP(p, "ON") == 0 |
835 |
|| STRCASECMP(p, "1") == 0; |
836 |
if (optList_isReverse(entry)) |
837 |
s = !s; |
838 |
if (s) |
839 |
Options |= (optList[entry].flag); |
840 |
else |
841 |
Options &= ~(optList[entry].flag); |
842 |
} |
843 |
} |
844 |
} |
845 |
|
846 |
/* |
847 |
* [R5 or later]: enumerate the resource database |
848 |
*/ |
849 |
# ifdef XrmEnumOneLevel |
850 |
# ifdef KEYSYM_RESOURCE |
851 |
name_prefix[0] = XrmStringToName(name); |
852 |
name_prefix[1] = XrmStringToName("keysym"); |
853 |
name_prefix[2] = NULLQUARK; |
854 |
class_prefix[0] = XrmStringToName(APL_SUBCLASS); |
855 |
class_prefix[1] = XrmStringToName("Keysym"); |
856 |
class_prefix[2] = NULLQUARK; |
857 |
/* XXX: Need to check sizeof(rxvt_t) == sizeof(XPointer) */ |
858 |
XrmEnumerateDatabase(XrmGetDatabase(display), name_prefix, class_prefix, |
859 |
XrmEnumOneLevel, rxvt_define_key, NULL); |
860 |
name_prefix[0] = XrmStringToName(APL_CLASS); |
861 |
name_prefix[1] = XrmStringToName("keysym"); |
862 |
class_prefix[0] = XrmStringToName(APL_CLASS); |
863 |
class_prefix[1] = XrmStringToName("Keysym"); |
864 |
/* XXX: Need to check sizeof(rxvt_t) == sizeof(XPointer) */ |
865 |
XrmEnumerateDatabase(XrmGetDatabase(display), name_prefix, class_prefix, |
866 |
XrmEnumOneLevel, rxvt_define_key, NULL); |
867 |
# endif |
868 |
# endif |
869 |
|
870 |
# else /* USE_XGETDEFAULT */ |
871 |
/* get resources the hard way, but save lots of memory */ |
872 |
FILE *fd = NULL; |
873 |
char *home; |
874 |
|
875 |
if ((home = getenv("HOME")) != NULL) { |
876 |
unsigned int i, len = STRLEN(home) + 2; |
877 |
char *f = NULL; |
878 |
|
879 |
for (i = 0; i < (sizeof(xnames) / sizeof(xnames[0])); i++) { |
880 |
f = (char *)rxvt_realloc(f, (len + STRLEN(xnames[i])) * sizeof(char)); |
881 |
|
882 |
sprintf(f, "%s/%s", home, xnames[i]); |
883 |
|
884 |
if ((fd = fopen(f, "r")) != NULL) |
885 |
break; |
886 |
} |
887 |
free(f); |
888 |
} |
889 |
/* |
890 |
* The normal order to match resources is the following: |
891 |
* @ global resources (partial match, ~/.Xdefaults) |
892 |
* @ application file resources (XAPPLOADDIR/Rxvt) |
893 |
* @ class resources (~/.Xdefaults) |
894 |
* @ private resources (~/.Xdefaults) |
895 |
* |
896 |
* However, for the hand-rolled resources, the matching algorithm |
897 |
* checks if a resource string value has already been allocated |
898 |
* and won't overwrite it with (in this case) a less specific |
899 |
* resource value. |
900 |
* |
901 |
* This avoids multiple allocation. Also, when we've called this |
902 |
* routine command-line string options have already been applied so we |
903 |
* needn't to allocate for those resources. |
904 |
* |
905 |
* So, search in resources from most to least specific. |
906 |
* |
907 |
* Also, use a special sub-class so that we can use either or both of |
908 |
* "XTerm" and "Rxvt" as class names. |
909 |
*/ |
910 |
|
911 |
get_xdefaults (fd, name); |
912 |
get_xdefaults (fd, APL_SUBCLASS); |
913 |
|
914 |
# if defined(XAPPLOADDIR) && defined(USE_XAPPLOADDIR) |
915 |
{ |
916 |
FILE *ad = NULL; |
917 |
|
918 |
# if defined(HAVE_XSETLOCALE) || defined(HAVE_SETLOCALE) |
919 |
if (localepath == NULL || (ad = fopen(localepath, "r")) == NULL) |
920 |
# endif |
921 |
ad = fopen(XAPPLOADDIR "/" APL_SUBCLASS, "r"); |
922 |
if (ad != NULL) { |
923 |
get_xdefaults (ad, APL_SUBCLASS); |
924 |
get_xdefaults (ad, ""); |
925 |
fclose(ad); |
926 |
} |
927 |
} |
928 |
# endif /* XAPPLOADDIR */ |
929 |
|
930 |
get_xdefaults (fd, APL_CLASS); |
931 |
get_xdefaults (fd, ""); /* partial match */ |
932 |
if (fd != NULL) |
933 |
fclose(fd); |
934 |
# endif /* USE_XGETDEFAULT */ |
935 |
|
936 |
# if defined XAPPLOADDIR |
937 |
# if defined(HAVE_XSETLOCALE) || defined(HAVE_SETLOCALE) |
938 |
} |
939 |
|
940 |
/* Free the path of the possibly available localized Rxvt file */ |
941 |
free(localepath); |
942 |
# endif |
943 |
# endif |
944 |
|
945 |
#endif /* NO_RESOURCES */ |
946 |
|
947 |
/* |
948 |
* even without resources, at least do this setup for command-line |
949 |
* options and command-line long options |
950 |
*/ |
951 |
#ifdef MULTICHAR_SET |
952 |
set_multichar_encoding (rs[Rs_multichar_encoding]); |
953 |
#endif |
954 |
#ifdef GREEK_SUPPORT |
955 |
/* this could be a function in grkelot.c */ |
956 |
/* void set_greek_keyboard (const char * str); */ |
957 |
if (rs[Rs_greek_keyboard]) { |
958 |
if (!STRCMP(rs[Rs_greek_keyboard], "iso")) |
959 |
greek_setmode(GREEK_ELOT928); /* former -grk9 */ |
960 |
else if (!STRCMP(rs[Rs_greek_keyboard], "ibm")) |
961 |
greek_setmode(GREEK_IBM437); /* former -grk4 */ |
962 |
} |
963 |
{ |
964 |
KeySym sym; |
965 |
|
966 |
if (rs[Rs_greektoggle_key] |
967 |
&& ((sym = XStringToKeysym(rs[Rs_greektoggle_key])) != 0)) |
968 |
ks_greekmodeswith = sym; |
969 |
} |
970 |
#endif /* GREEK_SUPPORT */ |
971 |
|
972 |
#if defined (HOTKEY_CTRL) || defined (HOTKEY_META) |
973 |
{ |
974 |
KeySym sym; |
975 |
|
976 |
if (rs[Rs_bigfont_key] |
977 |
&& ((sym = XStringToKeysym(rs[Rs_bigfont_key])) != 0)) |
978 |
ks_bigfont = sym; |
979 |
if (rs[Rs_smallfont_key] |
980 |
&& ((sym = XStringToKeysym(rs[Rs_smallfont_key])) != 0)) |
981 |
ks_smallfont = sym; |
982 |
} |
983 |
#endif |
984 |
} |
985 |
|
986 |
/*}}} */ |
987 |
/*----------------------- end-of-file (C source) -----------------------*/ |