xref: /dragonfly/usr.bin/window/main.c (revision 9a92bb4c)
1 /*
2  * Copyright (c) 1983, 1993
3  *	The Regents of the University of California.  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, with or without
9  * modification, are permitted provided that the following conditions
10  * are met:
11  * 1. Redistributions of source code must retain the above copyright
12  *    notice, this list of conditions and the following disclaimer.
13  * 2. Redistributions in binary form must reproduce the above copyright
14  *    notice, this list of conditions and the following disclaimer in the
15  *    documentation and/or other materials provided with the distribution.
16  * 3. All advertising materials mentioning features or use of this software
17  *    must display the following acknowledgement:
18  *	This product includes software developed by the University of
19  *	California, Berkeley and its contributors.
20  * 4. Neither the name of the University nor the names of its contributors
21  *    may be used to endorse or promote products derived from this software
22  *    without specific prior written permission.
23  *
24  * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND
25  * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
26  * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
27  * ARE DISCLAIMED.  IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
28  * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
29  * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
30  * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
31  * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
32  * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
33  * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
34  * SUCH DAMAGE.
35  *
36  * @(#) Copyright (c) 1983, 1993 The Regents of the University of California.  All rights reserved.
37  * @(#)main.c	8.2 (Berkeley) 4/2/94
38  * $FreeBSD: src/usr.bin/window/main.c,v 1.5.6.2 2001/05/17 09:45:00 obrien Exp $
39  * $DragonFly: src/usr.bin/window/main.c,v 1.3 2004/08/30 18:06:50 eirikn Exp $
40  */
41 
42 #include "defs.h"
43 #include <paths.h>
44 #include <locale.h>
45 #include <stdio.h>
46 #include <string.h> /* System string definitions. */
47 #include "mystring.h" /* Local string definitions. */
48 #include "char.h"
49 #include "local.h"
50 
51 #define next(a) (*++*(a) ? *(a) : (*++(a) ? *(a) : (char *)usage()))
52 
53 /*ARGSUSED*/
54 main(argc, argv)
55 char **argv;
56 {
57 	register char *p;
58 	char fflag = 0;
59 	char dflag = 0;
60 	char xflag = 0;
61 	char *cmd = 0;
62 	char tflag = 0;
63 
64 	escapec = ESCAPEC;
65 	if (p = strrchr(*argv, '/'))
66 		p++;
67 	else
68 		p = *argv;
69 	debug = strcmp(p, "a.out") == 0;
70 	while (*++argv) {
71 		if (**argv == '-') {
72 			switch (*++*argv) {
73 			case 'f':
74 				fflag++;
75 				break;
76 			case 'c':
77 				if (cmd != 0) {
78 					(void) fprintf(stderr,
79 						"Only one -c allowed.\n");
80 					(void) usage();
81 				}
82 				cmd = next(argv);
83 				break;
84 			case 'e':
85 				setescape(next(argv));
86 				break;
87 			case 't':
88 				tflag++;
89 				break;
90 			case 'd':
91 				dflag++;
92 				break;
93 			case 'D':
94 				debug = !debug;
95 				break;
96 			case 'x':
97 				xflag++;
98 				break;
99 			default:
100 				(void) usage();
101 			}
102 		} else
103 			(void) usage();
104 	}
105 	if ((p = getenv("SHELL")) == 0)
106 		p = _PATH_BSHELL;
107 	if ((default_shellfile = str_cpy(p)) == 0) {
108 		(void) fprintf(stderr, "Out of memory.\n");
109 		exit(1);
110 	}
111 	if (p = strrchr(default_shellfile, '/'))
112 		p++;
113 	else
114 		p = default_shellfile;
115 	default_shell[0] = p;
116 	default_shell[1] = 0;
117 	default_nline = NLINE;
118 	default_smooth = 1;
119 	(void) gettimeofday(&starttime, (struct timezone *)0);
120 	(void) setlocale(LC_CTYPE, "");
121 	if (wwinit() < 0) {
122 		(void) fprintf(stderr, "%s.\n", wwerror());
123 		exit(1);
124 	}
125 
126 #ifdef OLD_TTY
127 	if (debug)
128 		wwnewtty.ww_tchars.t_quitc = wwoldtty.ww_tchars.t_quitc;
129 	if (xflag) {
130 		wwnewtty.ww_tchars.t_stopc = wwoldtty.ww_tchars.t_stopc;
131 		wwnewtty.ww_tchars.t_startc = wwoldtty.ww_tchars.t_startc;
132 	}
133 #else
134 	if (debug) {
135 		wwnewtty.ww_termios.c_cc[VQUIT] =
136 			wwoldtty.ww_termios.c_cc[VQUIT];
137 		wwnewtty.ww_termios.c_lflag |= ISIG;
138 	}
139 	if (xflag) {
140 		wwnewtty.ww_termios.c_cc[VSTOP] =
141 			wwoldtty.ww_termios.c_cc[VSTOP];
142 		wwnewtty.ww_termios.c_cc[VSTART] =
143 			wwoldtty.ww_termios.c_cc[VSTART];
144 		wwnewtty.ww_termios.c_iflag |= IXON;
145 	}
146 #endif
147 	if (debug || xflag)
148 		(void) wwsettty(0, &wwnewtty);
149 
150 	if ((cmdwin = wwopen(wwbaud > 2400 ? WWO_REVERSE : 0, 1, wwncol,
151 			     0, 0, 0)) == 0) {
152 		wwflush();
153 		(void) fprintf(stderr, "%s.\r\n", wwerror());
154 		goto bad;
155 	}
156 	cmdwin->ww_mapnl = 1;
157 	cmdwin->ww_nointr = 1;
158 	cmdwin->ww_noupdate = 1;
159 	cmdwin->ww_unctrl = 1;
160 	if ((framewin = wwopen(WWO_GLASS|WWO_FRAME, wwnrow, wwncol, 0, 0, 0))
161 	    == 0) {
162 		wwflush();
163 		(void) fprintf(stderr, "%s.\r\n", wwerror());
164 		goto bad;
165 	}
166 	wwadd(framewin, &wwhead);
167 	if ((boxwin = wwopen(WWO_GLASS, wwnrow, wwncol, 0, 0, 0)) == 0) {
168 		wwflush();
169 		(void) fprintf(stderr, "%s.\r\n", wwerror());
170 		goto bad;
171 	}
172 	fgwin = framewin;
173 
174 	wwupdate();
175 	wwflush();
176 	setvars();
177 
178 	setterse(tflag);
179 	setcmd(1);
180 	if (cmd != 0)
181 		(void) dolongcmd(cmd, (struct value *)0, 0);
182 	if (!fflag)
183 		if (dflag || doconfig() < 0)
184 			dodefault();
185 	if (selwin != 0)
186 		setcmd(0);
187 
188 	mloop();
189 
190 bad:
191 	wwend(1);
192 	return 0;
193 }
194 
195 usage()
196 {
197 	(void) fprintf(stderr, "usage: window [-e escape-char] [-c command] [-t] [-f] [-d]\n");
198 	exit(1);
199 	return 0;			/* for lint */
200 }
201