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.147 by sf-exg, Wed Oct 13 23:04:57 2010 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 */
328 "tint," 329 "tint,"
329#endif 330#endif
330#if HAVE_AFTERIMAGE 331#if HAVE_AFTERIMAGE
331 "afterimage," 332 "afterimage,"
332#endif 333#endif
334#if HAVE_PIXBUF
335 "pixbuf,"
336#endif
333#if defined(USE_XIM) 337#if defined(USE_XIM)
334 "XIM," 338 "XIM,"
335#endif 339#endif
336#if defined(NO_BACKSPACE_KEY) 340#if defined(NO_BACKSPACE_KEY)
337 "no_backspace," 341 "no_backspace,"
396 switch (type) 400 switch (type)
397 { 401 {
398 case 0: /* brief listing */ 402 case 0: /* brief listing */
399 rxvt_log (" [-help] [--help]\n"); 403 rxvt_log (" [-help] [--help]\n");
400 404
401 for (col = 1, i = 0; i < optList_size; i++) 405 for (col = 1, i = 0; i < ecb_array_length (optList); i++)
402 if (optList[i].desc != NULL) 406 if (optList[i].desc != NULL)
403 { 407 {
404 int len = 0; 408 int len = 0;
405 409
406 if (optList[i].arg) 410 if (optList[i].arg)
407 len = strlen (optList[i].arg) + 1; 411 len = strlen (optList[i].arg) + 1;
408 assert (optList[i].opt != NULL); 412 assert (optList[i].opt != NULL);
409 len += 4 + strlen (optList[i].opt) + (optList_isBool (i) ? 2: 0); 413 len += 4 + strlen (optList[i].opt) + (optList_isBool (i) ? 2 : 0);
410 col += len; 414 col += len;
411 if (col > 79) 415 if (col > 79)
412 { 416 {
413 /* assume regular width */ 417 /* assume regular width */
414 rxvt_log ("\n"); 418 rxvt_log ("\n");
424 break; 428 break;
425 429
426 case 1: /* full command-line listing */ 430 case 1: /* full command-line listing */
427 rxvt_log (" [options] [-e command args]\n\nwhere options include:\n"); 431 rxvt_log (" [options] [-e command args]\n\nwhere options include:\n");
428 432
429 for (i = 0; i < optList_size; i++) 433 for (i = 0; i < ecb_array_length (optList); i++)
430 if (optList[i].desc != NULL) 434 if (optList[i].desc != NULL)
431 { 435 {
432 assert (optList[i].opt != NULL); 436 assert (optList[i].opt != NULL);
433 rxvt_log (" %s%s %-*s%s%s\n", 437 rxvt_log (" %s%s %-*s%s%s\n",
434 (optList_isBool (i) ? "-/+" : "-"), optList[i].opt, 438 (optList_isBool (i) ? "-/+" : "-"), optList[i].opt,
443 447
444 case 2: /* full resource listing */ 448 case 2: /* full resource listing */
445 rxvt_log (" [options] [-e command args]\n\n" 449 rxvt_log (" [options] [-e command args]\n\n"
446 "where resources (long-options) include:\n"); 450 "where resources (long-options) include:\n");
447 451
448 for (i = 0; i < optList_size; i++) 452 for (i = 0; i < ecb_array_length (optList); i++)
449 if (optList[i].kw != NULL) 453 if (optList[i].kw != NULL)
450 rxvt_log (" %s: %*s%s\n", 454 rxvt_log (" %s: %*s%s\n",
451 optList[i].kw, 455 optList[i].kw,
452 (INDENT - strlen (optList[i].kw)), "", /* XXX */ 456 (INDENT - strlen (optList[i].kw)), "", /* XXX */
453 (optList_isBool (i) ? "boolean" : optList[i].arg)); 457 (optList_isBool (i) ? "boolean" : optList[i].arg));
460 break; 464 break;
461 } 465 }
462 466
463 rxvt_log ("\n\n"); 467 rxvt_log ("\n\n");
464 rxvt_exit_failure (); 468 rxvt_exit_failure ();
465 /* NOTREACHED */
466} 469}
467 470
468/*}}} */ 471/*}}} */
469 472
470/*{{{ get command-line options before getting resources */ 473/*{{{ get command-line options before getting resources */
471void 474const char **
472rxvt_term::get_options (int argc, const char *const *argv) 475rxvt_term::get_options (int argc, const char *const *argv)
473{ 476{
474 int i, bad_option = 0; 477 int i, bad_option = 0;
475 478
476 for (i = 1; i < argc; i++) 479 for (i = 1; i < argc; i++)
507 510
508 if (!strcmp (opt, "h")) 511 if (!strcmp (opt, "h"))
509 rxvt_usage (0); 512 rxvt_usage (0);
510 513
511 /* feature: always try to match long-options */ 514 /* feature: always try to match long-options */
512 for (entry = 0; entry < optList_size; entry++) 515 for (entry = 0; entry < ecb_array_length (optList); entry++)
513 if ((optList[entry].kw && !strcmp (opt, optList[entry].kw)) 516 if ((optList[entry].kw && !strcmp (opt, optList[entry].kw))
514 || (!longopt 517 || (!longopt
515 && optList[entry].opt && !strcmp (opt, optList[entry].opt))) 518 && optList[entry].opt && !strcmp (opt, optList[entry].opt)))
516 break; 519 break;
517 520
518 if (entry < optList_size) 521 if (entry < ecb_array_length (optList)
522 && !optList_isInfo (entry))
519 { 523 {
520 if (optList_isReverse (entry)) 524 if (optList_isReverse (entry))
521 flag = !flag; 525 flag = !flag;
522 526
523 if (optList_isString (entry)) 527 if (optList_isString (entry))
524 { 528 {
525 /* 529 /*
526 * special cases are handled in main.c:main () to allow 530 * special cases are handled in init_resources () to allow
527 * X resources to set these values before we settle for 531 * X resources to set these values before we settle for
528 * default values 532 * default values
529 */ 533 */
530 534
531 if (optList[entry].doff != -1) 535 if (optList[entry].doff != -1)
561 sprintf (res, "*.%s: %s\n", opt, argv[i]); 565 sprintf (res, "*.%s: %s\n", opt, argv[i]);
562 XrmPutLineResource (&option_db, res); 566 XrmPutLineResource (&option_db, res);
563 } 567 }
564 } 568 }
565#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 }
566 else 577 else
567 { 578 {
568 bad_option = 1; 579 bad_option = 1;
569 rxvt_warn ("\"%s\": unknown or malformed option.\n", opt); 580 rxvt_warn ("\"%s\": unknown or malformed option.\n", opt);
570 } 581 }
571 } 582 }
572 583
573 if (bad_option) 584 if (bad_option)
574 rxvt_usage (0); 585 rxvt_usage (0);
586
587 return 0;
575} 588}
576 589
577/*}}} */ 590/*}}} */
578 591
579#ifndef NO_RESOURCES 592#ifndef NO_RESOURCES
584 * Define key from XrmEnumerateDatabase. 597 * Define key from XrmEnumerateDatabase.
585 * quarks will be something like 598 * quarks will be something like
586 * "rxvt" "keysym" "0xFF01" 599 * "rxvt" "keysym" "0xFF01"
587 * value will be a string 600 * value will be a string
588 */ 601 */
589/* ARGSUSED */ 602static int
590int
591rxvt_define_key (XrmDatabase *database UNUSED, 603rxvt_define_key (XrmDatabase *database ecb_unused,
592 XrmBindingList bindings UNUSED, 604 XrmBindingList bindings ecb_unused,
593 XrmQuarkList quarks, 605 XrmQuarkList quarks,
594 XrmRepresentation *type UNUSED, 606 XrmRepresentation *type ecb_unused,
595 XrmValue *value, 607 XrmValue *value,
596 XPointer closure UNUSED) 608 XPointer closure ecb_unused)
597{ 609{
598 int last; 610 int last;
599 611
600 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 */
601 ; 613 ;
664 // parse modifiers 676 // parse modifiers
665 while (str < key) 677 while (str < key)
666 { 678 {
667 unsigned int i; 679 unsigned int i;
668 680
669 for (i=0; i < sizeof (keysym_vocabulary) / sizeof (keysym_vocabulary_t); ++i) 681 for (i = 0; i < ecb_array_length (keysym_vocabulary); ++i)
670 { 682 {
671 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)
672 { 684 {
673 state |= keysym_vocabulary[i].value; 685 state |= keysym_vocabulary[i].value;
674 str += keysym_vocabulary[i].len; 686 str += keysym_vocabulary[i].len;
675 break; 687 break;
676 } 688 }
677 } 689 }
678 690
679 if (i >= sizeof (keysym_vocabulary) / sizeof (keysym_vocabulary_t)) 691 if (i >= ecb_array_length (keysym_vocabulary))
680 return -1; 692 return -1;
681 693
682 if (*str == '-') 694 if (*str == '-')
683 ++str; 695 ++str;
684 } 696 }
691 sym = strtol (str, &end, 16); 703 sym = strtol (str, &end, 16);
692 if (*end) 704 if (*end)
693 return -1; 705 return -1;
694 } 706 }
695 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)))
696 keyboard->register_user_translation (sym, state, arg); 710 keyboard->register_user_translation (sym, state, ws);
711 free (ws);
697 return 1; 712 return 1;
698} 713}
699 714
700# endif /* KEYSYM_RESOURCE */ 715# endif /* KEYSYM_RESOURCE */
701#endif /* NO_RESOURCES */ 716#endif /* NO_RESOURCES */
744 XrmMergeDatabases (option_db, &database); 759 XrmMergeDatabases (option_db, &database);
745 option_db = NULL; 760 option_db = NULL;
746 /* 761 /*
747 * Query resources for options that affect us 762 * Query resources for options that affect us
748 */ 763 */
749 for (int entry = 0; entry < optList_size; entry++) 764 for (int entry = 0; entry < ecb_array_length (optList); entry++)
750 { 765 {
751 int s; 766 int s;
752 const char *kw = optList[entry].kw; 767 const char *kw = optList[entry].kw;
753 768
754 if (kw == NULL || rs[optList[entry].doff] != NULL) 769 if (kw == NULL || rs[optList[entry].doff] != NULL)
774 789
775 set_option (optList[entry].index, s); 790 set_option (optList[entry].index, s);
776 } 791 }
777 } 792 }
778 } 793 }
794#endif /* NO_RESOURCES */
795}
779 796
797void
798rxvt_term::extract_keysym_resources ()
799{
800#ifndef NO_RESOURCES
780 /* 801 /*
781 * [R5 or later]: enumerate the resource database 802 * [R5 or later]: enumerate the resource database
782 */ 803 */
783# ifdef KEYSYM_RESOURCE 804# ifdef KEYSYM_RESOURCE
805 XrmDatabase database = XrmGetDatabase (dpy);
784 XrmName name_prefix[3]; 806 XrmName name_prefix[3];
785 XrmClass class_prefix[3]; 807 XrmClass class_prefix[3];
786 808
787 name_prefix[0] = XrmStringToName (rs[Rs_name]); 809 name_prefix[0] = XrmStringToName (rs[Rs_name]);
788 name_prefix[1] = XrmStringToName ("keysym"); 810 name_prefix[1] = XrmStringToName ("keysym");
792 class_prefix[2] = NULLQUARK; 814 class_prefix[2] = NULLQUARK;
793 /* XXX: Need to check sizeof (rxvt_t) == sizeof (XPointer) */ 815 /* XXX: Need to check sizeof (rxvt_t) == sizeof (XPointer) */
794 XrmEnumerateDatabase (database, name_prefix, class_prefix, 816 XrmEnumerateDatabase (database, name_prefix, class_prefix,
795 XrmEnumOneLevel, rxvt_define_key, NULL); 817 XrmEnumOneLevel, rxvt_define_key, NULL);
796# ifdef RESFALLBACK 818# ifdef RESFALLBACK
797 name_prefix[0] = XrmStringToName (RESFALLBACK);
798 name_prefix[1] = XrmStringToName ("keysym");
799 class_prefix[0] = XrmStringToName (RESFALLBACK); 819 name_prefix[0] = class_prefix[0] = XrmStringToName (RESFALLBACK);
800 class_prefix[1] = XrmStringToName ("Keysym");
801 /* XXX: Need to check sizeof (rxvt_t) == sizeof (XPointer) */ 820 /* XXX: Need to check sizeof (rxvt_t) == sizeof (XPointer) */
802 XrmEnumerateDatabase (database, name_prefix, class_prefix, 821 XrmEnumerateDatabase (database, name_prefix, class_prefix,
803 XrmEnumOneLevel, rxvt_define_key, NULL); 822 XrmEnumOneLevel, rxvt_define_key, NULL);
804# endif 823# endif
805# endif 824# endif

Diff Legend

Removed lines
+ Added lines
< Changed lines
> Changed lines