2 * Copyright (c) 1993, 1994
3 * The Regents of the University of California. All rights reserved.
4 * Copyright (c) 1993, 1994, 1995, 1996
5 * Keith Bostic. All rights reserved.
7 * See the LICENSE file for redistribution information.
12 #include <sys/types.h>
13 #include <sys/queue.h>
15 #include <bitstring.h>
29 #include "../common/common.h"
31 #include "pathnames.h"
33 GS *__global_list; /* GLOBAL: List of screens. */
34 sigset_t __sigblockset; /* GLOBAL: Blocked signals. */
36 static void cl_func_std(GS *);
37 static CL_PRIVATE *cl_init(GS *);
38 static GS *gs_init(void);
39 static int setsig(int, struct sigaction *, void (*)(int));
40 static void sig_end(GS *);
41 static void term_init(char *);
45 * This is the main loop for the standalone curses editor.
48 main(int argc, char *argv[])
55 char **p_av, **t_av, *ttype;
57 /* If loaded at 0 and jumping through a NULL pointer, stop. */
61 /* Create and initialize the global structure. */
62 __global_list = gp = gs_init();
65 * Strip out any arguments that vi isn't going to understand. There's
66 * no way to portably call getopt twice, so arguments parsed here must
67 * be removed from the argument list.
69 for (p_av = t_av = argv;;) {
74 if (!strcmp(*t_av, "--")) {
75 while ((*p_av++ = *t_av++) != NULL);
81 /* Create and initialize the CL_PRIVATE structure. */
85 * Initialize the terminal information.
87 * We have to know what terminal it is from the start, since we may
88 * have to use termcap/terminfo to find out how big the screen is.
90 if ((ttype = getenv("TERM")) == NULL)
94 /* Add the terminal type to the global structure. */
95 if ((OG_D_STR(gp, GO_TERM) =
96 OG_STR(gp, GO_TERM) = strdup(ttype)) == NULL)
99 /* Figure out how big the screen is. */
100 if (cl_ssize(NULL, 0, &rows, &cols, NULL))
103 /* Add the rows and columns to the global structure. */
104 OG_VAL(gp, GO_LINES) = OG_D_VAL(gp, GO_LINES) = rows;
105 OG_VAL(gp, GO_COLUMNS) = OG_D_VAL(gp, GO_COLUMNS) = cols;
107 /* Ex wants stdout to be buffered. */
108 (void)setvbuf(stdout, NULL, _IOFBF, 0);
110 /* Start catching signals. */
111 if (sig_init(gp, NULL))
115 rval = editor(gp, argc, argv);
117 /* Clean up signals. */
120 /* Clean up the terminal. */
125 * Reset the O_MESG option.
127 if (clp->tgw != TGW_UNKNOWN)
128 (void)cl_omesg(NULL, clp, clp->tgw == TGW_SET);
132 * Reset the X11 xterm icon/window name.
134 if (F_ISSET(clp, CL_RENAME))
135 cl_setname(gp, clp->oname);
137 /* If a killer signal arrived, pretend we just got it. */
138 if (clp->killersig) {
139 (void)signal(clp->killersig, SIG_DFL);
140 (void)kill(getpid(), clp->killersig);
144 /* Free the global and CL private areas. */
145 #if defined(DEBUG) || defined(PURIFY)
148 free(OG_STR(gp, GO_TERM));
157 * Create and partially initialize the GS structure.
164 gp = calloc(1, sizeof(GS));
173 * Create and partially initialize the CL structure.
181 clp = calloc(1, sizeof(CL_PRIVATE));
184 gp->cl_private = clp;
187 * Set the CL_STDIN_TTY flag. It's purpose is to avoid setting
188 * and resetting the tty if the input isn't from there. We also
189 * use the same test to determine if we're running a script or
192 if (isatty(STDIN_FILENO))
193 F_SET(clp, CL_STDIN_TTY);
195 F_SET(gp, G_SCRIPTED);
198 * We expect that if we've lost our controlling terminal that the
199 * open() (but not the tcgetattr()) will fail.
201 if (F_ISSET(clp, CL_STDIN_TTY)) {
202 if (tcgetattr(STDIN_FILENO, &clp->orig) == -1)
204 } else if ((fd = open(_PATH_TTY, O_RDONLY, 0)) != -1) {
205 if (tcgetattr(fd, &clp->orig) == -1) {
206 tcfail: err(1, "tcgetattr");
212 /* Initialize the list of curses functions. */
220 * Initialize terminal information.
223 term_init(char *ttype)
227 /* Set up the terminal database information. */
228 setupterm(ttype, STDOUT_FILENO, &err);
231 errx(1, "No terminal database found");
233 errx(1, "%s: unknown terminal type", ttype);
238 CL_PRIVATE *clp = GCLP(__global_list);
244 F_SET(clp, CL_SIGHUP);
245 clp->killersig = SIGHUP;
253 F_SET(clp, CL_SIGINT);
261 F_SET(clp, CL_SIGTERM);
262 clp->killersig = SIGTERM;
270 F_SET(clp, CL_SIGWINCH);
276 * Initialize signals.
278 * PUBLIC: int sig_init(GS *, SCR *);
281 sig_init(GS *gp, SCR *sp)
288 (void)sigemptyset(&__sigblockset);
289 if (sigaddset(&__sigblockset, SIGHUP) ||
290 setsig(SIGHUP, &clp->oact[INDX_HUP], h_hup) ||
291 sigaddset(&__sigblockset, SIGINT) ||
292 setsig(SIGINT, &clp->oact[INDX_INT], h_int) ||
293 sigaddset(&__sigblockset, SIGTERM) ||
294 setsig(SIGTERM, &clp->oact[INDX_TERM], h_term)
297 sigaddset(&__sigblockset, SIGWINCH) ||
298 setsig(SIGWINCH, &clp->oact[INDX_WINCH], h_winch)
305 if (setsig(SIGHUP, NULL, h_hup) ||
306 setsig(SIGINT, NULL, h_int) ||
307 setsig(SIGTERM, NULL, h_term)
310 setsig(SIGWINCH, NULL, h_winch)
313 msgq(sp, M_SYSERR, "signal-reset");
320 * Set a signal handler.
323 setsig(int signo, struct sigaction *oactp, void (*handler)(int))
325 struct sigaction act;
328 * Use sigaction(2), not signal(3), since we don't always want to
329 * restart system calls. The example is when waiting for a command
330 * mode keystroke and SIGWINCH arrives. Besides, you can't portably
331 * restart system calls (thanks, POSIX!).
333 act.sa_handler = handler;
334 sigemptyset(&act.sa_mask);
337 return (sigaction(signo, &act, oactp));
350 (void)sigaction(SIGHUP, NULL, &clp->oact[INDX_HUP]);
351 (void)sigaction(SIGINT, NULL, &clp->oact[INDX_INT]);
352 (void)sigaction(SIGTERM, NULL, &clp->oact[INDX_TERM]);
354 (void)sigaction(SIGWINCH, NULL, &clp->oact[INDX_WINCH]);
360 * Initialize the standard curses functions.
365 gp->scr_addstr = cl_addstr;
366 gp->scr_waddstr = cl_waddstr;
367 gp->scr_attr = cl_attr;
368 gp->scr_baud = cl_baud;
369 gp->scr_bell = cl_bell;
371 gp->scr_child = NULL;
372 gp->scr_clrtoeol = cl_clrtoeol;
373 gp->scr_cursor = cl_cursor;
374 gp->scr_deleteln = cl_deleteln;
375 gp->scr_reply = NULL;
376 gp->scr_discard = cl_discard;
377 gp->scr_event = cl_event;
378 gp->scr_ex_adjust = cl_ex_adjust;
379 gp->scr_fmap = cl_fmap;
380 gp->scr_insertln = cl_insertln;
381 gp->scr_keyval = cl_keyval;
382 gp->scr_move = cl_move;
384 gp->scr_optchange = cl_optchange;
385 gp->scr_refresh = cl_refresh;
386 gp->scr_rename = cl_rename;
387 gp->scr_screen = cl_screen;
388 gp->scr_split = cl_split;
389 gp->scr_suspend = cl_suspend;
390 gp->scr_usage = cl_usage;