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