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