1 /* $Id: maccfg.c,v 1.1.2.1 1999/02/28 02:38:40 ben Exp $ */
3 * maccfg.c -- Mac port configuration
19 static void get_string(struct strloc *l, char *d, size_t maxlen) {
23 GetIndString(s, l->id, l->idx);
25 /* maxlen includes a terminator */
28 for (i = 0; i < len; i++)
33 static void get_wordness(short id, short *dst) {
36 h = GetResource(PREF_wordness_type, id);
37 if (h == NULL || *h == NULL)
38 fatalbox ("Couldn't get wordness (%d)", ResError());
39 memcpy(dst, *h, 256 * sizeof(short));
43 unsigned long basic_flags;
44 #define CLOSE_ON_EXIT 0x80000000
45 unsigned long ssh_flags;
46 #define NO_PTY 0x80000000
47 unsigned long telnet_flags;
48 #define RFC_ENVIRON 0x80000000
49 unsigned long kbd_flags;
50 #define BKSP_IS_DELETE 0x80000000
51 #define RXVT_HOMEEND 0x40000000
52 #define LINUX_FUNKEYS 0x20000000
53 #define APP_CURSOR 0x10000000
54 #define APP_KEYPAD 0x08000000
55 unsigned long term_flags;
56 #define DEC_OM 0x80000000
57 #define WRAP_MODE 0x40000000
58 #define LFHASCR 0x20000000
59 #define WIN_NAME_ALWAYS 0x10000000
60 unsigned long colour_flags;
61 #define BOLD_COLOUR 0x80000000
65 struct strloc termtype, termspeed;
66 struct strloc environmt;
67 struct strloc username;
68 long width, height, savelines;
76 * Load a configuration from the current chain of resource files.
78 void mac_loadconfig(Config *cfg) {
82 h = GetResource('pSET', PREF_settings);
84 fatalbox("Can't load settings");
85 SetResAttrs(h, GetResAttrs(h) | resLocked);
86 s = (struct pSET *)*h;
88 get_string(&s->host, cfg->host, sizeof(cfg->host));
90 cfg->protocol = s->protocol;
91 cfg->close_on_exit = (s->basic_flags & CLOSE_ON_EXIT) != 0;
93 cfg->nopty = (s->ssh_flags & NO_PTY) != 0;
95 get_string(&s->termtype, cfg->termtype, sizeof(cfg->termtype));
96 get_string(&s->termspeed, cfg->termspeed, sizeof(cfg->termspeed));
97 get_string(&s->environmt, cfg->environmt, sizeof(cfg->environmt));
98 get_string(&s->username, cfg->username, sizeof(cfg->username));
99 cfg->rfc_environ = (s->telnet_flags & RFC_ENVIRON) != 0;
101 cfg->bksp_is_delete = (s->kbd_flags & BKSP_IS_DELETE) != 0;
102 cfg->rxvt_homeend = (s->kbd_flags & RXVT_HOMEEND) != 0;
103 cfg->linux_funkeys = (s->kbd_flags & LINUX_FUNKEYS) != 0;
104 cfg->app_cursor = (s->kbd_flags & APP_CURSOR) != 0;
105 cfg->app_keypad = (s->kbd_flags & APP_KEYPAD) != 0;
107 cfg->savelines = s->savelines;
108 cfg->dec_om = (s->term_flags & DEC_OM) != 0;
109 cfg->wrap_mode = (s->term_flags & WRAP_MODE) != 0;
110 cfg->lfhascr = (s->term_flags & LFHASCR) != 0;
111 cfg->win_name_always = (s->term_flags & WIN_NAME_ALWAYS) != 0;
112 cfg->width = s->width;
113 cfg->height = s->height;
114 get_string(&s->font, cfg->font, sizeof(cfg->font));
115 cfg->fontisbold = FALSE; /* XXX */
116 cfg->fontheight = s->font_height;
117 cfg->vtmode = VT_POORMAN; /* XXX */
119 cfg->try_palette = FALSE; /* XXX */
120 cfg->bold_colour = (s->colour_flags & BOLD_COLOUR) != 0;
121 cfg->colours = GetNewPalette(s->colours_id);
122 if (cfg->colours == NULL)
123 fatalbox("Failed to get default palette");
125 get_wordness(s->wordness_id, cfg->wordness);
126 SetResAttrs(h, GetResAttrs(h) & ~resLocked);