fixed up ellipse, circle and RoundEnd routines for speed
[unix-history] / usr / src / usr.bin / window / startup.c
CommitLineData
34ac147f 1#ifndef lint
78be6843 2static char *sccsid = "@(#)startup.c 3.8 84/01/11";
34ac147f
EW
3#endif
4
5#include "defs.h"
6e1c2156
EW
6#include "value.h"
7#include "var.h"
34ac147f 8
34ac147f
EW
9doconfig()
10{
11 char buf[100];
12 char *home;
13
14 if ((home = getenv("HOME")) == 0)
15 home = "";
74bf1c32 16 (void) sprintf(buf, "%s/.windrc", home);
34ac147f
EW
17 return dosource(buf);
18}
19
20/*
21 * The default is two windows of equal sizes.
22 */
23dodefault()
24{
25 struct ww *w;
3acb719c 26 register r = wwnrow / 2 - 1;
34ac147f 27
74bf1c32 28 if ((w = openwin(-1, 1, 0, r, wwncol, nbufline, (char *) 0)) == 0)
34ac147f 29 goto bad;
74bf1c32
EW
30 if (openwin(-1, r + 2, 0, wwnrow - r - 2, wwncol, nbufline, (char *) 0)
31 == 0)
34ac147f 32 goto bad;
93a0439e 33 (void) wwprintf(w, "Escape character is %s.\r\n", unctrl(escapec));
34ac147f
EW
34 setselwin(w);
35 return;
36bad:
74bf1c32 37 (void) wwputs("Can't open default windows. ", cmdwin);
34ac147f 38}
6e1c2156
EW
39
40setvars()
41{
78be6843 42 /* try to use a good ordering to balance the tree */
6e1c2156 43 (void) var_setnum("nrow", wwnrow);
78be6843 44 (void) var_setnum("ncol", wwncol);
6e1c2156
EW
45 (void) var_setnum("availmodes", wwavailmodes);
46 (void) var_setnum("baud", wwbaud);
47 (void) var_setnum("m_rev", WWM_REV);
48 (void) var_setnum("m_blk", WWM_BLK);
49 (void) var_setnum("m_ul", WWM_UL);
78be6843 50 (void) var_setnum("m_grp", WWM_GRP);
6e1c2156
EW
51 (void) var_setstr("term", wwterm);
52}