|
|
1.1 root 1: /*
2: * Copyright (c) 1983 Regents of the University of California.
3: * All rights reserved.
4: *
5: * This code is derived from software contributed to Berkeley by
6: * Edward Wang at The University of California, Berkeley.
7: *
8: * Redistribution and use in source and binary forms are permitted provided
9: * that: (1) source distributions retain this entire copyright notice and
10: * comment, and (2) distributions including binaries display the following
11: * acknowledgement: ``This product includes software developed by the
12: * University of California, Berkeley and its contributors'' in the
13: * documentation or other materials provided with the distribution and in
14: * all advertising materials mentioning features or use of this software.
15: * Neither the name of the University nor the names of its contributors may
16: * be used to endorse or promote products derived from this software without
17: * specific prior written permission.
18: * THIS SOFTWARE IS PROVIDED ``AS IS'' AND WITHOUT ANY EXPRESS OR IMPLIED
19: * WARRANTIES, INCLUDING, WITHOUT LIMITATION, THE IMPLIED WARRANTIES OF
20: * MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE.
21: */
22:
23: #ifndef lint
24: static char sccsid[] = "@(#)startup.c 3.25 (Berkeley) 6/6/90";
25: #endif /* not lint */
26:
27: #include "defs.h"
28: #include "value.h"
29: #include "var.h"
30: #include "char.h"
31: #include "local.h"
32:
33: doconfig()
34: {
35: char buf[100];
36: char *home;
37: static char runcom[] = RUNCOM;
38:
39: if ((home = getenv("HOME")) == 0)
40: home = ".";
41: (void) sprintf(buf, "%.*s/%s",
42: (sizeof buf - sizeof runcom) / sizeof (char) - 1,
43: home, runcom);
44: return dosource(buf);
45: }
46:
47: /*
48: * The default is two windows of equal size.
49: */
50: dodefault()
51: {
52: struct ww *w;
53: register r = wwnrow / 2 - 1;
54:
55: if (openwin(1, r + 2, 0, wwnrow - r - 2, wwncol, default_nline,
56: (char *) 0, 1, 1, default_shellfile, default_shell) == 0)
57: return;
58: if ((w = openwin(0, 1, 0, r, wwncol, default_nline,
59: (char *) 0, 1, 1, default_shellfile, default_shell)) == 0)
60: return;
61: wwprintf(w, "Escape character is %s.\r\n", unctrl(escapec));
62: }
63:
64: setvars()
65: {
66: /* try to use a random ordering to balance the tree */
67: (void) var_setnum("nrow", wwnrow);
68: (void) var_setnum("ncol", wwncol);
69: (void) var_setnum("baud", wwbaud);
70: (void) var_setnum("m_rev", WWM_REV);
71: (void) var_setnum("m_blk", WWM_BLK);
72: (void) var_setnum("m_ul", WWM_UL);
73: (void) var_setnum("m_grp", WWM_GRP);
74: (void) var_setnum("m_dim", WWM_DIM);
75: (void) var_setnum("m_usr", WWM_USR);
76: (void) var_setstr("term", wwterm);
77: (void) var_setnum("modes", wwavailmodes);
78: }
This archive runs on limited infrastructure. Preserving old code on modern bandwidth. Automated agents are requested to crawl responsibly.