fe8abbf4 |
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 | /* |
1d0d4a3b |
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 | /* |
fe8abbf4 |
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 | } |