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