… | |
… | |
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 <schmorp@schmorp.de> |
9 | * Copyright (c) 2003-2006 Marc Lehmann <schmorp@schmorp.de> |
10 | * Copyright (c) 2007 Emanuele Giaquinta <e.giaquinta@glauco.it> |
10 | * Copyright (c) 2007,2015 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 3 of the License, or |
15 | * (at your option) any later version. |
15 | * (at your option) any later version. |
16 | * |
16 | * |
17 | * This program is distributed in the hope that it will be useful, |
17 | * This program is distributed in the hope that it will be useful, |
18 | * but WITHOUT ANY WARRANTY; without even the implied warranty of |
18 | * but WITHOUT ANY WARRANTY; without even the implied warranty of |
19 | * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the |
19 | * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the |
… | |
… | |
96 | STRG (Rs_geometry, "geometry", "geometry", "geometry", "size (in characters) and position"), |
96 | STRG (Rs_geometry, "geometry", "geometry", "geometry", "size (in characters) and position"), |
97 | SWCH ("C", Opt_console, 0, "intercept console messages"), |
97 | SWCH ("C", Opt_console, 0, "intercept console messages"), |
98 | SWCH ("iconic", Opt_iconic, 0, "start iconic"), |
98 | SWCH ("iconic", Opt_iconic, 0, "start iconic"), |
99 | SWCH ("ic", Opt_iconic, 0, NULL), /* short form */ |
99 | SWCH ("ic", Opt_iconic, 0, NULL), /* short form */ |
100 | STRG (Rs_chdir, "chdir", "cd", "string", "start shell in this directory"), |
100 | STRG (Rs_chdir, "chdir", "cd", "string", "start shell in this directory"), |
|
|
101 | SWCH ("dockapp", Opt_dockapp, 0, "start as dockapp"), |
101 | BOOL (Rs_reverseVideo, "reverseVideo", "rv", Opt_reverseVideo, 0, "reverse video"), |
102 | BOOL (Rs_reverseVideo, "reverseVideo", "rv", Opt_reverseVideo, 0, "reverse video"), |
102 | BOOL (Rs_loginShell, "loginShell", "ls", Opt_loginShell, 0, "login shell"), |
103 | BOOL (Rs_loginShell, "loginShell", "ls", Opt_loginShell, 0, "login shell"), |
|
|
104 | STRG (Rs_multiClickTime, "multiClickTime", "mc", "number", "maximum time (in ms) between multi-click selections"), |
103 | BOOL (Rs_jumpScroll, "jumpScroll", "j", Opt_jumpScroll, 0, "jump scrolling"), |
105 | BOOL (Rs_jumpScroll, "jumpScroll", "j", Opt_jumpScroll, 0, "jump scrolling"), |
104 | BOOL (Rs_skipScroll, "skipScroll", "ss", Opt_skipScroll, 0, "skip scrolling"), |
106 | BOOL (Rs_skipScroll, "skipScroll", "ss", Opt_skipScroll, 0, "skip scrolling"), |
105 | BOOL (Rs_pastableTabs, "pastableTabs", "ptab", Opt_pastableTabs, 0, "tab characters are pastable"), |
107 | BOOL (Rs_pastableTabs, "pastableTabs", "ptab", Opt_pastableTabs, 0, "tab characters are pastable"), |
106 | RSTRG (Rs_scrollstyle, "scrollstyle", "mode"), |
108 | RSTRG (Rs_scrollstyle, "scrollstyle", "mode"), |
107 | BOOL (Rs_scrollBar, "scrollBar", "sb", Opt_scrollBar, 0, "scrollbar"), |
109 | BOOL (Rs_scrollBar, "scrollBar", "sb", Opt_scrollBar, 0, "scrollbar"), |
… | |
… | |
111 | STRG (Rs_scrollBar_thickness, "thickness", "sbt", "number", "scrollbar thickness/width in pixels"), |
113 | STRG (Rs_scrollBar_thickness, "thickness", "sbt", "number", "scrollbar thickness/width in pixels"), |
112 | BOOL (Rs_scrollTtyOutput, "scrollTtyOutput", NULL, Opt_scrollTtyOutput, 0, NULL), |
114 | BOOL (Rs_scrollTtyOutput, "scrollTtyOutput", NULL, Opt_scrollTtyOutput, 0, NULL), |
113 | BOOL (Rs_scrollTtyOutput, NULL, "si", Opt_scrollTtyOutput, Optflag_Reverse, "scroll-on-tty-output inhibit"), |
115 | BOOL (Rs_scrollTtyOutput, NULL, "si", Opt_scrollTtyOutput, Optflag_Reverse, "scroll-on-tty-output inhibit"), |
114 | BOOL (Rs_scrollTtyKeypress, "scrollTtyKeypress", "sk", Opt_scrollTtyKeypress, 0, "scroll-on-keypress"), |
116 | BOOL (Rs_scrollTtyKeypress, "scrollTtyKeypress", "sk", Opt_scrollTtyKeypress, 0, "scroll-on-keypress"), |
115 | BOOL (Rs_scrollWithBuffer, "scrollWithBuffer", "sw", Opt_scrollWithBuffer, 0, "scroll-with-buffer"), |
117 | BOOL (Rs_scrollWithBuffer, "scrollWithBuffer", "sw", Opt_scrollWithBuffer, 0, "scroll-with-buffer"), |
116 | #if BG_IMAGE_FROM_ROOT |
|
|
117 | BOOL (Rs_transparent, "inheritPixmap", "ip", Opt_transparent, 0, "inherit parent pixmap"), |
|
|
118 | BOOL (Rs_transparent, "transparent", "tr", Opt_transparent, 0, "inherit parent pixmap"), |
|
|
119 | STRG (Rs_color + Color_tint, "tintColor", "tint", "color", "tint color"), |
|
|
120 | STRG (Rs_shade, "shading", "sh", "number", "shade background by number %."), |
|
|
121 | STRG (Rs_blurradius, "blurRadius", "blr", "HxV", "gaussian blur radii to apply to the root background"), |
|
|
122 | #endif |
|
|
123 | #if OFF_FOCUS_FADING |
118 | #if OFF_FOCUS_FADING |
124 | STRG (Rs_fade, "fading", "fade", "number", "fade colors by number % when losing focus"), |
119 | STRG (Rs_fade, "fading", "fade", "number", "fade colors by number % when losing focus"), |
125 | STRG (Rs_color + Color_fade, "fadeColor", "fadecolor", "color", "target color for off-focus fading"), |
120 | STRG (Rs_color + Color_fade, "fadeColor", "fadecolor", "color", "target color for off-focus fading"), |
126 | #endif |
121 | #endif |
127 | BOOL (Rs_utmpInhibit, "utmpInhibit", "ut", Opt_utmpInhibit, 0, "utmp inhibit"), |
122 | BOOL (Rs_utmpInhibit, "utmpInhibit", "ut", Opt_utmpInhibit, 0, "utmp inhibit"), |
… | |
… | |
192 | RSTRG (Rs_color + Color_cursor2, "cursorColor2", "color"), |
187 | RSTRG (Rs_color + Color_cursor2, "cursorColor2", "color"), |
193 | #endif /* NO_CURSORCOLOR */ |
188 | #endif /* NO_CURSORCOLOR */ |
194 | STRG (Rs_color + Color_pointer_fg, "pointerColor", "pr", "color", "pointer color"), |
189 | STRG (Rs_color + Color_pointer_fg, "pointerColor", "pr", "color", "pointer color"), |
195 | STRG (Rs_color + Color_pointer_bg, "pointerColor2", "pr2", "color", "pointer bg color"), |
190 | STRG (Rs_color + Color_pointer_bg, "pointerColor2", "pr2", "color", "pointer bg color"), |
196 | STRG (Rs_color + Color_border, "borderColor", "bd", "color", "border color"), |
191 | STRG (Rs_color + Color_border, "borderColor", "bd", "color", "border color"), |
197 | #if BG_IMAGE_FROM_FILE |
|
|
198 | RSTRG (Rs_path, "path", "search path"), |
|
|
199 | STRG (Rs_backgroundPixmap, "backgroundPixmap", "pixmap", "file[;geom]", "background pixmap"), |
|
|
200 | #endif |
|
|
201 | #if ENABLE_EWMH |
192 | #if ENABLE_EWMH |
202 | STRG (Rs_iconfile, "iconFile", "icon", "file", "path to application icon image"), |
193 | STRG (Rs_iconfile, "iconFile", "icon", "file", "path to application icon image"), |
|
|
194 | #endif |
|
|
195 | #ifdef HAVE_XMU |
|
|
196 | RSTRG (Rs_pointerShape, "pointerShape", "string"), |
203 | #endif |
197 | #endif |
204 | /* fonts: command-line option = resource name */ |
198 | /* fonts: command-line option = resource name */ |
205 | STRG (Rs_font, "font", "fn", "fontname", "normal text font"), |
199 | STRG (Rs_font, "font", "fn", "fontname", "normal text font"), |
206 | #if ENABLE_STYLES |
200 | #if ENABLE_STYLES |
207 | STRG (Rs_boldFont, "boldFont", "fb", "fontname", "bold font"), |
201 | STRG (Rs_boldFont, "boldFont", "fb", "fontname", "bold font"), |
… | |
… | |
623 | return 0; |
617 | return 0; |
624 | } |
618 | } |
625 | |
619 | |
626 | /*}}} */ |
620 | /*}}} */ |
627 | |
621 | |
628 | #ifndef NO_RESOURCES |
|
|
629 | /*----------------------------------------------------------------------*/ |
622 | /*----------------------------------------------------------------------*/ |
630 | |
623 | |
631 | # ifdef KEYSYM_RESOURCE |
624 | #ifdef KEYSYM_RESOURCE |
632 | /* |
|
|
633 | * Define key from XrmEnumerateDatabase. |
|
|
634 | * quarks will be something like |
|
|
635 | * "rxvt" "keysym" "0xFF01" |
|
|
636 | * value will be a string |
|
|
637 | */ |
|
|
638 | static int |
625 | static void |
639 | rxvt_define_key (XrmDatabase *database ecb_unused, |
626 | rxvt_define_key (rxvt_term *term, const char *k, const char *v) |
640 | XrmBindingList bindings ecb_unused, |
|
|
641 | XrmQuarkList quarks, |
|
|
642 | XrmRepresentation *type ecb_unused, |
|
|
643 | XrmValue *value, |
|
|
644 | XPointer closure) |
|
|
645 | { |
627 | { |
646 | rxvt_term *term = (rxvt_term *)closure; |
628 | term->bind_action (k, v); |
647 | int last; |
|
|
648 | |
|
|
649 | for (last = 0; quarks[last] != NULLQUARK; last++) /* look for last quark in list */ |
|
|
650 | ; |
|
|
651 | |
|
|
652 | last--; |
|
|
653 | term->bind_action (XrmQuarkToString (quarks[last]), (char *)value->addr); |
|
|
654 | return False; |
|
|
655 | } |
629 | } |
656 | |
630 | |
657 | /* |
631 | /* |
658 | * look for something like this (XK_Delete) |
632 | * look for something like this (XK_Delete) |
659 | * rxvt*keysym.0xFFFF: "\177" |
633 | * rxvt*keysym.0xFFFF: "\177" |
… | |
… | |
693 | { "4", 1, Mod4Mask }, |
667 | { "4", 1, Mod4Mask }, |
694 | { "5", 1, Mod5Mask }, |
668 | { "5", 1, Mod5Mask }, |
695 | }; |
669 | }; |
696 | |
670 | |
697 | int |
671 | int |
698 | rxvt_term::bind_action (const char *str, const char *arg) |
672 | rxvt_term::parse_keysym (const char *str, unsigned int &state) |
699 | { |
673 | { |
700 | int sym; |
674 | int sym; |
701 | unsigned int state = 0; |
|
|
702 | const char *key = strrchr (str, '-'); |
675 | const char *key = strrchr (str, '-'); |
|
|
676 | |
|
|
677 | state = 0; |
703 | |
678 | |
704 | if (!key) |
679 | if (!key) |
705 | key = str; |
680 | key = str; |
706 | else |
681 | else |
707 | key++; |
682 | key++; |
708 | |
683 | |
709 | // string or key is empty |
684 | // string or key is empty |
710 | if (*arg == '\0' || *key == '\0') |
685 | if (*key == '\0') |
711 | return -1; |
686 | return -1; |
712 | |
687 | |
713 | // parse modifiers |
688 | // parse modifiers |
714 | while (str < key) |
689 | while (str < key) |
715 | { |
690 | { |
… | |
… | |
740 | sym = strtol (str, &end, 16); |
715 | sym = strtol (str, &end, 16); |
741 | if (*end) |
716 | if (*end) |
742 | return -1; |
717 | return -1; |
743 | } |
718 | } |
744 | |
719 | |
|
|
720 | return sym; |
|
|
721 | } |
|
|
722 | |
|
|
723 | int |
|
|
724 | rxvt_term::bind_action (const char *str, const char *arg) |
|
|
725 | { |
|
|
726 | int sym; |
|
|
727 | unsigned int state; |
|
|
728 | |
|
|
729 | if (*arg == '\0' || (sym = parse_keysym (str, state)) == -1) |
|
|
730 | return -1; |
|
|
731 | |
745 | wchar_t *ws = rxvt_mbstowcs (arg); |
732 | wchar_t *ws = rxvt_mbstowcs (arg); |
746 | if (!HOOK_INVOKE ((this, HOOK_REGISTER_COMMAND, DT_INT, sym, DT_INT, state, DT_WCS_LEN, ws, wcslen (ws), DT_END))) |
733 | if (!HOOK_INVOKE ((this, HOOK_REGISTER_COMMAND, DT_INT, sym, DT_INT, state, DT_WCS_LEN, ws, wcslen (ws), DT_END))) |
747 | keyboard->register_action (sym, state, ws); |
734 | keyboard->register_action (sym, state, ws); |
748 | |
735 | |
749 | free (ws); |
736 | free (ws); |
750 | return 1; |
737 | return 1; |
751 | } |
738 | } |
752 | |
739 | |
753 | # endif /* KEYSYM_RESOURCE */ |
740 | #endif /* KEYSYM_RESOURCE */ |
754 | #endif /* NO_RESOURCES */ |
|
|
755 | |
741 | |
756 | static char * |
742 | static char * |
757 | get_res (XrmDatabase database, const char *program, const char *option) |
743 | get_res (XrmDatabase database, const char *program, const char *option) |
758 | { |
744 | { |
759 | char resource[512]; |
745 | char resource[512]; |
… | |
… | |
830 | } |
816 | } |
831 | } |
817 | } |
832 | #endif /* NO_RESOURCES */ |
818 | #endif /* NO_RESOURCES */ |
833 | } |
819 | } |
834 | |
820 | |
|
|
821 | struct rxvt_enumerate_closure |
|
|
822 | { |
|
|
823 | rxvt_term *term; |
|
|
824 | void (*cb)(rxvt_term *, const char *, const char *); |
|
|
825 | int specific; // iterate over only a specific subhierarchy |
|
|
826 | }; |
|
|
827 | |
|
|
828 | /* |
|
|
829 | * Define key from XrmEnumerateDatabase. |
|
|
830 | * quarks will be something like |
|
|
831 | * "rxvt" "keysym" "0xFF01" |
|
|
832 | * value will be a string |
|
|
833 | */ |
|
|
834 | static int |
|
|
835 | rxvt_enumerate_helper ( |
|
|
836 | XrmDatabase *database ecb_unused, |
|
|
837 | XrmBindingList bindings ecb_unused, |
|
|
838 | XrmQuarkList quarks, |
|
|
839 | XrmRepresentation *type ecb_unused, |
|
|
840 | XrmValue *value, |
|
|
841 | XPointer closure |
|
|
842 | ) |
|
|
843 | { |
|
|
844 | const rxvt_enumerate_closure *data = (const rxvt_enumerate_closure *)closure; |
|
|
845 | |
|
|
846 | if (*quarks == NULLQUARK) return False; |
|
|
847 | |
|
|
848 | // if the quark list starts with a tightly bound quark, we skip it, |
|
|
849 | // as it exactly matched the prefix. Otherwise, it matched because |
|
|
850 | // it started with "*", in which case we assume the prefix is part |
|
|
851 | // of the "*". |
|
|
852 | if (*bindings == XrmBindTightly) |
|
|
853 | { |
|
|
854 | ++quarks, ++bindings; // skip if this is a fixed prefix, rather than a *-match |
|
|
855 | if (*quarks == NULLQUARK) return False; |
|
|
856 | } |
|
|
857 | |
|
|
858 | // specific, a bit misleadingly named, is used when a specific "subclass" |
|
|
859 | // is iterated over, e.g. "keysym", and is used to skip one more |
|
|
860 | // component, as well as all generic prefixes |
|
|
861 | // this is a bit of a hack, ideally, keysym (the only user) should use its |
|
|
862 | // own iteration function, but this ought to be less bloated |
|
|
863 | if (data->specific) |
|
|
864 | { |
|
|
865 | ++quarks, ++bindings; |
|
|
866 | if (*quarks == NULLQUARK) return False; |
|
|
867 | } |
|
|
868 | |
|
|
869 | char *pattern; |
|
|
870 | if (quarks[1] == NULLQUARK) |
|
|
871 | pattern = XrmQuarkToString (quarks[0]); // single component, fast path |
|
|
872 | else |
|
|
873 | { |
|
|
874 | // multiple components, slow path - should be rare, don't optimize for speed |
|
|
875 | int size = 0; |
|
|
876 | |
|
|
877 | for (int i = 0; quarks[i] != NULLQUARK; ++i) |
|
|
878 | size += strlen (XrmQuarkToString (quarks[i])) + 1; |
|
|
879 | |
|
|
880 | pattern = rxvt_temp_buf<char> (size + 1); |
|
|
881 | |
|
|
882 | // now print all components |
|
|
883 | { |
|
|
884 | char *cur = pattern; |
|
|
885 | |
|
|
886 | for (int i = 0; quarks[i] != NULLQUARK; ++i) |
|
|
887 | cur += sprintf (cur, ".%s", XrmQuarkToString (quarks[i])); |
|
|
888 | } |
|
|
889 | |
|
|
890 | ++pattern; // skip initial dot |
|
|
891 | } |
|
|
892 | |
|
|
893 | data->cb (data->term, pattern, (char *)value->addr); |
|
|
894 | |
|
|
895 | return False; |
|
|
896 | } |
|
|
897 | |
835 | void |
898 | void |
836 | rxvt_term::extract_keysym_resources () |
899 | rxvt_term::enumerate_resources (void (*cb)(rxvt_term *, const char *, const char *), const char *name_p, const char *class_p) |
837 | { |
900 | { |
838 | #ifndef NO_RESOURCES |
|
|
839 | /* |
901 | /* |
840 | * [R5 or later]: enumerate the resource database |
902 | * [R5 or later]: enumerate the resource database |
841 | */ |
903 | */ |
|
|
904 | assert (!name_p == !class_p); // both must be specified, or missing |
|
|
905 | |
842 | # ifdef KEYSYM_RESOURCE |
906 | #ifdef KEYSYM_RESOURCE |
|
|
907 | rxvt_enumerate_closure closure = { this, cb, name_p ? 1 : 0 }; |
|
|
908 | |
843 | XrmDatabase database = XrmGetDatabase (dpy); |
909 | XrmDatabase database = XrmGetDatabase (dpy); |
844 | XrmName name_prefix[3]; |
910 | XrmName name_prefix[3]; |
845 | XrmClass class_prefix[3]; |
911 | XrmClass class_prefix[3]; |
846 | |
912 | |
847 | name_prefix[0] = XrmStringToName (rs[Rs_name]); |
913 | name_prefix[1] = name_p ? XrmStringToName (name_p) : NULLQUARK; |
848 | name_prefix[1] = XrmStringToName ("keysym"); |
|
|
849 | name_prefix[2] = NULLQUARK; |
914 | name_prefix[2] = NULLQUARK; |
850 | class_prefix[0] = XrmStringToName (RESCLASS); |
915 | class_prefix[1] = class_p ? XrmStringToName (class_p) : NULLQUARK; |
851 | class_prefix[1] = XrmStringToName ("Keysym"); |
|
|
852 | class_prefix[2] = NULLQUARK; |
916 | class_prefix[2] = NULLQUARK; |
853 | /* XXX: Need to check sizeof (rxvt_t) == sizeof (XPointer) */ |
917 | |
|
|
918 | # ifdef RESFALLBACK |
|
|
919 | name_prefix[0] = class_prefix[0] = XrmStringToName (RESFALLBACK); |
854 | XrmEnumerateDatabase (database, name_prefix, class_prefix, |
920 | XrmEnumerateDatabase (database, name_prefix, class_prefix, |
855 | XrmEnumOneLevel, rxvt_define_key, (XPointer)this); |
921 | XrmEnumAllLevels, rxvt_enumerate_helper, (XPointer)&closure); |
856 | # ifdef RESFALLBACK |
922 | # endif |
|
|
923 | |
857 | name_prefix[0] = class_prefix[0] = XrmStringToName (RESFALLBACK); |
924 | name_prefix[0] = class_prefix[0] = XrmStringToName (RESCLASS); |
858 | /* XXX: Need to check sizeof (rxvt_t) == sizeof (XPointer) */ |
|
|
859 | XrmEnumerateDatabase (database, name_prefix, class_prefix, |
925 | XrmEnumerateDatabase (database, name_prefix, class_prefix, |
860 | XrmEnumOneLevel, rxvt_define_key, (XPointer)this); |
926 | XrmEnumAllLevels, rxvt_enumerate_helper, (XPointer)&closure); |
861 | # endif |
927 | |
|
|
928 | name_prefix[0] = class_prefix[0] = XrmStringToName (rs[Rs_name]); |
|
|
929 | XrmEnumerateDatabase (database, name_prefix, class_prefix, |
|
|
930 | XrmEnumAllLevels, rxvt_enumerate_helper, (XPointer)&closure); |
862 | # endif |
931 | #endif |
|
|
932 | } |
863 | |
933 | |
864 | #endif /* NO_RESOURCES */ |
934 | void |
|
|
935 | rxvt_term::extract_keysym_resources () |
|
|
936 | { |
|
|
937 | #ifdef KEYSYM_RESOURCE |
|
|
938 | enumerate_keysym_resources (rxvt_define_key); |
|
|
939 | #endif |
865 | } |
940 | } |
866 | |
941 | |
867 | /*----------------------- end-of-file (C source) -----------------------*/ |
942 | /*----------------------- end-of-file (C source) -----------------------*/ |
|
|
943 | |