projects / u / mdw / putty / blob
? search:


a7000815dad02d1d995b5f35fbd2e25c3eb172eb
[u/mdw/putty] / windlg.c
1 #include <windows.h>
2 #include <commctrl.h>
3 #include <commdlg.h>
4 #include <winsock.h>
5 #include <stdio.h>
6 #include <stdlib.h>
7
8 #include "ssh.h"
9 #include "putty.h"
10 #include "win_res.h"
11
12 #define NPANELS 7
13 #define MAIN_NPANELS 7
14 #define RECONF_NPANELS 4
15
16 static const char *const puttystr = PUTTY_REG_POS "\\Sessions";
17
18 static void get_sesslist(int allocate);
19
20 static char **negots = NULL;
21 static int nnegots = 0, negsize = 0;
22 static HWND logbox = NULL, abtbox = NULL;
23
24 static char hex[16] = "0123456789ABCDEF";
25
26 static void mungestr(char *in, char *out) {
27 int candot = 0;
28
29 while (*in) {
30 if (*in == ' ' || *in == '\\' || *in == '*' || *in == '?' ||
31 *in == '%' || *in < ' ' || *in > '~' || (*in == '.' && !candot)) {
32 *out++ = '%';
33 *out++ = hex[((unsigned char)*in) >> 4];
34 *out++ = hex[((unsigned char)*in) & 15];
35 } else
36 *out++ = *in;
37 in++;
38 candot = 1;
39 }
40 *out = '\0';
41 return;
42 }
43
44 static void unmungestr(char *in, char *out) {
45 int candot = 0;
46
47 while (*in) {
48 if (*in == '%' && in[1] && in[2]) {
49 int i, j;
50
51 i = in[1] - '0'; i -= (i > 9 ? 7 : 0);
52 j = in[2] - '0'; j -= (j > 9 ? 7 : 0);
53
54 *out++ = (i<<4) + j;
55 in += 3;
56 } else
57 *out++ = *in++;
58 }
59 *out = '\0';
60 return;
61 }
62
63 static void wpps(HKEY key, LPCTSTR name, LPCTSTR value) {
64 RegSetValueEx(key, name, 0, REG_SZ, value, 1+strlen(value));
65 }
66
67 static void wppi(HKEY key, LPCTSTR name, int value) {
68 RegSetValueEx(key, name, 0, REG_DWORD,
69 (CONST BYTE *)&value, sizeof(value));
70 }
71
72 static void gpps(HKEY key, LPCTSTR name, LPCTSTR def,
73 LPTSTR val, int len) {
74 DWORD type, size;
75 size = len;
76
77 if (key == NULL ||
78 RegQueryValueEx(key, name, 0, &type, val, &size) != ERROR_SUCCESS ||
79 type != REG_SZ) {
80 strncpy(val, def, len);
81 val[len-1] = '\0';
82 }
83 }
84
85 static void gppi(HKEY key, LPCTSTR name, int def, int *i) {
86 DWORD type, val, size;
87 size = sizeof(val);
88
89 if (key == NULL ||
90 RegQueryValueEx(key, name, 0, &type,
91 (BYTE *)&val, &size) != ERROR_SUCCESS ||
92 size != sizeof(val) || type != REG_DWORD)
93 *i = def;
94 else
95 *i = val;
96 }
97
98 static HINSTANCE hinst;
99
100 static char **sessions;
101 static int nsessions;
102
103 static int readytogo;
104
105 static void save_settings (char *section, int do_host) {
106 int i;
107 HKEY subkey1, sesskey;
108 char *p;
109
110 p = malloc(3*strlen(section)+1);
111 mungestr(section, p);
112
113 if (RegCreateKey(HKEY_CURRENT_USER, puttystr, &subkey1)!=ERROR_SUCCESS ||
114 RegCreateKey(subkey1, p, &sesskey) != ERROR_SUCCESS) {
115 sesskey = NULL;
116 }
117
118 free(p);
119 RegCloseKey(subkey1);
120
121 wppi (sesskey, "Present", 1);
122 if (do_host) {
123 wpps (sesskey, "HostName", cfg.host);
124 wppi (sesskey, "PortNumber", cfg.port);
125 wpps (sesskey, "Protocol",
126 cfg.protocol == PROT_SSH ? "ssh" : "telnet");
127 }
128 wppi (sesskey, "CloseOnExit", !!cfg.close_on_exit);
129 wpps (sesskey, "TerminalType", cfg.termtype);
130 wpps (sesskey, "TerminalSpeed", cfg.termspeed);
131 {
132 char buf[2*sizeof(cfg.environmt)], *p, *q;
133 p = buf;
134 q = cfg.environmt;
135 while (*q) {
136 while (*q) {
137 int c = *q++;
138 if (c == '=' || c == ',' || c == '\\')
139 *p++ = '\\';
140 if (c == '\t')
141 c = '=';
142 *p++ = c;
143 }
144 *p++ = ',';
145 q++;
146 }
147 *p = '\0';
148 wpps (sesskey, "Environment", buf);
149 }
150 wpps (sesskey, "UserName", cfg.username);
151 wppi (sesskey, "NoPTY", cfg.nopty);
152 wpps (sesskey, "Cipher", cfg.cipher == CIPHER_BLOWFISH ? "blowfish" :
153 "3des");
154 wppi (sesskey, "RFCEnviron", cfg.rfc_environ);
155 wppi (sesskey, "BackspaceIsDelete", cfg.bksp_is_delete);
156 wppi (sesskey, "RXVTHomeEnd", cfg.rxvt_homeend);
157 wppi (sesskey, "LinuxFunctionKeys", cfg.linux_funkeys);
158 wppi (sesskey, "ApplicationCursorKeys", cfg.app_cursor);
159 wppi (sesskey, "ApplicationKeypad", cfg.app_keypad);
160 wppi (sesskey, "ScrollbackLines", cfg.savelines);
161 wppi (sesskey, "DECOriginMode", cfg.dec_om);
162 wppi (sesskey, "AutoWrapMode", cfg.wrap_mode);
163 wppi (sesskey, "LFImpliesCR", cfg.lfhascr);
164 wppi (sesskey, "WinNameAlways", cfg.win_name_always);
165 wppi (sesskey, "TermWidth", cfg.width);
166 wppi (sesskey, "TermHeight", cfg.height);
167 wpps (sesskey, "Font", cfg.font);
168 wppi (sesskey, "FontIsBold", cfg.fontisbold);
169 wppi (sesskey, "FontHeight", cfg.fontheight);
170 wppi (sesskey, "FontVTMode", cfg.vtmode);
171 wppi (sesskey, "TryPalette", cfg.try_palette);
172 wppi (sesskey, "BoldAsColour", cfg.bold_colour);
173 for (i=0; i<22; i++) {
174 char buf[20], buf2[30];
175 sprintf(buf, "Colour%d", i);
176 sprintf(buf2, "%d,%d,%d", cfg.colours[i][0],
177 cfg.colours[i][1], cfg.colours[i][2]);
178 wpps (sesskey, buf, buf2);
179 }
180 wppi (sesskey, "MouseIsXterm", cfg.mouse_is_xterm);
181 for (i=0; i<256; i+=32) {
182 char buf[20], buf2[256];
183 int j;
184 sprintf(buf, "Wordness%d", i);
185 *buf2 = '\0';
186 for (j=i; j<i+32; j++) {
187 sprintf(buf2+strlen(buf2), "%s%d",
188 (*buf2 ? "," : ""), cfg.wordness[j]);
189 }
190 wpps (sesskey, buf, buf2);
191 }
192
193 RegCloseKey(sesskey);
194 }
195
196 static void del_session (char *section) {
197 HKEY subkey1;
198 char *p;
199
200 if (RegOpenKey(HKEY_CURRENT_USER, puttystr, &subkey1) != ERROR_SUCCESS)
201 return;
202
203 p = malloc(3*strlen(section)+1);
204 mungestr(section, p);
205 RegDeleteKey(subkey1, p);
206 free(p);
207
208 RegCloseKey(subkey1);
209 }
210
211 static void load_settings (char *section, int do_host) {
212 int i;
213 HKEY subkey1, sesskey;
214 char *p;
215
216 p = malloc(3*strlen(section)+1);
217 mungestr(section, p);
218
219 if (RegOpenKey(HKEY_CURRENT_USER, puttystr, &subkey1) != ERROR_SUCCESS) {
220 sesskey = NULL;
221 } else {
222 if (RegOpenKey(subkey1, p, &sesskey) != ERROR_SUCCESS) {
223 sesskey = NULL;
224 }
225 RegCloseKey(subkey1);
226 }
227
228 free(p);
229
230 if (do_host) {
231 char prot[10];
232 gpps (sesskey, "HostName", "", cfg.host, sizeof(cfg.host));
233 gppi (sesskey, "PortNumber", 23, &cfg.port);
234 gpps (sesskey, "Protocol", "telnet", prot, 10);
235 if (!strcmp(prot, "ssh"))
236 cfg.protocol = PROT_SSH;
237 else
238 cfg.protocol = PROT_TELNET;
239 } else {
240 cfg.port = 23;
241 *cfg.host = '\0';
242 }
243 gppi (sesskey, "CloseOnExit", 1, &cfg.close_on_exit);
244 gpps (sesskey, "TerminalType", "xterm", cfg.termtype,
245 sizeof(cfg.termtype));
246 gpps (sesskey, "TerminalSpeed", "38400,38400", cfg.termspeed,
247 sizeof(cfg.termspeed));
248 {
249 char buf[2*sizeof(cfg.environmt)], *p, *q;
250 gpps (sesskey, "Environment", "", buf, sizeof(buf));
251 p = buf;
252 q = cfg.environmt;
253 while (*p) {
254 while (*p && *p != ',') {
255 int c = *p++;
256 if (c == '=')
257 c = '\t';
258 if (c == '\\')
259 c = *p++;
260 *p++ = c;
261 }
262 if (*p == ',') p++;
263 *q++ = '\0';
264 }
265 *q = '\0';
266 }
267 gpps (sesskey, "UserName", "", cfg.username, sizeof(cfg.username));
268 gppi (sesskey, "NoPTY", 0, &cfg.nopty);
269 {
270 char cipher[10];
271 gpps (sesskey, "Cipher", "3des", cipher, 10);
272 if (!strcmp(cipher, "blowfish"))
273 cfg.cipher = CIPHER_BLOWFISH;
274 else
275 cfg.cipher = CIPHER_3DES;
276 }
277 gppi (sesskey, "RFCEnviron", 0, &cfg.rfc_environ);
278 gppi (sesskey, "BackspaceIsDelete", 1, &cfg.bksp_is_delete);
279 gppi (sesskey, "RXVTHomeEnd", 0, &cfg.rxvt_homeend);
280 gppi (sesskey, "LinuxFunctionKeys", 0, &cfg.linux_funkeys);
281 gppi (sesskey, "ApplicationCursorKeys", 0, &cfg.app_cursor);
282 gppi (sesskey, "ApplicationKeypad", 0, &cfg.app_keypad);
283 gppi (sesskey, "ScrollbackLines", 200, &cfg.savelines);
284 gppi (sesskey, "DECOriginMode", 0, &cfg.dec_om);
285 gppi (sesskey, "AutoWrapMode", 1, &cfg.wrap_mode);
286 gppi (sesskey, "LFImpliesCR", 0, &cfg.lfhascr);
287 gppi (sesskey, "WinNameAlways", 0, &cfg.win_name_always);
288 gppi (sesskey, "TermWidth", 80, &cfg.width);
289 gppi (sesskey, "TermHeight", 24, &cfg.height);
290 gpps (sesskey, "Font", "Courier", cfg.font, sizeof(cfg.font));
291 gppi (sesskey, "FontIsBold", 0, &cfg.fontisbold);
292 gppi (sesskey, "FontHeight", 10, &cfg.fontheight);
293 gppi (sesskey, "FontVTMode", VT_POORMAN, &cfg.vtmode);
294 gppi (sesskey, "TryPalette", 0, &cfg.try_palette);
295 gppi (sesskey, "BoldAsColour", 1, &cfg.bold_colour);
296 for (i=0; i<22; i++) {
297 static char *defaults[] = {
298 "187,187,187", "255,255,255", "0,0,0", "85,85,85", "0,0,0",
299 "0,255,0", "0,0,0", "85,85,85", "187,0,0", "255,85,85",
300 "0,187,0", "85,255,85", "187,187,0", "255,255,85", "0,0,187",
301 "85,85,255", "187,0,187", "255,85,255", "0,187,187",
302 "85,255,255", "187,187,187", "255,255,255"
303 };
304 char buf[20], buf2[30];
305 sprintf(buf, "Colour%d", i);
306 gpps (sesskey, buf, defaults[i], buf2, sizeof(buf2));
307 sscanf(buf2, "%d,%d,%d", &cfg.colours[i][0],
308 &cfg.colours[i][1], &cfg.colours[i][2]);
309 }
310 gppi (sesskey, "MouseIsXterm", 0, &cfg.mouse_is_xterm);
311 for (i=0; i<256; i+=32) {
312 static char *defaults[] = {
313 "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",
314 "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",
315 "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",
316 "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",
317 "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",
318 "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",
319 "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",
320 "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"
321 };
322 char buf[20], buf2[256], *p;
323 int j;
324 sprintf(buf, "Wordness%d", i);
325 gpps (sesskey, buf, defaults[i/32], buf2, sizeof(buf2));
326 p = buf2;
327 for (j=i; j<i+32; j++) {
328 char *q = p;
329 while (*p && *p != ',') p++;
330 if (*p == ',') *p++ = '\0';
331 cfg.wordness[j] = atoi(q);
332 }
333 }
334 RegCloseKey(sesskey);
335 }
336
337 static void MyGetDlgItemInt (HWND hwnd, int id, int *result) {
338 BOOL ok;
339 int n;
340 n = GetDlgItemInt (hwnd, id, &ok, FALSE);
341 if (ok)
342 *result = n;
343 }
344
345 static int CALLBACK LogProc (HWND hwnd, UINT msg,
346 WPARAM wParam, LPARAM lParam) {
347 int i;
348
349 switch (msg) {
350 case WM_INITDIALOG:
351 for (i=0; i<nnegots; i++)
352 SendDlgItemMessage (hwnd, IDN_LIST, LB_ADDSTRING,
353 0, (LPARAM)negots[i]);
354 return 1;
355 /* case WM_CTLCOLORDLG: */
356 /* return (int) GetStockObject (LTGRAY_BRUSH); */
357 case WM_COMMAND:
358 switch (LOWORD(wParam)) {
359 case IDOK:
360 logbox = NULL;
361 DestroyWindow (hwnd);
362 return 0;
363 }
364 return 0;
365 case WM_CLOSE:
366 logbox = NULL;
367 DestroyWindow (hwnd);
368 return 0;
369 }
370 return 0;
371 }
372
373 static int CALLBACK LicenceProc (HWND hwnd, UINT msg,
374 WPARAM wParam, LPARAM lParam) {
375 switch (msg) {
376 case WM_INITDIALOG:
377 return 1;
378 case WM_COMMAND:
379 switch (LOWORD(wParam)) {
380 case IDOK:
381 abtbox = NULL;
382 DestroyWindow (hwnd);
383 return 0;
384 }
385 return 0;
386 case WM_CLOSE:
387 abtbox = NULL;
388 DestroyWindow (hwnd);
389 return 0;
390 }
391 return 0;
392 }
393
394 static int CALLBACK AboutProc (HWND hwnd, UINT msg,
395 WPARAM wParam, LPARAM lParam) {
396 switch (msg) {
397 case WM_INITDIALOG:
398 SetDlgItemText (hwnd, IDA_VERSION, ver);
399 return 1;
400 /* case WM_CTLCOLORDLG: */
401 /* return (int) GetStockObject (LTGRAY_BRUSH); */
402 /* case WM_CTLCOLORSTATIC: */
403 /* SetBkColor ((HDC)wParam, RGB(192,192,192)); */
404 /* return (int) GetStockObject (LTGRAY_BRUSH); */
405 case WM_COMMAND:
406 switch (LOWORD(wParam)) {
407 case IDOK:
408 abtbox = NULL;
409 DestroyWindow (hwnd);
410 return 0;
411 case IDA_LICENCE:
412 EnableWindow(hwnd, 0);
413 DialogBox (hinst, MAKEINTRESOURCE(IDD_LICENCEBOX),
414 NULL, LicenceProc);
415 EnableWindow(hwnd, 1);
416 return 0;
417 }
418 return 0;
419 case WM_CLOSE:
420 abtbox = NULL;
421 DestroyWindow (hwnd);
422 return 0;
423 }
424 return 0;
425 }
426
427 static int GeneralPanelProc (HWND hwnd, UINT msg,
428 WPARAM wParam, LPARAM lParam) {
429 switch (msg) {
430 case WM_INITDIALOG:
431 SetWindowPos (hwnd, HWND_TOP, 0, 0, 0, 0, SWP_NOMOVE | SWP_NOSIZE);
432 return 1;
433 /* case WM_CTLCOLORDLG: */
434 /* return (int) GetStockObject (LTGRAY_BRUSH); */
435 /* case WM_CTLCOLORSTATIC: */
436 /* case WM_CTLCOLORBTN: */
437 /* SetBkColor ((HDC)wParam, RGB(192,192,192)); */
438 /* return (int) GetStockObject (LTGRAY_BRUSH); */
439 case WM_CLOSE:
440 DestroyWindow (hwnd);
441 return 1;
442 }
443 return 0;
444 }
445
446 static int CALLBACK ConnectionProc (HWND hwnd, UINT msg,
447 WPARAM wParam, LPARAM lParam) {
448 int i;
449
450 switch (msg) {
451 case WM_INITDIALOG:
452 SetDlgItemText (hwnd, IDC0_HOST, cfg.host);
453 SetDlgItemInt (hwnd, IDC0_PORT, cfg.port, FALSE);
454 for (i = 0; i < nsessions; i++)
455 SendDlgItemMessage (hwnd, IDC0_SESSLIST, LB_ADDSTRING,
456 0, (LPARAM) (sessions[i]));
457 CheckRadioButton (hwnd, IDC0_PROTTELNET, IDC0_PROTSSH,
458 cfg.protocol==PROT_SSH ? IDC0_PROTSSH : IDC0_PROTTELNET);
459 CheckDlgButton (hwnd, IDC0_CLOSEEXIT, cfg.close_on_exit);
460 break;
461 case WM_LBUTTONUP:
462 /*
463 * Button release should trigger WM_OK if there was a
464 * previous double click on the session list.
465 */
466 ReleaseCapture();
467 if (readytogo)
468 SendMessage (GetParent(hwnd), WM_COMMAND, IDOK, 0);
469 break;
470 case WM_COMMAND:
471 switch (LOWORD(wParam)) {
472 case IDC0_PROTTELNET:
473 case IDC0_PROTSSH:
474 if (HIWORD(wParam) == BN_CLICKED ||
475 HIWORD(wParam) == BN_DOUBLECLICKED) {
476 int i = IsDlgButtonChecked (hwnd, IDC0_PROTSSH);
477 cfg.protocol = i ? PROT_SSH : PROT_TELNET;
478 if ((cfg.protocol == PROT_SSH && cfg.port == 23) ||
479 (cfg.protocol == PROT_TELNET && cfg.port == 22)) {
480 cfg.port = i ? 22 : 23;
481 SetDlgItemInt (hwnd, IDC0_PORT, cfg.port, FALSE);
482 }
483 }
484 break;
485 case IDC0_HOST:
486 if (HIWORD(wParam) == EN_CHANGE)
487 GetDlgItemText (hwnd, IDC0_HOST, cfg.host,
488 sizeof(cfg.host)-1);
489 break;
490 case IDC0_PORT:
491 if (HIWORD(wParam) == EN_CHANGE)
492 MyGetDlgItemInt (hwnd, IDC0_PORT, &cfg.port);
493 break;
494 case IDC0_CLOSEEXIT:
495 if (HIWORD(wParam) == BN_CLICKED ||
496 HIWORD(wParam) == BN_DOUBLECLICKED)
497 cfg.close_on_exit = IsDlgButtonChecked (hwnd, IDC0_CLOSEEXIT);
498 break;
499 case IDC0_SESSEDIT:
500 if (HIWORD(wParam) == EN_CHANGE)
501 SendDlgItemMessage (hwnd, IDC0_SESSLIST, LB_SETCURSEL,
502 (WPARAM) -1, 0);
503 break;
504 case IDC0_SESSSAVE:
505 if (HIWORD(wParam) == BN_CLICKED ||
506 HIWORD(wParam) == BN_DOUBLECLICKED) {
507 /*
508 * Save a session
509 */
510 char str[2048];
511 GetDlgItemText (hwnd, IDC0_SESSEDIT, str, sizeof(str)-1);
512 if (!*str) {
513 int n = SendDlgItemMessage (hwnd, IDC0_SESSLIST,
514 LB_GETCURSEL, 0, 0);
515 if (n == LB_ERR) {
516 MessageBeep(0);
517 break;
518 }
519 strcpy (str, sessions[n]);
520 }
521 save_settings (str, !!strcmp(str, "Default Settings"));
522 get_sesslist (FALSE);
523 get_sesslist (TRUE);
524 SendDlgItemMessage (hwnd, IDC0_SESSLIST, LB_RESETCONTENT,
525 0, 0);
526 for (i = 0; i < nsessions; i++)
527 SendDlgItemMessage (hwnd, IDC0_SESSLIST, LB_ADDSTRING,
528 0, (LPARAM) (sessions[i]));
529 SendDlgItemMessage (hwnd, IDC0_SESSLIST, LB_SETCURSEL,
530 (WPARAM) -1, 0);
531 }
532 break;
533 case IDC0_SESSLIST:
534 case IDC0_SESSLOAD:
535 if (LOWORD(wParam) == IDC0_SESSLOAD &&
536 HIWORD(wParam) != BN_CLICKED &&
537 HIWORD(wParam) != BN_DOUBLECLICKED)
538 break;
539 if (LOWORD(wParam) == IDC0_SESSLIST &&
540 HIWORD(wParam) != LBN_DBLCLK)
541 break;
542 {
543 int n = SendDlgItemMessage (hwnd, IDC0_SESSLIST,
544 LB_GETCURSEL, 0, 0);
545 if (n == LB_ERR) {
546 MessageBeep(0);
547 break;
548 }
549 load_settings (sessions[n],
550 !!strcmp(sessions[n], "Default Settings"));
551 SetDlgItemText (hwnd, IDC0_HOST, cfg.host);
552 SetDlgItemInt (hwnd, IDC0_PORT, cfg.port, FALSE);
553 CheckRadioButton (hwnd, IDC0_PROTTELNET, IDC0_PROTSSH,
554 (cfg.protocol==PROT_SSH ? IDC0_PROTSSH :
555 IDC0_PROTTELNET));
556 CheckDlgButton (hwnd, IDC0_CLOSEEXIT, cfg.close_on_exit);
557 SendDlgItemMessage (hwnd, IDC0_SESSLIST, LB_SETCURSEL,
558 (WPARAM) -1, 0);
559 }
560 if (LOWORD(wParam) == IDC0_SESSLIST) {
561 /*
562 * A double-click on a saved session should
563 * actually start the session, not just load it.
564 * Unless it's Default Settings or some other
565 * host-less set of saved settings.
566 */
567 if (*cfg.host) {
568 readytogo = TRUE;
569 SetCapture(hwnd);
570 }
571 }
572 break;
573 case IDC0_SESSDEL:
574 if (HIWORD(wParam) == BN_CLICKED ||
575 HIWORD(wParam) == BN_DOUBLECLICKED) {
576 int n = SendDlgItemMessage (hwnd, IDC0_SESSLIST,
577 LB_GETCURSEL, 0, 0);
578 if (n == LB_ERR || n == 0) {
579 MessageBeep(0);
580 break;
581 }
582 del_session(sessions[n]);
583 get_sesslist (FALSE);
584 get_sesslist (TRUE);
585 SendDlgItemMessage (hwnd, IDC0_SESSLIST, LB_RESETCONTENT,
586 0, 0);
587 for (i = 0; i < nsessions; i++)
588 SendDlgItemMessage (hwnd, IDC0_SESSLIST, LB_ADDSTRING,
589 0, (LPARAM) (sessions[i]));
590 SendDlgItemMessage (hwnd, IDC0_SESSLIST, LB_SETCURSEL,
591 (WPARAM) -1, 0);
592 }
593 }
594 }
595 return GeneralPanelProc (hwnd, msg, wParam, lParam);
596 }
597
598 static int CALLBACK KeyboardProc (HWND hwnd, UINT msg,
599 WPARAM wParam, LPARAM lParam) {
600 switch (msg) {
601 case WM_INITDIALOG:
602 CheckRadioButton (hwnd, IDC1_DEL008, IDC1_DEL127,
603 cfg.bksp_is_delete ? IDC1_DEL127 : IDC1_DEL008);
604 CheckRadioButton (hwnd, IDC1_HOMETILDE, IDC1_HOMERXVT,
605 cfg.rxvt_homeend ? IDC1_HOMERXVT : IDC1_HOMETILDE);
606 CheckRadioButton (hwnd, IDC1_FUNCTILDE, IDC1_FUNCLINUX,
607 cfg.linux_funkeys ? IDC1_FUNCLINUX : IDC1_FUNCTILDE);
608 CheckRadioButton (hwnd, IDC1_CURNORMAL, IDC1_CURAPPLIC,
609 cfg.app_cursor ? IDC1_CURAPPLIC : IDC1_CURNORMAL);
610 CheckRadioButton (hwnd, IDC1_KPNORMAL, IDC1_KPAPPLIC,
611 cfg.app_keypad ? IDC1_KPAPPLIC : IDC1_KPNORMAL);
612 break;
613 case WM_COMMAND:
614 if (HIWORD(wParam) == BN_CLICKED ||
615 HIWORD(wParam) == BN_DOUBLECLICKED)
616 switch (LOWORD(wParam)) {
617 case IDC1_DEL008:
618 case IDC1_DEL127:
619 cfg.bksp_is_delete = IsDlgButtonChecked (hwnd, IDC1_DEL127);
620 break;
621 case IDC1_HOMETILDE:
622 case IDC1_HOMERXVT:
623 cfg.rxvt_homeend = IsDlgButtonChecked (hwnd, IDC1_HOMERXVT);
624 break;
625 case IDC1_FUNCTILDE:
626 case IDC1_FUNCLINUX:
627 cfg.linux_funkeys = IsDlgButtonChecked (hwnd, IDC1_FUNCLINUX);
628 break;
629 case IDC1_KPNORMAL:
630 case IDC1_KPAPPLIC:
631 cfg.app_keypad = IsDlgButtonChecked (hwnd, IDC1_KPAPPLIC);
632 break;
633 case IDC1_CURNORMAL:
634 case IDC1_CURAPPLIC:
635 cfg.app_cursor = IsDlgButtonChecked (hwnd, IDC1_CURAPPLIC);
636 break;
637 }
638 }
639 return GeneralPanelProc (hwnd, msg, wParam, lParam);
640 }
641
642 static void fmtfont (char *buf) {
643 sprintf (buf, "Font: %s, ", cfg.font);
644 if (cfg.fontisbold)
645 strcat(buf, "bold, ");
646 if (cfg.fontheight == 0)
647 strcat (buf, "default height");
648 else
649 sprintf (buf+strlen(buf), "%d-%s",
650 (cfg.fontheight < 0 ? -cfg.fontheight : cfg.fontheight),
651 (cfg.fontheight < 0 ? "pixel" : "point"));
652 }
653
654 static int CALLBACK TerminalProc (HWND hwnd, UINT msg,
655 WPARAM wParam, LPARAM lParam) {
656 CHOOSEFONT cf;
657 LOGFONT lf;
658 char fontstatic[256];
659
660 switch (msg) {
661 case WM_INITDIALOG:
662 CheckDlgButton (hwnd, IDC2_WRAPMODE, cfg.wrap_mode);
663 CheckDlgButton (hwnd, IDC2_WINNAME, cfg.win_name_always);
664 CheckDlgButton (hwnd, IDC2_DECOM, cfg.dec_om);
665 CheckDlgButton (hwnd, IDC2_LFHASCR, cfg.lfhascr);
666 SetDlgItemInt (hwnd, IDC2_ROWSEDIT, cfg.height, FALSE);
667 SetDlgItemInt (hwnd, IDC2_COLSEDIT, cfg.width, FALSE);
668 SetDlgItemInt (hwnd, IDC2_SAVEEDIT, cfg.savelines, FALSE);
669 fmtfont (fontstatic);
670 SetDlgItemText (hwnd, IDC2_FONTSTATIC, fontstatic);
671 CheckRadioButton (hwnd, IDC2_VTXWINDOWS, IDC2_VTPOORMAN,
672 cfg.vtmode == VT_XWINDOWS ? IDC2_VTXWINDOWS :
673 cfg.vtmode == VT_OEMANSI ? IDC2_VTOEMANSI :
674 cfg.vtmode == VT_OEMONLY ? IDC2_VTOEMONLY :
675 IDC2_VTPOORMAN);
676 break;
677 case WM_COMMAND:
678 switch (LOWORD(wParam)) {
679 case IDC2_WRAPMODE:
680 if (HIWORD(wParam) == BN_CLICKED ||
681 HIWORD(wParam) == BN_DOUBLECLICKED)
682 cfg.wrap_mode = IsDlgButtonChecked (hwnd, IDC2_WRAPMODE);
683 break;
684 case IDC2_WINNAME:
685 if (HIWORD(wParam) == BN_CLICKED ||
686 HIWORD(wParam) == BN_DOUBLECLICKED)
687 cfg.win_name_always = IsDlgButtonChecked (hwnd, IDC2_WINNAME);
688 break;
689 case IDC2_DECOM:
690 if (HIWORD(wParam) == BN_CLICKED ||
691 HIWORD(wParam) == BN_DOUBLECLICKED)
692 cfg.dec_om = IsDlgButtonChecked (hwnd, IDC2_DECOM);
693 break;
694 case IDC2_LFHASCR:
695 if (HIWORD(wParam) == BN_CLICKED ||
696 HIWORD(wParam) == BN_DOUBLECLICKED)
697 cfg.lfhascr = IsDlgButtonChecked (hwnd, IDC2_LFHASCR);
698 break;
699 case IDC2_ROWSEDIT:
700 if (HIWORD(wParam) == EN_CHANGE)
701 MyGetDlgItemInt (hwnd, IDC2_ROWSEDIT, &cfg.height);
702 break;
703 case IDC2_COLSEDIT:
704 if (HIWORD(wParam) == EN_CHANGE)
705 MyGetDlgItemInt (hwnd, IDC2_COLSEDIT, &cfg.width);
706 break;
707 case IDC2_SAVEEDIT:
708 if (HIWORD(wParam) == EN_CHANGE)
709 MyGetDlgItemInt (hwnd, IDC2_SAVEEDIT, &cfg.savelines);
710 break;
711 case IDC2_CHOOSEFONT:
712 lf.lfHeight = cfg.fontheight;
713 lf.lfWidth = lf.lfEscapement = lf.lfOrientation = 0;
714 lf.lfItalic = lf.lfUnderline = lf.lfStrikeOut = 0;
715 lf.lfWeight = (cfg.fontisbold ? FW_BOLD : 0);
716 lf.lfCharSet = ANSI_CHARSET;
717 lf.lfOutPrecision = OUT_DEFAULT_PRECIS;
718 lf.lfClipPrecision = CLIP_DEFAULT_PRECIS;
719 lf.lfQuality = DEFAULT_QUALITY;
720 lf.lfPitchAndFamily = FIXED_PITCH | FF_DONTCARE;
721 strncpy (lf.lfFaceName, cfg.font, sizeof(lf.lfFaceName)-1);
722 lf.lfFaceName[sizeof(lf.lfFaceName)-1] = '\0';
723
724 cf.lStructSize = sizeof(cf);
725 cf.hwndOwner = hwnd;
726 cf.lpLogFont = &lf;
727 cf.Flags = CF_FIXEDPITCHONLY | CF_FORCEFONTEXIST |
728 CF_INITTOLOGFONTSTRUCT | CF_SCREENFONTS;
729
730 if (ChooseFont (&cf)) {
731 strncpy (cfg.font, lf.lfFaceName, sizeof(cfg.font)-1);
732 cfg.font[sizeof(cfg.font)-1] = '\0';
733 cfg.fontisbold = (lf.lfWeight == FW_BOLD);
734 cfg.fontheight = lf.lfHeight;
735 fmtfont (fontstatic);
736 SetDlgItemText (hwnd, IDC2_FONTSTATIC, fontstatic);
737 }
738 break;
739 case IDC2_VTXWINDOWS:
740 case IDC2_VTOEMANSI:
741 case IDC2_VTOEMONLY:
742 case IDC2_VTPOORMAN:
743 cfg.vtmode =
744 (IsDlgButtonChecked (hwnd, IDC2_VTXWINDOWS) ? VT_XWINDOWS :
745 IsDlgButtonChecked (hwnd, IDC2_VTOEMANSI) ? VT_OEMANSI :
746 IsDlgButtonChecked (hwnd, IDC2_VTOEMONLY) ? VT_OEMONLY :
747 VT_POORMAN);
748 break;
749 }
750 break;
751 }
752 return GeneralPanelProc (hwnd, msg, wParam, lParam);
753 }
754
755 static int CALLBACK TelnetProc (HWND hwnd, UINT msg,
756 WPARAM wParam, LPARAM lParam) {
757 int i;
758
759 switch (msg) {
760 case WM_INITDIALOG:
761 SetDlgItemText (hwnd, IDC3_TTEDIT, cfg.termtype);
762 SetDlgItemText (hwnd, IDC3_TSEDIT, cfg.termspeed);
763 SetDlgItemText (hwnd, IDC3_LOGEDIT, cfg.username);
764 {
765 char *p = cfg.environmt;
766 while (*p) {
767 SendDlgItemMessage (hwnd, IDC3_ENVLIST, LB_ADDSTRING, 0,
768 (LPARAM) p);
769 p += strlen(p)+1;
770 }
771 }
772 CheckRadioButton (hwnd, IDC3_EMBSD, IDC3_EMRFC,
773 cfg.rfc_environ ? IDC3_EMRFC : IDC3_EMBSD);
774 break;
775 case WM_COMMAND:
776 switch (LOWORD(wParam)) {
777 case IDC3_TTEDIT:
778 if (HIWORD(wParam) == EN_CHANGE)
779 GetDlgItemText (hwnd, IDC3_TTEDIT, cfg.termtype,
780 sizeof(cfg.termtype)-1);
781 break;
782 case IDC3_TSEDIT:
783 if (HIWORD(wParam) == EN_CHANGE)
784 GetDlgItemText (hwnd, IDC3_TSEDIT, cfg.termspeed,
785 sizeof(cfg.termspeed)-1);
786 break;
787 case IDC3_LOGEDIT:
788 if (HIWORD(wParam) == EN_CHANGE)
789 GetDlgItemText (hwnd, IDC3_LOGEDIT, cfg.username,
790 sizeof(cfg.username)-1);
791 break;
792 case IDC3_EMBSD:
793 case IDC3_EMRFC:
794 cfg.rfc_environ = IsDlgButtonChecked (hwnd, IDC3_EMRFC);
795 break;
796 case IDC3_ENVADD:
797 if (HIWORD(wParam) == BN_CLICKED ||
798 HIWORD(wParam) == BN_DOUBLECLICKED) {
799 char str[sizeof(cfg.environmt)];
800 char *p;
801 GetDlgItemText (hwnd, IDC3_VAREDIT, str, sizeof(str)-1);
802 if (!*str) {
803 MessageBeep(0);
804 break;
805 }
806 p = str + strlen(str);
807 *p++ = '\t';
808 GetDlgItemText (hwnd, IDC3_VALEDIT, p, sizeof(str)-1-(p-str));
809 if (!*p) {
810 MessageBeep(0);
811 break;
812 }
813 p = cfg.environmt;
814 while (*p) {
815 while (*p) p++;
816 p++;
817 }
818 if ((p-cfg.environmt) + strlen(str) + 2 < sizeof(cfg.environmt)) {
819 strcpy (p, str);
820 p[strlen(str)+1] = '\0';
821 SendDlgItemMessage (hwnd, IDC3_ENVLIST, LB_ADDSTRING,
822 0, (LPARAM)str);
823 SetDlgItemText (hwnd, IDC3_VAREDIT, "");
824 SetDlgItemText (hwnd, IDC3_VALEDIT, "");
825 } else {
826 MessageBox(hwnd, "Environment too big", "PuTTY Error",
827 MB_OK | MB_ICONERROR);
828 }
829 }
830 break;
831 case IDC3_ENVREMOVE:
832 if (HIWORD(wParam) != BN_CLICKED &&
833 HIWORD(wParam) != BN_DOUBLECLICKED)
834 break;
835 i = SendDlgItemMessage (hwnd, IDC3_ENVLIST, LB_GETCURSEL, 0, 0);
836 if (i == LB_ERR)
837 MessageBeep (0);
838 else {
839 char *p, *q;
840
841 SendDlgItemMessage (hwnd, IDC3_ENVLIST, LB_DELETESTRING,
842 i, 0);
843 p = cfg.environmt;
844 while (i > 0) {
845 if (!*p)
846 goto disaster;
847 while (*p) p++;
848 p++;
849 i--;
850 }
851 q = p;
852 if (!*p)
853 goto disaster;
854 while (*p) p++;
855 p++;
856 while (*p) {
857 while (*p)
858 *q++ = *p++;
859 *q++ = *p++;
860 }
861 *q = '\0';
862 disaster:;
863 }
864 break;
865 }
866 break;
867 }
868 return GeneralPanelProc (hwnd, msg, wParam, lParam);
869 }
870
871 static int CALLBACK SshProc (HWND hwnd, UINT msg,
872 WPARAM wParam, LPARAM lParam) {
873 switch (msg) {
874 case WM_INITDIALOG:
875 SetDlgItemText (hwnd, IDC3_TTEDIT, cfg.termtype);
876 SetDlgItemText (hwnd, IDC3_LOGEDIT, cfg.username);
877 CheckDlgButton (hwnd, IDC3_NOPTY, cfg.nopty);
878 CheckRadioButton (hwnd, IDC3_CIPHER3DES, IDC3_CIPHERBLOWF,
879 cfg.cipher == CIPHER_BLOWFISH ? IDC3_CIPHERBLOWF :
880 IDC3_CIPHER3DES);
881 break;
882 case WM_COMMAND:
883 switch (LOWORD(wParam)) {
884 case IDC3_TTEDIT:
885 if (HIWORD(wParam) == EN_CHANGE)
886 GetDlgItemText (hwnd, IDC3_TTEDIT, cfg.termtype,
887 sizeof(cfg.termtype)-1);
888 break;
889 case IDC3_LOGEDIT:
890 if (HIWORD(wParam) == EN_CHANGE)
891 GetDlgItemText (hwnd, IDC3_LOGEDIT, cfg.username,
892 sizeof(cfg.username)-1);
893 break;
894 case IDC3_NOPTY:
895 if (HIWORD(wParam) == BN_CLICKED ||
896 HIWORD(wParam) == BN_DOUBLECLICKED)
897 cfg.nopty = IsDlgButtonChecked (hwnd, IDC3_NOPTY);
898 break;
899 case IDC3_CIPHER3DES:
900 case IDC3_CIPHERBLOWF:
901 if (HIWORD(wParam) == BN_CLICKED ||
902 HIWORD(wParam) == BN_DOUBLECLICKED) {
903 if (IsDlgButtonChecked (hwnd, IDC3_CIPHER3DES))
904 cfg.cipher = CIPHER_3DES;
905 else if (IsDlgButtonChecked (hwnd, IDC3_CIPHERBLOWF))
906 cfg.cipher = CIPHER_BLOWFISH;
907 }
908 break;
909 }
910 break;
911 }
912 return GeneralPanelProc (hwnd, msg, wParam, lParam);
913 }
914
915 static int CALLBACK SelectionProc (HWND hwnd, UINT msg,
916 WPARAM wParam, LPARAM lParam) {
917 int i;
918
919 switch (msg) {
920 case WM_INITDIALOG:
921 CheckRadioButton (hwnd, IDC4_MBWINDOWS, IDC4_MBXTERM,
922 cfg.mouse_is_xterm ? IDC4_MBXTERM : IDC4_MBWINDOWS);
923 {
924 static int tabs[4] = {25, 61, 96, 128};
925 SendDlgItemMessage (hwnd, IDC4_CCLIST, LB_SETTABSTOPS, 4,
926 (LPARAM) tabs);
927 }
928 for (i=0; i<256; i++) {
929 char str[100];
930 sprintf(str, "%d\t(0x%02X)\t%c\t%d", i, i,
931 (i>=0x21 && i != 0x7F) ? i : ' ',
932 cfg.wordness[i]);
933 SendDlgItemMessage (hwnd, IDC4_CCLIST, LB_ADDSTRING, 0,
934 (LPARAM) str);
935 }
936 break;
937 case WM_COMMAND:
938 switch (LOWORD(wParam)) {
939 case IDC4_MBWINDOWS:
940 case IDC4_MBXTERM:
941 cfg.mouse_is_xterm = IsDlgButtonChecked (hwnd, IDC4_MBXTERM);
942 break;
943 case IDC4_CCSET:
944 {
945 BOOL ok;
946 int i;
947 int n = GetDlgItemInt (hwnd, IDC4_CCEDIT, &ok, FALSE);
948
949 if (!ok)
950 MessageBeep (0);
951 else {
952 for (i=0; i<256; i++)
953 if (SendDlgItemMessage (hwnd, IDC4_CCLIST, LB_GETSEL,
954 i, 0)) {
955 char str[100];
956 cfg.wordness[i] = n;
957 SendDlgItemMessage (hwnd, IDC4_CCLIST,
958 LB_DELETESTRING, i, 0);
959 sprintf(str, "%d\t(0x%02X)\t%c\t%d", i, i,
960 (i>=0x21 && i != 0x7F) ? i : ' ',
961 cfg.wordness[i]);
962 SendDlgItemMessage (hwnd, IDC4_CCLIST,
963 LB_INSERTSTRING, i,
964 (LPARAM)str);
965 }
966 }
967 }
968 break;
969 }
970 break;
971 }
972 return GeneralPanelProc (hwnd, msg, wParam, lParam);
973 }
974
975 static int CALLBACK ColourProc (HWND hwnd, UINT msg,
976 WPARAM wParam, LPARAM lParam) {
977 static const char *const colours[] = {
978 "Default Foreground", "Default Bold Foreground",
979 "Default Background", "Default Bold Background",
980 "Cursor Text", "Cursor Colour",
981 "ANSI Black", "ANSI Black Bold",
982 "ANSI Red", "ANSI Red Bold",
983 "ANSI Green", "ANSI Green Bold",
984 "ANSI Yellow", "ANSI Yellow Bold",
985 "ANSI Blue", "ANSI Blue Bold",
986 "ANSI Magenta", "ANSI Magenta Bold",
987 "ANSI Cyan", "ANSI Cyan Bold",
988 "ANSI White", "ANSI White Bold"
989 };
990 static const int permanent[] = {
991 TRUE, FALSE, TRUE, FALSE, TRUE, TRUE,
992 TRUE, FALSE, TRUE, FALSE, TRUE, FALSE, TRUE, FALSE,
993 TRUE, FALSE, TRUE, FALSE, TRUE, FALSE, TRUE, FALSE
994 };
995 switch (msg) {
996 case WM_INITDIALOG:
997 CheckDlgButton (hwnd, IDC5_BOLDCOLOUR, cfg.bold_colour);
998 CheckDlgButton (hwnd, IDC5_PALETTE, cfg.try_palette);
999 {
1000 int i;
1001 for (i=0; i<22; i++)
1002 if (cfg.bold_colour || permanent[i])
1003 SendDlgItemMessage (hwnd, IDC5_LIST, LB_ADDSTRING, 0,
1004 (LPARAM) colours[i]);
1005 }
1006 SendDlgItemMessage (hwnd, IDC5_LIST, LB_SETCURSEL, 0, 0);
1007 SetDlgItemInt (hwnd, IDC5_RVALUE, cfg.colours[0][0], FALSE);
1008 SetDlgItemInt (hwnd, IDC5_GVALUE, cfg.colours[0][1], FALSE);
1009 SetDlgItemInt (hwnd, IDC5_BVALUE, cfg.colours[0][2], FALSE);
1010 break;
1011 case WM_COMMAND:
1012 switch (LOWORD(wParam)) {
1013 case IDC5_BOLDCOLOUR:
1014 if (HIWORD(wParam) == BN_CLICKED ||
1015 HIWORD(wParam) == BN_DOUBLECLICKED) {
1016 int n, i;
1017 cfg.bold_colour = IsDlgButtonChecked (hwnd, IDC5_BOLDCOLOUR);
1018 n = SendDlgItemMessage (hwnd, IDC5_LIST, LB_GETCOUNT, 0, 0);
1019 if (cfg.bold_colour && n!=22) {
1020 for (i=0; i<22; i++)
1021 if (!permanent[i])
1022 SendDlgItemMessage (hwnd, IDC5_LIST,
1023 LB_INSERTSTRING, i,
1024 (LPARAM) colours[i]);
1025 } else if (!cfg.bold_colour && n!=12) {
1026 for (i=22; i-- ;)
1027 if (!permanent[i])
1028 SendDlgItemMessage (hwnd, IDC5_LIST,
1029 LB_DELETESTRING, i, 0);
1030 }
1031 }
1032 break;
1033 case IDC5_PALETTE:
1034 if (HIWORD(wParam) == BN_CLICKED ||
1035 HIWORD(wParam) == BN_DOUBLECLICKED)
1036 cfg.try_palette = IsDlgButtonChecked (hwnd, IDC5_PALETTE);
1037 break;
1038 case IDC5_LIST:
1039 if (HIWORD(wParam) == LBN_DBLCLK ||
1040 HIWORD(wParam) == LBN_SELCHANGE) {
1041 int i = SendDlgItemMessage (hwnd, IDC5_LIST, LB_GETCURSEL,
1042 0, 0);
1043 if (!cfg.bold_colour)
1044 i = (i < 3 ? i*2 : i == 3 ? 5 : i*2-2);
1045 SetDlgItemInt (hwnd, IDC5_RVALUE, cfg.colours[i][0], FALSE);
1046 SetDlgItemInt (hwnd, IDC5_GVALUE, cfg.colours[i][1], FALSE);
1047 SetDlgItemInt (hwnd, IDC5_BVALUE, cfg.colours[i][2], FALSE);
1048 }
1049 break;
1050 case IDC5_CHANGE:
1051 if (HIWORD(wParam) == BN_CLICKED ||
1052 HIWORD(wParam) == BN_DOUBLECLICKED) {
1053 static CHOOSECOLOR cc;
1054 static DWORD custom[16] = {0}; /* zero initialisers */
1055 int i = SendDlgItemMessage (hwnd, IDC5_LIST, LB_GETCURSEL,
1056 0, 0);
1057 if (!cfg.bold_colour)
1058 i = (i < 3 ? i*2 : i == 3 ? 5 : i*2-2);
1059 cc.lStructSize = sizeof(cc);
1060 cc.hwndOwner = hwnd;
1061 cc.hInstance = hinst;
1062 cc.lpCustColors = custom;
1063 cc.rgbResult = RGB (cfg.colours[i][0], cfg.colours[i][1],
1064 cfg.colours[i][2]);
1065 cc.Flags = CC_FULLOPEN | CC_RGBINIT;
1066 if (ChooseColor(&cc)) {
1067 cfg.colours[i][0] =
1068 (unsigned char) (cc.rgbResult & 0xFF);
1069 cfg.colours[i][1] =
1070 (unsigned char) (cc.rgbResult >> 8) & 0xFF;
1071 cfg.colours[i][2] =
1072 (unsigned char) (cc.rgbResult >> 16) & 0xFF;
1073 SetDlgItemInt (hwnd, IDC5_RVALUE, cfg.colours[i][0],
1074 FALSE);
1075 SetDlgItemInt (hwnd, IDC5_GVALUE, cfg.colours[i][1],
1076 FALSE);
1077 SetDlgItemInt (hwnd, IDC5_BVALUE, cfg.colours[i][2],
1078 FALSE);
1079 }
1080 }
1081 break;
1082 }
1083 break;
1084 }
1085 return GeneralPanelProc (hwnd, msg, wParam, lParam);
1086 }
1087
1088 static DLGPROC panelproc[NPANELS] = {
1089 ConnectionProc, KeyboardProc, TerminalProc,
1090 TelnetProc, SshProc, SelectionProc, ColourProc
1091 };
1092 static char *panelids[NPANELS] = {
1093 MAKEINTRESOURCE(IDD_PANEL0),
1094 MAKEINTRESOURCE(IDD_PANEL1),
1095 MAKEINTRESOURCE(IDD_PANEL2),
1096 MAKEINTRESOURCE(IDD_PANEL3),
1097 MAKEINTRESOURCE(IDD_PANEL35),
1098 MAKEINTRESOURCE(IDD_PANEL4),
1099 MAKEINTRESOURCE(IDD_PANEL5)
1100 };
1101 static char *names[NPANELS] = {
1102 "Connection", "Keyboard", "Terminal", "Telnet", "SSH", "Selection", "Colours"
1103 };
1104
1105 static int mainp[MAIN_NPANELS] = { 0, 1, 2, 3, 4, 5, 6 };
1106 static int reconfp[RECONF_NPANELS] = { 1, 2, 5, 6 };
1107
1108 static int GenericMainDlgProc (HWND hwnd, UINT msg,
1109 WPARAM wParam, LPARAM lParam,
1110 int npanels, int *panelnums, HWND *page) {
1111 HWND hw;
1112
1113 switch (msg) {
1114 case WM_INITDIALOG:
1115 { /* centre the window */
1116 RECT rs, rd;
1117
1118 hw = GetDesktopWindow();
1119 if (GetWindowRect (hw, &rs) && GetWindowRect (hwnd, &rd))
1120 MoveWindow (hwnd, (rs.right + rs.left + rd.left - rd.right)/2,
1121 (rs.bottom + rs.top + rd.top - rd.bottom)/2,
1122 rd.right-rd.left, rd.bottom-rd.top, TRUE);
1123 }
1124 *page = NULL;
1125 { /* initialise the tab control */
1126 TC_ITEMHEADER tab;
1127 int i;
1128
1129 hw = GetDlgItem (hwnd, IDC_TAB);
1130 for (i=0; i<npanels; i++) {
1131 tab.mask = TCIF_TEXT;
1132 tab.pszText = names[panelnums[i]];
1133 TabCtrl_InsertItem (hw, i, &tab);
1134 }
1135 /* *page = CreateDialogIndirect (hinst, panels[panelnums[0]].temp,
1136 hwnd, panelproc[panelnums[0]]);*/
1137 *page = CreateDialog (hinst, panelids[panelnums[0]],
1138 hwnd, panelproc[panelnums[0]]);
1139 SetWindowLong (*page, GWL_EXSTYLE,
1140 GetWindowLong (*page, GWL_EXSTYLE) |
1141 WS_EX_CONTROLPARENT);
1142 }
1143 SetFocus (*page);
1144 return 0;
1145 case WM_NOTIFY:
1146 if (LOWORD(wParam) == IDC_TAB &&
1147 ((LPNMHDR)lParam)->code == TCN_SELCHANGE) {
1148 int i = TabCtrl_GetCurSel(((LPNMHDR)lParam)->hwndFrom);
1149 if (*page)
1150 DestroyWindow (*page);
1151 /* *page = CreateDialogIndirect (hinst, panels[panelnums[i]].temp,
1152 hwnd, panelproc[panelnums[i]]);*/
1153 *page = CreateDialog (hinst, panelids[panelnums[i]],
1154 hwnd, panelproc[panelnums[i]]);
1155 SetWindowLong (*page, GWL_EXSTYLE,
1156 GetWindowLong (*page, GWL_EXSTYLE) |
1157 WS_EX_CONTROLPARENT);
1158 SetFocus (((LPNMHDR)lParam)->hwndFrom); /* ensure focus stays */
1159 return 0;
1160 }
1161 break;
1162 /* case WM_CTLCOLORDLG: */
1163 /* return (int) GetStockObject (LTGRAY_BRUSH); */
1164 case WM_COMMAND:
1165 switch (LOWORD(wParam)) {
1166 case IDOK:
1167 if (*cfg.host)
1168 EndDialog (hwnd, 1);
1169 else
1170 MessageBeep (0);
1171 return 0;
1172 case IDCANCEL:
1173 EndDialog (hwnd, 0);
1174 return 0;
1175 }
1176 return 0;
1177 case WM_CLOSE:
1178 EndDialog (hwnd, 0);
1179 return 0;
1180 }
1181 return 0;
1182 }
1183
1184 static int CALLBACK MainDlgProc (HWND hwnd, UINT msg,
1185 WPARAM wParam, LPARAM lParam) {
1186 #if 0
1187 HWND hw;
1188 int i;
1189 #endif
1190 static HWND page = NULL;
1191
1192 if (msg == WM_COMMAND && LOWORD(wParam) == IDOK) {
1193 #if 0
1194 /*
1195 * If the Connection panel is active and the Session List
1196 * box is selected, we treat a press of Open to have an
1197 * implicit press of Load preceding it.
1198 */
1199 hw = GetDlgItem (hwnd, IDC_TAB);
1200 i = TabCtrl_GetCurSel(hw);
1201 if (panelproc[mainp[i]] == ConnectionProc &&
1202 page && implicit_load_ok) {
1203 SendMessage (page, WM_COMMAND,
1204 MAKELONG(IDC0_SESSLOAD, BN_CLICKED), 0);
1205 }
1206 #endif
1207 }
1208 if (msg == WM_COMMAND && LOWORD(wParam) == IDC_ABOUT) {
1209 EnableWindow(hwnd, 0);
1210 DialogBox(hinst, MAKEINTRESOURCE(IDD_ABOUTBOX),
1211 GetParent(hwnd), AboutProc);
1212 EnableWindow(hwnd, 1);
1213 }
1214 return GenericMainDlgProc (hwnd, msg, wParam, lParam,
1215 MAIN_NPANELS, mainp, &page);
1216 }
1217
1218 static int CALLBACK ReconfDlgProc (HWND hwnd, UINT msg,
1219 WPARAM wParam, LPARAM lParam) {
1220 static HWND page;
1221 return GenericMainDlgProc (hwnd, msg, wParam, lParam,
1222 RECONF_NPANELS, reconfp, &page);
1223 }
1224
1225 static void get_sesslist(int allocate) {
1226 static char *buffer;
1227 int buflen, bufsize, i, ret;
1228 char otherbuf[2048];
1229 char *p;
1230 HKEY subkey1;
1231
1232 if (allocate) {
1233 if (RegCreateKey(HKEY_CURRENT_USER,
1234 puttystr, &subkey1) != ERROR_SUCCESS)
1235 return;
1236
1237 buflen = bufsize = 0;
1238 buffer = NULL;
1239 i = 0;
1240 do {
1241 ret = RegEnumKey(subkey1, i++, otherbuf, sizeof(otherbuf));
1242 if (ret == ERROR_SUCCESS) {
1243 bufsize = buflen + 2048;
1244 buffer = srealloc(buffer, bufsize);
1245 unmungestr(otherbuf, buffer+buflen);
1246 buflen += strlen(buffer+buflen)+1;
1247 }
1248 } while (ret == ERROR_SUCCESS);
1249 buffer = srealloc(buffer, buflen+1);
1250 buffer[buflen] = '\0';
1251
1252 p = buffer;
1253 nsessions = 1; /* "Default Settings" counts as one */
1254 while (*p) {
1255 if (strcmp(p, "Default Settings"))
1256 nsessions++;
1257 while (*p) p++;
1258 p++;
1259 }
1260
1261 sessions = smalloc(nsessions * sizeof(char *));
1262 sessions[0] = "Default Settings";
1263 p = buffer;
1264 i = 1;
1265 while (*p) {
1266 if (strcmp(p, "Default Settings"))
1267 sessions[i++] = p;
1268 while (*p) p++;
1269 p++;
1270 }
1271 } else {
1272 sfree (buffer);
1273 sfree (sessions);
1274 }
1275 }
1276
1277 int do_config (void) {
1278 int ret;
1279
1280 get_sesslist(TRUE);
1281 ret = DialogBox (hinst, MAKEINTRESOURCE(IDD_MAINBOX), NULL, MainDlgProc);
1282 get_sesslist(FALSE);
1283
1284 return ret;
1285 }
1286
1287 int do_reconfig (HWND hwnd) {
1288 Config backup_cfg;
1289 int ret;
1290
1291 backup_cfg = cfg; /* structure copy */
1292 ret = DialogBox (hinst, MAKEINTRESOURCE(IDD_RECONF), hwnd, ReconfDlgProc);
1293 if (!ret)
1294 cfg = backup_cfg; /* structure copy */
1295 return ret;
1296 }
1297
1298 void do_defaults (char *session) {
1299 if (session)
1300 load_settings (session, TRUE);
1301 else
1302 load_settings ("Default Settings", FALSE);
1303 }
1304
1305 void lognegot (char *string) {
1306 if (nnegots >= negsize) {
1307 negsize += 64;
1308 negots = srealloc (negots, negsize * sizeof(*negots));
1309 }
1310 negots[nnegots] = smalloc(1+strlen(string));
1311 strcpy (negots[nnegots], string);
1312 nnegots++;
1313 if (logbox)
1314 SendDlgItemMessage (logbox, IDN_LIST, LB_ADDSTRING,
1315 0, (LPARAM)string);
1316 }
1317
1318 void shownegot (HWND hwnd) {
1319 if (!logbox) {
1320 logbox = CreateDialog (hinst, MAKEINTRESOURCE(IDD_LOGBOX),
1321 hwnd, LogProc);
1322 ShowWindow (logbox, SW_SHOWNORMAL);
1323 }
1324 }
1325
1326 void showabout (HWND hwnd) {
1327 if (!abtbox) {
1328 abtbox = CreateDialog (hinst, MAKEINTRESOURCE(IDD_ABOUTBOX),
1329 hwnd, AboutProc);
1330 ShowWindow (abtbox, SW_SHOWNORMAL);
1331 }
1332 }
1333
1334 void verify_ssh_host_key(char *host, struct RSAKey *key) {
1335 char *keystr, *otherstr, *mungedhost;
1336 int len;
1337 HKEY rkey;
1338
1339 /*
1340 * Format the key into a string.
1341 */
1342 len = rsastr_len(key);
1343 keystr = malloc(len);
1344 if (!keystr)
1345 fatalbox("Out of memory");
1346 rsastr_fmt(keystr, key);
1347
1348 /*
1349 * Now read a saved key in from the registry and see what it
1350 * says.
1351 */
1352 otherstr = malloc(len);
1353 mungedhost = malloc(3*strlen(host)+1);
1354 if (!otherstr || !mungedhost)
1355 fatalbox("Out of memory");
1356
1357 mungestr(host, mungedhost);
1358
1359 if (RegCreateKey(HKEY_CURRENT_USER, PUTTY_REG_POS "\\SshHostKeys",
1360 &rkey) != ERROR_SUCCESS) {
1361 if (MessageBox(NULL, "PuTTY was unable to open the host key cache\n"
1362 "in the registry. There is thus no way to tell\n"
1363 "if the remote host is what you think it is.\n"
1364 "Connect anyway?", "PuTTY Problem",
1365 MB_ICONWARNING | MB_YESNO) == IDNO)
1366 exit(0);
1367 } else {
1368 DWORD readlen = len;
1369 DWORD type;
1370 int ret;
1371
1372 ret = RegQueryValueEx(rkey, mungedhost, NULL,
1373 &type, otherstr, &readlen);
1374
1375 if (ret == ERROR_MORE_DATA ||
1376 (ret == ERROR_SUCCESS && type == REG_SZ &&
1377 strcmp(otherstr, keystr))) {
1378 if (MessageBox(NULL,
1379 "This host's host key is different from the\n"
1380 "one cached in the registry! Someone may be\n"
1381 "impersonating this host for malicious reasons;\n"
1382 "alternatively, the host key may have changed\n"
1383 "due to sloppy system administration.\n"
1384 "Replace key in registry and connect?",
1385 "PuTTY: Security Warning",
1386 MB_ICONWARNING | MB_YESNO) == IDNO)
1387 exit(0);
1388 RegSetValueEx(rkey, mungedhost, 0, REG_SZ, keystr,
1389 strlen(keystr)+1);
1390 } else if (ret != ERROR_SUCCESS || type != REG_SZ) {
1391 if (MessageBox(NULL,
1392 "This host's host key is not cached in the\n"
1393 "registry. Do you want to add it to the cache\n"
1394 "and carry on connecting?",
1395 "PuTTY: New Host",
1396 MB_ICONWARNING | MB_YESNO) == IDNO)
1397 exit(0);
1398 RegSetValueEx(rkey, mungedhost, 0, REG_SZ, keystr,
1399 strlen(keystr)+1);
1400 }
1401
1402 RegCloseKey(rkey);
1403 }
1404 }
Local modifications for Simon Tatham's `PuTTY' SSH client and terminal emulator