]> asedeno.scripts.mit.edu Git - PuTTY.git/blob - settings.c
Add support for RFC 4432 RSA key exchange, the patch for which has been
[PuTTY.git] / settings.c
1 /*
2  * settings.c: read and write saved sessions. (platform-independent)
3  */
4
5 #include <assert.h>
6 #include <stdio.h>
7 #include <stdlib.h>
8 #include "putty.h"
9 #include "storage.h"
10
11 /*
12  * Tables of string <-> enum value mappings
13  */
14 struct keyval { char *s; int v; };
15
16 /* The cipher order given here is the default order. */
17 static const struct keyval ciphernames[] = {
18     { "aes",        CIPHER_AES },
19     { "blowfish",   CIPHER_BLOWFISH },
20     { "3des",       CIPHER_3DES },
21     { "WARN",       CIPHER_WARN },
22     { "arcfour",    CIPHER_ARCFOUR },
23     { "des",        CIPHER_DES }
24 };
25
26 static const struct keyval kexnames[] = {
27     { "dh-gex-sha1",        KEX_DHGEX },
28     { "dh-group14-sha1",    KEX_DHGROUP14 },
29     { "dh-group1-sha1",     KEX_DHGROUP1 },
30     { "rsa",                KEX_RSA },
31     { "WARN",               KEX_WARN }
32 };
33
34 /*
35  * All the terminal modes that we know about for the "TerminalModes"
36  * setting. (Also used by config.c for the drop-down list.)
37  * This is currently precisely the same as the set in ssh.c, but could
38  * in principle differ if other backends started to support tty modes
39  * (e.g., the pty backend).
40  */
41 const char *const ttymodes[] = {
42     "INTR",     "QUIT",     "ERASE",    "KILL",     "EOF",
43     "EOL",      "EOL2",     "START",    "STOP",     "SUSP",
44     "DSUSP",    "REPRINT",  "WERASE",   "LNEXT",    "FLUSH",
45     "SWTCH",    "STATUS",   "DISCARD",  "IGNPAR",   "PARMRK",
46     "INPCK",    "ISTRIP",   "INLCR",    "IGNCR",    "ICRNL",
47     "IUCLC",    "IXON",     "IXANY",    "IXOFF",    "IMAXBEL",
48     "ISIG",     "ICANON",   "XCASE",    "ECHO",     "ECHOE",
49     "ECHOK",    "ECHONL",   "NOFLSH",   "TOSTOP",   "IEXTEN",
50     "ECHOCTL",  "ECHOKE",   "PENDIN",   "OPOST",    "OLCUC",
51     "ONLCR",    "OCRNL",    "ONOCR",    "ONLRET",   "CS7",
52     "CS8",      "PARENB",   "PARODD",   NULL
53 };
54
55 static void gpps(void *handle, const char *name, const char *def,
56                  char *val, int len)
57 {
58     if (!read_setting_s(handle, name, val, len)) {
59         char *pdef;
60
61         pdef = platform_default_s(name);
62         if (pdef) {
63             strncpy(val, pdef, len);
64             sfree(pdef);
65         } else {
66             strncpy(val, def, len);
67         }
68
69         val[len - 1] = '\0';
70     }
71 }
72
73 /*
74  * gppfont and gppfile cannot have local defaults, since the very
75  * format of a Filename or Font is platform-dependent. So the
76  * platform-dependent functions MUST return some sort of value.
77  */
78 static void gppfont(void *handle, const char *name, FontSpec *result)
79 {
80     if (!read_setting_fontspec(handle, name, result))
81         *result = platform_default_fontspec(name);
82 }
83 static void gppfile(void *handle, const char *name, Filename *result)
84 {
85     if (!read_setting_filename(handle, name, result))
86         *result = platform_default_filename(name);
87 }
88
89 static void gppi(void *handle, char *name, int def, int *i)
90 {
91     def = platform_default_i(name, def);
92     *i = read_setting_i(handle, name, def);
93 }
94
95 /*
96  * Read a set of name-value pairs in the format we occasionally use:
97  *   NAME\tVALUE\0NAME\tVALUE\0\0 in memory
98  *   NAME=VALUE,NAME=VALUE, in storage
99  * `def' is in the storage format.
100  */
101 static void gppmap(void *handle, char *name, char *def, char *val, int len)
102 {
103     char *buf = snewn(2*len, char), *p, *q;
104     gpps(handle, name, def, buf, 2*len);
105     p = buf;
106     q = val;
107     while (*p) {
108         while (*p && *p != ',') {
109             int c = *p++;
110             if (c == '=')
111                 c = '\t';
112             if (c == '\\')
113                 c = *p++;
114             *q++ = c;
115         }
116         if (*p == ',')
117             p++;
118         *q++ = '\0';
119     }
120     *q = '\0';
121     sfree(buf);
122 }
123
124 /*
125  * Write a set of name/value pairs in the above format.
126  */
127 static void wmap(void *handle, char const *key, char const *value, int len)
128 {
129     char *buf = snewn(2*len, char), *p;
130     const char *q;
131     p = buf;
132     q = value;
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     write_setting_s(handle, key, buf);
147     sfree(buf);
148 }
149
150 static int key2val(const struct keyval *mapping, int nmaps, char *key)
151 {
152     int i;
153     for (i = 0; i < nmaps; i++)
154         if (!strcmp(mapping[i].s, key)) return mapping[i].v;
155     return -1;
156 }
157
158 static const char *val2key(const struct keyval *mapping, int nmaps, int val)
159 {
160     int i;
161     for (i = 0; i < nmaps; i++)
162         if (mapping[i].v == val) return mapping[i].s;
163     return NULL;
164 }
165
166 /*
167  * Helper function to parse a comma-separated list of strings into
168  * a preference list array of values. Any missing values are added
169  * to the end and duplicates are weeded.
170  * XXX: assumes vals in 'mapping' are small +ve integers
171  */
172 static void gprefs(void *sesskey, char *name, char *def,
173                    const struct keyval *mapping, int nvals,
174                    int *array)
175 {
176     char commalist[80];
177     char *tokarg = commalist;
178     int n;
179     unsigned long seen = 0;            /* bitmap for weeding dups etc */
180     gpps(sesskey, name, def, commalist, sizeof(commalist));
181
182     /* Grotty parsing of commalist. */
183     n = 0;
184     do {
185         int v;
186         char *key;
187         key = strtok(tokarg, ","); /* sorry */
188         tokarg = NULL;
189         if (!key) break;
190         if (((v = key2val(mapping, nvals, key)) != -1) &&
191             !(seen & 1<<v)) {
192             array[n] = v;
193             n++;
194             seen |= 1<<v;
195         }
196     } while (n < nvals);
197     /* Add any missing values (backward compatibility ect). */
198     {
199         int i;
200         for (i = 0; i < nvals; i++) {
201             assert(mapping[i].v < 32);
202             if (!(seen & 1<<mapping[i].v)) {
203                 array[n] = mapping[i].v;
204                 n++;
205             }
206         }
207     }
208 }
209
210 /* 
211  * Write out a preference list.
212  */
213 static void wprefs(void *sesskey, char *name,
214                    const struct keyval *mapping, int nvals,
215                    int *array)
216 {
217     char buf[80] = "";  /* XXX assumed big enough */
218     int l = sizeof(buf)-1, i;
219     buf[l] = '\0';
220     for (i = 0; l > 0 && i < nvals; i++) {
221         const char *s = val2key(mapping, nvals, array[i]);
222         if (s) {
223             int sl = strlen(s);
224             if (i > 0) {
225                 strncat(buf, ",", l);
226                 l--;
227             }
228             strncat(buf, s, l);
229             l -= sl;
230         }
231     }
232     write_setting_s(sesskey, name, buf);
233 }
234
235 char *save_settings(char *section, Config * cfg)
236 {
237     void *sesskey;
238     char *errmsg;
239
240     sesskey = open_settings_w(section, &errmsg);
241     if (!sesskey)
242         return errmsg;
243     save_open_settings(sesskey, cfg);
244     close_settings_w(sesskey);
245     return NULL;
246 }
247
248 void save_open_settings(void *sesskey, Config *cfg)
249 {
250     int i;
251     char *p;
252
253     write_setting_i(sesskey, "Present", 1);
254     write_setting_s(sesskey, "HostName", cfg->host);
255     write_setting_filename(sesskey, "LogFileName", cfg->logfilename);
256     write_setting_i(sesskey, "LogType", cfg->logtype);
257     write_setting_i(sesskey, "LogFileClash", cfg->logxfovr);
258     write_setting_i(sesskey, "LogFlush", cfg->logflush);
259     write_setting_i(sesskey, "SSHLogOmitPasswords", cfg->logomitpass);
260     write_setting_i(sesskey, "SSHLogOmitData", cfg->logomitdata);
261     p = "raw";
262     for (i = 0; backends[i].name != NULL; i++)
263         if (backends[i].protocol == cfg->protocol) {
264             p = backends[i].name;
265             break;
266         }
267     write_setting_s(sesskey, "Protocol", p);
268     write_setting_i(sesskey, "PortNumber", cfg->port);
269     /* The CloseOnExit numbers are arranged in a different order from
270      * the standard FORCE_ON / FORCE_OFF / AUTO. */
271     write_setting_i(sesskey, "CloseOnExit", (cfg->close_on_exit+2)%3);
272     write_setting_i(sesskey, "WarnOnClose", !!cfg->warn_on_close);
273     write_setting_i(sesskey, "PingInterval", cfg->ping_interval / 60);  /* minutes */
274     write_setting_i(sesskey, "PingIntervalSecs", cfg->ping_interval % 60);      /* seconds */
275     write_setting_i(sesskey, "TCPNoDelay", cfg->tcp_nodelay);
276     write_setting_i(sesskey, "TCPKeepalives", cfg->tcp_keepalives);
277     write_setting_s(sesskey, "TerminalType", cfg->termtype);
278     write_setting_s(sesskey, "TerminalSpeed", cfg->termspeed);
279     wmap(sesskey, "TerminalModes", cfg->ttymodes, lenof(cfg->ttymodes));
280
281     /* Address family selection */
282     write_setting_i(sesskey, "AddressFamily", cfg->addressfamily);
283
284     /* proxy settings */
285     write_setting_s(sesskey, "ProxyExcludeList", cfg->proxy_exclude_list);
286     write_setting_i(sesskey, "ProxyDNS", (cfg->proxy_dns+2)%3);
287     write_setting_i(sesskey, "ProxyLocalhost", cfg->even_proxy_localhost);
288     write_setting_i(sesskey, "ProxyMethod", cfg->proxy_type);
289     write_setting_s(sesskey, "ProxyHost", cfg->proxy_host);
290     write_setting_i(sesskey, "ProxyPort", cfg->proxy_port);
291     write_setting_s(sesskey, "ProxyUsername", cfg->proxy_username);
292     write_setting_s(sesskey, "ProxyPassword", cfg->proxy_password);
293     write_setting_s(sesskey, "ProxyTelnetCommand", cfg->proxy_telnet_command);
294     wmap(sesskey, "Environment", cfg->environmt, lenof(cfg->environmt));
295     write_setting_s(sesskey, "UserName", cfg->username);
296     write_setting_s(sesskey, "LocalUserName", cfg->localusername);
297     write_setting_i(sesskey, "NoPTY", cfg->nopty);
298     write_setting_i(sesskey, "Compression", cfg->compression);
299     write_setting_i(sesskey, "TryAgent", cfg->tryagent);
300     write_setting_i(sesskey, "AgentFwd", cfg->agentfwd);
301     write_setting_i(sesskey, "ChangeUsername", cfg->change_username);
302     wprefs(sesskey, "Cipher", ciphernames, CIPHER_MAX,
303            cfg->ssh_cipherlist);
304     wprefs(sesskey, "KEX", kexnames, KEX_MAX, cfg->ssh_kexlist);
305     write_setting_i(sesskey, "RekeyTime", cfg->ssh_rekey_time);
306     write_setting_s(sesskey, "RekeyBytes", cfg->ssh_rekey_data);
307     write_setting_i(sesskey, "SshNoAuth", cfg->ssh_no_userauth);
308     write_setting_i(sesskey, "AuthTIS", cfg->try_tis_auth);
309     write_setting_i(sesskey, "AuthKI", cfg->try_ki_auth);
310     write_setting_i(sesskey, "SshNoShell", cfg->ssh_no_shell);
311     write_setting_i(sesskey, "SshProt", cfg->sshprot);
312     write_setting_i(sesskey, "SSH2DES", cfg->ssh2_des_cbc);
313     write_setting_filename(sesskey, "PublicKeyFile", cfg->keyfile);
314     write_setting_s(sesskey, "RemoteCommand", cfg->remote_cmd);
315     write_setting_i(sesskey, "RFCEnviron", cfg->rfc_environ);
316     write_setting_i(sesskey, "PassiveTelnet", cfg->passive_telnet);
317     write_setting_i(sesskey, "BackspaceIsDelete", cfg->bksp_is_delete);
318     write_setting_i(sesskey, "RXVTHomeEnd", cfg->rxvt_homeend);
319     write_setting_i(sesskey, "LinuxFunctionKeys", cfg->funky_type);
320     write_setting_i(sesskey, "NoApplicationKeys", cfg->no_applic_k);
321     write_setting_i(sesskey, "NoApplicationCursors", cfg->no_applic_c);
322     write_setting_i(sesskey, "NoMouseReporting", cfg->no_mouse_rep);
323     write_setting_i(sesskey, "NoRemoteResize", cfg->no_remote_resize);
324     write_setting_i(sesskey, "NoAltScreen", cfg->no_alt_screen);
325     write_setting_i(sesskey, "NoRemoteWinTitle", cfg->no_remote_wintitle);
326     write_setting_i(sesskey, "RemoteQTitleAction", cfg->remote_qtitle_action);
327     write_setting_i(sesskey, "NoDBackspace", cfg->no_dbackspace);
328     write_setting_i(sesskey, "NoRemoteCharset", cfg->no_remote_charset);
329     write_setting_i(sesskey, "ApplicationCursorKeys", cfg->app_cursor);
330     write_setting_i(sesskey, "ApplicationKeypad", cfg->app_keypad);
331     write_setting_i(sesskey, "NetHackKeypad", cfg->nethack_keypad);
332     write_setting_i(sesskey, "AltF4", cfg->alt_f4);
333     write_setting_i(sesskey, "AltSpace", cfg->alt_space);
334     write_setting_i(sesskey, "AltOnly", cfg->alt_only);
335     write_setting_i(sesskey, "ComposeKey", cfg->compose_key);
336     write_setting_i(sesskey, "CtrlAltKeys", cfg->ctrlaltkeys);
337     write_setting_i(sesskey, "TelnetKey", cfg->telnet_keyboard);
338     write_setting_i(sesskey, "TelnetRet", cfg->telnet_newline);
339     write_setting_i(sesskey, "LocalEcho", cfg->localecho);
340     write_setting_i(sesskey, "LocalEdit", cfg->localedit);
341     write_setting_s(sesskey, "Answerback", cfg->answerback);
342     write_setting_i(sesskey, "AlwaysOnTop", cfg->alwaysontop);
343     write_setting_i(sesskey, "FullScreenOnAltEnter", cfg->fullscreenonaltenter);
344     write_setting_i(sesskey, "HideMousePtr", cfg->hide_mouseptr);
345     write_setting_i(sesskey, "SunkenEdge", cfg->sunken_edge);
346     write_setting_i(sesskey, "WindowBorder", cfg->window_border);
347     write_setting_i(sesskey, "CurType", cfg->cursor_type);
348     write_setting_i(sesskey, "BlinkCur", cfg->blink_cur);
349     write_setting_i(sesskey, "Beep", cfg->beep);
350     write_setting_i(sesskey, "BeepInd", cfg->beep_ind);
351     write_setting_filename(sesskey, "BellWaveFile", cfg->bell_wavefile);
352     write_setting_i(sesskey, "BellOverload", cfg->bellovl);
353     write_setting_i(sesskey, "BellOverloadN", cfg->bellovl_n);
354     write_setting_i(sesskey, "BellOverloadT", cfg->bellovl_t
355 #ifdef PUTTY_UNIX_H
356                     * 1000
357 #endif
358                     );
359     write_setting_i(sesskey, "BellOverloadS", cfg->bellovl_s
360 #ifdef PUTTY_UNIX_H
361                     * 1000
362 #endif
363                     );
364     write_setting_i(sesskey, "ScrollbackLines", cfg->savelines);
365     write_setting_i(sesskey, "DECOriginMode", cfg->dec_om);
366     write_setting_i(sesskey, "AutoWrapMode", cfg->wrap_mode);
367     write_setting_i(sesskey, "LFImpliesCR", cfg->lfhascr);
368     write_setting_i(sesskey, "DisableArabicShaping", cfg->arabicshaping);
369     write_setting_i(sesskey, "DisableBidi", cfg->bidi);
370     write_setting_i(sesskey, "WinNameAlways", cfg->win_name_always);
371     write_setting_s(sesskey, "WinTitle", cfg->wintitle);
372     write_setting_i(sesskey, "TermWidth", cfg->width);
373     write_setting_i(sesskey, "TermHeight", cfg->height);
374     write_setting_fontspec(sesskey, "Font", cfg->font);
375     write_setting_i(sesskey, "FontQuality", cfg->font_quality);
376     write_setting_i(sesskey, "FontVTMode", cfg->vtmode);
377     write_setting_i(sesskey, "UseSystemColours", cfg->system_colour);
378     write_setting_i(sesskey, "TryPalette", cfg->try_palette);
379     write_setting_i(sesskey, "ANSIColour", cfg->ansi_colour);
380     write_setting_i(sesskey, "Xterm256Colour", cfg->xterm_256_colour);
381     write_setting_i(sesskey, "BoldAsColour", cfg->bold_colour);
382
383     for (i = 0; i < 22; i++) {
384         char buf[20], buf2[30];
385         sprintf(buf, "Colour%d", i);
386         sprintf(buf2, "%d,%d,%d", cfg->colours[i][0],
387                 cfg->colours[i][1], cfg->colours[i][2]);
388         write_setting_s(sesskey, buf, buf2);
389     }
390     write_setting_i(sesskey, "RawCNP", cfg->rawcnp);
391     write_setting_i(sesskey, "PasteRTF", cfg->rtf_paste);
392     write_setting_i(sesskey, "MouseIsXterm", cfg->mouse_is_xterm);
393     write_setting_i(sesskey, "RectSelect", cfg->rect_select);
394     write_setting_i(sesskey, "MouseOverride", cfg->mouse_override);
395     for (i = 0; i < 256; i += 32) {
396         char buf[20], buf2[256];
397         int j;
398         sprintf(buf, "Wordness%d", i);
399         *buf2 = '\0';
400         for (j = i; j < i + 32; j++) {
401             sprintf(buf2 + strlen(buf2), "%s%d",
402                     (*buf2 ? "," : ""), cfg->wordness[j]);
403         }
404         write_setting_s(sesskey, buf, buf2);
405     }
406     write_setting_s(sesskey, "LineCodePage", cfg->line_codepage);
407     write_setting_i(sesskey, "CJKAmbigWide", cfg->cjk_ambig_wide);
408     write_setting_i(sesskey, "UTF8Override", cfg->utf8_override);
409     write_setting_s(sesskey, "Printer", cfg->printer);
410     write_setting_i(sesskey, "CapsLockCyr", cfg->xlat_capslockcyr);
411     write_setting_i(sesskey, "ScrollBar", cfg->scrollbar);
412     write_setting_i(sesskey, "ScrollBarFullScreen", cfg->scrollbar_in_fullscreen);
413     write_setting_i(sesskey, "ScrollOnKey", cfg->scroll_on_key);
414     write_setting_i(sesskey, "ScrollOnDisp", cfg->scroll_on_disp);
415     write_setting_i(sesskey, "EraseToScrollback", cfg->erase_to_scrollback);
416     write_setting_i(sesskey, "LockSize", cfg->resize_action);
417     write_setting_i(sesskey, "BCE", cfg->bce);
418     write_setting_i(sesskey, "BlinkText", cfg->blinktext);
419     write_setting_i(sesskey, "X11Forward", cfg->x11_forward);
420     write_setting_s(sesskey, "X11Display", cfg->x11_display);
421     write_setting_i(sesskey, "X11AuthType", cfg->x11_auth);
422     write_setting_i(sesskey, "LocalPortAcceptAll", cfg->lport_acceptall);
423     write_setting_i(sesskey, "RemotePortAcceptAll", cfg->rport_acceptall);
424     wmap(sesskey, "PortForwardings", cfg->portfwd, lenof(cfg->portfwd));
425     write_setting_i(sesskey, "BugIgnore1", 2-cfg->sshbug_ignore1);
426     write_setting_i(sesskey, "BugPlainPW1", 2-cfg->sshbug_plainpw1);
427     write_setting_i(sesskey, "BugRSA1", 2-cfg->sshbug_rsa1);
428     write_setting_i(sesskey, "BugHMAC2", 2-cfg->sshbug_hmac2);
429     write_setting_i(sesskey, "BugDeriveKey2", 2-cfg->sshbug_derivekey2);
430     write_setting_i(sesskey, "BugRSAPad2", 2-cfg->sshbug_rsapad2);
431     write_setting_i(sesskey, "BugPKSessID2", 2-cfg->sshbug_pksessid2);
432     write_setting_i(sesskey, "BugRekey2", 2-cfg->sshbug_rekey2);
433     write_setting_i(sesskey, "StampUtmp", cfg->stamp_utmp);
434     write_setting_i(sesskey, "LoginShell", cfg->login_shell);
435     write_setting_i(sesskey, "ScrollbarOnLeft", cfg->scrollbar_on_left);
436     write_setting_fontspec(sesskey, "BoldFont", cfg->boldfont);
437     write_setting_fontspec(sesskey, "WideFont", cfg->widefont);
438     write_setting_fontspec(sesskey, "WideBoldFont", cfg->wideboldfont);
439     write_setting_i(sesskey, "ShadowBold", cfg->shadowbold);
440     write_setting_i(sesskey, "ShadowBoldOffset", cfg->shadowboldoffset);
441     write_setting_s(sesskey, "SerialLine", cfg->serline);
442     write_setting_i(sesskey, "SerialSpeed", cfg->serspeed);
443     write_setting_i(sesskey, "SerialDataBits", cfg->serdatabits);
444     write_setting_i(sesskey, "SerialStopHalfbits", cfg->serstopbits);
445     write_setting_i(sesskey, "SerialParity", cfg->serparity);
446     write_setting_i(sesskey, "SerialFlowControl", cfg->serflow);
447 }
448
449 void load_settings(char *section, Config * cfg)
450 {
451     void *sesskey;
452
453     sesskey = open_settings_r(section);
454     load_open_settings(sesskey, cfg);
455     close_settings_r(sesskey);
456 }
457
458 void load_open_settings(void *sesskey, Config *cfg)
459 {
460     int i;
461     char prot[10];
462
463     cfg->ssh_subsys = 0;               /* FIXME: load this properly */
464     cfg->remote_cmd_ptr = NULL;
465     cfg->remote_cmd_ptr2 = NULL;
466     cfg->ssh_nc_host[0] = '\0';
467
468     gpps(sesskey, "HostName", "", cfg->host, sizeof(cfg->host));
469     gppfile(sesskey, "LogFileName", &cfg->logfilename);
470     gppi(sesskey, "LogType", 0, &cfg->logtype);
471     gppi(sesskey, "LogFileClash", LGXF_ASK, &cfg->logxfovr);
472     gppi(sesskey, "LogFlush", 1, &cfg->logflush);
473     gppi(sesskey, "SSHLogOmitPasswords", 1, &cfg->logomitpass);
474     gppi(sesskey, "SSHLogOmitData", 0, &cfg->logomitdata);
475
476     gpps(sesskey, "Protocol", "default", prot, 10);
477     cfg->protocol = default_protocol;
478     cfg->port = default_port;
479     for (i = 0; backends[i].name != NULL; i++)
480         if (!strcmp(prot, backends[i].name)) {
481             cfg->protocol = backends[i].protocol;
482             gppi(sesskey, "PortNumber", default_port, &cfg->port);
483             break;
484         }
485
486     /* Address family selection */
487     gppi(sesskey, "AddressFamily", ADDRTYPE_UNSPEC, &cfg->addressfamily);
488
489     /* The CloseOnExit numbers are arranged in a different order from
490      * the standard FORCE_ON / FORCE_OFF / AUTO. */
491     gppi(sesskey, "CloseOnExit", 1, &i); cfg->close_on_exit = (i+1)%3;
492     gppi(sesskey, "WarnOnClose", 1, &cfg->warn_on_close);
493     {
494         /* This is two values for backward compatibility with 0.50/0.51 */
495         int pingmin, pingsec;
496         gppi(sesskey, "PingInterval", 0, &pingmin);
497         gppi(sesskey, "PingIntervalSecs", 0, &pingsec);
498         cfg->ping_interval = pingmin * 60 + pingsec;
499     }
500     gppi(sesskey, "TCPNoDelay", 1, &cfg->tcp_nodelay);
501     gppi(sesskey, "TCPKeepalives", 0, &cfg->tcp_keepalives);
502     gpps(sesskey, "TerminalType", "xterm", cfg->termtype,
503          sizeof(cfg->termtype));
504     gpps(sesskey, "TerminalSpeed", "38400,38400", cfg->termspeed,
505          sizeof(cfg->termspeed));
506     {
507         /* This hardcodes a big set of defaults in any new saved
508          * sessions. Let's hope we don't change our mind. */
509         int i;
510         char *def = dupstr("");
511         /* Default: all set to "auto" */
512         for (i = 0; ttymodes[i]; i++) {
513             char *def2 = dupprintf("%s%s=A,", def, ttymodes[i]);
514             sfree(def);
515             def = def2;
516         }
517         gppmap(sesskey, "TerminalModes", def,
518                cfg->ttymodes, lenof(cfg->ttymodes));
519         sfree(def);
520     }
521
522     /* proxy settings */
523     gpps(sesskey, "ProxyExcludeList", "", cfg->proxy_exclude_list,
524          sizeof(cfg->proxy_exclude_list));
525     gppi(sesskey, "ProxyDNS", 1, &i); cfg->proxy_dns = (i+1)%3;
526     gppi(sesskey, "ProxyLocalhost", 0, &cfg->even_proxy_localhost);
527     gppi(sesskey, "ProxyMethod", -1, &cfg->proxy_type);
528     if (cfg->proxy_type == -1) {
529         int i;
530         gppi(sesskey, "ProxyType", 0, &i);
531         if (i == 0)
532             cfg->proxy_type = PROXY_NONE;
533         else if (i == 1)
534             cfg->proxy_type = PROXY_HTTP;
535         else if (i == 3)
536             cfg->proxy_type = PROXY_TELNET;
537         else if (i == 4)
538             cfg->proxy_type = PROXY_CMD;
539         else {
540             gppi(sesskey, "ProxySOCKSVersion", 5, &i);
541             if (i == 5)
542                 cfg->proxy_type = PROXY_SOCKS5;
543             else
544                 cfg->proxy_type = PROXY_SOCKS4;
545         }
546     }
547     gpps(sesskey, "ProxyHost", "proxy", cfg->proxy_host,
548          sizeof(cfg->proxy_host));
549     gppi(sesskey, "ProxyPort", 80, &cfg->proxy_port);
550     gpps(sesskey, "ProxyUsername", "", cfg->proxy_username,
551          sizeof(cfg->proxy_username));
552     gpps(sesskey, "ProxyPassword", "", cfg->proxy_password,
553          sizeof(cfg->proxy_password));
554     gpps(sesskey, "ProxyTelnetCommand", "connect %host %port\\n",
555          cfg->proxy_telnet_command, sizeof(cfg->proxy_telnet_command));
556     gppmap(sesskey, "Environment", "", cfg->environmt, lenof(cfg->environmt));
557     gpps(sesskey, "UserName", "", cfg->username, sizeof(cfg->username));
558     gpps(sesskey, "LocalUserName", "", cfg->localusername,
559          sizeof(cfg->localusername));
560     gppi(sesskey, "NoPTY", 0, &cfg->nopty);
561     gppi(sesskey, "Compression", 0, &cfg->compression);
562     gppi(sesskey, "TryAgent", 1, &cfg->tryagent);
563     gppi(sesskey, "AgentFwd", 0, &cfg->agentfwd);
564     gppi(sesskey, "ChangeUsername", 0, &cfg->change_username);
565     gprefs(sesskey, "Cipher", "\0",
566            ciphernames, CIPHER_MAX, cfg->ssh_cipherlist);
567     {
568         /* Backward-compatibility: we used to have an option to
569          * disable gex under the "bugs" panel after one report of
570          * a server which offered it then choked, but we never got
571          * a server version string or any other reports. */
572         char *default_kexes;
573         gppi(sesskey, "BugDHGEx2", 0, &i); i = 2-i;
574         if (i == FORCE_ON)
575             default_kexes = "dh-group14-sha1,dh-group1-sha1,rsa,WARN,dh-gex-sha1";
576         else
577             default_kexes = "dh-gex-sha1,dh-group14-sha1,dh-group1-sha1,rsa,WARN";
578         gprefs(sesskey, "KEX", default_kexes,
579                kexnames, KEX_MAX, cfg->ssh_kexlist);
580     }
581     gppi(sesskey, "RekeyTime", 60, &cfg->ssh_rekey_time);
582     gpps(sesskey, "RekeyBytes", "1G", cfg->ssh_rekey_data,
583          sizeof(cfg->ssh_rekey_data));
584     gppi(sesskey, "SshProt", 2, &cfg->sshprot);
585     gppi(sesskey, "SSH2DES", 0, &cfg->ssh2_des_cbc);
586     gppi(sesskey, "SshNoAuth", 0, &cfg->ssh_no_userauth);
587     gppi(sesskey, "AuthTIS", 0, &cfg->try_tis_auth);
588     gppi(sesskey, "AuthKI", 1, &cfg->try_ki_auth);
589     gppi(sesskey, "SshNoShell", 0, &cfg->ssh_no_shell);
590     gppfile(sesskey, "PublicKeyFile", &cfg->keyfile);
591     gpps(sesskey, "RemoteCommand", "", cfg->remote_cmd,
592          sizeof(cfg->remote_cmd));
593     gppi(sesskey, "RFCEnviron", 0, &cfg->rfc_environ);
594     gppi(sesskey, "PassiveTelnet", 0, &cfg->passive_telnet);
595     gppi(sesskey, "BackspaceIsDelete", 1, &cfg->bksp_is_delete);
596     gppi(sesskey, "RXVTHomeEnd", 0, &cfg->rxvt_homeend);
597     gppi(sesskey, "LinuxFunctionKeys", 0, &cfg->funky_type);
598     gppi(sesskey, "NoApplicationKeys", 0, &cfg->no_applic_k);
599     gppi(sesskey, "NoApplicationCursors", 0, &cfg->no_applic_c);
600     gppi(sesskey, "NoMouseReporting", 0, &cfg->no_mouse_rep);
601     gppi(sesskey, "NoRemoteResize", 0, &cfg->no_remote_resize);
602     gppi(sesskey, "NoAltScreen", 0, &cfg->no_alt_screen);
603     gppi(sesskey, "NoRemoteWinTitle", 0, &cfg->no_remote_wintitle);
604     {
605         /* Backward compatibility */
606         int no_remote_qtitle;
607         gppi(sesskey, "NoRemoteQTitle", 1, &no_remote_qtitle);
608         /* We deliberately interpret the old setting of "no response" as
609          * "empty string". This changes the behaviour, but hopefully for
610          * the better; the user can always recover the old behaviour. */
611         gppi(sesskey, "RemoteQTitleAction",
612              no_remote_qtitle ? TITLE_EMPTY : TITLE_REAL,
613              &cfg->remote_qtitle_action);
614     }
615     gppi(sesskey, "NoDBackspace", 0, &cfg->no_dbackspace);
616     gppi(sesskey, "NoRemoteCharset", 0, &cfg->no_remote_charset);
617     gppi(sesskey, "ApplicationCursorKeys", 0, &cfg->app_cursor);
618     gppi(sesskey, "ApplicationKeypad", 0, &cfg->app_keypad);
619     gppi(sesskey, "NetHackKeypad", 0, &cfg->nethack_keypad);
620     gppi(sesskey, "AltF4", 1, &cfg->alt_f4);
621     gppi(sesskey, "AltSpace", 0, &cfg->alt_space);
622     gppi(sesskey, "AltOnly", 0, &cfg->alt_only);
623     gppi(sesskey, "ComposeKey", 0, &cfg->compose_key);
624     gppi(sesskey, "CtrlAltKeys", 1, &cfg->ctrlaltkeys);
625     gppi(sesskey, "TelnetKey", 0, &cfg->telnet_keyboard);
626     gppi(sesskey, "TelnetRet", 1, &cfg->telnet_newline);
627     gppi(sesskey, "LocalEcho", AUTO, &cfg->localecho);
628     gppi(sesskey, "LocalEdit", AUTO, &cfg->localedit);
629     gpps(sesskey, "Answerback", "PuTTY", cfg->answerback,
630          sizeof(cfg->answerback));
631     gppi(sesskey, "AlwaysOnTop", 0, &cfg->alwaysontop);
632     gppi(sesskey, "FullScreenOnAltEnter", 0, &cfg->fullscreenonaltenter);
633     gppi(sesskey, "HideMousePtr", 0, &cfg->hide_mouseptr);
634     gppi(sesskey, "SunkenEdge", 0, &cfg->sunken_edge);
635     gppi(sesskey, "WindowBorder", 1, &cfg->window_border);
636     gppi(sesskey, "CurType", 0, &cfg->cursor_type);
637     gppi(sesskey, "BlinkCur", 0, &cfg->blink_cur);
638     /* pedantic compiler tells me I can't use &cfg->beep as an int * :-) */
639     gppi(sesskey, "Beep", 1, &cfg->beep);
640     gppi(sesskey, "BeepInd", 0, &cfg->beep_ind);
641     gppfile(sesskey, "BellWaveFile", &cfg->bell_wavefile);
642     gppi(sesskey, "BellOverload", 1, &cfg->bellovl);
643     gppi(sesskey, "BellOverloadN", 5, &cfg->bellovl_n);
644     gppi(sesskey, "BellOverloadT", 2*TICKSPERSEC, &i);
645     cfg->bellovl_t = i
646 #ifdef PUTTY_UNIX_H
647                     / 1000
648 #endif
649         ;
650     gppi(sesskey, "BellOverloadS", 5*TICKSPERSEC, &i);
651     cfg->bellovl_s = i
652 #ifdef PUTTY_UNIX_H
653                     / 1000
654 #endif
655         ;
656     gppi(sesskey, "ScrollbackLines", 200, &cfg->savelines);
657     gppi(sesskey, "DECOriginMode", 0, &cfg->dec_om);
658     gppi(sesskey, "AutoWrapMode", 1, &cfg->wrap_mode);
659     gppi(sesskey, "LFImpliesCR", 0, &cfg->lfhascr);
660     gppi(sesskey, "DisableArabicShaping", 0, &cfg->arabicshaping);
661     gppi(sesskey, "DisableBidi", 0, &cfg->bidi);
662     gppi(sesskey, "WinNameAlways", 1, &cfg->win_name_always);
663     gpps(sesskey, "WinTitle", "", cfg->wintitle, sizeof(cfg->wintitle));
664     gppi(sesskey, "TermWidth", 80, &cfg->width);
665     gppi(sesskey, "TermHeight", 24, &cfg->height);
666     gppfont(sesskey, "Font", &cfg->font);
667     gppi(sesskey, "FontQuality", FQ_DEFAULT, &cfg->font_quality);
668     gppi(sesskey, "FontVTMode", VT_UNICODE, (int *) &cfg->vtmode);
669     gppi(sesskey, "UseSystemColours", 0, &cfg->system_colour);
670     gppi(sesskey, "TryPalette", 0, &cfg->try_palette);
671     gppi(sesskey, "ANSIColour", 1, &cfg->ansi_colour);
672     gppi(sesskey, "Xterm256Colour", 1, &cfg->xterm_256_colour);
673     gppi(sesskey, "BoldAsColour", 1, &cfg->bold_colour);
674
675     for (i = 0; i < 22; i++) {
676         static const char *const defaults[] = {
677             "187,187,187", "255,255,255", "0,0,0", "85,85,85", "0,0,0",
678             "0,255,0", "0,0,0", "85,85,85", "187,0,0", "255,85,85",
679             "0,187,0", "85,255,85", "187,187,0", "255,255,85", "0,0,187",
680             "85,85,255", "187,0,187", "255,85,255", "0,187,187",
681             "85,255,255", "187,187,187", "255,255,255"
682         };
683         char buf[20], buf2[30];
684         int c0, c1, c2;
685         sprintf(buf, "Colour%d", i);
686         gpps(sesskey, buf, defaults[i], buf2, sizeof(buf2));
687         if (sscanf(buf2, "%d,%d,%d", &c0, &c1, &c2) == 3) {
688             cfg->colours[i][0] = c0;
689             cfg->colours[i][1] = c1;
690             cfg->colours[i][2] = c2;
691         }
692     }
693     gppi(sesskey, "RawCNP", 0, &cfg->rawcnp);
694     gppi(sesskey, "PasteRTF", 0, &cfg->rtf_paste);
695     gppi(sesskey, "MouseIsXterm", 0, &cfg->mouse_is_xterm);
696     gppi(sesskey, "RectSelect", 0, &cfg->rect_select);
697     gppi(sesskey, "MouseOverride", 1, &cfg->mouse_override);
698     for (i = 0; i < 256; i += 32) {
699         static const char *const defaults[] = {
700             "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",
701             "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",
702             "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",
703             "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",
704             "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",
705             "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",
706             "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",
707             "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"
708         };
709         char buf[20], buf2[256], *p;
710         int j;
711         sprintf(buf, "Wordness%d", i);
712         gpps(sesskey, buf, defaults[i / 32], buf2, sizeof(buf2));
713         p = buf2;
714         for (j = i; j < i + 32; j++) {
715             char *q = p;
716             while (*p && *p != ',')
717                 p++;
718             if (*p == ',')
719                 *p++ = '\0';
720             cfg->wordness[j] = atoi(q);
721         }
722     }
723     /*
724      * The empty default for LineCodePage will be converted later
725      * into a plausible default for the locale.
726      */
727     gpps(sesskey, "LineCodePage", "", cfg->line_codepage,
728          sizeof(cfg->line_codepage));
729     gppi(sesskey, "CJKAmbigWide", 0, &cfg->cjk_ambig_wide);
730     gppi(sesskey, "UTF8Override", 1, &cfg->utf8_override);
731     gpps(sesskey, "Printer", "", cfg->printer, sizeof(cfg->printer));
732     gppi (sesskey, "CapsLockCyr", 0, &cfg->xlat_capslockcyr);
733     gppi(sesskey, "ScrollBar", 1, &cfg->scrollbar);
734     gppi(sesskey, "ScrollBarFullScreen", 0, &cfg->scrollbar_in_fullscreen);
735     gppi(sesskey, "ScrollOnKey", 0, &cfg->scroll_on_key);
736     gppi(sesskey, "ScrollOnDisp", 1, &cfg->scroll_on_disp);
737     gppi(sesskey, "EraseToScrollback", 1, &cfg->erase_to_scrollback);
738     gppi(sesskey, "LockSize", 0, &cfg->resize_action);
739     gppi(sesskey, "BCE", 1, &cfg->bce);
740     gppi(sesskey, "BlinkText", 0, &cfg->blinktext);
741     gppi(sesskey, "X11Forward", 0, &cfg->x11_forward);
742     gpps(sesskey, "X11Display", "", cfg->x11_display,
743          sizeof(cfg->x11_display));
744     gppi(sesskey, "X11AuthType", X11_MIT, &cfg->x11_auth);
745
746     gppi(sesskey, "LocalPortAcceptAll", 0, &cfg->lport_acceptall);
747     gppi(sesskey, "RemotePortAcceptAll", 0, &cfg->rport_acceptall);
748     gppmap(sesskey, "PortForwardings", "", cfg->portfwd, lenof(cfg->portfwd));
749     gppi(sesskey, "BugIgnore1", 0, &i); cfg->sshbug_ignore1 = 2-i;
750     gppi(sesskey, "BugPlainPW1", 0, &i); cfg->sshbug_plainpw1 = 2-i;
751     gppi(sesskey, "BugRSA1", 0, &i); cfg->sshbug_rsa1 = 2-i;
752     {
753         int i;
754         gppi(sesskey, "BugHMAC2", 0, &i); cfg->sshbug_hmac2 = 2-i;
755         if (cfg->sshbug_hmac2 == AUTO) {
756             gppi(sesskey, "BuggyMAC", 0, &i);
757             if (i == 1)
758                 cfg->sshbug_hmac2 = FORCE_ON;
759         }
760     }
761     gppi(sesskey, "BugDeriveKey2", 0, &i); cfg->sshbug_derivekey2 = 2-i;
762     gppi(sesskey, "BugRSAPad2", 0, &i); cfg->sshbug_rsapad2 = 2-i;
763     gppi(sesskey, "BugPKSessID2", 0, &i); cfg->sshbug_pksessid2 = 2-i;
764     gppi(sesskey, "BugRekey2", 0, &i); cfg->sshbug_rekey2 = 2-i;
765     gppi(sesskey, "StampUtmp", 1, &cfg->stamp_utmp);
766     gppi(sesskey, "LoginShell", 1, &cfg->login_shell);
767     gppi(sesskey, "ScrollbarOnLeft", 0, &cfg->scrollbar_on_left);
768     gppi(sesskey, "ShadowBold", 0, &cfg->shadowbold);
769     gppfont(sesskey, "BoldFont", &cfg->boldfont);
770     gppfont(sesskey, "WideFont", &cfg->widefont);
771     gppfont(sesskey, "WideBoldFont", &cfg->wideboldfont);
772     gppi(sesskey, "ShadowBoldOffset", 1, &cfg->shadowboldoffset);
773     gpps(sesskey, "SerialLine", "", cfg->serline, sizeof(cfg->serline));
774     gppi(sesskey, "SerialSpeed", 9600, &cfg->serspeed);
775     gppi(sesskey, "SerialDataBits", 8, &cfg->serdatabits);
776     gppi(sesskey, "SerialStopHalfbits", 2, &cfg->serstopbits);
777     gppi(sesskey, "SerialParity", SER_PAR_NONE, &cfg->serparity);
778     gppi(sesskey, "SerialFlowControl", SER_FLOW_XONXOFF, &cfg->serflow);
779 }
780
781 void do_defaults(char *session, Config * cfg)
782 {
783     load_settings(session, cfg);
784 }
785
786 static int sessioncmp(const void *av, const void *bv)
787 {
788     const char *a = *(const char *const *) av;
789     const char *b = *(const char *const *) bv;
790
791     /*
792      * Alphabetical order, except that "Default Settings" is a
793      * special case and comes first.
794      */
795     if (!strcmp(a, "Default Settings"))
796         return -1;                     /* a comes first */
797     if (!strcmp(b, "Default Settings"))
798         return +1;                     /* b comes first */
799     /*
800      * FIXME: perhaps we should ignore the first & in determining
801      * sort order.
802      */
803     return strcmp(a, b);               /* otherwise, compare normally */
804 }
805
806 void get_sesslist(struct sesslist *list, int allocate)
807 {
808     char otherbuf[2048];
809     int buflen, bufsize, i;
810     char *p, *ret;
811     void *handle;
812
813     if (allocate) {
814
815         buflen = bufsize = 0;
816         list->buffer = NULL;
817         if ((handle = enum_settings_start()) != NULL) {
818             do {
819                 ret = enum_settings_next(handle, otherbuf, sizeof(otherbuf));
820                 if (ret) {
821                     int len = strlen(otherbuf) + 1;
822                     if (bufsize < buflen + len) {
823                         bufsize = buflen + len + 2048;
824                         list->buffer = sresize(list->buffer, bufsize, char);
825                     }
826                     strcpy(list->buffer + buflen, otherbuf);
827                     buflen += strlen(list->buffer + buflen) + 1;
828                 }
829             } while (ret);
830             enum_settings_finish(handle);
831         }
832         list->buffer = sresize(list->buffer, buflen + 1, char);
833         list->buffer[buflen] = '\0';
834
835         /*
836          * Now set up the list of sessions. Note that "Default
837          * Settings" must always be claimed to exist, even if it
838          * doesn't really.
839          */
840
841         p = list->buffer;
842         list->nsessions = 1;           /* "Default Settings" counts as one */
843         while (*p) {
844             if (strcmp(p, "Default Settings"))
845                 list->nsessions++;
846             while (*p)
847                 p++;
848             p++;
849         }
850
851         list->sessions = snewn(list->nsessions + 1, char *);
852         list->sessions[0] = "Default Settings";
853         p = list->buffer;
854         i = 1;
855         while (*p) {
856             if (strcmp(p, "Default Settings"))
857                 list->sessions[i++] = p;
858             while (*p)
859                 p++;
860             p++;
861         }
862
863         qsort(list->sessions, i, sizeof(char *), sessioncmp);
864     } else {
865         sfree(list->buffer);
866         sfree(list->sessions);
867         list->buffer = NULL;
868         list->sessions = NULL;
869     }
870 }