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