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


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