wincfg.c

   1 /*
   2  * wincfg.c - the Windows-specific parts of the PuTTY configuration
   3  * box.
   4  */
   5
   6 #include <windows.h>
   7
   8 #include <assert.h>
   9 #include <stdlib.h>
  10
  11 #include "putty.h"
  12 #include "dialog.h"
  13 #include "storage.h"
  14
  15 static void about_handler(union control *ctrl, void *dlg,
  16                           void *data, int event)
  17 {
  18     HWND *hwndp = (HWND *)ctrl->generic.context.p;
  19
  20     if (event == EVENT_ACTION) {
  21         modal_about_box(*hwndp);
  22     }
  23 }
  24
  25 static void help_handler(union control *ctrl, void *dlg,
  26                          void *data, int event)
  27 {
  28     HWND *hwndp = (HWND *)ctrl->generic.context.p;
  29
  30     if (event == EVENT_ACTION) {
  31         show_help(*hwndp);
  32     }
  33 }
  34
  35 void win_setup_config_box(struct controlbox *b, HWND *hwndp, int has_help,
  36                           int midsession)
  37 {
  38     struct controlset *s;
  39     union control *c;
  40
  41     if (!midsession) {
  42         /*
  43          * Add the About and Help buttons to the standard panel.
  44          */
  45         s = ctrl_getset(b, "", "", "");
  46         c = ctrl_pushbutton(s, "About", 'a', HELPCTX(no_help),
  47                             about_handler, P(hwndp));
  48         c->generic.column = 0;
  49         if (has_help) {
  50             c = ctrl_pushbutton(s, "Help", 'h', HELPCTX(no_help),
  51                                 help_handler, P(hwndp));
  52             c->generic.column = 1;
  53         }
  54     }
  55
  56     /*
  57      * Full-screen mode is a Windows peculiarity; hence
  58      * scrollbar_in_fullscreen is as well.
  59      */
  60     s = ctrl_getset(b, "Window", "scrollback",
  61                     "Control the scrollback in the window");
  62     ctrl_checkbox(s, "Display scrollbar in full screen mode", 'i',
  63                   HELPCTX(window_scrollback),
  64                   dlg_stdcheckbox_handler,
  65                   I(offsetof(Config,scrollbar_in_fullscreen)));
  66     /*
  67      * Really this wants to go just after `Display scrollbar'. See
  68      * if we can find that control, and do some shuffling.
  69      */
  70     {
  71         int i;
  72         for (i = 0; i < s->ncontrols; i++) {
  73             c = s->ctrls[i];
  74             if (c->generic.type == CTRL_CHECKBOX &&
  75                 c->generic.context.i == offsetof(Config,scrollbar)) {
  76                 /*
  77                  * Control i is the scrollbar checkbox.
  78                  * Control s->ncontrols-1 is the scrollbar-in-FS one.
  79                  */
  80                 if (i < s->ncontrols-2) {
  81                     c = s->ctrls[s->ncontrols-1];
  82                     memmove(s->ctrls+i+2, s->ctrls+i+1,
  83                             (s->ncontrols-i-2)*sizeof(union control *));
  84                     s->ctrls[i+1] = c;
  85                 }
  86                 break;
  87             }
  88         }
  89     }
  90
  91     /*
  92      * Windows has the AltGr key, which has various Windows-
  93      * specific options.
  94      */
  95     s = ctrl_getset(b, "Terminal/Keyboard", "features",
  96                     "Enable extra keyboard features:");
  97     ctrl_checkbox(s, "AltGr acts as Compose key", 't',
  98                   HELPCTX(keyboard_compose),
  99                   dlg_stdcheckbox_handler, I(offsetof(Config,compose_key)));
 100     ctrl_checkbox(s, "Control-Alt is different from AltGr", 'd',
 101                   HELPCTX(keyboard_ctrlalt),
 102                   dlg_stdcheckbox_handler, I(offsetof(Config,ctrlaltkeys)));
 103
 104     /*
 105      * Windows allows an arbitrary .WAV to be played as a bell. For
 106      * this we must search the existing controlset for the
 107      * radio-button set controlling the `beep' option, and add an
 108      * extra button to it.
 109      *
 110      * Note that although this _looks_ like a hideous hack, it's
 111      * actually all above board. The well-defined interface to the
 112      * per-platform dialog box code is the _data structures_ `union
 113      * control', `struct controlset' and so on; so code like this
 114      * that reaches into those data structures and changes bits of
 115      * them is perfectly legitimate and crosses no boundaries. All
 116      * the ctrl_* routines that create most of the controls are
 117      * convenient shortcuts provided on the cross-platform side of
 118      * the interface, and template creation code is under no actual
 119      * obligation to use them.
 120      */
 121     s = ctrl_getset(b, "Terminal/Bell", "style", "Set the style of bell");
 122     {
 123         int i;
 124         for (i = 0; i < s->ncontrols; i++) {
 125             c = s->ctrls[i];
 126             if (c->generic.type == CTRL_RADIO &&
 127                 c->generic.context.i == offsetof(Config, beep)) {
 128                 assert(c->generic.handler == dlg_stdradiobutton_handler);
 129                 c->radio.nbuttons++;
 130                 c->radio.buttons =
 131                     srealloc(c->radio.buttons,
 132                              c->radio.nbuttons * sizeof(*c->radio.buttons));
 133                 c->radio.buttons[c->radio.nbuttons-1] =
 134                     dupstr("Play a custom sound file");
 135                 c->radio.buttondata =
 136                     srealloc(c->radio.buttondata,
 137                              c->radio.nbuttons * sizeof(*c->radio.buttondata));
 138                 c->radio.buttondata[c->radio.nbuttons-1] = I(BELL_WAVEFILE);
 139                 if (c->radio.shortcuts) {
 140                     c->radio.shortcuts =
 141                         srealloc(c->radio.shortcuts,
 142                                  (c->radio.nbuttons *
 143                                   sizeof(*c->radio.shortcuts)));
 144                     c->radio.shortcuts[c->radio.nbuttons-1] = NO_SHORTCUT;
 145                 }
 146                 break;
 147             }
 148         }
 149     }
 150     ctrl_filesel(s, "Custom sound file to play as a bell:", NO_SHORTCUT,
 151                  FILTER_WAVE_FILES, FALSE, "Select bell sound file",
 152                  HELPCTX(bell_style),
 153                  dlg_stdfilesel_handler, I(offsetof(Config, bell_wavefile)));
 154
 155     /*
 156      * While we've got this box open, taskbar flashing on a bell is
 157      * also Windows-specific.
 158      */
 159     ctrl_radiobuttons(s, "Taskbar/caption indication on bell:", 'i', 3,
 160                       HELPCTX(bell_taskbar),
 161                       dlg_stdradiobutton_handler,
 162                       I(offsetof(Config, beep_ind)),
 163                       "Disabled", I(B_IND_DISABLED),
 164                       "Flashing", I(B_IND_FLASH),
 165                       "Steady", I(B_IND_STEADY), NULL);
 166
 167     /*
 168      * The sunken-edge border is a Windows GUI feature.
 169      */
 170     s = ctrl_getset(b, "Window/Appearance", "border",
 171                     "Adjust the window border");
 172     ctrl_checkbox(s, "Sunken-edge border (slightly thicker)", 's',
 173                   HELPCTX(appearance_border),
 174                   dlg_stdcheckbox_handler, I(offsetof(Config,sunken_edge)));
 175
 176     /*
 177      * Cyrillic Lock is a horrid misfeature even on Windows, and
 178      * the least we can do is ensure it never makes it to any other
 179      * platform (at least unless someone fixes it!).
 180      */
 181     s = ctrl_getset(b, "Window/Translation", "input",
 182                     "Enable character set translation on input data");
 183     ctrl_checkbox(s, "Caps Lock acts as Cyrillic switch", 's',
 184                   HELPCTX(translation_cyrillic),
 185                   dlg_stdcheckbox_handler,
 186                   I(offsetof(Config,xlat_capslockcyr)));
 187
 188     /*
 189      * Windows has the weird OEM font mode, which gives us some
 190      * additional options when working with line-drawing
 191      * characters.
 192      */
 193     s = ctrl_getset(b, "Window/Translation", "linedraw",
 194                     "Adjust how PuTTY displays line drawing characters");
 195     {
 196         int i;
 197         for (i = 0; i < s->ncontrols; i++) {
 198             c = s->ctrls[i];
 199             if (c->generic.type == CTRL_RADIO &&
 200                 c->generic.context.i == offsetof(Config, vtmode)) {
 201                 assert(c->generic.handler == dlg_stdradiobutton_handler);
 202                 c->radio.nbuttons += 2;
 203                 c->radio.buttons =
 204                     srealloc(c->radio.buttons,
 205                              c->radio.nbuttons * sizeof(*c->radio.buttons));
 206                 c->radio.buttons[c->radio.nbuttons-2] =
 207                     dupstr("Use font in both ANSI and OEM modes");
 208                 c->radio.buttons[c->radio.nbuttons-1] =
 209                     dupstr("Use font in OEM mode only");
 210                 c->radio.buttondata =
 211                     srealloc(c->radio.buttondata,
 212                              c->radio.nbuttons * sizeof(*c->radio.buttondata));
 213                 c->radio.buttondata[c->radio.nbuttons-2] = I(VT_OEMANSI);
 214                 c->radio.buttondata[c->radio.nbuttons-1] = I(VT_OEMONLY);
 215                 if (!c->radio.shortcuts) {
 216                     int j;
 217                     c->radio.shortcuts =
 218                         smalloc((c->radio.nbuttons *
 219                                  sizeof(*c->radio.shortcuts)));
 220                     for (j = 0; j < c->radio.nbuttons; j++)
 221                         c->radio.shortcuts[j] = NO_SHORTCUT;
 222                 } else {
 223                     c->radio.shortcuts =
 224                         srealloc(c->radio.shortcuts,
 225                                  (c->radio.nbuttons *
 226                                   sizeof(*c->radio.shortcuts)));
 227                 }
 228                 c->radio.shortcuts[c->radio.nbuttons-2] = 'b';
 229                 c->radio.shortcuts[c->radio.nbuttons-1] = 'e';
 230                 break;
 231             }
 232         }
 233     }
 234
 235     /*
 236      * RTF paste is Windows-specific.
 237      */
 238     s = ctrl_getset(b, "Window/Selection", "trans",
 239                     "Translation of pasted characters");
 240     ctrl_checkbox(s, "Paste to clipboard in RTF as well as plain text", 'f',
 241                   HELPCTX(selection_rtf),
 242                   dlg_stdcheckbox_handler, I(offsetof(Config,rtf_paste)));
 243
 244     /*
 245      * Windows often has no middle button, so we supply a selection
 246      * mode in which the more critical Paste action is available on
 247      * the right button instead.
 248      */
 249     s = ctrl_getset(b, "Window/Selection", "mouse",
 250                     "Control use of mouse");
 251     ctrl_radiobuttons(s, "Action of mouse buttons:", NO_SHORTCUT, 1,
 252                       HELPCTX(selection_buttons),
 253                       dlg_stdradiobutton_handler,
 254                       I(offsetof(Config, mouse_is_xterm)),
 255                       "Windows (Right pastes, Middle extends)", 'w', I(0),
 256                       "xterm (Right extends, Middle pastes)", 'x', I(1), NULL);
 257     /*
 258      * This really ought to go at the _top_ of its box, not the
 259      * bottom, so we'll just do some shuffling now we've set it
 260      * up...
 261      */
 262     c = s->ctrls[s->ncontrols-1];      /* this should be the new control */
 263     memmove(s->ctrls+1, s->ctrls, (s->ncontrols-1)*sizeof(union control *));
 264     s->ctrls[0] = c;
 265
 266     /*
 267      * Logical palettes don't even make sense anywhere except Windows.
 268      */
 269     s = ctrl_getset(b, "Window/Colours", "general",
 270                     "General options for colour usage");
 271     ctrl_checkbox(s, "Attempt to use logical palettes", 'l',
 272                   HELPCTX(colours_logpal),
 273                   dlg_stdcheckbox_handler, I(offsetof(Config,try_palette)));
 274
 275     /*
 276      * Resize-by-changing-font is a Windows insanity.
 277      */
 278     s = ctrl_getset(b, "Window", "size", "Set the size of the window");
 279     ctrl_radiobuttons(s, "When window is resized:", 'z', 1,
 280                       HELPCTX(window_resize),
 281                       dlg_stdradiobutton_handler,
 282                       I(offsetof(Config, resize_action)),
 283                       "Change the number of rows and columns", I(RESIZE_TERM),
 284                       "Change the size of the font", I(RESIZE_FONT),
 285                       "Change font size only when maximised", I(RESIZE_EITHER),
 286                       "Forbid resizing completely", I(RESIZE_DISABLED), NULL);
 287
 288     /*
 289      * Most of the Window/Behaviour stuff is there to mimic Windows
 290      * conventions which PuTTY can optionally disregard. Hence,
 291      * most of these options are Windows-specific.
 292      */
 293     s = ctrl_getset(b, "Window/Behaviour", "main", NULL);
 294     ctrl_checkbox(s, "Window closes on ALT-F4", '4',
 295                   HELPCTX(behaviour_altf4),
 296                   dlg_stdcheckbox_handler, I(offsetof(Config,alt_f4)));
 297     ctrl_checkbox(s, "System menu appears on ALT-Space", 'y',
 298                   HELPCTX(behaviour_altspace),
 299                   dlg_stdcheckbox_handler, I(offsetof(Config,alt_space)));
 300     ctrl_checkbox(s, "System menu appears on ALT alone", 'l',
 301                   HELPCTX(behaviour_altonly),
 302                   dlg_stdcheckbox_handler, I(offsetof(Config,alt_only)));
 303     ctrl_checkbox(s, "Ensure window is always on top", 'e',
 304                   HELPCTX(behaviour_alwaysontop),
 305                   dlg_stdcheckbox_handler, I(offsetof(Config,alwaysontop)));
 306     ctrl_checkbox(s, "Full screen on Alt-Enter", 'f',
 307                   HELPCTX(behaviour_altenter),
 308                   dlg_stdcheckbox_handler,
 309                   I(offsetof(Config,fullscreenonaltenter)));
 310 }