bug from last time
[unix-history] / usr / src / usr.bin / window / startup.c
CommitLineData
34ac147f 1#ifndef lint
7c38ad4d 2static char *sccsid = "@(#)startup.c 3.12 84/04/16";
34ac147f
EW
3#endif
4
5#include "defs.h"
6e1c2156
EW
6#include "value.h"
7#include "var.h"
0e64e422 8#include "char.h"
7c38ad4d 9#include "local.h"
34ac147f 10
34ac147f
EW
11doconfig()
12{
13 char buf[100];
14 char *home;
7c38ad4d 15 static char runcom[] = RUNCOM;
34ac147f
EW
16
17 if ((home = getenv("HOME")) == 0)
f828d428
EW
18 home = ".";
19 return dosource(sprintf(buf, "%.*s/.windrc",
20 (sizeof buf - sizeof runcom) / sizeof (char) - 1,
21 home, runcom));
34ac147f
EW
22}
23
24/*
25 * The default is two windows of equal sizes.
26 */
27dodefault()
28{
29 struct ww *w;
3acb719c 30 register r = wwnrow / 2 - 1;
34ac147f 31
f828d428
EW
32 if ((w = openwin(-1, 1, 0, r, wwncol, nbufline,
33 (char *) 0, 1, 1, shellfile, shell)) == 0)
34ac147f 34 goto bad;
f828d428
EW
35 if (openwin(-1, r + 2, 0, wwnrow - r - 2, wwncol, nbufline,
36 (char *) 0, 1, 1, shellfile, shell) == 0)
34ac147f 37 goto bad;
b1189050 38 wwprintf(w, "Escape character is %s.\r\n", unctrl(escapec));
34ac147f
EW
39 setselwin(w);
40 return;
41bad:
f828d428 42 error("Can't open default windows.");
34ac147f 43}
6e1c2156
EW
44
45setvars()
46{
0e64e422 47 /* try to use a random ordering to balance the tree */
6e1c2156 48 (void) var_setnum("nrow", wwnrow);
78be6843 49 (void) var_setnum("ncol", wwncol);
6e1c2156
EW
50 (void) var_setnum("baud", wwbaud);
51 (void) var_setnum("m_rev", WWM_REV);
52 (void) var_setnum("m_blk", WWM_BLK);
53 (void) var_setnum("m_ul", WWM_UL);
78be6843 54 (void) var_setnum("m_grp", WWM_GRP);
6e1c2156 55 (void) var_setstr("term", wwterm);
0e64e422 56 (void) var_setnum("modes", wwavailmodes);
6e1c2156 57}