mirror of
https://git.tartarus.org/simon/putty.git
synced 2025-01-10 01:48:00 +00:00
d36a4c3685
malloc functions, which automatically cast to the same type they're allocating the size of. Should prevent any future errors involving mallocing the size of the wrong structure type, and will also make life easier if we ever need to turn the PuTTY core code from real C into C++-friendly C. I haven't touched the Mac frontend in this checkin because I couldn't compile or test it. [originally from svn r3014]
301 lines
10 KiB
C
301 lines
10 KiB
C
/*
|
|
* wincfg.c - the Windows-specific parts of the PuTTY configuration
|
|
* box.
|
|
*/
|
|
|
|
#include <windows.h>
|
|
|
|
#include <assert.h>
|
|
#include <stdlib.h>
|
|
|
|
#include "putty.h"
|
|
#include "dialog.h"
|
|
#include "storage.h"
|
|
|
|
static void about_handler(union control *ctrl, void *dlg,
|
|
void *data, int event)
|
|
{
|
|
HWND *hwndp = (HWND *)ctrl->generic.context.p;
|
|
|
|
if (event == EVENT_ACTION) {
|
|
modal_about_box(*hwndp);
|
|
}
|
|
}
|
|
|
|
static void help_handler(union control *ctrl, void *dlg,
|
|
void *data, int event)
|
|
{
|
|
HWND *hwndp = (HWND *)ctrl->generic.context.p;
|
|
|
|
if (event == EVENT_ACTION) {
|
|
show_help(*hwndp);
|
|
}
|
|
}
|
|
|
|
void win_setup_config_box(struct controlbox *b, HWND *hwndp, int has_help,
|
|
int midsession)
|
|
{
|
|
struct controlset *s;
|
|
union control *c;
|
|
|
|
if (!midsession) {
|
|
/*
|
|
* Add the About and Help buttons to the standard panel.
|
|
*/
|
|
s = ctrl_getset(b, "", "", "");
|
|
c = ctrl_pushbutton(s, "About", 'a', HELPCTX(no_help),
|
|
about_handler, P(hwndp));
|
|
c->generic.column = 0;
|
|
if (has_help) {
|
|
c = ctrl_pushbutton(s, "Help", 'h', HELPCTX(no_help),
|
|
help_handler, P(hwndp));
|
|
c->generic.column = 1;
|
|
}
|
|
}
|
|
|
|
/*
|
|
* Full-screen mode is a Windows peculiarity; hence
|
|
* scrollbar_in_fullscreen is as well.
|
|
*/
|
|
s = ctrl_getset(b, "Window", "scrollback",
|
|
"Control the scrollback in the window");
|
|
ctrl_checkbox(s, "Display scrollbar in full screen mode", 'i',
|
|
HELPCTX(window_scrollback),
|
|
dlg_stdcheckbox_handler,
|
|
I(offsetof(Config,scrollbar_in_fullscreen)));
|
|
/*
|
|
* Really this wants to go just after `Display scrollbar'. See
|
|
* if we can find that control, and do some shuffling.
|
|
*/
|
|
{
|
|
int i;
|
|
for (i = 0; i < s->ncontrols; i++) {
|
|
c = s->ctrls[i];
|
|
if (c->generic.type == CTRL_CHECKBOX &&
|
|
c->generic.context.i == offsetof(Config,scrollbar)) {
|
|
/*
|
|
* Control i is the scrollbar checkbox.
|
|
* Control s->ncontrols-1 is the scrollbar-in-FS one.
|
|
*/
|
|
if (i < s->ncontrols-2) {
|
|
c = s->ctrls[s->ncontrols-1];
|
|
memmove(s->ctrls+i+2, s->ctrls+i+1,
|
|
(s->ncontrols-i-2)*sizeof(union control *));
|
|
s->ctrls[i+1] = c;
|
|
}
|
|
break;
|
|
}
|
|
}
|
|
}
|
|
|
|
/*
|
|
* Windows has the AltGr key, which has various Windows-
|
|
* specific options.
|
|
*/
|
|
s = ctrl_getset(b, "Terminal/Keyboard", "features",
|
|
"Enable extra keyboard features:");
|
|
ctrl_checkbox(s, "AltGr acts as Compose key", 't',
|
|
HELPCTX(keyboard_compose),
|
|
dlg_stdcheckbox_handler, I(offsetof(Config,compose_key)));
|
|
ctrl_checkbox(s, "Control-Alt is different from AltGr", 'd',
|
|
HELPCTX(keyboard_ctrlalt),
|
|
dlg_stdcheckbox_handler, I(offsetof(Config,ctrlaltkeys)));
|
|
|
|
/*
|
|
* Windows allows an arbitrary .WAV to be played as a bell. For
|
|
* this we must search the existing controlset for the
|
|
* radio-button set controlling the `beep' option, and add an
|
|
* extra button to it.
|
|
*
|
|
* Note that although this _looks_ like a hideous hack, it's
|
|
* actually all above board. The well-defined interface to the
|
|
* per-platform dialog box code is the _data structures_ `union
|
|
* control', `struct controlset' and so on; so code like this
|
|
* that reaches into those data structures and changes bits of
|
|
* them is perfectly legitimate and crosses no boundaries. All
|
|
* the ctrl_* routines that create most of the controls are
|
|
* convenient shortcuts provided on the cross-platform side of
|
|
* the interface, and template creation code is under no actual
|
|
* obligation to use them.
|
|
*/
|
|
s = ctrl_getset(b, "Terminal/Bell", "style", "Set the style of bell");
|
|
{
|
|
int i;
|
|
for (i = 0; i < s->ncontrols; i++) {
|
|
c = s->ctrls[i];
|
|
if (c->generic.type == CTRL_RADIO &&
|
|
c->generic.context.i == offsetof(Config, beep)) {
|
|
assert(c->generic.handler == dlg_stdradiobutton_handler);
|
|
c->radio.nbuttons++;
|
|
c->radio.buttons =
|
|
sresize(c->radio.buttons, c->radio.nbuttons, char *);
|
|
c->radio.buttons[c->radio.nbuttons-1] =
|
|
dupstr("Play a custom sound file");
|
|
c->radio.buttondata =
|
|
sresize(c->radio.buttondata, c->radio.nbuttons, intorptr);
|
|
c->radio.buttondata[c->radio.nbuttons-1] = I(BELL_WAVEFILE);
|
|
if (c->radio.shortcuts) {
|
|
c->radio.shortcuts =
|
|
sresize(c->radio.shortcuts, c->radio.nbuttons, char);
|
|
c->radio.shortcuts[c->radio.nbuttons-1] = NO_SHORTCUT;
|
|
}
|
|
break;
|
|
}
|
|
}
|
|
}
|
|
ctrl_filesel(s, "Custom sound file to play as a bell:", NO_SHORTCUT,
|
|
FILTER_WAVE_FILES, FALSE, "Select bell sound file",
|
|
HELPCTX(bell_style),
|
|
dlg_stdfilesel_handler, I(offsetof(Config, bell_wavefile)));
|
|
|
|
/*
|
|
* While we've got this box open, taskbar flashing on a bell is
|
|
* also Windows-specific.
|
|
*/
|
|
ctrl_radiobuttons(s, "Taskbar/caption indication on bell:", 'i', 3,
|
|
HELPCTX(bell_taskbar),
|
|
dlg_stdradiobutton_handler,
|
|
I(offsetof(Config, beep_ind)),
|
|
"Disabled", I(B_IND_DISABLED),
|
|
"Flashing", I(B_IND_FLASH),
|
|
"Steady", I(B_IND_STEADY), NULL);
|
|
|
|
/*
|
|
* The sunken-edge border is a Windows GUI feature.
|
|
*/
|
|
s = ctrl_getset(b, "Window/Appearance", "border",
|
|
"Adjust the window border");
|
|
ctrl_checkbox(s, "Sunken-edge border (slightly thicker)", 's',
|
|
HELPCTX(appearance_border),
|
|
dlg_stdcheckbox_handler, I(offsetof(Config,sunken_edge)));
|
|
|
|
/*
|
|
* Cyrillic Lock is a horrid misfeature even on Windows, and
|
|
* the least we can do is ensure it never makes it to any other
|
|
* platform (at least unless someone fixes it!).
|
|
*/
|
|
s = ctrl_getset(b, "Window/Translation", "input",
|
|
"Enable character set translation on input data");
|
|
ctrl_checkbox(s, "Caps Lock acts as Cyrillic switch", 's',
|
|
HELPCTX(translation_cyrillic),
|
|
dlg_stdcheckbox_handler,
|
|
I(offsetof(Config,xlat_capslockcyr)));
|
|
|
|
/*
|
|
* Windows has the weird OEM font mode, which gives us some
|
|
* additional options when working with line-drawing
|
|
* characters.
|
|
*/
|
|
s = ctrl_getset(b, "Window/Translation", "linedraw",
|
|
"Adjust how PuTTY displays line drawing characters");
|
|
{
|
|
int i;
|
|
for (i = 0; i < s->ncontrols; i++) {
|
|
c = s->ctrls[i];
|
|
if (c->generic.type == CTRL_RADIO &&
|
|
c->generic.context.i == offsetof(Config, vtmode)) {
|
|
assert(c->generic.handler == dlg_stdradiobutton_handler);
|
|
c->radio.nbuttons += 2;
|
|
c->radio.buttons =
|
|
sresize(c->radio.buttons, c->radio.nbuttons, char *);
|
|
c->radio.buttons[c->radio.nbuttons-2] =
|
|
dupstr("Use font in both ANSI and OEM modes");
|
|
c->radio.buttons[c->radio.nbuttons-1] =
|
|
dupstr("Use font in OEM mode only");
|
|
c->radio.buttondata =
|
|
sresize(c->radio.buttondata, c->radio.nbuttons, intorptr);
|
|
c->radio.buttondata[c->radio.nbuttons-2] = I(VT_OEMANSI);
|
|
c->radio.buttondata[c->radio.nbuttons-1] = I(VT_OEMONLY);
|
|
if (!c->radio.shortcuts) {
|
|
int j;
|
|
c->radio.shortcuts = snewn(c->radio.nbuttons, char);
|
|
for (j = 0; j < c->radio.nbuttons; j++)
|
|
c->radio.shortcuts[j] = NO_SHORTCUT;
|
|
} else {
|
|
c->radio.shortcuts = sresize(c->radio.shortcuts,
|
|
c->radio.nbuttons, char);
|
|
}
|
|
c->radio.shortcuts[c->radio.nbuttons-2] = 'b';
|
|
c->radio.shortcuts[c->radio.nbuttons-1] = 'e';
|
|
break;
|
|
}
|
|
}
|
|
}
|
|
|
|
/*
|
|
* RTF paste is Windows-specific.
|
|
*/
|
|
s = ctrl_getset(b, "Window/Selection", "trans",
|
|
"Translation of pasted characters");
|
|
ctrl_checkbox(s, "Paste to clipboard in RTF as well as plain text", 'f',
|
|
HELPCTX(selection_rtf),
|
|
dlg_stdcheckbox_handler, I(offsetof(Config,rtf_paste)));
|
|
|
|
/*
|
|
* Windows often has no middle button, so we supply a selection
|
|
* mode in which the more critical Paste action is available on
|
|
* the right button instead.
|
|
*/
|
|
s = ctrl_getset(b, "Window/Selection", "mouse",
|
|
"Control use of mouse");
|
|
ctrl_radiobuttons(s, "Action of mouse buttons:", NO_SHORTCUT, 1,
|
|
HELPCTX(selection_buttons),
|
|
dlg_stdradiobutton_handler,
|
|
I(offsetof(Config, mouse_is_xterm)),
|
|
"Windows (Right pastes, Middle extends)", 'w', I(0),
|
|
"xterm (Right extends, Middle pastes)", 'x', I(1), NULL);
|
|
/*
|
|
* This really ought to go at the _top_ of its box, not the
|
|
* bottom, so we'll just do some shuffling now we've set it
|
|
* up...
|
|
*/
|
|
c = s->ctrls[s->ncontrols-1]; /* this should be the new control */
|
|
memmove(s->ctrls+1, s->ctrls, (s->ncontrols-1)*sizeof(union control *));
|
|
s->ctrls[0] = c;
|
|
|
|
/*
|
|
* Logical palettes don't even make sense anywhere except Windows.
|
|
*/
|
|
s = ctrl_getset(b, "Window/Colours", "general",
|
|
"General options for colour usage");
|
|
ctrl_checkbox(s, "Attempt to use logical palettes", 'l',
|
|
HELPCTX(colours_logpal),
|
|
dlg_stdcheckbox_handler, I(offsetof(Config,try_palette)));
|
|
|
|
/*
|
|
* Resize-by-changing-font is a Windows insanity.
|
|
*/
|
|
s = ctrl_getset(b, "Window", "size", "Set the size of the window");
|
|
ctrl_radiobuttons(s, "When window is resized:", 'z', 1,
|
|
HELPCTX(window_resize),
|
|
dlg_stdradiobutton_handler,
|
|
I(offsetof(Config, resize_action)),
|
|
"Change the number of rows and columns", I(RESIZE_TERM),
|
|
"Change the size of the font", I(RESIZE_FONT),
|
|
"Change font size only when maximised", I(RESIZE_EITHER),
|
|
"Forbid resizing completely", I(RESIZE_DISABLED), NULL);
|
|
|
|
/*
|
|
* Most of the Window/Behaviour stuff is there to mimic Windows
|
|
* conventions which PuTTY can optionally disregard. Hence,
|
|
* most of these options are Windows-specific.
|
|
*/
|
|
s = ctrl_getset(b, "Window/Behaviour", "main", NULL);
|
|
ctrl_checkbox(s, "Window closes on ALT-F4", '4',
|
|
HELPCTX(behaviour_altf4),
|
|
dlg_stdcheckbox_handler, I(offsetof(Config,alt_f4)));
|
|
ctrl_checkbox(s, "System menu appears on ALT-Space", 'y',
|
|
HELPCTX(behaviour_altspace),
|
|
dlg_stdcheckbox_handler, I(offsetof(Config,alt_space)));
|
|
ctrl_checkbox(s, "System menu appears on ALT alone", 'l',
|
|
HELPCTX(behaviour_altonly),
|
|
dlg_stdcheckbox_handler, I(offsetof(Config,alt_only)));
|
|
ctrl_checkbox(s, "Ensure window is always on top", 'e',
|
|
HELPCTX(behaviour_alwaysontop),
|
|
dlg_stdcheckbox_handler, I(offsetof(Config,alwaysontop)));
|
|
ctrl_checkbox(s, "Full screen on Alt-Enter", 'f',
|
|
HELPCTX(behaviour_altenter),
|
|
dlg_stdcheckbox_handler,
|
|
I(offsetof(Config,fullscreenonaltenter)));
|
|
}
|