settings.c

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