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.141 by root, Sat Dec 26 10:24:04 2009 UTC vs.
Revision 1.160 by sf-exg, Sun Dec 18 02:14:59 2011 UTC

4 * 4 *
5 * All portions of code are copyright by their respective author/s. 5 * All portions of code are copyright by their respective author/s.
6 * Copyright (c) 1994 Robert Nation <nation@rocket.sanders.lockheed.com> 6 * Copyright (c) 1994 Robert Nation <nation@rocket.sanders.lockheed.com>
7 * - original version 7 * - original version
8 * Copyright (c) 1997,1998 mj olesen <olesen@me.queensu.ca> 8 * Copyright (c) 1997,1998 mj olesen <olesen@me.queensu.ca>
9 * Copyright (c) 2003-2006 Marc Lehmann <pcg@goof.com> 9 * Copyright (c) 2003-2006 Marc Lehmann <schmorp@schmorp.de>
10 * Copyright (c) 2007 Emanuele Giaquinta <e.giaquinta@glauco.it> 10 * Copyright (c) 2007 Emanuele Giaquinta <e.giaquinta@glauco.it>
11 * 11 *
12 * This program is free software; you can redistribute it and/or modify 12 * This program is free software; you can redistribute it and/or modify
13 * it under the terms of the GNU General Public License as published by 13 * it under the terms of the GNU General Public License as published by
14 * the Free Software Foundation; either version 2 of the License, or 14 * the Free Software Foundation; either version 2 of the License, or
34 34
35/* place holders used for parsing command-line options */ 35/* place holders used for parsing command-line options */
36#define Optflag_Reverse 1 36#define Optflag_Reverse 1
37#define Optflag_Boolean 2 37#define Optflag_Boolean 2
38#define Optflag_Switch 4 38#define Optflag_Switch 4
39#define Optflag_Info 8
39 40
40/* monolithic option/resource structure: */ 41/* monolithic option/resource structure: */
41/* 42/*
42 * `string' options MUST have a usage argument 43 * `string' options MUST have a usage argument
43 * `switch' and `boolean' options have no argument 44 * `switch' and `boolean' options have no argument
44 * if there's no desc (ription), it won't appear in rxvt_usage () 45 * if there's no desc (ription), it won't appear in rxvt_usage ()
45 */ 46 */
46 47
47/* INFO () - descriptive information only */ 48/* INFO () - descriptive information only */
48#define INFO(opt, arg, desc) \ 49#define INFO(opt, arg, desc) \
49 {0, 0, -1, NULL, (opt), (arg), (desc)} 50 {0, Optflag_Info, -1, NULL, (opt), (arg), (desc)}
50 51
51/* STRG () - command-line option, with/without resource */ 52/* STRG () - command-line option, with/without resource */
52#define STRG(rsp, kw, opt, arg, desc) \ 53#define STRG(rsp, kw, opt, arg, desc) \
53 {0, 0, (rsp), (kw), (opt), (arg), (desc)} 54 {0, 0, (rsp), (kw), (opt), (arg), (desc)}
54 55
69 (optList[i].flag == 0) 70 (optList[i].flag == 0)
70#define optList_isBool(i) \ 71#define optList_isBool(i) \
71 (optList[i].flag & Optflag_Boolean) 72 (optList[i].flag & Optflag_Boolean)
72#define optList_isReverse(i) \ 73#define optList_isReverse(i) \
73 (optList[i].flag & Optflag_Reverse) 74 (optList[i].flag & Optflag_Reverse)
74#define optList_size \ 75#define optList_isInfo(i) \
75 (sizeof (optList) / sizeof (optList[0])) 76 (optList[i].flag & Optflag_Info)
76 77
77static const struct 78static const struct
78 { 79 {
79 const uint8_t index; /* Option index */ 80 const uint8_t index; /* Option index */
80 const uint8_t flag; /* Option flag */ 81 const uint8_t flag; /* Option flag */
112#if ENABLE_TRANSPARENCY 113#if ENABLE_TRANSPARENCY
113 BOOL (Rs_transparent, "inheritPixmap", "ip", Opt_transparent, 0, "inherit parent pixmap"), 114 BOOL (Rs_transparent, "inheritPixmap", "ip", Opt_transparent, 0, "inherit parent pixmap"),
114 BOOL (Rs_transparent, "transparent", "tr", Opt_transparent, 0, "inherit parent pixmap"), 115 BOOL (Rs_transparent, "transparent", "tr", Opt_transparent, 0, "inherit parent pixmap"),
115 STRG (Rs_color + Color_tint, "tintColor", "tint", "color", "tint color"), 116 STRG (Rs_color + Color_tint, "tintColor", "tint", "color", "tint color"),
116 STRG (Rs_shade, "shading", "sh", "number", "shade background by number %."), 117 STRG (Rs_shade, "shading", "sh", "number", "shade background by number %."),
118 STRG (Rs_blurradius, "blurRadius", "blr", "HxV", "gaussian blur radii to apply to the root background"),
117#endif 119#endif
118#if OFF_FOCUS_FADING 120#if OFF_FOCUS_FADING
119 STRG (Rs_fade, "fading", "fade", "number", "fade colors by number % when losing focus"), 121 STRG (Rs_fade, "fading", "fade", "number", "fade colors by number % when losing focus"),
120 STRG (Rs_color + Color_fade, "fadeColor", "fadecolor", "color", "target color for off-focus fading"), 122 STRG (Rs_color + Color_fade, "fadeColor", "fadecolor", "color", "target color for off-focus fading"),
121#endif 123#endif
177#ifdef RXVT_SCROLLBAR 179#ifdef RXVT_SCROLLBAR
178 RSTRG (Rs_color + Color_trough, "troughColor", "color"), 180 RSTRG (Rs_color + Color_trough, "troughColor", "color"),
179#endif 181#endif
180#ifdef OPTION_HC 182#ifdef OPTION_HC
181 STRG (Rs_color + Color_HC, "highlightColor", "hc", "color", "highlight color"), 183 STRG (Rs_color + Color_HC, "highlightColor", "hc", "color", "highlight color"),
184 RSTRG (Rs_color + Color_HTC, "highlightTextColor", "color"),
182#endif 185#endif
183#ifndef NO_CURSORCOLOR 186#ifndef NO_CURSORCOLOR
184 STRG (Rs_color + Color_cursor, "cursorColor", "cr", "color", "cursor color"), 187 STRG (Rs_color + Color_cursor, "cursorColor", "cr", "color", "cursor color"),
185 /* command-line option = resource name */ 188 /* command-line option = resource name */
186 RSTRG (Rs_color + Color_cursor2, "cursorColor2", "color"), 189 RSTRG (Rs_color + Color_cursor2, "cursorColor2", "color"),
189 STRG (Rs_color + Color_pointer_bg, "pointerColor2", "pr2", "color", "pointer bg color"), 192 STRG (Rs_color + Color_pointer_bg, "pointerColor2", "pr2", "color", "pointer bg color"),
190 STRG (Rs_color + Color_border, "borderColor", "bd", "color", "border color"), 193 STRG (Rs_color + Color_border, "borderColor", "bd", "color", "border color"),
191#ifdef BG_IMAGE_FROM_FILE 194#ifdef BG_IMAGE_FROM_FILE
192 RSTRG (Rs_path, "path", "search path"), 195 RSTRG (Rs_path, "path", "search path"),
193 STRG (Rs_backgroundPixmap, "backgroundPixmap", "pixmap", "file[;geom]", "background pixmap"), 196 STRG (Rs_backgroundPixmap, "backgroundPixmap", "pixmap", "file[;geom]", "background pixmap"),
197# if ENABLE_EWMH
198 STRG (Rs_iconfile, "iconFile", "icon", "file", "path to application icon image"),
199# endif
194#endif 200#endif
195 /* fonts: command-line option = resource name */ 201 /* fonts: command-line option = resource name */
196 STRG (Rs_font, "font", "fn", "fontname", "normal text font"), 202 STRG (Rs_font, "font", "fn", "fontname", "normal text font"),
197#if ENABLE_STYLES 203#if ENABLE_STYLES
198 STRG (Rs_boldFont, "boldFont", "fb", "fontname", "bold font"), 204 STRG (Rs_boldFont, "boldFont", "fb", "fontname", "bold font"),
258 RSTRG (Rs_perl_eval, "perl-eval", "perl-eval"), // "string", "code to be evaluated after all extensions have been loaded"),TODO 264 RSTRG (Rs_perl_eval, "perl-eval", "perl-eval"), // "string", "code to be evaluated after all extensions have been loaded"),TODO
259 RSTRG (Rs_perl_ext_1, "perl-ext-common", "string"), //, "colon-separated list of perl extensions to enable"),TODO 265 RSTRG (Rs_perl_ext_1, "perl-ext-common", "string"), //, "colon-separated list of perl extensions to enable"),TODO
260 STRG (Rs_perl_ext_2, "perl-ext", "pe", "string", "colon-separated list of perl extensions to enable for this instance"), 266 STRG (Rs_perl_ext_2, "perl-ext", "pe", "string", "colon-separated list of perl extensions to enable for this instance"),
261#endif 267#endif
262#if ISO_14755 268#if ISO_14755
269 BOOL (Rs_iso14755, "iso14755", NULL, Opt_iso14755, 0, NULL),
263 BOOL (Rs_iso14755_52, "iso14755_52", NULL, Opt_iso14755_52, 0, NULL), 270 BOOL (Rs_iso14755_52, "iso14755_52", NULL, Opt_iso14755_52, 0, NULL),
264#endif 271#endif
265#ifdef HAVE_AFTERIMAGE 272#ifdef HAVE_AFTERIMAGE
266 STRG (Rs_blendtype, "blendType", "blt", "string", "background image blending type - alpha, tint, etc..."), 273 STRG (Rs_blendtype, "blendType", "blt", "string", "background image blending type - alpha, tint, etc..."),
267 STRG (Rs_blurradius, "blurRadius", "blr", "HxV", "gaussian blur radii to apply to the root background"),
268# if ENABLE_EWMH
269 STRG (Rs_iconfile, "iconFile", "icon", "file", "path to application icon image"),
270# endif
271#endif 274#endif
272 INFO ("e", "command arg ...", "command to execute") 275 INFO ("e", "command arg ...", "command to execute")
273 }; 276 };
274 277
275#undef INFO 278#undef INFO
326 "tint," 329 "tint,"
327#endif 330#endif
328#if HAVE_AFTERIMAGE 331#if HAVE_AFTERIMAGE
329 "afterimage," 332 "afterimage,"
330#endif 333#endif
334#if HAVE_PIXBUF
335 "pixbuf,"
336#endif
331#if defined(USE_XIM) 337#if defined(USE_XIM)
332 "XIM," 338 "XIM,"
333#endif 339#endif
334#if defined(NO_BACKSPACE_KEY) 340#if defined(NO_BACKSPACE_KEY)
335 "no_backspace," 341 "no_backspace,"
394 switch (type) 400 switch (type)
395 { 401 {
396 case 0: /* brief listing */ 402 case 0: /* brief listing */
397 rxvt_log (" [-help] [--help]\n"); 403 rxvt_log (" [-help] [--help]\n");
398 404
399 for (col = 1, i = 0; i < optList_size; i++) 405 for (col = 1, i = 0; i < ecb_array_length (optList); i++)
400 if (optList[i].desc != NULL) 406 if (optList[i].desc != NULL)
401 { 407 {
402 int len = 0; 408 int len = 0;
403 409
404 if (optList[i].arg) 410 if (optList[i].arg)
405 len = strlen (optList[i].arg) + 1; 411 len = strlen (optList[i].arg) + 1;
406 assert (optList[i].opt != NULL); 412 assert (optList[i].opt != NULL);
407 len += 4 + strlen (optList[i].opt) + (optList_isBool (i) ? 2: 0); 413 len += 4 + strlen (optList[i].opt) + (optList_isBool (i) ? 2 : 0);
408 col += len; 414 col += len;
409 if (col > 79) 415 if (col > 79)
410 { 416 {
411 /* assume regular width */ 417 /* assume regular width */
412 rxvt_log ("\n"); 418 rxvt_log ("\n");
422 break; 428 break;
423 429
424 case 1: /* full command-line listing */ 430 case 1: /* full command-line listing */
425 rxvt_log (" [options] [-e command args]\n\nwhere options include:\n"); 431 rxvt_log (" [options] [-e command args]\n\nwhere options include:\n");
426 432
427 for (i = 0; i < optList_size; i++) 433 for (i = 0; i < ecb_array_length (optList); i++)
428 if (optList[i].desc != NULL) 434 if (optList[i].desc != NULL)
429 { 435 {
430 assert (optList[i].opt != NULL); 436 assert (optList[i].opt != NULL);
431 rxvt_log (" %s%s %-*s%s%s\n", 437 rxvt_log (" %s%s %-*s%s%s\n",
432 (optList_isBool (i) ? "-/+" : "-"), optList[i].opt, 438 (optList_isBool (i) ? "-/+" : "-"), optList[i].opt,
441 447
442 case 2: /* full resource listing */ 448 case 2: /* full resource listing */
443 rxvt_log (" [options] [-e command args]\n\n" 449 rxvt_log (" [options] [-e command args]\n\n"
444 "where resources (long-options) include:\n"); 450 "where resources (long-options) include:\n");
445 451
446 for (i = 0; i < optList_size; i++) 452 for (i = 0; i < ecb_array_length (optList); i++)
447 if (optList[i].kw != NULL) 453 if (optList[i].kw != NULL)
448 rxvt_log (" %s: %*s%s\n", 454 rxvt_log (" %s: %*s%s\n",
449 optList[i].kw, 455 optList[i].kw,
450 (INDENT - strlen (optList[i].kw)), "", /* XXX */ 456 (INDENT - strlen (optList[i].kw)), "", /* XXX */
451 (optList_isBool (i) ? "boolean" : optList[i].arg)); 457 (optList_isBool (i) ? "boolean" : optList[i].arg));
458 break; 464 break;
459 } 465 }
460 466
461 rxvt_log ("\n\n"); 467 rxvt_log ("\n\n");
462 rxvt_exit_failure (); 468 rxvt_exit_failure ();
463 /* NOTREACHED */
464} 469}
465 470
466/*}}} */ 471/*}}} */
467 472
468/*{{{ get command-line options before getting resources */ 473/*{{{ get command-line options before getting resources */
469void 474const char **
470rxvt_term::get_options (int argc, const char *const *argv) 475rxvt_term::get_options (int argc, const char *const *argv)
471{ 476{
472 int i, bad_option = 0; 477 int i, bad_option = 0;
473 478
474 for (i = 1; i < argc; i++) 479 for (i = 1; i < argc; i++)
505 510
506 if (!strcmp (opt, "h")) 511 if (!strcmp (opt, "h"))
507 rxvt_usage (0); 512 rxvt_usage (0);
508 513
509 /* feature: always try to match long-options */ 514 /* feature: always try to match long-options */
510 for (entry = 0; entry < optList_size; entry++) 515 for (entry = 0; entry < ecb_array_length (optList); entry++)
511 if ((optList[entry].kw && !strcmp (opt, optList[entry].kw)) 516 if ((optList[entry].kw && !strcmp (opt, optList[entry].kw))
512 || (!longopt 517 || (!longopt
513 && optList[entry].opt && !strcmp (opt, optList[entry].opt))) 518 && optList[entry].opt && !strcmp (opt, optList[entry].opt)))
514 break; 519 break;
515 520
516 if (entry < optList_size) 521 if (entry < ecb_array_length (optList)
522 && !optList_isInfo (entry))
517 { 523 {
518 if (optList_isReverse (entry)) 524 if (optList_isReverse (entry))
519 flag = !flag; 525 flag = !flag;
520 526
521 if (optList_isString (entry)) 527 if (optList_isString (entry))
522 { 528 {
523 /* 529 /*
524 * special cases are handled in main.c:main () to allow 530 * special cases are handled in init_resources () to allow
525 * X resources to set these values before we settle for 531 * X resources to set these values before we settle for
526 * default values 532 * default values
527 */ 533 */
528 534
529 if (optList[entry].doff != -1) 535 if (optList[entry].doff != -1)
553#ifdef KEYSYM_RESOURCE 559#ifdef KEYSYM_RESOURCE
554 else if (!strncmp (opt, "keysym.", sizeof ("keysym.") - 1)) 560 else if (!strncmp (opt, "keysym.", sizeof ("keysym.") - 1))
555 { 561 {
556 if (i+1 < argc) 562 if (i+1 < argc)
557 { 563 {
558 char *res = (char *)malloc (strlen (opt) + strlen (argv[++i]) + 6); 564 char *res = rxvt_temp_buf<char> (strlen (opt) + strlen (argv[++i]) + 6);
559 sprintf (res, "*.%s: %s\n", opt, argv[i]); 565 sprintf (res, "*.%s: %s\n", opt, argv[i]);
560 XrmPutLineResource (&option_db, res); 566 XrmPutLineResource (&option_db, res);
561 free (res);
562 } 567 }
563 } 568 }
564#endif 569#endif
570 else if (!strcmp (opt, "e"))
571 {
572 if (i+1 == argc)
573 rxvt_fatal ("option '-e' requires an argument, aborting.\n");
574
575 return (const char **)argv + i + 1;
576 }
565 else 577 else
566 { 578 {
567 bad_option = 1; 579 bad_option = 1;
568 rxvt_warn ("\"%s\": unknown or malformed option.\n", opt); 580 rxvt_warn ("\"%s\": unknown or malformed option.\n", opt);
569 } 581 }
570 } 582 }
571 583
572 if (bad_option) 584 if (bad_option)
573 rxvt_usage (0); 585 rxvt_usage (0);
586
587 return 0;
574} 588}
575 589
576/*}}} */ 590/*}}} */
577 591
578#ifndef NO_RESOURCES 592#ifndef NO_RESOURCES
583 * Define key from XrmEnumerateDatabase. 597 * Define key from XrmEnumerateDatabase.
584 * quarks will be something like 598 * quarks will be something like
585 * "rxvt" "keysym" "0xFF01" 599 * "rxvt" "keysym" "0xFF01"
586 * value will be a string 600 * value will be a string
587 */ 601 */
588/* ARGSUSED */ 602static int
589int
590rxvt_define_key (XrmDatabase *database UNUSED, 603rxvt_define_key (XrmDatabase *database ecb_unused,
591 XrmBindingList bindings UNUSED, 604 XrmBindingList bindings ecb_unused,
592 XrmQuarkList quarks, 605 XrmQuarkList quarks,
593 XrmRepresentation *type UNUSED, 606 XrmRepresentation *type ecb_unused,
594 XrmValue *value, 607 XrmValue *value,
595 XPointer closure UNUSED) 608 XPointer closure ecb_unused)
596{ 609{
597 int last; 610 int last;
598 611
599 for (last = 0; quarks[last] != NULLQUARK; last++) /* look for last quark in list */ 612 for (last = 0; quarks[last] != NULLQUARK; last++) /* look for last quark in list */
600 ; 613 ;
663 // parse modifiers 676 // parse modifiers
664 while (str < key) 677 while (str < key)
665 { 678 {
666 unsigned int i; 679 unsigned int i;
667 680
668 for (i=0; i < sizeof (keysym_vocabulary) / sizeof (keysym_vocabulary_t); ++i) 681 for (i = 0; i < ecb_array_length (keysym_vocabulary); ++i)
669 { 682 {
670 if (strncmp (str, keysym_vocabulary [i].name, keysym_vocabulary [i].len) == 0) 683 if (strncmp (str, keysym_vocabulary [i].name, keysym_vocabulary [i].len) == 0)
671 { 684 {
672 state |= keysym_vocabulary[i].value; 685 state |= keysym_vocabulary[i].value;
673 str += keysym_vocabulary[i].len; 686 str += keysym_vocabulary[i].len;
674 break; 687 break;
675 } 688 }
676 } 689 }
677 690
678 if (i >= sizeof (keysym_vocabulary) / sizeof (keysym_vocabulary_t)) 691 if (i >= ecb_array_length (keysym_vocabulary))
679 return -1; 692 return -1;
680 693
681 if (*str == '-') 694 if (*str == '-')
682 ++str; 695 ++str;
683 } 696 }
688 // fallback on hexadecimal parsing 701 // fallback on hexadecimal parsing
689 char *end; 702 char *end;
690 sym = strtol (str, &end, 16); 703 sym = strtol (str, &end, 16);
691 if (*end) 704 if (*end)
692 return -1; 705 return -1;
693 } 706 }
694 707
708 wchar_t *ws = rxvt_mbstowcs (arg);
709 if (!HOOK_INVOKE ((this, HOOK_REGISTER_COMMAND, DT_INT, sym, DT_INT, state, DT_WCS_LEN, ws, wcslen (ws), DT_END)))
695 keyboard->register_user_translation (sym, state, arg); 710 keyboard->register_user_translation (sym, state, ws);
711 free (ws);
696 return 1; 712 return 1;
697} 713}
698 714
699# endif /* KEYSYM_RESOURCE */ 715# endif /* KEYSYM_RESOURCE */
700#endif /* NO_RESOURCES */ 716#endif /* NO_RESOURCES */
743 XrmMergeDatabases (option_db, &database); 759 XrmMergeDatabases (option_db, &database);
744 option_db = NULL; 760 option_db = NULL;
745 /* 761 /*
746 * Query resources for options that affect us 762 * Query resources for options that affect us
747 */ 763 */
748 for (int entry = 0; entry < optList_size; entry++) 764 for (int entry = 0; entry < ecb_array_length (optList); entry++)
749 { 765 {
750 int s; 766 int s;
751 const char *kw = optList[entry].kw; 767 const char *kw = optList[entry].kw;
752 768
753 if (kw == NULL || rs[optList[entry].doff] != NULL) 769 if (kw == NULL || rs[optList[entry].doff] != NULL)
773 789
774 set_option (optList[entry].index, s); 790 set_option (optList[entry].index, s);
775 } 791 }
776 } 792 }
777 } 793 }
794#endif /* NO_RESOURCES */
795}
778 796
797void
798rxvt_term::extract_keysym_resources ()
799{
800#ifndef NO_RESOURCES
779 /* 801 /*
780 * [R5 or later]: enumerate the resource database 802 * [R5 or later]: enumerate the resource database
781 */ 803 */
782# ifdef KEYSYM_RESOURCE 804# ifdef KEYSYM_RESOURCE
805 XrmDatabase database = XrmGetDatabase (dpy);
783 XrmName name_prefix[3]; 806 XrmName name_prefix[3];
784 XrmClass class_prefix[3]; 807 XrmClass class_prefix[3];
785 808
786 name_prefix[0] = XrmStringToName (rs[Rs_name]); 809 name_prefix[0] = XrmStringToName (rs[Rs_name]);
787 name_prefix[1] = XrmStringToName ("keysym"); 810 name_prefix[1] = XrmStringToName ("keysym");
791 class_prefix[2] = NULLQUARK; 814 class_prefix[2] = NULLQUARK;
792 /* XXX: Need to check sizeof (rxvt_t) == sizeof (XPointer) */ 815 /* XXX: Need to check sizeof (rxvt_t) == sizeof (XPointer) */
793 XrmEnumerateDatabase (database, name_prefix, class_prefix, 816 XrmEnumerateDatabase (database, name_prefix, class_prefix,
794 XrmEnumOneLevel, rxvt_define_key, NULL); 817 XrmEnumOneLevel, rxvt_define_key, NULL);
795# ifdef RESFALLBACK 818# ifdef RESFALLBACK
796 name_prefix[0] = XrmStringToName (RESFALLBACK);
797 name_prefix[1] = XrmStringToName ("keysym");
798 class_prefix[0] = XrmStringToName (RESFALLBACK); 819 name_prefix[0] = class_prefix[0] = XrmStringToName (RESFALLBACK);
799 class_prefix[1] = XrmStringToName ("Keysym");
800 /* XXX: Need to check sizeof (rxvt_t) == sizeof (XPointer) */ 820 /* XXX: Need to check sizeof (rxvt_t) == sizeof (XPointer) */
801 XrmEnumerateDatabase (database, name_prefix, class_prefix, 821 XrmEnumerateDatabase (database, name_prefix, class_prefix,
802 XrmEnumOneLevel, rxvt_define_key, NULL); 822 XrmEnumOneLevel, rxvt_define_key, NULL);
803# endif 823# endif
804# endif 824# endif

Diff Legend

Removed lines
+ Added lines
< Changed lines
> Changed lines