]> asedeno.scripts.mit.edu Git - PuTTY.git/blob - wincfg.c
Modified form of Jim Lucas's PC speaker patch. I don't like
[PuTTY.git] / 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     char *str;
41
42     if (!midsession) {
43         /*
44          * Add the About and Help buttons to the standard panel.
45          */
46         s = ctrl_getset(b, "", "", "");
47         c = ctrl_pushbutton(s, "About", 'a', HELPCTX(no_help),
48                             about_handler, P(hwndp));
49         c->generic.column = 0;
50         if (has_help) {
51             c = ctrl_pushbutton(s, "Help", 'h', HELPCTX(no_help),
52                                 help_handler, P(hwndp));
53             c->generic.column = 1;
54         }
55     }
56
57     /*
58      * Full-screen mode is a Windows peculiarity; hence
59      * scrollbar_in_fullscreen is as well.
60      */
61     s = ctrl_getset(b, "Window", "scrollback",
62                     "Control the scrollback in the window");
63     ctrl_checkbox(s, "Display scrollbar in full screen mode", 'i',
64                   HELPCTX(window_scrollback),
65                   dlg_stdcheckbox_handler,
66                   I(offsetof(Config,scrollbar_in_fullscreen)));
67     /*
68      * Really this wants to go just after `Display scrollbar'. See
69      * if we can find that control, and do some shuffling.
70      */
71     {
72         int i;
73         for (i = 0; i < s->ncontrols; i++) {
74             c = s->ctrls[i];
75             if (c->generic.type == CTRL_CHECKBOX &&
76                 c->generic.context.i == offsetof(Config,scrollbar)) {
77                 /*
78                  * Control i is the scrollbar checkbox.
79                  * Control s->ncontrols-1 is the scrollbar-in-FS one.
80                  */
81                 if (i < s->ncontrols-2) {
82                     c = s->ctrls[s->ncontrols-1];
83                     memmove(s->ctrls+i+2, s->ctrls+i+1,
84                             (s->ncontrols-i-2)*sizeof(union control *));
85                     s->ctrls[i+1] = c;
86                 }
87                 break;
88             }
89         }
90     }
91
92     /*
93      * Windows has the AltGr key, which has various Windows-
94      * specific options.
95      */
96     s = ctrl_getset(b, "Terminal/Keyboard", "features",
97                     "Enable extra keyboard features:");
98     ctrl_checkbox(s, "AltGr acts as Compose key", 't',
99                   HELPCTX(keyboard_compose),
100                   dlg_stdcheckbox_handler, I(offsetof(Config,compose_key)));
101     ctrl_checkbox(s, "Control-Alt is different from AltGr", 'd',
102                   HELPCTX(keyboard_ctrlalt),
103                   dlg_stdcheckbox_handler, I(offsetof(Config,ctrlaltkeys)));
104
105     /*
106      * Windows allows an arbitrary .WAV to be played as a bell, and
107      * also the use of the PC speaker. For this we must search the
108      * existing controlset for the radio-button set controlling the
109      * `beep' option, and add extra buttons to it.
110      * 
111      * Note that although this _looks_ like a hideous hack, it's
112      * actually all above board. The well-defined interface to the
113      * per-platform dialog box code is the _data structures_ `union
114      * control', `struct controlset' and so on; so code like this
115      * that reaches into those data structures and changes bits of
116      * them is perfectly legitimate and crosses no boundaries. All
117      * the ctrl_* routines that create most of the controls are
118      * convenient shortcuts provided on the cross-platform side of
119      * the interface, and template creation code is under no actual
120      * obligation to use them.
121      */
122     s = ctrl_getset(b, "Terminal/Bell", "style", "Set the style of bell");
123     {
124         int i;
125         for (i = 0; i < s->ncontrols; i++) {
126             c = s->ctrls[i];
127             if (c->generic.type == CTRL_RADIO &&
128                 c->generic.context.i == offsetof(Config, beep)) {
129                 assert(c->generic.handler == dlg_stdradiobutton_handler);
130                 c->radio.nbuttons += 2;
131                 c->radio.buttons =
132                     sresize(c->radio.buttons, c->radio.nbuttons, char *);
133                 c->radio.buttons[c->radio.nbuttons-1] =
134                     dupstr("Play a custom sound file");
135                 c->radio.buttons[c->radio.nbuttons-2] =
136                     dupstr("Beep using the PC speaker");
137                 c->radio.buttondata =
138                     sresize(c->radio.buttondata, c->radio.nbuttons, intorptr);
139                 c->radio.buttondata[c->radio.nbuttons-1] = I(BELL_WAVEFILE);
140                 c->radio.buttondata[c->radio.nbuttons-2] = I(BELL_PCSPEAKER);
141                 if (c->radio.shortcuts) {
142                     c->radio.shortcuts =
143                         sresize(c->radio.shortcuts, c->radio.nbuttons, char);
144                     c->radio.shortcuts[c->radio.nbuttons-1] = NO_SHORTCUT;
145                     c->radio.shortcuts[c->radio.nbuttons-2] = NO_SHORTCUT;
146                 }
147                 break;
148             }
149         }
150     }
151     ctrl_filesel(s, "Custom sound file to play as a bell:", NO_SHORTCUT,
152                  FILTER_WAVE_FILES, FALSE, "Select bell sound file",
153                  HELPCTX(bell_style),
154                  dlg_stdfilesel_handler, I(offsetof(Config, bell_wavefile)));
155
156     /*
157      * While we've got this box open, taskbar flashing on a bell is
158      * also Windows-specific.
159      */
160     ctrl_radiobuttons(s, "Taskbar/caption indication on bell:", 'i', 3,
161                       HELPCTX(bell_taskbar),
162                       dlg_stdradiobutton_handler,
163                       I(offsetof(Config, beep_ind)),
164                       "Disabled", I(B_IND_DISABLED),
165                       "Flashing", I(B_IND_FLASH),
166                       "Steady", I(B_IND_STEADY), NULL);
167
168     /*
169      * The sunken-edge border is a Windows GUI feature.
170      */
171     s = ctrl_getset(b, "Window/Appearance", "border",
172                     "Adjust the window border");
173     ctrl_checkbox(s, "Sunken-edge border (slightly thicker)", 's',
174                   HELPCTX(appearance_border),
175                   dlg_stdcheckbox_handler, I(offsetof(Config,sunken_edge)));
176
177     /*
178      * Cyrillic Lock is a horrid misfeature even on Windows, and
179      * the least we can do is ensure it never makes it to any other
180      * platform (at least unless someone fixes it!).
181      */
182     s = ctrl_getset(b, "Window/Translation", "input",
183                     "Enable character set translation on input data");
184     ctrl_checkbox(s, "Caps Lock acts as Cyrillic switch", 's',
185                   HELPCTX(translation_cyrillic),
186                   dlg_stdcheckbox_handler,
187                   I(offsetof(Config,xlat_capslockcyr)));
188
189     /*
190      * Windows has the weird OEM font mode, which gives us some
191      * additional options when working with line-drawing
192      * characters.
193      */
194     str = dupprintf("Adjust how %s displays line drawing characters", appname);
195     s = ctrl_getset(b, "Window/Translation", "linedraw", str);
196     sfree(str);
197     {
198         int i;
199         for (i = 0; i < s->ncontrols; i++) {
200             c = s->ctrls[i];
201             if (c->generic.type == CTRL_RADIO &&
202                 c->generic.context.i == offsetof(Config, vtmode)) {
203                 assert(c->generic.handler == dlg_stdradiobutton_handler);
204                 c->radio.nbuttons += 3;
205                 c->radio.buttons =
206                     sresize(c->radio.buttons, c->radio.nbuttons, char *);
207                 c->radio.buttons[c->radio.nbuttons-3] =
208                     dupstr("Font has XWindows encoding");
209                 c->radio.buttons[c->radio.nbuttons-2] =
210                     dupstr("Use font in both ANSI and OEM modes");
211                 c->radio.buttons[c->radio.nbuttons-1] =
212                     dupstr("Use font in OEM mode only");
213                 c->radio.buttondata =
214                     sresize(c->radio.buttondata, c->radio.nbuttons, intorptr);
215                 c->radio.buttondata[c->radio.nbuttons-3] = I(VT_XWINDOWS);
216                 c->radio.buttondata[c->radio.nbuttons-2] = I(VT_OEMANSI);
217                 c->radio.buttondata[c->radio.nbuttons-1] = I(VT_OEMONLY);
218                 if (!c->radio.shortcuts) {
219                     int j;
220                     c->radio.shortcuts = snewn(c->radio.nbuttons, char);
221                     for (j = 0; j < c->radio.nbuttons; j++)
222                         c->radio.shortcuts[j] = NO_SHORTCUT;
223                 } else {
224                     c->radio.shortcuts = sresize(c->radio.shortcuts,
225                                                  c->radio.nbuttons, char);
226                 }
227                 c->radio.shortcuts[c->radio.nbuttons-3] = 'x';
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 }