- Fix for possible unset uid/gid in toproto - Fix for default mtree style - Update libelf - Importing libexecinfo - Resynchronize GCC, mpc, gmp, mpfr - build.sh: Replace params with show-params. This has been done as the make target has been renamed in the same way, while a new target named params has been added. This new target generates a file containing all the parameters, instead of printing it on the console. - Update test48 with new etc/services (Fix by Ben Gras <ben@minix3.org) get getservbyport() out of the inner loop Change-Id: Ie6ad5226fa2621ff9f0dee8782ea48f9443d2091
311 lines
7.6 KiB
C
311 lines
7.6 KiB
C
/* $NetBSD: cl_read.c,v 1.2 2013/11/22 15:52:05 christos Exp $ */
|
|
/*-
|
|
* Copyright (c) 1993, 1994
|
|
* The Regents of the University of California. All rights reserved.
|
|
* Copyright (c) 1993, 1994, 1995, 1996
|
|
* Keith Bostic. All rights reserved.
|
|
*
|
|
* See the LICENSE file for redistribution information.
|
|
*/
|
|
|
|
#include "config.h"
|
|
|
|
#ifndef lint
|
|
static const char sccsid[] = "Id: cl_read.c,v 10.29 2001/08/18 21:51:59 skimo Exp (Berkeley) Date: 2001/08/18 21:51:59 ";
|
|
#endif /* not lint */
|
|
|
|
#include <sys/types.h>
|
|
#include <sys/queue.h>
|
|
#ifdef HAVE_SYS_SELECT_H
|
|
#include <sys/select.h>
|
|
#endif
|
|
#include <sys/time.h>
|
|
|
|
#include <bitstring.h>
|
|
#include <errno.h>
|
|
#include <fcntl.h>
|
|
#include <signal.h>
|
|
#include <stdio.h>
|
|
#include <stdlib.h>
|
|
#include <string.h>
|
|
#include <termios.h>
|
|
#include <unistd.h>
|
|
|
|
#include "../common/common.h"
|
|
#include "../ex/script.h"
|
|
#include "cl.h"
|
|
|
|
/* Pollution by Solaris curses. */
|
|
#undef columns
|
|
#undef lines
|
|
|
|
static input_t cl_read __P((SCR *,
|
|
u_int32_t, char *, size_t, int *, struct timeval *));
|
|
static int cl_resize __P((SCR *, size_t, size_t));
|
|
|
|
/*
|
|
* cl_event --
|
|
* Return a single event.
|
|
*
|
|
* PUBLIC: int cl_event __P((SCR *, EVENT *, u_int32_t, int));
|
|
*/
|
|
int
|
|
cl_event(SCR *sp, EVENT *evp, u_int32_t flags, int ms)
|
|
{
|
|
struct timeval t, *tp;
|
|
CL_PRIVATE *clp;
|
|
size_t lines, columns;
|
|
int changed, nr = 0;
|
|
const CHAR_T *wp;
|
|
size_t wlen;
|
|
int rc;
|
|
|
|
/*
|
|
* Queue signal based events. We never clear SIGHUP or SIGTERM events,
|
|
* so that we just keep returning them until the editor dies.
|
|
*/
|
|
clp = CLP(sp);
|
|
retest: if (LF_ISSET(EC_INTERRUPT) || F_ISSET(clp, CL_SIGINT)) {
|
|
if (F_ISSET(clp, CL_SIGINT)) {
|
|
F_CLR(clp, CL_SIGINT);
|
|
evp->e_event = E_INTERRUPT;
|
|
} else
|
|
evp->e_event = E_TIMEOUT;
|
|
return (0);
|
|
}
|
|
if (F_ISSET(clp, CL_SIGHUP | CL_SIGTERM | CL_SIGWINCH)) {
|
|
if (F_ISSET(clp, CL_SIGHUP)) {
|
|
evp->e_event = E_SIGHUP;
|
|
return (0);
|
|
}
|
|
if (F_ISSET(clp, CL_SIGTERM)) {
|
|
evp->e_event = E_SIGTERM;
|
|
return (0);
|
|
}
|
|
if (F_ISSET(clp, CL_SIGWINCH)) {
|
|
F_CLR(clp, CL_SIGWINCH);
|
|
if (cl_ssize(sp, 1, &lines, &columns, &changed))
|
|
return (1);
|
|
if (changed) {
|
|
(void)cl_resize(sp, lines, columns);
|
|
evp->e_event = E_WRESIZE;
|
|
return (0);
|
|
}
|
|
/* No real change, ignore the signal. */
|
|
}
|
|
}
|
|
|
|
/* Set timer. */
|
|
if (ms == 0)
|
|
tp = NULL;
|
|
else {
|
|
t.tv_sec = ms / 1000;
|
|
t.tv_usec = (ms % 1000) * 1000;
|
|
tp = &t;
|
|
}
|
|
|
|
/* Read input characters. */
|
|
read:
|
|
switch (cl_read(sp, LF_ISSET(EC_QUOTED | EC_RAW),
|
|
clp->ibuf + clp->skip, SIZE(clp->ibuf) - clp->skip, &nr, tp)) {
|
|
case INP_OK:
|
|
rc = INPUT2INT5(sp, clp->cw, clp->ibuf, nr + clp->skip,
|
|
wp, wlen);
|
|
evp->e_csp = __UNCONST(wp);
|
|
evp->e_len = wlen;
|
|
evp->e_event = E_STRING;
|
|
if (rc < 0) {
|
|
int n = -rc;
|
|
memmove(clp->ibuf, clp->ibuf + nr + clp->skip - n, n);
|
|
clp->skip = n;
|
|
if (wlen == 0)
|
|
goto read;
|
|
} else if (rc == 0)
|
|
clp->skip = 0;
|
|
else
|
|
msgq(sp, M_ERR, "323|Invalid input. Truncated.");
|
|
break;
|
|
case INP_ERR:
|
|
evp->e_event = E_ERR;
|
|
break;
|
|
case INP_EOF:
|
|
evp->e_event = E_EOF;
|
|
break;
|
|
case INP_INTR:
|
|
goto retest;
|
|
case INP_TIMEOUT:
|
|
evp->e_event = E_TIMEOUT;
|
|
break;
|
|
default:
|
|
abort();
|
|
}
|
|
return (0);
|
|
}
|
|
|
|
/*
|
|
* cl_read --
|
|
* Read characters from the input.
|
|
*/
|
|
static input_t
|
|
cl_read(SCR *sp, u_int32_t flags, char *bp, size_t blen, int *nrp, struct timeval *tp)
|
|
{
|
|
struct termios term1, term2;
|
|
struct timeval poll;
|
|
CL_PRIVATE *clp;
|
|
GS *gp;
|
|
fd_set rdfd;
|
|
input_t rval;
|
|
int maxfd, nr, term_reset;
|
|
|
|
gp = sp->gp;
|
|
clp = CLP(sp);
|
|
term_reset = 0;
|
|
|
|
/*
|
|
* 1: A read from a file or a pipe. In this case, the reads
|
|
* never timeout regardless. This means that we can hang
|
|
* when trying to complete a map, but we're going to hang
|
|
* on the next read anyway.
|
|
*/
|
|
if (!F_ISSET(clp, CL_STDIN_TTY)) {
|
|
switch (nr = read(STDIN_FILENO, bp, blen)) {
|
|
case 0:
|
|
return (INP_EOF);
|
|
case -1:
|
|
goto err;
|
|
default:
|
|
*nrp = nr;
|
|
return (INP_OK);
|
|
}
|
|
/* NOTREACHED */
|
|
}
|
|
|
|
/*
|
|
* 2: A read with an associated timeout, e.g., trying to complete
|
|
* a map sequence. If input exists, we fall into #3.
|
|
*/
|
|
FD_ZERO(&rdfd);
|
|
poll.tv_sec = 0;
|
|
poll.tv_usec = 0;
|
|
if (tp != NULL) {
|
|
FD_SET(STDIN_FILENO, &rdfd);
|
|
switch (select(STDIN_FILENO + 1,
|
|
&rdfd, NULL, NULL, tp == NULL ? &poll : tp)) {
|
|
case 0:
|
|
return (INP_TIMEOUT);
|
|
case -1:
|
|
goto err;
|
|
default:
|
|
break;
|
|
}
|
|
}
|
|
|
|
/*
|
|
* The user can enter a key in the editor to quote a character. If we
|
|
* get here and the next key is supposed to be quoted, do what we can.
|
|
* Reset the tty so that the user can enter a ^C, ^Q, ^S. There's an
|
|
* obvious race here, when the key has already been entered, but there's
|
|
* nothing that we can do to fix that problem.
|
|
*
|
|
* The editor can ask for the next literal character even thought it's
|
|
* generally running in line-at-a-time mode. Do what we can.
|
|
*/
|
|
if (LF_ISSET(EC_QUOTED | EC_RAW) && !tcgetattr(STDIN_FILENO, &term1)) {
|
|
term_reset = 1;
|
|
if (LF_ISSET(EC_QUOTED)) {
|
|
term2 = term1;
|
|
term2.c_lflag &= ~ISIG;
|
|
term2.c_iflag &= ~(IXON | IXOFF);
|
|
(void)tcsetattr(STDIN_FILENO,
|
|
TCSASOFT | TCSADRAIN, &term2);
|
|
} else
|
|
(void)tcsetattr(STDIN_FILENO,
|
|
TCSASOFT | TCSADRAIN, &clp->vi_enter);
|
|
}
|
|
|
|
/*
|
|
* 3: Wait for input.
|
|
*
|
|
* Select on the command input and scripting window file descriptors.
|
|
* It's ugly that we wait on scripting file descriptors here, but it's
|
|
* the only way to keep from locking out scripting windows.
|
|
*/
|
|
if (F_ISSET(gp, G_SCRWIN)) {
|
|
FD_ZERO(&rdfd);
|
|
FD_SET(STDIN_FILENO, &rdfd);
|
|
maxfd = STDIN_FILENO;
|
|
if (sscr_check_input(sp, &rdfd, maxfd))
|
|
goto err;
|
|
}
|
|
|
|
/*
|
|
* 4: Read the input.
|
|
*
|
|
* !!!
|
|
* What's going on here is some scary stuff. Ex runs the terminal in
|
|
* canonical mode. So, the <newline> character terminating a line of
|
|
* input is returned in the buffer, but a trailing <EOF> character is
|
|
* not similarly included. As ex uses 0<EOF> and ^<EOF> as autoindent
|
|
* commands, it has to see the trailing <EOF> characters to determine
|
|
* the difference between the user entering "0ab" and "0<EOF>ab". We
|
|
* leave an extra slot in the buffer, so that we can add a trailing
|
|
* <EOF> character if the buffer isn't terminated by a <newline>. We
|
|
* lose if the buffer is too small for the line and exactly N characters
|
|
* are entered followed by an <EOF> character.
|
|
*/
|
|
#define ONE_FOR_EOF 1
|
|
switch (nr = read(STDIN_FILENO, bp, blen - ONE_FOR_EOF)) {
|
|
case 0: /* EOF. */
|
|
/*
|
|
* ^D in canonical mode returns a read of 0, i.e. EOF. EOF is
|
|
* a valid command, but we don't want to loop forever because
|
|
* the terminal driver is returning EOF because the user has
|
|
* disconnected. The editor will almost certainly try to write
|
|
* something before this fires, which should kill us, but You
|
|
* Never Know.
|
|
*/
|
|
if (++clp->eof_count < 50) {
|
|
bp[0] = clp->orig.c_cc[VEOF];
|
|
*nrp = 1;
|
|
rval = INP_OK;
|
|
|
|
} else
|
|
rval = INP_EOF;
|
|
break;
|
|
case -1: /* Error or interrupt. */
|
|
err: if (errno == EINTR)
|
|
rval = INP_INTR;
|
|
else {
|
|
rval = INP_ERR;
|
|
msgq(sp, M_SYSERR, "input");
|
|
}
|
|
break;
|
|
default: /* Input characters. */
|
|
if (F_ISSET(sp, SC_EX) && bp[nr - 1] != '\n')
|
|
bp[nr++] = clp->orig.c_cc[VEOF];
|
|
*nrp = nr;
|
|
clp->eof_count = 0;
|
|
rval = INP_OK;
|
|
break;
|
|
}
|
|
|
|
/* Restore the terminal state if it was modified. */
|
|
if (term_reset)
|
|
(void)tcsetattr(STDIN_FILENO, TCSASOFT | TCSADRAIN, &term1);
|
|
return (rval);
|
|
}
|
|
|
|
/*
|
|
* cl_resize --
|
|
* Reset the options for a resize event.
|
|
*/
|
|
static int
|
|
cl_resize(SCR *sp, size_t lines, size_t columns)
|
|
{
|
|
int rval;
|
|
|
|
rval = api_opts_set(sp, L("lines"), NULL, lines, 0);
|
|
if (api_opts_set(sp, L("columns"), NULL, columns, 0))
|
|
rval = 1;
|
|
return (rval);
|
|
}
|