projects / u / mdw / putty / blob
? search:
summary | shortlog | log | commit | commitdiff | tree
blame | history | raw | HEAD
Add a parameter to write_clip() so that windlg.c need not call term_deselect
[u/mdw/putty] / windlg.c
1 #include <windows.h>
2 #include <commctrl.h>
3 #include <commdlg.h>
4 #ifndef AUTO_WINSOCK
5 #ifdef WINSOCK_TWO
6 #include <winsock2.h>
7 #else
8 #include <winsock.h>
9 #endif
10 #endif
11 #include <stdio.h>
12 #include <stdlib.h>
13
14 #include "ssh.h"
15 #include "putty.h"
16 #include "win_res.h"
17 #include "storage.h"
18
19 #define NPANELS 9
20 #define MAIN_NPANELS 9
21 #define RECONF_NPANELS 6
22
23 static char **events = NULL;
24 static int nevents = 0, negsize = 0;
25
26 static HWND logbox = NULL, abtbox = NULL;
27
28 static void gpps(void *handle, char *name, char *def, char *val, int len) {
29 if (!read_setting_s(handle, name, val, len)) {
30 strncpy(val, def, len);
31 val[len-1] = '\0';
32 }
33 }
34
35 static void gppi(void *handle, char *name, int def, int *i) {
36 *i = read_setting_i(handle, name, def);
37 }
38
39 static HINSTANCE hinst;
40
41 static int readytogo;
42
43 static void save_settings (char *section, int do_host) {
44 int i;
45 char *p;
46 void *sesskey;
47
48 sesskey = open_settings_w(section);
49 if (!sesskey)
50 return;
51
52 write_setting_i (sesskey, "Present", 1);
53 if (do_host) {
54 write_setting_s (sesskey, "HostName", cfg.host);
55 write_setting_i (sesskey, "PortNumber", cfg.port);
56 p = "raw";
57 for (i = 0; backends[i].name != NULL; i++)
58 if (backends[i].protocol == cfg.protocol) {
59 p = backends[i].name;
60 break;
61 }
62 write_setting_s (sesskey, "Protocol", p);
63 }
64 write_setting_i (sesskey, "CloseOnExit", !!cfg.close_on_exit);
65 write_setting_i (sesskey, "WarnOnClose", !!cfg.warn_on_close);
66 write_setting_s (sesskey, "TerminalType", cfg.termtype);
67 write_setting_s (sesskey, "TerminalSpeed", cfg.termspeed);
68 {
69 char buf[2*sizeof(cfg.environmt)], *p, *q;
70 p = buf;
71 q = cfg.environmt;
72 while (*q) {
73 while (*q) {
74 int c = *q++;
75 if (c == '=' || c == ',' || c == '\\')
76 *p++ = '\\';
77 if (c == '\t')
78 c = '=';
79 *p++ = c;
80 }
81 *p++ = ',';
82 q++;
83 }
84 *p = '\0';
85 write_setting_s (sesskey, "Environment", buf);
86 }
87 write_setting_s (sesskey, "UserName", cfg.username);
88 write_setting_i (sesskey, "NoPTY", cfg.nopty);
89 write_setting_i (sesskey, "AgentFwd", cfg.agentfwd);
90 write_setting_s (sesskey, "RemoteCmd", cfg.remote_cmd);
91 write_setting_s (sesskey, "Cipher", cfg.cipher == CIPHER_BLOWFISH ? "blowfish" :
92 cfg.cipher == CIPHER_DES ? "des" : "3des");
93 write_setting_i (sesskey, "AuthTIS", cfg.try_tis_auth);
94 write_setting_i (sesskey, "SshProt", cfg.sshprot);
95 write_setting_s (sesskey, "PublicKeyFile", cfg.keyfile);
96 write_setting_s (sesskey, "RemoteCommand", cfg.remote_cmd);
97 write_setting_i (sesskey, "RFCEnviron", cfg.rfc_environ);
98 write_setting_i (sesskey, "BackspaceIsDelete", cfg.bksp_is_delete);
99 write_setting_i (sesskey, "RXVTHomeEnd", cfg.rxvt_homeend);
100 write_setting_i (sesskey, "LinuxFunctionKeys", cfg.funky_type);
101 write_setting_i (sesskey, "ApplicationCursorKeys", cfg.app_cursor);
102 write_setting_i (sesskey, "ApplicationKeypad", cfg.app_keypad);
103 write_setting_i (sesskey, "NetHackKeypad", cfg.nethack_keypad);
104 write_setting_i (sesskey, "AltF4", cfg.alt_f4);
105 write_setting_i (sesskey, "AltSpace", cfg.alt_space);
106 write_setting_i (sesskey, "LdiscTerm", cfg.ldisc_term);
107 write_setting_i (sesskey, "BlinkCur", cfg.blink_cur);
108 write_setting_i (sesskey, "Beep", cfg.beep);
109 write_setting_i (sesskey, "ScrollbackLines", cfg.savelines);
110 write_setting_i (sesskey, "DECOriginMode", cfg.dec_om);
111 write_setting_i (sesskey, "AutoWrapMode", cfg.wrap_mode);
112 write_setting_i (sesskey, "LFImpliesCR", cfg.lfhascr);
113 write_setting_i (sesskey, "WinNameAlways", cfg.win_name_always);
114 write_setting_s (sesskey, "WinTitle", cfg.wintitle);
115 write_setting_i (sesskey, "TermWidth", cfg.width);
116 write_setting_i (sesskey, "TermHeight", cfg.height);
117 write_setting_s (sesskey, "Font", cfg.font);
118 write_setting_i (sesskey, "FontIsBold", cfg.fontisbold);
119 write_setting_i (sesskey, "FontCharSet", cfg.fontcharset);
120 write_setting_i (sesskey, "FontHeight", cfg.fontheight);
121 write_setting_i (sesskey, "FontVTMode", cfg.vtmode);
122 write_setting_i (sesskey, "TryPalette", cfg.try_palette);
123 write_setting_i (sesskey, "BoldAsColour", cfg.bold_colour);
124 for (i=0; i<22; i++) {
125 char buf[20], buf2[30];
126 sprintf(buf, "Colour%d", i);
127 sprintf(buf2, "%d,%d,%d", cfg.colours[i][0],
128 cfg.colours[i][1], cfg.colours[i][2]);
129 write_setting_s (sesskey, buf, buf2);
130 }
131 write_setting_i (sesskey, "MouseIsXterm", cfg.mouse_is_xterm);
132 for (i=0; i<256; i+=32) {
133 char buf[20], buf2[256];
134 int j;
135 sprintf(buf, "Wordness%d", i);
136 *buf2 = '\0';
137 for (j=i; j<i+32; j++) {
138 sprintf(buf2+strlen(buf2), "%s%d",
139 (*buf2 ? "," : ""), cfg.wordness[j]);
140 }
141 write_setting_s (sesskey, buf, buf2);
142 }
143 write_setting_i (sesskey, "KoiWinXlat", cfg.xlat_enablekoiwin);
144 write_setting_i (sesskey, "88592Xlat", cfg.xlat_88592w1250);
145 write_setting_i (sesskey, "CapsLockCyr", cfg.xlat_capslockcyr);
146 write_setting_i (sesskey, "ScrollBar", cfg.scrollbar);
147 write_setting_i (sesskey, "ScrollOnKey", cfg.scroll_on_key);
148 write_setting_i (sesskey, "LockSize", cfg.locksize);
149 write_setting_i (sesskey, "BCE", cfg.bce);
150 write_setting_i (sesskey, "BlinkText", cfg.blinktext);
151
152 close_settings_w(sesskey);
153 }
154
155 static void load_settings (char *section, int do_host) {
156 int i;
157 char prot[10];
158 void *sesskey;
159
160 sesskey = open_settings_r(section);
161
162 gpps (sesskey, "HostName", "", cfg.host, sizeof(cfg.host));
163 gppi (sesskey, "PortNumber", default_port, &cfg.port);
164
165 gpps (sesskey, "Protocol", "default", prot, 10);
166 cfg.protocol = default_protocol;
167 for (i = 0; backends[i].name != NULL; i++)
168 if (!strcmp(prot, backends[i].name)) {
169 cfg.protocol = backends[i].protocol;
170 break;
171 }
172
173 gppi (sesskey, "CloseOnExit", 1, &cfg.close_on_exit);
174 gppi (sesskey, "WarnOnClose", 1, &cfg.warn_on_close);
175 gpps (sesskey, "TerminalType", "xterm", cfg.termtype,
176 sizeof(cfg.termtype));
177 gpps (sesskey, "TerminalSpeed", "38400,38400", cfg.termspeed,
178 sizeof(cfg.termspeed));
179 {
180 char buf[2*sizeof(cfg.environmt)], *p, *q;
181 gpps (sesskey, "Environment", "", buf, sizeof(buf));
182 p = buf;
183 q = cfg.environmt;
184 while (*p) {
185 while (*p && *p != ',') {
186 int c = *p++;
187 if (c == '=')
188 c = '\t';
189 if (c == '\\')
190 c = *p++;
191 *q++ = c;
192 }
193 if (*p == ',') p++;
194 *q++ = '\0';
195 }
196 *q = '\0';
197 }
198 gpps (sesskey, "UserName", "", cfg.username, sizeof(cfg.username));
199 gppi (sesskey, "NoPTY", 0, &cfg.nopty);
200 gppi (sesskey, "AgentFwd", 0, &cfg.agentfwd);
201 gpps (sesskey, "RemoteCmd", "", cfg.remote_cmd, sizeof(cfg.remote_cmd));
202 {
203 char cipher[10];
204 gpps (sesskey, "Cipher", "3des", cipher, 10);
205 if (!strcmp(cipher, "blowfish"))
206 cfg.cipher = CIPHER_BLOWFISH;
207 else if (!strcmp(cipher, "des"))
208 cfg.cipher = CIPHER_DES;
209 else
210 cfg.cipher = CIPHER_3DES;
211 }
212 gppi (sesskey, "SshProt", 1, &cfg.sshprot);
213 gppi (sesskey, "AuthTIS", 0, &cfg.try_tis_auth);
214 gpps (sesskey, "PublicKeyFile", "", cfg.keyfile, sizeof(cfg.keyfile));
215 gpps (sesskey, "RemoteCommand", "", cfg.remote_cmd,
216 sizeof(cfg.remote_cmd));
217 gppi (sesskey, "RFCEnviron", 0, &cfg.rfc_environ);
218 gppi (sesskey, "BackspaceIsDelete", 1, &cfg.bksp_is_delete);
219 gppi (sesskey, "RXVTHomeEnd", 0, &cfg.rxvt_homeend);
220 gppi (sesskey, "LinuxFunctionKeys", 0, &cfg.funky_type);
221 gppi (sesskey, "ApplicationCursorKeys", 0, &cfg.app_cursor);
222 gppi (sesskey, "ApplicationKeypad", 0, &cfg.app_keypad);
223 gppi (sesskey, "NetHackKeypad", 0, &cfg.nethack_keypad);
224 gppi (sesskey, "AltF4", 1, &cfg.alt_f4);
225 gppi (sesskey, "AltSpace", 0, &cfg.alt_space);
226 gppi (sesskey, "LdiscTerm", 0, &cfg.ldisc_term);
227 gppi (sesskey, "BlinkCur", 0, &cfg.blink_cur);
228 gppi (sesskey, "Beep", 1, &cfg.beep);
229 gppi (sesskey, "ScrollbackLines", 200, &cfg.savelines);
230 gppi (sesskey, "DECOriginMode", 0, &cfg.dec_om);
231 gppi (sesskey, "AutoWrapMode", 1, &cfg.wrap_mode);
232 gppi (sesskey, "LFImpliesCR", 0, &cfg.lfhascr);
233 gppi (sesskey, "WinNameAlways", 0, &cfg.win_name_always);
234 gpps (sesskey, "WinTitle", "", cfg.wintitle, sizeof(cfg.wintitle));
235 gppi (sesskey, "TermWidth", 80, &cfg.width);
236 gppi (sesskey, "TermHeight", 24, &cfg.height);
237 gpps (sesskey, "Font", "Courier", cfg.font, sizeof(cfg.font));
238 gppi (sesskey, "FontIsBold", 0, &cfg.fontisbold);
239 gppi (sesskey, "FontCharSet", ANSI_CHARSET, &cfg.fontcharset);
240 gppi (sesskey, "FontHeight", 10, &cfg.fontheight);
241 gppi (sesskey, "FontVTMode", VT_OEMANSI, (int *)&cfg.vtmode);
242 gppi (sesskey, "TryPalette", 0, &cfg.try_palette);
243 gppi (sesskey, "BoldAsColour", 1, &cfg.bold_colour);
244 for (i=0; i<22; i++) {
245 static char *defaults[] = {
246 "187,187,187", "255,255,255", "0,0,0", "85,85,85", "0,0,0",
247 "0,255,0", "0,0,0", "85,85,85", "187,0,0", "255,85,85",
248 "0,187,0", "85,255,85", "187,187,0", "255,255,85", "0,0,187",
249 "85,85,255", "187,0,187", "255,85,255", "0,187,187",
250 "85,255,255", "187,187,187", "255,255,255"
251 };
252 char buf[20], buf2[30];
253 int c0, c1, c2;
254 sprintf(buf, "Colour%d", i);
255 gpps (sesskey, buf, defaults[i], buf2, sizeof(buf2));
256 if(sscanf(buf2, "%d,%d,%d", &c0, &c1, &c2) == 3) {
257 cfg.colours[i][0] = c0;
258 cfg.colours[i][1] = c1;
259 cfg.colours[i][2] = c2;
260 }
261 }
262 gppi (sesskey, "MouseIsXterm", 0, &cfg.mouse_is_xterm);
263 for (i=0; i<256; i+=32) {
264 static char *defaults[] = {
265 "0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0",
266 "0,1,2,1,1,1,1,1,1,1,1,1,1,2,2,2,2,2,2,2,2,2,2,2,2,2,1,1,1,1,1,1",
267 "1,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,1,1,1,1,2",
268 "1,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,1,1,1,1,1",
269 "1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1",
270 "1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1",
271 "2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,1,2,2,2,2,2,2,2,2",
272 "2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,1,2,2,2,2,2,2,2,2"
273 };
274 char buf[20], buf2[256], *p;
275 int j;
276 sprintf(buf, "Wordness%d", i);
277 gpps (sesskey, buf, defaults[i/32], buf2, sizeof(buf2));
278 p = buf2;
279 for (j=i; j<i+32; j++) {
280 char *q = p;
281 while (*p && *p != ',') p++;
282 if (*p == ',') *p++ = '\0';
283 cfg.wordness[j] = atoi(q);
284 }
285 }
286 gppi (sesskey, "KoiWinXlat", 0, &cfg.xlat_enablekoiwin);
287 gppi (sesskey, "88592Xlat", 0, &cfg.xlat_88592w1250);
288 gppi (sesskey, "CapsLockCyr", 0, &cfg.xlat_capslockcyr);
289 gppi (sesskey, "ScrollBar", 1, &cfg.scrollbar);
290 gppi (sesskey, "ScrollOnKey", 0, &cfg.scroll_on_key);
291 gppi (sesskey, "LockSize", 0, &cfg.locksize);
292 gppi (sesskey, "BCE", 0, &cfg.bce);
293 gppi (sesskey, "BlinkText", 0, &cfg.blinktext);
294
295 close_settings_r(sesskey);
296 }
297
298 static void force_normal(HWND hwnd)
299 {
300 static int recurse = 0;
301
302 WINDOWPLACEMENT wp;
303
304 if(recurse) return;
305 recurse = 1;
306
307 wp.length = sizeof(wp);
308 if (GetWindowPlacement(hwnd, &wp))
309 {
310 wp.showCmd = SW_SHOWNORMAL;
311 SetWindowPlacement(hwnd, &wp);
312 }
313 recurse = 0;
314 }
315
316 static void MyGetDlgItemInt (HWND hwnd, int id, int *result) {
317 BOOL ok;
318 int n;
319 n = GetDlgItemInt (hwnd, id, &ok, FALSE);
320 if (ok)
321 *result = n;
322 }
323
324 static int CALLBACK LogProc (HWND hwnd, UINT msg,
325 WPARAM wParam, LPARAM lParam) {
326 int i;
327
328 switch (msg) {
329 case WM_INITDIALOG:
330 for (i=0; i<nevents; i++)
331 SendDlgItemMessage (hwnd, IDN_LIST, LB_ADDSTRING,
332 0, (LPARAM)events[i]);
333 return 1;
334 case WM_COMMAND:
335 switch (LOWORD(wParam)) {
336 case IDOK:
337 logbox = NULL;
338 DestroyWindow (hwnd);
339 return 0;
340 case IDN_COPY:
341 if (HIWORD(wParam) == BN_CLICKED ||
342 HIWORD(wParam) == BN_DOUBLECLICKED) {
343 int selcount;
344 int *selitems;
345 selcount = SendDlgItemMessage(hwnd, IDN_LIST,
346 LB_GETSELCOUNT, 0, 0);
347 selitems = malloc(selcount * sizeof(int));
348 if (selitems) {
349 int count = SendDlgItemMessage(hwnd, IDN_LIST,
350 LB_GETSELITEMS,
351 selcount, (LPARAM)selitems);
352 int i;
353 int size;
354 char *clipdata;
355 static unsigned char sel_nl[] = SEL_NL;
356
357 if (count == 0) { /* can't copy zero stuff */
358 MessageBeep(0);
359 break;
360 }
361
362 size = 0;
363 for (i = 0; i < count; i++)
364 size += strlen(events[selitems[i]]) + sizeof(sel_nl);
365
366 clipdata = malloc(size);
367 if (clipdata) {
368 char *p = clipdata;
369 for (i = 0; i < count; i++) {
370 char *q = events[selitems[i]];
371 int qlen = strlen(q);
372 memcpy(p, q, qlen);
373 p += qlen;
374 memcpy(p, sel_nl, sizeof(sel_nl));
375 p += sizeof(sel_nl);
376 }
377 write_clip(clipdata, size, TRUE);
378 free(clipdata);
379 }
380 free(selitems);
381
382 for (i = 0; i < nevents; i++)
383 SendDlgItemMessage(hwnd, IDN_LIST, LB_SETSEL,
384 FALSE, i);
385 }
386 }
387 return 0;
388 }
389 return 0;
390 case WM_CLOSE:
391 logbox = NULL;
392 DestroyWindow (hwnd);
393 return 0;
394 }
395 return 0;
396 }
397
398 static int CALLBACK LicenceProc (HWND hwnd, UINT msg,
399 WPARAM wParam, LPARAM lParam) {
400 switch (msg) {
401 case WM_INITDIALOG:
402 return 1;
403 case WM_COMMAND:
404 switch (LOWORD(wParam)) {
405 case IDOK:
406 EndDialog(hwnd, 1);
407 return 0;
408 }
409 return 0;
410 case WM_CLOSE:
411 EndDialog(hwnd, 1);
412 return 0;
413 }
414 return 0;
415 }
416
417 static int CALLBACK AboutProc (HWND hwnd, UINT msg,
418 WPARAM wParam, LPARAM lParam) {
419 switch (msg) {
420 case WM_INITDIALOG:
421 SetDlgItemText (hwnd, IDA_VERSION, ver);
422 return 1;
423 case WM_COMMAND:
424 switch (LOWORD(wParam)) {
425 case IDOK:
426 abtbox = NULL;
427 DestroyWindow (hwnd);
428 return 0;
429 case IDA_LICENCE:
430 EnableWindow(hwnd, 0);
431 DialogBox (hinst, MAKEINTRESOURCE(IDD_LICENCEBOX),
432 NULL, LicenceProc);
433 EnableWindow(hwnd, 1);
434 SetActiveWindow(hwnd);
435 return 0;
436 }
437 return 0;
438 case WM_CLOSE:
439 abtbox = NULL;
440 DestroyWindow (hwnd);
441 return 0;
442 }
443 return 0;
444 }
445
446 /* ----------------------------------------------------------------------
447 * Routines to self-manage the controls in a dialog box.
448 */
449
450 #define GAPBETWEEN 3
451 #define GAPWITHIN 1
452 #define DLGWIDTH 168
453 #define STATICHEIGHT 8
454 #define CHECKBOXHEIGHT 8
455 #define RADIOHEIGHT 8
456 #define EDITHEIGHT 12
457 #define COMBOHEIGHT 12
458 #define PUSHBTNHEIGHT 14
459
460 struct ctlpos {
461 HWND hwnd;
462 LONG units;
463 WPARAM font;
464 int ypos, width;
465 };
466
467 /* Used on self-constructed dialogs. */
468 static void ctlposinit(struct ctlpos *cp, HWND hwnd) {
469 RECT r;
470 cp->hwnd = hwnd;
471 cp->units = GetWindowLong(hwnd, GWL_USERDATA);
472 cp->font = GetWindowLong(hwnd, DWL_USER);
473 cp->ypos = GAPBETWEEN;
474 GetClientRect(hwnd, &r);
475 cp->width = (r.right * 4) / (cp->units & 0xFFFF) - 2*GAPBETWEEN;
476 }
477
478 /* Used on kosher dialogs. */
479 static void ctlposinit2(struct ctlpos *cp, HWND hwnd) {
480 RECT r;
481 cp->hwnd = hwnd;
482 r.left = r.top = 0;
483 r.right = 4;
484 r.bottom = 8;
485 MapDialogRect(hwnd, &r);
486 cp->units = (r.bottom << 16) | r.right;
487 cp->font = SendMessage(hwnd, WM_GETFONT, 0, 0);
488 cp->ypos = GAPBETWEEN;
489 GetClientRect(hwnd, &r);
490 cp->width = (r.right * 4) / (cp->units & 0xFFFF) - 2*GAPBETWEEN;
491 }
492
493 static void doctl(struct ctlpos *cp, RECT r,
494 char *wclass, int wstyle, int exstyle,
495 char *wtext, int wid) {
496 HWND ctl;
497 /*
498 * Note nonstandard use of RECT. This is deliberate: by
499 * transforming the width and height directly we arrange to
500 * have all supposedly same-sized controls really same-sized.
501 */
502
503 /* MapDialogRect, or its near equivalent. */
504 r.left = (r.left * (cp->units & 0xFFFF)) / 4;
505 r.right = (r.right * (cp->units & 0xFFFF)) / 4;
506 r.top = (r.top * ((cp->units>>16) & 0xFFFF)) / 8;
507 r.bottom = (r.bottom * ((cp->units>>16) & 0xFFFF)) / 8;
508
509 ctl = CreateWindowEx(exstyle, wclass, wtext, wstyle,
510 r.left, r.top, r.right, r.bottom,
511 cp->hwnd, (HMENU)wid, hinst, NULL);
512 SendMessage(ctl, WM_SETFONT, cp->font, MAKELPARAM(TRUE, 0));
513 }
514
515 /*
516 * Some edit boxes. Each one has a static above it. The percentages
517 * of the horizontal space are provided.
518 */
519 static void multiedit(struct ctlpos *cp, ...) {
520 RECT r;
521 va_list ap;
522 int percent, xpos;
523
524 percent = xpos = 0;
525 va_start(ap, cp);
526 while (1) {
527 char *text;
528 int staticid, editid, pcwidth;
529 text = va_arg(ap, char *);
530 if (!text)
531 break;
532 staticid = va_arg(ap, int);
533 editid = va_arg(ap, int);
534 pcwidth = va_arg(ap, int);
535
536 r.left = xpos + GAPBETWEEN;
537 percent += pcwidth;
538 xpos = (cp->width + GAPBETWEEN) * percent / 100;
539 r.right = xpos - r.left;
540
541 r.top = cp->ypos; r.bottom = STATICHEIGHT;
542 doctl(cp, r, "STATIC", WS_CHILD | WS_VISIBLE, 0,
543 text, staticid);
544 r.top = cp->ypos + 8 + GAPWITHIN; r.bottom = EDITHEIGHT;
545 doctl(cp, r, "EDIT",
546 WS_CHILD | WS_VISIBLE | WS_TABSTOP | ES_AUTOHSCROLL,
547 WS_EX_CLIENTEDGE,
548 "", editid);
549 }
550 va_end(ap);
551 cp->ypos += 8+GAPWITHIN+12+GAPBETWEEN;
552 }
553
554 /*
555 * A set of radio buttons on the same line, with a static above
556 * them. `nacross' dictates how many parts the line is divided into
557 * (you might want this not to equal the number of buttons if you
558 * needed to line up some 2s and some 3s to look good in the same
559 * panel).
560 */
561 static void radioline(struct ctlpos *cp,
562 char *text, int id, int nacross, ...) {
563 RECT r;
564 va_list ap;
565 int group;
566 int i;
567
568 r.left = GAPBETWEEN; r.top = cp->ypos;
569 r.right = cp->width; r.bottom = STATICHEIGHT;
570 cp->ypos += r.bottom + GAPWITHIN;
571 doctl(cp, r, "STATIC", WS_CHILD | WS_VISIBLE, 0, text, id);
572 va_start(ap, nacross);
573 group = WS_GROUP;
574 i = 0;
575 while (1) {
576 char *btext;
577 int bid;
578 btext = va_arg(ap, char *);
579 if (!btext)
580 break;
581 bid = va_arg(ap, int);
582 r.left = GAPBETWEEN + i * (cp->width+GAPBETWEEN)/nacross;
583 r.right = (i+1) * (cp->width+GAPBETWEEN)/nacross - r.left;
584 r.top = cp->ypos; r.bottom = RADIOHEIGHT;
585 doctl(cp, r, "BUTTON",
586 BS_AUTORADIOBUTTON | WS_CHILD | WS_VISIBLE | WS_TABSTOP | group,
587 0,
588 btext, bid);
589 group = 0;
590 i++;
591 }
592 va_end(ap);
593 cp->ypos += r.bottom + GAPBETWEEN;
594 }
595
596 /*
597 * A set of radio buttons on multiple lines, with a static above
598 * them.
599 */
600 static void radiobig(struct ctlpos *cp, char *text, int id, ...) {
601 RECT r;
602 va_list ap;
603 int group;
604
605 r.left = GAPBETWEEN; r.top = cp->ypos;
606 r.right = cp->width; r.bottom = STATICHEIGHT;
607 cp->ypos += r.bottom + GAPWITHIN;
608 doctl(cp, r, "STATIC", WS_CHILD | WS_VISIBLE, 0, text, id);
609 va_start(ap, id);
610 group = WS_GROUP;
611 while (1) {
612 char *btext;
613 int bid;
614 btext = va_arg(ap, char *);
615 if (!btext)
616 break;
617 bid = va_arg(ap, int);
618 r.left = GAPBETWEEN; r.top = cp->ypos;
619 r.right = cp->width; r.bottom = STATICHEIGHT;
620 cp->ypos += r.bottom + GAPWITHIN;
621 doctl(cp, r, "BUTTON",
622 BS_AUTORADIOBUTTON | WS_CHILD | WS_VISIBLE | WS_TABSTOP | group,
623 0,
624 btext, bid);
625 group = 0;
626 }
627 va_end(ap);
628 cp->ypos += GAPBETWEEN - GAPWITHIN;
629 }
630
631 /*
632 * A single standalone checkbox.
633 */
634 static void checkbox(struct ctlpos *cp, char *text, int id) {
635 RECT r;
636
637 r.left = GAPBETWEEN; r.top = cp->ypos;
638 r.right = cp->width; r.bottom = CHECKBOXHEIGHT;
639 cp->ypos += r.bottom + GAPBETWEEN;
640 doctl(cp, r, "BUTTON",
641 BS_AUTOCHECKBOX | WS_CHILD | WS_VISIBLE | WS_TABSTOP, 0,
642 text, id);
643 }
644
645 /*
646 * A button on the right hand side, with a static to its left.
647 */
648 static void staticbtn(struct ctlpos *cp, char *stext, int sid,
649 char *btext, int bid) {
650 const int height = (PUSHBTNHEIGHT > STATICHEIGHT ?
651 PUSHBTNHEIGHT : STATICHEIGHT);
652 RECT r;
653 int lwid, rwid, rpos;
654
655 rpos = GAPBETWEEN + 3 * (cp->width + GAPBETWEEN) / 4;
656 lwid = rpos - 2*GAPBETWEEN;
657 rwid = cp->width + GAPBETWEEN - rpos;
658
659 r.left = GAPBETWEEN; r.top = cp->ypos + (height-STATICHEIGHT)/2;
660 r.right = lwid; r.bottom = STATICHEIGHT;
661 doctl(cp, r, "STATIC", WS_CHILD | WS_VISIBLE, 0, stext, sid);
662
663 r.left = rpos; r.top = cp->ypos + (height-PUSHBTNHEIGHT)/2;
664 r.right = rwid; r.bottom = PUSHBTNHEIGHT;
665 doctl(cp, r, "BUTTON",
666 WS_CHILD | WS_VISIBLE | WS_TABSTOP | BS_PUSHBUTTON,
667 0,
668 btext, bid);
669
670 cp->ypos += height + GAPBETWEEN;
671 }
672
673 /*
674 * An edit control on the right hand side, with a static to its left.
675 */
676 static void staticedit(struct ctlpos *cp, char *stext, int sid, int eid) {
677 const int height = (EDITHEIGHT > STATICHEIGHT ?
678 EDITHEIGHT : STATICHEIGHT);
679 RECT r;
680 int lwid, rwid, rpos;
681
682 rpos = GAPBETWEEN + (cp->width + GAPBETWEEN) / 2;
683 lwid = rpos - 2*GAPBETWEEN;
684 rwid = cp->width + GAPBETWEEN - rpos;
685
686 r.left = GAPBETWEEN; r.top = cp->ypos + (height-STATICHEIGHT)/2;
687 r.right = lwid; r.bottom = STATICHEIGHT;
688 doctl(cp, r, "STATIC", WS_CHILD | WS_VISIBLE, 0, stext, sid);
689
690 r.left = rpos; r.top = cp->ypos + (height-EDITHEIGHT)/2;
691 r.right = rwid; r.bottom = EDITHEIGHT;
692 doctl(cp, r, "EDIT",
693 WS_CHILD | WS_VISIBLE | WS_TABSTOP | ES_AUTOHSCROLL,
694 WS_EX_CLIENTEDGE,
695 "", eid);
696
697 cp->ypos += height + GAPBETWEEN;
698 }
699
700 /*
701 * A tab-control substitute when a real tab control is unavailable.
702 */
703 static void ersatztab(struct ctlpos *cp, char *stext, int sid,
704 int lid, int s2id) {
705 const int height = (COMBOHEIGHT > STATICHEIGHT ?
706 COMBOHEIGHT : STATICHEIGHT);
707 RECT r;
708 int bigwid, lwid, rwid, rpos;
709 static const int BIGGAP = 15;
710 static const int MEDGAP = 3;
711
712 bigwid = cp->width + 2*GAPBETWEEN - 2*BIGGAP;
713 cp->ypos += MEDGAP;
714 rpos = BIGGAP + (bigwid + BIGGAP) / 2;
715 lwid = rpos - 2*BIGGAP;
716 rwid = bigwid + BIGGAP - rpos;
717
718 r.left = BIGGAP; r.top = cp->ypos + (height-STATICHEIGHT)/2;
719 r.right = lwid; r.bottom = STATICHEIGHT;
720 doctl(cp, r, "STATIC", WS_CHILD | WS_VISIBLE, 0, stext, sid);
721
722 r.left = rpos; r.top = cp->ypos + (height-COMBOHEIGHT)/2;
723 r.right = rwid; r.bottom = COMBOHEIGHT*10;
724 doctl(cp, r, "COMBOBOX",
725 WS_CHILD | WS_VISIBLE | WS_TABSTOP |
726 CBS_DROPDOWNLIST | CBS_HASSTRINGS,
727 WS_EX_CLIENTEDGE,
728 "", lid);
729
730 cp->ypos += height + MEDGAP + GAPBETWEEN;
731
732 r.left = GAPBETWEEN; r.top = cp->ypos;
733 r.right = cp->width; r.bottom = 2;
734 doctl(cp, r, "STATIC", WS_CHILD | WS_VISIBLE | SS_ETCHEDHORZ,
735 0, "", s2id);
736 }
737
738 /*
739 * A static line, followed by an edit control on the left hand side
740 * and a button on the right.
741 */
742 static void editbutton(struct ctlpos *cp, char *stext, int sid,
743 int eid, char *btext, int bid) {
744 const int height = (EDITHEIGHT > PUSHBTNHEIGHT ?
745 EDITHEIGHT : PUSHBTNHEIGHT);
746 RECT r;
747 int lwid, rwid, rpos;
748
749 r.left = GAPBETWEEN; r.top = cp->ypos;
750 r.right = cp->width; r.bottom = STATICHEIGHT;
751 cp->ypos += r.bottom + GAPWITHIN;
752 doctl(cp, r, "STATIC", WS_CHILD | WS_VISIBLE, 0, stext, sid);
753
754 rpos = GAPBETWEEN + 3 * (cp->width + GAPBETWEEN) / 4;
755 lwid = rpos - 2*GAPBETWEEN;
756 rwid = cp->width + GAPBETWEEN - rpos;
757
758 r.left = GAPBETWEEN; r.top = cp->ypos + (height-EDITHEIGHT)/2;
759 r.right = lwid; r.bottom = EDITHEIGHT;
760 doctl(cp, r, "EDIT",
761 WS_CHILD | WS_VISIBLE | WS_TABSTOP | ES_AUTOHSCROLL,
762 WS_EX_CLIENTEDGE,
763 "", eid);
764
765 r.left = rpos; r.top = cp->ypos + (height-PUSHBTNHEIGHT)/2;
766 r.right = rwid; r.bottom = PUSHBTNHEIGHT;
767 doctl(cp, r, "BUTTON",
768 WS_CHILD | WS_VISIBLE | WS_TABSTOP | BS_PUSHBUTTON,
769 0,
770 btext, bid);
771
772 cp->ypos += height + GAPBETWEEN;
773 }
774
775 /*
776 * Special control which was hard to describe generically: the
777 * session-saver assembly. A static; below that an edit box; below
778 * that a list box. To the right of the list box, a column of
779 * buttons.
780 */
781 static void sesssaver(struct ctlpos *cp, char *text,
782 int staticid, int editid, int listid, ...) {
783 RECT r;
784 va_list ap;
785 int lwid, rwid, rpos;
786 int y;
787 const int LISTDEFHEIGHT = 66;
788
789 rpos = GAPBETWEEN + 3 * (cp->width + GAPBETWEEN) / 4;
790 lwid = rpos - 2*GAPBETWEEN;
791 rwid = cp->width + GAPBETWEEN - rpos;
792
793 /* The static control. */
794 r.left = GAPBETWEEN; r.top = cp->ypos;
795 r.right = lwid; r.bottom = STATICHEIGHT;
796 cp->ypos += r.bottom + GAPWITHIN;
797 doctl(cp, r, "STATIC", WS_CHILD | WS_VISIBLE, 0, text, staticid);
798
799 /* The edit control. */
800 r.left = GAPBETWEEN; r.top = cp->ypos;
801 r.right = lwid; r.bottom = EDITHEIGHT;
802 cp->ypos += r.bottom + GAPWITHIN;
803 doctl(cp, r, "EDIT",
804 WS_CHILD | WS_VISIBLE | WS_TABSTOP | ES_AUTOHSCROLL,
805 WS_EX_CLIENTEDGE,
806 "", editid);
807
808 /*
809 * The buttons (we should hold off on the list box until we
810 * know how big the buttons are).
811 */
812 va_start(ap, listid);
813 y = cp->ypos;
814 while (1) {
815 char *btext = va_arg(ap, char *);
816 int bid;
817 if (!btext) break;
818 bid = va_arg(ap, int);
819 r.left = rpos; r.top = y;
820 r.right = rwid; r.bottom = PUSHBTNHEIGHT;
821 y += r.bottom + GAPWITHIN;
822 doctl(cp, r, "BUTTON",
823 WS_CHILD | WS_VISIBLE | WS_TABSTOP | BS_PUSHBUTTON,
824 0,
825 btext, bid);
826 }
827
828 /* Compute list box height. LISTDEFHEIGHT, or height of buttons. */
829 y -= cp->ypos;
830 y -= GAPWITHIN;
831 if (y < LISTDEFHEIGHT) y = LISTDEFHEIGHT;
832 r.left = GAPBETWEEN; r.top = cp->ypos;
833 r.right = lwid; r.bottom = y;
834 cp->ypos += y + GAPBETWEEN;
835 doctl(cp, r, "LISTBOX",
836 WS_CHILD | WS_VISIBLE | WS_TABSTOP | WS_VSCROLL |
837 LBS_STANDARD | LBS_HASSTRINGS,
838 WS_EX_CLIENTEDGE,
839 "", listid);
840 }
841
842 /*
843 * Another special control: the environment-variable setter. A
844 * static line first; then a pair of edit boxes with associated
845 * statics, and two buttons; then a list box.
846 */
847 static void envsetter(struct ctlpos *cp, char *stext, int sid,
848 char *e1stext, int e1sid, int e1id,
849 char *e2stext, int e2sid, int e2id,
850 int listid,
851 char *b1text, int b1id, char *b2text, int b2id) {
852 RECT r;
853 const int height = (STATICHEIGHT > EDITHEIGHT && STATICHEIGHT > PUSHBTNHEIGHT ?
854 STATICHEIGHT :
855 EDITHEIGHT > PUSHBTNHEIGHT ?
856 EDITHEIGHT : PUSHBTNHEIGHT);
857 const static int percents[] = { 20, 35, 10, 25 };
858 int i, j, xpos, percent;
859 const int LISTHEIGHT = 42;
860
861 /* The static control. */
862 r.left = GAPBETWEEN; r.top = cp->ypos;
863 r.right = cp->width; r.bottom = STATICHEIGHT;
864 cp->ypos += r.bottom + GAPWITHIN;
865 doctl(cp, r, "STATIC", WS_CHILD | WS_VISIBLE, 0, stext, sid);
866
867 /* The statics+edits+buttons. */
868 for (j = 0; j < 2; j++) {
869 percent = 10;
870 for (i = 0; i < 4; i++) {
871 xpos = (cp->width + GAPBETWEEN) * percent / 100;
872 r.left = xpos + GAPBETWEEN;
873 percent += percents[i];
874 xpos = (cp->width + GAPBETWEEN) * percent / 100;
875 r.right = xpos - r.left;
876 r.top = cp->ypos;
877 r.bottom = (i==0 ? STATICHEIGHT :
878 i==1 ? EDITHEIGHT :
879 PUSHBTNHEIGHT);
880 r.top += (height-r.bottom)/2;
881 if (i==0) {
882 doctl(cp, r, "STATIC", WS_CHILD | WS_VISIBLE, 0,
883 j==0 ? e1stext : e2stext, j==0 ? e1sid : e2sid);
884 } else if (i==1) {
885 doctl(cp, r, "EDIT",
886 WS_CHILD | WS_VISIBLE | WS_TABSTOP | ES_AUTOHSCROLL,
887 WS_EX_CLIENTEDGE,
888 "", j==0 ? e1id : e2id);
889 } else if (i==3) {
890 doctl(cp, r, "BUTTON",
891 WS_CHILD | WS_VISIBLE | WS_TABSTOP | BS_PUSHBUTTON,
892 0,
893 j==0 ? b1text : b2text, j==0 ? b1id : b2id);
894 }
895 }
896 cp->ypos += height + GAPWITHIN;
897 }
898
899 /* The list box. */
900 r.left = GAPBETWEEN; r.top = cp->ypos;
901 r.right = cp->width; r.bottom = LISTHEIGHT;
902 cp->ypos += r.bottom + GAPBETWEEN;
903 doctl(cp, r, "LISTBOX",
904 WS_CHILD | WS_VISIBLE | WS_TABSTOP | WS_VSCROLL | LBS_HASSTRINGS |
905 LBS_USETABSTOPS,
906 WS_EX_CLIENTEDGE,
907 "", listid);
908 }
909
910 /*
911 * Yet another special control: the character-class setter. A
912 * static, then a list, then a line containing a
913 * button-and-static-and-edit.
914 */
915 static void charclass(struct ctlpos *cp, char *stext, int sid, int listid,
916 char *btext, int bid, int eid, char *s2text, int s2id) {
917 RECT r;
918 const int height = (STATICHEIGHT > EDITHEIGHT && STATICHEIGHT > PUSHBTNHEIGHT ?
919 STATICHEIGHT :
920 EDITHEIGHT > PUSHBTNHEIGHT ?
921 EDITHEIGHT : PUSHBTNHEIGHT);
922 const static int percents[] = { 30, 40, 30 };
923 int i, xpos, percent;
924 const int LISTHEIGHT = 66;
925
926 /* The static control. */
927 r.left = GAPBETWEEN; r.top = cp->ypos;
928 r.right = cp->width; r.bottom = STATICHEIGHT;
929 cp->ypos += r.bottom + GAPWITHIN;
930 doctl(cp, r, "STATIC", WS_CHILD | WS_VISIBLE, 0, stext, sid);
931
932 /* The list box. */
933 r.left = GAPBETWEEN; r.top = cp->ypos;
934 r.right = cp->width; r.bottom = LISTHEIGHT;
935 cp->ypos += r.bottom + GAPWITHIN;
936 doctl(cp, r, "LISTBOX",
937 WS_CHILD | WS_VISIBLE | WS_TABSTOP | WS_VSCROLL | LBS_HASSTRINGS |
938 LBS_USETABSTOPS,
939 WS_EX_CLIENTEDGE,
940 "", listid);
941
942 /* The button+static+edit. */
943 percent = xpos = 0;
944 for (i = 0; i < 3; i++) {
945 r.left = xpos + GAPBETWEEN;
946 percent += percents[i];
947 xpos = (cp->width + GAPBETWEEN) * percent / 100;
948 r.right = xpos - r.left;
949 r.top = cp->ypos;
950 r.bottom = (i==0 ? PUSHBTNHEIGHT :
951 i==1 ? STATICHEIGHT :
952 EDITHEIGHT);
953 r.top += (height-r.bottom)/2;
954 if (i==0) {
955 doctl(cp, r, "BUTTON",
956 WS_CHILD | WS_VISIBLE | WS_TABSTOP | BS_PUSHBUTTON,
957 0, btext, bid);
958 } else if (i==1) {
959 doctl(cp, r, "STATIC", WS_CHILD | WS_VISIBLE | SS_CENTER,
960 0, s2text, s2id);
961 } else if (i==2) {
962 doctl(cp, r, "EDIT",
963 WS_CHILD | WS_VISIBLE | WS_TABSTOP | ES_AUTOHSCROLL,
964 WS_EX_CLIENTEDGE, "", eid);
965 }
966 }
967 cp->ypos += height + GAPBETWEEN;
968 }
969
970 /*
971 * A special control (horrors!). The colour editor. A static line;
972 * then on the left, a list box, and on the right, a sequence of
973 * two-part statics followed by a button.
974 */
975 static void colouredit(struct ctlpos *cp, char *stext, int sid, int listid,
976 char *btext, int bid, ...) {
977 RECT r;
978 int y;
979 va_list ap;
980 int lwid, rwid, rpos;
981 const int LISTHEIGHT = 66;
982
983 /* The static control. */
984 r.left = GAPBETWEEN; r.top = cp->ypos;
985 r.right = cp->width; r.bottom = STATICHEIGHT;
986 cp->ypos += r.bottom + GAPWITHIN;
987 doctl(cp, r, "STATIC", WS_CHILD | WS_VISIBLE, 0, stext, sid);
988
989 rpos = GAPBETWEEN + 2 * (cp->width + GAPBETWEEN) / 3;
990 lwid = rpos - 2*GAPBETWEEN;
991 rwid = cp->width + GAPBETWEEN - rpos;
992
993 /* The list box. */
994 r.left = GAPBETWEEN; r.top = cp->ypos;
995 r.right = lwid; r.bottom = LISTHEIGHT;
996 doctl(cp, r, "LISTBOX",
997 WS_CHILD | WS_VISIBLE | WS_TABSTOP | WS_VSCROLL | LBS_HASSTRINGS |
998 LBS_USETABSTOPS,
999 WS_EX_CLIENTEDGE,
1000 "", listid);
1001
1002 /* The statics. */
1003 y = cp->ypos;
1004 va_start(ap, bid);
1005 while (1) {
1006 char *ltext;
1007 int lid, rid;
1008 ltext = va_arg(ap, char *);
1009 if (!ltext) break;
1010 lid = va_arg(ap, int);
1011 rid = va_arg(ap, int);
1012 r.top = y; r.bottom = STATICHEIGHT;
1013 y += r.bottom + GAPWITHIN;
1014 r.left = rpos; r.right = rwid/2;
1015 doctl(cp, r, "STATIC", WS_CHILD | WS_VISIBLE, 0, ltext, lid);
1016 r.left = rpos + r.right; r.right = rwid - r.right;
1017 doctl(cp, r, "STATIC", WS_CHILD | WS_VISIBLE | SS_RIGHT, 0, "", rid);
1018 }
1019 va_end(ap);
1020
1021 /* The button. */
1022 r.top = y + 2*GAPWITHIN; r.bottom = PUSHBTNHEIGHT;
1023 r.left = rpos; r.right = rwid;
1024 doctl(cp, r, "BUTTON",
1025 WS_CHILD | WS_VISIBLE | WS_TABSTOP | BS_PUSHBUTTON,
1026 0, btext, bid);
1027
1028 cp->ypos += LISTHEIGHT + GAPBETWEEN;
1029 }
1030
1031 static int GeneralPanelProc (HWND hwnd, UINT msg,
1032 WPARAM wParam, LPARAM lParam) {
1033 switch (msg) {
1034 case WM_SETFONT:
1035 {
1036 HFONT hfont = (HFONT)wParam;
1037 HFONT oldfont;
1038 HDC hdc;
1039 TEXTMETRIC tm;
1040 LONG units;
1041
1042 hdc = GetDC(hwnd);
1043 oldfont = SelectObject(hdc, hfont);
1044 GetTextMetrics(hdc, &tm);
1045 units = (tm.tmHeight << 16) | tm.tmAveCharWidth;
1046 SelectObject(hdc, oldfont);
1047 DeleteDC(hdc);
1048 SetWindowLong(hwnd, GWL_USERDATA, units);
1049 SetWindowLong(hwnd, DWL_USER, wParam);
1050 }
1051 return 0;
1052 case WM_INITDIALOG:
1053 SetWindowPos (hwnd, HWND_TOP, 0, 0, 0, 0, SWP_NOMOVE | SWP_NOSIZE);
1054 return 1;
1055 case WM_CLOSE:
1056 DestroyWindow (hwnd);
1057 return 1;
1058 }
1059 return 0;
1060 }
1061
1062 static char savedsession[2048];
1063
1064 static int CALLBACK ConnectionProc (HWND hwnd, UINT msg,
1065 WPARAM wParam, LPARAM lParam) {
1066 int i;
1067 struct ctlpos cp;
1068 enum { controlstartvalue = 1000,
1069 IDC_HOSTSTATIC,
1070 IDC_HOST,
1071 IDC_PORTSTATIC,
1072 IDC_PORT,
1073 IDC_PROTSTATIC,
1074 IDC_PROTRAW,
1075 IDC_PROTTELNET,
1076 IDC_PROTSSH,
1077 IDC_SESSSTATIC,
1078 IDC_SESSEDIT,
1079 IDC_SESSLIST,
1080 IDC_SESSLOAD,
1081 IDC_SESSSAVE,
1082 IDC_SESSDEL,
1083 IDC_CLOSEEXIT,
1084 IDC_CLOSEWARN
1085 };
1086
1087 switch (msg) {
1088 case WM_INITDIALOG:
1089 /* Accelerators used: [aco] dehlnprstwx */
1090 ctlposinit(&cp, hwnd);
1091 multiedit(&cp,
1092 "Host &Name", IDC_HOSTSTATIC, IDC_HOST, 75,
1093 "&Port", IDC_PORTSTATIC, IDC_PORT, 25, NULL);
1094 radioline(&cp, "Protocol:", IDC_PROTSTATIC, 3,
1095 "&Raw", IDC_PROTRAW,
1096 "&Telnet", IDC_PROTTELNET,
1097 #ifdef FWHACK
1098 "SS&H/hack",
1099 #else
1100 "SS&H",
1101 #endif
1102 IDC_PROTSSH, NULL);
1103 sesssaver(&cp, "Stor&ed Sessions",
1104 IDC_SESSSTATIC, IDC_SESSEDIT, IDC_SESSLIST,
1105 "&Load", IDC_SESSLOAD,
1106 "&Save", IDC_SESSSAVE,
1107 "&Delete", IDC_SESSDEL, NULL);
1108 checkbox(&cp, "Close Window on E&xit", IDC_CLOSEEXIT);
1109 checkbox(&cp, "&Warn on Close", IDC_CLOSEWARN);
1110
1111 SetDlgItemText (hwnd, IDC_HOST, cfg.host);
1112 SetDlgItemText (hwnd, IDC_SESSEDIT, savedsession);
1113 SetDlgItemInt (hwnd, IDC_PORT, cfg.port, FALSE);
1114 for (i = 0; i < nsessions; i++)
1115 SendDlgItemMessage (hwnd, IDC_SESSLIST, LB_ADDSTRING,
1116 0, (LPARAM) (sessions[i]));
1117 CheckRadioButton (hwnd, IDC_PROTRAW, IDC_PROTSSH,
1118 cfg.protocol==PROT_SSH ? IDC_PROTSSH :
1119 cfg.protocol==PROT_TELNET ? IDC_PROTTELNET : IDC_PROTRAW );
1120 CheckDlgButton (hwnd, IDC_CLOSEEXIT, cfg.close_on_exit);
1121 CheckDlgButton (hwnd, IDC_CLOSEWARN, cfg.warn_on_close);
1122 break;
1123 case WM_LBUTTONUP:
1124 /*
1125 * Button release should trigger WM_OK if there was a
1126 * previous double click on the session list.
1127 */
1128 ReleaseCapture();
1129 if (readytogo)
1130 SendMessage (GetParent(hwnd), WM_COMMAND, IDOK, 0);
1131 break;
1132 case WM_COMMAND:
1133 switch (LOWORD(wParam)) {
1134 case IDC_PROTTELNET:
1135 case IDC_PROTSSH:
1136 case IDC_PROTRAW:
1137 if (HIWORD(wParam) == BN_CLICKED ||
1138 HIWORD(wParam) == BN_DOUBLECLICKED) {
1139 int i = IsDlgButtonChecked (hwnd, IDC_PROTSSH);
1140 int j = IsDlgButtonChecked (hwnd, IDC_PROTTELNET);
1141 cfg.protocol = i ? PROT_SSH : j ? PROT_TELNET : PROT_RAW ;
1142 if ((cfg.protocol == PROT_SSH && cfg.port == 23) ||
1143 (cfg.protocol == PROT_TELNET && cfg.port == 22)) {
1144 cfg.port = i ? 22 : 23;
1145 SetDlgItemInt (hwnd, IDC_PORT, cfg.port, FALSE);
1146 }
1147 }
1148 break;
1149 case IDC_HOST:
1150 if (HIWORD(wParam) == EN_CHANGE)
1151 GetDlgItemText (hwnd, IDC_HOST, cfg.host,
1152 sizeof(cfg.host)-1);
1153 break;
1154 case IDC_PORT:
1155 if (HIWORD(wParam) == EN_CHANGE)
1156 MyGetDlgItemInt (hwnd, IDC_PORT, &cfg.port);
1157 break;
1158 case IDC_CLOSEEXIT:
1159 if (HIWORD(wParam) == BN_CLICKED ||
1160 HIWORD(wParam) == BN_DOUBLECLICKED)
1161 cfg.close_on_exit = IsDlgButtonChecked (hwnd, IDC_CLOSEEXIT);
1162 break;
1163 case IDC_CLOSEWARN:
1164 if (HIWORD(wParam) == BN_CLICKED ||
1165 HIWORD(wParam) == BN_DOUBLECLICKED)
1166 cfg.warn_on_close = IsDlgButtonChecked (hwnd, IDC_CLOSEWARN);
1167 break;
1168 case IDC_SESSEDIT:
1169 if (HIWORD(wParam) == EN_CHANGE) {
1170 SendDlgItemMessage (hwnd, IDC_SESSLIST, LB_SETCURSEL,
1171 (WPARAM) -1, 0);
1172 GetDlgItemText (hwnd, IDC_SESSEDIT,
1173 savedsession, sizeof(savedsession)-1);
1174 savedsession[sizeof(savedsession)-1] = '\0';
1175 }
1176 break;
1177 case IDC_SESSSAVE:
1178 if (HIWORD(wParam) == BN_CLICKED ||
1179 HIWORD(wParam) == BN_DOUBLECLICKED) {
1180 /*
1181 * Save a session
1182 */
1183 char str[2048];
1184 GetDlgItemText (hwnd, IDC_SESSEDIT, str, sizeof(str)-1);
1185 if (!*str) {
1186 int n = SendDlgItemMessage (hwnd, IDC_SESSLIST,
1187 LB_GETCURSEL, 0, 0);
1188 if (n == LB_ERR) {
1189 MessageBeep(0);
1190 break;
1191 }
1192 strcpy (str, sessions[n]);
1193 }
1194 save_settings (str, !!strcmp(str, "Default Settings"));
1195 get_sesslist (FALSE);
1196 get_sesslist (TRUE);
1197 SendDlgItemMessage (hwnd, IDC_SESSLIST, LB_RESETCONTENT,
1198 0, 0);
1199 for (i = 0; i < nsessions; i++)
1200 SendDlgItemMessage (hwnd, IDC_SESSLIST, LB_ADDSTRING,
1201 0, (LPARAM) (sessions[i]));
1202 SendDlgItemMessage (hwnd, IDC_SESSLIST, LB_SETCURSEL,
1203 (WPARAM) -1, 0);
1204 }
1205 break;
1206 case IDC_SESSLIST:
1207 case IDC_SESSLOAD:
1208 if (LOWORD(wParam) == IDC_SESSLOAD &&
1209 HIWORD(wParam) != BN_CLICKED &&
1210 HIWORD(wParam) != BN_DOUBLECLICKED)
1211 break;
1212 if (LOWORD(wParam) == IDC_SESSLIST &&
1213 HIWORD(wParam) != LBN_DBLCLK)
1214 break;
1215 {
1216 int n = SendDlgItemMessage (hwnd, IDC_SESSLIST,
1217 LB_GETCURSEL, 0, 0);
1218 if (n == LB_ERR) {
1219 MessageBeep(0);
1220 break;
1221 }
1222 load_settings (sessions[n],
1223 !!strcmp(sessions[n], "Default Settings"));
1224 SetDlgItemText (hwnd, IDC_HOST, cfg.host);
1225 SetDlgItemInt (hwnd, IDC_PORT, cfg.port, FALSE);
1226 CheckRadioButton (hwnd, IDC_PROTRAW, IDC_PROTSSH,
1227 (cfg.protocol==PROT_SSH ? IDC_PROTSSH :
1228 cfg.protocol==PROT_TELNET ? IDC_PROTTELNET : IDC_PROTRAW));
1229 CheckDlgButton (hwnd, IDC_CLOSEEXIT, cfg.close_on_exit);
1230 CheckDlgButton (hwnd, IDC_CLOSEWARN, cfg.warn_on_close);
1231 SendDlgItemMessage (hwnd, IDC_SESSLIST, LB_SETCURSEL,
1232 (WPARAM) -1, 0);
1233 }
1234 if (LOWORD(wParam) == IDC_SESSLIST) {
1235 /*
1236 * A double-click on a saved session should
1237 * actually start the session, not just load it.
1238 * Unless it's Default Settings or some other
1239 * host-less set of saved settings.
1240 */
1241 if (*cfg.host) {
1242 readytogo = TRUE;
1243 SetCapture(hwnd);
1244 }
1245 }
1246 break;
1247 case IDC_SESSDEL:
1248 if (HIWORD(wParam) == BN_CLICKED ||
1249 HIWORD(wParam) == BN_DOUBLECLICKED) {
1250 int n = SendDlgItemMessage (hwnd, IDC_SESSLIST,
1251 LB_GETCURSEL, 0, 0);
1252 if (n == LB_ERR || n == 0) {
1253 MessageBeep(0);
1254 break;
1255 }
1256 del_settings(sessions[n]);
1257 get_sesslist (FALSE);
1258 get_sesslist (TRUE);
1259 SendDlgItemMessage (hwnd, IDC_SESSLIST, LB_RESETCONTENT,
1260 0, 0);
1261 for (i = 0; i < nsessions; i++)
1262 SendDlgItemMessage (hwnd, IDC_SESSLIST, LB_ADDSTRING,
1263 0, (LPARAM) (sessions[i]));
1264 SendDlgItemMessage (hwnd, IDC_SESSLIST, LB_SETCURSEL,
1265 (WPARAM) -1, 0);
1266 }
1267 }
1268 }
1269 return GeneralPanelProc (hwnd, msg, wParam, lParam);
1270 }
1271
1272 static int CALLBACK KeyboardProc (HWND hwnd, UINT msg,
1273 WPARAM wParam, LPARAM lParam) {
1274 struct ctlpos cp;
1275 enum { controlstartvalue = 1000,
1276 IDC_DELSTATIC,
1277 IDC_DEL008,
1278 IDC_DEL127,
1279 IDC_HOMESTATIC,
1280 IDC_HOMETILDE,
1281 IDC_HOMERXVT,
1282 IDC_FUNCSTATIC,
1283 IDC_FUNCTILDE,
1284 IDC_FUNCLINUX,
1285 IDC_FUNCXTERM,
1286 IDC_KPSTATIC,
1287 IDC_KPNORMAL,
1288 IDC_KPAPPLIC,
1289 IDC_KPNH,
1290 IDC_CURSTATIC,
1291 IDC_CURNORMAL,
1292 IDC_CURAPPLIC,
1293 IDC_ALTF4,
1294 IDC_ALTSPACE,
1295 IDC_LDISCTERM,
1296 IDC_SCROLLKEY
1297 };
1298
1299 switch (msg) {
1300 case WM_INITDIALOG:
1301 /* Accelerators used: [aco] 4?ehiklmnprsuvxy */
1302 ctlposinit(&cp, hwnd);
1303 radioline(&cp, "Action of Backspace:", IDC_DELSTATIC, 2,
1304 "Control-&H", IDC_DEL008,
1305 "Control-&? (127)", IDC_DEL127, NULL);
1306 radioline(&cp, "Action of Home and End:", IDC_HOMESTATIC, 2,
1307 "&Standard", IDC_HOMETILDE,
1308 "&rxvt", IDC_HOMERXVT, NULL);
1309 radioline(&cp, "Function key and keypad layout:", IDC_FUNCSTATIC, 3,
1310 "&VT400", IDC_FUNCTILDE,
1311 "&Linux", IDC_FUNCLINUX,
1312 "&Xterm R6", IDC_FUNCXTERM, NULL);
1313 radioline(&cp, "Initial state of cursor keys:", IDC_CURSTATIC, 2,
1314 "&Normal", IDC_CURNORMAL,
1315 "A&pplication", IDC_CURAPPLIC, NULL);
1316 radioline(&cp, "Initial state of numeric keypad:", IDC_KPSTATIC, 3,
1317 "Nor&mal", IDC_KPNORMAL,
1318 "Appl&ication", IDC_KPAPPLIC,
1319 "N&etHack", IDC_KPNH, NULL);
1320 checkbox(&cp, "ALT-F&4 is special (closes window)", IDC_ALTF4);
1321 checkbox(&cp, "ALT-Space is special (S&ystem menu)", IDC_ALTSPACE);
1322 checkbox(&cp, "&Use local terminal line discipline", IDC_LDISCTERM);
1323 checkbox(&cp, "Reset scrollback on &keypress", IDC_SCROLLKEY);
1324
1325 CheckRadioButton (hwnd, IDC_DEL008, IDC_DEL127,
1326 cfg.bksp_is_delete ? IDC_DEL127 : IDC_DEL008);
1327 CheckRadioButton (hwnd, IDC_HOMETILDE, IDC_HOMERXVT,
1328 cfg.rxvt_homeend ? IDC_HOMERXVT : IDC_HOMETILDE);
1329 CheckRadioButton (hwnd, IDC_FUNCTILDE, IDC_FUNCXTERM,
1330 cfg.funky_type ?
1331 (cfg.funky_type==2 ? IDC_FUNCXTERM
1332 : IDC_FUNCLINUX )
1333 : IDC_FUNCTILDE);
1334 CheckRadioButton (hwnd, IDC_CURNORMAL, IDC_CURAPPLIC,
1335 cfg.app_cursor ? IDC_CURAPPLIC : IDC_CURNORMAL);
1336 CheckRadioButton (hwnd, IDC_KPNORMAL, IDC_KPNH,
1337 cfg.nethack_keypad ? IDC_KPNH :
1338 cfg.app_keypad ? IDC_KPAPPLIC : IDC_KPNORMAL);
1339 CheckDlgButton (hwnd, IDC_ALTF4, cfg.alt_f4);
1340 CheckDlgButton (hwnd, IDC_ALTSPACE, cfg.alt_space);
1341 CheckDlgButton (hwnd, IDC_LDISCTERM, cfg.ldisc_term);
1342 CheckDlgButton (hwnd, IDC_SCROLLKEY, cfg.scroll_on_key);
1343 break;
1344 case WM_COMMAND:
1345 if (HIWORD(wParam) == BN_CLICKED ||
1346 HIWORD(wParam) == BN_DOUBLECLICKED)
1347 switch (LOWORD(wParam)) {
1348 case IDC_DEL008:
1349 case IDC_DEL127:
1350 cfg.bksp_is_delete = IsDlgButtonChecked (hwnd, IDC_DEL127);
1351 break;
1352 case IDC_HOMETILDE:
1353 case IDC_HOMERXVT:
1354 cfg.rxvt_homeend = IsDlgButtonChecked (hwnd, IDC_HOMERXVT);
1355 break;
1356 case IDC_FUNCXTERM:
1357 cfg.funky_type = 2;
1358 break;
1359 case IDC_FUNCTILDE:
1360 case IDC_FUNCLINUX:
1361 cfg.funky_type = IsDlgButtonChecked (hwnd, IDC_FUNCLINUX);
1362 break;
1363 case IDC_KPNORMAL:
1364 case IDC_KPAPPLIC:
1365 cfg.app_keypad = IsDlgButtonChecked (hwnd, IDC_KPAPPLIC);
1366 cfg.nethack_keypad = FALSE;
1367 break;
1368 case IDC_KPNH:
1369 cfg.app_keypad = FALSE;
1370 cfg.nethack_keypad = TRUE;
1371 break;
1372 case IDC_CURNORMAL:
1373 case IDC_CURAPPLIC:
1374 cfg.app_cursor = IsDlgButtonChecked (hwnd, IDC_CURAPPLIC);
1375 break;
1376 case IDC_ALTF4:
1377 if (HIWORD(wParam) == BN_CLICKED ||
1378 HIWORD(wParam) == BN_DOUBLECLICKED)
1379 cfg.alt_f4 = IsDlgButtonChecked (hwnd, IDC_ALTF4);
1380 break;
1381 case IDC_ALTSPACE:
1382 if (HIWORD(wParam) == BN_CLICKED ||
1383 HIWORD(wParam) == BN_DOUBLECLICKED)
1384 cfg.alt_space = IsDlgButtonChecked (hwnd, IDC_ALTSPACE);
1385 break;
1386 case IDC_LDISCTERM:
1387 if (HIWORD(wParam) == BN_CLICKED ||
1388 HIWORD(wParam) == BN_DOUBLECLICKED)
1389 cfg.ldisc_term = IsDlgButtonChecked (hwnd, IDC_LDISCTERM);
1390 break;
1391 case IDC_SCROLLKEY:
1392 if (HIWORD(wParam) == BN_CLICKED ||
1393 HIWORD(wParam) == BN_DOUBLECLICKED)
1394 cfg.scroll_on_key = IsDlgButtonChecked (hwnd, IDC_SCROLLKEY);
1395 break;
1396 }
1397 }
1398 return GeneralPanelProc (hwnd, msg, wParam, lParam);
1399 }
1400
1401 static void fmtfont (char *buf) {
1402 sprintf (buf, "Font: %s, ", cfg.font);
1403 if (cfg.fontisbold)
1404 strcat(buf, "bold, ");
1405 if (cfg.fontheight == 0)
1406 strcat (buf, "default height");
1407 else
1408 sprintf (buf+strlen(buf), "%d-%s",
1409 (cfg.fontheight < 0 ? -cfg.fontheight : cfg.fontheight),
1410 (cfg.fontheight < 0 ? "pixel" : "point"));
1411 }
1412
1413 static int CALLBACK TerminalProc (HWND hwnd, UINT msg,
1414 WPARAM wParam, LPARAM lParam) {
1415 struct ctlpos cp;
1416 CHOOSEFONT cf;
1417 LOGFONT lf;
1418 char fontstatic[256];
1419 enum { controlstartvalue = 1000,
1420 IDC_WRAPMODE,
1421 IDC_DECOM,
1422 IDC_DIMSTATIC,
1423 IDC_ROWSSTATIC,
1424 IDC_ROWSEDIT,
1425 IDC_COLSSTATIC,
1426 IDC_COLSEDIT,
1427 IDC_SAVESTATIC,
1428 IDC_SAVEEDIT,
1429 IDC_FONTSTATIC,
1430 IDC_CHOOSEFONT,
1431 IDC_LFHASCR,
1432 IDC_BEEP,
1433 IDC_BCE,
1434 IDC_BLINKTEXT
1435 };
1436
1437 switch (msg) {
1438 case WM_INITDIALOG:
1439 /* Accelerators used: [aco] dghlmnprsw */
1440 ctlposinit(&cp, hwnd);
1441 multiedit(&cp,
1442 "&Rows", IDC_ROWSSTATIC, IDC_ROWSEDIT, 33,
1443 "Colu&mns", IDC_COLSSTATIC, IDC_COLSEDIT, 33,
1444 "&Scrollback", IDC_SAVESTATIC, IDC_SAVEEDIT, 33,
1445 NULL);
1446 staticbtn(&cp, "", IDC_FONTSTATIC, "C&hange...", IDC_CHOOSEFONT);
1447 checkbox(&cp, "Auto &wrap mode initially on", IDC_WRAPMODE);
1448 checkbox(&cp, "&DEC Origin Mode initially on", IDC_DECOM);
1449 checkbox(&cp, "Implicit CR in every &LF", IDC_LFHASCR);
1450 checkbox(&cp, "Bee&p enabled", IDC_BEEP);
1451 checkbox(&cp, "Use Back&ground colour erase", IDC_BCE);
1452 checkbox(&cp, "Enable bli&nking text", IDC_BLINKTEXT);
1453
1454 CheckDlgButton (hwnd, IDC_WRAPMODE, cfg.wrap_mode);
1455 CheckDlgButton (hwnd, IDC_DECOM, cfg.dec_om);
1456 CheckDlgButton (hwnd, IDC_LFHASCR, cfg.lfhascr);
1457 SetDlgItemInt (hwnd, IDC_ROWSEDIT, cfg.height, FALSE);
1458 SetDlgItemInt (hwnd, IDC_COLSEDIT, cfg.width, FALSE);
1459 SetDlgItemInt (hwnd, IDC_SAVEEDIT, cfg.savelines, FALSE);
1460 fmtfont (fontstatic);
1461 SetDlgItemText (hwnd, IDC_FONTSTATIC, fontstatic);
1462 CheckDlgButton (hwnd, IDC_BEEP, cfg.beep);
1463 CheckDlgButton (hwnd, IDC_BCE, cfg.bce);
1464 CheckDlgButton (hwnd, IDC_BLINKTEXT, cfg.blinktext);
1465 break;
1466 case WM_COMMAND:
1467 switch (LOWORD(wParam)) {
1468 case IDC_WRAPMODE:
1469 if (HIWORD(wParam) == BN_CLICKED ||
1470 HIWORD(wParam) == BN_DOUBLECLICKED)
1471 cfg.wrap_mode = IsDlgButtonChecked (hwnd, IDC_WRAPMODE);
1472 break;
1473 case IDC_DECOM:
1474 if (HIWORD(wParam) == BN_CLICKED ||
1475 HIWORD(wParam) == BN_DOUBLECLICKED)
1476 cfg.dec_om = IsDlgButtonChecked (hwnd, IDC_DECOM);
1477 break;
1478 case IDC_LFHASCR:
1479 if (HIWORD(wParam) == BN_CLICKED ||
1480 HIWORD(wParam) == BN_DOUBLECLICKED)
1481 cfg.lfhascr = IsDlgButtonChecked (hwnd, IDC_LFHASCR);
1482 break;
1483 case IDC_ROWSEDIT:
1484 if (HIWORD(wParam) == EN_CHANGE)
1485 MyGetDlgItemInt (hwnd, IDC_ROWSEDIT, &cfg.height);
1486 break;
1487 case IDC_COLSEDIT:
1488 if (HIWORD(wParam) == EN_CHANGE)
1489 MyGetDlgItemInt (hwnd, IDC_COLSEDIT, &cfg.width);
1490 break;
1491 case IDC_SAVEEDIT:
1492 if (HIWORD(wParam) == EN_CHANGE)
1493 MyGetDlgItemInt (hwnd, IDC_SAVEEDIT, &cfg.savelines);
1494 break;
1495 case IDC_CHOOSEFONT:
1496 lf.lfHeight = cfg.fontheight;
1497 lf.lfWidth = lf.lfEscapement = lf.lfOrientation = 0;
1498 lf.lfItalic = lf.lfUnderline = lf.lfStrikeOut = 0;
1499 lf.lfWeight = (cfg.fontisbold ? FW_BOLD : 0);
1500 lf.lfCharSet = cfg.fontcharset;
1501 lf.lfOutPrecision = OUT_DEFAULT_PRECIS;
1502 lf.lfClipPrecision = CLIP_DEFAULT_PRECIS;
1503 lf.lfQuality = DEFAULT_QUALITY;
1504 lf.lfPitchAndFamily = FIXED_PITCH | FF_DONTCARE;
1505 strncpy (lf.lfFaceName, cfg.font, sizeof(lf.lfFaceName)-1);
1506 lf.lfFaceName[sizeof(lf.lfFaceName)-1] = '\0';
1507
1508 cf.lStructSize = sizeof(cf);
1509 cf.hwndOwner = hwnd;
1510 cf.lpLogFont = &lf;
1511 cf.Flags = CF_FIXEDPITCHONLY | CF_FORCEFONTEXIST |
1512 CF_INITTOLOGFONTSTRUCT | CF_SCREENFONTS;
1513
1514 if (ChooseFont (&cf)) {
1515 strncpy (cfg.font, lf.lfFaceName, sizeof(cfg.font)-1);
1516 cfg.font[sizeof(cfg.font)-1] = '\0';
1517 cfg.fontisbold = (lf.lfWeight == FW_BOLD);
1518 cfg.fontcharset = lf.lfCharSet;
1519 cfg.fontheight = lf.lfHeight;
1520 fmtfont (fontstatic);
1521 SetDlgItemText (hwnd, IDC_FONTSTATIC, fontstatic);
1522 }
1523 break;
1524 case IDC_BEEP:
1525 if (HIWORD(wParam) == BN_CLICKED ||
1526 HIWORD(wParam) == BN_DOUBLECLICKED)
1527 cfg.beep = IsDlgButtonChecked (hwnd, IDC_BEEP);
1528 break;
1529 case IDC_BLINKTEXT:
1530 if (HIWORD(wParam) == BN_CLICKED ||
1531 HIWORD(wParam) == BN_DOUBLECLICKED)
1532 cfg.blinktext = IsDlgButtonChecked (hwnd, IDC_BLINKTEXT);
1533 break;
1534 case IDC_BCE:
1535 if (HIWORD(wParam) == BN_CLICKED ||
1536 HIWORD(wParam) == BN_DOUBLECLICKED)
1537 cfg.bce = IsDlgButtonChecked (hwnd, IDC_BCE);
1538 break;
1539 }
1540 break;
1541 }
1542 return GeneralPanelProc (hwnd, msg, wParam, lParam);
1543 }
1544
1545 static int CALLBACK WindowProc (HWND hwnd, UINT msg,
1546 WPARAM wParam, LPARAM lParam) {
1547 struct ctlpos cp;
1548 enum { controlstartvalue = 1000,
1549 IDC_WINNAME,
1550 IDC_BLINKCUR,
1551 IDC_SCROLLBAR,
1552 IDC_LOCKSIZE,
1553 IDC_WINTITLE,
1554 IDC_WINEDIT
1555 };
1556
1557 switch (msg) {
1558 case WM_INITDIALOG:
1559 /* Accelerators used: [aco] bikty */
1560 ctlposinit(&cp, hwnd);
1561 multiedit(&cp,
1562 "Initial window &title:", IDC_WINTITLE, IDC_WINEDIT, 100,
1563 NULL);
1564 checkbox(&cp, "Avoid ever using &icon title", IDC_WINNAME);
1565 checkbox(&cp, "&Blinking cursor", IDC_BLINKCUR);
1566 checkbox(&cp, "Displa&y scrollbar", IDC_SCROLLBAR);
1567 checkbox(&cp, "Loc&k Window size", IDC_LOCKSIZE);
1568
1569 SetDlgItemText (hwnd, IDC_WINEDIT, cfg.wintitle);
1570 CheckDlgButton (hwnd, IDC_WINNAME, cfg.win_name_always);
1571 CheckDlgButton (hwnd, IDC_BLINKCUR, cfg.blink_cur);
1572 CheckDlgButton (hwnd, IDC_SCROLLBAR, cfg.scrollbar);
1573 CheckDlgButton (hwnd, IDC_LOCKSIZE, cfg.locksize);
1574 break;
1575 case WM_COMMAND:
1576 switch (LOWORD(wParam)) {
1577 case IDC_WINNAME:
1578 if (HIWORD(wParam) == BN_CLICKED ||
1579 HIWORD(wParam) == BN_DOUBLECLICKED)
1580 cfg.win_name_always = IsDlgButtonChecked (hwnd, IDC_WINNAME);
1581 break;
1582 case IDC_BLINKCUR:
1583 if (HIWORD(wParam) == BN_CLICKED ||
1584 HIWORD(wParam) == BN_DOUBLECLICKED)
1585 cfg.blink_cur = IsDlgButtonChecked (hwnd, IDC_BLINKCUR);
1586 break;
1587 case IDC_SCROLLBAR:
1588 if (HIWORD(wParam) == BN_CLICKED ||
1589 HIWORD(wParam) == BN_DOUBLECLICKED)
1590 cfg.scrollbar = IsDlgButtonChecked (hwnd, IDC_SCROLLBAR);
1591 break;
1592 case IDC_LOCKSIZE:
1593 if (HIWORD(wParam) == BN_CLICKED ||
1594 HIWORD(wParam) == BN_DOUBLECLICKED)
1595 cfg.locksize = IsDlgButtonChecked (hwnd, IDC_LOCKSIZE);
1596 break;
1597 case IDC_WINEDIT:
1598 if (HIWORD(wParam) == EN_CHANGE)
1599 GetDlgItemText (hwnd, IDC_WINEDIT, cfg.wintitle,
1600 sizeof(cfg.wintitle)-1);
1601 break;
1602 }
1603 break;
1604 }
1605 return GeneralPanelProc (hwnd, msg, wParam, lParam);
1606 }
1607
1608 static int CALLBACK TelnetProc (HWND hwnd, UINT msg,
1609 WPARAM wParam, LPARAM lParam) {
1610 int i;
1611 struct ctlpos cp;
1612 enum { controlstartvalue = 1000,
1613 IDC_TTSTATIC,
1614 IDC_TTEDIT,
1615 IDC_TSSTATIC,
1616 IDC_TSEDIT,
1617 IDC_LOGSTATIC,
1618 IDC_LOGEDIT,
1619 IDC_ENVSTATIC,
1620 IDC_VARSTATIC,
1621 IDC_VAREDIT,
1622 IDC_VALSTATIC,
1623 IDC_VALEDIT,
1624 IDC_ENVLIST,
1625 IDC_ENVADD,
1626 IDC_ENVREMOVE,
1627 IDC_EMSTATIC,
1628 IDC_EMBSD,
1629 IDC_EMRFC
1630 };
1631
1632 switch (msg) {
1633 case WM_INITDIALOG:
1634 /* Accelerators used: [aco] bdflrstuv */
1635 ctlposinit(&cp, hwnd);
1636 staticedit(&cp, "Terminal-&type string", IDC_TTSTATIC, IDC_TTEDIT);
1637 staticedit(&cp, "Terminal-&speed string", IDC_TSSTATIC, IDC_TSEDIT);
1638 staticedit(&cp, "Auto-login &username", IDC_LOGSTATIC, IDC_LOGEDIT);
1639 envsetter(&cp, "Environment variables:", IDC_ENVSTATIC,
1640 "&Variable", IDC_VARSTATIC, IDC_VAREDIT,
1641 "Va&lue", IDC_VALSTATIC, IDC_VALEDIT,
1642 IDC_ENVLIST,
1643 "A&dd", IDC_ENVADD, "&Remove", IDC_ENVREMOVE);
1644 radioline(&cp, "Handling of OLD_ENVIRON ambiguity:", IDC_EMSTATIC, 2,
1645 "&BSD (commonplace)", IDC_EMBSD,
1646 "R&FC 1408 (unusual)", IDC_EMRFC, NULL);
1647
1648 SetDlgItemText (hwnd, IDC_TTEDIT, cfg.termtype);
1649 SetDlgItemText (hwnd, IDC_TSEDIT, cfg.termspeed);
1650 SetDlgItemText (hwnd, IDC_LOGEDIT, cfg.username);
1651 {
1652 char *p = cfg.environmt;
1653 while (*p) {
1654 SendDlgItemMessage (hwnd, IDC_ENVLIST, LB_ADDSTRING, 0,
1655 (LPARAM) p);
1656 p += strlen(p)+1;
1657 }
1658 }
1659 CheckRadioButton (hwnd, IDC_EMBSD, IDC_EMRFC,
1660 cfg.rfc_environ ? IDC_EMRFC : IDC_EMBSD);
1661 break;
1662 case WM_COMMAND:
1663 switch (LOWORD(wParam)) {
1664 case IDC_TTEDIT:
1665 if (HIWORD(wParam) == EN_CHANGE)
1666 GetDlgItemText (hwnd, IDC_TTEDIT, cfg.termtype,
1667 sizeof(cfg.termtype)-1);
1668 break;
1669 case IDC_TSEDIT:
1670 if (HIWORD(wParam) == EN_CHANGE)
1671 GetDlgItemText (hwnd, IDC_TSEDIT, cfg.termspeed,
1672 sizeof(cfg.termspeed)-1);
1673 break;
1674 case IDC_LOGEDIT:
1675 if (HIWORD(wParam) == EN_CHANGE)
1676 GetDlgItemText (hwnd, IDC_LOGEDIT, cfg.username,
1677 sizeof(cfg.username)-1);
1678 break;
1679 case IDC_EMBSD:
1680 case IDC_EMRFC:
1681 cfg.rfc_environ = IsDlgButtonChecked (hwnd, IDC_EMRFC);
1682 break;
1683 case IDC_ENVADD:
1684 if (HIWORD(wParam) == BN_CLICKED ||
1685 HIWORD(wParam) == BN_DOUBLECLICKED) {
1686 char str[sizeof(cfg.environmt)];
1687 char *p;
1688 GetDlgItemText (hwnd, IDC_VAREDIT, str, sizeof(str)-1);
1689 if (!*str) {
1690 MessageBeep(0);
1691 break;
1692 }
1693 p = str + strlen(str);
1694 *p++ = '\t';
1695 GetDlgItemText (hwnd, IDC_VALEDIT, p, sizeof(str)-1-(p-str));
1696 if (!*p) {
1697 MessageBeep(0);
1698 break;
1699 }
1700 p = cfg.environmt;
1701 while (*p) {
1702 while (*p) p++;
1703 p++;
1704 }
1705 if ((p-cfg.environmt) + strlen(str) + 2 < sizeof(cfg.environmt)) {
1706 strcpy (p, str);
1707 p[strlen(str)+1] = '\0';
1708 SendDlgItemMessage (hwnd, IDC_ENVLIST, LB_ADDSTRING,
1709 0, (LPARAM)str);
1710 SetDlgItemText (hwnd, IDC_VAREDIT, "");
1711 SetDlgItemText (hwnd, IDC_VALEDIT, "");
1712 } else {
1713 MessageBox(hwnd, "Environment too big", "PuTTY Error",
1714 MB_OK | MB_ICONERROR);
1715 }
1716 }
1717 break;
1718 case IDC_ENVREMOVE:
1719 if (HIWORD(wParam) != BN_CLICKED &&
1720 HIWORD(wParam) != BN_DOUBLECLICKED)
1721 break;
1722 i = SendDlgItemMessage (hwnd, IDC_ENVLIST, LB_GETCURSEL, 0, 0);
1723 if (i == LB_ERR)
1724 MessageBeep (0);
1725 else {
1726 char *p, *q;
1727
1728 SendDlgItemMessage (hwnd, IDC_ENVLIST, LB_DELETESTRING,
1729 i, 0);
1730 p = cfg.environmt;
1731 while (i > 0) {
1732 if (!*p)
1733 goto disaster;
1734 while (*p) p++;
1735 p++;
1736 i--;
1737 }
1738 q = p;
1739 if (!*p)
1740 goto disaster;
1741 while (*p) p++;
1742 p++;
1743 while (*p) {
1744 while (*p)
1745 *q++ = *p++;
1746 *q++ = *p++;
1747 }
1748 *q = '\0';
1749 disaster:;
1750 }
1751 break;
1752 }
1753 break;
1754 }
1755 return GeneralPanelProc (hwnd, msg, wParam, lParam);
1756 }
1757
1758 static int CALLBACK SshProc (HWND hwnd, UINT msg,
1759 WPARAM wParam, LPARAM lParam) {
1760 struct ctlpos cp;
1761 OPENFILENAME of;
1762 char filename[sizeof(cfg.keyfile)];
1763 enum { controlstartvalue = 1000,
1764 IDC_TTSTATIC,
1765 IDC_TTEDIT,
1766 IDC_LOGSTATIC,
1767 IDC_LOGEDIT,
1768 IDC_NOPTY,
1769 IDC_CIPHERSTATIC,
1770 IDC_CIPHER3DES,
1771 IDC_CIPHERBLOWF,
1772 IDC_CIPHERDES,
1773 IDC_AUTHTIS,
1774 IDC_PKSTATIC,
1775 IDC_PKEDIT,
1776 IDC_PKBUTTON,
1777 IDC_SSHPROTSTATIC,
1778 IDC_SSHPROT1,
1779 IDC_SSHPROT2,
1780 IDC_AGENTFWD,
1781 IDC_CMDSTATIC,
1782 IDC_CMDEDIT
1783 };
1784
1785 switch (msg) {
1786 case WM_INITDIALOG:
1787 /* Accelerators used: [aco] 123abdkmprtuw */
1788 ctlposinit(&cp, hwnd);
1789 staticedit(&cp, "Terminal-&type string", IDC_TTSTATIC, IDC_TTEDIT);
1790 staticedit(&cp, "Auto-login &username", IDC_LOGSTATIC, IDC_LOGEDIT);
1791 multiedit(&cp,
1792 "&Remote command:", IDC_CMDSTATIC, IDC_CMDEDIT, 100,
1793 NULL);
1794 checkbox(&cp, "Don't allocate a &pseudo-terminal", IDC_NOPTY);
1795 checkbox(&cp, "Atte&mpt TIS or CryptoCard authentication",
1796 IDC_AUTHTIS);
1797 checkbox(&cp, "Allow &agent forwarding", IDC_AGENTFWD);
1798 editbutton(&cp, "Private &key file for authentication:",
1799 IDC_PKSTATIC, IDC_PKEDIT, "Bro&wse...", IDC_PKBUTTON);
1800 radioline(&cp, "Preferred SSH protocol version:",
1801 IDC_SSHPROTSTATIC, 2,
1802 "&1", IDC_SSHPROT1, "&2", IDC_SSHPROT2, NULL);
1803 radioline(&cp, "Preferred encryption algorithm:", IDC_CIPHERSTATIC, 3,
1804 "&3DES", IDC_CIPHER3DES,
1805 "&Blowfish", IDC_CIPHERBLOWF,
1806 "&DES", IDC_CIPHERDES, NULL);
1807
1808 SetDlgItemText (hwnd, IDC_TTEDIT, cfg.termtype);
1809 SetDlgItemText (hwnd, IDC_LOGEDIT, cfg.username);
1810 CheckDlgButton (hwnd, IDC_NOPTY, cfg.nopty);
1811 CheckDlgButton (hwnd, IDC_AGENTFWD, cfg.agentfwd);
1812 CheckRadioButton (hwnd, IDC_CIPHER3DES, IDC_CIPHERDES,
1813 cfg.cipher == CIPHER_BLOWFISH ? IDC_CIPHERBLOWF :
1814 cfg.cipher == CIPHER_DES ? IDC_CIPHERDES :
1815 IDC_CIPHER3DES);
1816 CheckRadioButton (hwnd, IDC_SSHPROT1, IDC_SSHPROT2,
1817 cfg.sshprot == 1 ? IDC_SSHPROT1 : IDC_SSHPROT2);
1818 CheckDlgButton (hwnd, IDC_AUTHTIS, cfg.try_tis_auth);
1819 SetDlgItemText (hwnd, IDC_PKEDIT, cfg.keyfile);
1820 SetDlgItemText (hwnd, IDC_CMDEDIT, cfg.remote_cmd);
1821 break;
1822 case WM_COMMAND:
1823 switch (LOWORD(wParam)) {
1824 case IDC_TTEDIT:
1825 if (HIWORD(wParam) == EN_CHANGE)
1826 GetDlgItemText (hwnd, IDC_TTEDIT, cfg.termtype,
1827 sizeof(cfg.termtype)-1);
1828 break;
1829 case IDC_LOGEDIT:
1830 if (HIWORD(wParam) == EN_CHANGE)
1831 GetDlgItemText (hwnd, IDC_LOGEDIT, cfg.username,
1832 sizeof(cfg.username)-1);
1833 break;
1834 case IDC_NOPTY:
1835 if (HIWORD(wParam) == BN_CLICKED ||
1836 HIWORD(wParam) == BN_DOUBLECLICKED)
1837 cfg.nopty = IsDlgButtonChecked (hwnd, IDC_NOPTY);
1838 break;
1839 case IDC_AGENTFWD:
1840 if (HIWORD(wParam) == BN_CLICKED ||
1841 HIWORD(wParam) == BN_DOUBLECLICKED)
1842 cfg.agentfwd = IsDlgButtonChecked (hwnd, IDC_AGENTFWD);
1843 break;
1844 case IDC_CIPHER3DES:
1845 case IDC_CIPHERBLOWF:
1846 case IDC_CIPHERDES:
1847 if (HIWORD(wParam) == BN_CLICKED ||
1848 HIWORD(wParam) == BN_DOUBLECLICKED) {
1849 if (IsDlgButtonChecked (hwnd, IDC_CIPHER3DES))
1850 cfg.cipher = CIPHER_3DES;
1851 else if (IsDlgButtonChecked (hwnd, IDC_CIPHERBLOWF))
1852 cfg.cipher = CIPHER_BLOWFISH;
1853 else if (IsDlgButtonChecked (hwnd, IDC_CIPHERDES))
1854 cfg.cipher = CIPHER_DES;
1855 }
1856 break;
1857 case IDC_SSHPROT1:
1858 case IDC_SSHPROT2:
1859 if (HIWORD(wParam) == BN_CLICKED ||
1860 HIWORD(wParam) == BN_DOUBLECLICKED) {
1861 if (IsDlgButtonChecked (hwnd, IDC_SSHPROT1))
1862 cfg.sshprot = 1;
1863 else if (IsDlgButtonChecked (hwnd, IDC_SSHPROT2))
1864 cfg.sshprot = 2;
1865 }
1866 break;
1867 case IDC_AUTHTIS:
1868 if (HIWORD(wParam) == BN_CLICKED ||
1869 HIWORD(wParam) == BN_DOUBLECLICKED)
1870 cfg.try_tis_auth = IsDlgButtonChecked (hwnd, IDC_AUTHTIS);
1871 break;
1872 case IDC_PKEDIT:
1873 if (HIWORD(wParam) == EN_CHANGE)
1874 GetDlgItemText (hwnd, IDC_PKEDIT, cfg.keyfile,
1875 sizeof(cfg.keyfile)-1);
1876 break;
1877 case IDC_CMDEDIT:
1878 if (HIWORD(wParam) == EN_CHANGE)
1879 GetDlgItemText (hwnd, IDC_CMDEDIT, cfg.remote_cmd,
1880 sizeof(cfg.remote_cmd)-1);
1881 break;
1882 case IDC_PKBUTTON:
1883 /*
1884 * FIXME: this crashes. Find out why.
1885 */
1886 memset(&of, 0, sizeof(of));
1887 #ifdef OPENFILENAME_SIZE_VERSION_400
1888 of.lStructSize = OPENFILENAME_SIZE_VERSION_400;
1889 #else
1890 of.lStructSize = sizeof(of);
1891 #endif
1892 of.hwndOwner = hwnd;
1893 of.lpstrFilter = "All Files\0*\0\0\0";
1894 of.lpstrCustomFilter = NULL;
1895 of.nFilterIndex = 1;
1896 of.lpstrFile = filename; strcpy(filename, cfg.keyfile);
1897 of.nMaxFile = sizeof(filename);
1898 of.lpstrFileTitle = NULL;
1899 of.lpstrInitialDir = NULL;
1900 of.lpstrTitle = "Select Public Key File";
1901 of.Flags = 0;
1902 if (GetOpenFileName(&of)) {
1903 strcpy(cfg.keyfile, filename);
1904 SetDlgItemText (hwnd, IDC_PKEDIT, cfg.keyfile);
1905 }
1906 break;
1907 }
1908 break;
1909 }
1910 return GeneralPanelProc (hwnd, msg, wParam, lParam);
1911 }
1912
1913 static int CALLBACK SelectionProc (HWND hwnd, UINT msg,
1914 WPARAM wParam, LPARAM lParam) {
1915 struct ctlpos cp;
1916 int i;
1917 enum { controlstartvalue = 1000,
1918 IDC_MBSTATIC,
1919 IDC_MBWINDOWS,
1920 IDC_MBXTERM,
1921 IDC_CCSTATIC,
1922 IDC_CCLIST,
1923 IDC_CCSET,
1924 IDC_CCSTATIC2,
1925 IDC_CCEDIT
1926 };
1927
1928 switch (msg) {
1929 case WM_INITDIALOG:
1930 /* Accelerators used: [aco] stwx */
1931 ctlposinit(&cp, hwnd);
1932 radiobig(&cp, "Action of mouse buttons:", IDC_MBSTATIC,
1933 "&Windows (Right pastes, Middle extends)", IDC_MBWINDOWS,
1934 "&xterm (Right extends, Middle pastes)", IDC_MBXTERM,
1935 NULL);
1936 charclass(&cp, "Character classes:", IDC_CCSTATIC, IDC_CCLIST,
1937 "&Set", IDC_CCSET, IDC_CCEDIT,
1938 "&to class", IDC_CCSTATIC2);
1939
1940 CheckRadioButton (hwnd, IDC_MBWINDOWS, IDC_MBXTERM,
1941 cfg.mouse_is_xterm ? IDC_MBXTERM : IDC_MBWINDOWS);
1942 {
1943 static int tabs[4] = {25, 61, 96, 128};
1944 SendDlgItemMessage (hwnd, IDC_CCLIST, LB_SETTABSTOPS, 4,
1945 (LPARAM) tabs);
1946 }
1947 for (i=0; i<256; i++) {
1948 char str[100];
1949 sprintf(str, "%d\t(0x%02X)\t%c\t%d", i, i,
1950 (i>=0x21 && i != 0x7F) ? i : ' ',
1951 cfg.wordness[i]);
1952 SendDlgItemMessage (hwnd, IDC_CCLIST, LB_ADDSTRING, 0,
1953 (LPARAM) str);
1954 }
1955 break;
1956 case WM_COMMAND:
1957 switch (LOWORD(wParam)) {
1958 case IDC_MBWINDOWS:
1959 case IDC_MBXTERM:
1960 cfg.mouse_is_xterm = IsDlgButtonChecked (hwnd, IDC_MBXTERM);
1961 break;
1962 case IDC_CCSET:
1963 {
1964 BOOL ok;
1965 int i;
1966 int n = GetDlgItemInt (hwnd, IDC_CCEDIT, &ok, FALSE);
1967
1968 if (!ok)
1969 MessageBeep (0);
1970 else {
1971 for (i=0; i<256; i++)
1972 if (SendDlgItemMessage (hwnd, IDC_CCLIST, LB_GETSEL,
1973 i, 0)) {
1974 char str[100];
1975 cfg.wordness[i] = n;
1976 SendDlgItemMessage (hwnd, IDC_CCLIST,
1977 LB_DELETESTRING, i, 0);
1978 sprintf(str, "%d\t(0x%02X)\t%c\t%d", i, i,
1979 (i>=0x21 && i != 0x7F) ? i : ' ',
1980 cfg.wordness[i]);
1981 SendDlgItemMessage (hwnd, IDC_CCLIST,
1982 LB_INSERTSTRING, i,
1983 (LPARAM)str);
1984 }
1985 }
1986 }
1987 break;
1988 }
1989 break;
1990 }
1991 return GeneralPanelProc (hwnd, msg, wParam, lParam);
1992 }
1993
1994 static int CALLBACK ColourProc (HWND hwnd, UINT msg,
1995 WPARAM wParam, LPARAM lParam) {
1996 static const char *const colours[] = {
1997 "Default Foreground", "Default Bold Foreground",
1998 "Default Background", "Default Bold Background",
1999 "Cursor Text", "Cursor Colour",
2000 "ANSI Black", "ANSI Black Bold",
2001 "ANSI Red", "ANSI Red Bold",
2002 "ANSI Green", "ANSI Green Bold",
2003 "ANSI Yellow", "ANSI Yellow Bold",
2004 "ANSI Blue", "ANSI Blue Bold",
2005 "ANSI Magenta", "ANSI Magenta Bold",
2006 "ANSI Cyan", "ANSI Cyan Bold",
2007 "ANSI White", "ANSI White Bold"
2008 };
2009 static const int permanent[] = {
2010 TRUE, FALSE, TRUE, FALSE, TRUE, TRUE,
2011 TRUE, FALSE, TRUE, FALSE, TRUE, FALSE, TRUE, FALSE,
2012 TRUE, FALSE, TRUE, FALSE, TRUE, FALSE, TRUE, FALSE
2013 };
2014 struct ctlpos cp;
2015 enum { controlstartvalue = 1000,
2016 IDC_BOLDCOLOUR,
2017 IDC_PALETTE,
2018 IDC_STATIC,
2019 IDC_LIST,
2020 IDC_RSTATIC,
2021 IDC_GSTATIC,
2022 IDC_BSTATIC,
2023 IDC_RVALUE,
2024 IDC_GVALUE,
2025 IDC_BVALUE,
2026 IDC_CHANGE
2027 };
2028
2029 switch (msg) {
2030 case WM_INITDIALOG:
2031 /* Accelerators used: [aco] bmlu */
2032 ctlposinit(&cp, hwnd);
2033 checkbox(&cp, "&Bolded text is a different colour", IDC_BOLDCOLOUR);
2034 checkbox(&cp, "Attempt to use &logical palettes", IDC_PALETTE);
2035 colouredit(&cp, "Select a colo&ur and click to modify it:",
2036 IDC_STATIC, IDC_LIST,
2037 "&Modify...", IDC_CHANGE,
2038 "Red:", IDC_RSTATIC, IDC_RVALUE,
2039 "Green:", IDC_GSTATIC, IDC_GVALUE,
2040 "Blue:", IDC_BSTATIC, IDC_BVALUE, NULL);
2041
2042 CheckDlgButton (hwnd, IDC_BOLDCOLOUR, cfg.bold_colour);
2043 CheckDlgButton (hwnd, IDC_PALETTE, cfg.try_palette);
2044 {
2045 int i;
2046 for (i=0; i<22; i++)
2047 if (cfg.bold_colour || permanent[i])
2048 SendDlgItemMessage (hwnd, IDC_LIST, LB_ADDSTRING, 0,
2049 (LPARAM) colours[i]);
2050 }
2051 SendDlgItemMessage (hwnd, IDC_LIST, LB_SETCURSEL, 0, 0);
2052 SetDlgItemInt (hwnd, IDC_RVALUE, cfg.colours[0][0], FALSE);
2053 SetDlgItemInt (hwnd, IDC_GVALUE, cfg.colours[0][1], FALSE);
2054 SetDlgItemInt (hwnd, IDC_BVALUE, cfg.colours[0][2], FALSE);
2055 break;
2056 case WM_COMMAND:
2057 switch (LOWORD(wParam)) {
2058 case IDC_BOLDCOLOUR:
2059 if (HIWORD(wParam) == BN_CLICKED ||
2060 HIWORD(wParam) == BN_DOUBLECLICKED) {
2061 int n, i;
2062 cfg.bold_colour = IsDlgButtonChecked (hwnd, IDC_BOLDCOLOUR);
2063 n = SendDlgItemMessage (hwnd, IDC_LIST, LB_GETCOUNT, 0, 0);
2064 if (cfg.bold_colour && n!=22) {
2065 for (i=0; i<22; i++)
2066 if (!permanent[i])
2067 SendDlgItemMessage (hwnd, IDC_LIST,
2068 LB_INSERTSTRING, i,
2069 (LPARAM) colours[i]);
2070 } else if (!cfg.bold_colour && n!=12) {
2071 for (i=22; i-- ;)
2072 if (!permanent[i])
2073 SendDlgItemMessage (hwnd, IDC_LIST,
2074 LB_DELETESTRING, i, 0);
2075 }
2076 }
2077 break;
2078 case IDC_PALETTE:
2079 if (HIWORD(wParam) == BN_CLICKED ||
2080 HIWORD(wParam) == BN_DOUBLECLICKED)
2081 cfg.try_palette = IsDlgButtonChecked (hwnd, IDC_PALETTE);
2082 break;
2083 case IDC_LIST:
2084 if (HIWORD(wParam) == LBN_DBLCLK ||
2085 HIWORD(wParam) == LBN_SELCHANGE) {
2086 int i = SendDlgItemMessage (hwnd, IDC_LIST, LB_GETCURSEL,
2087 0, 0);
2088 if (!cfg.bold_colour)
2089 i = (i < 3 ? i*2 : i == 3 ? 5 : i*2-2);
2090 SetDlgItemInt (hwnd, IDC_RVALUE, cfg.colours[i][0], FALSE);
2091 SetDlgItemInt (hwnd, IDC_GVALUE, cfg.colours[i][1], FALSE);
2092 SetDlgItemInt (hwnd, IDC_BVALUE, cfg.colours[i][2], FALSE);
2093 }
2094 break;
2095 case IDC_CHANGE:
2096 if (HIWORD(wParam) == BN_CLICKED ||
2097 HIWORD(wParam) == BN_DOUBLECLICKED) {
2098 static CHOOSECOLOR cc;
2099 static DWORD custom[16] = {0}; /* zero initialisers */
2100 int i = SendDlgItemMessage (hwnd, IDC_LIST, LB_GETCURSEL,
2101 0, 0);
2102 if (!cfg.bold_colour)
2103 i = (i < 3 ? i*2 : i == 3 ? 5 : i*2-2);
2104 cc.lStructSize = sizeof(cc);
2105 cc.hwndOwner = hwnd;
2106 cc.hInstance = (HWND)hinst;
2107 cc.lpCustColors = custom;
2108 cc.rgbResult = RGB (cfg.colours[i][0], cfg.colours[i][1],
2109 cfg.colours[i][2]);
2110 cc.Flags = CC_FULLOPEN | CC_RGBINIT;
2111 if (ChooseColor(&cc)) {
2112 cfg.colours[i][0] =
2113 (unsigned char) (cc.rgbResult & 0xFF);
2114 cfg.colours[i][1] =
2115 (unsigned char) (cc.rgbResult >> 8) & 0xFF;
2116 cfg.colours[i][2] =
2117 (unsigned char) (cc.rgbResult >> 16) & 0xFF;
2118 SetDlgItemInt (hwnd, IDC_RVALUE, cfg.colours[i][0],
2119 FALSE);
2120 SetDlgItemInt (hwnd, IDC_GVALUE, cfg.colours[i][1],
2121 FALSE);
2122 SetDlgItemInt (hwnd, IDC_BVALUE, cfg.colours[i][2],
2123 FALSE);
2124 }
2125 }
2126 break;
2127 }
2128 break;
2129 }
2130 return GeneralPanelProc (hwnd, msg, wParam, lParam);
2131 }
2132
2133 static int CALLBACK TranslationProc (HWND hwnd, UINT msg,
2134 WPARAM wParam, LPARAM lParam) {
2135 struct ctlpos cp;
2136 enum { controlstartvalue = 1000,
2137 IDC_XLATSTATIC,
2138 IDC_NOXLAT,
2139 IDC_KOI8WIN1251,
2140 IDC_88592WIN1250,
2141 IDC_CAPSLOCKCYR,
2142 IDC_VTSTATIC,
2143 IDC_VTXWINDOWS,
2144 IDC_VTOEMANSI,
2145 IDC_VTOEMONLY,
2146 IDC_VTPOORMAN
2147 };
2148
2149 switch (msg) {
2150 case WM_INITDIALOG:
2151 /* Accelerators used: [aco] beiknpsx */
2152 ctlposinit(&cp, hwnd);
2153 radiobig(&cp,
2154 "Handling of VT100 line drawing characters:", IDC_VTSTATIC,
2155 "Font has &XWindows encoding", IDC_VTXWINDOWS,
2156 "Use font in &both ANSI and OEM modes", IDC_VTOEMANSI,
2157 "Use font in O&EM mode only", IDC_VTOEMONLY,
2158 "&Poor man's line drawing (""+"", ""-"" and ""|"")",
2159 IDC_VTPOORMAN, NULL);
2160 radiobig(&cp,
2161 "Character set translation:", IDC_XLATSTATIC,
2162 "&None", IDC_NOXLAT,
2163 "&KOI8 / Win-1251", IDC_KOI8WIN1251,
2164 "&ISO-8859-2 / Win-1250", IDC_88592WIN1250, NULL);
2165 checkbox(&cp, "CAP&S LOCK acts as cyrillic switch", IDC_CAPSLOCKCYR);
2166
2167 CheckRadioButton (hwnd, IDC_NOXLAT, IDC_88592WIN1250,
2168 cfg.xlat_88592w1250 ? IDC_88592WIN1250 :
2169 cfg.xlat_enablekoiwin ? IDC_KOI8WIN1251 :
2170 IDC_NOXLAT);
2171 CheckDlgButton (hwnd, IDC_CAPSLOCKCYR, cfg.xlat_capslockcyr);
2172 CheckRadioButton (hwnd, IDC_VTXWINDOWS, IDC_VTPOORMAN,
2173 cfg.vtmode == VT_XWINDOWS ? IDC_VTXWINDOWS :
2174 cfg.vtmode == VT_OEMANSI ? IDC_VTOEMANSI :
2175 cfg.vtmode == VT_OEMONLY ? IDC_VTOEMONLY :
2176 IDC_VTPOORMAN);
2177 case WM_COMMAND:
2178 switch (LOWORD(wParam)) {
2179 case IDC_NOXLAT:
2180 case IDC_KOI8WIN1251:
2181 case IDC_88592WIN1250:
2182 cfg.xlat_enablekoiwin =
2183 IsDlgButtonChecked (hwnd, IDC_KOI8WIN1251);
2184 cfg.xlat_88592w1250 =
2185 IsDlgButtonChecked (hwnd, IDC_88592WIN1250);
2186 break;
2187 case IDC_CAPSLOCKCYR:
2188 if (HIWORD(wParam) == BN_CLICKED ||
2189 HIWORD(wParam) == BN_DOUBLECLICKED) {
2190 cfg.xlat_capslockcyr =
2191 IsDlgButtonChecked (hwnd, IDC_CAPSLOCKCYR);
2192 }
2193 break;
2194 case IDC_VTXWINDOWS:
2195 case IDC_VTOEMANSI:
2196 case IDC_VTOEMONLY:
2197 case IDC_VTPOORMAN:
2198 cfg.vtmode =
2199 (IsDlgButtonChecked (hwnd, IDC_VTXWINDOWS) ? VT_XWINDOWS :
2200 IsDlgButtonChecked (hwnd, IDC_VTOEMANSI) ? VT_OEMANSI :
2201 IsDlgButtonChecked (hwnd, IDC_VTOEMONLY) ? VT_OEMONLY :
2202 VT_POORMAN);
2203 break;
2204 }
2205 }
2206 return GeneralPanelProc (hwnd, msg, wParam, lParam);
2207 }
2208
2209 static DLGPROC panelproc[NPANELS] = {
2210 ConnectionProc, KeyboardProc, TerminalProc, WindowProc,
2211 TelnetProc, SshProc, SelectionProc, ColourProc, TranslationProc
2212 };
2213
2214 static char *names[NPANELS] = {
2215 "Connection", "Keyboard", "Terminal", "Window", "Telnet",
2216 "SSH", "Selection", "Colours", "Translation"
2217 };
2218
2219 static int mainp[MAIN_NPANELS] = { 0, 1, 2, 3, 4, 5, 6, 7, 8};
2220 static int reconfp[RECONF_NPANELS] = { 1, 2, 3, 6, 7, 8};
2221
2222 static HWND makesubdialog(HWND hwnd, int x, int y, int w, int h, int n) {
2223 RECT r;
2224 HWND ret;
2225 WPARAM font;
2226 r.left = x; r.top = y;
2227 r.right = r.left + w; r.bottom = r.top + h;
2228 MapDialogRect(hwnd, &r);
2229 ret = CreateWindowEx(WS_EX_CONTROLPARENT,
2230 WC_DIALOG, "", /* no title */
2231 WS_CHILD | WS_VISIBLE | DS_SETFONT,
2232 r.left, r.top,
2233 r.right-r.left, r.bottom-r.top,
2234 hwnd, (HMENU)IDC_SUBDLG,
2235 hinst, NULL);
2236 SetWindowLong (ret, DWL_DLGPROC, (LONG)panelproc[n]);
2237 font = SendMessage(hwnd, WM_GETFONT, 0, 0);
2238 SendMessage (ret, WM_SETFONT, font, MAKELPARAM(0, 0));
2239 SendMessage (ret, WM_INITDIALOG, 0, 0);
2240 return ret;
2241 }
2242
2243 static int GenericMainDlgProc (HWND hwnd, UINT msg,
2244 WPARAM wParam, LPARAM lParam,
2245 int npanels, int *panelnums, HWND *page) {
2246 HWND hw, tabctl;
2247
2248 switch (msg) {
2249 case WM_INITDIALOG:
2250 { /* centre the window */
2251 RECT rs, rd;
2252
2253 hw = GetDesktopWindow();
2254 if (GetWindowRect (hw, &rs) && GetWindowRect (hwnd, &rd))
2255 MoveWindow (hwnd, (rs.right + rs.left + rd.left - rd.right)/2,
2256 (rs.bottom + rs.top + rd.top - rd.bottom)/2,
2257 rd.right-rd.left, rd.bottom-rd.top, TRUE);
2258 }
2259 {
2260 RECT r;
2261 r.left = 3; r.right = r.left + 174;
2262 r.top = 3; r.bottom = r.top + 193;
2263 MapDialogRect(hwnd, &r);
2264 tabctl = CreateWindowEx(0, WC_TABCONTROL, "",
2265 WS_CHILD | WS_VISIBLE |
2266 WS_TABSTOP | TCS_MULTILINE,
2267 r.left, r.top,
2268 r.right-r.left, r.bottom-r.top,
2269 hwnd, (HMENU)IDC_TAB, hinst, NULL);
2270
2271 if (!tabctl) {
2272 struct ctlpos cp;
2273 ctlposinit2(&cp, hwnd);
2274 ersatztab(&cp, "Category:", IDC_TABSTATIC1, IDC_TABLIST,
2275 IDC_TABSTATIC2);
2276 } else {
2277 WPARAM font = SendMessage(hwnd, WM_GETFONT, 0, 0);
2278 SendMessage(tabctl, WM_SETFONT, font, MAKELPARAM(TRUE, 0));
2279 }
2280 }
2281 *page = NULL;
2282 if (tabctl) { /* initialise the tab control */
2283 TC_ITEMHEADER tab;
2284 int i;
2285
2286 for (i=0; i<npanels; i++) {
2287 tab.mask = TCIF_TEXT;
2288 tab.pszText = names[panelnums[i]];
2289 TabCtrl_InsertItem (tabctl, i, &tab);
2290 }
2291 } else {
2292 int i;
2293
2294 for (i=0; i<npanels; i++) {
2295 SendDlgItemMessage(hwnd, IDC_TABLIST, CB_ADDSTRING,
2296 0, (LPARAM)names[panelnums[i]]);
2297 }
2298 SendDlgItemMessage(hwnd, IDC_TABLIST, CB_SETCURSEL, 0, 0);
2299 }
2300 *page = makesubdialog(hwnd, 6, 30, 168, 163, panelnums[0]);
2301 SetFocus (*page);
2302 return 0;
2303 case WM_NOTIFY:
2304 if (LOWORD(wParam) == IDC_TAB &&
2305 ((LPNMHDR)lParam)->code == TCN_SELCHANGE) {
2306 int i = TabCtrl_GetCurSel(((LPNMHDR)lParam)->hwndFrom);
2307 if (*page)
2308 DestroyWindow (*page);
2309 *page = makesubdialog(hwnd, 6, 30, 168, 163, panelnums[i]);
2310 SetFocus (((LPNMHDR)lParam)->hwndFrom); /* ensure focus stays */
2311 return 0;
2312 }
2313 break;
2314 case WM_COMMAND:
2315 switch (LOWORD(wParam)) {
2316 case IDC_TABLIST:
2317 if (HIWORD(wParam) == CBN_SELCHANGE) {
2318 HWND tablist = GetDlgItem (hwnd, IDC_TABLIST);
2319 int i = SendMessage (tablist, CB_GETCURSEL, 0, 0);
2320 if (*page)
2321 DestroyWindow (*page);
2322 *page = makesubdialog(hwnd, 6, 30, 168, 163, panelnums[i]);
2323 SetFocus(tablist); /* ensure focus stays */
2324 return 0;
2325 }
2326 break;
2327 case IDOK:
2328 if (*cfg.host)
2329 EndDialog (hwnd, 1);
2330 else
2331 MessageBeep (0);
2332 return 0;
2333 case IDCANCEL:
2334 EndDialog (hwnd, 0);
2335 return 0;
2336 }
2337 return 0;
2338 case WM_CLOSE:
2339 EndDialog (hwnd, 0);
2340 return 0;
2341
2342 /* Grrr Explorer will maximize Dialogs! */
2343 case WM_SIZE:
2344 if (wParam == SIZE_MAXIMIZED)
2345 force_normal(hwnd);
2346 return 0;
2347 }
2348 return 0;
2349 }
2350
2351 static int CALLBACK MainDlgProc (HWND hwnd, UINT msg,
2352 WPARAM wParam, LPARAM lParam) {
2353 static HWND page = NULL;
2354
2355 if (msg == WM_COMMAND && LOWORD(wParam) == IDOK) {
2356 }
2357 if (msg == WM_COMMAND && LOWORD(wParam) == IDC_ABOUT) {
2358 EnableWindow(hwnd, 0);
2359 DialogBox(hinst, MAKEINTRESOURCE(IDD_ABOUTBOX),
2360 GetParent(hwnd), AboutProc);
2361 EnableWindow(hwnd, 1);
2362 SetActiveWindow(hwnd);
2363 }
2364 return GenericMainDlgProc (hwnd, msg, wParam, lParam,
2365 MAIN_NPANELS, mainp, &page);
2366 }
2367
2368 static int CALLBACK ReconfDlgProc (HWND hwnd, UINT msg,
2369 WPARAM wParam, LPARAM lParam) {
2370 static HWND page;
2371 return GenericMainDlgProc (hwnd, msg, wParam, lParam,
2372 RECONF_NPANELS, reconfp, &page);
2373 }
2374
2375 void get_sesslist(int allocate) {
2376 static char otherbuf[2048];
2377 static char *buffer;
2378 int buflen, bufsize, i;
2379 char *p, *ret;
2380 void *handle;
2381
2382 if (allocate) {
2383
2384 if ((handle = enum_settings_start()) == NULL)
2385 return;
2386
2387 buflen = bufsize = 0;
2388 buffer = NULL;
2389 do {
2390 ret = enum_settings_next(handle, otherbuf, sizeof(otherbuf));
2391 if (ret) {
2392 int len = strlen(otherbuf)+1;
2393 if (bufsize < buflen+len) {
2394 bufsize = buflen + len + 2048;
2395 buffer = srealloc(buffer, bufsize);
2396 }
2397 strcpy(buffer+buflen, otherbuf);
2398 buflen += strlen(buffer+buflen)+1;
2399 }
2400 } while (ret);
2401 enum_settings_finish(handle);
2402 buffer = srealloc(buffer, buflen+1);
2403 buffer[buflen] = '\0';
2404
2405 p = buffer;
2406 nsessions = 1; /* "Default Settings" counts as one */
2407 while (*p) {
2408 if (strcmp(p, "Default Settings"))
2409 nsessions++;
2410 while (*p) p++;
2411 p++;
2412 }
2413
2414 sessions = smalloc(nsessions * sizeof(char *));
2415 sessions[0] = "Default Settings";
2416 p = buffer;
2417 i = 1;
2418 while (*p) {
2419 if (strcmp(p, "Default Settings"))
2420 sessions[i++] = p;
2421 while (*p) p++;
2422 p++;
2423 }
2424 } else {
2425 sfree (buffer);
2426 sfree (sessions);
2427 }
2428 }
2429
2430 int do_config (void) {
2431 int ret;
2432
2433 get_sesslist(TRUE);
2434 savedsession[0] = '\0';
2435 ret = DialogBox (hinst, MAKEINTRESOURCE(IDD_MAINBOX), NULL, MainDlgProc);
2436 get_sesslist(FALSE);
2437
2438 return ret;
2439 }
2440
2441 int do_reconfig (HWND hwnd) {
2442 Config backup_cfg;
2443 int ret;
2444
2445 backup_cfg = cfg; /* structure copy */
2446 ret = DialogBox (hinst, MAKEINTRESOURCE(IDD_RECONF), hwnd, ReconfDlgProc);
2447 if (!ret)
2448 cfg = backup_cfg; /* structure copy */
2449 else
2450 force_normal(hwnd);
2451
2452 return ret;
2453 }
2454
2455 void do_defaults (char *session) {
2456 if (session)
2457 load_settings (session, TRUE);
2458 else
2459 load_settings ("Default Settings", FALSE);
2460 }
2461
2462 void logevent (char *string) {
2463 if (nevents >= negsize) {
2464 negsize += 64;
2465 events = srealloc (events, negsize * sizeof(*events));
2466 }
2467 events[nevents] = smalloc(1+strlen(string));
2468 strcpy (events[nevents], string);
2469 nevents++;
2470 if (logbox) {
2471 int count;
2472 SendDlgItemMessage (logbox, IDN_LIST, LB_ADDSTRING,
2473 0, (LPARAM)string);
2474 count = SendDlgItemMessage (logbox, IDN_LIST, LB_GETCOUNT, 0, 0);
2475 SendDlgItemMessage (logbox, IDN_LIST, LB_SETTOPINDEX, count-1, 0);
2476 }
2477 }
2478
2479 void showeventlog (HWND hwnd) {
2480 if (!logbox) {
2481 logbox = CreateDialog (hinst, MAKEINTRESOURCE(IDD_LOGBOX),
2482 hwnd, LogProc);
2483 ShowWindow (logbox, SW_SHOWNORMAL);
2484 }
2485 }
2486
2487 void showabout (HWND hwnd) {
2488 if (!abtbox) {
2489 abtbox = CreateDialog (hinst, MAKEINTRESOURCE(IDD_ABOUTBOX),
2490 hwnd, AboutProc);
2491 ShowWindow (abtbox, SW_SHOWNORMAL);
2492 }
2493 }
2494
2495 void verify_ssh_host_key(char *host, int port, char *keytype,
2496 char *keystr, char *fingerprint) {
2497 int ret;
2498
2499 static const char absentmsg[] =
2500 "The server's host key is not cached in the registry. You\n"
2501 "have no guarantee that the server is the computer you\n"
2502 "think it is.\n"
2503 "The server's key fingerprint is:\n"
2504 "%s\n"
2505 "If you trust this host, hit Yes to add the key to\n"
2506 "PuTTY's cache and carry on connecting.\n"
2507 "If you do not trust this host, hit No to abandon the\n"
2508 "connection.\n";
2509
2510 static const char wrongmsg[] =
2511 "WARNING - POTENTIAL SECURITY BREACH!\n"
2512 "\n"
2513 "The server's host key does not match the one PuTTY has\n"
2514 "cached in the registry. This means that either the\n"
2515 "server administrator has changed the host key, or you\n"
2516 "have actually connected to another computer pretending\n"
2517 "to be the server.\n"
2518 "The new key fingerprint is:\n"
2519 "%s\n"
2520 "If you were expecting this change and trust the new key,\n"
2521 "hit Yes to update PuTTY's cache and continue connecting.\n"
2522 "If you want to carry on connecting but without updating\n"
2523 "the cache, hit No.\n"
2524 "If you want to abandon the connection completely, hit\n"
2525 "Cancel. Hitting Cancel is the ONLY guaranteed safe\n"
2526 "choice.\n";
2527
2528 static const char mbtitle[] = "PuTTY Security Alert";
2529
2530
2531 char message[160+ /* sensible fingerprint max size */
2532 (sizeof(absentmsg) > sizeof(wrongmsg) ?
2533 sizeof(absentmsg) : sizeof(wrongmsg))];
2534
2535 /*
2536 * Verify the key against the registry.
2537 */
2538 ret = verify_host_key(host, port, keytype, keystr);
2539
2540 if (ret == 0) /* success - key matched OK */
2541 return;
2542 if (ret == 2) { /* key was different */
2543 int mbret;
2544 sprintf(message, wrongmsg, fingerprint);
2545 mbret = MessageBox(NULL, message, mbtitle,
2546 MB_ICONWARNING | MB_YESNOCANCEL);
2547 if (mbret == IDYES)
2548 store_host_key(host, port, keytype, keystr);
2549 if (mbret == IDCANCEL)
2550 exit(0);
2551 }
2552 if (ret == 1) { /* key was absent */
2553 int mbret;
2554 sprintf(message, absentmsg, fingerprint);
2555 mbret = MessageBox(NULL, message, mbtitle,
2556 MB_ICONWARNING | MB_YESNO);
2557 if (mbret == IDNO)
2558 exit(0);
2559 store_host_key(host, port, keytype, keystr);
2560 }
2561 }
Local modifications for Simon Tatham's `PuTTY' SSH client and terminal emulator