ViewVC Help
View File | Revision Log | Show Annotations | Download File
/cvs/rxvt-unicode/src/xdefaults.C
(Generate patch)

Comparing rxvt-unicode/src/xdefaults.C (file contents):
Revision 1.49 by root, Thu Feb 3 10:24:10 2005 UTC vs.
Revision 1.69 by root, Wed Jan 4 04:42:45 2006 UTC

29 29
30#include "../config.h" /* NECESSARY */ 30#include "../config.h" /* NECESSARY */
31#include "rxvt.h" /* NECESSARY */ 31#include "rxvt.h" /* NECESSARY */
32#include "version.h" 32#include "version.h"
33 33
34#include <sys/utsname.h>
35
34#ifdef KEYSYM_RESOURCE 36#ifdef KEYSYM_RESOURCE
35#include "keyboard.h" 37#include "keyboard.h"
36#endif 38#endif
37 39
40/* place holders used for parsing command-line options */
41#define Optflag_Reverse 0x40000000UL
42#define Optflag_Boolean 0x80000000UL
43#define Optflag_mask 0x3fffffffUL
44
38/* #define DEBUG_RESOURCES */ 45/* #define DEBUG_RESOURCES */
39
40static const char *const xnames[2] = { ".Xdefaults", ".Xresources" };
41 46
42/*{{{ monolithic option/resource structure: */ 47/*{{{ monolithic option/resource structure: */
43/* 48/*
44 * `string' options MUST have a usage argument 49 * `string' options MUST have a usage argument
45 * `switch' and `boolean' options have no argument 50 * `switch' and `boolean' options have no argument
58#define RSTRG(rsp, kw, arg) \ 63#define RSTRG(rsp, kw, arg) \
59 {0, (rsp), (kw), NULL, (arg), NULL} 64 {0, (rsp), (kw), NULL, (arg), NULL}
60 65
61/* BOOL () - regular boolean `-/+' flag */ 66/* BOOL () - regular boolean `-/+' flag */
62#define BOOL(rsp, kw, opt, flag, desc) \ 67#define BOOL(rsp, kw, opt, flag, desc) \
63 { (Opt_Boolean| (flag)), (rsp), (kw), (opt), NULL, (desc)} 68 { (Optflag_Boolean | (flag)), (rsp), (kw), (opt), NULL, (desc)}
64 69
65/* SWCH () - `-' flag */ 70/* SWCH () - `-' flag */
66#define SWCH(opt, flag, desc) \ 71#define SWCH(opt, flag, desc) \
67 { (flag), -1, NULL, (opt), NULL, (desc)} 72 { (flag), -1, NULL, (opt), NULL, (desc)}
68 73
69/* convenient macros */ 74/* convenient macros */
70#define optList_strlen(i) \ 75#define optList_strlen(i) \
71 (optList[i].flag ? 0 : (optList[i].arg ? strlen (optList[i].arg) : 1)) 76 (optList[i].flag ? 0 : (optList[i].arg ? strlen (optList[i].arg) : 1))
72#define optList_isBool(i) \ 77#define optList_isBool(i) \
73 (optList[i].flag & Opt_Boolean) 78 (optList[i].flag & Optflag_Boolean)
74#define optList_isReverse(i) \ 79#define optList_isReverse(i) \
75 (optList[i].flag & Opt_Reverse) 80 (optList[i].flag & Optflag_Reverse)
76#define optList_size() \ 81#define optList_size \
77 (sizeof (optList) / sizeof (optList[0])) 82 (sizeof (optList) / sizeof (optList[0]))
78 83
79static const struct 84static const struct
80 { 85 {
81 const unsigned long flag; /* Option flag */ 86 const unsigned long flag; /* Option flag */
96 SWCH ("ic", Opt_iconic, NULL), /* short form */ 101 SWCH ("ic", Opt_iconic, NULL), /* short form */
97 BOOL (Rs_reverseVideo, "reverseVideo", "rv", Opt_reverseVideo, "reverse video"), 102 BOOL (Rs_reverseVideo, "reverseVideo", "rv", Opt_reverseVideo, "reverse video"),
98 BOOL (Rs_loginShell, "loginShell", "ls", Opt_loginShell, "login shell"), 103 BOOL (Rs_loginShell, "loginShell", "ls", Opt_loginShell, "login shell"),
99 BOOL (Rs_jumpScroll, "jumpScroll", "j", Opt_jumpScroll, "jump scrolling"), 104 BOOL (Rs_jumpScroll, "jumpScroll", "j", Opt_jumpScroll, "jump scrolling"),
100 BOOL (Rs_pastableTabs, "pastableTabs", "ptab", Opt_pastableTabs, "tab characters are pastable"), 105 BOOL (Rs_pastableTabs, "pastableTabs", "ptab", Opt_pastableTabs, "tab characters are pastable"),
101#ifdef HAVE_SCROLLBARS 106#if HAVE_SCROLLBARS
102 RSTRG (Rs_scrollstyle, "scrollstyle", "mode"), 107 RSTRG (Rs_scrollstyle, "scrollstyle", "mode"),
103 BOOL (Rs_scrollBar, "scrollBar", "sb", Opt_scrollBar, "scrollbar"), 108 BOOL (Rs_scrollBar, "scrollBar", "sb", Opt_scrollBar, "scrollbar"),
104 BOOL (Rs_scrollBar_right, "scrollBar_right", "sr", Opt_scrollBar_right, "scrollbar right"), 109 BOOL (Rs_scrollBar_right, "scrollBar_right", "sr", Opt_scrollBar_right, "scrollbar right"),
105 BOOL (Rs_scrollBar_floating, "scrollBar_floating", "st", Opt_scrollBar_floating, "scrollbar without a trough"), 110 BOOL (Rs_scrollBar_floating, "scrollBar_floating", "st", Opt_scrollBar_floating, "scrollbar without a trough"),
106 RSTRG (Rs_scrollBar_align, "scrollBar_align", "mode"), 111 RSTRG (Rs_scrollBar_align, "scrollBar_align", "mode"),
107 STRG (Rs_scrollBar_thickness, "thickness", "sbt", "number", "scrollbar thickness/width in pixels"), 112 STRG (Rs_scrollBar_thickness, "thickness", "sbt", "number", "scrollbar thickness/width in pixels"),
108#endif 113#endif
109 BOOL (Rs_scrollTtyOutput, "scrollTtyOutput", NULL, Opt_scrollTtyOutput, NULL), 114 BOOL (Rs_scrollTtyOutput, "scrollTtyOutput", NULL, Opt_scrollTtyOutput, NULL),
110 BOOL (Rs_scrollTtyOutput, NULL, "si", Opt_Reverse | Opt_scrollTtyOutput, "scroll-on-tty-output inhibit"), 115 BOOL (Rs_scrollTtyOutput, NULL, "si", Optflag_Reverse | Opt_scrollTtyOutput, "scroll-on-tty-output inhibit"),
111 BOOL (Rs_scrollTtyKeypress, "scrollTtyKeypress", "sk", Opt_scrollTtyKeypress, "scroll-on-keypress"), 116 BOOL (Rs_scrollTtyKeypress, "scrollTtyKeypress", "sk", Opt_scrollTtyKeypress, "scroll-on-keypress"),
112 BOOL (Rs_scrollWithBuffer, "scrollWithBuffer", "sw", Opt_scrollWithBuffer, "scroll-with-buffer"), 117 BOOL (Rs_scrollWithBuffer, "scrollWithBuffer", "sw", Opt_scrollWithBuffer, "scroll-with-buffer"),
113#ifdef TRANSPARENT 118#if TRANSPARENT
114 BOOL (Rs_transparent, "inheritPixmap", "ip", Opt_transparent, "inherit parent pixmap"), 119 BOOL (Rs_transparent, "inheritPixmap", "ip", Opt_transparent, "inherit parent pixmap"),
115 BOOL (Rs_transparent_all, "inheritPixmapforce", "ipf", Opt_transparent_all, "forcefully inherit root pixmap"),
116 SWCH ("tr", Opt_transparent, NULL), 120 SWCH ("tr", Opt_transparent, NULL),
121# if TINTING
122 STRG (Rs_color + Color_tint, "tintColor", "tint", "color", "tint color"),
123# endif
124#endif
125#if OFF_FOCUS_FADING
126 STRG (Rs_fade, "fading", "fade", "%", "fade colors x% percent when rxvt-unicode is losing focus"),
127 STRG (Rs_color + Color_fade, "fadeColor", "fadecolor", "color", "target color for off-focus fading"),
128#endif
117#if TINTING 129#if TINTING
118 STRG (Rs_color + Color_tint, "tintColor", "tint", "color", "tint color"),
119#endif
120#endif
121#ifdef OFF_FOCUS_FADING
122 STRG (Rs_fade, "fading", "fade", "%", "make colors x% darker when rxvt-unicode is losing focus."),
123#endif
124#ifdef TINTING
125 STRG (Rs_shade, "shading", "sh", "%", "shade background by x% when tinting."), 130 STRG (Rs_shade, "shading", "sh", "%", "shade background by x% when tinting."),
126#endif 131#endif
127 BOOL (Rs_utmpInhibit, "utmpInhibit", "ut", Opt_utmpInhibit, "utmp inhibit"), 132 BOOL (Rs_utmpInhibit, "utmpInhibit", "ut", Opt_utmpInhibit, "utmp inhibit"),
128#ifndef NO_BELL 133#ifndef NO_BELL
129 BOOL (Rs_visualBell, "visualBell", "vb", Opt_visualBell, "visual bell"), 134 BOOL (Rs_visualBell, "visualBell", "vb", Opt_visualBell, "visual bell"),
138 BOOL (Rs_mouseWheelScrollPage, "mouseWheelScrollPage", NULL, Opt_mouseWheelScrollPage, NULL), 143 BOOL (Rs_mouseWheelScrollPage, "mouseWheelScrollPage", NULL, Opt_mouseWheelScrollPage, NULL),
139#endif 144#endif
140#if ENABLE_FRILLS 145#if ENABLE_FRILLS
141 BOOL (Rs_tripleclickwords, "tripleclickwords", "tcw", Opt_tripleclickwords, "triple click word selection"), 146 BOOL (Rs_tripleclickwords, "tripleclickwords", "tcw", Opt_tripleclickwords, "triple click word selection"),
142 BOOL (Rs_insecure, "insecure", "insecure", Opt_insecure, "enable possibly insecure escape sequences"), 147 BOOL (Rs_insecure, "insecure", "insecure", Opt_insecure, "enable possibly insecure escape sequences"),
148 BOOL (Rs_cursorUnderline, "cursorUnderline", "uc", Opt_cursorUnderline, "underline cursor"),
143#endif 149#endif
144#ifdef CURSOR_BLINK 150#if CURSOR_BLINK
145 BOOL (Rs_cursorBlink, "cursorBlink", "bc", Opt_cursorBlink, "blinking cursor"), 151 BOOL (Rs_cursorBlink, "cursorBlink", "bc", Opt_cursorBlink, "blinking cursor"),
146#endif 152#endif
147#ifdef POINTER_BLANK 153#ifdef POINTER_BLANK
148 BOOL (Rs_pointerBlank, "pointerBlank", "pb", Opt_pointerBlank, "switch off pointer after delay"), 154 BOOL (Rs_pointerBlank, "pointerBlank", "pb", Opt_pointerBlank, "switch off pointer after delay"),
149#endif 155#endif
204 STRG (Rs_font, "font", "fn", "fontname", "normal text font"), 210 STRG (Rs_font, "font", "fn", "fontname", "normal text font"),
205#if ENABLE_STYLES 211#if ENABLE_STYLES
206 STRG (Rs_boldFont, "boldFont", "fb", "fontname", "bold font"), 212 STRG (Rs_boldFont, "boldFont", "fb", "fontname", "bold font"),
207 STRG (Rs_italicFont, "italicFont", "fi", "fontname", "italic font"), 213 STRG (Rs_italicFont, "italicFont", "fi", "fontname", "italic font"),
208 STRG (Rs_boldItalicFont, "boldItalicFont", "fbi", "fontname", "bold italic font"), 214 STRG (Rs_boldItalicFont, "boldItalicFont", "fbi", "fontname", "bold italic font"),
215 BOOL (Rs_intensityStyles, "intensityStyles", "is", Opt_intensityStyles, "font styles imply intensity changes"),
209#endif 216#endif
210#ifdef USE_XIM 217#ifdef USE_XIM
211 STRG (Rs_inputMethod, "inputMethod", "im", "name", "name of input method"), 218 STRG (Rs_inputMethod, "inputMethod", "im", "name", "name of input method"),
212 STRG (Rs_preeditType, "preeditType", "pt", "style", "input style: style = OverTheSpot|OffTheSpot|Root"), 219 STRG (Rs_preeditType, "preeditType", "pt", "style", "input style: style = OverTheSpot|OffTheSpot|Root"),
213 STRG (Rs_imLocale, "imLocale", "imlocale", "string", "locale to use for input method"), 220 STRG (Rs_imLocale, "imLocale", "imlocale", "string", "locale to use for input method"),
216 STRG (Rs_name, NULL, "name", "string", "client instance, icon, and title strings"), 223 STRG (Rs_name, NULL, "name", "string", "client instance, icon, and title strings"),
217 STRG (Rs_title, "title", "title", "string", "title name for window"), 224 STRG (Rs_title, "title", "title", "string", "title name for window"),
218 STRG (Rs_title, NULL, "T", NULL, NULL), /* short form */ 225 STRG (Rs_title, NULL, "T", NULL, NULL), /* short form */
219 STRG (Rs_iconName, "iconName", "n", "string", "icon name for window"), 226 STRG (Rs_iconName, "iconName", "n", "string", "icon name for window"),
220 STRG (Rs_saveLines, "saveLines", "sl", "number", "number of scrolled lines to save"), 227 STRG (Rs_saveLines, "saveLines", "sl", "number", "number of scrolled lines to save"),
228#if ENABLE_XEMBED
229 STRG (Rs_embed, NULL, "embed", "windowid", "window id to embed terminal in"),
230#endif
221#if ENABLE_FRILLS 231#if ENABLE_FRILLS
232 STRG (Rs_pty_fd, NULL, "pty-fd", "fileno", "file descriptor of pty to use"),
233 BOOL (Rs_hold, "hold", "hold", Opt_hold, "retain window after shell exit"),
222 STRG (Rs_ext_bwidth, "externalBorder", "w", "number", "external border in pixels"), 234 STRG (Rs_ext_bwidth, "externalBorder", "w", "number", "external border in pixels"),
223 STRG (Rs_ext_bwidth, NULL, "bw", NULL, NULL), 235 STRG (Rs_ext_bwidth, NULL, "bw", NULL, NULL),
224 STRG (Rs_ext_bwidth, NULL, "borderwidth", NULL, NULL), 236 STRG (Rs_ext_bwidth, NULL, "borderwidth", NULL, NULL),
225 STRG (Rs_int_bwidth, "internalBorder", "b", "number", "internal border in pixels"), 237 STRG (Rs_int_bwidth, "internalBorder", "b", "number", "internal border in pixels"),
226 BOOL (Rs_borderLess, "borderLess", "bl", Opt_borderLess, "borderless window"), 238 BOOL (Rs_borderLess, "borderLess", "bl", Opt_borderLess, "borderless window"),
246 RSTRG (Rs_answerbackstring, "answerbackString", "string"), 258 RSTRG (Rs_answerbackstring, "answerbackString", "string"),
247#ifndef NO_SECONDARY_SCREEN 259#ifndef NO_SECONDARY_SCREEN
248 BOOL (Rs_secondaryScreen, "secondaryScreen", "ssc", Opt_secondaryScreen, "enable secondary screen"), 260 BOOL (Rs_secondaryScreen, "secondaryScreen", "ssc", Opt_secondaryScreen, "enable secondary screen"),
249 BOOL (Rs_secondaryScroll, "secondaryScroll", "ssr", Opt_secondaryScroll, "enable secondary screen scroll"), 261 BOOL (Rs_secondaryScroll, "secondaryScroll", "ssr", Opt_secondaryScroll, "enable secondary screen scroll"),
250#endif 262#endif
263#if ENABLE_PERL
264 RSTRG (Rs_perl_lib, "perl-lib", "string"), //, "colon-separated directories with extension scripts"),
265 RSTRG (Rs_perl_eval, "perl-eval", "perl-eval"), // "string", "code to be evaluated after all extensions have been loaded"),
266 STRG (Rs_perl_ext, "perl-ext", "pe", "string", "colon-separated list of perl extensions to enable"),
267#endif
268#if 0 && TODO
251#if !defined(NO_RESOURCES) && defined(USE_XGETDEFAULT) 269#if !defined(NO_RESOURCES) && defined(USE_XGETDEFAULT)
252 INFO ("xrm", "string", "X resource"), 270 INFO ("xrm", "string", "X resource"),
271#endif
253#endif 272#endif
254 INFO ("e", "command arg ...", "command to execute") 273 INFO ("e", "command arg ...", "command to execute")
255 }; 274 };
256 275
257#undef INFO 276#undef INFO
407 switch (type) 426 switch (type)
408 { 427 {
409 case 0: /* brief listing */ 428 case 0: /* brief listing */
410 rxvt_log (" [-help] [--help]\n"); 429 rxvt_log (" [-help] [--help]\n");
411 430
412 for (col = 1, i = 0; i < optList_size (); i++) 431 for (col = 1, i = 0; i < optList_size; i++)
413 if (optList[i].desc != NULL) 432 if (optList[i].desc != NULL)
414 { 433 {
415 int len = 0; 434 int len = 0;
416 435
417 if (!optList_isBool (i)) 436 if (!optList_isBool (i))
440 break; 459 break;
441 460
442 case 1: /* full command-line listing */ 461 case 1: /* full command-line listing */
443 rxvt_log (" [options] [-e command args]\n\nwhere options include:\n"); 462 rxvt_log (" [options] [-e command args]\n\nwhere options include:\n");
444 463
445 for (i = 0; i < optList_size (); i++) 464 for (i = 0; i < optList_size; i++)
446 if (optList[i].desc != NULL) 465 if (optList[i].desc != NULL)
447 { 466 {
448#ifdef DEBUG_STRICT 467#ifdef DEBUG_STRICT
449 assert (optList[i].opt != NULL); 468 assert (optList[i].opt != NULL);
450#endif 469#endif
461 480
462 case 2: /* full resource listing */ 481 case 2: /* full resource listing */
463 rxvt_log (" [options] [-e command args]\n\n" 482 rxvt_log (" [options] [-e command args]\n\n"
464 "where resources (long-options) include:\n"); 483 "where resources (long-options) include:\n");
465 484
466 for (i = 0; i < optList_size (); i++) 485 for (i = 0; i < optList_size; i++)
467 if (optList[i].kw != NULL) 486 if (optList[i].kw != NULL)
468 rxvt_log (" %s: %*s%s\n", 487 rxvt_log (" %s: %*s%s\n",
469 optList[i].kw, 488 optList[i].kw,
470 (INDENT - strlen (optList[i].kw)), "", /* XXX */ 489 (INDENT - strlen (optList[i].kw)), "", /* XXX */
471 (optList_isBool (i) ? "boolean" : optList[i].arg)); 490 (optList_isBool (i) ? "boolean" : optList[i].arg));
492 int i, bad_option = 0; 511 int i, bad_option = 0;
493 static const char On[3] = "ON", Off[4] = "OFF"; 512 static const char On[3] = "ON", Off[4] = "OFF";
494 513
495 for (i = 1; i < argc; i++) 514 for (i = 1; i < argc; i++)
496 { 515 {
497 unsigned int entry, longopt = 0; 516 unsigned int entry, longopt = 0;
498 const char *flag, *opt; 517 const char *flag, *opt;
499 518
500 opt = argv[i]; 519 opt = argv[i];
501#ifdef DEBUG_RESOURCES 520#ifdef DEBUG_RESOURCES
502 fprintf (stderr, "argv[%d] = %s: ", i, opt); 521 fprintf (stderr, "argv[%d] = %s: ", i, opt);
503#endif 522#endif
524 rxvt_usage (longopt ? 2 : 1); 543 rxvt_usage (longopt ? 2 : 1);
525 if (!strcmp (opt, "h")) 544 if (!strcmp (opt, "h"))
526 rxvt_usage (0); 545 rxvt_usage (0);
527 546
528 /* feature: always try to match long-options */ 547 /* feature: always try to match long-options */
529 for (entry = 0; entry < optList_size (); entry++) 548 for (entry = 0; entry < optList_size; entry++)
530 if ((optList[entry].kw && !strcmp (opt, optList[entry].kw)) 549 if ((optList[entry].kw && !strcmp (opt, optList[entry].kw))
531 || (!longopt 550 || (!longopt
532 && optList[entry].opt && !strcmp (opt, optList[entry].opt))) 551 && optList[entry].opt && !strcmp (opt, optList[entry].opt)))
533 break; 552 break;
534 553
535 if (entry < optList_size ()) 554 if (entry < optList_size)
536 { 555 {
537 if (optList_isReverse (entry)) 556 if (optList_isReverse (entry))
538 flag = flag == On ? Off : On; 557 flag = flag == On ? Off : On;
539 558
540 if (optList_strlen (entry)) 559 if (optList_strlen (entry))
554#ifdef DEBUG_RESOURCES 573#ifdef DEBUG_RESOURCES
555 fprintf (stderr, "boolean (%s,%s) = %s\n", 574 fprintf (stderr, "boolean (%s,%s) = %s\n",
556 optList[entry].opt, optList[entry].kw, flag); 575 optList[entry].opt, optList[entry].kw, flag);
557#endif 576#endif
558 if (flag == On) 577 if (flag == On)
559 options |= (optList[entry].flag); 578 SET_OPTION (optList[entry].flag & Optflag_mask);
560 else 579 else
561 options &= ~ (optList[entry].flag); 580 CLR_OPTION (optList[entry].flag & Optflag_mask);
562 581
563 if (optList[entry].doff != -1) 582 if (optList[entry].doff != -1)
564 rs[optList[entry].doff] = flag; 583 rs[optList[entry].doff] = flag;
565 } 584 }
566 } 585 }
781 return; 800 return;
782 801
783 len = strlen (name); 802 len = strlen (name);
784 while ((str = fgets (buffer, sizeof (buffer), stream)) != NULL) 803 while ((str = fgets (buffer, sizeof (buffer), stream)) != NULL)
785 { 804 {
786 unsigned int entry, n; 805 unsigned int entry, n;
787 806
788 while (*str && isspace (*str)) 807 while (*str && isspace (*str))
789 str++; /* leading whitespace */ 808 str++; /* leading whitespace */
790 809
791 if ((str[len] != '*' && str[len] != '.') 810 if ((str[len] != '*' && str[len] != '.')
794 str += (len + 1); /* skip `name*' or `name.' */ 813 str += (len + 1); /* skip `name*' or `name.' */
795 814
796# ifdef KEYSYM_RESOURCE 815# ifdef KEYSYM_RESOURCE
797 if (!parse_keysym (str, NULL)) 816 if (!parse_keysym (str, NULL))
798# endif /* KEYSYM_RESOURCE */ 817# endif /* KEYSYM_RESOURCE */
799 for (entry = 0; entry < optList_size (); entry++) 818 for (entry = 0; entry < optList_size; entry++)
800 { 819 {
801 const char *kw = optList[entry].kw; 820 const char *kw = optList[entry].kw;
802 821
803 if (kw == NULL) 822 if (kw == NULL)
804 continue; 823 continue;
808 { 827 {
809 /* skip `keyword:' */ 828 /* skip `keyword:' */
810 str += n + 1; 829 str += n + 1;
811 rxvt_Str_trim (str); 830 rxvt_Str_trim (str);
812 n = strlen (str); 831 n = strlen (str);
832
813 if (n && rs[optList[entry].doff] == NULL) 833 if (n && rs[optList[entry].doff] == NULL)
814 { 834 {
815 /* not already set */ 835 /* not already set */
816 int s; 836 int s;
817 char *p = 0; 837 char *p = 0;
838 rs[optList[entry].doff] = p; 858 rs[optList[entry].doff] = p;
839 allocated.push_back (p); 859 allocated.push_back (p);
840 860
841 if (optList_isBool (entry)) 861 if (optList_isBool (entry))
842 { 862 {
843 s = strcasecmp (str, "TRUE") == 0 863 s = strcasecmp (str, "true") == 0
844 || strcasecmp (str, "YES") == 0 864 || strcasecmp (str, "yes") == 0
845 || strcasecmp (str, "ON") == 0 865 || strcasecmp (str, "on") == 0
846 || strcasecmp (str, "1") == 0; 866 || strcmp (str, "1") == 0;
847 867
848 if (optList_isReverse (entry)) 868 if (optList_isReverse (entry))
849 s = !s; 869 s = !s;
850 870
851 if (s) 871 if (s)
852 options |= optList[entry].flag; 872 SET_OPTION (optList[entry].flag & Optflag_mask);
853 else 873 else
854 options &= ~optList[entry].flag; 874 CLR_OPTION (optList[entry].flag & Optflag_mask);
855 } 875 }
856 } 876 }
857 877
858 break; 878 break;
859 } 879 }
871/* 891/*
872 * using XGetDefault () or the hand-rolled replacement 892 * using XGetDefault () or the hand-rolled replacement
873 */ 893 */
874/* ARGSUSED */ 894/* ARGSUSED */
875void 895void
876rxvt_term::extract_resources (Display *display __attribute__ ((unused)), const char *name) 896rxvt_term::extract_resources ()
877{ 897{
898 dDisp;
899
878#ifndef NO_RESOURCES 900#ifndef NO_RESOURCES
901
902 char *homedir = (char *)getenv ("HOME");
903 char fname[1024];
879 904
880# if defined XAPPLOADDIR 905# if defined XAPPLOADDIR
881# if defined(HAVE_XSETLOCALE) || defined(HAVE_SETLOCALE) 906# if defined(HAVE_XSETLOCALE) || defined(HAVE_SETLOCALE)
882 /* Compute the path of the possibly available localized Rxvt file */ 907 /* Compute the path of the possibly available localized Rxvt file */
883 char *localepath = NULL; 908 char localepath[1024];
884 909
885 if (locale != NULL) 910 if (locale)
886 { /* XXX: must limit length of string */
887 localepath = (char *)rxvt_malloc (256);
888 sprintf (localepath, XAPPLOADDIRLOCALE "/" RESCLASS, 911 snprintf (localepath, sizeof (localepath), XAPPLOADDIRLOCALE "/" RESCLASS, locale);
889 (int) (258 - sizeof (XAPPLOADDIRLOCALE) - sizeof (RESCLASS)), 912 else
890 locale); /* 258 = 255 + 4 (-.*s) - 1 (/) */ 913 localepath[0] = 0;
891 }
892
893 {
894# endif 914# endif
895# endif 915# endif
896 916
897# ifdef USE_XGETDEFAULT 917# ifdef USE_XGETDEFAULT
898 /* 918 /*
899 * get resources using the X library function 919 * get resources using the X library function
900 */ 920 */
901 int entry; 921 int entry;
902 922
903# ifdef XrmEnumOneLevel 923# ifdef XrmEnumOneLevel
904 int i;
905 char *displayResource, *xe; 924 char *displayResource, *xe;
906 XrmName name_prefix[3]; 925 XrmName name_prefix[3];
907 XrmClass class_prefix[3]; 926 XrmClass class_prefix[3];
908 XrmDatabase database, rdb1; 927 XrmDatabase database, rdb1;
909 char fname[1024];
910 928
911 XrmInitialize (); 929 XrmInitialize ();
912 database = NULL; 930 database = NULL;
913 931
932 // for ordering, see for example http://www.faqs.org/faqs/Xt-FAQ/ Subject: 20
933
934 // 6. System wide per application default file.
935 /* Add in Rxvt file */
936# if defined(HAVE_XSETLOCALE) || defined(HAVE_SETLOCALE)
937 if (*localepath
938 && ((rdb1 = XrmGetFileDatabase (localepath))
939 || (rdb1 = XrmGetFileDatabase (XAPPLOADDIR "/" RESCLASS))))
940# endif
941 XrmMergeDatabases (rdb1, &database);
942
943 /* Add in $XAPPLRESDIR/Rxvt only; not bothering with XUSERFILESEARCHPATH */
944 if ((xe = (char *)getenv ("XAPPLRESDIR")))
945 {
946 snprintf (fname, sizeof (fname), "%s/%s", xe, RESCLASS);
947
948 if ((rdb1 = XrmGetFileDatabase (fname)))
949 XrmMergeDatabases (rdb1, &database);
950 }
951
952 // 5. User's per application default file.
953 // none
954
955 // 4. User's defaults file.
914 /* Get any Xserver defaults */ 956 /* Get any Xserver defaults */
915
916 displayResource = XResourceManagerString (display); 957 displayResource = XResourceManagerString (disp);
917 if (displayResource != NULL) 958 if (displayResource != NULL)
959 {
918 database = XrmGetStringDatabase (displayResource); 960 if ((rdb1 = XrmGetStringDatabase (displayResource)))
919 961 XrmMergeDatabases (rdb1, &database);
920# ifdef HAVE_EXTRA_XRESOURCE_FILES
921 /* Add in ~/.Xdefaults or ~/.Xresources */
922 { 962 }
923 char *ptr; 963 else if (homedir)
964 {
965 snprintf (fname, sizeof (fname), "%s/.Xdefaults", homedir);
924 966
925 if ((ptr = (char *)getenv ("HOME")) == NULL) 967 if ((rdb1 = XrmGetFileDatabase (fname)))
926 ptr = "."; 968 XrmMergeDatabases (rdb1, &database);
969 }
927 970
928 for (i = 0; i < (sizeof (xnames) / sizeof (xnames[0])); i++) 971 /* Get screen specific resources */
972 displayResource = XScreenResourceString (ScreenOfDisplay (disp, display->screen));
973 if (displayResource != NULL)
974 {
975 if ((rdb1 = XrmGetStringDatabase (displayResource)))
976 /* Merge with screen-independent resources */
977 XrmMergeDatabases (rdb1, &database);
978
979 XFree (displayResource);
980 }
981
982 // 3. User's per host defaults file
983 /* Add in XENVIRONMENT file */
984 if ((xe = (char *)getenv ("XENVIRONMENT"))
985 && (rdb1 = XrmGetFileDatabase (xe)))
986 XrmMergeDatabases (rdb1, &database);
987 else if (homedir)
988 {
989 struct utsname un;
990
991 if (!uname (&un))
929 { 992 {
930 sprintf (fname, "%-.*s/%s", sizeof (fname) - strlen (xnames[i]) - 2, 993 snprintf (fname, sizeof (fname), "%s/.Xdefaults-%s", homedir, un.nodename);
931 ptr, xnames[i]); 994
932 if ((rdb1 = XrmGetFileDatabase (fname))) 995 if ((rdb1 = XrmGetFileDatabase (fname)))
996 XrmMergeDatabases (rdb1, &database);
997 }
998 }
999
1000 XrmSetDatabase (disp, database);
1001# endif
1002
1003 /*
1004 * Query resources for options that affect us
1005 */
1006 for (entry = 0; entry < optList_size; entry++)
1007 {
1008 int s;
1009 char *p, *p0;
1010 const char *kw = optList[entry].kw;
1011
1012 if (kw == NULL || rs[optList[entry].doff] != NULL)
1013 continue; /* previously set */
1014
1015 p = XGetDefault (disp, rs[Rs_name], kw);
1016 p0 = XGetDefault (disp, "!INVALIDPROGRAMMENAMEDONTMATCH!", kw);
1017 if (p == NULL || (p0 && strcmp (p, p0) == 0))
1018 {
1019 p = XGetDefault (disp, RESCLASS, kw);
1020#ifdef RESFALLBACK
1021 if (p == NULL || (p0 && strcmp (p, p0) == 0))
1022 p = XGetDefault (disp, RESFALLBACK, kw);
1023#endif
1024 }
1025
1026 if (p == NULL && p0)
1027 p = p0;
1028
1029 if (p)
1030 {
1031 rs[optList[entry].doff] = p;
1032
1033 if (optList_isBool (entry))
933 { 1034 {
934 XrmMergeDatabases (rdb1, &database); 1035 s = strcasecmp (p, "TRUE") == 0
935# ifndef HAVE_BOTH_XRESOURCE_FILES 1036 || strcasecmp (p, "YES") == 0
1037 || strcasecmp (p, "ON") == 0
1038 || strcasecmp (p, "1") == 0;
1039
1040 if (optList_isReverse (entry))
1041 s = !s;
1042
1043 if (s)
1044 SET_OPTION (optList[entry].flag & Optflag_mask);
936 break; 1045 else
937# endif 1046 CLR_OPTION (optList[entry].flag & Optflag_mask);
938 } 1047 }
939 } 1048 }
940 } 1049 }
941# endif
942 1050
943 /* Add in XENVIRONMENT file */
944
945 if ((xe = (char *)getenv ("XENVIRONMENT")) != NULL
946 && (rdb1 = XrmGetFileDatabase (xe)) != NULL)
947 XrmMergeDatabases (rdb1, &database);
948
949 /* Add in Rxvt file */
950# if defined(HAVE_XSETLOCALE) || defined(HAVE_SETLOCALE)
951 if (localepath == NULL || (rdb1 = XrmGetFileDatabase (localepath)) == NULL)
952# endif
953 rdb1 = XrmGetFileDatabase (XAPPLOADDIR "/" RESCLASS);
954
955 if (rdb1 != NULL)
956 XrmMergeDatabases (rdb1, &database);
957
958 /* Add in $XAPPLRESDIR/Rxvt only; not bothering with XUSERFILESEARCHPATH */
959 if ((xe = (char *)getenv ("XAPPLRESDIR")) != NULL)
960 {
961 sprintf (fname, "%-.*s/" RESCLASS, sizeof (fname)
962 - sizeof (RESCLASS) - 2, xe);
963 if ((rdb1 = XrmGetFileDatabase (fname)) != NULL)
964 XrmMergeDatabases (rdb1, &database);
965 }
966
967 XrmSetDatabase (display, database);
968# endif
969
970 /* 1051 /*
971 * Query resources for options that affect us
972 */
973 for (entry = 0; entry < optList_size (); entry++)
974 {
975 int s;
976 char *p, *p0;
977 const char *kw = optList[entry].kw;
978
979 if (kw == NULL || rs[optList[entry].doff] != NULL)
980 continue; /* previously set */
981
982 p = XGetDefault (display, name, kw);
983 p0 = XGetDefault (display, "!INVALIDPROGRAMMENAMEDONTMATCH!", kw);
984 if (p == NULL || (p0 && strcmp (p, p0) == 0))
985 {
986 p = XGetDefault (display, RESCLASS, kw);
987#ifdef RESFALLBACK
988 if (p == NULL || (p0 && strcmp (p, p0) == 0))
989 p = XGetDefault (display, RESFALLBACK, kw);
990#endif
991 }
992
993 if (p == NULL && p0)
994 p = p0;
995
996 if (p)
997 {
998 rs[optList[entry].doff] = p;
999
1000 if (optList_isBool (entry))
1001 {
1002 s = strcasecmp (p, "TRUE") == 0
1003 || strcasecmp (p, "YES") == 0
1004 || strcasecmp (p, "ON") == 0
1005 || strcasecmp (p, "1") == 0;
1006 if (optList_isReverse (entry))
1007 s = !s;
1008 if (s)
1009 options |= (optList[entry].flag);
1010 else
1011 options &= ~ (optList[entry].flag);
1012 }
1013 }
1014 }
1015
1016 /*
1017 * [R5 or later]: enumerate the resource database 1052 * [R5 or later]: enumerate the resource database
1018 */ 1053 */
1019# ifdef XrmEnumOneLevel
1020# ifdef KEYSYM_RESOURCE 1054# ifdef KEYSYM_RESOURCE
1021 name_prefix[0] = XrmStringToName (name); 1055 name_prefix[0] = XrmStringToName (rs[Rs_name]);
1022 name_prefix[1] = XrmStringToName ("keysym"); 1056 name_prefix[1] = XrmStringToName ("keysym");
1023 name_prefix[2] = NULLQUARK; 1057 name_prefix[2] = NULLQUARK;
1024 class_prefix[0] = XrmStringToName (RESCLASS); 1058 class_prefix[0] = XrmStringToName (RESCLASS);
1025 class_prefix[1] = XrmStringToName ("Keysym"); 1059 class_prefix[1] = XrmStringToName ("Keysym");
1026 class_prefix[2] = NULLQUARK; 1060 class_prefix[2] = NULLQUARK;
1027 /* XXX: Need to check sizeof (rxvt_t) == sizeof (XPointer) */ 1061 /* XXX: Need to check sizeof (rxvt_t) == sizeof (XPointer) */
1028 XrmEnumerateDatabase (XrmGetDatabase (display), name_prefix, class_prefix, 1062 XrmEnumerateDatabase (XrmGetDatabase (disp), name_prefix, class_prefix,
1029 XrmEnumOneLevel, rxvt_define_key, NULL); 1063 XrmEnumOneLevel, rxvt_define_key, NULL);
1030# ifdef RESFALLBACK 1064# ifdef RESFALLBACK
1031 name_prefix[0] = XrmStringToName (RESFALLBACK); 1065 name_prefix[0] = XrmStringToName (RESFALLBACK);
1032 name_prefix[1] = XrmStringToName ("keysym"); 1066 name_prefix[1] = XrmStringToName ("keysym");
1033 class_prefix[0] = XrmStringToName (RESFALLBACK); 1067 class_prefix[0] = XrmStringToName (RESFALLBACK);
1034 class_prefix[1] = XrmStringToName ("Keysym"); 1068 class_prefix[1] = XrmStringToName ("Keysym");
1035 /* XXX: Need to check sizeof (rxvt_t) == sizeof (XPointer) */ 1069 /* XXX: Need to check sizeof (rxvt_t) == sizeof (XPointer) */
1036 XrmEnumerateDatabase (XrmGetDatabase (display), name_prefix, class_prefix, 1070 XrmEnumerateDatabase (XrmGetDatabase (disp), name_prefix, class_prefix,
1037 XrmEnumOneLevel, rxvt_define_key, NULL); 1071 XrmEnumOneLevel, rxvt_define_key, NULL);
1038# endif
1039# endif 1072# endif
1040# endif 1073# endif
1041 1074
1042# else /* USE_XGETDEFAULT */ 1075# else /* USE_XGETDEFAULT */
1043 /* get resources the hard way, but save lots of memory */ 1076 /* get resources the hard way, but save lots of memory */
1077 FILE *fd = NULL;
1078
1079 if (homedir)
1080 {
1081 static const char *const xnames[2] = { ".Xdefaults", ".Xresources" };
1082
1083 for (int i = 0; i < (sizeof (xnames) / sizeof (xnames [0])); i++)
1084 {
1085 snprintf (fname, sizeof (fname), "%s/%s", homedir, xnames [i]);
1086
1087 if ((fd = fopen (fname, "r")) != NULL)
1088 break;
1089 }
1090 }
1091 /*
1092 * The normal order to match resources is the following:
1093 * @ global resources (partial match, ~/.Xdefaults)
1094 * @ application file resources (XAPPLOADDIR/Rxvt)
1095 * @ class resources (~/.Xdefaults)
1096 * @ private resources (~/.Xdefaults)
1097 *
1098 * However, for the hand-rolled resources, the matching algorithm
1099 * checks if a resource string value has already been allocated
1100 * and won't overwrite it with (in this case) a less specific
1101 * resource value.
1102 *
1103 * This avoids multiple allocation. Also, when we've called this
1104 * routine command-line string options have already been applied so we
1105 * needn't to allocate for those resources.
1106 *
1107 * So, search in resources from most to least specific.
1108 *
1109 * Also, use a special sub-class so that we can use either or both of
1110 * "XTerm" and "Rxvt" as class names.
1111 */
1112
1113 get_xdefaults (fd, rs[Rs_name]);
1114 get_xdefaults (fd, RESCLASS);
1115# ifdef RESFALLBACK
1116 get_xdefaults (fd, RESFALLBACK);
1117# endif
1118
1119# if defined(XAPPLOADDIR) && defined(USE_XAPPLOADDIR)
1120 {
1044 FILE *fd = NULL; 1121 FILE *ad = NULL;
1045 char *home;
1046 1122
1047 if ((home = getenv ("HOME")) != NULL) 1123# if defined(HAVE_XSETLOCALE) || defined(HAVE_SETLOCALE)
1124 if (!*localepath || (ad = fopen (localepath, "r")) == NULL)
1125# endif
1126 ad = fopen (XAPPLOADDIR "/" RESCLASS, "r");
1127 if (ad != NULL)
1048 { 1128 {
1049 unsigned int i, len = strlen (home) + 2; 1129 get_xdefaults (ad, RESCLASS);
1050 char *f = NULL; 1130 get_xdefaults (ad, "");
1051
1052 for (i = 0; i < (sizeof (xnames) / sizeof (xnames[0])); i++)
1053 {
1054 f = (char *)rxvt_realloc (f, len + strlen (xnames[i]));
1055
1056 sprintf (f, "%s/%s", home, xnames[i]);
1057
1058 if ((fd = fopen (f, "r")) != NULL)
1059 break;
1060 }
1061
1062 free (f); 1131 fclose (ad);
1063 } 1132 }
1064 /*
1065 * The normal order to match resources is the following:
1066 * @ global resources (partial match, ~/.Xdefaults)
1067 * @ application file resources (XAPPLOADDIR/Rxvt)
1068 * @ class resources (~/.Xdefaults)
1069 * @ private resources (~/.Xdefaults)
1070 *
1071 * However, for the hand-rolled resources, the matching algorithm
1072 * checks if a resource string value has already been allocated
1073 * and won't overwrite it with (in this case) a less specific
1074 * resource value.
1075 *
1076 * This avoids multiple allocation. Also, when we've called this
1077 * routine command-line string options have already been applied so we
1078 * needn't to allocate for those resources.
1079 *
1080 * So, search in resources from most to least specific.
1081 *
1082 * Also, use a special sub-class so that we can use either or both of
1083 * "XTerm" and "Rxvt" as class names.
1084 */
1085
1086 get_xdefaults (fd, name);
1087 get_xdefaults (fd, RESCLASS);
1088# ifdef RESFALLBACK
1089 get_xdefaults (fd, RESFALLBACK);
1090# endif
1091
1092# if defined(XAPPLOADDIR) && defined(USE_XAPPLOADDIR)
1093 {
1094 FILE *ad = NULL;
1095
1096# if defined(HAVE_XSETLOCALE) || defined(HAVE_SETLOCALE)
1097 if (localepath == NULL || (ad = fopen (localepath, "r")) == NULL)
1098# endif
1099 ad = fopen (XAPPLOADDIR "/" RESCLASS, "r");
1100 if (ad != NULL)
1101 {
1102 get_xdefaults (ad, RESCLASS);
1103 get_xdefaults (ad, "");
1104 fclose (ad);
1105 }
1106 } 1133 }
1107# endif /* XAPPLOADDIR */ 1134# endif /* XAPPLOADDIR */
1108 1135
1109 get_xdefaults (fd, ""); /* partial match */ 1136 get_xdefaults (fd, ""); /* partial match */
1110 if (fd != NULL) 1137 if (fd != NULL)
1111 fclose (fd); 1138 fclose (fd);
1112# endif /* USE_XGETDEFAULT */ 1139# endif /* USE_XGETDEFAULT */
1113
1114# if defined XAPPLOADDIR
1115# if defined(HAVE_XSETLOCALE) || defined(HAVE_SETLOCALE)
1116
1117 }
1118
1119 /* Free the path of the possibly available localized Rxvt file */
1120 free (localepath);
1121# endif
1122# endif
1123 1140
1124#endif /* NO_RESOURCES */ 1141#endif /* NO_RESOURCES */
1125} 1142}
1126 1143
1127/*}}} */ 1144/*}}} */

Diff Legend

Removed lines
+ Added lines
< Changed lines
> Changed lines