Context Navigation

source: trunk/third/tcsh/ed.init.c @ 12039

Visit:

Revision 12039, 20.3 KB checked in by danw, 26 years ago (diff)
This commit was generated by cvs2svn to compensate for changes in r12038, which included commits to RCS files with non-trunk default branches.

Rev	Line
[12038]	1	/* $Header: /afs/dev.mit.edu/source/repository/third/tcsh/ed.init.c,v 1.1.1.2 1998-10-03 21:09:46 danw Exp $ */
[9005]	2	/*
	3	* ed.init.c: Editor initializations
	4	*/
	5	/*-
	6	* Copyright (c) 1980, 1991 The Regents of the University of California.
	7	* All rights reserved.
	8	*
	9	* Redistribution and use in source and binary forms, with or without
	10	* modification, are permitted provided that the following conditions
	11	* are met:
	12	* 1. Redistributions of source code must retain the above copyright
	13	* notice, this list of conditions and the following disclaimer.
	14	* 2. Redistributions in binary form must reproduce the above copyright
	15	* notice, this list of conditions and the following disclaimer in the
	16	* documentation and/or other materials provided with the distribution.
	17	* 3. All advertising materials mentioning features or use of this software
	18	* must display the following acknowledgement:
	19	* This product includes software developed by the University of
	20	* California, Berkeley and its contributors.
	21	* 4. Neither the name of the University nor the names of its contributors
	22	* may be used to endorse or promote products derived from this software
	23	* without specific prior written permission.
	24	*
	25	* THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND
	26	* ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
	27	* IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
	28	* ARE DISCLAIMED. IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
	29	* FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
	30	* DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
	31	* OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTS_ION)
	32	* HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
	33	* LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
	34	* OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
	35	* SUCH DAMAGE.
	36	*/
	37	#include "sh.h"
	38
[12038]	39	RCSID("$Id: ed.init.c,v 1.1.1.2 1998-10-03 21:09:46 danw Exp $")
[9005]	40
	41	#include "ed.h"
	42	#include "ed.term.h"
	43	#include "tc.h"
	44	#include "ed.defns.h"
	45
	46	/* ed.init.c -- init routines for the line editor */
	47	/* #define DEBUG_TTY */
	48
	49	int Tty_raw_mode = 0; /* Last tty change was to raw mode */
	50	int MacroLvl = -1; /* pointer to current macro nesting level; */
	51	/* (-1 == none) */
	52	static int Tty_quote_mode = 0; /* Last tty change was to quote mode */
	53	static unsigned char vdisable; /* The value of _POSIX_VDISABLE from
	54	* pathconf(2) */
	55
	56	int Tty_eight_bit = -1; /* does the tty handle eight bits */
	57
	58	extern bool GotTermCaps;
	59
	60	static ttydata_t extty, edtty, tstty;
	61	#define qutty tstty
	62
	63	extern int insource;
	64	#define SHTTY (insource ? OLDSTD : SHIN)
	65
	66	static unsigned char ttychars[NN_IO][C_NCC] = {
	67	{
	68	CINTR, CQUIT, CERASE, CKILL,
	69	CEOF, CEOL, CEOL2, CSWTCH,
	70	CDSWTCH, CERASE2, CSTART, CSTOP,
	71	CWERASE, CSUSP, CDSUSP, CREPRINT,
	72	CDISCARD, CLNEXT, CSTATUS, CPAGE,
	73	CPGOFF, CKILL2, CBRK, CMIN,
	74	CTIME
	75	},
	76	{
	77	CINTR, CQUIT, CERASE, CKILL,
	78	_POSIX_VDISABLE, _POSIX_VDISABLE, _POSIX_VDISABLE, _POSIX_VDISABLE,
	79	_POSIX_VDISABLE, CERASE2, CSTART, CSTOP,
	80	_POSIX_VDISABLE, _POSIX_VDISABLE, _POSIX_VDISABLE, _POSIX_VDISABLE,
	81	CDISCARD, _POSIX_VDISABLE, _POSIX_VDISABLE, _POSIX_VDISABLE,
	82	_POSIX_VDISABLE, _POSIX_VDISABLE, _POSIX_VDISABLE, 1,
	83	0
	84	},
	85	{
	86	0, 0, 0, 0,
	87	0, 0, 0, 0,
	88	0, 0, 0, 0,
	89	0, 0, 0, 0,
	90	0, 0, 0, 0,
	91	0, 0, 0, 0,
	92	0
	93	}
	94	};
	95
	96	#ifdef SIG_WINDOW
	97	void
	98	check_window_size(force)
	99	int force;
	100	{
	101	#ifdef BSDSIGS
	102	sigmask_t omask;
	103	#endif /* BSDSIGS */
	104	int lins, cols;
	105
	106	/* don't want to confuse things here */
	107	#ifdef BSDSIGS
	108	omask = sigblock(sigmask(SIG_WINDOW)) & ~sigmask(SIG_WINDOW);
	109	#else /* BSDSIGS */
	110	(void) sighold(SIG_WINDOW);
	111	#endif /* BSDSIGS */
	112	/*
	113	* From: bret@shark.agps.lanl.gov (Bret Thaeler) Avoid sunview bug, where a
	114	* partially hidden window gets a SIG_WINDOW every time the text is
	115	* scrolled
	116	*/
	117	if (GetSize(&lins, &cols) \|\| force) {
	118	if (GettingInput) {
	119	ClearLines();
	120	ClearDisp();
	121	MoveToLine(0);
	122	MoveToChar(0);
	123	ChangeSize(lins, cols);
	124	Refresh();
	125	}
	126	else
	127	ChangeSize(lins, cols);
	128	}
	129	#ifdef BSDSIGS
	130	(void) sigsetmask(omask); /* can change it again */
	131	#else /* BSDSIGS */
	132	(void) sigrelse(SIG_WINDOW);
	133	#endif /* BSDSIGS */
	134	}
	135
	136	sigret_t
	137	/ARGSUSED/
	138	window_change(snum)
	139	int snum;
	140	{
	141	#ifdef UNRELSIGS
	142	/* If we were called as a signal handler, restore it. */
	143	if (snum > 0)
	144	sigset(snum, window_change);
	145	#endif /* UNRELSIGS */
	146	check_window_size(0);
	147	#ifndef SIGVOID
	148	return (snum);
	149	#endif
	150	}
	151
	152	#endif /* SIG_WINDOW */
	153
	154	void
	155	ed_set_tty_eight_bit()
	156	{
	157	if (tty_getty(SHTTY, &extty) == -1) {
	158	#ifdef DEBUG_TTY
	159	xprintf("ed_set_tty_eight_bit: tty_getty: %s\n", strerror(errno));
	160	#endif /* DEBUG_TTY */
	161	return;
	162	}
	163	Tty_eight_bit = tty_geteightbit(&extty);
	164	}
	165
	166
	167	int
	168	ed_Setup(rst)
	169	int rst;
	170	{
	171	static int havesetup = 0;
	172	struct varent *imode;
	173
	174	if (havesetup) /* if we have never been called */
	175	return(0);
	176
[12038]	177	#if defined(POSIX) && defined(_PC_VDISABLE) && !defined(BSD4_4) && \
	178	!defined(WINNT)
[9005]	179	{
	180	long pcret;
	181
	182	if ((pcret = fpathconf(SHTTY, _PC_VDISABLE)) == -1L)
	183	vdisable = (unsigned char) _POSIX_VDISABLE;
	184	else
	185	vdisable = (unsigned char) pcret;
	186	if (vdisable != (unsigned char) _POSIX_VDISABLE && rst != 0)
	187	for (rst = 0; rst < C_NCC; rst++) {
	188	if (ttychars[ED_IO][rst] == (unsigned char) _POSIX_VDISABLE)
	189	ttychars[ED_IO][rst] = vdisable;
	190	if (ttychars[EX_IO][rst] == (unsigned char) _POSIX_VDISABLE)
	191	ttychars[EX_IO][rst] = vdisable;
	192	}
	193	}
[12038]	194	#else /* ! POSIX \|\| !_PC_VDISABLE \|\| BSD4_4 \|\| WINNT */
[9005]	195	vdisable = (unsigned char) _POSIX_VDISABLE;
[12038]	196	#endif /* POSIX && _PC_VDISABLE && !BSD4_4 && !WINNT */
[9005]	197
	198	if ((imode = adrof(STRinputmode)) != NULL) {
	199	if (!Strcmp(*(imode->vec), STRinsert))
	200	inputmode = MODE_INSERT;
	201	else if (!Strcmp(*(imode->vec), STRoverwrite))
	202	inputmode = MODE_REPLACE;
	203	}
	204	else
	205	inputmode = MODE_INSERT;
	206	ed_InitMaps();
	207	Hist_num = 0;
	208	Expand = 0;
	209
[12038]	210	#ifndef WINNT
[9005]	211	if (tty_getty(SHTTY, &extty) == -1) {
[12038]	212	# ifdef DEBUG_TTY
[9005]	213	xprintf("ed_Setup: tty_getty: %s\n", strerror(errno));
[12038]	214	# endif /* DEBUG_TTY */
[9005]	215	return(-1);
	216	}
	217
	218	tstty = edtty = extty;
	219
	220	T_Speed = tty_getspeed(&extty);
	221	T_Tabs = tty_gettabs(&extty);
	222	Tty_eight_bit = tty_geteightbit(&extty);
	223
[12038]	224	# if defined(POSIX) \|\| defined(TERMIO)
[9005]	225	extty.d_t.c_iflag &= ~ttylist[EX_IO][M_INPUT].t_clrmask;
	226	extty.d_t.c_iflag \|= ttylist[EX_IO][M_INPUT].t_setmask;
	227
	228	extty.d_t.c_oflag &= ~ttylist[EX_IO][M_OUTPUT].t_clrmask;
	229	extty.d_t.c_oflag \|= ttylist[EX_IO][M_OUTPUT].t_setmask;
	230
	231	extty.d_t.c_cflag &= ~ttylist[EX_IO][M_CONTROL].t_clrmask;
	232	extty.d_t.c_cflag \|= ttylist[EX_IO][M_CONTROL].t_setmask;
	233
	234	extty.d_t.c_lflag &= ~ttylist[EX_IO][M_LINED].t_clrmask;
	235	extty.d_t.c_lflag \|= ttylist[EX_IO][M_LINED].t_setmask;
	236
[12038]	237	# if defined(IRIX3_3) && SYSVREL < 4
[9005]	238	extty.d_t.c_line = NTTYDISC;
[12038]	239	# endif /* IRIX3_3 && SYSVREL < 4 */
[9005]	240
[12038]	241	# else /* GSTTY / / V7, Berkeley style tty */
[9005]	242
	243	if (T_Tabs) { /* order of &= and \|= is important to XTABS */
	244	extty.d_t.sg_flags &= ~(ttylist[EX_IO][M_CONTROL].t_clrmask\|XTABS);
	245	extty.d_t.sg_flags \|= ttylist[EX_IO][M_CONTROL].t_setmask;
	246	}
	247	else {
	248	extty.d_t.sg_flags &= ~ttylist[EX_IO][M_CONTROL].t_clrmask;
	249	extty.d_t.sg_flags \|= (ttylist[EX_IO][M_CONTROL].t_setmask\|XTABS);
	250	}
	251
	252	extty.d_lb &= ~ttylist[EX_IO][M_LOCAL].t_clrmask;
	253	extty.d_lb \|= ttylist[EX_IO][M_LOCAL].t_setmask;
	254
[12038]	255	# endif /* GSTTY */
[9005]	256	/*
	257	* Reset the tty chars to reasonable defaults
	258	* If they are disabled, then enable them.
	259	*/
	260	if (rst) {
	261	if (tty_cooked_mode(&tstty)) {
	262	tty_getchar(&tstty, ttychars[TS_IO]);
	263	/*
	264	* Don't affect CMIN and CTIME for the editor mode
	265	*/
	266	for (rst = 0; rst < C_NCC - 2; rst++)
	267	if (ttychars[TS_IO][rst] != vdisable &&
	268	ttychars[ED_IO][rst] != vdisable)
	269	ttychars[ED_IO][rst] = ttychars[TS_IO][rst];
	270	for (rst = 0; rst < C_NCC; rst++)
	271	if (ttychars[TS_IO][rst] != vdisable &&
	272	ttychars[EX_IO][rst] != vdisable)
	273	ttychars[EX_IO][rst] = ttychars[TS_IO][rst];
	274	}
	275	tty_setchar(&extty, ttychars[EX_IO]);
	276	if (tty_setty(SHTTY, &extty) == -1) {
[12038]	277	# ifdef DEBUG_TTY
[9005]	278	xprintf("ed_Setup: tty_setty: %s\n", strerror(errno));
[12038]	279	# endif /* DEBUG_TTY */
[9005]	280	return(-1);
	281	}
	282	}
	283	else
	284	tty_setchar(&extty, ttychars[EX_IO]);
	285
	286	# ifdef SIG_WINDOW
	287	(void) sigset(SIG_WINDOW, window_change); /* for window systems */
	288	# endif
[12038]	289	#else /* WINNT */
	290	# ifdef DEBUG
	291	if (rst)
	292	xprintf("rst received in ed_Setup() %d\n", rst);
	293	# endif
	294	#endif /* WINNT */
[9005]	295	havesetup = 1;
	296	return(0);
	297	}
	298
	299	void
	300	ed_Init()
	301	{
	302	ResetInLine(1); /* reset the input pointers */
	303	GettingInput = 0; /* just in case */
	304	LastKill = KillBuf; /* no kill buffer */
	305
	306	#ifdef DEBUG_EDIT
	307	CheckMaps(); /* do a little error checking on key maps */
	308	#endif
	309
	310	if (ed_Setup(0) == -1)
	311	return;
	312
	313	/*
	314	* if we have been called before but GotTermCaps isn't set, our TERM has
	315	* changed, so get new termcaps and try again
	316	*/
	317
	318	if (!GotTermCaps)
	319	GetTermCaps(); /* does the obvious, but gets term type each
	320	* time */
	321
[12038]	322	#ifndef WINNT
	323	# if defined(TERMIO) \|\| defined(POSIX)
[9005]	324	edtty.d_t.c_iflag &= ~ttylist[ED_IO][M_INPUT].t_clrmask;
	325	edtty.d_t.c_iflag \|= ttylist[ED_IO][M_INPUT].t_setmask;
	326
	327	edtty.d_t.c_oflag &= ~ttylist[ED_IO][M_OUTPUT].t_clrmask;
	328	edtty.d_t.c_oflag \|= ttylist[ED_IO][M_OUTPUT].t_setmask;
	329
	330	edtty.d_t.c_cflag &= ~ttylist[ED_IO][M_CONTROL].t_clrmask;
	331	edtty.d_t.c_cflag \|= ttylist[ED_IO][M_CONTROL].t_setmask;
	332
	333	edtty.d_t.c_lflag &= ~ttylist[ED_IO][M_LINED].t_clrmask;
	334	edtty.d_t.c_lflag \|= ttylist[ED_IO][M_LINED].t_setmask;
	335
	336
[12038]	337	# if defined(IRIX3_3) && SYSVREL < 4
[9005]	338	edtty.d_t.c_line = NTTYDISC;
[12038]	339	# endif /* IRIX3_3 && SYSVREL < 4 */
[9005]	340
[12038]	341	# else /* GSTTY */
[9005]	342
	343	if (T_Tabs) { /* order of &= and \|= is important to XTABS */
	344	edtty.d_t.sg_flags &= ~(ttylist[ED_IO][M_CONTROL].t_clrmask \| XTABS);
	345	edtty.d_t.sg_flags \|= ttylist[ED_IO][M_CONTROL].t_setmask;
	346	}
	347	else {
	348	edtty.d_t.sg_flags &= ~ttylist[ED_IO][M_CONTROL].t_clrmask;
	349	edtty.d_t.sg_flags \|= (ttylist[ED_IO][M_CONTROL].t_setmask \| XTABS);
	350	}
	351
	352	edtty.d_lb &= ~ttylist[ED_IO][M_LOCAL].t_clrmask;
	353	edtty.d_lb \|= ttylist[ED_IO][M_LOCAL].t_setmask;
[12038]	354	# endif /* POSIX \|\| TERMIO */
[9005]	355
	356	tty_setchar(&edtty, ttychars[ED_IO]);
[12038]	357	#endif /* WINNT */
[9005]	358	}
	359
	360	/*
	361	* Check and re-init the line. set the terminal into 1 char at a time mode.
	362	*/
	363	int
	364	Rawmode()
	365	{
	366	if (Tty_raw_mode)
	367	return (0);
	368
[12038]	369	#ifdef WINNT
	370	do_nt_raw_mode();
	371	#else /* !WINNT */
	372	# ifdef _IBMR2
[9005]	373	tty_setdisc(SHTTY, ED_IO);
[12038]	374	# endif /* _IBMR2 */
[9005]	375
	376	if (tty_getty(SHTTY, &tstty) == -1) {
[12038]	377	# ifdef DEBUG_TTY
[9005]	378	xprintf("Rawmode: tty_getty: %s\n", strerror(errno));
[12038]	379	# endif /* DEBUG_TTY */
[9005]	380	return(-1);
	381	}
	382
	383	/*
	384	* We always keep up with the eight bit setting and the speed of the
	385	* tty. But only we only believe changes that are made to cooked mode!
	386	*/
[12038]	387	# if defined(POSIX) \|\| defined(TERMIO)
[9005]	388	Tty_eight_bit = tty_geteightbit(&tstty);
	389	T_Speed = tty_getspeed(&tstty);
	390
[12038]	391	# ifdef POSIX
[9005]	392	/*
	393	* Fix from: Steven (Steve) B. Green <xrsbg@charney.gsfc.nasa.gov>
	394	* Speed was not being set up correctly under POSIX.
	395	*/
	396	if (tty_getspeed(&extty) != T_Speed \|\| tty_getspeed(&edtty) != T_Speed) {
	397	(void) cfsetispeed(&extty.d_t, T_Speed);
	398	(void) cfsetospeed(&extty.d_t, T_Speed);
	399	(void) cfsetispeed(&edtty.d_t, T_Speed);
	400	(void) cfsetospeed(&edtty.d_t, T_Speed);
	401	}
[12038]	402	# endif /* POSIX */
	403	# else /* GSTTY */
[9005]	404
	405	T_Speed = tty_getspeed(&tstty);
	406	Tty_eight_bit = tty_geteightbit(&tstty);
	407
	408	if (extty.d_t.sg_ispeed != tstty.d_t.sg_ispeed) {
	409	extty.d_t.sg_ispeed = tstty.d_t.sg_ispeed;
	410	edtty.d_t.sg_ispeed = tstty.d_t.sg_ispeed;
	411	}
	412
	413	if (extty.d_t.sg_ospeed != tstty.d_t.sg_ospeed) {
	414	extty.d_t.sg_ospeed = tstty.d_t.sg_ospeed;
	415	edtty.d_t.sg_ospeed = tstty.d_t.sg_ospeed;
	416	}
[12038]	417	# endif /* POSIX \|\| TERMIO */
[9005]	418
	419	if (tty_cooked_mode(&tstty)) {
[12038]	420	/*
	421	* re-test for some things here (like maybe the user typed
	422	* "stty -tabs"
	423	*/
	424	if (tty_gettabs(&tstty) == 0)
	425	T_Tabs = 0;
	426	else
	427	T_Tabs = CanWeTab();
[9005]	428
[12038]	429	# if defined(POSIX) \|\| defined(TERMIO)
	430	extty.d_t.c_cflag = tstty.d_t.c_cflag;
	431	extty.d_t.c_cflag &= ~ttylist[EX_IO][M_CONTROL].t_clrmask;
	432	extty.d_t.c_cflag \|= ttylist[EX_IO][M_CONTROL].t_setmask;
[9005]	433
[12038]	434	edtty.d_t.c_cflag = tstty.d_t.c_cflag;
	435	edtty.d_t.c_cflag &= ~ttylist[ED_IO][M_CONTROL].t_clrmask;
	436	edtty.d_t.c_cflag \|= ttylist[ED_IO][M_CONTROL].t_setmask;
[9005]	437
[12038]	438	extty.d_t.c_lflag = tstty.d_t.c_lflag;
	439	extty.d_t.c_lflag &= ~ttylist[EX_IO][M_LINED].t_clrmask;
	440	extty.d_t.c_lflag \|= ttylist[EX_IO][M_LINED].t_setmask;
[9005]	441
[12038]	442	edtty.d_t.c_lflag = tstty.d_t.c_lflag;
	443	edtty.d_t.c_lflag &= ~ttylist[ED_IO][M_LINED].t_clrmask;
	444	edtty.d_t.c_lflag \|= ttylist[ED_IO][M_LINED].t_setmask;
[9005]	445
[12038]	446	extty.d_t.c_iflag = tstty.d_t.c_iflag;
	447	extty.d_t.c_iflag &= ~ttylist[EX_IO][M_INPUT].t_clrmask;
	448	extty.d_t.c_iflag \|= ttylist[EX_IO][M_INPUT].t_setmask;
[9005]	449
[12038]	450	edtty.d_t.c_iflag = tstty.d_t.c_iflag;
	451	edtty.d_t.c_iflag &= ~ttylist[ED_IO][M_INPUT].t_clrmask;
	452	edtty.d_t.c_iflag \|= ttylist[ED_IO][M_INPUT].t_setmask;
[9005]	453
[12038]	454	extty.d_t.c_oflag = tstty.d_t.c_oflag;
	455	extty.d_t.c_oflag &= ~ttylist[EX_IO][M_OUTPUT].t_clrmask;
	456	extty.d_t.c_oflag \|= ttylist[EX_IO][M_OUTPUT].t_setmask;
[9005]	457
[12038]	458	edtty.d_t.c_oflag = tstty.d_t.c_oflag;
	459	edtty.d_t.c_oflag &= ~ttylist[ED_IO][M_OUTPUT].t_clrmask;
	460	edtty.d_t.c_oflag \|= ttylist[ED_IO][M_OUTPUT].t_setmask;
[9005]	461
[12038]	462	# else /* GSTTY */
[9005]	463
[12038]	464	extty.d_t.sg_flags = tstty.d_t.sg_flags;
[9005]	465
[12038]	466	extty.d_t.sg_flags &= ~ttylist[EX_IO][M_CONTROL].t_clrmask;
	467	extty.d_t.sg_flags \|= ttylist[EX_IO][M_CONTROL].t_setmask;
[9005]	468
[12038]	469	if (T_Tabs) /* order of &= and \|= is important to XTABS */
	470	extty.d_t.sg_flags &= ~XTABS;
	471	else
	472	extty.d_t.sg_flags \|= XTABS;
[9005]	473
[12038]	474	extty.d_lb = tstty.d_lb;
	475	extty.d_lb &= ~ttylist[EX_IO][M_LOCAL].t_clrmask;
	476	extty.d_lb \|= ttylist[EX_IO][M_LOCAL].t_setmask;
[9005]	477
[12038]	478	edtty.d_t.sg_flags = extty.d_t.sg_flags;
	479	if (T_Tabs) { /* order of &= and \|= is important to XTABS */
	480	edtty.d_t.sg_flags &=
	481	~(ttylist[ED_IO][M_CONTROL].t_clrmask\|XTABS);
	482	edtty.d_t.sg_flags \|= ttylist[ED_IO][M_CONTROL].t_setmask;
	483	}
	484	else {
	485	edtty.d_t.sg_flags &= ~ttylist[ED_IO][M_CONTROL].t_clrmask;
	486	edtty.d_t.sg_flags \|=
	487	(ttylist[ED_IO][M_CONTROL].t_setmask\|XTABS);
	488	}
[9005]	489
[12038]	490	edtty.d_lb = tstty.d_lb;
	491	edtty.d_lb &= ~ttylist[ED_IO][M_LOCAL].t_clrmask;
	492	edtty.d_lb \|= ttylist[ED_IO][M_LOCAL].t_setmask;
[9005]	493
[12038]	494	# endif /* TERMIO \|\| POSIX */
[9005]	495
	496	{
	497	extern int didsetty;
	498	int i;
	499
	500	tty_getchar(&tstty, ttychars[TS_IO]);
	501	/*
	502	* Check if the user made any changes.
	503	* If he did, then propagate the changes to the
	504	* edit and execute data structures.
	505	*/
	506	for (i = 0; i < C_NCC; i++)
	507	if (ttychars[TS_IO][i] != ttychars[EX_IO][i])
	508	break;
	509
	510	if (i != C_NCC \|\| didsetty) {
	511	didsetty = 0;
	512	/*
	513	* Propagate changes only to the unprotected chars
	514	* that have been modified just now.
	515	*/
	516	for (i = 0; i < C_NCC; i++) {
	517	if (!((ttylist[ED_IO][M_CHAR].t_setmask & C_SH(i))) &&
	518	(ttychars[TS_IO][i] != ttychars[EX_IO][i]))
	519	ttychars[ED_IO][i] = ttychars[TS_IO][i];
	520	if (ttylist[ED_IO][M_CHAR].t_clrmask & C_SH(i))
	521	ttychars[ED_IO][i] = vdisable;
	522	}
	523	tty_setchar(&edtty, ttychars[ED_IO]);
	524
	525	for (i = 0; i < C_NCC; i++) {
	526	if (!((ttylist[EX_IO][M_CHAR].t_setmask & C_SH(i))) &&
	527	(ttychars[TS_IO][i] != ttychars[EX_IO][i]))
	528	ttychars[EX_IO][i] = ttychars[TS_IO][i];
	529	if (ttylist[EX_IO][M_CHAR].t_clrmask & C_SH(i))
	530	ttychars[EX_IO][i] = vdisable;
	531	}
	532	tty_setchar(&extty, ttychars[EX_IO]);
	533	}
	534
	535	}
	536	}
	537	if (tty_setty(SHTTY, &edtty) == -1) {
[12038]	538	# ifdef DEBUG_TTY
[9005]	539	xprintf("Rawmode: tty_setty: %s\n", strerror(errno));
[12038]	540	# endif /* DEBUG_TTY */
[9005]	541	return(-1);
	542	}
[12038]	543	#endif /* WINNT */
[9005]	544	Tty_raw_mode = 1;
	545	flush(); /* flush any buffered output */
	546	return (0);
	547	}
	548
	549	int
	550	Cookedmode()
	551	{ /* set tty in normal setup */
[12038]	552	#ifdef WINNT
	553	do_nt_cooked_mode();
	554	#else
	555	signalfun_t orig_intr;
[9005]	556
[12038]	557	# ifdef _IBMR2
[9005]	558	tty_setdisc(SHTTY, EX_IO);
[12038]	559	# endif /* _IBMR2 */
[9005]	560
	561	if (!Tty_raw_mode)
	562	return (0);
	563
	564	/* hold this for reseting tty */
[12038]	565	# ifdef BSDSIGS
	566	orig_intr = (signalfun_t) signal(SIGINT, SIG_IGN);
	567	# else
	568	# ifdef SIG_HOLD
	569	/*
	570	* sigset doesn't return the previous handler if the signal is held,
	571	* it will return SIG_HOLD instead. So instead of restoring the
	572	* the signal we would end up installing a blocked SIGINT with a
	573	* SIG_IGN signal handler. This is what happened when Cookedmode
	574	* was called from sched_run, disabling interrupt for the rest
	575	* of your session.
	576	*
	577	* This is what we do:
	578	* - if the signal is blocked, keep it that way
	579	* - else set it to SIG_IGN
	580	*
	581	* Casper Dik (casper@fwi.uva.nl)
	582	*/
	583	orig_intr = (signalfun_t) sigset(SIGINT, SIG_HOLD);
	584	if (orig_intr != SIG_HOLD)
	585	(void) sigset(SIGINT, SIG_IGN); /* returns SIG_HOLD */
	586	# else /* !SIG_HOLD */
	587	/*
	588	* No SIG_HOLD; probably no reliable signals as well.
	589	*/
	590	orig_intr = (signalfun_t) sigset(SIGINT, SIG_IGN);
	591	# endif /* SIG_HOLD */
	592	# endif /* BSDSIGS */
[9005]	593	if (tty_setty(SHTTY, &extty) == -1) {
[12038]	594	# ifdef DEBUG_TTY
[9005]	595	xprintf("Cookedmode: tty_setty: %s\n", strerror(errno));
[12038]	596	# endif /* DEBUG_TTY */
[9005]	597	return -1;
	598	}
[12038]	599	# ifdef BSDSIGS
[9005]	600	(void) signal(SIGINT, orig_intr); /* take these again */
[12038]	601	# else
[9005]	602	(void) sigset(SIGINT, orig_intr); /* take these again */
[12038]	603	# endif /* BSDSIGS */
	604	#endif /* WINNT */
	605
	606	Tty_raw_mode = 0;
[9005]	607	return (0);
	608	}
	609
	610	void
	611	ResetInLine(macro)
	612	int macro;
	613	{
	614	Cursor = InputBuf; /* reset cursor */
	615	LastChar = InputBuf;
	616	InputLim = &InputBuf[INBUFSIZE - 2];
	617	Mark = InputBuf;
	618	MetaNext = 0;
	619	CurrentKeyMap = CcKeyMap;
	620	AltKeyMap = 0;
	621	Hist_num = 0;
	622	DoingArg = 0;
	623	Argument = 1;
	624	#ifdef notdef
	625	LastKill = KillBuf; /* no kill buffer */
	626	#endif
	627	LastCmd = F_UNASSIGNED; /* previous command executed */
	628	if (macro)
	629	MacroLvl = -1; /* no currently active macros */
	630	}
	631
	632	static Char *Input_Line = NULL;
	633	int
	634	Load_input_line()
	635	{
[12038]	636	#ifdef SUNOS4
	637	long chrs = 0;
	638	#else /* !SUNOS4 */
	639	/*
	640	* Everyone else has an int, but SunOS wants long!
	641	* This breaks where int != long (alpha)
	642	*/
	643	int chrs = 0;
	644	#endif /* SUNOS4 */
[9005]	645
	646	if (Input_Line)
	647	xfree((ptr_t) Input_Line);
	648	Input_Line = NULL;
	649
	650	if (Tty_raw_mode)
	651	return 0;
	652
	653	#if defined(FIONREAD) && !defined(OREO)
[12038]	654	(void) ioctl(SHIN, FIONREAD, (ioctl_t) &chrs);
[9005]	655	if (chrs > 0) {
	656	char buf[BUFSIZE];
	657
	658	chrs = read(SHIN, buf, (size_t) min(chrs, BUFSIZE - 1));
	659	if (chrs > 0) {
	660	buf[chrs] = '\0';
	661	Input_Line = Strsave(str2short(buf));
	662	PushMacro(Input_Line);
	663	}
[12038]	664	#ifdef convex
	665	/* need to print errno message in case file is migrated */
	666	if (chrs < 0)
	667	stderror(ERR_SYSTEM, progname, strerror(errno));
	668	#endif
[9005]	669	}
	670	#endif /* FIONREAD && !OREO */
	671	return chrs > 0;
	672	}
	673
	674	/*
	675	* Bugfix (in Swedish) by:
	676	* Johan Widen
	677	* SICS, PO Box 1263, S-163 13 SPANGA, SWEDEN
	678	* {mcvax,munnari,cernvax,diku,inria,prlb2,penet,ukc,unido}!enea!sics.se!jw
	679	* Internet: jw@sics.se
	680	*
	681	* (via Hans J Albertsson (thanks))
	682	*/
	683	void
	684	QuoteModeOn()
	685	{
	686	if (MacroLvl >= 0)
	687	return;
	688
[12038]	689	#ifndef WINNT
[9005]	690	qutty = edtty;
	691
	692	#if defined(TERMIO) \|\| defined(POSIX)
	693	qutty.d_t.c_iflag &= ~ttylist[QU_IO][M_INPUT].t_clrmask;
	694	qutty.d_t.c_iflag \|= ttylist[QU_IO][M_INPUT].t_setmask;
	695
	696	qutty.d_t.c_oflag &= ~ttylist[QU_IO][M_OUTPUT].t_clrmask;
	697	qutty.d_t.c_oflag \|= ttylist[QU_IO][M_OUTPUT].t_setmask;
	698
	699	qutty.d_t.c_cflag &= ~ttylist[QU_IO][M_CONTROL].t_clrmask;
	700	qutty.d_t.c_cflag \|= ttylist[QU_IO][M_CONTROL].t_setmask;
	701
	702	qutty.d_t.c_lflag &= ~ttylist[QU_IO][M_LINED].t_clrmask;
	703	qutty.d_t.c_lflag \|= ttylist[QU_IO][M_LINED].t_setmask;
	704	#else /* GSTTY */
	705	qutty.d_t.sg_flags &= ~ttylist[QU_IO][M_CONTROL].t_clrmask;
	706	qutty.d_t.sg_flags \|= ttylist[QU_IO][M_CONTROL].t_setmask;
	707	qutty.d_lb &= ~ttylist[QU_IO][M_LOCAL].t_clrmask;
	708	qutty.d_lb \|= ttylist[QU_IO][M_LOCAL].t_setmask;
	709
	710	#endif /* TERMIO \|\| POSIX */
	711	if (tty_setty(SHTTY, &qutty) == -1) {
	712	#ifdef DEBUG_TTY
	713	xprintf("QuoteModeOn: tty_setty: %s\n", strerror(errno));
	714	#endif /* DEBUG_TTY */
	715	return;
	716	}
[12038]	717	#endif /* !WINNT */
[9005]	718	Tty_quote_mode = 1;
	719	return;
	720	}
	721
	722	void
	723	QuoteModeOff()
	724	{
	725	if (!Tty_quote_mode)
	726	return;
	727	Tty_quote_mode = 0;
	728	if (tty_setty(SHTTY, &edtty) == -1) {
	729	#ifdef DEBUG_TTY
	730	xprintf("QuoteModeOff: tty_setty: %s\n", strerror(errno));
	731	#endif /* DEBUG_TTY */
	732	return;
	733	}
	734	return;
	735	}

Note: See TracBrowser for help on using the repository browser.

Download in other formats: