| 1 |
/*--------------------------------*-C-*---------------------------------* |
| 2 |
* File: xdefaults.C |
| 3 |
*----------------------------------------------------------------------* |
| 4 |
* |
| 5 |
* All portions of code are copyright by their respective author/s. |
| 6 |
* Copyright (c) 1994 Robert Nation <nation@rocket.sanders.lockheed.com> |
| 7 |
* - original version |
| 8 |
* Copyright (c) 1997,1998 mj olesen <olesen@me.queensu.ca> |
| 9 |
* Copyright (c) 2003-2006 Marc Lehmann <pcg@goof.com> |
| 10 |
* |
| 11 |
* 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 |
* the Free Software Foundation; either version 2 of the License, or |
| 14 |
* (at your option) any later version. |
| 15 |
* |
| 16 |
* This program is distributed in the hope that it will be useful, |
| 17 |
* but WITHOUT ANY WARRANTY; without even the implied warranty of |
| 18 |
* MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the |
| 19 |
* GNU General Public License for more details. |
| 20 |
* |
| 21 |
* You should have received a copy of the GNU General Public License |
| 22 |
* along with this program; if not, write to the Free Software |
| 23 |
* Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA. |
| 24 |
*----------------------------------------------------------------------*/ |
| 25 |
|
| 26 |
#include "../config.h" /* NECESSARY */ |
| 27 |
#include "rxvt.h" /* NECESSARY */ |
| 28 |
#include "version.h" |
| 29 |
|
| 30 |
#ifdef KEYSYM_RESOURCE |
| 31 |
#include "keyboard.h" |
| 32 |
#endif |
| 33 |
|
| 34 |
/* place holders used for parsing command-line options */ |
| 35 |
#define Optflag_Reverse 0x40000000UL |
| 36 |
#define Optflag_Boolean 0x80000000UL |
| 37 |
#define Optflag_mask 0x3fffffffUL |
| 38 |
|
| 39 |
/*{{{ monolithic option/resource structure: */ |
| 40 |
/* |
| 41 |
* `string' options MUST have a usage argument |
| 42 |
* `switch' and `boolean' options have no argument |
| 43 |
* if there's no desc (ription), it won't appear in rxvt_usage () |
| 44 |
*/ |
| 45 |
|
| 46 |
/* INFO () - descriptive information only */ |
| 47 |
#define INFO(opt, arg, desc) \ |
| 48 |
{0, -1, NULL, (opt), (arg), (desc)} |
| 49 |
|
| 50 |
/* STRG () - command-line option, with/without resource */ |
| 51 |
#define STRG(rsp, kw, opt, arg, desc) \ |
| 52 |
{0, (rsp), (kw), (opt), (arg), (desc)} |
| 53 |
|
| 54 |
/* RSTRG () - resource/long-option */ |
| 55 |
#define RSTRG(rsp, kw, arg) \ |
| 56 |
{0, (rsp), (kw), NULL, (arg), NULL} |
| 57 |
|
| 58 |
/* BOOL () - regular boolean `-/+' flag */ |
| 59 |
#define BOOL(rsp, kw, opt, flag, desc) \ |
| 60 |
{ (Optflag_Boolean | (flag)), (rsp), (kw), (opt), NULL, (desc)} |
| 61 |
|
| 62 |
/* SWCH () - `-' flag */ |
| 63 |
#define SWCH(opt, flag, desc) \ |
| 64 |
{ (flag), -1, NULL, (opt), NULL, (desc)} |
| 65 |
|
| 66 |
/* convenient macros */ |
| 67 |
#define optList_strlen(i) \ |
| 68 |
(optList[i].flag ? 0 : (optList[i].arg ? strlen (optList[i].arg) : 1)) |
| 69 |
#define optList_isBool(i) \ |
| 70 |
(optList[i].flag & Optflag_Boolean) |
| 71 |
#define optList_isReverse(i) \ |
| 72 |
(optList[i].flag & Optflag_Reverse) |
| 73 |
#define optList_size \ |
| 74 |
(sizeof (optList) / sizeof (optList[0])) |
| 75 |
|
| 76 |
static const struct |
| 77 |
{ |
| 78 |
const unsigned long flag; /* Option flag */ |
| 79 |
const int doff; /* data offset */ |
| 80 |
const char *kw; /* keyword */ |
| 81 |
const char *opt; /* option */ |
| 82 |
const char *arg; /* argument */ |
| 83 |
const char *desc; /* description */ |
| 84 |
} |
| 85 |
optList[] = { |
| 86 |
STRG (Rs_display_name, NULL, "d", NULL, NULL), /* short form */ |
| 87 |
STRG (Rs_display_name, NULL, "display", "string", "X server to contact"), |
| 88 |
STRG (Rs_term_name, "termName", "tn", "string", "value of the TERM environment variable"), |
| 89 |
STRG (Rs_geometry, NULL, "g", NULL, NULL), /* short form */ |
| 90 |
STRG (Rs_geometry, "geometry", "geometry", "geometry", "size (in characters) and position"), |
| 91 |
SWCH ("C", Opt_console, "intercept console messages"), |
| 92 |
SWCH ("iconic", Opt_iconic, "start iconic"), |
| 93 |
SWCH ("ic", Opt_iconic, NULL), /* short form */ |
| 94 |
BOOL (Rs_reverseVideo, "reverseVideo", "rv", Opt_reverseVideo, "reverse video"), |
| 95 |
BOOL (Rs_loginShell, "loginShell", "ls", Opt_loginShell, "login shell"), |
| 96 |
BOOL (Rs_jumpScroll, "jumpScroll", "j", Opt_jumpScroll, "jump scrolling"), |
| 97 |
BOOL (Rs_pastableTabs, "pastableTabs", "ptab", Opt_pastableTabs, "tab characters are pastable"), |
| 98 |
#if HAVE_SCROLLBARS |
| 99 |
RSTRG (Rs_scrollstyle, "scrollstyle", "mode"), |
| 100 |
BOOL (Rs_scrollBar, "scrollBar", "sb", Opt_scrollBar, "scrollbar"), |
| 101 |
BOOL (Rs_scrollBar_right, "scrollBar_right", "sr", Opt_scrollBar_right, "scrollbar right"), |
| 102 |
BOOL (Rs_scrollBar_floating, "scrollBar_floating", "st", Opt_scrollBar_floating, "scrollbar without a trough"), |
| 103 |
RSTRG (Rs_scrollBar_align, "scrollBar_align", "mode"), |
| 104 |
STRG (Rs_scrollBar_thickness, "thickness", "sbt", "number", "scrollbar thickness/width in pixels"), |
| 105 |
#endif |
| 106 |
BOOL (Rs_scrollTtyOutput, "scrollTtyOutput", NULL, Opt_scrollTtyOutput, NULL), |
| 107 |
BOOL (Rs_scrollTtyOutput, NULL, "si", Optflag_Reverse | Opt_scrollTtyOutput, "scroll-on-tty-output inhibit"), |
| 108 |
BOOL (Rs_scrollTtyKeypress, "scrollTtyKeypress", "sk", Opt_scrollTtyKeypress, "scroll-on-keypress"), |
| 109 |
BOOL (Rs_scrollWithBuffer, "scrollWithBuffer", "sw", Opt_scrollWithBuffer, "scroll-with-buffer"), |
| 110 |
#if TRANSPARENT |
| 111 |
BOOL (Rs_transparent, "inheritPixmap", "ip", Opt_transparent, "inherit parent pixmap"), |
| 112 |
SWCH ("tr", Opt_transparent, NULL), |
| 113 |
# if TINTING |
| 114 |
STRG (Rs_color + Color_tint, "tintColor", "tint", "color", "tint color"), |
| 115 |
# endif |
| 116 |
#endif |
| 117 |
#if OFF_FOCUS_FADING |
| 118 |
STRG (Rs_fade, "fading", "fade", "%", "fade colors x% percent when rxvt-unicode is losing focus"), |
| 119 |
STRG (Rs_color + Color_fade, "fadeColor", "fadecolor", "color", "target color for off-focus fading"), |
| 120 |
#endif |
| 121 |
#if TINTING |
| 122 |
STRG (Rs_shade, "shading", "sh", "%", "shade background by x% when tinting."), |
| 123 |
#endif |
| 124 |
BOOL (Rs_utmpInhibit, "utmpInhibit", "ut", Opt_utmpInhibit, "utmp inhibit"), |
| 125 |
#ifndef NO_BELL |
| 126 |
BOOL (Rs_visualBell, "visualBell", "vb", Opt_visualBell, "visual bell"), |
| 127 |
# if ! defined(NO_MAPALERT) && defined(MAPALERT_OPTION) |
| 128 |
BOOL (Rs_mapAlert, "mapAlert", NULL, Opt_mapAlert, NULL), |
| 129 |
# endif |
| 130 |
#endif |
| 131 |
#ifdef META8_OPTION |
| 132 |
BOOL (Rs_meta8, "meta8", NULL, Opt_meta8, NULL), |
| 133 |
#endif |
| 134 |
#ifdef MOUSE_WHEEL |
| 135 |
BOOL (Rs_mouseWheelScrollPage, "mouseWheelScrollPage", NULL, Opt_mouseWheelScrollPage, NULL), |
| 136 |
#endif |
| 137 |
#if ENABLE_FRILLS |
| 138 |
BOOL (Rs_tripleclickwords, "tripleclickwords", "tcw", Opt_tripleclickwords, "triple click word selection"), |
| 139 |
BOOL (Rs_insecure, "insecure", "insecure", Opt_insecure, "enable possibly insecure escape sequences"), |
| 140 |
BOOL (Rs_cursorUnderline, "cursorUnderline", "uc", Opt_cursorUnderline, "underline cursor"), |
| 141 |
#endif |
| 142 |
#if CURSOR_BLINK |
| 143 |
BOOL (Rs_cursorBlink, "cursorBlink", "bc", Opt_cursorBlink, "blinking cursor"), |
| 144 |
#endif |
| 145 |
#ifdef POINTER_BLANK |
| 146 |
BOOL (Rs_pointerBlank, "pointerBlank", "pb", Opt_pointerBlank, "switch off pointer after delay"), |
| 147 |
#endif |
| 148 |
STRG (Rs_color + Color_bg, "background", "bg", "color", "background color"), |
| 149 |
STRG (Rs_color + Color_fg, "foreground", "fg", "color", "foreground color"), |
| 150 |
RSTRG (Rs_color + minCOLOR + 0, "color0", "color"), |
| 151 |
RSTRG (Rs_color + minCOLOR + 1, "color1", "color"), |
| 152 |
RSTRG (Rs_color + minCOLOR + 2, "color2", "color"), |
| 153 |
RSTRG (Rs_color + minCOLOR + 3, "color3", "color"), |
| 154 |
RSTRG (Rs_color + minCOLOR + 4, "color4", "color"), |
| 155 |
RSTRG (Rs_color + minCOLOR + 5, "color5", "color"), |
| 156 |
RSTRG (Rs_color + minCOLOR + 6, "color6", "color"), |
| 157 |
RSTRG (Rs_color + minCOLOR + 7, "color7", "color"), |
| 158 |
RSTRG (Rs_color + minBrightCOLOR + 0, "color8", "color"), |
| 159 |
RSTRG (Rs_color + minBrightCOLOR + 1, "color9", "color"), |
| 160 |
RSTRG (Rs_color + minBrightCOLOR + 2, "color10", "color"), |
| 161 |
RSTRG (Rs_color + minBrightCOLOR + 3, "color11", "color"), |
| 162 |
RSTRG (Rs_color + minBrightCOLOR + 4, "color12", "color"), |
| 163 |
RSTRG (Rs_color + minBrightCOLOR + 5, "color13", "color"), |
| 164 |
RSTRG (Rs_color + minBrightCOLOR + 6, "color14", "color"), |
| 165 |
RSTRG (Rs_color + minBrightCOLOR + 7, "color15", "color"), |
| 166 |
#ifndef NO_BOLD_UNDERLINE_REVERSE |
| 167 |
RSTRG (Rs_color + Color_BD, "colorBD", "color"), |
| 168 |
RSTRG (Rs_color + Color_IT, "colorIT", "color"), |
| 169 |
RSTRG (Rs_color + Color_UL, "colorUL", "color"), |
| 170 |
RSTRG (Rs_color + Color_RV, "colorRV", "color"), |
| 171 |
#endif /* ! NO_BOLD_UNDERLINE_REVERSE */ |
| 172 |
#if ENABLE_FRILLS |
| 173 |
RSTRG (Rs_color + Color_underline, "underlineColor", "color"), |
| 174 |
#endif |
| 175 |
#ifdef KEEP_SCROLLCOLOR |
| 176 |
RSTRG (Rs_color + Color_scroll, "scrollColor", "color"), |
| 177 |
RSTRG (Rs_color + Color_trough, "troughColor", "color"), |
| 178 |
#endif /* KEEP_SCROLLCOLOR */ |
| 179 |
#ifdef OPTION_HC |
| 180 |
STRG (Rs_color + Color_HC, "highlightColor", "hc", "color", "highlight color"), |
| 181 |
#endif |
| 182 |
#ifndef NO_CURSORCOLOR |
| 183 |
STRG (Rs_color + Color_cursor, "cursorColor", "cr", "color", "cursor color"), |
| 184 |
/* command-line option = resource name */ |
| 185 |
RSTRG (Rs_color + Color_cursor2, "cursorColor2", "color"), |
| 186 |
#endif /* NO_CURSORCOLOR */ |
| 187 |
STRG (Rs_color + Color_pointer_fg, "pointerColor", "pr", "color", "pointer color"), |
| 188 |
STRG (Rs_color + Color_pointer_bg, "pointerColor2", "pr2", "color", "pointer bg color"), |
| 189 |
STRG (Rs_color + Color_border, "borderColor", "bd", "color", "border color"), |
| 190 |
#ifdef XPM_BACKGROUND |
| 191 |
RSTRG (Rs_path, "path", "search path"), |
| 192 |
STRG (Rs_backgroundPixmap, "backgroundPixmap", "pixmap", "file[;geom]", "background pixmap"), |
| 193 |
#endif |
| 194 |
/* fonts: command-line option = resource name */ |
| 195 |
STRG (Rs_font, "font", "fn", "fontname", "normal text font"), |
| 196 |
#if ENABLE_STYLES |
| 197 |
STRG (Rs_boldFont, "boldFont", "fb", "fontname", "bold font"), |
| 198 |
STRG (Rs_italicFont, "italicFont", "fi", "fontname", "italic font"), |
| 199 |
STRG (Rs_boldItalicFont, "boldItalicFont", "fbi", "fontname", "bold italic font"), |
| 200 |
BOOL (Rs_intensityStyles, "intensityStyles", "is", Opt_intensityStyles, "font styles imply intensity changes"), |
| 201 |
#endif |
| 202 |
#ifdef USE_XIM |
| 203 |
STRG (Rs_inputMethod, "inputMethod", "im", "name", "name of input method"), |
| 204 |
STRG (Rs_preeditType, "preeditType", "pt", "style", "input style: style = OverTheSpot|OffTheSpot|Root"), |
| 205 |
STRG (Rs_imLocale, "imLocale", "imlocale", "string", "locale to use for input method"), |
| 206 |
STRG (Rs_imFont, "imFont", "imfont", "fontname", "fontset for styles OverTheSpot and OffTheSpot"), |
| 207 |
#endif /* USE_XIM */ |
| 208 |
STRG (Rs_name, NULL, "name", "string", "client instance, icon, and title strings"), |
| 209 |
STRG (Rs_title, "title", "title", "string", "title name for window"), |
| 210 |
STRG (Rs_title, NULL, "T", NULL, NULL), /* short form */ |
| 211 |
STRG (Rs_iconName, "iconName", "n", "string", "icon name for window"), |
| 212 |
STRG (Rs_saveLines, "saveLines", "sl", "number", "number of scrolled lines to save"), |
| 213 |
#if ENABLE_XEMBED |
| 214 |
STRG (Rs_embed, NULL, "embed", "windowid", "window id to embed terminal in"), |
| 215 |
#endif |
| 216 |
#if ENABLE_FRILLS |
| 217 |
RSTRG (Rs_transient_for, "transient-for", "windowid"), |
| 218 |
BOOL (Rs_override_redirect, "override-redirect", "override-redirect", Opt_override_redirect, "set override-redirect on the terminal window"), |
| 219 |
STRG (Rs_pty_fd, NULL, "pty-fd", "fileno", "file descriptor of pty to use"), |
| 220 |
BOOL (Rs_hold, "hold", "hold", Opt_hold, "retain window after shell exit"), |
| 221 |
STRG (Rs_depth, "depth", "depth", "number", "depth of visual to request"), |
| 222 |
STRG (Rs_ext_bwidth, "externalBorder", "w", "number", "external border in pixels"), |
| 223 |
STRG (Rs_ext_bwidth, NULL, "bw", NULL, NULL), |
| 224 |
STRG (Rs_ext_bwidth, NULL, "borderwidth", NULL, NULL), |
| 225 |
STRG (Rs_int_bwidth, "internalBorder", "b", "number", "internal border in pixels"), |
| 226 |
BOOL (Rs_borderLess, "borderLess", "bl", Opt_borderLess, "borderless window"), |
| 227 |
BOOL (Rs_skipBuiltinGlyphs, "skipBuiltinGlyphs", "sbg", Opt_skipBuiltinGlyphs, "do not use internal glyphs"), |
| 228 |
STRG (Rs_lineSpace, "lineSpace", "lsp", "number", "number of extra pixels between rows"), |
| 229 |
#endif |
| 230 |
#ifdef POINTER_BLANK |
| 231 |
RSTRG (Rs_pointerBlankDelay, "pointerBlankDelay", "number"), |
| 232 |
#endif |
| 233 |
#ifndef NO_BACKSPACE_KEY |
| 234 |
RSTRG (Rs_backspace_key, "backspacekey", "string"), |
| 235 |
#endif |
| 236 |
#ifndef NO_DELETE_KEY |
| 237 |
RSTRG (Rs_delete_key, "deletekey", "string"), |
| 238 |
#endif |
| 239 |
RSTRG (Rs_selectstyle, "selectstyle", "mode"), |
| 240 |
#ifdef PRINTPIPE |
| 241 |
RSTRG (Rs_print_pipe, "print-pipe", "string"), |
| 242 |
#endif |
| 243 |
STRG (Rs_modifier, "modifier", "mod", "modifier", "meta modifier = alt|meta|hyper|super|mod1|...|mod5"), |
| 244 |
#ifdef CUTCHAR_RESOURCE |
| 245 |
RSTRG (Rs_cutchars, "cutchars", "string"), |
| 246 |
#endif /* CUTCHAR_RESOURCE */ |
| 247 |
RSTRG (Rs_answerbackstring, "answerbackString", "string"), |
| 248 |
#ifndef NO_SECONDARY_SCREEN |
| 249 |
BOOL (Rs_secondaryScreen, "secondaryScreen", "ssc", Opt_secondaryScreen, "enable secondary screen"), |
| 250 |
BOOL (Rs_secondaryScroll, "secondaryScroll", "ssr", Opt_secondaryScroll, "enable secondary screen scroll"), |
| 251 |
#endif |
| 252 |
#if ENABLE_PERL |
| 253 |
RSTRG (Rs_perl_lib, "perl-lib", "string"), //, "colon-separated directories with extension scripts"),TODO |
| 254 |
RSTRG (Rs_perl_eval, "perl-eval", "perl-eval"), // "string", "code to be evaluated after all extensions have been loaded"),TODO |
| 255 |
RSTRG (Rs_perl_ext_1, "perl-ext-common", "string"), //, "colon-separated list of perl extensions to enable"),TODO |
| 256 |
STRG (Rs_perl_ext_2, "perl-ext", "pe", "string", "colon-separated list of perl extensions to enable for this instance"), |
| 257 |
#endif |
| 258 |
#ifndef NO_RESOURCES |
| 259 |
INFO ("xrm", "string", "X resource"), |
| 260 |
#endif |
| 261 |
INFO ("e", "command arg ...", "command to execute") |
| 262 |
}; |
| 263 |
|
| 264 |
#undef INFO |
| 265 |
#undef STRG |
| 266 |
#undef RSTRG |
| 267 |
#undef SWCH |
| 268 |
#undef BOOL |
| 269 |
/*}}} */ |
| 270 |
|
| 271 |
static const char releasestring[] = "rxvt-unicode (" RXVTNAME ") v" VERSION " - released: " DATE "\n"; |
| 272 |
static const char optionsstring[] = "options: " |
| 273 |
#if ENABLE_PERL |
| 274 |
"perl," |
| 275 |
#endif |
| 276 |
#if XFT |
| 277 |
"xft," |
| 278 |
#endif |
| 279 |
#if ENABLE_STYLES |
| 280 |
"styles," |
| 281 |
#endif |
| 282 |
#if ENABLE_COMBINING |
| 283 |
"combining," |
| 284 |
#endif |
| 285 |
#if TEXT_BLINK |
| 286 |
"blink," |
| 287 |
#endif |
| 288 |
#if ISO_14755 |
| 289 |
"iso14755," |
| 290 |
#endif |
| 291 |
#if UNICODE_3 |
| 292 |
"unicode3," |
| 293 |
#endif |
| 294 |
"encodings=eu+vn" |
| 295 |
#if ENCODING_JP |
| 296 |
"+jp" |
| 297 |
#endif |
| 298 |
#if ENCODING_JP_EXT |
| 299 |
"+jp-ext" |
| 300 |
#endif |
| 301 |
#if ENCODING_KR |
| 302 |
"+kr" |
| 303 |
#endif |
| 304 |
#if ENCODING_ZH |
| 305 |
"+zh" |
| 306 |
#endif |
| 307 |
#if ENCODING_ZH_EXT |
| 308 |
"+zh-ext" |
| 309 |
#endif |
| 310 |
"," |
| 311 |
#if OFF_FOCUS_FADING |
| 312 |
"fade," |
| 313 |
#endif |
| 314 |
#if defined(XPM_BACKGROUND) |
| 315 |
"XPM," |
| 316 |
#endif |
| 317 |
#if defined(TRANSPARENT) |
| 318 |
"transparent," |
| 319 |
#endif |
| 320 |
#if TINTING |
| 321 |
"tint," |
| 322 |
#endif |
| 323 |
#if defined(USE_XIM) |
| 324 |
"XIM," |
| 325 |
#endif |
| 326 |
#if defined(NO_BACKSPACE_KEY) |
| 327 |
"no_backspace," |
| 328 |
#endif |
| 329 |
#if defined(NO_DELETE_KEY) |
| 330 |
"no_delete," |
| 331 |
#endif |
| 332 |
#if EIGHT_BIT_CONTROLS |
| 333 |
"8bitctrls," |
| 334 |
#endif |
| 335 |
#if defined(ENABLE_FRILLS) |
| 336 |
"frills," |
| 337 |
#endif |
| 338 |
#if defined(SELECTION_SCROLLING) |
| 339 |
"selectionscrolling," |
| 340 |
#endif |
| 341 |
#if MOUSE_WHEEL |
| 342 |
"wheel," |
| 343 |
#endif |
| 344 |
#if MOUSE_SLIP_WHEELING |
| 345 |
"slipwheel," |
| 346 |
#endif |
| 347 |
#if defined(SMART_RESIZE) |
| 348 |
"smart-resize," |
| 349 |
#endif |
| 350 |
#if defined(CURSOR_BLINK) |
| 351 |
"cursorBlink," |
| 352 |
#endif |
| 353 |
#if defined(POINTER_BLANK) |
| 354 |
"pointerBlank," |
| 355 |
#endif |
| 356 |
#if defined(NO_RESOURCES) |
| 357 |
"NoResources," |
| 358 |
#endif |
| 359 |
"scrollbars=" |
| 360 |
#if !defined(HAVE_SCROLLBARS) |
| 361 |
"NONE" |
| 362 |
#else |
| 363 |
# if defined(PLAIN_SCROLLBAR) |
| 364 |
"plain" |
| 365 |
# if defined(RXVT_SCROLLBAR) || defined(NEXT_SCROLLBAR) || defined(XTERM_SCROLLBAR) |
| 366 |
"+" |
| 367 |
# endif |
| 368 |
# endif |
| 369 |
# if defined(RXVT_SCROLLBAR) |
| 370 |
"rxvt" |
| 371 |
# if defined(NEXT_SCROLLBAR) || defined(XTERM_SCROLLBAR) |
| 372 |
"+" |
| 373 |
# endif |
| 374 |
# endif |
| 375 |
# if defined(NEXT_SCROLLBAR) |
| 376 |
"NeXT" |
| 377 |
# if defined(XTERM_SCROLLBAR) |
| 378 |
"+" |
| 379 |
# endif |
| 380 |
# endif |
| 381 |
# if defined(XTERM_SCROLLBAR) |
| 382 |
"xterm" |
| 383 |
# endif |
| 384 |
#endif |
| 385 |
"\nUsage: "; /* Usage */ |
| 386 |
|
| 387 |
#define INDENT 18 |
| 388 |
|
| 389 |
/*{{{ usage: */ |
| 390 |
/*----------------------------------------------------------------------*/ |
| 391 |
static void |
| 392 |
rxvt_usage (int type) |
| 393 |
{ |
| 394 |
unsigned int i, col; |
| 395 |
|
| 396 |
rxvt_log ("%s%s%s", releasestring, optionsstring, RESNAME); |
| 397 |
|
| 398 |
switch (type) |
| 399 |
{ |
| 400 |
case 0: /* brief listing */ |
| 401 |
rxvt_log (" [-help] [--help]\n"); |
| 402 |
|
| 403 |
for (col = 1, i = 0; i < optList_size; i++) |
| 404 |
if (optList[i].desc != NULL) |
| 405 |
{ |
| 406 |
int len = 0; |
| 407 |
|
| 408 |
if (!optList_isBool (i)) |
| 409 |
{ |
| 410 |
len = optList_strlen (i); |
| 411 |
if (len > 0) |
| 412 |
len++; /* account for space */ |
| 413 |
} |
| 414 |
#ifdef DEBUG_STRICT |
| 415 |
assert (optList[i].opt != NULL); |
| 416 |
#endif |
| 417 |
len += 4 + strlen (optList[i].opt) + (optList_isBool (i) ? 2: 0); |
| 418 |
col += len; |
| 419 |
if (col > 79) |
| 420 |
{ /* assume regular width */ |
| 421 |
rxvt_log ("\n"); |
| 422 |
col = 1 + len; |
| 423 |
} |
| 424 |
|
| 425 |
rxvt_log (" [-%s%s", (optList_isBool (i) ? "/+" : ""), optList[i].opt); |
| 426 |
if (optList_strlen (i)) |
| 427 |
rxvt_log (" %s]", optList[i].arg); |
| 428 |
else |
| 429 |
rxvt_log ("]"); |
| 430 |
} |
| 431 |
break; |
| 432 |
|
| 433 |
case 1: /* full command-line listing */ |
| 434 |
rxvt_log (" [options] [-e command args]\n\nwhere options include:\n"); |
| 435 |
|
| 436 |
for (i = 0; i < optList_size; i++) |
| 437 |
if (optList[i].desc != NULL) |
| 438 |
{ |
| 439 |
#ifdef DEBUG_STRICT |
| 440 |
assert (optList[i].opt != NULL); |
| 441 |
#endif |
| 442 |
rxvt_log (" %s%s %-*s%s%s\n", |
| 443 |
(optList_isBool (i) ? "-/+" : "-"), optList[i].opt, |
| 444 |
(INDENT - strlen (optList[i].opt) |
| 445 |
+ (optList_isBool (i) ? 0 : 2)), |
| 446 |
(optList[i].arg ? optList[i].arg : ""), |
| 447 |
(optList_isBool (i) ? "turn on/off " : ""), |
| 448 |
optList[i].desc); |
| 449 |
} |
| 450 |
rxvt_log ("\n --help to list long-options"); |
| 451 |
break; |
| 452 |
|
| 453 |
case 2: /* full resource listing */ |
| 454 |
rxvt_log (" [options] [-e command args]\n\n" |
| 455 |
"where resources (long-options) include:\n"); |
| 456 |
|
| 457 |
for (i = 0; i < optList_size; i++) |
| 458 |
if (optList[i].kw != NULL) |
| 459 |
rxvt_log (" %s: %*s%s\n", |
| 460 |
optList[i].kw, |
| 461 |
(INDENT - strlen (optList[i].kw)), "", /* XXX */ |
| 462 |
(optList_isBool (i) ? "boolean" : optList[i].arg)); |
| 463 |
#ifdef KEYSYM_RESOURCE |
| 464 |
rxvt_log (" " "keysym.sym" ": %*s%s\n", |
| 465 |
(INDENT - sizeof ("keysym.sym") + 1), "", /* XXX */ |
| 466 |
"keysym"); |
| 467 |
#endif |
| 468 |
rxvt_log ("\n -help to list options"); |
| 469 |
break; |
| 470 |
} |
| 471 |
|
| 472 |
rxvt_log ("\n\n"); |
| 473 |
rxvt_exit_failure (); |
| 474 |
/* NOTREACHED */ |
| 475 |
} |
| 476 |
|
| 477 |
/*}}} */ |
| 478 |
|
| 479 |
/*{{{ get command-line options before getting resources */ |
| 480 |
void |
| 481 |
rxvt_term::get_options (int argc, const char *const *argv) |
| 482 |
{ |
| 483 |
int i, bad_option = 0; |
| 484 |
static const char On[3] = "ON", Off[4] = "OFF"; |
| 485 |
|
| 486 |
for (i = 1; i < argc; i++) |
| 487 |
{ |
| 488 |
unsigned int entry, longopt = 0; |
| 489 |
const char *flag, *opt; |
| 490 |
|
| 491 |
opt = argv[i]; |
| 492 |
|
| 493 |
if (*opt == '-') |
| 494 |
{ |
| 495 |
flag = On; |
| 496 |
if (*++opt == '-') |
| 497 |
longopt = *opt++; /* long option */ |
| 498 |
} |
| 499 |
else if (*opt == '+') |
| 500 |
{ |
| 501 |
flag = Off; |
| 502 |
if (*++opt == '+') |
| 503 |
longopt = *opt++; /* long option */ |
| 504 |
} |
| 505 |
else |
| 506 |
{ |
| 507 |
bad_option = 1; |
| 508 |
rxvt_warn ("\"%s\": malformed option.\n", opt); |
| 509 |
continue; |
| 510 |
} |
| 511 |
|
| 512 |
if (!strcmp (opt, "help")) |
| 513 |
rxvt_usage (longopt ? 2 : 1); |
| 514 |
if (!strcmp (opt, "h")) |
| 515 |
rxvt_usage (0); |
| 516 |
|
| 517 |
/* feature: always try to match long-options */ |
| 518 |
for (entry = 0; entry < optList_size; entry++) |
| 519 |
if ((optList[entry].kw && !strcmp (opt, optList[entry].kw)) |
| 520 |
|| (!longopt |
| 521 |
&& optList[entry].opt && !strcmp (opt, optList[entry].opt))) |
| 522 |
break; |
| 523 |
|
| 524 |
if (entry < optList_size) |
| 525 |
{ |
| 526 |
if (optList_isReverse (entry)) |
| 527 |
flag = flag == On ? Off : On; |
| 528 |
|
| 529 |
if (optList_strlen (entry)) |
| 530 |
{ |
| 531 |
/* |
| 532 |
* special cases are handled in main.c:main () to allow |
| 533 |
* X resources to set these values before we settle for |
| 534 |
* default values |
| 535 |
*/ |
| 536 |
|
| 537 |
if (optList[entry].doff != -1) |
| 538 |
rs[optList[entry].doff] = flag == On && argv[i+1] |
| 539 |
? argv[++i] : 0; |
| 540 |
} |
| 541 |
else |
| 542 |
{ /* boolean value */ |
| 543 |
set_option (optList[entry].flag & Optflag_mask, flag == On); |
| 544 |
|
| 545 |
if (optList[entry].doff != -1) |
| 546 |
rs[optList[entry].doff] = flag; |
| 547 |
} |
| 548 |
} |
| 549 |
else |
| 550 |
#ifdef KEYSYM_RESOURCE |
| 551 |
/* if (!strncmp (opt, "keysym.", sizeof ("keysym.") - 1)) */ |
| 552 |
if (rxvt_Str_match (opt, "keysym.")) |
| 553 |
{ |
| 554 |
const char *str = argv[++i]; |
| 555 |
|
| 556 |
if (str != NULL) |
| 557 |
parse_keysym (opt + sizeof ("keysym.") - 1, str); |
| 558 |
} |
| 559 |
else |
| 560 |
#endif |
| 561 |
{ |
| 562 |
bad_option = 1; |
| 563 |
rxvt_warn ("\"%s\": unknown or malformed option.\n", opt); |
| 564 |
} |
| 565 |
} |
| 566 |
|
| 567 |
if (bad_option) |
| 568 |
rxvt_usage (0); |
| 569 |
} |
| 570 |
|
| 571 |
/*}}} */ |
| 572 |
|
| 573 |
#ifndef NO_RESOURCES |
| 574 |
/*----------------------------------------------------------------------*/ |
| 575 |
|
| 576 |
# ifdef KEYSYM_RESOURCE |
| 577 |
/* |
| 578 |
* Define key from XrmEnumerateDatabase. |
| 579 |
* quarks will be something like |
| 580 |
* "rxvt" "keysym" "0xFF01" |
| 581 |
* value will be a string |
| 582 |
*/ |
| 583 |
/* ARGSUSED */ |
| 584 |
int |
| 585 |
rxvt_define_key (XrmDatabase *database UNUSED, |
| 586 |
XrmBindingList bindings UNUSED, |
| 587 |
XrmQuarkList quarks, |
| 588 |
XrmRepresentation *type UNUSED, |
| 589 |
XrmValue *value, |
| 590 |
XPointer closure UNUSED) |
| 591 |
{ |
| 592 |
int last; |
| 593 |
|
| 594 |
for (last = 0; quarks[last] != NULLQUARK; last++) /* look for last quark in list */ |
| 595 |
; |
| 596 |
|
| 597 |
last--; |
| 598 |
GET_R->parse_keysym (XrmQuarkToString (quarks[last]), (char *)value->addr);//D//TODO |
| 599 |
return False; |
| 600 |
} |
| 601 |
|
| 602 |
/* |
| 603 |
* look for something like this (XK_Delete) |
| 604 |
* rxvt*keysym.0xFFFF: "\177" |
| 605 |
* |
| 606 |
* arg will be |
| 607 |
* NULL for ~/.Xdefaults and |
| 608 |
* non-NULL for command-line options (need to allocate) |
| 609 |
*/ |
| 610 |
#define NEWARGLIM 500 /* `reasonable' size */ |
| 611 |
|
| 612 |
struct keysym_vocabulary_t |
| 613 |
{ |
| 614 |
const char *name; |
| 615 |
unsigned short len; |
| 616 |
unsigned short value; |
| 617 |
}; |
| 618 |
keysym_vocabulary_t keysym_vocabulary[] = |
| 619 |
{ |
| 620 |
{ "ISOLevel3", 9, Level3Mask }, |
| 621 |
{ "AppKeypad", 9, AppKeypadMask }, |
| 622 |
{ "Control", 7, ControlMask }, |
| 623 |
{ "NumLock", 7, NumLockMask }, |
| 624 |
{ "Shift", 5, ShiftMask }, |
| 625 |
{ "Meta", 4, MetaMask }, |
| 626 |
{ "Lock", 4, LockMask }, |
| 627 |
{ "Mod1", 4, Mod1Mask }, |
| 628 |
{ "Mod2", 4, Mod2Mask }, |
| 629 |
{ "Mod3", 4, Mod3Mask }, |
| 630 |
{ "Mod4", 4, Mod4Mask }, |
| 631 |
{ "Mod5", 4, Mod5Mask }, |
| 632 |
{ "I", 1, Level3Mask }, |
| 633 |
{ "K", 1, AppKeypadMask }, |
| 634 |
{ "C", 1, ControlMask }, |
| 635 |
{ "N", 1, NumLockMask }, |
| 636 |
{ "S", 1, ShiftMask }, |
| 637 |
{ "M", 1, MetaMask }, |
| 638 |
{ "A", 1, MetaMask }, |
| 639 |
{ "L", 1, LockMask }, |
| 640 |
{ "1", 1, Mod1Mask }, |
| 641 |
{ "2", 1, Mod2Mask }, |
| 642 |
{ "3", 1, Mod3Mask }, |
| 643 |
{ "4", 1, Mod4Mask }, |
| 644 |
{ "5", 1, Mod5Mask }, |
| 645 |
}; |
| 646 |
|
| 647 |
int |
| 648 |
rxvt_term::parse_keysym (const char *str, const char *arg) |
| 649 |
{ |
| 650 |
int n, sym; |
| 651 |
unsigned int state = 0; |
| 652 |
const char *pmodend = NULL; |
| 653 |
char *newarg = NULL; |
| 654 |
char newargstr[NEWARGLIM]; |
| 655 |
|
| 656 |
if (arg == NULL) |
| 657 |
{ |
| 658 |
if ((n = rxvt_Str_match (str, "keysym.")) == 0) |
| 659 |
return 0; |
| 660 |
|
| 661 |
str += n; /* skip `keysym.' */ |
| 662 |
if (!(pmodend = strchr (str, ':'))) |
| 663 |
return -1; |
| 664 |
} |
| 665 |
else |
| 666 |
pmodend = str + strlen(str); |
| 667 |
|
| 668 |
for (--pmodend; str < pmodend; --pmodend) |
| 669 |
if (*pmodend == '-') |
| 670 |
break; |
| 671 |
|
| 672 |
while (str < pmodend) |
| 673 |
{ |
| 674 |
unsigned int i; |
| 675 |
|
| 676 |
for (i=0; i < sizeof (keysym_vocabulary) / sizeof (keysym_vocabulary_t); ++i) |
| 677 |
{ |
| 678 |
if (strncmp (str, keysym_vocabulary [i].name, keysym_vocabulary [i].len) == 0) |
| 679 |
{ |
| 680 |
state |= keysym_vocabulary[i].value; |
| 681 |
str += keysym_vocabulary[i].len; |
| 682 |
break; |
| 683 |
} |
| 684 |
} |
| 685 |
|
| 686 |
if (i >= sizeof (keysym_vocabulary) / sizeof (keysym_vocabulary_t)) |
| 687 |
return -1; |
| 688 |
|
| 689 |
if (*str == '-') |
| 690 |
++str; |
| 691 |
} |
| 692 |
|
| 693 |
/* some scanf () have trouble with a 0x prefix */ |
| 694 |
if (str[0] == '0' && toupper (str[1]) == 'X') |
| 695 |
{ |
| 696 |
str += 2; |
| 697 |
|
| 698 |
if (arg) |
| 699 |
{ |
| 700 |
if (sscanf (str, (strchr (str, ':') ? "%x:" : "%x"), &sym) != 1) |
| 701 |
return -1; |
| 702 |
} |
| 703 |
else |
| 704 |
{ |
| 705 |
if (sscanf (str, "%x:", &sym) != 1) |
| 706 |
return -1; |
| 707 |
|
| 708 |
/* cue to ':', it's there since sscanf () worked */ |
| 709 |
strncpy (newargstr, strchr (str, ':') + 1, NEWARGLIM - 1); |
| 710 |
newargstr[NEWARGLIM - 1] = '\0'; |
| 711 |
newarg = newargstr; |
| 712 |
} |
| 713 |
} |
| 714 |
else |
| 715 |
{ |
| 716 |
/* |
| 717 |
* convert keysym name to keysym number |
| 718 |
*/ |
| 719 |
strncpy (newargstr, str, NEWARGLIM - 1); |
| 720 |
newargstr[NEWARGLIM - 1] = '\0'; |
| 721 |
|
| 722 |
if (arg == NULL) |
| 723 |
{ |
| 724 |
if ((newarg = strchr (newargstr, ':')) == NULL) |
| 725 |
return -1; |
| 726 |
|
| 727 |
*newarg++ = '\0'; /* terminate keysym name */ |
| 728 |
} |
| 729 |
|
| 730 |
if ((sym = XStringToKeysym (newargstr)) == None) |
| 731 |
return -1; |
| 732 |
} |
| 733 |
|
| 734 |
if (newarg == NULL) |
| 735 |
{ |
| 736 |
strncpy (newargstr, arg, NEWARGLIM - 1); |
| 737 |
newargstr[NEWARGLIM - 1] = '\0'; |
| 738 |
newarg = newargstr; |
| 739 |
} |
| 740 |
|
| 741 |
rxvt_Str_trim (newarg); |
| 742 |
if (*newarg == '\0' || (n = rxvt_Str_escaped (newarg)) == 0) |
| 743 |
return -1; |
| 744 |
|
| 745 |
keyboard->register_user_translation (sym, state, newarg); |
| 746 |
return 1; |
| 747 |
} |
| 748 |
|
| 749 |
# endif /* KEYSYM_RESOURCE */ |
| 750 |
#endif /* NO_RESOURCES */ |
| 751 |
|
| 752 |
static char * |
| 753 |
get_res (XrmDatabase database, const char *program, const char *option) |
| 754 |
{ |
| 755 |
char resource[512]; |
| 756 |
char *type; |
| 757 |
XrmValue result; |
| 758 |
|
| 759 |
snprintf (resource, sizeof (resource), "%s.%s", program, option); |
| 760 |
XrmGetResource (database, resource, resource, &type, &result); |
| 761 |
|
| 762 |
return result.addr; |
| 763 |
} |
| 764 |
|
| 765 |
const char * |
| 766 |
rxvt_term::x_resource (const char *name) |
| 767 |
{ |
| 768 |
XrmDatabase database = XrmGetDatabase (xdisp); |
| 769 |
|
| 770 |
const char *p = get_res (database, rs[Rs_name], name); |
| 771 |
const char *p0 = get_res (database, "!INVALIDPROGRAMMENAMEDONTMATCH!", name); |
| 772 |
|
| 773 |
if (p == NULL || (p0 && strcmp (p, p0) == 0)) |
| 774 |
{ |
| 775 |
p = get_res (database, RESCLASS, name); |
| 776 |
#ifdef RESFALLBACK |
| 777 |
if (p == NULL || (p0 && strcmp (p, p0) == 0)) |
| 778 |
p = get_res (database, RESFALLBACK, name); |
| 779 |
#endif |
| 780 |
} |
| 781 |
|
| 782 |
if (p == NULL && p0) |
| 783 |
p = p0; |
| 784 |
|
| 785 |
return p; |
| 786 |
} |
| 787 |
|
| 788 |
void |
| 789 |
rxvt_term::extract_resources () |
| 790 |
{ |
| 791 |
#ifndef NO_RESOURCES |
| 792 |
/* |
| 793 |
* Query resources for options that affect us |
| 794 |
*/ |
| 795 |
for (int entry = 0; entry < optList_size; entry++) |
| 796 |
{ |
| 797 |
int s; |
| 798 |
const char *kw = optList[entry].kw; |
| 799 |
|
| 800 |
if (kw == NULL || rs[optList[entry].doff] != NULL) |
| 801 |
continue; // previously set |
| 802 |
|
| 803 |
const char *p = x_resource (kw); |
| 804 |
|
| 805 |
if (p) |
| 806 |
{ |
| 807 |
p = strdup (p); |
| 808 |
allocated.push_back ((void *)p); |
| 809 |
rs[optList[entry].doff] = p; |
| 810 |
|
| 811 |
if (optList_isBool (entry)) |
| 812 |
{ |
| 813 |
s = strcasecmp (p, "TRUE") == 0 |
| 814 |
|| strcasecmp (p, "YES") == 0 |
| 815 |
|| strcasecmp (p, "ON") == 0 |
| 816 |
|| strcasecmp (p, "1") == 0; |
| 817 |
|
| 818 |
if (optList_isReverse (entry)) |
| 819 |
s = !s; |
| 820 |
|
| 821 |
set_option (optList[entry].flag & Optflag_mask, s); |
| 822 |
} |
| 823 |
} |
| 824 |
} |
| 825 |
|
| 826 |
/* |
| 827 |
* [R5 or later]: enumerate the resource database |
| 828 |
*/ |
| 829 |
# ifdef KEYSYM_RESOURCE |
| 830 |
XrmDatabase database = XrmGetDatabase (xdisp); |
| 831 |
XrmName name_prefix[3]; |
| 832 |
XrmClass class_prefix[3]; |
| 833 |
|
| 834 |
name_prefix[0] = XrmStringToName (rs[Rs_name]); |
| 835 |
name_prefix[1] = XrmStringToName ("keysym"); |
| 836 |
name_prefix[2] = NULLQUARK; |
| 837 |
class_prefix[0] = XrmStringToName (RESCLASS); |
| 838 |
class_prefix[1] = XrmStringToName ("Keysym"); |
| 839 |
class_prefix[2] = NULLQUARK; |
| 840 |
/* XXX: Need to check sizeof (rxvt_t) == sizeof (XPointer) */ |
| 841 |
XrmEnumerateDatabase (database, name_prefix, class_prefix, |
| 842 |
XrmEnumOneLevel, rxvt_define_key, NULL); |
| 843 |
# ifdef RESFALLBACK |
| 844 |
name_prefix[0] = XrmStringToName (RESFALLBACK); |
| 845 |
name_prefix[1] = XrmStringToName ("keysym"); |
| 846 |
class_prefix[0] = XrmStringToName (RESFALLBACK); |
| 847 |
class_prefix[1] = XrmStringToName ("Keysym"); |
| 848 |
/* XXX: Need to check sizeof (rxvt_t) == sizeof (XPointer) */ |
| 849 |
XrmEnumerateDatabase (database, name_prefix, class_prefix, |
| 850 |
XrmEnumOneLevel, rxvt_define_key, NULL); |
| 851 |
# endif |
| 852 |
# endif |
| 853 |
|
| 854 |
#endif /* NO_RESOURCES */ |
| 855 |
} |
| 856 |
|
| 857 |
/*----------------------- end-of-file (C source) -----------------------*/ |
