remove tree

1 files changed, 0 insertions, 355 deletions

diff --git a/tree/src/vi/ex-070224/ex_get.c b/tree/src/vi/ex-070224/ex_get.c
deleted file mode 100644
index 7bca559..0000000
--- a/tree/src/vi/ex-070224/ex_get.c
+++ /dev/null
@@ -1,355 +0,0 @@
-/*
- * This code contains changes by
- *      Gunnar Ritter, Freiburg i. Br., Germany, 2002. All rights reserved.
- *
- * Conditions 1, 2, and 4 and the no-warranty notice below apply
- * to these changes.
- *
- *
- * Copyright (c) 1980, 1993
- * 	The Regents of the University of California.  All rights reserved.
- *
- * Redistribution and use in source and binary forms, with or without
- * modification, are permitted provided that the following conditions
- * are met:
- * 1. Redistributions of source code must retain the above copyright
- *    notice, this list of conditions and the following disclaimer.
- * 2. Redistributions in binary form must reproduce the above copyright
- *    notice, this list of conditions and the following disclaimer in the
- *    documentation and/or other materials provided with the distribution.
- * 3. All advertising materials mentioning features or use of this software
- *    must display the following acknowledgement:
- * 	This product includes software developed by the University of
- * 	California, Berkeley and its contributors.
- * 4. Neither the name of the University nor the names of its contributors
- *    may be used to endorse or promote products derived from this software
- *    without specific prior written permission.
- *
- * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND
- * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
- * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
- * ARE DISCLAIMED.  IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
- * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
- * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
- * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
- * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
- * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
- * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
- * SUCH DAMAGE.
- *
- *
- * Copyright(C) Caldera International Inc. 2001-2002. All rights reserved.
- *
- * Redistribution and use in source and binary forms, with or without
- * modification, are permitted provided that the following conditions
- * are met:
- *   Redistributions of source code and documentation must retain the
- *    above copyright notice, this list of conditions and the following
- *    disclaimer.
- *   Redistributions in binary form must reproduce the above copyright
- *    notice, this list of conditions and the following disclaimer in the
- *    documentation and/or other materials provided with the distribution.
- *   All advertising materials mentioning features or use of this software
- *    must display the following acknowledgement:
- *      This product includes software developed or owned by Caldera
- *      International, Inc.
- *   Neither the name of Caldera International, Inc. nor the names of
- *    other contributors may be used to endorse or promote products
- *    derived from this software without specific prior written permission.
- *
- * USE OF THE SOFTWARE PROVIDED FOR UNDER THIS LICENSE BY CALDERA
- * INTERNATIONAL, INC. AND CONTRIBUTORS ``AS IS'' AND ANY EXPRESS OR
- * IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED
- * WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
- * ARE DISCLAIMED. IN NO EVENT SHALL CALDERA INTERNATIONAL, INC. BE
- * LIABLE FOR ANY DIRECT, INDIRECT INCIDENTAL, SPECIAL, EXEMPLARY, OR
- * CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
- * SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR
- * BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY,
- * WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE
- * OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE,
- * EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
- */
-
-#ifndef	lint
-#ifdef	DOSCCS
-static char sccsid[] = "@(#)ex_get.c	1.18 (gritter) 8/4/05";
-#endif
-#endif
-
-/* from ex_get.c	7.6 (Berkeley) 6/7/85 */
-
-#include "ex.h"
-#include "ex_tty.h"
-
-/*
- * Input routines for command mode.
- * Since we translate the end of reads into the implied ^D's
- * we have different flavors of routines which do/don't return such.
- */
-static	bool junkbs;
-int	lastc = '\n';
-
-void 
-ignchar(void)
-{
-	ignore(getchar());
-}
-
-int 
-getach(void)
-{
-	register int c;
-	static char in_line[BUFSIZ];
-	/* struct stat statb; */
-
-	c = peekc;
-	if (c != 0) {
-		peekc = 0;
-		return (c);
-	}
-	if (globp) {
-		if (*globp)
-			return (*globp++&0377);
-		globp = 0;
-		return (lastc = EOF);
-	}
-top:
-	if (input) {
-		if (c = *input++&0377) {
-			if (verbose && !intty)
-				write(2, &input[-1], 1);
-			if (c &= TRIM)
-				return (lastc = c);
-			goto top;
-		}
-		input = 0;
-	}
-	flush();
-	if (intty) {
-		c = read(0, in_line, sizeof in_line - 4);
-		if (c < 0)
-			return (lastc = EOF);
-		if (c == 0 || in_line[c-1] != '\n')
-			in_line[c++] = CTRL('d');
-		if (in_line[c-1] == '\n')
-			noteinp();
-		in_line[c] = 0;
-		for (c--; c >= 0; c--)
-			if (in_line[c] == 0)
-#ifndef	BIT8
-				in_line[c] = QUOTE;
-#else
-				in_line[c] = '\200';
-#endif
-		input = in_line;
-		goto top;
-	}
-	c = read(0, in_line, sizeof in_line - 1);
-	if(c <= 0)
-		return(lastc = EOF);
-	in_line[c] = '\0';
-	input = in_line;
-	goto top;
-}
-
-int
-getchar(void)
-{
-	register int c;
-
-	do
-		c = getcd();
-	while (!globp && c == CTRL('d'));
-	return (c);
-}
-
-void 
-checkjunk(int c)
-{
-
-	if (junkbs == 0 && c == '\b') {
-		write(2, cntrlhm, 13);
-		junkbs = 1;
-	}
-}
-
-int 
-getcd(void)
-{
-	register int c;
-
-again:
-	c = getach();
-	if (c == EOF)
-		return (c);
-	c &= TRIM;
-	if (!inopen)
-		if (!globp && c == CTRL('d'))
-			setlastchar('\n');
-		else if (junk(c)) {
-			checkjunk(c);
-			goto again;
-		}
-	return (c);
-}
-
-int 
-peekchar(void)
-{
-
-	if (peekc == 0)
-		peekc = getchar();
-	return (peekc);
-}
-
-int 
-peekcd(void)
-{
-	if (peekc == 0)
-		peekc = getcd();
-	return (peekc);
-}
-
-/*
- * Crunch the indent.
- * Hard thing here is that in command mode some of the indent
- * is only implicit, so we must seed the column counter.
- * This should really be done differently so as to use the whitecnt routine
- * and also to hack indenting for LISP.
- */
-int 
-smunch(register int col, char *ocp)
-{
-	register char *cp;
-
-	cp = ocp;
-	for (;;)
-		switch (*cp++) {
-
-		case ' ':
-			col++;
-			continue;
-
-		case '\t':
-			col += value(TABSTOP) - (col % value(TABSTOP));
-			continue;
-
-		default:
-			cp--;
-			CP(ocp, cp);
-			return (col);
-		}
-}
-
-/*
- * Input routine for insert/append/change in command mode.
- * Most work here is in handling autoindent.
- */
-static	short	lastin;
-
-int 
-gettty(void)
-{
-	register int c = 0;
-	register char *cp = genbuf;
-	char hadup = 0;
-	int offset = Pline == numbline ? 8 : 0;
-	int ch;
-
-	if (intty && !inglobal) {
-		if (offset) {
-			holdcm = 1;
-			printf("  %4d  ", lineDOT() + 1);
-			flush();
-			holdcm = 0;
-		}
-		if (value(AUTOINDENT) ^ aiflag) {
-			holdcm = 1;
-#ifdef LISPCODE
-			if (value(LISP))
-				lastin = lindent(dot + 1);
-#endif
-			tab(lastin + offset);
-			while ((c = getcd()) == CTRL('d')) {
-				if (lastin == 0 && isatty(0) == -1) {
-					holdcm = 0;
-					return (EOF);
-				}
-				lastin = backtab(lastin);
-				tab(lastin + offset);
-			}
-			switch (c) {
-
-			case '^':
-			case '0':
-				ch = getcd();
-				if (ch == CTRL('d')) {
-					if (c == '0')
-						lastin = 0;
-					if (!OS) {
-						putchar('\b' | QUOTE);
-						putchar(' ' | QUOTE);
-						putchar('\b' | QUOTE);
-					}
-					tab(offset);
-					hadup = 1;
-					c = getchar();
-				} else
-					ungetchar(ch);
-				break;
-
-			case '.':
-				if (peekchar() == '\n') {
-					ignchar();
-					noteinp();
-					holdcm = 0;
-					return (EOF);
-				}
-				break;
-
-			case '\n':
-				hadup = 1;
-				break;
-			}
-		}
-		flush();
-		holdcm = 0;
-	}
-	if (c == 0)
-		c = getchar();
-	while (c != EOF && c != '\n') {
-		if (cp > &genbuf[LBSIZE - 2])
-			error(catgets(catd, 1, 71, "Input line too long"));
-		*cp++ = c;
-		c = getchar();
-	}
-	if (c == EOF) {
-		if (inglobal)
-			ungetchar(EOF);
-		return (EOF);
-	}
-	*cp = 0;
-	cp = linebuf;
-	if ((value(AUTOINDENT) ^ aiflag) && hadup == 0 && intty && !inglobal) {
-		lastin = c = smunch(lastin, genbuf);
-		for (c = lastin; c >= value(TABSTOP); c -= value(TABSTOP))
-			*cp++ = '\t';
-		for (; c > 0; c--)
-			*cp++ = ' ';
-	}
-	CP(cp, genbuf);
-	if (linebuf[0] == '.' && linebuf[1] == 0)
-		return (EOF);
-	return (0);
-}
-
-void
-setin(line *addr)
-{
-
-	if (addr == zero)
-		lastin = 0;
-	else
-		getline(*addr), lastin = smunch(0, linebuf);
-}