projects / u / mdw / putty / blob
? search:
summary | shortlog | log | commit | commitdiff | tree
blame | history | raw | HEAD
Move omission of SSH protocol setting in PuTTYtel into windlg.c and
[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 if (backends[2].backend == NULL) {
1095 /* this is PuTTYtel, so only two protocols available */
1096 radioline(&cp, "Protocol:", IDC_PROTSTATIC, 3,
1097 "&Raw", IDC_PROTRAW,
1098 "&Telnet", IDC_PROTTELNET, NULL);
1099 } else {
1100 radioline(&cp, "Protocol:", IDC_PROTSTATIC, 3,
1101 "&Raw", IDC_PROTRAW,
1102 "&Telnet", IDC_PROTTELNET,
1103 #ifdef FWHACK
1104 "SS&H/hack",
1105 #else
1106 "SS&H",
1107 #endif
1108 IDC_PROTSSH, NULL);
1109 }
1110 sesssaver(&cp, "Stor&ed Sessions",
1111 IDC_SESSSTATIC, IDC_SESSEDIT, IDC_SESSLIST,
1112 "&Load", IDC_SESSLOAD,
1113 "&Save", IDC_SESSSAVE,
1114 "&Delete", IDC_SESSDEL, NULL);
1115 checkbox(&cp, "Close Window on E&xit", IDC_CLOSEEXIT);
1116 checkbox(&cp, "&Warn on Close", IDC_CLOSEWARN);
1117
1118 SetDlgItemText (hwnd, IDC_HOST, cfg.host);
1119 SetDlgItemText (hwnd, IDC_SESSEDIT, savedsession);
1120 SetDlgItemInt (hwnd, IDC_PORT, cfg.port, FALSE);
1121 for (i = 0; i < nsessions; i++)
1122 SendDlgItemMessage (hwnd, IDC_SESSLIST, LB_ADDSTRING,
1123 0, (LPARAM) (sessions[i]));
1124 CheckRadioButton (hwnd, IDC_PROTRAW, IDC_PROTSSH,
1125 cfg.protocol==PROT_SSH ? IDC_PROTSSH :
1126 cfg.protocol==PROT_TELNET ? IDC_PROTTELNET : IDC_PROTRAW );
1127 CheckDlgButton (hwnd, IDC_CLOSEEXIT, cfg.close_on_exit);
1128 CheckDlgButton (hwnd, IDC_CLOSEWARN, cfg.warn_on_close);
1129 break;
1130 case WM_LBUTTONUP:
1131 /*
1132 * Button release should trigger WM_OK if there was a
1133 * previous double click on the session list.
1134 */
1135 ReleaseCapture();
1136 if (readytogo)
1137 SendMessage (GetParent(hwnd), WM_COMMAND, IDOK, 0);
1138 break;
1139 case WM_COMMAND:
1140 switch (LOWORD(wParam)) {
1141 case IDC_PROTTELNET:
1142 case IDC_PROTSSH:
1143 case IDC_PROTRAW:
1144 if (HIWORD(wParam) == BN_CLICKED ||
1145 HIWORD(wParam) == BN_DOUBLECLICKED) {
1146 int i = IsDlgButtonChecked (hwnd, IDC_PROTSSH);
1147 int j = IsDlgButtonChecked (hwnd, IDC_PROTTELNET);
1148 cfg.protocol = i ? PROT_SSH : j ? PROT_TELNET : PROT_RAW ;
1149 if ((cfg.protocol == PROT_SSH && cfg.port == 23) ||
1150 (cfg.protocol == PROT_TELNET && cfg.port == 22)) {
1151 cfg.port = i ? 22 : 23;
1152 SetDlgItemInt (hwnd, IDC_PORT, cfg.port, FALSE);
1153 }
1154 }
1155 break;
1156 case IDC_HOST:
1157 if (HIWORD(wParam) == EN_CHANGE)
1158 GetDlgItemText (hwnd, IDC_HOST, cfg.host,
1159 sizeof(cfg.host)-1);
1160 break;
1161 case IDC_PORT:
1162 if (HIWORD(wParam) == EN_CHANGE)
1163 MyGetDlgItemInt (hwnd, IDC_PORT, &cfg.port);
1164 break;
1165 case IDC_CLOSEEXIT:
1166 if (HIWORD(wParam) == BN_CLICKED ||
1167 HIWORD(wParam) == BN_DOUBLECLICKED)
1168 cfg.close_on_exit = IsDlgButtonChecked (hwnd, IDC_CLOSEEXIT);
1169 break;
1170 case IDC_CLOSEWARN:
1171 if (HIWORD(wParam) == BN_CLICKED ||
1172 HIWORD(wParam) == BN_DOUBLECLICKED)
1173 cfg.warn_on_close = IsDlgButtonChecked (hwnd, IDC_CLOSEWARN);
1174 break;
1175 case IDC_SESSEDIT:
1176 if (HIWORD(wParam) == EN_CHANGE) {
1177 SendDlgItemMessage (hwnd, IDC_SESSLIST, LB_SETCURSEL,
1178 (WPARAM) -1, 0);
1179 GetDlgItemText (hwnd, IDC_SESSEDIT,
1180 savedsession, sizeof(savedsession)-1);
1181 savedsession[sizeof(savedsession)-1] = '\0';
1182 }
1183 break;
1184 case IDC_SESSSAVE:
1185 if (HIWORD(wParam) == BN_CLICKED ||
1186 HIWORD(wParam) == BN_DOUBLECLICKED) {
1187 /*
1188 * Save a session
1189 */
1190 char str[2048];
1191 GetDlgItemText (hwnd, IDC_SESSEDIT, str, sizeof(str)-1);
1192 if (!*str) {
1193 int n = SendDlgItemMessage (hwnd, IDC_SESSLIST,
1194 LB_GETCURSEL, 0, 0);
1195 if (n == LB_ERR) {
1196 MessageBeep(0);
1197 break;
1198 }
1199 strcpy (str, sessions[n]);
1200 }
1201 save_settings (str, !!strcmp(str, "Default Settings"));
1202 get_sesslist (FALSE);
1203 get_sesslist (TRUE);
1204 SendDlgItemMessage (hwnd, IDC_SESSLIST, LB_RESETCONTENT,
1205 0, 0);
1206 for (i = 0; i < nsessions; i++)
1207 SendDlgItemMessage (hwnd, IDC_SESSLIST, LB_ADDSTRING,
1208 0, (LPARAM) (sessions[i]));
1209 SendDlgItemMessage (hwnd, IDC_SESSLIST, LB_SETCURSEL,
1210 (WPARAM) -1, 0);
1211 }
1212 break;
1213 case IDC_SESSLIST:
1214 case IDC_SESSLOAD:
1215 if (LOWORD(wParam) == IDC_SESSLOAD &&
1216 HIWORD(wParam) != BN_CLICKED &&
1217 HIWORD(wParam) != BN_DOUBLECLICKED)
1218 break;
1219 if (LOWORD(wParam) == IDC_SESSLIST &&
1220 HIWORD(wParam) != LBN_DBLCLK)
1221 break;
1222 {
1223 int n = SendDlgItemMessage (hwnd, IDC_SESSLIST,
1224 LB_GETCURSEL, 0, 0);
1225 if (n == LB_ERR) {
1226 MessageBeep(0);
1227 break;
1228 }
1229 load_settings (sessions[n],
1230 !!strcmp(sessions[n], "Default Settings"));
1231 SetDlgItemText (hwnd, IDC_HOST, cfg.host);
1232 SetDlgItemInt (hwnd, IDC_PORT, cfg.port, FALSE);
1233 CheckRadioButton (hwnd, IDC_PROTRAW, IDC_PROTSSH,
1234 (cfg.protocol==PROT_SSH ? IDC_PROTSSH :
1235 cfg.protocol==PROT_TELNET ? IDC_PROTTELNET : IDC_PROTRAW));
1236 CheckDlgButton (hwnd, IDC_CLOSEEXIT, cfg.close_on_exit);
1237 CheckDlgButton (hwnd, IDC_CLOSEWARN, cfg.warn_on_close);
1238 SendDlgItemMessage (hwnd, IDC_SESSLIST, LB_SETCURSEL,
1239 (WPARAM) -1, 0);
1240 }
1241 if (LOWORD(wParam) == IDC_SESSLIST) {
1242 /*
1243 * A double-click on a saved session should
1244 * actually start the session, not just load it.
1245 * Unless it's Default Settings or some other
1246 * host-less set of saved settings.
1247 */
1248 if (*cfg.host) {
1249 readytogo = TRUE;
1250 SetCapture(hwnd);
1251 }
1252 }
1253 break;
1254 case IDC_SESSDEL:
1255 if (HIWORD(wParam) == BN_CLICKED ||
1256 HIWORD(wParam) == BN_DOUBLECLICKED) {
1257 int n = SendDlgItemMessage (hwnd, IDC_SESSLIST,
1258 LB_GETCURSEL, 0, 0);
1259 if (n == LB_ERR || n == 0) {
1260 MessageBeep(0);
1261 break;
1262 }
1263 del_settings(sessions[n]);
1264 get_sesslist (FALSE);
1265 get_sesslist (TRUE);
1266 SendDlgItemMessage (hwnd, IDC_SESSLIST, LB_RESETCONTENT,
1267 0, 0);
1268 for (i = 0; i < nsessions; i++)
1269 SendDlgItemMessage (hwnd, IDC_SESSLIST, LB_ADDSTRING,
1270 0, (LPARAM) (sessions[i]));
1271 SendDlgItemMessage (hwnd, IDC_SESSLIST, LB_SETCURSEL,
1272 (WPARAM) -1, 0);
1273 }
1274 }
1275 }
1276 return GeneralPanelProc (hwnd, msg, wParam, lParam);
1277 }
1278
1279 static int CALLBACK KeyboardProc (HWND hwnd, UINT msg,
1280 WPARAM wParam, LPARAM lParam) {
1281 struct ctlpos cp;
1282 enum { controlstartvalue = 1000,
1283 IDC_DELSTATIC,
1284 IDC_DEL008,
1285 IDC_DEL127,
1286 IDC_HOMESTATIC,
1287 IDC_HOMETILDE,
1288 IDC_HOMERXVT,
1289 IDC_FUNCSTATIC,
1290 IDC_FUNCTILDE,
1291 IDC_FUNCLINUX,
1292 IDC_FUNCXTERM,
1293 IDC_KPSTATIC,
1294 IDC_KPNORMAL,
1295 IDC_KPAPPLIC,
1296 IDC_KPNH,
1297 IDC_CURSTATIC,
1298 IDC_CURNORMAL,
1299 IDC_CURAPPLIC,
1300 IDC_ALTF4,
1301 IDC_ALTSPACE,
1302 IDC_LDISCTERM,
1303 IDC_SCROLLKEY
1304 };
1305
1306 switch (msg) {
1307 case WM_INITDIALOG:
1308 /* Accelerators used: [aco] 4?ehiklmnprsuvxy */
1309 ctlposinit(&cp, hwnd);
1310 radioline(&cp, "Action of Backspace:", IDC_DELSTATIC, 2,
1311 "Control-&H", IDC_DEL008,
1312 "Control-&? (127)", IDC_DEL127, NULL);
1313 radioline(&cp, "Action of Home and End:", IDC_HOMESTATIC, 2,
1314 "&Standard", IDC_HOMETILDE,
1315 "&rxvt", IDC_HOMERXVT, NULL);
1316 radioline(&cp, "Function key and keypad layout:", IDC_FUNCSTATIC, 3,
1317 "&VT400", IDC_FUNCTILDE,
1318 "&Linux", IDC_FUNCLINUX,
1319 "&Xterm R6", IDC_FUNCXTERM, NULL);
1320 radioline(&cp, "Initial state of cursor keys:", IDC_CURSTATIC, 2,
1321 "&Normal", IDC_CURNORMAL,
1322 "A&pplication", IDC_CURAPPLIC, NULL);
1323 radioline(&cp, "Initial state of numeric keypad:", IDC_KPSTATIC, 3,
1324 "Nor&mal", IDC_KPNORMAL,
1325 "Appl&ication", IDC_KPAPPLIC,
1326 "N&etHack", IDC_KPNH, NULL);
1327 checkbox(&cp, "ALT-F&4 is special (closes window)", IDC_ALTF4);
1328 checkbox(&cp, "ALT-Space is special (S&ystem menu)", IDC_ALTSPACE);
1329 checkbox(&cp, "&Use local terminal line discipline", IDC_LDISCTERM);
1330 checkbox(&cp, "Reset scrollback on &keypress", IDC_SCROLLKEY);
1331
1332 CheckRadioButton (hwnd, IDC_DEL008, IDC_DEL127,
1333 cfg.bksp_is_delete ? IDC_DEL127 : IDC_DEL008);
1334 CheckRadioButton (hwnd, IDC_HOMETILDE, IDC_HOMERXVT,
1335 cfg.rxvt_homeend ? IDC_HOMERXVT : IDC_HOMETILDE);
1336 CheckRadioButton (hwnd, IDC_FUNCTILDE, IDC_FUNCXTERM,
1337 cfg.funky_type ?
1338 (cfg.funky_type==2 ? IDC_FUNCXTERM
1339 : IDC_FUNCLINUX )
1340 : IDC_FUNCTILDE);
1341 CheckRadioButton (hwnd, IDC_CURNORMAL, IDC_CURAPPLIC,
1342 cfg.app_cursor ? IDC_CURAPPLIC : IDC_CURNORMAL);
1343 CheckRadioButton (hwnd, IDC_KPNORMAL, IDC_KPNH,
1344 cfg.nethack_keypad ? IDC_KPNH :
1345 cfg.app_keypad ? IDC_KPAPPLIC : IDC_KPNORMAL);
1346 CheckDlgButton (hwnd, IDC_ALTF4, cfg.alt_f4);
1347 CheckDlgButton (hwnd, IDC_ALTSPACE, cfg.alt_space);
1348 CheckDlgButton (hwnd, IDC_LDISCTERM, cfg.ldisc_term);
1349 CheckDlgButton (hwnd, IDC_SCROLLKEY, cfg.scroll_on_key);
1350 break;
1351 case WM_COMMAND:
1352 if (HIWORD(wParam) == BN_CLICKED ||
1353 HIWORD(wParam) == BN_DOUBLECLICKED)
1354 switch (LOWORD(wParam)) {
1355 case IDC_DEL008:
1356 case IDC_DEL127:
1357 cfg.bksp_is_delete = IsDlgButtonChecked (hwnd, IDC_DEL127);
1358 break;
1359 case IDC_HOMETILDE:
1360 case IDC_HOMERXVT:
1361 cfg.rxvt_homeend = IsDlgButtonChecked (hwnd, IDC_HOMERXVT);
1362 break;
1363 case IDC_FUNCXTERM:
1364 cfg.funky_type = 2;
1365 break;
1366 case IDC_FUNCTILDE:
1367 case IDC_FUNCLINUX:
1368 cfg.funky_type = IsDlgButtonChecked (hwnd, IDC_FUNCLINUX);
1369 break;
1370 case IDC_KPNORMAL:
1371 case IDC_KPAPPLIC:
1372 cfg.app_keypad = IsDlgButtonChecked (hwnd, IDC_KPAPPLIC);
1373 cfg.nethack_keypad = FALSE;
1374 break;
1375 case IDC_KPNH:
1376 cfg.app_keypad = FALSE;
1377 cfg.nethack_keypad = TRUE;
1378 break;
1379 case IDC_CURNORMAL:
1380 case IDC_CURAPPLIC:
1381 cfg.app_cursor = IsDlgButtonChecked (hwnd, IDC_CURAPPLIC);
1382 break;
1383 case IDC_ALTF4:
1384 if (HIWORD(wParam) == BN_CLICKED ||
1385 HIWORD(wParam) == BN_DOUBLECLICKED)
1386 cfg.alt_f4 = IsDlgButtonChecked (hwnd, IDC_ALTF4);
1387 break;
1388 case IDC_ALTSPACE:
1389 if (HIWORD(wParam) == BN_CLICKED ||
1390 HIWORD(wParam) == BN_DOUBLECLICKED)
1391 cfg.alt_space = IsDlgButtonChecked (hwnd, IDC_ALTSPACE);
1392 break;
1393 case IDC_LDISCTERM:
1394 if (HIWORD(wParam) == BN_CLICKED ||
1395 HIWORD(wParam) == BN_DOUBLECLICKED)
1396 cfg.ldisc_term = IsDlgButtonChecked (hwnd, IDC_LDISCTERM);
1397 break;
1398 case IDC_SCROLLKEY:
1399 if (HIWORD(wParam) == BN_CLICKED ||
1400 HIWORD(wParam) == BN_DOUBLECLICKED)
1401 cfg.scroll_on_key = IsDlgButtonChecked (hwnd, IDC_SCROLLKEY);
1402 break;
1403 }
1404 }
1405 return GeneralPanelProc (hwnd, msg, wParam, lParam);
1406 }
1407
1408 static void fmtfont (char *buf) {
1409 sprintf (buf, "Font: %s, ", cfg.font);
1410 if (cfg.fontisbold)
1411 strcat(buf, "bold, ");
1412 if (cfg.fontheight == 0)
1413 strcat (buf, "default height");
1414 else
1415 sprintf (buf+strlen(buf), "%d-%s",
1416 (cfg.fontheight < 0 ? -cfg.fontheight : cfg.fontheight),
1417 (cfg.fontheight < 0 ? "pixel" : "point"));
1418 }
1419
1420 static int CALLBACK TerminalProc (HWND hwnd, UINT msg,
1421 WPARAM wParam, LPARAM lParam) {
1422 struct ctlpos cp;
1423 CHOOSEFONT cf;
1424 LOGFONT lf;
1425 char fontstatic[256];
1426 enum { controlstartvalue = 1000,
1427 IDC_WRAPMODE,
1428 IDC_DECOM,
1429 IDC_DIMSTATIC,
1430 IDC_ROWSSTATIC,
1431 IDC_ROWSEDIT,
1432 IDC_COLSSTATIC,
1433 IDC_COLSEDIT,
1434 IDC_SAVESTATIC,
1435 IDC_SAVEEDIT,
1436 IDC_FONTSTATIC,
1437 IDC_CHOOSEFONT,
1438 IDC_LFHASCR,
1439 IDC_BEEP,
1440 IDC_BCE,
1441 IDC_BLINKTEXT
1442 };
1443
1444 switch (msg) {
1445 case WM_INITDIALOG:
1446 /* Accelerators used: [aco] dghlmnprsw */
1447 ctlposinit(&cp, hwnd);
1448 multiedit(&cp,
1449 "&Rows", IDC_ROWSSTATIC, IDC_ROWSEDIT, 33,
1450 "Colu&mns", IDC_COLSSTATIC, IDC_COLSEDIT, 33,
1451 "&Scrollback", IDC_SAVESTATIC, IDC_SAVEEDIT, 33,
1452 NULL);
1453 staticbtn(&cp, "", IDC_FONTSTATIC, "C&hange...", IDC_CHOOSEFONT);
1454 checkbox(&cp, "Auto &wrap mode initially on", IDC_WRAPMODE);
1455 checkbox(&cp, "&DEC Origin Mode initially on", IDC_DECOM);
1456 checkbox(&cp, "Implicit CR in every &LF", IDC_LFHASCR);
1457 checkbox(&cp, "Bee&p enabled", IDC_BEEP);
1458 checkbox(&cp, "Use Back&ground colour erase", IDC_BCE);
1459 checkbox(&cp, "Enable bli&nking text", IDC_BLINKTEXT);
1460
1461 CheckDlgButton (hwnd, IDC_WRAPMODE, cfg.wrap_mode);
1462 CheckDlgButton (hwnd, IDC_DECOM, cfg.dec_om);
1463 CheckDlgButton (hwnd, IDC_LFHASCR, cfg.lfhascr);
1464 SetDlgItemInt (hwnd, IDC_ROWSEDIT, cfg.height, FALSE);
1465 SetDlgItemInt (hwnd, IDC_COLSEDIT, cfg.width, FALSE);
1466 SetDlgItemInt (hwnd, IDC_SAVEEDIT, cfg.savelines, FALSE);
1467 fmtfont (fontstatic);
1468 SetDlgItemText (hwnd, IDC_FONTSTATIC, fontstatic);
1469 CheckDlgButton (hwnd, IDC_BEEP, cfg.beep);
1470 CheckDlgButton (hwnd, IDC_BCE, cfg.bce);
1471 CheckDlgButton (hwnd, IDC_BLINKTEXT, cfg.blinktext);
1472 break;
1473 case WM_COMMAND:
1474 switch (LOWORD(wParam)) {
1475 case IDC_WRAPMODE:
1476 if (HIWORD(wParam) == BN_CLICKED ||
1477 HIWORD(wParam) == BN_DOUBLECLICKED)
1478 cfg.wrap_mode = IsDlgButtonChecked (hwnd, IDC_WRAPMODE);
1479 break;
1480 case IDC_DECOM:
1481 if (HIWORD(wParam) == BN_CLICKED ||
1482 HIWORD(wParam) == BN_DOUBLECLICKED)
1483 cfg.dec_om = IsDlgButtonChecked (hwnd, IDC_DECOM);
1484 break;
1485 case IDC_LFHASCR:
1486 if (HIWORD(wParam) == BN_CLICKED ||
1487 HIWORD(wParam) == BN_DOUBLECLICKED)
1488 cfg.lfhascr = IsDlgButtonChecked (hwnd, IDC_LFHASCR);
1489 break;
1490 case IDC_ROWSEDIT:
1491 if (HIWORD(wParam) == EN_CHANGE)
1492 MyGetDlgItemInt (hwnd, IDC_ROWSEDIT, &cfg.height);
1493 break;
1494 case IDC_COLSEDIT:
1495 if (HIWORD(wParam) == EN_CHANGE)
1496 MyGetDlgItemInt (hwnd, IDC_COLSEDIT, &cfg.width);
1497 break;
1498 case IDC_SAVEEDIT:
1499 if (HIWORD(wParam) == EN_CHANGE)
1500 MyGetDlgItemInt (hwnd, IDC_SAVEEDIT, &cfg.savelines);
1501 break;
1502 case IDC_CHOOSEFONT:
1503 lf.lfHeight = cfg.fontheight;
1504 lf.lfWidth = lf.lfEscapement = lf.lfOrientation = 0;
1505 lf.lfItalic = lf.lfUnderline = lf.lfStrikeOut = 0;
1506 lf.lfWeight = (cfg.fontisbold ? FW_BOLD : 0);
1507 lf.lfCharSet = cfg.fontcharset;
1508 lf.lfOutPrecision = OUT_DEFAULT_PRECIS;
1509 lf.lfClipPrecision = CLIP_DEFAULT_PRECIS;
1510 lf.lfQuality = DEFAULT_QUALITY;
1511 lf.lfPitchAndFamily = FIXED_PITCH | FF_DONTCARE;
1512 strncpy (lf.lfFaceName, cfg.font, sizeof(lf.lfFaceName)-1);
1513 lf.lfFaceName[sizeof(lf.lfFaceName)-1] = '\0';
1514
1515 cf.lStructSize = sizeof(cf);
1516 cf.hwndOwner = hwnd;
1517 cf.lpLogFont = &lf;
1518 cf.Flags = CF_FIXEDPITCHONLY | CF_FORCEFONTEXIST |
1519 CF_INITTOLOGFONTSTRUCT | CF_SCREENFONTS;
1520
1521 if (ChooseFont (&cf)) {
1522 strncpy (cfg.font, lf.lfFaceName, sizeof(cfg.font)-1);
1523 cfg.font[sizeof(cfg.font)-1] = '\0';
1524 cfg.fontisbold = (lf.lfWeight == FW_BOLD);
1525 cfg.fontcharset = lf.lfCharSet;
1526 cfg.fontheight = lf.lfHeight;
1527 fmtfont (fontstatic);
1528 SetDlgItemText (hwnd, IDC_FONTSTATIC, fontstatic);
1529 }
1530 break;
1531 case IDC_BEEP:
1532 if (HIWORD(wParam) == BN_CLICKED ||
1533 HIWORD(wParam) == BN_DOUBLECLICKED)
1534 cfg.beep = IsDlgButtonChecked (hwnd, IDC_BEEP);
1535 break;
1536 case IDC_BLINKTEXT:
1537 if (HIWORD(wParam) == BN_CLICKED ||
1538 HIWORD(wParam) == BN_DOUBLECLICKED)
1539 cfg.blinktext = IsDlgButtonChecked (hwnd, IDC_BLINKTEXT);
1540 break;
1541 case IDC_BCE:
1542 if (HIWORD(wParam) == BN_CLICKED ||
1543 HIWORD(wParam) == BN_DOUBLECLICKED)
1544 cfg.bce = IsDlgButtonChecked (hwnd, IDC_BCE);
1545 break;
1546 }
1547 break;
1548 }
1549 return GeneralPanelProc (hwnd, msg, wParam, lParam);
1550 }
1551
1552 static int CALLBACK WindowProc (HWND hwnd, UINT msg,
1553 WPARAM wParam, LPARAM lParam) {
1554 struct ctlpos cp;
1555 enum { controlstartvalue = 1000,
1556 IDC_WINNAME,
1557 IDC_BLINKCUR,
1558 IDC_SCROLLBAR,
1559 IDC_LOCKSIZE,
1560 IDC_WINTITLE,
1561 IDC_WINEDIT
1562 };
1563
1564 switch (msg) {
1565 case WM_INITDIALOG:
1566 /* Accelerators used: [aco] bikty */
1567 ctlposinit(&cp, hwnd);
1568 multiedit(&cp,
1569 "Initial window &title:", IDC_WINTITLE, IDC_WINEDIT, 100,
1570 NULL);
1571 checkbox(&cp, "Avoid ever using &icon title", IDC_WINNAME);
1572 checkbox(&cp, "&Blinking cursor", IDC_BLINKCUR);
1573 checkbox(&cp, "Displa&y scrollbar", IDC_SCROLLBAR);
1574 checkbox(&cp, "Loc&k Window size", IDC_LOCKSIZE);
1575
1576 SetDlgItemText (hwnd, IDC_WINEDIT, cfg.wintitle);
1577 CheckDlgButton (hwnd, IDC_WINNAME, cfg.win_name_always);
1578 CheckDlgButton (hwnd, IDC_BLINKCUR, cfg.blink_cur);
1579 CheckDlgButton (hwnd, IDC_SCROLLBAR, cfg.scrollbar);
1580 CheckDlgButton (hwnd, IDC_LOCKSIZE, cfg.locksize);
1581 break;
1582 case WM_COMMAND:
1583 switch (LOWORD(wParam)) {
1584 case IDC_WINNAME:
1585 if (HIWORD(wParam) == BN_CLICKED ||
1586 HIWORD(wParam) == BN_DOUBLECLICKED)
1587 cfg.win_name_always = IsDlgButtonChecked (hwnd, IDC_WINNAME);
1588 break;
1589 case IDC_BLINKCUR:
1590 if (HIWORD(wParam) == BN_CLICKED ||
1591 HIWORD(wParam) == BN_DOUBLECLICKED)
1592 cfg.blink_cur = IsDlgButtonChecked (hwnd, IDC_BLINKCUR);
1593 break;
1594 case IDC_SCROLLBAR:
1595 if (HIWORD(wParam) == BN_CLICKED ||
1596 HIWORD(wParam) == BN_DOUBLECLICKED)
1597 cfg.scrollbar = IsDlgButtonChecked (hwnd, IDC_SCROLLBAR);
1598 break;
1599 case IDC_LOCKSIZE:
1600 if (HIWORD(wParam) == BN_CLICKED ||
1601 HIWORD(wParam) == BN_DOUBLECLICKED)
1602 cfg.locksize = IsDlgButtonChecked (hwnd, IDC_LOCKSIZE);
1603 break;
1604 case IDC_WINEDIT:
1605 if (HIWORD(wParam) == EN_CHANGE)
1606 GetDlgItemText (hwnd, IDC_WINEDIT, cfg.wintitle,
1607 sizeof(cfg.wintitle)-1);
1608 break;
1609 }
1610 break;
1611 }
1612 return GeneralPanelProc (hwnd, msg, wParam, lParam);
1613 }
1614
1615 static int CALLBACK TelnetProc (HWND hwnd, UINT msg,
1616 WPARAM wParam, LPARAM lParam) {
1617 int i;
1618 struct ctlpos cp;
1619 enum { controlstartvalue = 1000,
1620 IDC_TTSTATIC,
1621 IDC_TTEDIT,
1622 IDC_TSSTATIC,
1623 IDC_TSEDIT,
1624 IDC_LOGSTATIC,
1625 IDC_LOGEDIT,
1626 IDC_ENVSTATIC,
1627 IDC_VARSTATIC,
1628 IDC_VAREDIT,
1629 IDC_VALSTATIC,
1630 IDC_VALEDIT,
1631 IDC_ENVLIST,
1632 IDC_ENVADD,
1633 IDC_ENVREMOVE,
1634 IDC_EMSTATIC,
1635 IDC_EMBSD,
1636 IDC_EMRFC
1637 };
1638
1639 switch (msg) {
1640 case WM_INITDIALOG:
1641 /* Accelerators used: [aco] bdflrstuv */
1642 ctlposinit(&cp, hwnd);
1643 staticedit(&cp, "Terminal-&type string", IDC_TTSTATIC, IDC_TTEDIT);
1644 staticedit(&cp, "Terminal-&speed string", IDC_TSSTATIC, IDC_TSEDIT);
1645 staticedit(&cp, "Auto-login &username", IDC_LOGSTATIC, IDC_LOGEDIT);
1646 envsetter(&cp, "Environment variables:", IDC_ENVSTATIC,
1647 "&Variable", IDC_VARSTATIC, IDC_VAREDIT,
1648 "Va&lue", IDC_VALSTATIC, IDC_VALEDIT,
1649 IDC_ENVLIST,
1650 "A&dd", IDC_ENVADD, "&Remove", IDC_ENVREMOVE);
1651 radioline(&cp, "Handling of OLD_ENVIRON ambiguity:", IDC_EMSTATIC, 2,
1652 "&BSD (commonplace)", IDC_EMBSD,
1653 "R&FC 1408 (unusual)", IDC_EMRFC, NULL);
1654
1655 SetDlgItemText (hwnd, IDC_TTEDIT, cfg.termtype);
1656 SetDlgItemText (hwnd, IDC_TSEDIT, cfg.termspeed);
1657 SetDlgItemText (hwnd, IDC_LOGEDIT, cfg.username);
1658 {
1659 char *p = cfg.environmt;
1660 while (*p) {
1661 SendDlgItemMessage (hwnd, IDC_ENVLIST, LB_ADDSTRING, 0,
1662 (LPARAM) p);
1663 p += strlen(p)+1;
1664 }
1665 }
1666 CheckRadioButton (hwnd, IDC_EMBSD, IDC_EMRFC,
1667 cfg.rfc_environ ? IDC_EMRFC : IDC_EMBSD);
1668 break;
1669 case WM_COMMAND:
1670 switch (LOWORD(wParam)) {
1671 case IDC_TTEDIT:
1672 if (HIWORD(wParam) == EN_CHANGE)
1673 GetDlgItemText (hwnd, IDC_TTEDIT, cfg.termtype,
1674 sizeof(cfg.termtype)-1);
1675 break;
1676 case IDC_TSEDIT:
1677 if (HIWORD(wParam) == EN_CHANGE)
1678 GetDlgItemText (hwnd, IDC_TSEDIT, cfg.termspeed,
1679 sizeof(cfg.termspeed)-1);
1680 break;
1681 case IDC_LOGEDIT:
1682 if (HIWORD(wParam) == EN_CHANGE)
1683 GetDlgItemText (hwnd, IDC_LOGEDIT, cfg.username,
1684 sizeof(cfg.username)-1);
1685 break;
1686 case IDC_EMBSD:
1687 case IDC_EMRFC:
1688 cfg.rfc_environ = IsDlgButtonChecked (hwnd, IDC_EMRFC);
1689 break;
1690 case IDC_ENVADD:
1691 if (HIWORD(wParam) == BN_CLICKED ||
1692 HIWORD(wParam) == BN_DOUBLECLICKED) {
1693 char str[sizeof(cfg.environmt)];
1694 char *p;
1695 GetDlgItemText (hwnd, IDC_VAREDIT, str, sizeof(str)-1);
1696 if (!*str) {
1697 MessageBeep(0);
1698 break;
1699 }
1700 p = str + strlen(str);
1701 *p++ = '\t';
1702 GetDlgItemText (hwnd, IDC_VALEDIT, p, sizeof(str)-1-(p-str));
1703 if (!*p) {
1704 MessageBeep(0);
1705 break;
1706 }
1707 p = cfg.environmt;
1708 while (*p) {
1709 while (*p) p++;
1710 p++;
1711 }
1712 if ((p-cfg.environmt) + strlen(str) + 2 < sizeof(cfg.environmt)) {
1713 strcpy (p, str);
1714 p[strlen(str)+1] = '\0';
1715 SendDlgItemMessage (hwnd, IDC_ENVLIST, LB_ADDSTRING,
1716 0, (LPARAM)str);
1717 SetDlgItemText (hwnd, IDC_VAREDIT, "");
1718 SetDlgItemText (hwnd, IDC_VALEDIT, "");
1719 } else {
1720 MessageBox(hwnd, "Environment too big", "PuTTY Error",
1721 MB_OK | MB_ICONERROR);
1722 }
1723 }
1724 break;
1725 case IDC_ENVREMOVE:
1726 if (HIWORD(wParam) != BN_CLICKED &&
1727 HIWORD(wParam) != BN_DOUBLECLICKED)
1728 break;
1729 i = SendDlgItemMessage (hwnd, IDC_ENVLIST, LB_GETCURSEL, 0, 0);
1730 if (i == LB_ERR)
1731 MessageBeep (0);
1732 else {
1733 char *p, *q;
1734
1735 SendDlgItemMessage (hwnd, IDC_ENVLIST, LB_DELETESTRING,
1736 i, 0);
1737 p = cfg.environmt;
1738 while (i > 0) {
1739 if (!*p)
1740 goto disaster;
1741 while (*p) p++;
1742 p++;
1743 i--;
1744 }
1745 q = p;
1746 if (!*p)
1747 goto disaster;
1748 while (*p) p++;
1749 p++;
1750 while (*p) {
1751 while (*p)
1752 *q++ = *p++;
1753 *q++ = *p++;
1754 }
1755 *q = '\0';
1756 disaster:;
1757 }
1758 break;
1759 }
1760 break;
1761 }
1762 return GeneralPanelProc (hwnd, msg, wParam, lParam);
1763 }
1764
1765 static int CALLBACK SshProc (HWND hwnd, UINT msg,
1766 WPARAM wParam, LPARAM lParam) {
1767 struct ctlpos cp;
1768 OPENFILENAME of;
1769 char filename[sizeof(cfg.keyfile)];
1770 enum { controlstartvalue = 1000,
1771 IDC_TTSTATIC,
1772 IDC_TTEDIT,
1773 IDC_LOGSTATIC,
1774 IDC_LOGEDIT,
1775 IDC_NOPTY,
1776 IDC_CIPHERSTATIC,
1777 IDC_CIPHER3DES,
1778 IDC_CIPHERBLOWF,
1779 IDC_CIPHERDES,
1780 IDC_AUTHTIS,
1781 IDC_PKSTATIC,
1782 IDC_PKEDIT,
1783 IDC_PKBUTTON,
1784 IDC_SSHPROTSTATIC,
1785 IDC_SSHPROT1,
1786 IDC_SSHPROT2,
1787 IDC_AGENTFWD,
1788 IDC_CMDSTATIC,
1789 IDC_CMDEDIT
1790 };
1791
1792 switch (msg) {
1793 case WM_INITDIALOG:
1794 /* Accelerators used: [aco] 123abdkmprtuw */
1795 ctlposinit(&cp, hwnd);
1796 staticedit(&cp, "Terminal-&type string", IDC_TTSTATIC, IDC_TTEDIT);
1797 staticedit(&cp, "Auto-login &username", IDC_LOGSTATIC, IDC_LOGEDIT);
1798 multiedit(&cp,
1799 "&Remote command:", IDC_CMDSTATIC, IDC_CMDEDIT, 100,
1800 NULL);
1801 checkbox(&cp, "Don't allocate a &pseudo-terminal", IDC_NOPTY);
1802 checkbox(&cp, "Atte&mpt TIS or CryptoCard authentication",
1803 IDC_AUTHTIS);
1804 checkbox(&cp, "Allow &agent forwarding", IDC_AGENTFWD);
1805 editbutton(&cp, "Private &key file for authentication:",
1806 IDC_PKSTATIC, IDC_PKEDIT, "Bro&wse...", IDC_PKBUTTON);
1807 radioline(&cp, "Preferred SSH protocol version:",
1808 IDC_SSHPROTSTATIC, 2,
1809 "&1", IDC_SSHPROT1, "&2", IDC_SSHPROT2, NULL);
1810 radioline(&cp, "Preferred encryption algorithm:", IDC_CIPHERSTATIC, 3,
1811 "&3DES", IDC_CIPHER3DES,
1812 "&Blowfish", IDC_CIPHERBLOWF,
1813 "&DES", IDC_CIPHERDES, NULL);
1814
1815 SetDlgItemText (hwnd, IDC_TTEDIT, cfg.termtype);
1816 SetDlgItemText (hwnd, IDC_LOGEDIT, cfg.username);
1817 CheckDlgButton (hwnd, IDC_NOPTY, cfg.nopty);
1818 CheckDlgButton (hwnd, IDC_AGENTFWD, cfg.agentfwd);
1819 CheckRadioButton (hwnd, IDC_CIPHER3DES, IDC_CIPHERDES,
1820 cfg.cipher == CIPHER_BLOWFISH ? IDC_CIPHERBLOWF :
1821 cfg.cipher == CIPHER_DES ? IDC_CIPHERDES :
1822 IDC_CIPHER3DES);
1823 CheckRadioButton (hwnd, IDC_SSHPROT1, IDC_SSHPROT2,
1824 cfg.sshprot == 1 ? IDC_SSHPROT1 : IDC_SSHPROT2);
1825 CheckDlgButton (hwnd, IDC_AUTHTIS, cfg.try_tis_auth);
1826 SetDlgItemText (hwnd, IDC_PKEDIT, cfg.keyfile);
1827 SetDlgItemText (hwnd, IDC_CMDEDIT, cfg.remote_cmd);
1828 break;
1829 case WM_COMMAND:
1830 switch (LOWORD(wParam)) {
1831 case IDC_TTEDIT:
1832 if (HIWORD(wParam) == EN_CHANGE)
1833 GetDlgItemText (hwnd, IDC_TTEDIT, cfg.termtype,
1834 sizeof(cfg.termtype)-1);
1835 break;
1836 case IDC_LOGEDIT:
1837 if (HIWORD(wParam) == EN_CHANGE)
1838 GetDlgItemText (hwnd, IDC_LOGEDIT, cfg.username,
1839 sizeof(cfg.username)-1);
1840 break;
1841 case IDC_NOPTY:
1842 if (HIWORD(wParam) == BN_CLICKED ||
1843 HIWORD(wParam) == BN_DOUBLECLICKED)
1844 cfg.nopty = IsDlgButtonChecked (hwnd, IDC_NOPTY);
1845 break;
1846 case IDC_AGENTFWD:
1847 if (HIWORD(wParam) == BN_CLICKED ||
1848 HIWORD(wParam) == BN_DOUBLECLICKED)
1849 cfg.agentfwd = IsDlgButtonChecked (hwnd, IDC_AGENTFWD);
1850 break;
1851 case IDC_CIPHER3DES:
1852 case IDC_CIPHERBLOWF:
1853 case IDC_CIPHERDES:
1854 if (HIWORD(wParam) == BN_CLICKED ||
1855 HIWORD(wParam) == BN_DOUBLECLICKED) {
1856 if (IsDlgButtonChecked (hwnd, IDC_CIPHER3DES))
1857 cfg.cipher = CIPHER_3DES;
1858 else if (IsDlgButtonChecked (hwnd, IDC_CIPHERBLOWF))
1859 cfg.cipher = CIPHER_BLOWFISH;
1860 else if (IsDlgButtonChecked (hwnd, IDC_CIPHERDES))
1861 cfg.cipher = CIPHER_DES;
1862 }
1863 break;
1864 case IDC_SSHPROT1:
1865 case IDC_SSHPROT2:
1866 if (HIWORD(wParam) == BN_CLICKED ||
1867 HIWORD(wParam) == BN_DOUBLECLICKED) {
1868 if (IsDlgButtonChecked (hwnd, IDC_SSHPROT1))
1869 cfg.sshprot = 1;
1870 else if (IsDlgButtonChecked (hwnd, IDC_SSHPROT2))
1871 cfg.sshprot = 2;
1872 }
1873 break;
1874 case IDC_AUTHTIS:
1875 if (HIWORD(wParam) == BN_CLICKED ||
1876 HIWORD(wParam) == BN_DOUBLECLICKED)
1877 cfg.try_tis_auth = IsDlgButtonChecked (hwnd, IDC_AUTHTIS);
1878 break;
1879 case IDC_PKEDIT:
1880 if (HIWORD(wParam) == EN_CHANGE)
1881 GetDlgItemText (hwnd, IDC_PKEDIT, cfg.keyfile,
1882 sizeof(cfg.keyfile)-1);
1883 break;
1884 case IDC_CMDEDIT:
1885 if (HIWORD(wParam) == EN_CHANGE)
1886 GetDlgItemText (hwnd, IDC_CMDEDIT, cfg.remote_cmd,
1887 sizeof(cfg.remote_cmd)-1);
1888 break;
1889 case IDC_PKBUTTON:
1890 /*
1891 * FIXME: this crashes. Find out why.
1892 */
1893 memset(&of, 0, sizeof(of));
1894 #ifdef OPENFILENAME_SIZE_VERSION_400
1895 of.lStructSize = OPENFILENAME_SIZE_VERSION_400;
1896 #else
1897 of.lStructSize = sizeof(of);
1898 #endif
1899 of.hwndOwner = hwnd;
1900 of.lpstrFilter = "All Files\0*\0\0\0";
1901 of.lpstrCustomFilter = NULL;
1902 of.nFilterIndex = 1;
1903 of.lpstrFile = filename; strcpy(filename, cfg.keyfile);
1904 of.nMaxFile = sizeof(filename);
1905 of.lpstrFileTitle = NULL;
1906 of.lpstrInitialDir = NULL;
1907 of.lpstrTitle = "Select Public Key File";
1908 of.Flags = 0;
1909 if (GetOpenFileName(&of)) {
1910 strcpy(cfg.keyfile, filename);
1911 SetDlgItemText (hwnd, IDC_PKEDIT, cfg.keyfile);
1912 }
1913 break;
1914 }
1915 break;
1916 }
1917 return GeneralPanelProc (hwnd, msg, wParam, lParam);
1918 }
1919
1920 static int CALLBACK SelectionProc (HWND hwnd, UINT msg,
1921 WPARAM wParam, LPARAM lParam) {
1922 struct ctlpos cp;
1923 int i;
1924 enum { controlstartvalue = 1000,
1925 IDC_MBSTATIC,
1926 IDC_MBWINDOWS,
1927 IDC_MBXTERM,
1928 IDC_CCSTATIC,
1929 IDC_CCLIST,
1930 IDC_CCSET,
1931 IDC_CCSTATIC2,
1932 IDC_CCEDIT
1933 };
1934
1935 switch (msg) {
1936 case WM_INITDIALOG:
1937 /* Accelerators used: [aco] stwx */
1938 ctlposinit(&cp, hwnd);
1939 radiobig(&cp, "Action of mouse buttons:", IDC_MBSTATIC,
1940 "&Windows (Right pastes, Middle extends)", IDC_MBWINDOWS,
1941 "&xterm (Right extends, Middle pastes)", IDC_MBXTERM,
1942 NULL);
1943 charclass(&cp, "Character classes:", IDC_CCSTATIC, IDC_CCLIST,
1944 "&Set", IDC_CCSET, IDC_CCEDIT,
1945 "&to class", IDC_CCSTATIC2);
1946
1947 CheckRadioButton (hwnd, IDC_MBWINDOWS, IDC_MBXTERM,
1948 cfg.mouse_is_xterm ? IDC_MBXTERM : IDC_MBWINDOWS);
1949 {
1950 static int tabs[4] = {25, 61, 96, 128};
1951 SendDlgItemMessage (hwnd, IDC_CCLIST, LB_SETTABSTOPS, 4,
1952 (LPARAM) tabs);
1953 }
1954 for (i=0; i<256; i++) {
1955 char str[100];
1956 sprintf(str, "%d\t(0x%02X)\t%c\t%d", i, i,
1957 (i>=0x21 && i != 0x7F) ? i : ' ',
1958 cfg.wordness[i]);
1959 SendDlgItemMessage (hwnd, IDC_CCLIST, LB_ADDSTRING, 0,
1960 (LPARAM) str);
1961 }
1962 break;
1963 case WM_COMMAND:
1964 switch (LOWORD(wParam)) {
1965 case IDC_MBWINDOWS:
1966 case IDC_MBXTERM:
1967 cfg.mouse_is_xterm = IsDlgButtonChecked (hwnd, IDC_MBXTERM);
1968 break;
1969 case IDC_CCSET:
1970 {
1971 BOOL ok;
1972 int i;
1973 int n = GetDlgItemInt (hwnd, IDC_CCEDIT, &ok, FALSE);
1974
1975 if (!ok)
1976 MessageBeep (0);
1977 else {
1978 for (i=0; i<256; i++)
1979 if (SendDlgItemMessage (hwnd, IDC_CCLIST, LB_GETSEL,
1980 i, 0)) {
1981 char str[100];
1982 cfg.wordness[i] = n;
1983 SendDlgItemMessage (hwnd, IDC_CCLIST,
1984 LB_DELETESTRING, i, 0);
1985 sprintf(str, "%d\t(0x%02X)\t%c\t%d", i, i,
1986 (i>=0x21 && i != 0x7F) ? i : ' ',
1987 cfg.wordness[i]);
1988 SendDlgItemMessage (hwnd, IDC_CCLIST,
1989 LB_INSERTSTRING, i,
1990 (LPARAM)str);
1991 }
1992 }
1993 }
1994 break;
1995 }
1996 break;
1997 }
1998 return GeneralPanelProc (hwnd, msg, wParam, lParam);
1999 }
2000
2001 static int CALLBACK ColourProc (HWND hwnd, UINT msg,
2002 WPARAM wParam, LPARAM lParam) {
2003 static const char *const colours[] = {
2004 "Default Foreground", "Default Bold Foreground",
2005 "Default Background", "Default Bold Background",
2006 "Cursor Text", "Cursor Colour",
2007 "ANSI Black", "ANSI Black Bold",
2008 "ANSI Red", "ANSI Red Bold",
2009 "ANSI Green", "ANSI Green Bold",
2010 "ANSI Yellow", "ANSI Yellow Bold",
2011 "ANSI Blue", "ANSI Blue Bold",
2012 "ANSI Magenta", "ANSI Magenta Bold",
2013 "ANSI Cyan", "ANSI Cyan Bold",
2014 "ANSI White", "ANSI White Bold"
2015 };
2016 static const int permanent[] = {
2017 TRUE, FALSE, TRUE, FALSE, TRUE, TRUE,
2018 TRUE, FALSE, TRUE, FALSE, TRUE, FALSE, TRUE, FALSE,
2019 TRUE, FALSE, TRUE, FALSE, TRUE, FALSE, TRUE, FALSE
2020 };
2021 struct ctlpos cp;
2022 enum { controlstartvalue = 1000,
2023 IDC_BOLDCOLOUR,
2024 IDC_PALETTE,
2025 IDC_STATIC,
2026 IDC_LIST,
2027 IDC_RSTATIC,
2028 IDC_GSTATIC,
2029 IDC_BSTATIC,
2030 IDC_RVALUE,
2031 IDC_GVALUE,
2032 IDC_BVALUE,
2033 IDC_CHANGE
2034 };
2035
2036 switch (msg) {
2037 case WM_INITDIALOG:
2038 /* Accelerators used: [aco] bmlu */
2039 ctlposinit(&cp, hwnd);
2040 checkbox(&cp, "&Bolded text is a different colour", IDC_BOLDCOLOUR);
2041 checkbox(&cp, "Attempt to use &logical palettes", IDC_PALETTE);
2042 colouredit(&cp, "Select a colo&ur and click to modify it:",
2043 IDC_STATIC, IDC_LIST,
2044 "&Modify...", IDC_CHANGE,
2045 "Red:", IDC_RSTATIC, IDC_RVALUE,
2046 "Green:", IDC_GSTATIC, IDC_GVALUE,
2047 "Blue:", IDC_BSTATIC, IDC_BVALUE, NULL);
2048
2049 CheckDlgButton (hwnd, IDC_BOLDCOLOUR, cfg.bold_colour);
2050 CheckDlgButton (hwnd, IDC_PALETTE, cfg.try_palette);
2051 {
2052 int i;
2053 for (i=0; i<22; i++)
2054 if (cfg.bold_colour || permanent[i])
2055 SendDlgItemMessage (hwnd, IDC_LIST, LB_ADDSTRING, 0,
2056 (LPARAM) colours[i]);
2057 }
2058 SendDlgItemMessage (hwnd, IDC_LIST, LB_SETCURSEL, 0, 0);
2059 SetDlgItemInt (hwnd, IDC_RVALUE, cfg.colours[0][0], FALSE);
2060 SetDlgItemInt (hwnd, IDC_GVALUE, cfg.colours[0][1], FALSE);
2061 SetDlgItemInt (hwnd, IDC_BVALUE, cfg.colours[0][2], FALSE);
2062 break;
2063 case WM_COMMAND:
2064 switch (LOWORD(wParam)) {
2065 case IDC_BOLDCOLOUR:
2066 if (HIWORD(wParam) == BN_CLICKED ||
2067 HIWORD(wParam) == BN_DOUBLECLICKED) {
2068 int n, i;
2069 cfg.bold_colour = IsDlgButtonChecked (hwnd, IDC_BOLDCOLOUR);
2070 n = SendDlgItemMessage (hwnd, IDC_LIST, LB_GETCOUNT, 0, 0);
2071 if (cfg.bold_colour && n!=22) {
2072 for (i=0; i<22; i++)
2073 if (!permanent[i])
2074 SendDlgItemMessage (hwnd, IDC_LIST,
2075 LB_INSERTSTRING, i,
2076 (LPARAM) colours[i]);
2077 } else if (!cfg.bold_colour && n!=12) {
2078 for (i=22; i-- ;)
2079 if (!permanent[i])
2080 SendDlgItemMessage (hwnd, IDC_LIST,
2081 LB_DELETESTRING, i, 0);
2082 }
2083 }
2084 break;
2085 case IDC_PALETTE:
2086 if (HIWORD(wParam) == BN_CLICKED ||
2087 HIWORD(wParam) == BN_DOUBLECLICKED)
2088 cfg.try_palette = IsDlgButtonChecked (hwnd, IDC_PALETTE);
2089 break;
2090 case IDC_LIST:
2091 if (HIWORD(wParam) == LBN_DBLCLK ||
2092 HIWORD(wParam) == LBN_SELCHANGE) {
2093 int i = SendDlgItemMessage (hwnd, IDC_LIST, LB_GETCURSEL,
2094 0, 0);
2095 if (!cfg.bold_colour)
2096 i = (i < 3 ? i*2 : i == 3 ? 5 : i*2-2);
2097 SetDlgItemInt (hwnd, IDC_RVALUE, cfg.colours[i][0], FALSE);
2098 SetDlgItemInt (hwnd, IDC_GVALUE, cfg.colours[i][1], FALSE);
2099 SetDlgItemInt (hwnd, IDC_BVALUE, cfg.colours[i][2], FALSE);
2100 }
2101 break;
2102 case IDC_CHANGE:
2103 if (HIWORD(wParam) == BN_CLICKED ||
2104 HIWORD(wParam) == BN_DOUBLECLICKED) {
2105 static CHOOSECOLOR cc;
2106 static DWORD custom[16] = {0}; /* zero initialisers */
2107 int i = SendDlgItemMessage (hwnd, IDC_LIST, LB_GETCURSEL,
2108 0, 0);
2109 if (!cfg.bold_colour)
2110 i = (i < 3 ? i*2 : i == 3 ? 5 : i*2-2);
2111 cc.lStructSize = sizeof(cc);
2112 cc.hwndOwner = hwnd;
2113 cc.hInstance = (HWND)hinst;
2114 cc.lpCustColors = custom;
2115 cc.rgbResult = RGB (cfg.colours[i][0], cfg.colours[i][1],
2116 cfg.colours[i][2]);
2117 cc.Flags = CC_FULLOPEN | CC_RGBINIT;
2118 if (ChooseColor(&cc)) {
2119 cfg.colours[i][0] =
2120 (unsigned char) (cc.rgbResult & 0xFF);
2121 cfg.colours[i][1] =
2122 (unsigned char) (cc.rgbResult >> 8) & 0xFF;
2123 cfg.colours[i][2] =
2124 (unsigned char) (cc.rgbResult >> 16) & 0xFF;
2125 SetDlgItemInt (hwnd, IDC_RVALUE, cfg.colours[i][0],
2126 FALSE);
2127 SetDlgItemInt (hwnd, IDC_GVALUE, cfg.colours[i][1],
2128 FALSE);
2129 SetDlgItemInt (hwnd, IDC_BVALUE, cfg.colours[i][2],
2130 FALSE);
2131 }
2132 }
2133 break;
2134 }
2135 break;
2136 }
2137 return GeneralPanelProc (hwnd, msg, wParam, lParam);
2138 }
2139
2140 static int CALLBACK TranslationProc (HWND hwnd, UINT msg,
2141 WPARAM wParam, LPARAM lParam) {
2142 struct ctlpos cp;
2143 enum { controlstartvalue = 1000,
2144 IDC_XLATSTATIC,
2145 IDC_NOXLAT,
2146 IDC_KOI8WIN1251,
2147 IDC_88592WIN1250,
2148 IDC_CAPSLOCKCYR,
2149 IDC_VTSTATIC,
2150 IDC_VTXWINDOWS,
2151 IDC_VTOEMANSI,
2152 IDC_VTOEMONLY,
2153 IDC_VTPOORMAN
2154 };
2155
2156 switch (msg) {
2157 case WM_INITDIALOG:
2158 /* Accelerators used: [aco] beiknpsx */
2159 ctlposinit(&cp, hwnd);
2160 radiobig(&cp,
2161 "Handling of VT100 line drawing characters:", IDC_VTSTATIC,
2162 "Font has &XWindows encoding", IDC_VTXWINDOWS,
2163 "Use font in &both ANSI and OEM modes", IDC_VTOEMANSI,
2164 "Use font in O&EM mode only", IDC_VTOEMONLY,
2165 "&Poor man's line drawing (""+"", ""-"" and ""|"")",
2166 IDC_VTPOORMAN, NULL);
2167 radiobig(&cp,
2168 "Character set translation:", IDC_XLATSTATIC,
2169 "&None", IDC_NOXLAT,
2170 "&KOI8 / Win-1251", IDC_KOI8WIN1251,
2171 "&ISO-8859-2 / Win-1250", IDC_88592WIN1250, NULL);
2172 checkbox(&cp, "CAP&S LOCK acts as cyrillic switch", IDC_CAPSLOCKCYR);
2173
2174 CheckRadioButton (hwnd, IDC_NOXLAT, IDC_88592WIN1250,
2175 cfg.xlat_88592w1250 ? IDC_88592WIN1250 :
2176 cfg.xlat_enablekoiwin ? IDC_KOI8WIN1251 :
2177 IDC_NOXLAT);
2178 CheckDlgButton (hwnd, IDC_CAPSLOCKCYR, cfg.xlat_capslockcyr);
2179 CheckRadioButton (hwnd, IDC_VTXWINDOWS, IDC_VTPOORMAN,
2180 cfg.vtmode == VT_XWINDOWS ? IDC_VTXWINDOWS :
2181 cfg.vtmode == VT_OEMANSI ? IDC_VTOEMANSI :
2182 cfg.vtmode == VT_OEMONLY ? IDC_VTOEMONLY :
2183 IDC_VTPOORMAN);
2184 case WM_COMMAND:
2185 switch (LOWORD(wParam)) {
2186 case IDC_NOXLAT:
2187 case IDC_KOI8WIN1251:
2188 case IDC_88592WIN1250:
2189 cfg.xlat_enablekoiwin =
2190 IsDlgButtonChecked (hwnd, IDC_KOI8WIN1251);
2191 cfg.xlat_88592w1250 =
2192 IsDlgButtonChecked (hwnd, IDC_88592WIN1250);
2193 break;
2194 case IDC_CAPSLOCKCYR:
2195 if (HIWORD(wParam) == BN_CLICKED ||
2196 HIWORD(wParam) == BN_DOUBLECLICKED) {
2197 cfg.xlat_capslockcyr =
2198 IsDlgButtonChecked (hwnd, IDC_CAPSLOCKCYR);
2199 }
2200 break;
2201 case IDC_VTXWINDOWS:
2202 case IDC_VTOEMANSI:
2203 case IDC_VTOEMONLY:
2204 case IDC_VTPOORMAN:
2205 cfg.vtmode =
2206 (IsDlgButtonChecked (hwnd, IDC_VTXWINDOWS) ? VT_XWINDOWS :
2207 IsDlgButtonChecked (hwnd, IDC_VTOEMANSI) ? VT_OEMANSI :
2208 IsDlgButtonChecked (hwnd, IDC_VTOEMONLY) ? VT_OEMONLY :
2209 VT_POORMAN);
2210 break;
2211 }
2212 }
2213 return GeneralPanelProc (hwnd, msg, wParam, lParam);
2214 }
2215
2216 static DLGPROC panelproc[NPANELS] = {
2217 ConnectionProc, KeyboardProc, TerminalProc, WindowProc,
2218 TelnetProc, SshProc, SelectionProc, ColourProc, TranslationProc
2219 };
2220
2221 static char *names[NPANELS] = {
2222 "Connection", "Keyboard", "Terminal", "Window", "Telnet",
2223 "SSH", "Selection", "Colours", "Translation"
2224 };
2225
2226 static int mainp[MAIN_NPANELS] = { 0, 1, 2, 3, 4, 5, 6, 7, 8};
2227 static int reconfp[RECONF_NPANELS] = { 1, 2, 3, 6, 7, 8};
2228
2229 static HWND makesubdialog(HWND hwnd, int x, int y, int w, int h, int n) {
2230 RECT r;
2231 HWND ret;
2232 WPARAM font;
2233 r.left = x; r.top = y;
2234 r.right = r.left + w; r.bottom = r.top + h;
2235 MapDialogRect(hwnd, &r);
2236 ret = CreateWindowEx(WS_EX_CONTROLPARENT,
2237 WC_DIALOG, "", /* no title */
2238 WS_CHILD | WS_VISIBLE | DS_SETFONT,
2239 r.left, r.top,
2240 r.right-r.left, r.bottom-r.top,
2241 hwnd, (HMENU)IDC_SUBDLG,
2242 hinst, NULL);
2243 SetWindowLong (ret, DWL_DLGPROC, (LONG)panelproc[n]);
2244 font = SendMessage(hwnd, WM_GETFONT, 0, 0);
2245 SendMessage (ret, WM_SETFONT, font, MAKELPARAM(0, 0));
2246 SendMessage (ret, WM_INITDIALOG, 0, 0);
2247 return ret;
2248 }
2249
2250 static int GenericMainDlgProc (HWND hwnd, UINT msg,
2251 WPARAM wParam, LPARAM lParam,
2252 int npanels, int *panelnums, HWND *page) {
2253 HWND hw, tabctl;
2254
2255 switch (msg) {
2256 case WM_INITDIALOG:
2257 { /* centre the window */
2258 RECT rs, rd;
2259
2260 hw = GetDesktopWindow();
2261 if (GetWindowRect (hw, &rs) && GetWindowRect (hwnd, &rd))
2262 MoveWindow (hwnd, (rs.right + rs.left + rd.left - rd.right)/2,
2263 (rs.bottom + rs.top + rd.top - rd.bottom)/2,
2264 rd.right-rd.left, rd.bottom-rd.top, TRUE);
2265 }
2266 {
2267 RECT r;
2268 r.left = 3; r.right = r.left + 174;
2269 r.top = 3; r.bottom = r.top + 193;
2270 MapDialogRect(hwnd, &r);
2271 tabctl = CreateWindowEx(0, WC_TABCONTROL, "",
2272 WS_CHILD | WS_VISIBLE |
2273 WS_TABSTOP | TCS_MULTILINE,
2274 r.left, r.top,
2275 r.right-r.left, r.bottom-r.top,
2276 hwnd, (HMENU)IDC_TAB, hinst, NULL);
2277
2278 if (!tabctl) {
2279 struct ctlpos cp;
2280 ctlposinit2(&cp, hwnd);
2281 ersatztab(&cp, "Category:", IDC_TABSTATIC1, IDC_TABLIST,
2282 IDC_TABSTATIC2);
2283 } else {
2284 WPARAM font = SendMessage(hwnd, WM_GETFONT, 0, 0);
2285 SendMessage(tabctl, WM_SETFONT, font, MAKELPARAM(TRUE, 0));
2286 }
2287 }
2288 *page = NULL;
2289 if (tabctl) { /* initialise the tab control */
2290 TC_ITEMHEADER tab;
2291 int i;
2292
2293 for (i=0; i<npanels; i++) {
2294 tab.mask = TCIF_TEXT;
2295 tab.pszText = names[panelnums[i]];
2296 TabCtrl_InsertItem (tabctl, i, &tab);
2297 }
2298 } else {
2299 int i;
2300
2301 for (i=0; i<npanels; i++) {
2302 SendDlgItemMessage(hwnd, IDC_TABLIST, CB_ADDSTRING,
2303 0, (LPARAM)names[panelnums[i]]);
2304 }
2305 SendDlgItemMessage(hwnd, IDC_TABLIST, CB_SETCURSEL, 0, 0);
2306 }
2307 *page = makesubdialog(hwnd, 6, 30, 168, 163, panelnums[0]);
2308 SetFocus (*page);
2309 return 0;
2310 case WM_NOTIFY:
2311 if (LOWORD(wParam) == IDC_TAB &&
2312 ((LPNMHDR)lParam)->code == TCN_SELCHANGE) {
2313 int i = TabCtrl_GetCurSel(((LPNMHDR)lParam)->hwndFrom);
2314 if (*page)
2315 DestroyWindow (*page);
2316 *page = makesubdialog(hwnd, 6, 30, 168, 163, panelnums[i]);
2317 SetFocus (((LPNMHDR)lParam)->hwndFrom); /* ensure focus stays */
2318 return 0;
2319 }
2320 break;
2321 case WM_COMMAND:
2322 switch (LOWORD(wParam)) {
2323 case IDC_TABLIST:
2324 if (HIWORD(wParam) == CBN_SELCHANGE) {
2325 HWND tablist = GetDlgItem (hwnd, IDC_TABLIST);
2326 int i = SendMessage (tablist, CB_GETCURSEL, 0, 0);
2327 if (*page)
2328 DestroyWindow (*page);
2329 *page = makesubdialog(hwnd, 6, 30, 168, 163, panelnums[i]);
2330 SetFocus(tablist); /* ensure focus stays */
2331 return 0;
2332 }
2333 break;
2334 case IDOK:
2335 if (*cfg.host)
2336 EndDialog (hwnd, 1);
2337 else
2338 MessageBeep (0);
2339 return 0;
2340 case IDCANCEL:
2341 EndDialog (hwnd, 0);
2342 return 0;
2343 }
2344 return 0;
2345 case WM_CLOSE:
2346 EndDialog (hwnd, 0);
2347 return 0;
2348
2349 /* Grrr Explorer will maximize Dialogs! */
2350 case WM_SIZE:
2351 if (wParam == SIZE_MAXIMIZED)
2352 force_normal(hwnd);
2353 return 0;
2354 }
2355 return 0;
2356 }
2357
2358 static int CALLBACK MainDlgProc (HWND hwnd, UINT msg,
2359 WPARAM wParam, LPARAM lParam) {
2360 static HWND page = NULL;
2361
2362 if (msg == WM_COMMAND && LOWORD(wParam) == IDOK) {
2363 }
2364 if (msg == WM_COMMAND && LOWORD(wParam) == IDC_ABOUT) {
2365 EnableWindow(hwnd, 0);
2366 DialogBox(hinst, MAKEINTRESOURCE(IDD_ABOUTBOX),
2367 GetParent(hwnd), AboutProc);
2368 EnableWindow(hwnd, 1);
2369 SetActiveWindow(hwnd);
2370 }
2371 return GenericMainDlgProc (hwnd, msg, wParam, lParam,
2372 MAIN_NPANELS, mainp, &page);
2373 }
2374
2375 static int CALLBACK ReconfDlgProc (HWND hwnd, UINT msg,
2376 WPARAM wParam, LPARAM lParam) {
2377 static HWND page;
2378 return GenericMainDlgProc (hwnd, msg, wParam, lParam,
2379 RECONF_NPANELS, reconfp, &page);
2380 }
2381
2382 void get_sesslist(int allocate) {
2383 static char otherbuf[2048];
2384 static char *buffer;
2385 int buflen, bufsize, i;
2386 char *p, *ret;
2387 void *handle;
2388
2389 if (allocate) {
2390
2391 if ((handle = enum_settings_start()) == NULL)
2392 return;
2393
2394 buflen = bufsize = 0;
2395 buffer = NULL;
2396 do {
2397 ret = enum_settings_next(handle, otherbuf, sizeof(otherbuf));
2398 if (ret) {
2399 int len = strlen(otherbuf)+1;
2400 if (bufsize < buflen+len) {
2401 bufsize = buflen + len + 2048;
2402 buffer = srealloc(buffer, bufsize);
2403 }
2404 strcpy(buffer+buflen, otherbuf);
2405 buflen += strlen(buffer+buflen)+1;
2406 }
2407 } while (ret);
2408 enum_settings_finish(handle);
2409 buffer = srealloc(buffer, buflen+1);
2410 buffer[buflen] = '\0';
2411
2412 p = buffer;
2413 nsessions = 1; /* "Default Settings" counts as one */
2414 while (*p) {
2415 if (strcmp(p, "Default Settings"))
2416 nsessions++;
2417 while (*p) p++;
2418 p++;
2419 }
2420
2421 sessions = smalloc(nsessions * sizeof(char *));
2422 sessions[0] = "Default Settings";
2423 p = buffer;
2424 i = 1;
2425 while (*p) {
2426 if (strcmp(p, "Default Settings"))
2427 sessions[i++] = p;
2428 while (*p) p++;
2429 p++;
2430 }
2431 } else {
2432 sfree (buffer);
2433 sfree (sessions);
2434 }
2435 }
2436
2437 int do_config (void) {
2438 int ret;
2439
2440 get_sesslist(TRUE);
2441 savedsession[0] = '\0';
2442 ret = DialogBox (hinst, MAKEINTRESOURCE(IDD_MAINBOX), NULL, MainDlgProc);
2443 get_sesslist(FALSE);
2444
2445 return ret;
2446 }
2447
2448 int do_reconfig (HWND hwnd) {
2449 Config backup_cfg;
2450 int ret;
2451
2452 backup_cfg = cfg; /* structure copy */
2453 ret = DialogBox (hinst, MAKEINTRESOURCE(IDD_RECONF), hwnd, ReconfDlgProc);
2454 if (!ret)
2455 cfg = backup_cfg; /* structure copy */
2456 else
2457 force_normal(hwnd);
2458
2459 return ret;
2460 }
2461
2462 void do_defaults (char *session) {
2463 if (session)
2464 load_settings (session, TRUE);
2465 else
2466 load_settings ("Default Settings", FALSE);
2467 }
2468
2469 void logevent (char *string) {
2470 if (nevents >= negsize) {
2471 negsize += 64;
2472 events = srealloc (events, negsize * sizeof(*events));
2473 }
2474 events[nevents] = smalloc(1+strlen(string));
2475 strcpy (events[nevents], string);
2476 nevents++;
2477 if (logbox) {
2478 int count;
2479 SendDlgItemMessage (logbox, IDN_LIST, LB_ADDSTRING,
2480 0, (LPARAM)string);
2481 count = SendDlgItemMessage (logbox, IDN_LIST, LB_GETCOUNT, 0, 0);
2482 SendDlgItemMessage (logbox, IDN_LIST, LB_SETTOPINDEX, count-1, 0);
2483 }
2484 }
2485
2486 void showeventlog (HWND hwnd) {
2487 if (!logbox) {
2488 logbox = CreateDialog (hinst, MAKEINTRESOURCE(IDD_LOGBOX),
2489 hwnd, LogProc);
2490 ShowWindow (logbox, SW_SHOWNORMAL);
2491 }
2492 }
2493
2494 void showabout (HWND hwnd) {
2495 if (!abtbox) {
2496 abtbox = CreateDialog (hinst, MAKEINTRESOURCE(IDD_ABOUTBOX),
2497 hwnd, AboutProc);
2498 ShowWindow (abtbox, SW_SHOWNORMAL);
2499 }
2500 }
2501
2502 void verify_ssh_host_key(char *host, int port, char *keytype,
2503 char *keystr, char *fingerprint) {
2504 int ret;
2505
2506 static const char absentmsg[] =
2507 "The server's host key is not cached in the registry. You\n"
2508 "have no guarantee that the server is the computer you\n"
2509 "think it is.\n"
2510 "The server's key fingerprint is:\n"
2511 "%s\n"
2512 "If you trust this host, hit Yes to add the key to\n"
2513 "PuTTY's cache and carry on connecting.\n"
2514 "If you do not trust this host, hit No to abandon the\n"
2515 "connection.\n";
2516
2517 static const char wrongmsg[] =
2518 "WARNING - POTENTIAL SECURITY BREACH!\n"
2519 "\n"
2520 "The server's host key does not match the one PuTTY has\n"
2521 "cached in the registry. This means that either the\n"
2522 "server administrator has changed the host key, or you\n"
2523 "have actually connected to another computer pretending\n"
2524 "to be the server.\n"
2525 "The new key fingerprint is:\n"
2526 "%s\n"
2527 "If you were expecting this change and trust the new key,\n"
2528 "hit Yes to update PuTTY's cache and continue connecting.\n"
2529 "If you want to carry on connecting but without updating\n"
2530 "the cache, hit No.\n"
2531 "If you want to abandon the connection completely, hit\n"
2532 "Cancel. Hitting Cancel is the ONLY guaranteed safe\n"
2533 "choice.\n";
2534
2535 static const char mbtitle[] = "PuTTY Security Alert";
2536
2537
2538 char message[160+ /* sensible fingerprint max size */
2539 (sizeof(absentmsg) > sizeof(wrongmsg) ?
2540 sizeof(absentmsg) : sizeof(wrongmsg))];
2541
2542 /*
2543 * Verify the key against the registry.
2544 */
2545 ret = verify_host_key(host, port, keytype, keystr);
2546
2547 if (ret == 0) /* success - key matched OK */
2548 return;
2549 if (ret == 2) { /* key was different */
2550 int mbret;
2551 sprintf(message, wrongmsg, fingerprint);
2552 mbret = MessageBox(NULL, message, mbtitle,
2553 MB_ICONWARNING | MB_YESNOCANCEL);
2554 if (mbret == IDYES)
2555 store_host_key(host, port, keytype, keystr);
2556 if (mbret == IDCANCEL)
2557 exit(0);
2558 }
2559 if (ret == 1) { /* key was absent */
2560 int mbret;
2561 sprintf(message, absentmsg, fingerprint);
2562 mbret = MessageBox(NULL, message, mbtitle,
2563 MB_ICONWARNING | MB_YESNO);
2564 if (mbret == IDNO)
2565 exit(0);
2566 store_host_key(host, port, keytype, keystr);
2567 }
2568 }
Local modifications for Simon Tatham's `PuTTY' SSH client and terminal emulator