settings.c

   1 /*
   2  * settings.c: read and write saved sessions.
   3  */
   4
   5 #include <windows.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 static const struct keyval ciphernames[] = {
  17     { "aes",        CIPHER_AES },
  18     { "blowfish",   CIPHER_BLOWFISH },
  19     { "3des",       CIPHER_3DES },
  20     { "WARN",       CIPHER_WARN },
  21     { "des",        CIPHER_DES }
  22 };
  23
  24 static void gpps(void *handle, char *name, char *def, char *val, int len)
  25 {
  26     if (!read_setting_s(handle, name, val, len)) {
  27         strncpy(val, def, len);
  28         val[len - 1] = '\0';
  29     }
  30 }
  31
  32 static void gppi(void *handle, char *name, int def, int *i)
  33 {
  34     *i = read_setting_i(handle, name, def);
  35 }
  36
  37 static int key2val(const struct keyval *mapping, int nmaps, char *key)
  38 {
  39     int i;
  40     for (i = 0; i < nmaps; i++)
  41         if (!strcmp(mapping[i].s, key)) return mapping[i].v;
  42     return -1;
  43 }
  44
  45 static const char *val2key(const struct keyval *mapping, int nmaps, int val)
  46 {
  47     int i;
  48     for (i = 0; i < nmaps; i++)
  49         if (mapping[i].v == val) return mapping[i].s;
  50     return NULL;
  51 }
  52
  53 /*
  54  * Helper function to parse a comma-separated list of strings into
  55  * a preference list array of values. Any missing values are added
  56  * to the end and duplicates are weeded.
  57  * XXX: assumes vals in 'mapping' are small +ve integers
  58  */
  59 static void gprefs(void *sesskey, char *name, char *def,
  60                    const struct keyval *mapping, int nvals,
  61                    int *array)
  62 {
  63     char commalist[80];
  64     int n;
  65     unsigned long seen = 0;            /* bitmap for weeding dups etc */
  66     gpps(sesskey, name, def, commalist, sizeof(commalist));
  67
  68     /* Grotty parsing of commalist. */
  69     n = 0;
  70     do {
  71         int v;
  72         char *key;
  73         key = strtok(n==0 ? commalist : NULL, ","); /* sorry */
  74         if (!key) break;
  75         if (((v = key2val(mapping, nvals, key)) != -1) &&
  76             !(seen & 1<<v)) {
  77             array[n] = v;
  78             n++;
  79             seen |= 1<<v;
  80         }
  81     } while (n < nvals);
  82     /* Add any missing values (backward compatibility ect). */
  83     {
  84         int i;
  85         for (i = 0; i < nvals; i++) {
  86             if (!(seen & 1<<mapping[i].v)) {
  87                 array[n] = mapping[i].v;
  88                 n++;
  89             }
  90         }
  91     }
  92 }
  93
  94 /*
  95  * Write out a preference list.
  96  */
  97 static void wprefs(void *sesskey, char *name,
  98                    const struct keyval *mapping, int nvals,
  99                    int *array)
 100 {
 101     char buf[80] = "";  /* XXX assumed big enough */
 102     int l = sizeof(buf)-1, i;
 103     buf[l] = '\0';
 104     for (i = 0; l > 0 && i < nvals; i++) {
 105         const char *s = val2key(mapping, nvals, array[i]);
 106         if (s) {
 107             int sl = strlen(s);
 108             if (i > 0) {
 109                 strncat(buf, ",", l);
 110                 l--;
 111             }
 112             strncat(buf, s, l);
 113             l -= sl;
 114         }
 115     }
 116     write_setting_s(sesskey, name, buf);
 117 }
 118
 119 void save_settings(char *section, int do_host, Config * cfg)
 120 {
 121     int i;
 122     char *p;
 123     void *sesskey;
 124
 125     sesskey = open_settings_w(section);
 126     if (!sesskey)
 127         return;
 128
 129     write_setting_i(sesskey, "Present", 1);
 130     if (do_host) {
 131         write_setting_s(sesskey, "HostName", cfg->host);
 132         write_setting_s(sesskey, "LogFileName", cfg->logfilename);
 133         write_setting_i(sesskey, "LogType", cfg->logtype);
 134         write_setting_i(sesskey, "LogFileClash", cfg->logxfovr);
 135     }
 136     p = "raw";
 137     for (i = 0; backends[i].name != NULL; i++)
 138         if (backends[i].protocol == cfg->protocol) {
 139             p = backends[i].name;
 140             break;
 141         }
 142     write_setting_s(sesskey, "Protocol", p);
 143     write_setting_i(sesskey, "PortNumber", cfg->port);
 144     write_setting_i(sesskey, "CloseOnExit", cfg->close_on_exit);
 145     write_setting_i(sesskey, "WarnOnClose", !!cfg->warn_on_close);
 146     write_setting_i(sesskey, "PingInterval", cfg->ping_interval / 60);  /* minutes */
 147     write_setting_i(sesskey, "PingIntervalSecs", cfg->ping_interval % 60);      /* seconds */
 148     write_setting_i(sesskey, "TCPNoDelay", cfg->tcp_nodelay);
 149     write_setting_s(sesskey, "TerminalType", cfg->termtype);
 150     write_setting_s(sesskey, "TerminalSpeed", cfg->termspeed);
 151     {
 152         char buf[2 * sizeof(cfg->environmt)], *p, *q;
 153         p = buf;
 154         q = cfg->environmt;
 155         while (*q) {
 156             while (*q) {
 157                 int c = *q++;
 158                 if (c == '=' || c == ',' || c == '\\')
 159                     *p++ = '\\';
 160                 if (c == '\t')
 161                     c = '=';
 162                 *p++ = c;
 163             }
 164             *p++ = ',';
 165             q++;
 166         }
 167         *p = '\0';
 168         write_setting_s(sesskey, "Environment", buf);
 169     }
 170     write_setting_s(sesskey, "UserName", cfg->username);
 171     write_setting_s(sesskey, "LocalUserName", cfg->localusername);
 172     write_setting_i(sesskey, "NoPTY", cfg->nopty);
 173     write_setting_i(sesskey, "Compression", cfg->compression);
 174     write_setting_i(sesskey, "AgentFwd", cfg->agentfwd);
 175     write_setting_i(sesskey, "ChangeUsername", cfg->change_username);
 176     wprefs(sesskey, "Cipher", ciphernames, CIPHER_MAX,
 177            cfg->ssh_cipherlist);
 178     write_setting_i(sesskey, "AuthTIS", cfg->try_tis_auth);
 179     write_setting_i(sesskey, "AuthKI", cfg->try_ki_auth);
 180     write_setting_i(sesskey, "SshProt", cfg->sshprot);
 181     write_setting_i(sesskey, "BuggyMAC", cfg->buggymac);
 182     write_setting_i(sesskey, "SSH2DES", cfg->ssh2_des_cbc);
 183     write_setting_s(sesskey, "PublicKeyFile", cfg->keyfile);
 184     write_setting_s(sesskey, "RemoteCommand", cfg->remote_cmd);
 185     write_setting_i(sesskey, "RFCEnviron", cfg->rfc_environ);
 186     write_setting_i(sesskey, "PassiveTelnet", cfg->passive_telnet);
 187     write_setting_i(sesskey, "BackspaceIsDelete", cfg->bksp_is_delete);
 188     write_setting_i(sesskey, "RXVTHomeEnd", cfg->rxvt_homeend);
 189     write_setting_i(sesskey, "LinuxFunctionKeys", cfg->funky_type);
 190     write_setting_i(sesskey, "NoApplicationKeys", cfg->no_applic_k);
 191     write_setting_i(sesskey, "NoApplicationCursors", cfg->no_applic_c);
 192     write_setting_i(sesskey, "ApplicationCursorKeys", cfg->app_cursor);
 193     write_setting_i(sesskey, "ApplicationKeypad", cfg->app_keypad);
 194     write_setting_i(sesskey, "NetHackKeypad", cfg->nethack_keypad);
 195     write_setting_i(sesskey, "AltF4", cfg->alt_f4);
 196     write_setting_i(sesskey, "AltSpace", cfg->alt_space);
 197     write_setting_i(sesskey, "AltOnly", cfg->alt_only);
 198     write_setting_i(sesskey, "ComposeKey", cfg->compose_key);
 199     write_setting_i(sesskey, "CtrlAltKeys", cfg->ctrlaltkeys);
 200     write_setting_i(sesskey, "TelnetKey", cfg->telnet_keyboard);
 201     write_setting_i(sesskey, "LocalEcho", cfg->localecho);
 202     write_setting_i(sesskey, "LocalEdit", cfg->localedit);
 203     write_setting_s(sesskey, "Answerback", cfg->answerback);
 204     write_setting_i(sesskey, "AlwaysOnTop", cfg->alwaysontop);
 205     write_setting_i(sesskey, "FullScreenOnAltEnter", cfg->fullscreenonaltenter);
 206     write_setting_i(sesskey, "HideMousePtr", cfg->hide_mouseptr);
 207     write_setting_i(sesskey, "SunkenEdge", cfg->sunken_edge);
 208     write_setting_i(sesskey, "WindowBorder", cfg->window_border);
 209     write_setting_i(sesskey, "CurType", cfg->cursor_type);
 210     write_setting_i(sesskey, "BlinkCur", cfg->blink_cur);
 211     write_setting_i(sesskey, "Beep", cfg->beep);
 212     write_setting_i(sesskey, "BeepInd", cfg->beep_ind);
 213     write_setting_s(sesskey, "BellWaveFile", cfg->bell_wavefile);
 214     write_setting_i(sesskey, "BellOverload", cfg->bellovl);
 215     write_setting_i(sesskey, "BellOverloadN", cfg->bellovl_n);
 216     write_setting_i(sesskey, "BellOverloadT", cfg->bellovl_t);
 217     write_setting_i(sesskey, "BellOverloadS", cfg->bellovl_s);
 218     write_setting_i(sesskey, "ScrollbackLines", cfg->savelines);
 219     write_setting_i(sesskey, "DECOriginMode", cfg->dec_om);
 220     write_setting_i(sesskey, "AutoWrapMode", cfg->wrap_mode);
 221     write_setting_i(sesskey, "LFImpliesCR", cfg->lfhascr);
 222     write_setting_i(sesskey, "WinNameAlways", cfg->win_name_always);
 223     write_setting_s(sesskey, "WinTitle", cfg->wintitle);
 224     write_setting_i(sesskey, "TermWidth", cfg->width);
 225     write_setting_i(sesskey, "TermHeight", cfg->height);
 226     write_setting_s(sesskey, "Font", cfg->font);
 227     write_setting_i(sesskey, "FontIsBold", cfg->fontisbold);
 228     write_setting_i(sesskey, "FontCharSet", cfg->fontcharset);
 229     write_setting_i(sesskey, "FontHeight", cfg->fontheight);
 230     write_setting_i(sesskey, "FontVTMode", cfg->vtmode);
 231     write_setting_i(sesskey, "TryPalette", cfg->try_palette);
 232     write_setting_i(sesskey, "BoldAsColour", cfg->bold_colour);
 233     for (i = 0; i < 22; i++) {
 234         char buf[20], buf2[30];
 235         sprintf(buf, "Colour%d", i);
 236         sprintf(buf2, "%d,%d,%d", cfg->colours[i][0],
 237                 cfg->colours[i][1], cfg->colours[i][2]);
 238         write_setting_s(sesskey, buf, buf2);
 239     }
 240     write_setting_i(sesskey, "RawCNP", cfg->rawcnp);
 241     write_setting_i(sesskey, "PasteRTF", cfg->rtf_paste);
 242     write_setting_i(sesskey, "MouseIsXterm", cfg->mouse_is_xterm);
 243     write_setting_i(sesskey, "RectSelect", cfg->rect_select);
 244     write_setting_i(sesskey, "MouseOverride", cfg->mouse_override);
 245     for (i = 0; i < 256; i += 32) {
 246         char buf[20], buf2[256];
 247         int j;
 248         sprintf(buf, "Wordness%d", i);
 249         *buf2 = '\0';
 250         for (j = i; j < i + 32; j++) {
 251             sprintf(buf2 + strlen(buf2), "%s%d",
 252                     (*buf2 ? "," : ""), cfg->wordness[j]);
 253         }
 254         write_setting_s(sesskey, buf, buf2);
 255     }
 256     write_setting_s(sesskey, "LineCodePage", cfg->line_codepage);
 257     write_setting_i(sesskey, "CapsLockCyr", cfg->xlat_capslockcyr);
 258     write_setting_i(sesskey, "ScrollBar", cfg->scrollbar);
 259     write_setting_i(sesskey, "ScrollBarFullScreen", cfg->scrollbar_in_fullscreen);
 260     write_setting_i(sesskey, "ScrollOnKey", cfg->scroll_on_key);
 261     write_setting_i(sesskey, "ScrollOnDisp", cfg->scroll_on_disp);
 262     write_setting_i(sesskey, "LockSize", cfg->resize_action);
 263     write_setting_i(sesskey, "BCE", cfg->bce);
 264     write_setting_i(sesskey, "BlinkText", cfg->blinktext);
 265     write_setting_i(sesskey, "X11Forward", cfg->x11_forward);
 266     write_setting_s(sesskey, "X11Display", cfg->x11_display);
 267     write_setting_i(sesskey, "LocalPortAcceptAll", cfg->lport_acceptall);
 268     {
 269         char buf[2 * sizeof(cfg->portfwd)], *p, *q;
 270         p = buf;
 271         q = cfg->portfwd;
 272         while (*q) {
 273             while (*q) {
 274                 int c = *q++;
 275                 if (c == '=' || c == ',' || c == '\\')
 276                     *p++ = '\\';
 277                 if (c == '\t')
 278                     c = '=';
 279                 *p++ = c;
 280             }
 281             *p++ = ',';
 282             q++;
 283         }
 284         *p = '\0';
 285         write_setting_s(sesskey, "PortForwardings", buf);
 286     }
 287
 288     close_settings_w(sesskey);
 289 }
 290
 291 void load_settings(char *section, int do_host, Config * cfg)
 292 {
 293     int i;
 294     char prot[10];
 295     void *sesskey;
 296
 297     sesskey = open_settings_r(section);
 298
 299     cfg->ssh_subsys = 0;               /* FIXME: load this properly */
 300     cfg->remote_cmd_ptr = cfg->remote_cmd;
 301     cfg->remote_cmd_ptr2 = NULL;
 302
 303     if (do_host) {
 304         gpps(sesskey, "HostName", "", cfg->host, sizeof(cfg->host));
 305     } else {
 306         cfg->host[0] = '\0';           /* blank hostname */
 307     }
 308     gpps(sesskey, "LogFileName", "putty.log",
 309          cfg->logfilename, sizeof(cfg->logfilename));
 310     gppi(sesskey, "LogType", 0, &cfg->logtype);
 311     gppi(sesskey, "LogFileClash", LGXF_ASK, &cfg->logxfovr);
 312
 313     gpps(sesskey, "Protocol", "default", prot, 10);
 314     cfg->protocol = default_protocol;
 315     cfg->port = default_port;
 316     for (i = 0; backends[i].name != NULL; i++)
 317         if (!strcmp(prot, backends[i].name)) {
 318             cfg->protocol = backends[i].protocol;
 319             gppi(sesskey, "PortNumber", default_port, &cfg->port);
 320             break;
 321         }
 322
 323     gppi(sesskey, "CloseOnExit", COE_NORMAL, &cfg->close_on_exit);
 324     gppi(sesskey, "WarnOnClose", 1, &cfg->warn_on_close);
 325     {
 326         /* This is two values for backward compatibility with 0.50/0.51 */
 327         int pingmin, pingsec;
 328         gppi(sesskey, "PingInterval", 0, &pingmin);
 329         gppi(sesskey, "PingIntervalSecs", 0, &pingsec);
 330         cfg->ping_interval = pingmin * 60 + pingsec;
 331     }
 332     gppi(sesskey, "TCPNoDelay", 1, &cfg->tcp_nodelay);
 333     gpps(sesskey, "TerminalType", "xterm", cfg->termtype,
 334          sizeof(cfg->termtype));
 335     gpps(sesskey, "TerminalSpeed", "38400,38400", cfg->termspeed,
 336          sizeof(cfg->termspeed));
 337     {
 338         char buf[2 * sizeof(cfg->environmt)], *p, *q;
 339         gpps(sesskey, "Environment", "", buf, sizeof(buf));
 340         p = buf;
 341         q = cfg->environmt;
 342         while (*p) {
 343             while (*p && *p != ',') {
 344                 int c = *p++;
 345                 if (c == '=')
 346                     c = '\t';
 347                 if (c == '\\')
 348                     c = *p++;
 349                 *q++ = c;
 350             }
 351             if (*p == ',')
 352                 p++;
 353             *q++ = '\0';
 354         }
 355         *q = '\0';
 356     }
 357     gpps(sesskey, "UserName", "", cfg->username, sizeof(cfg->username));
 358     gpps(sesskey, "LocalUserName", "", cfg->localusername,
 359          sizeof(cfg->localusername));
 360     gppi(sesskey, "NoPTY", 0, &cfg->nopty);
 361     gppi(sesskey, "Compression", 0, &cfg->compression);
 362     gppi(sesskey, "AgentFwd", 0, &cfg->agentfwd);
 363     gppi(sesskey, "ChangeUsername", 0, &cfg->change_username);
 364     gprefs(sesskey, "Cipher", "\0",
 365            ciphernames, CIPHER_MAX, cfg->ssh_cipherlist);
 366     gppi(sesskey, "SshProt", 1, &cfg->sshprot);
 367     gppi(sesskey, "BuggyMAC", 0, &cfg->buggymac);
 368     gppi(sesskey, "SSH2DES", 0, &cfg->ssh2_des_cbc);
 369     gppi(sesskey, "AuthTIS", 0, &cfg->try_tis_auth);
 370     gppi(sesskey, "AuthKI", 1, &cfg->try_ki_auth);
 371     gpps(sesskey, "PublicKeyFile", "", cfg->keyfile, sizeof(cfg->keyfile));
 372     gpps(sesskey, "RemoteCommand", "", cfg->remote_cmd,
 373          sizeof(cfg->remote_cmd));
 374     gppi(sesskey, "RFCEnviron", 0, &cfg->rfc_environ);
 375     gppi(sesskey, "PassiveTelnet", 0, &cfg->passive_telnet);
 376     gppi(sesskey, "BackspaceIsDelete", 1, &cfg->bksp_is_delete);
 377     gppi(sesskey, "RXVTHomeEnd", 0, &cfg->rxvt_homeend);
 378     gppi(sesskey, "LinuxFunctionKeys", 0, &cfg->funky_type);
 379     gppi(sesskey, "NoApplicationKeys", 0, &cfg->no_applic_k);
 380     gppi(sesskey, "NoApplicationCursors", 0, &cfg->no_applic_c);
 381     gppi(sesskey, "ApplicationCursorKeys", 0, &cfg->app_cursor);
 382     gppi(sesskey, "ApplicationKeypad", 0, &cfg->app_keypad);
 383     gppi(sesskey, "NetHackKeypad", 0, &cfg->nethack_keypad);
 384     gppi(sesskey, "AltF4", 1, &cfg->alt_f4);
 385     gppi(sesskey, "AltSpace", 0, &cfg->alt_space);
 386     gppi(sesskey, "AltOnly", 0, &cfg->alt_only);
 387     gppi(sesskey, "ComposeKey", 0, &cfg->compose_key);
 388     gppi(sesskey, "CtrlAltKeys", 1, &cfg->ctrlaltkeys);
 389     gppi(sesskey, "TelnetKey", 0, &cfg->telnet_keyboard);
 390     gppi(sesskey, "LocalEcho", LD_BACKEND, &cfg->localecho);
 391     gppi(sesskey, "LocalEdit", LD_BACKEND, &cfg->localedit);
 392     gpps(sesskey, "Answerback", "PuTTY", cfg->answerback,
 393          sizeof(cfg->answerback));
 394     gppi(sesskey, "AlwaysOnTop", 0, &cfg->alwaysontop);
 395     gppi(sesskey, "FullScreenOnAltEnter", 0, &cfg->fullscreenonaltenter);
 396     gppi(sesskey, "HideMousePtr", 0, &cfg->hide_mouseptr);
 397     gppi(sesskey, "SunkenEdge", 0, &cfg->sunken_edge);
 398     gppi(sesskey, "WindowBorder", 1, &cfg->window_border);
 399     gppi(sesskey, "CurType", 0, &cfg->cursor_type);
 400     gppi(sesskey, "BlinkCur", 0, &cfg->blink_cur);
 401     /* pedantic compiler tells me I can't use &cfg->beep as an int * :-) */
 402     gppi(sesskey, "Beep", 1, &i); cfg->beep = i;
 403     gppi(sesskey, "BeepInd", 0, &i); cfg->beep_ind = i;
 404     gpps(sesskey, "BellWaveFile", "", cfg->bell_wavefile,
 405          sizeof(cfg->bell_wavefile));
 406     gppi(sesskey, "BellOverload", 1, &cfg->bellovl);
 407     gppi(sesskey, "BellOverloadN", 5, &cfg->bellovl_n);
 408     gppi(sesskey, "BellOverloadT", 2000, &cfg->bellovl_t);
 409     gppi(sesskey, "BellOverloadS", 5000, &cfg->bellovl_s);
 410     gppi(sesskey, "ScrollbackLines", 200, &cfg->savelines);
 411     gppi(sesskey, "DECOriginMode", 0, &cfg->dec_om);
 412     gppi(sesskey, "AutoWrapMode", 1, &cfg->wrap_mode);
 413     gppi(sesskey, "LFImpliesCR", 0, &cfg->lfhascr);
 414     gppi(sesskey, "WinNameAlways", 0, &cfg->win_name_always);
 415     gpps(sesskey, "WinTitle", "", cfg->wintitle, sizeof(cfg->wintitle));
 416     gppi(sesskey, "TermWidth", 80, &cfg->width);
 417     gppi(sesskey, "TermHeight", 24, &cfg->height);
 418     gpps(sesskey, "Font", "Courier New", cfg->font, sizeof(cfg->font));
 419     gppi(sesskey, "FontIsBold", 0, &cfg->fontisbold);
 420     gppi(sesskey, "FontCharSet", ANSI_CHARSET, &cfg->fontcharset);
 421     gppi(sesskey, "FontHeight", 10, &cfg->fontheight);
 422     if (cfg->fontheight < 0) {
 423         int oldh, newh;
 424         HDC hdc = GetDC(NULL);
 425         int logpix = GetDeviceCaps(hdc, LOGPIXELSY);
 426         ReleaseDC(NULL, hdc);
 427
 428         oldh = -cfg->fontheight;
 429         newh = MulDiv(oldh, 72, logpix) + 1;
 430         if (MulDiv(newh, logpix, 72) > oldh)
 431             newh--;
 432         cfg->fontheight = newh;
 433     }
 434     gppi(sesskey, "FontVTMode", VT_UNICODE, (int *) &cfg->vtmode);
 435     gppi(sesskey, "TryPalette", 0, &cfg->try_palette);
 436     gppi(sesskey, "BoldAsColour", 1, &cfg->bold_colour);
 437     for (i = 0; i < 22; i++) {
 438         static char *defaults[] = {
 439             "187,187,187", "255,255,255", "0,0,0", "85,85,85", "0,0,0",
 440             "0,255,0", "0,0,0", "85,85,85", "187,0,0", "255,85,85",
 441             "0,187,0", "85,255,85", "187,187,0", "255,255,85", "0,0,187",
 442             "85,85,255", "187,0,187", "255,85,255", "0,187,187",
 443             "85,255,255", "187,187,187", "255,255,255"
 444         };
 445         char buf[20], buf2[30];
 446         int c0, c1, c2;
 447         sprintf(buf, "Colour%d", i);
 448         gpps(sesskey, buf, defaults[i], buf2, sizeof(buf2));
 449         if (sscanf(buf2, "%d,%d,%d", &c0, &c1, &c2) == 3) {
 450             cfg->colours[i][0] = c0;
 451             cfg->colours[i][1] = c1;
 452             cfg->colours[i][2] = c2;
 453         }
 454     }
 455     gppi(sesskey, "RawCNP", 0, &cfg->rawcnp);
 456     gppi(sesskey, "PasteRTF", 0, &cfg->rtf_paste);
 457     gppi(sesskey, "MouseIsXterm", 0, &cfg->mouse_is_xterm);
 458     gppi(sesskey, "RectSelect", 0, &cfg->rect_select);
 459     gppi(sesskey, "MouseOverride", 1, &cfg->mouse_override);
 460     for (i = 0; i < 256; i += 32) {
 461         static char *defaults[] = {
 462             "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",
 463             "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",
 464             "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",
 465             "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",
 466             "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",
 467             "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",
 468             "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",
 469             "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"
 470         };
 471         char buf[20], buf2[256], *p;
 472         int j;
 473         sprintf(buf, "Wordness%d", i);
 474         gpps(sesskey, buf, defaults[i / 32], buf2, sizeof(buf2));
 475         p = buf2;
 476         for (j = i; j < i + 32; j++) {
 477             char *q = p;
 478             while (*p && *p != ',')
 479                 p++;
 480             if (*p == ',')
 481                 *p++ = '\0';
 482             cfg->wordness[j] = atoi(q);
 483         }
 484     }
 485     /*
 486      * The empty default for LineCodePage will be converted later
 487      * into a plausible default for the locale.
 488      */
 489     gpps(sesskey, "LineCodePage", "", cfg->line_codepage,
 490          sizeof(cfg->line_codepage));
 491     gppi (sesskey, "CapsLockCyr", 0, &cfg->xlat_capslockcyr);
 492     gppi(sesskey, "ScrollBar", 1, &cfg->scrollbar);
 493     gppi(sesskey, "ScrollBarFullScreen", 0, &cfg->scrollbar_in_fullscreen);
 494     gppi(sesskey, "ScrollOnKey", 0, &cfg->scroll_on_key);
 495     gppi(sesskey, "ScrollOnDisp", 1, &cfg->scroll_on_disp);
 496     gppi(sesskey, "LockSize", 0, &cfg->resize_action);
 497     gppi(sesskey, "BCE", 0, &cfg->bce);
 498     gppi(sesskey, "BlinkText", 0, &cfg->blinktext);
 499     gppi(sesskey, "X11Forward", 0, &cfg->x11_forward);
 500     gpps(sesskey, "X11Display", "localhost:0", cfg->x11_display,
 501          sizeof(cfg->x11_display));
 502
 503     gppi(sesskey, "LocalPortAcceptAll", 0, &cfg->lport_acceptall);
 504     {
 505         char buf[2 * sizeof(cfg->portfwd)], *p, *q;
 506         gpps(sesskey, "PortForwardings", "", buf, sizeof(buf));
 507         p = buf;
 508         q = cfg->portfwd;
 509         while (*p) {
 510             while (*p && *p != ',') {
 511                 int c = *p++;
 512                 if (c == '=')
 513                     c = '\t';
 514                 if (c == '\\')
 515                     c = *p++;
 516                 *q++ = c;
 517             }
 518             if (*p == ',')
 519                 p++;
 520             *q++ = '\0';
 521         }
 522         *q = '\0';
 523     }
 524
 525     close_settings_r(sesskey);
 526 }
 527
 528 void do_defaults(char *session, Config * cfg)
 529 {
 530     if (session)
 531         load_settings(session, TRUE, cfg);
 532     else
 533         load_settings("Default Settings", FALSE, cfg);
 534 }
 535
 536 static int sessioncmp(const void *av, const void *bv)
 537 {
 538     const char *a = *(const char *const *) av;
 539     const char *b = *(const char *const *) bv;
 540
 541     /*
 542      * Alphabetical order, except that "Default Settings" is a
 543      * special case and comes first.
 544      */
 545     if (!strcmp(a, "Default Settings"))
 546         return -1;                     /* a comes first */
 547     if (!strcmp(b, "Default Settings"))
 548         return +1;                     /* b comes first */
 549     /*
 550      * FIXME: perhaps we should ignore the first & in determining
 551      * sort order.
 552      */
 553     return strcmp(a, b);               /* otherwise, compare normally */
 554 }
 555
 556 void get_sesslist(int allocate)
 557 {
 558     static char otherbuf[2048];
 559     static char *buffer;
 560     int buflen, bufsize, i;
 561     char *p, *ret;
 562     void *handle;
 563
 564     if (allocate) {
 565
 566         if ((handle = enum_settings_start()) == NULL)
 567             return;
 568
 569         buflen = bufsize = 0;
 570         buffer = NULL;
 571         do {
 572             ret = enum_settings_next(handle, otherbuf, sizeof(otherbuf));
 573             if (ret) {
 574                 int len = strlen(otherbuf) + 1;
 575                 if (bufsize < buflen + len) {
 576                     bufsize = buflen + len + 2048;
 577                     buffer = srealloc(buffer, bufsize);
 578                 }
 579                 strcpy(buffer + buflen, otherbuf);
 580                 buflen += strlen(buffer + buflen) + 1;
 581             }
 582         } while (ret);
 583         enum_settings_finish(handle);
 584         buffer = srealloc(buffer, buflen + 1);
 585         buffer[buflen] = '\0';
 586
 587         /*
 588          * Now set up the list of sessions. Note that "Default
 589          * Settings" must always be claimed to exist, even if it
 590          * doesn't really.
 591          */
 592
 593         p = buffer;
 594         nsessions = 1;                 /* "Default Settings" counts as one */
 595         while (*p) {
 596             if (strcmp(p, "Default Settings"))
 597                 nsessions++;
 598             while (*p)
 599                 p++;
 600             p++;
 601         }
 602
 603         sessions = smalloc((nsessions + 1) * sizeof(char *));
 604         sessions[0] = "Default Settings";
 605         p = buffer;
 606         i = 1;
 607         while (*p) {
 608             if (strcmp(p, "Default Settings"))
 609                 sessions[i++] = p;
 610             while (*p)
 611                 p++;
 612             p++;
 613         }
 614
 615         qsort(sessions, i, sizeof(char *), sessioncmp);
 616     } else {
 617         sfree(buffer);
 618         sfree(sessions);
 619     }
 620 }