… | |
… | |
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,2015 Emanuele Giaquinta <e.giaquinta@glauco.it> |
10 | * |
11 | * |
11 | * 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 |
12 | * 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 |
13 | * the Free Software Foundation; either version 2 of the License, or |
14 | * the Free Software Foundation; either version 3 of the License, or |
14 | * (at your option) any later version. |
15 | * (at your option) any later version. |
15 | * |
16 | * |
16 | * 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, |
17 | * but WITHOUT ANY WARRANTY; without even the implied warranty of |
18 | * but WITHOUT ANY WARRANTY; without even the implied warranty of |
18 | * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the |
19 | * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the |
… | |
… | |
33 | |
34 | |
34 | /* place holders used for parsing command-line options */ |
35 | /* place holders used for parsing command-line options */ |
35 | #define Optflag_Reverse 1 |
36 | #define Optflag_Reverse 1 |
36 | #define Optflag_Boolean 2 |
37 | #define Optflag_Boolean 2 |
37 | #define Optflag_Switch 4 |
38 | #define Optflag_Switch 4 |
|
|
39 | #define Optflag_Info 8 |
38 | |
40 | |
39 | /* monolithic option/resource structure: */ |
41 | /* monolithic option/resource structure: */ |
40 | /* |
42 | /* |
41 | * `string' options MUST have a usage argument |
43 | * `string' options MUST have a usage argument |
42 | * `switch' and `boolean' options have no argument |
44 | * `switch' and `boolean' options have no argument |
43 | * 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 () |
44 | */ |
46 | */ |
45 | |
47 | |
46 | /* INFO () - descriptive information only */ |
48 | /* INFO () - descriptive information only */ |
47 | #define INFO(opt, arg, desc) \ |
49 | #define INFO(opt, arg, desc) \ |
48 | {0, 0, -1, NULL, (opt), (arg), (desc)} |
50 | {0, Optflag_Info, -1, NULL, (opt), (arg), (desc)} |
|
|
51 | |
|
|
52 | #define RINFO(kw, arg) \ |
|
|
53 | {0, Optflag_Info, -1, (kw), NULL, (arg), NULL} |
49 | |
54 | |
50 | /* STRG () - command-line option, with/without resource */ |
55 | /* STRG () - command-line option, with/without resource */ |
51 | #define STRG(rsp, kw, opt, arg, desc) \ |
56 | #define STRG(rsp, kw, opt, arg, desc) \ |
52 | {0, 0, (rsp), (kw), (opt), (arg), (desc)} |
57 | {0, 0, (rsp), (kw), (opt), (arg), (desc)} |
53 | |
58 | |
… | |
… | |
62 | /* SWCH () - `-' flag */ |
67 | /* SWCH () - `-' flag */ |
63 | #define SWCH(opt, option, flag, desc) \ |
68 | #define SWCH(opt, option, flag, desc) \ |
64 | { (option), (Optflag_Switch | (flag)), -1, NULL, (opt), NULL, (desc)} |
69 | { (option), (Optflag_Switch | (flag)), -1, NULL, (opt), NULL, (desc)} |
65 | |
70 | |
66 | /* convenient macros */ |
71 | /* convenient macros */ |
67 | #define optList_strlen(i) \ |
72 | #define optList_isString(i) \ |
68 | (optList[i].flag ? 0 : (optList[i].arg ? strlen (optList[i].arg) : 1)) |
73 | (optList[i].flag == 0) |
69 | #define optList_isBool(i) \ |
74 | #define optList_isBool(i) \ |
70 | (optList[i].flag & Optflag_Boolean) |
75 | (optList[i].flag & Optflag_Boolean) |
71 | #define optList_isReverse(i) \ |
76 | #define optList_isReverse(i) \ |
72 | (optList[i].flag & Optflag_Reverse) |
77 | (optList[i].flag & Optflag_Reverse) |
73 | #define optList_size \ |
78 | #define optList_isInfo(i) \ |
74 | (sizeof (optList) / sizeof (optList[0])) |
79 | (optList[i].flag & Optflag_Info) |
75 | |
80 | |
76 | static const struct |
81 | static const struct |
77 | { |
82 | { |
78 | const uint8_t index; /* Option index */ |
83 | const uint8_t index; /* Option index */ |
79 | const uint8_t flag; /* Option flag */ |
84 | const uint8_t flag; /* Option flag */ |
… | |
… | |
90 | STRG (Rs_geometry, NULL, "g", NULL, NULL), /* short form */ |
95 | STRG (Rs_geometry, NULL, "g", NULL, NULL), /* short form */ |
91 | STRG (Rs_geometry, "geometry", "geometry", "geometry", "size (in characters) and position"), |
96 | STRG (Rs_geometry, "geometry", "geometry", "geometry", "size (in characters) and position"), |
92 | SWCH ("C", Opt_console, 0, "intercept console messages"), |
97 | SWCH ("C", Opt_console, 0, "intercept console messages"), |
93 | SWCH ("iconic", Opt_iconic, 0, "start iconic"), |
98 | SWCH ("iconic", Opt_iconic, 0, "start iconic"), |
94 | 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"), |
|
|
101 | SWCH ("dockapp", Opt_dockapp, 0, "start as dockapp"), |
95 | BOOL (Rs_reverseVideo, "reverseVideo", "rv", Opt_reverseVideo, 0, "reverse video"), |
102 | BOOL (Rs_reverseVideo, "reverseVideo", "rv", Opt_reverseVideo, 0, "reverse video"), |
96 | 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"), |
97 | BOOL (Rs_jumpScroll, "jumpScroll", "j", Opt_jumpScroll, 0, "jump scrolling"), |
105 | BOOL (Rs_jumpScroll, "jumpScroll", "j", Opt_jumpScroll, 0, "jump scrolling"), |
98 | BOOL (Rs_skipScroll, "skipScroll", "ss", Opt_skipScroll, 0, "skip scrolling"), |
106 | BOOL (Rs_skipScroll, "skipScroll", "ss", Opt_skipScroll, 0, "skip scrolling"), |
99 | 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"), |
100 | #if HAVE_SCROLLBARS |
|
|
101 | RSTRG (Rs_scrollstyle, "scrollstyle", "mode"), |
108 | RSTRG (Rs_scrollstyle, "scrollstyle", "mode"), |
102 | BOOL (Rs_scrollBar, "scrollBar", "sb", Opt_scrollBar, 0, "scrollbar"), |
109 | BOOL (Rs_scrollBar, "scrollBar", "sb", Opt_scrollBar, 0, "scrollbar"), |
103 | BOOL (Rs_scrollBar_right, "scrollBar_right", "sr", Opt_scrollBar_right, 0, "scrollbar right"), |
110 | BOOL (Rs_scrollBar_right, "scrollBar_right", "sr", Opt_scrollBar_right, 0, "scrollbar right"), |
104 | BOOL (Rs_scrollBar_floating, "scrollBar_floating", "st", Opt_scrollBar_floating, 0, "scrollbar without a trough"), |
111 | BOOL (Rs_scrollBar_floating, "scrollBar_floating", "st", Opt_scrollBar_floating, 0, "scrollbar without a trough"), |
105 | RSTRG (Rs_scrollBar_align, "scrollBar_align", "mode"), |
112 | RSTRG (Rs_scrollBar_align, "scrollBar_align", "mode"), |
106 | 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"), |
107 | #endif |
|
|
108 | BOOL (Rs_scrollTtyOutput, "scrollTtyOutput", NULL, Opt_scrollTtyOutput, 0, NULL), |
114 | BOOL (Rs_scrollTtyOutput, "scrollTtyOutput", NULL, Opt_scrollTtyOutput, 0, NULL), |
109 | 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"), |
110 | BOOL (Rs_scrollTtyKeypress, "scrollTtyKeypress", "sk", Opt_scrollTtyKeypress, 0, "scroll-on-keypress"), |
116 | BOOL (Rs_scrollTtyKeypress, "scrollTtyKeypress", "sk", Opt_scrollTtyKeypress, 0, "scroll-on-keypress"), |
111 | BOOL (Rs_scrollWithBuffer, "scrollWithBuffer", "sw", Opt_scrollWithBuffer, 0, "scroll-with-buffer"), |
117 | BOOL (Rs_scrollWithBuffer, "scrollWithBuffer", "sw", Opt_scrollWithBuffer, 0, "scroll-with-buffer"), |
112 | #if ENABLE_TRANSPARENCY |
|
|
113 | BOOL (Rs_transparent, "inheritPixmap", "ip", Opt_transparent, 0, "inherit parent pixmap"), |
|
|
114 | SWCH ("tr", Opt_transparent, 0, NULL), |
|
|
115 | # if TINTING |
|
|
116 | STRG (Rs_color + Color_tint, "tintColor", "tint", "color", "tint color"), |
|
|
117 | # endif |
|
|
118 | #endif |
|
|
119 | #if OFF_FOCUS_FADING |
118 | #if OFF_FOCUS_FADING |
120 | STRG (Rs_fade, "fading", "fade", "%", "fade colors x% percent when rxvt-unicode is losing focus"), |
119 | STRG (Rs_fade, "fading", "fade", "number", "fade colors by number % when losing focus"), |
121 | 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"), |
122 | #endif |
|
|
123 | #if TINTING |
|
|
124 | STRG (Rs_shade, "shading", "sh", "%", "shade background by x % when tinting."), |
|
|
125 | #endif |
121 | #endif |
126 | BOOL (Rs_utmpInhibit, "utmpInhibit", "ut", Opt_utmpInhibit, 0, "utmp inhibit"), |
122 | BOOL (Rs_utmpInhibit, "utmpInhibit", "ut", Opt_utmpInhibit, 0, "utmp inhibit"), |
127 | #ifndef NO_BELL |
123 | #ifndef NO_BELL |
128 | # if ENABLE_FRILLS |
124 | # if ENABLE_FRILLS |
129 | BOOL (Rs_urgentOnBell, "urgentOnBell", NULL, Opt_urgentOnBell, 0, NULL), |
125 | BOOL (Rs_urgentOnBell, "urgentOnBell", NULL, Opt_urgentOnBell, 0, NULL), |
… | |
… | |
171 | #ifndef NO_BOLD_UNDERLINE_REVERSE |
167 | #ifndef NO_BOLD_UNDERLINE_REVERSE |
172 | RSTRG (Rs_color + Color_BD, "colorBD", "color"), |
168 | RSTRG (Rs_color + Color_BD, "colorBD", "color"), |
173 | RSTRG (Rs_color + Color_IT, "colorIT", "color"), |
169 | RSTRG (Rs_color + Color_IT, "colorIT", "color"), |
174 | RSTRG (Rs_color + Color_UL, "colorUL", "color"), |
170 | RSTRG (Rs_color + Color_UL, "colorUL", "color"), |
175 | RSTRG (Rs_color + Color_RV, "colorRV", "color"), |
171 | RSTRG (Rs_color + Color_RV, "colorRV", "color"), |
176 | #endif /* ! NO_BOLD_UNDERLINE_REVERSE */ |
172 | #endif /* ! NO_BOLD_UNDERLINE_REVERSE */ |
177 | #if ENABLE_FRILLS |
173 | #if ENABLE_FRILLS |
178 | RSTRG (Rs_color + Color_underline, "underlineColor", "color"), |
174 | RSTRG (Rs_color + Color_underline, "underlineColor", "color"), |
179 | #endif |
175 | #endif |
180 | #ifdef KEEP_SCROLLCOLOR |
|
|
181 | RSTRG (Rs_color + Color_scroll, "scrollColor", "color"), |
176 | RSTRG (Rs_color + Color_scroll, "scrollColor", "color"), |
|
|
177 | #ifdef RXVT_SCROLLBAR |
182 | RSTRG (Rs_color + Color_trough, "troughColor", "color"), |
178 | RSTRG (Rs_color + Color_trough, "troughColor", "color"), |
183 | #endif /* KEEP_SCROLLCOLOR */ |
179 | #endif |
184 | #ifdef OPTION_HC |
180 | #ifdef OPTION_HC |
185 | STRG (Rs_color + Color_HC, "highlightColor", "hc", "color", "highlight color"), |
181 | STRG (Rs_color + Color_HC, "highlightColor", "hc", "color", "highlight color"), |
|
|
182 | RSTRG (Rs_color + Color_HTC, "highlightTextColor", "color"), |
186 | #endif |
183 | #endif |
187 | #ifndef NO_CURSORCOLOR |
184 | #ifndef NO_CURSORCOLOR |
188 | STRG (Rs_color + Color_cursor, "cursorColor", "cr", "color", "cursor color"), |
185 | STRG (Rs_color + Color_cursor, "cursorColor", "cr", "color", "cursor color"), |
189 | /* command-line option = resource name */ |
186 | /* command-line option = resource name */ |
190 | RSTRG (Rs_color + Color_cursor2, "cursorColor2", "color"), |
187 | RSTRG (Rs_color + Color_cursor2, "cursorColor2", "color"), |
191 | #endif /* NO_CURSORCOLOR */ |
188 | #endif /* NO_CURSORCOLOR */ |
192 | STRG (Rs_color + Color_pointer_fg, "pointerColor", "pr", "color", "pointer color"), |
189 | STRG (Rs_color + Color_pointer_fg, "pointerColor", "pr", "color", "pointer color"), |
193 | 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"), |
194 | STRG (Rs_color + Color_border, "borderColor", "bd", "color", "border color"), |
191 | STRG (Rs_color + Color_border, "borderColor", "bd", "color", "border color"), |
195 | #ifdef XPM_BACKGROUND |
192 | #if ENABLE_EWMH |
196 | RSTRG (Rs_path, "path", "search path"), |
193 | STRG (Rs_iconfile, "iconFile", "icon", "file", "path to application icon image"), |
197 | STRG (Rs_backgroundPixmap, "backgroundPixmap", "pixmap", "file[;geom]", "background pixmap"), |
194 | #endif |
|
|
195 | #ifdef HAVE_XMU |
|
|
196 | RSTRG (Rs_pointerShape, "pointerShape", "string"), |
198 | #endif |
197 | #endif |
199 | /* fonts: command-line option = resource name */ |
198 | /* fonts: command-line option = resource name */ |
200 | STRG (Rs_font, "font", "fn", "fontname", "normal text font"), |
199 | STRG (Rs_font, "font", "fn", "fontname", "normal text font"), |
201 | #if ENABLE_STYLES |
200 | #if ENABLE_STYLES |
202 | STRG (Rs_boldFont, "boldFont", "fb", "fontname", "bold font"), |
201 | STRG (Rs_boldFont, "boldFont", "fb", "fontname", "bold font"), |
203 | STRG (Rs_italicFont, "italicFont", "fi", "fontname", "italic font"), |
202 | STRG (Rs_italicFont, "italicFont", "fi", "fontname", "italic font"), |
204 | STRG (Rs_boldItalicFont, "boldItalicFont", "fbi", "fontname", "bold italic font"), |
203 | STRG (Rs_boldItalicFont, "boldItalicFont", "fbi", "fontname", "bold italic font"), |
205 | BOOL (Rs_intensityStyles, "intensityStyles", "is", Opt_intensityStyles, 0, "font styles imply intensity changes"), |
204 | BOOL (Rs_intensityStyles, "intensityStyles", "is", Opt_intensityStyles, 0, "font styles imply intensity changes"), |
206 | #endif |
205 | #endif |
207 | #ifdef USE_XIM |
206 | #if USE_XIM |
208 | STRG (Rs_inputMethod, "inputMethod", "im", "name", "name of input method"), |
207 | STRG (Rs_inputMethod, "inputMethod", "im", "name", "name of input method"), |
209 | STRG (Rs_preeditType, "preeditType", "pt", "style", "input style: style = OverTheSpot|OffTheSpot|Root"), |
208 | STRG (Rs_preeditType, "preeditType", "pt", "style", "input style: style = OverTheSpot|OffTheSpot|Root"), |
210 | STRG (Rs_imLocale, "imLocale", "imlocale", "string", "locale to use for input method"), |
209 | STRG (Rs_imLocale, "imLocale", "imlocale", "string", "locale to use for input method"), |
211 | STRG (Rs_imFont, "imFont", "imfont", "fontname", "fontset for styles OverTheSpot and OffTheSpot"), |
210 | STRG (Rs_imFont, "imFont", "imfont", "fontname", "fontset for styles OverTheSpot and OffTheSpot"), |
212 | #endif /* USE_XIM */ |
211 | #endif /* USE_XIM */ |
213 | STRG (Rs_name, NULL, "name", "string", "client instance, icon, and title strings"), |
212 | STRG (Rs_name, NULL, "name", "string", "client instance, icon, and title strings"), |
214 | STRG (Rs_title, "title", "title", "string", "title name for window"), |
213 | STRG (Rs_title, "title", "title", "string", "title name for window"), |
215 | STRG (Rs_title, NULL, "T", NULL, NULL), /* short form */ |
214 | STRG (Rs_title, NULL, "T", NULL, NULL), /* short form */ |
216 | STRG (Rs_iconName, "iconName", "n", "string", "icon name for window"), |
215 | STRG (Rs_iconName, "iconName", "n", "string", "icon name for window"), |
217 | STRG (Rs_saveLines, "saveLines", "sl", "number", "number of scrolled lines to save"), |
216 | STRG (Rs_saveLines, "saveLines", "sl", "number", "number of scrolled lines to save"), |
218 | #if ENABLE_XEMBED |
217 | #if ENABLE_XEMBED |
219 | STRG (Rs_embed, NULL, "embed", "windowid", "window id to embed terminal in"), |
218 | STRG (Rs_embed, NULL, "embed", "windowid", "window id to embed terminal in"), |
220 | #endif |
219 | #endif |
221 | #if XFT |
220 | #if XFT |
|
|
221 | BOOL (Rs_buffered, "buffered", NULL, Opt_buffered, 0, NULL), |
|
|
222 | #endif |
|
|
223 | #if ENABLE_FRILLS |
222 | STRG (Rs_depth, "depth", "depth", "number", "depth of visual to request"), |
224 | STRG (Rs_depth, "depth", "depth", "number", "depth of visual to request"), |
223 | #endif |
225 | STRG (Rs_visual, "visual", "visual", "number", "visual id to request"), |
224 | #if ENABLE_FRILLS |
|
|
225 | RSTRG (Rs_transient_for, "transient-for", "windowid"), |
226 | RSTRG (Rs_transient_for, "transient-for", "windowid"), |
226 | BOOL (Rs_override_redirect, "override-redirect", "override-redirect", Opt_override_redirect, 0, "set override-redirect on the terminal window"), |
227 | BOOL (Rs_override_redirect, "override-redirect", "override-redirect", Opt_override_redirect, 0, "set override-redirect on the terminal window"), |
227 | STRG (Rs_pty_fd, NULL, "pty-fd", "fileno", "file descriptor of pty to use"), |
228 | STRG (Rs_pty_fd, NULL, "pty-fd", "fileno", "file descriptor of pty to use"), |
228 | BOOL (Rs_hold, "hold", "hold", Opt_hold, 0, "retain window after shell exit"), |
229 | BOOL (Rs_hold, "hold", "hold", Opt_hold, 0, "retain window after shell exit"), |
229 | STRG (Rs_ext_bwidth, "externalBorder", "w", "number", "external border in pixels"), |
230 | STRG (Rs_ext_bwidth, "externalBorder", "w", "number", "external border in pixels"), |
230 | STRG (Rs_ext_bwidth, NULL, "bw", NULL, NULL), |
231 | STRG (Rs_ext_bwidth, NULL, "bw", NULL, NULL), |
231 | STRG (Rs_ext_bwidth, NULL, "borderwidth", NULL, NULL), |
232 | STRG (Rs_ext_bwidth, NULL, "borderwidth", NULL, NULL), |
232 | STRG (Rs_int_bwidth, "internalBorder", "b", "number", "internal border in pixels"), |
233 | STRG (Rs_int_bwidth, "internalBorder", "b", "number", "internal border in pixels"), |
233 | BOOL (Rs_borderLess, "borderLess", "bl", Opt_borderLess, 0, "borderless window"), |
234 | BOOL (Rs_borderLess, "borderLess", "bl", Opt_borderLess, 0, "borderless window"), |
|
|
235 | STRG (Rs_lineSpace, "lineSpace", "lsp", "number", "number of extra pixels between rows"), |
|
|
236 | STRG (Rs_letterSpace, "letterSpace", "letsp", "number", "letter spacing adjustment"), |
|
|
237 | #endif |
|
|
238 | #ifdef BUILTIN_GLYPHS |
234 | BOOL (Rs_skipBuiltinGlyphs, "skipBuiltinGlyphs", "sbg", Opt_skipBuiltinGlyphs, 0, "do not use internal glyphs"), |
239 | BOOL (Rs_skipBuiltinGlyphs, "skipBuiltinGlyphs", "sbg", Opt_skipBuiltinGlyphs, 0, "do not use internal glyphs"), |
235 | STRG (Rs_lineSpace, "lineSpace", "lsp", "number", "number of extra pixels between rows"), |
|
|
236 | #endif |
240 | #endif |
237 | #ifdef POINTER_BLANK |
241 | #ifdef POINTER_BLANK |
238 | RSTRG (Rs_pointerBlankDelay, "pointerBlankDelay", "number"), |
242 | RSTRG (Rs_pointerBlankDelay, "pointerBlankDelay", "number"), |
239 | #endif |
243 | #endif |
240 | #ifndef NO_BACKSPACE_KEY |
244 | #ifndef NO_BACKSPACE_KEY |
241 | RSTRG (Rs_backspace_key, "backspacekey", "string"), |
245 | RSTRG (Rs_backspace_key, "backspacekey", "string"), |
242 | #endif |
246 | #endif |
243 | #ifndef NO_DELETE_KEY |
247 | #ifndef NO_DELETE_KEY |
244 | RSTRG (Rs_delete_key, "deletekey", "string"), |
248 | RSTRG (Rs_delete_key, "deletekey", "string"), |
245 | #endif |
249 | #endif |
246 | RSTRG (Rs_selectstyle, "selectstyle", "mode"), |
|
|
247 | #ifdef PRINTPIPE |
250 | #ifdef PRINTPIPE |
248 | RSTRG (Rs_print_pipe, "print-pipe", "string"), |
251 | RSTRG (Rs_print_pipe, "print-pipe", "string"), |
249 | #endif |
252 | #endif |
250 | STRG (Rs_modifier, "modifier", "mod", "modifier", "meta modifier = alt|meta|hyper|super|mod1|...|mod5"), |
253 | STRG (Rs_modifier, "modifier", "mod", "modifier", "meta modifier = alt|meta|hyper|super|mod1|...|mod5"), |
251 | #ifdef CUTCHAR_RESOURCE |
|
|
252 | RSTRG (Rs_cutchars, "cutchars", "string"), |
254 | RSTRG (Rs_cutchars, "cutchars", "string"), |
253 | #endif /* CUTCHAR_RESOURCE */ |
|
|
254 | RSTRG (Rs_answerbackstring, "answerbackString", "string"), |
255 | RSTRG (Rs_answerbackstring, "answerbackString", "string"), |
255 | #ifndef NO_SECONDARY_SCREEN |
256 | #ifndef NO_SECONDARY_SCREEN |
256 | BOOL (Rs_secondaryScreen, "secondaryScreen", "ssc", Opt_secondaryScreen, 0, "enable secondary screen"), |
257 | BOOL (Rs_secondaryScreen, "secondaryScreen", "ssc", Opt_secondaryScreen, 0, "enable secondary screen"), |
257 | BOOL (Rs_secondaryScroll, "secondaryScroll", "ssr", Opt_secondaryScroll, 0, "enable secondary screen scroll"), |
258 | BOOL (Rs_secondaryScroll, "secondaryScroll", "ssr", Opt_secondaryScroll, 0, "enable secondary screen scroll"), |
258 | #endif |
259 | #endif |
… | |
… | |
261 | RSTRG (Rs_perl_eval, "perl-eval", "perl-eval"), // "string", "code to be evaluated after all extensions have been loaded"),TODO |
262 | RSTRG (Rs_perl_eval, "perl-eval", "perl-eval"), // "string", "code to be evaluated after all extensions have been loaded"),TODO |
262 | RSTRG (Rs_perl_ext_1, "perl-ext-common", "string"), //, "colon-separated list of perl extensions to enable"),TODO |
263 | RSTRG (Rs_perl_ext_1, "perl-ext-common", "string"), //, "colon-separated list of perl extensions to enable"),TODO |
263 | STRG (Rs_perl_ext_2, "perl-ext", "pe", "string", "colon-separated list of perl extensions to enable for this instance"), |
264 | STRG (Rs_perl_ext_2, "perl-ext", "pe", "string", "colon-separated list of perl extensions to enable for this instance"), |
264 | #endif |
265 | #endif |
265 | #if ISO_14755 |
266 | #if ISO_14755 |
|
|
267 | BOOL (Rs_iso14755, "iso14755", NULL, Opt_iso14755, 0, NULL), |
266 | BOOL (Rs_iso14755_52, "iso14755_52", NULL, Opt_iso14755_52, 0, NULL), |
268 | BOOL (Rs_iso14755_52, "iso14755_52", NULL, Opt_iso14755_52, 0, NULL), |
267 | #endif |
269 | #endif |
268 | #ifdef HAVE_AFTERIMAGE |
|
|
269 | STRG (Rs_blendtype, "blendType", "blt", "string", "background image blending type - alpha, tint, etc..."), |
|
|
270 | STRG (Rs_blurradius, "blurRadius", "blr", "HxV", "Gaussian Blur radii to apply to the root background"), |
|
|
271 | #endif |
|
|
272 | #ifndef NO_RESOURCES |
270 | #ifndef NO_RESOURCES |
273 | INFO ("xrm", "string", "X resource"), |
271 | RINFO ("xrm", "string"), |
|
|
272 | #endif |
|
|
273 | #ifdef KEYSYM_RESOURCE |
|
|
274 | RINFO ("keysym.sym", "keysym"), |
274 | #endif |
275 | #endif |
275 | INFO ("e", "command arg ...", "command to execute") |
276 | INFO ("e", "command arg ...", "command to execute") |
276 | }; |
277 | }; |
277 | |
278 | |
278 | #undef INFO |
279 | #undef INFO |
|
|
280 | #undef RINFO |
279 | #undef STRG |
281 | #undef STRG |
280 | #undef RSTRG |
282 | #undef RSTRG |
281 | #undef SWCH |
283 | #undef SWCH |
282 | #undef BOOL |
284 | #undef BOOL |
283 | |
285 | |
… | |
… | |
322 | #endif |
324 | #endif |
323 | "," |
325 | "," |
324 | #if OFF_FOCUS_FADING |
326 | #if OFF_FOCUS_FADING |
325 | "fade," |
327 | "fade," |
326 | #endif |
328 | #endif |
327 | #if defined(XPM_BACKGROUND) |
|
|
328 | "XPM," |
|
|
329 | #endif |
|
|
330 | #if defined(ENABLE_TRANSPARENCY) |
329 | #if defined(ENABLE_TRANSPARENCY) |
331 | "transparent," |
330 | "transparent," |
332 | #endif |
|
|
333 | #if HAVE_AFTERIMAGE |
|
|
334 | "afterimage," |
|
|
335 | #endif |
|
|
336 | #if TINTING |
|
|
337 | "tint," |
331 | "tint," |
|
|
332 | #endif |
|
|
333 | #if HAVE_PIXBUF |
|
|
334 | "pixbuf," |
338 | #endif |
335 | #endif |
339 | #if defined(USE_XIM) |
336 | #if defined(USE_XIM) |
340 | "XIM," |
337 | "XIM," |
341 | #endif |
338 | #endif |
342 | #if defined(NO_BACKSPACE_KEY) |
339 | #if defined(NO_BACKSPACE_KEY) |
… | |
… | |
370 | "pointerBlank," |
367 | "pointerBlank," |
371 | #endif |
368 | #endif |
372 | #if defined(NO_RESOURCES) |
369 | #if defined(NO_RESOURCES) |
373 | "NoResources," |
370 | "NoResources," |
374 | #endif |
371 | #endif |
375 | "scrollbars=" |
372 | "scrollbars=plain" |
376 | #if !defined(HAVE_SCROLLBARS) |
|
|
377 | "NONE" |
|
|
378 | #else |
|
|
379 | # if defined(PLAIN_SCROLLBAR) |
|
|
380 | "plain" |
|
|
381 | # if defined(RXVT_SCROLLBAR) || defined(NEXT_SCROLLBAR) || defined(XTERM_SCROLLBAR) |
|
|
382 | "+" |
|
|
383 | # endif |
|
|
384 | # endif |
|
|
385 | # if defined(RXVT_SCROLLBAR) |
373 | #if defined(RXVT_SCROLLBAR) |
386 | "rxvt" |
374 | "+rxvt" |
387 | # if defined(NEXT_SCROLLBAR) || defined(XTERM_SCROLLBAR) |
|
|
388 | "+" |
|
|
389 | # endif |
|
|
390 | # endif |
375 | #endif |
391 | # if defined(NEXT_SCROLLBAR) |
376 | #if defined(NEXT_SCROLLBAR) |
392 | "NeXT" |
377 | "+NeXT" |
393 | # if defined(XTERM_SCROLLBAR) |
|
|
394 | "+" |
|
|
395 | # endif |
|
|
396 | # endif |
378 | #endif |
397 | # if defined(XTERM_SCROLLBAR) |
379 | #if defined(XTERM_SCROLLBAR) |
398 | "xterm" |
380 | "+xterm" |
399 | # endif |
|
|
400 | #endif |
381 | #endif |
401 | "\nUsage: "; /* Usage */ |
382 | "\nUsage: "; /* Usage */ |
402 | |
383 | |
403 | #define INDENT 18 |
384 | #define INDENT 28 |
404 | |
385 | |
405 | const char rxvt_term::resval_undef [] = "<undef>"; |
386 | const char rxvt_term::resval_undef [] = "<undef>"; |
406 | const char rxvt_term::resval_on [] = "on"; |
387 | const char rxvt_term::resval_on [] = "on"; |
407 | const char rxvt_term::resval_off [] = "off"; |
388 | const char rxvt_term::resval_off [] = "off"; |
408 | |
389 | |
409 | /*{{{ usage: */ |
390 | /*{{{ usage: */ |
410 | /*----------------------------------------------------------------------*/ |
391 | /*----------------------------------------------------------------------*/ |
411 | static void |
392 | void |
412 | rxvt_usage (int type) |
393 | rxvt_term::rxvt_usage (int type) |
413 | { |
394 | { |
414 | unsigned int i, col; |
395 | unsigned int i, col; |
415 | |
396 | |
416 | rxvt_log ("%s%s%s", releasestring, optionsstring, RESNAME); |
397 | rxvt_log ("%s%s%s", releasestring, optionsstring, RESNAME); |
417 | |
398 | |
418 | switch (type) |
399 | switch (type) |
419 | { |
400 | { |
420 | case 0: /* brief listing */ |
401 | case 0: /* brief listing */ |
421 | rxvt_log (" [-help] [--help]\n"); |
402 | rxvt_log (" [-help] [--help]\n"); |
422 | |
403 | |
423 | for (col = 1, i = 0; i < optList_size; i++) |
404 | for (col = 1, i = 0; i < ecb_array_length (optList); i++) |
424 | if (optList[i].desc != NULL) |
405 | if (optList[i].desc != NULL) |
425 | { |
406 | { |
426 | int len = 0; |
407 | int len = 0; |
427 | |
408 | |
428 | if (!optList_isBool (i)) |
409 | if (optList[i].arg) |
|
|
410 | len = strlen (optList[i].arg) + 1; |
|
|
411 | |
|
|
412 | assert (optList[i].opt != NULL); |
|
|
413 | len += 4 + strlen (optList[i].opt) + (optList_isBool (i) ? 2 : 0); |
|
|
414 | col += len; |
|
|
415 | |
|
|
416 | if (col > 79) |
429 | { |
417 | { |
430 | len = optList_strlen (i); |
|
|
431 | if (len > 0) |
|
|
432 | len++; /* account for space */ |
|
|
433 | } |
|
|
434 | #ifdef DEBUG_STRICT |
|
|
435 | assert (optList[i].opt != NULL); |
|
|
436 | #endif |
|
|
437 | len += 4 + strlen (optList[i].opt) + (optList_isBool (i) ? 2: 0); |
|
|
438 | col += len; |
|
|
439 | if (col > 79) |
|
|
440 | { /* assume regular width */ |
418 | /* assume regular width */ |
441 | rxvt_log ("\n"); |
419 | rxvt_log ("\n"); |
442 | col = 1 + len; |
420 | col = 1 + len; |
443 | } |
421 | } |
444 | |
422 | |
445 | rxvt_log (" [-%s%s", (optList_isBool (i) ? "/+" : ""), optList[i].opt); |
423 | rxvt_log (" [-%s%s", (optList_isBool (i) ? "/+" : ""), optList[i].opt); |
|
|
424 | |
446 | if (optList_strlen (i)) |
425 | if (optList[i].arg) |
447 | rxvt_log (" %s]", optList[i].arg); |
426 | rxvt_log (" %s]", optList[i].arg); |
448 | else |
427 | else |
449 | rxvt_log ("]"); |
428 | rxvt_log ("]"); |
450 | } |
429 | } |
451 | break; |
430 | break; |
452 | |
431 | |
453 | case 1: /* full command-line listing */ |
432 | case 1: /* full command-line listing */ |
454 | rxvt_log (" [options] [-e command args]\n\nwhere options include:\n"); |
433 | rxvt_log (" [options] [-e command args]\n\nwhere options include:\n"); |
455 | |
434 | |
456 | for (i = 0; i < optList_size; i++) |
435 | for (i = 0; i < ecb_array_length (optList); i++) |
457 | if (optList[i].desc != NULL) |
436 | if (optList[i].desc != NULL) |
458 | { |
437 | { |
459 | #ifdef DEBUG_STRICT |
|
|
460 | assert (optList[i].opt != NULL); |
438 | assert (optList[i].opt != NULL); |
461 | #endif |
|
|
462 | rxvt_log (" %s%s %-*s%s%s\n", |
439 | rxvt_log (" %s%s %-*s%s%s\n", |
463 | (optList_isBool (i) ? "-/+" : "-"), optList[i].opt, |
440 | (optList_isBool (i) ? "-/+" : "-"), optList[i].opt, |
464 | (INDENT - strlen (optList[i].opt) |
441 | (INDENT - strlen (optList[i].opt) |
465 | + (optList_isBool (i) ? 0 : 2)), |
442 | + (optList_isBool (i) ? 0 : 2)), |
466 | (optList[i].arg ? optList[i].arg : ""), |
443 | (optList[i].arg ? optList[i].arg : ""), |
467 | (optList_isBool (i) ? "turn on/off " : ""), |
444 | (optList_isBool (i) ? "turn on/off " : ""), |
468 | optList[i].desc); |
445 | optList[i].desc); |
469 | } |
446 | } |
|
|
447 | |
|
|
448 | #if ENABLE_PERL |
|
|
449 | rxvt_perl.init (this); |
|
|
450 | rxvt_perl.usage (this, 1); |
|
|
451 | #endif |
|
|
452 | |
470 | rxvt_log ("\n --help to list long-options"); |
453 | rxvt_log ("\n --help to list long-options"); |
471 | break; |
454 | break; |
472 | |
455 | |
473 | case 2: /* full resource listing */ |
456 | case 2: /* full resource listing */ |
474 | rxvt_log (" [options] [-e command args]\n\n" |
457 | rxvt_log (" [options] [-e command args]\n\n" |
475 | "where resources (long-options) include:\n"); |
458 | "where resources (long-options) include:\n"); |
476 | |
459 | |
477 | for (i = 0; i < optList_size; i++) |
460 | for (i = 0; i < ecb_array_length (optList); i++) |
478 | if (optList[i].kw != NULL) |
461 | if (optList[i].kw != NULL) |
479 | rxvt_log (" %s: %*s%s\n", |
462 | rxvt_log (" %s: %*s%s\n", |
480 | optList[i].kw, |
463 | optList[i].kw, |
481 | (INDENT - strlen (optList[i].kw)), "", /* XXX */ |
464 | (INDENT + 2 - strlen (optList[i].kw)), "", /* XXX */ |
482 | (optList_isBool (i) ? "boolean" : optList[i].arg)); |
465 | (optList_isBool (i) ? "boolean" : optList[i].arg)); |
483 | #ifdef KEYSYM_RESOURCE |
466 | |
484 | rxvt_log (" " "keysym.sym" ": %*s%s\n", |
467 | #if ENABLE_PERL |
485 | (INDENT - sizeof ("keysym.sym") + 1), "", /* XXX */ |
468 | rxvt_perl.init (this); |
486 | "keysym"); |
469 | rxvt_perl.usage (this, 2); |
487 | #endif |
470 | #endif |
|
|
471 | |
488 | rxvt_log ("\n -help to list options"); |
472 | rxvt_log ("\n -help to list options"); |
489 | break; |
473 | break; |
490 | } |
474 | } |
491 | |
475 | |
492 | rxvt_log ("\n\n"); |
476 | rxvt_log ("\n\n"); |
493 | rxvt_exit_failure (); |
477 | rxvt_exit_failure (); |
494 | /* NOTREACHED */ |
|
|
495 | } |
478 | } |
496 | |
479 | |
497 | /*}}} */ |
480 | /*}}} */ |
498 | |
481 | |
499 | /*{{{ get command-line options before getting resources */ |
482 | /*{{{ get command-line options before getting resources */ |
500 | void |
483 | const char ** |
501 | rxvt_term::get_options (int argc, const char *const *argv) |
484 | rxvt_term::get_options (int argc, const char *const *argv) |
502 | { |
485 | { |
503 | int i, bad_option = 0; |
486 | int i, bad_option = 0; |
504 | |
487 | |
505 | for (i = 1; i < argc; i++) |
488 | for (i = 1; i < argc; i++) |
506 | { |
489 | { |
507 | unsigned int entry, longopt = 0; |
490 | unsigned int entry, longopt = 0; |
508 | const char *flag, *opt; |
491 | const char *opt; |
|
|
492 | int flag; |
509 | |
493 | |
510 | opt = argv[i]; |
494 | opt = argv[i]; |
511 | |
495 | |
512 | if (*opt == '-') |
496 | if (*opt == '-') |
513 | { |
497 | { |
514 | flag = resval_on; |
498 | flag = 1; |
515 | |
499 | |
516 | if (*++opt == '-') |
500 | if (*++opt == '-') |
517 | longopt = *opt++; /* long option */ |
501 | longopt = *opt++; /* long option */ |
518 | } |
502 | } |
519 | else if (*opt == '+') |
503 | else if (*opt == '+') |
520 | { |
504 | { |
521 | flag = resval_off; |
505 | flag = 0; |
522 | |
506 | |
523 | if (*++opt == '+') |
507 | if (*++opt == '+') |
524 | longopt = *opt++; /* long option */ |
508 | longopt = *opt++; /* long option */ |
525 | } |
509 | } |
526 | else |
510 | else |
… | |
… | |
535 | |
519 | |
536 | if (!strcmp (opt, "h")) |
520 | if (!strcmp (opt, "h")) |
537 | rxvt_usage (0); |
521 | rxvt_usage (0); |
538 | |
522 | |
539 | /* feature: always try to match long-options */ |
523 | /* feature: always try to match long-options */ |
540 | for (entry = 0; entry < optList_size; entry++) |
524 | for (entry = 0; entry < ecb_array_length (optList); entry++) |
541 | if ((optList[entry].kw && !strcmp (opt, optList[entry].kw)) |
525 | if ((optList[entry].kw && !strcmp (opt, optList[entry].kw)) |
542 | || (!longopt |
526 | || (!longopt |
543 | && optList[entry].opt && !strcmp (opt, optList[entry].opt))) |
527 | && optList[entry].opt && !strcmp (opt, optList[entry].opt))) |
544 | break; |
528 | break; |
545 | |
529 | |
546 | if (entry < optList_size) |
530 | if (entry < ecb_array_length (optList) |
|
|
531 | && !optList_isInfo (entry)) |
547 | { |
532 | { |
548 | if (optList_isReverse (entry)) |
533 | if (optList_isReverse (entry)) |
549 | flag = flag == resval_on ? resval_off : resval_on; |
534 | flag = !flag; |
550 | |
535 | |
551 | if (optList_strlen (entry)) |
536 | if (optList_isString (entry)) |
552 | { |
537 | { |
553 | /* |
538 | /* |
554 | * special cases are handled in main.c:main () to allow |
539 | * special cases are handled in init_resources () to allow |
555 | * X resources to set these values before we settle for |
540 | * X resources to set these values before we settle for |
556 | * default values |
541 | * default values |
557 | */ |
542 | */ |
558 | |
543 | |
559 | if (optList[entry].doff != -1) |
544 | if (optList[entry].doff != -1) |
560 | { |
545 | { |
561 | if (flag == resval_on && !argv [i+1]) |
546 | if (flag && i + 1 == argc) |
562 | rxvt_fatal ("option '%s' needs an argument, aborting.\n", argv [i]); |
547 | rxvt_fatal ("option '%s' requires an argument, aborting.\n", argv [i]); |
563 | |
548 | |
564 | rs[optList[entry].doff] = flag == resval_on ? argv[++i] : resval_undef; |
549 | rs[optList[entry].doff] = flag ? argv[++i] : resval_undef; |
565 | } |
550 | } |
566 | } |
551 | } |
567 | else |
552 | else |
|
|
553 | { |
568 | { /* boolean value */ |
554 | /* boolean value */ |
569 | set_option (optList[entry].index, flag == resval_on); |
555 | set_option (optList[entry].index, flag); |
570 | |
556 | |
571 | if (optList[entry].doff != -1) |
557 | if (optList[entry].doff != -1) |
572 | rs[optList[entry].doff] = flag; |
558 | rs[optList[entry].doff] = flag ? resval_on : resval_off; |
573 | } |
559 | } |
574 | } |
560 | } |
|
|
561 | #ifndef NO_RESOURCES |
|
|
562 | else if (!strcmp (opt, "xrm")) |
|
|
563 | { |
|
|
564 | if (i + 1 < argc) |
|
|
565 | XrmPutLineResource (&option_db, argv[++i]); |
|
|
566 | } |
|
|
567 | #endif |
|
|
568 | #ifdef KEYSYM_RESOURCE |
|
|
569 | else if (!strncmp (opt, "keysym.", sizeof ("keysym.") - 1)) |
|
|
570 | { |
|
|
571 | if (i + 1 < argc) |
|
|
572 | { |
|
|
573 | char *res = rxvt_temp_buf<char> (strlen (opt) + strlen (argv[++i]) + 6); |
|
|
574 | sprintf (res, "*.%s: %s\n", opt, argv[i]); |
|
|
575 | XrmPutLineResource (&option_db, res); |
|
|
576 | } |
|
|
577 | } |
|
|
578 | #endif |
|
|
579 | else if (!strcmp (opt, "e")) |
|
|
580 | { |
|
|
581 | if (i + 1 < argc) |
|
|
582 | return (const char **)argv + i + 1; |
|
|
583 | |
|
|
584 | rxvt_warn ("option '-e' requires an argument, aborting.\n"); |
|
|
585 | bad_option = 1; |
|
|
586 | } |
575 | else |
587 | else |
576 | #ifdef KEYSYM_RESOURCE |
588 | { |
577 | /* if (!strncmp (opt, "keysym.", sizeof ("keysym.") - 1)) */ |
589 | #if ENABLE_PERL |
578 | if (rxvt_Str_match (opt, "keysym.")) |
590 | rxvt_perl.init (this); |
|
|
591 | |
|
|
592 | if (int flags = rxvt_perl.parse_resource (this, opt, true, longopt, flag, argv [i + 1])) |
579 | { |
593 | { |
580 | const char *str = argv[++i]; |
594 | if (flags & rxvt_perl.RESOURCE_ARG) |
581 | |
595 | { |
582 | if (str != NULL) |
596 | if (i + 1 == argc) |
583 | parse_keysym (opt + sizeof ("keysym.") - 1, str); |
597 | { |
|
|
598 | rxvt_warn ("option '%s' requires an argument.\n", argv [i]); |
|
|
599 | bad_option = 1; |
|
|
600 | } |
|
|
601 | else |
|
|
602 | ++i; |
|
|
603 | } |
584 | } |
604 | } |
585 | else |
605 | else |
586 | #endif |
606 | #endif |
587 | { |
607 | { |
588 | bad_option = 1; |
|
|
589 | rxvt_warn ("\"%s\": unknown or malformed option.\n", opt); |
608 | rxvt_warn ("\"%s\": unknown or malformed option.\n", opt); |
|
|
609 | bad_option = 1; |
590 | } |
610 | } |
|
|
611 | } |
591 | } |
612 | } |
592 | |
613 | |
593 | if (bad_option) |
614 | if (bad_option) |
594 | rxvt_usage (0); |
615 | rxvt_usage (0); |
|
|
616 | |
|
|
617 | return 0; |
595 | } |
618 | } |
596 | |
619 | |
597 | /*}}} */ |
620 | /*}}} */ |
598 | |
621 | |
599 | #ifndef NO_RESOURCES |
|
|
600 | /*----------------------------------------------------------------------*/ |
622 | /*----------------------------------------------------------------------*/ |
601 | |
623 | |
602 | # ifdef KEYSYM_RESOURCE |
624 | #ifdef KEYSYM_RESOURCE |
603 | /* |
625 | static void |
604 | * Define key from XrmEnumerateDatabase. |
626 | rxvt_define_key (rxvt_term *term, const char *k, const char *v) |
605 | * quarks will be something like |
|
|
606 | * "rxvt" "keysym" "0xFF01" |
|
|
607 | * value will be a string |
|
|
608 | */ |
|
|
609 | /* ARGSUSED */ |
|
|
610 | int |
|
|
611 | rxvt_define_key (XrmDatabase *database UNUSED, |
|
|
612 | XrmBindingList bindings UNUSED, |
|
|
613 | XrmQuarkList quarks, |
|
|
614 | XrmRepresentation *type UNUSED, |
|
|
615 | XrmValue *value, |
|
|
616 | XPointer closure UNUSED) |
|
|
617 | { |
627 | { |
618 | int last; |
628 | term->bind_action (k, v); |
619 | |
|
|
620 | for (last = 0; quarks[last] != NULLQUARK; last++) /* look for last quark in list */ |
|
|
621 | ; |
|
|
622 | |
|
|
623 | last--; |
|
|
624 | GET_R->parse_keysym (XrmQuarkToString (quarks[last]), (char *)value->addr);//D//TODO |
|
|
625 | return False; |
|
|
626 | } |
629 | } |
627 | |
630 | |
628 | /* |
631 | /* |
629 | * look for something like this (XK_Delete) |
632 | * look for something like this (XK_Delete) |
630 | * rxvt*keysym.0xFFFF: "\177" |
633 | * rxvt*keysym.0xFFFF: "\177" |
631 | * |
|
|
632 | * arg will be |
|
|
633 | * NULL for ~/.Xdefaults and |
|
|
634 | * non-NULL for command-line options (need to allocate) |
|
|
635 | */ |
634 | */ |
636 | #define NEWARGLIM 500 /* `reasonable' size */ |
|
|
637 | |
635 | |
638 | struct keysym_vocabulary_t |
636 | struct keysym_vocabulary_t |
639 | { |
637 | { |
640 | const char *name; |
638 | const char *name; |
641 | unsigned short len; |
639 | unsigned short len; |
642 | unsigned short value; |
640 | unsigned short value; |
643 | }; |
641 | }; |
644 | keysym_vocabulary_t keysym_vocabulary[] = |
642 | static const keysym_vocabulary_t keysym_vocabulary[] = |
645 | { |
643 | { |
646 | { "ISOLevel3", 9, Level3Mask }, |
644 | { "ISOLevel3", 9, Level3Mask }, |
647 | { "AppKeypad", 9, AppKeypadMask }, |
645 | { "AppKeypad", 9, AppKeypadMask }, |
648 | { "Control", 7, ControlMask }, |
646 | { "Control", 7, ControlMask }, |
649 | { "NumLock", 7, NumLockMask }, |
647 | { "NumLock", 7, NumLockMask }, |
… | |
… | |
669 | { "4", 1, Mod4Mask }, |
667 | { "4", 1, Mod4Mask }, |
670 | { "5", 1, Mod5Mask }, |
668 | { "5", 1, Mod5Mask }, |
671 | }; |
669 | }; |
672 | |
670 | |
673 | int |
671 | int |
674 | rxvt_term::parse_keysym (const char *str, const char *arg) |
672 | rxvt_term::parse_keysym (const char *str, unsigned int &state) |
675 | { |
673 | { |
676 | int n, sym; |
674 | int sym; |
677 | unsigned int state = 0; |
675 | const char *key = strrchr (str, '-'); |
678 | const char *pmodend = NULL; |
|
|
679 | char *newarg = NULL; |
|
|
680 | char newargstr[NEWARGLIM]; |
|
|
681 | |
676 | |
682 | if (arg == NULL) |
677 | state = 0; |
683 | { |
|
|
684 | if ((n = rxvt_Str_match (str, "keysym.")) == 0) |
|
|
685 | return 0; |
|
|
686 | |
678 | |
687 | str += n; /* skip `keysym.' */ |
679 | if (!key) |
688 | if (!(pmodend = strchr (str, ':'))) |
680 | key = str; |
689 | return -1; |
|
|
690 | } |
|
|
691 | else |
681 | else |
692 | pmodend = str + strlen(str); |
682 | key++; |
693 | |
683 | |
694 | for (--pmodend; str < pmodend; --pmodend) |
684 | // string or key is empty |
695 | if (*pmodend == '-') |
685 | if (*key == '\0') |
696 | break; |
686 | return -1; |
697 | |
687 | |
|
|
688 | // parse modifiers |
698 | while (str < pmodend) |
689 | while (str < key) |
699 | { |
690 | { |
700 | unsigned int i; |
691 | unsigned int i; |
701 | |
692 | |
702 | for (i=0; i < sizeof (keysym_vocabulary) / sizeof (keysym_vocabulary_t); ++i) |
693 | for (i = 0; i < ecb_array_length (keysym_vocabulary); ++i) |
703 | { |
694 | { |
704 | if (strncmp (str, keysym_vocabulary [i].name, keysym_vocabulary [i].len) == 0) |
695 | if (strncmp (str, keysym_vocabulary [i].name, keysym_vocabulary [i].len) == 0) |
705 | { |
696 | { |
706 | state |= keysym_vocabulary[i].value; |
697 | state |= keysym_vocabulary[i].value; |
707 | str += keysym_vocabulary[i].len; |
698 | str += keysym_vocabulary[i].len; |
708 | break; |
699 | break; |
709 | } |
700 | } |
710 | } |
701 | } |
711 | |
702 | |
712 | if (i >= sizeof (keysym_vocabulary) / sizeof (keysym_vocabulary_t)) |
703 | if (i >= ecb_array_length (keysym_vocabulary)) |
713 | return -1; |
704 | return -1; |
714 | |
705 | |
715 | if (*str == '-') |
706 | if (*str == '-') |
716 | ++str; |
707 | ++str; |
717 | } |
708 | } |
718 | |
709 | |
719 | /* some scanf () have trouble with a 0x prefix */ |
710 | // convert keysym name to keysym number |
720 | if (str[0] == '0' && toupper (str[1]) == 'X') |
711 | if ((sym = XStringToKeysym (str)) == None) |
721 | { |
712 | { |
722 | str += 2; |
713 | // fallback on hexadecimal parsing |
723 | |
714 | char *end; |
|
|
715 | sym = strtol (str, &end, 16); |
724 | if (arg) |
716 | if (*end) |
725 | { |
|
|
726 | if (sscanf (str, (strchr (str, ':') ? "%x:" : "%x"), &sym) != 1) |
|
|
727 | return -1; |
|
|
728 | } |
|
|
729 | else |
|
|
730 | { |
|
|
731 | if (sscanf (str, "%x:", &sym) != 1) |
|
|
732 | return -1; |
|
|
733 | |
|
|
734 | /* cue to ':', it's there since sscanf () worked */ |
|
|
735 | strncpy (newargstr, strchr (str, ':') + 1, NEWARGLIM - 1); |
|
|
736 | newargstr[NEWARGLIM - 1] = '\0'; |
|
|
737 | newarg = newargstr; |
|
|
738 | } |
|
|
739 | } |
|
|
740 | else |
|
|
741 | { |
|
|
742 | /* |
|
|
743 | * convert keysym name to keysym number |
|
|
744 | */ |
|
|
745 | strncpy (newargstr, str, NEWARGLIM - 1); |
|
|
746 | newargstr[NEWARGLIM - 1] = '\0'; |
|
|
747 | |
|
|
748 | if (arg == NULL) |
|
|
749 | { |
|
|
750 | if ((newarg = strchr (newargstr, ':')) == NULL) |
|
|
751 | return -1; |
|
|
752 | |
|
|
753 | *newarg++ = '\0'; /* terminate keysym name */ |
|
|
754 | } |
|
|
755 | |
|
|
756 | if ((sym = XStringToKeysym (newargstr)) == None) |
|
|
757 | return -1; |
717 | return -1; |
758 | } |
718 | } |
759 | |
719 | |
760 | if (newarg == NULL) |
720 | return sym; |
761 | { |
721 | } |
762 | strncpy (newargstr, arg, NEWARGLIM - 1); |
|
|
763 | newargstr[NEWARGLIM - 1] = '\0'; |
|
|
764 | newarg = newargstr; |
|
|
765 | } |
|
|
766 | |
722 | |
767 | rxvt_Str_trim (newarg); |
723 | int |
768 | if (*newarg == '\0' || (n = rxvt_Str_escaped (newarg)) == 0) |
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) |
769 | return -1; |
730 | return -1; |
770 | |
731 | |
|
|
732 | wchar_t *ws = rxvt_mbstowcs (arg); |
|
|
733 | if (!HOOK_INVOKE ((this, HOOK_REGISTER_COMMAND, DT_INT, sym, DT_INT, state, DT_WCS_LEN, ws, wcslen (ws), DT_END))) |
771 | keyboard->register_user_translation (sym, state, newarg); |
734 | keyboard->register_action (sym, state, ws); |
|
|
735 | |
|
|
736 | free (ws); |
772 | return 1; |
737 | return 1; |
773 | } |
738 | } |
774 | |
739 | |
775 | # endif /* KEYSYM_RESOURCE */ |
740 | #endif /* KEYSYM_RESOURCE */ |
776 | #endif /* NO_RESOURCES */ |
|
|
777 | |
741 | |
778 | static char * |
742 | static char * |
779 | get_res (XrmDatabase database, const char *program, const char *option) |
743 | get_res (XrmDatabase database, const char *program, const char *option) |
780 | { |
744 | { |
781 | char resource[512]; |
745 | char resource[512]; |
… | |
… | |
813 | |
777 | |
814 | void |
778 | void |
815 | rxvt_term::extract_resources () |
779 | rxvt_term::extract_resources () |
816 | { |
780 | { |
817 | #ifndef NO_RESOURCES |
781 | #ifndef NO_RESOURCES |
|
|
782 | XrmDatabase database = XrmGetDatabase (dpy); |
|
|
783 | XrmMergeDatabases (option_db, &database); |
|
|
784 | option_db = NULL; |
818 | /* |
785 | /* |
819 | * Query resources for options that affect us |
786 | * Query resources for options that affect us |
820 | */ |
787 | */ |
821 | for (int entry = 0; entry < optList_size; entry++) |
788 | for (int entry = 0; entry < ecb_array_length (optList); entry++) |
822 | { |
789 | { |
823 | int s; |
790 | int s; |
824 | const char *kw = optList[entry].kw; |
791 | const char *kw = optList[entry].kw; |
825 | |
792 | |
826 | if (kw == NULL || rs[optList[entry].doff] != NULL) |
793 | if (kw == NULL || rs[optList[entry].doff] != NULL) |
… | |
… | |
846 | |
813 | |
847 | set_option (optList[entry].index, s); |
814 | set_option (optList[entry].index, s); |
848 | } |
815 | } |
849 | } |
816 | } |
850 | } |
817 | } |
|
|
818 | #endif /* NO_RESOURCES */ |
|
|
819 | } |
851 | |
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 tighly bound quark, we skip it, |
|
|
849 | // as it is the exactly matched the prefix. Otherwise, it matched because |
|
|
850 | // it started with "*", in which case we assuime 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 | if (*bindings != XrmBindTightly) |
|
|
866 | return False; |
|
|
867 | |
|
|
868 | ++quarks, ++bindings; // skip if this is a fixed prefix, rather than a *-match |
|
|
869 | if (*quarks == NULLQUARK) return False; |
|
|
870 | } |
|
|
871 | |
|
|
872 | char *pattern; |
|
|
873 | if (quarks[1] == NULLQUARK) |
|
|
874 | pattern = XrmQuarkToString (quarks[0]); // single component, fats path |
|
|
875 | else |
|
|
876 | { |
|
|
877 | // multiple components, slow path - should be rare, to don't optimize for speed |
|
|
878 | int size = 0; |
|
|
879 | |
|
|
880 | for (int i = 0; quarks[i] != NULLQUARK; ++i) |
|
|
881 | size += strlen (XrmQuarkToString (quarks[i])) + 1; |
|
|
882 | |
|
|
883 | pattern = rxvt_temp_buf<char> (size + 1); |
|
|
884 | |
|
|
885 | // now print all components |
|
|
886 | { |
|
|
887 | char *cur = pattern; |
|
|
888 | |
|
|
889 | for (int i = 0; quarks[i] != NULLQUARK; ++i) |
|
|
890 | cur += sprintf (cur, ".%s", XrmQuarkToString (quarks[i])); |
|
|
891 | } |
|
|
892 | |
|
|
893 | ++pattern; // skip initial dot |
|
|
894 | } |
|
|
895 | |
|
|
896 | data->cb (data->term, pattern, (char *)value->addr); |
|
|
897 | |
|
|
898 | return False; |
|
|
899 | } |
|
|
900 | |
|
|
901 | void |
|
|
902 | rxvt_term::enumerate_resources (void (*cb)(rxvt_term *, const char *, const char *), const char *name_p, const char *class_p) |
|
|
903 | { |
852 | /* |
904 | /* |
853 | * [R5 or later]: enumerate the resource database |
905 | * [R5 or later]: enumerate the resource database |
854 | */ |
906 | */ |
|
|
907 | assert (!name_p == !class_p); // both must be specified, or missing |
|
|
908 | |
855 | # ifdef KEYSYM_RESOURCE |
909 | #ifdef KEYSYM_RESOURCE |
|
|
910 | rxvt_enumerate_closure closure = { this, cb, name_p ? 1 : 0 }; |
|
|
911 | |
856 | XrmDatabase database = XrmGetDatabase (dpy); |
912 | XrmDatabase database = XrmGetDatabase (dpy); |
857 | XrmName name_prefix[3]; |
913 | XrmName name_prefix[3]; |
858 | XrmClass class_prefix[3]; |
914 | XrmClass class_prefix[3]; |
859 | |
915 | |
860 | name_prefix[0] = XrmStringToName (rs[Rs_name]); |
916 | name_prefix[1] = name_p ? XrmStringToName (name_p) : NULLQUARK; |
861 | name_prefix[1] = XrmStringToName ("keysym"); |
|
|
862 | name_prefix[2] = NULLQUARK; |
917 | name_prefix[2] = NULLQUARK; |
863 | class_prefix[0] = XrmStringToName (RESCLASS); |
918 | class_prefix[1] = class_p ? XrmStringToName (class_p) : NULLQUARK; |
864 | class_prefix[1] = XrmStringToName ("Keysym"); |
|
|
865 | class_prefix[2] = NULLQUARK; |
919 | class_prefix[2] = NULLQUARK; |
866 | /* XXX: Need to check sizeof (rxvt_t) == sizeof (XPointer) */ |
920 | |
|
|
921 | # ifdef RESFALLBACK |
|
|
922 | name_prefix[0] = class_prefix[0] = XrmStringToName (RESFALLBACK); |
867 | XrmEnumerateDatabase (database, name_prefix, class_prefix, |
923 | XrmEnumerateDatabase (database, name_prefix, class_prefix, |
868 | XrmEnumOneLevel, rxvt_define_key, NULL); |
924 | XrmEnumAllLevels, rxvt_enumerate_helper, (XPointer)&closure); |
869 | # ifdef RESFALLBACK |
925 | # endif |
870 | name_prefix[0] = XrmStringToName (RESFALLBACK); |
926 | |
871 | name_prefix[1] = XrmStringToName ("keysym"); |
|
|
872 | class_prefix[0] = XrmStringToName (RESFALLBACK); |
927 | name_prefix[0] = class_prefix[0] = XrmStringToName (RESCLASS); |
873 | class_prefix[1] = XrmStringToName ("Keysym"); |
|
|
874 | /* XXX: Need to check sizeof (rxvt_t) == sizeof (XPointer) */ |
|
|
875 | XrmEnumerateDatabase (database, name_prefix, class_prefix, |
928 | XrmEnumerateDatabase (database, name_prefix, class_prefix, |
876 | XrmEnumOneLevel, rxvt_define_key, NULL); |
929 | XrmEnumAllLevels, rxvt_enumerate_helper, (XPointer)&closure); |
877 | # endif |
930 | |
|
|
931 | name_prefix[0] = class_prefix[0] = XrmStringToName (rs[Rs_name]); |
|
|
932 | XrmEnumerateDatabase (database, name_prefix, class_prefix, |
|
|
933 | XrmEnumAllLevels, rxvt_enumerate_helper, (XPointer)&closure); |
878 | # endif |
934 | #endif |
|
|
935 | } |
879 | |
936 | |
880 | #endif /* NO_RESOURCES */ |
937 | void |
|
|
938 | rxvt_term::extract_keysym_resources () |
|
|
939 | { |
|
|
940 | #ifdef KEYSYM_RESOURCE |
|
|
941 | enumerate_keysym_resources (rxvt_define_key); |
|
|
942 | #endif |
881 | } |
943 | } |
882 | |
944 | |
883 | /*----------------------- end-of-file (C source) -----------------------*/ |
945 | /*----------------------- end-of-file (C source) -----------------------*/ |
|
|
946 | |