Subversion Repositories planix.SVN

/*

 * Copyright (c) 1980 Regents of the University of California.

 * All rights reserved.  The Berkeley software License Agreement

 * specifies the terms and conditions for redistribution.

 *

 *	@(#)ex.h	7.7.1.1 (Berkeley) 8/12/86

 */

#ifdef V6

#include <retrofit.h>

#endif

/*

 * Ex version 3 (see exact version in ex_cmds.c, search for /Version/)

 *

 * Mark Horton, UC Berkeley

 * Bill Joy, UC Berkeley

 * November 1979

 *

 * Changes by Gunnar Ritter, Freiburg i. Br., Germany

 * May 2000

 *

 * This file contains most of the declarations common to a large number

 * of routines.  The file ex_vis.h contains declarations

 * which are used only inside the screen editor.

 * The file ex_tune.h contains parameters which can be diddled per installation.

 *

 * The declarations relating to the argument list, regular expressions,

 * the temporary file data structure used by the editor

 * and the data describing terminals are each fairly substantial and

 * are kept in the files ex_{argv,re,temp,tty}.h which

 * we #include separately.

 *

 * If you are going to dig into ex, you should look at the outline of the

 * distribution of the code into files at the beginning of ex.c and ex_v.c.

 * Code which is similar to that of ed is lightly or undocumented in spots

 * (e.g. the regular expression code).  Newer code (e.g. open and visual)

 * is much more carefully documented, and still rough in spots.

 *

 * Please forward bug reports to

 *

 *	Mark Horton

 *	Computer Science Division, EECS

 *	EVANS HALL

 *	U.C. Berkeley 94704

 *	(415) 642-4948

 *	(415) 642-1024 (dept. office)

 *

 * or to csvax.mark@berkeley on the ARPA-net.  I would particularly like to hear

 * of additional terminal descriptions you add to the termcap data base.

 */

#include <sys/param.h>

#include <ctype.h>

#include <errno.h>

#include <signal.h>

#include <setjmp.h>

#include <sys/stat.h>

#ifndef var

#define var	extern

#endif

/*

 *	The following little dance copes with the new USG tty handling.

 *	This stuff has the advantage of considerable flexibility, and

 *	the disadvantage of being incompatible with anything else.

 *	The presence of the symbol USG3TTY will indicate the new code:

 *	in this case, we define CBREAK (because we can simulate it exactly),

 *	but we won't actually use it, so we set it to a value that will

 *	probably blow the compilation if we goof up.

 */

#ifdef USG3TTY

#include <termios.h>

#define CBREAK xxxxx

#else

#include <sgtty.h>

#endif

extern	int errno;

#ifdef	NCURSES

/*

 * Some of the symbols collide.

 */

#define	LINES		LI_NES

#define	cleanup		clean_up

#define	filter		fil_ter

#define	getch		get_ch

#define	longname	long_name

#define	ttytype		tty_type

#define	winch		win_ch

#endif

#ifndef	VMUNIX

typedef	short	line;

#else

typedef	int	line;

#endif

typedef	short	bool;

#include "ex_tune.h"

#include "ex_vars.h"

/*

 * Options in the editor are referred to usually by "value(name)" where

 * name is all uppercase, i.e. "value(PROMPT)".  This is actually a macro

 * which expands to a fixed field in a static structure and so generates

 * very little code.  The offsets for the option names in the structure

 * are generated automagically from the structure initializing them in

 * ex_data.c... see the shell script "makeoptions".

 */

struct	option {

	char	*oname;

	char	*oabbrev;

	short	otype;		/* Types -- see below */

	short	odefault;	/* Default value */

	short	ovalue;		/* Current value */

	char	*osvalue;

};

#define	ONOFF	0

#define	NUMERIC	1

#define	STRING	2		/* SHELL or DIRECTORY */

#define	OTERM	3

#define	value(a)	options[a].ovalue

#define	svalue(a)	options[a].osvalue

extern	 struct	option options[NOPTS + 1];

/*

 * The editor does not normally use the standard i/o library.  Because

 * we expect the editor to be a heavily used program and because it

 * does a substantial amount of input/output processing it is appropriate

 * for it to call low level read/write primitives directly.  In fact,

 * when debugging the editor we use the standard i/o library.  In any

 * case the editor needs a printf which prints through "putchar" ala the

 * old version 6 printf.  Thus we normally steal a copy of the "printf.c"

 * and "strout" code from the standard i/o library and mung it for our

 * purposes to avoid dragging in the stdio library headers, etc if we

 * are not debugging.  Such a modified printf exists in "printf.c" here.

 */

#ifdef TRACE

#	include <stdio.h>

	var	FILE	*trace;

	var	bool	trubble;

	var	bool	techoin;

	var	char	tracbuf[BUFSIZ];

#	undef	putchar

#	undef	getchar

#else

#ifndef	BUFSIZ	/* GR */

# ifdef	VMUNIX

#   ifdef BIGMEM

#       define	BUFSIZ	4096

#   else

#	define	BUFSIZ	1024

#   endif

# else

#  ifdef u370

#	define	BUFSIZ	4096

#  else

#	define	BUFSIZ	512

#  endif

# endif

#endif

#	define	NULL	0

#	define	EOF	-1

#endif

#ifndef	MAXBSIZE	/* GR */

#define	MAXBSIZE	BUFSIZ

#endif

/*

 * Character constants and bits

 *

 * The editor uses the QUOTE bit as a flag to pass on with characters

 * e.g. to the putchar routine.  The editor never uses a simple char variable.

 * Only arrays of and pointers to characters are used and parameters and

 * registers are never declared character.

 */

#ifndef	BIT8

#define	QUOTE	0200

#define	TRIM	0177

#else

#define	QUOTE	0x200

#define	TRIM	0x1FF

short *ss_strcpy();

short *sc_strcpy();

char *cs_strcpy();

unsigned int s_strlen();

short *sc_strcat();

#endif

#undef CTRL

#define	CTRL(c)	(c & 037)

#define	NL	CTRL('j')

#define	CR	CTRL('m')

#define	DELETE	0177		/* See also ATTN, QUIT in ex_tune.h */

#define	ESCAPE	033

#ifdef	ISO

#define	niso(c)	((c) & QUOTE && ((unsigned char)(c)) < (QUOTE + ' '))

#endif

var	const char *versionstring;

/*

 * Miscellaneous random variables used in more than one place

 */

var	bool	aiflag;		/* Append/change/insert with autoindent */

var	bool	anymarks;	/* We have used '[a-z] */

var	int	chng;		/* Warn "No write" */

var	char	*Command;

var	short	defwind;	/* -w# change default window size */

var	int	dirtcnt;	/* When >= MAXDIRT, should sync temporary */

/*#if defined (TIOCLGET) || defined (__linux__)*/

var	bool	dosusp;		/* Do SIGTSTP in visual when ^Z typed */

/*#endif*/

var	bool	edited;		/* Current file is [Edited] */

var	line	*endcore;	/* Last available core location */

extern	 bool	endline;	/* Last cmd mode command ended with \n */

#ifndef VMUNIX

var	short	erfile;		/* Error message file unit */

#endif

var	line	*fendcore;	/* First address in line pointer space */

var	char	file[FNSIZE];	/* Working file name */

var	char	genbuf[MAXBSIZE]; /* Working buffer when manipulating linebuf */

var	bool	hush;		/* Command line option - was given, hush up! */

#ifndef	BIT8

var	char	*globp;		/* (Untyped) input string to command mode */

#else

var	short	*globp;		/* (Untyped) input string to command mode */

#endif

var	bool	holdcm;		/* Don't cursor address */

var	bool	inappend;	/* in ex command append mode */

var	bool	inglobal;	/* Inside g//... or v//... */

#ifndef	BIT8

var	char	*initev;	/* Initial : escape for visual */

#else

var	short	*initev;	/* Initial : escape for visual */

#endif

var	bool	inopen;		/* Inside open or visual */

var	char	*input;		/* Current position in cmd line input buffer */

var	bool	intty;		/* Input is a tty */

var	short	io;		/* General i/o unit (auto-closed on error!) */

extern	 short	lastc;		/* Last character ret'd from cmd input */

var	bool	laste;		/* Last command was an "e" (or "rec") */

var	char	lastmac;	/* Last macro called for ** */

var	char	lasttag[TAGSIZE];	/* Last argument to a tag command */

var	char	*linebp;	/* Used in substituting in \n */

var	char	linebuf[LBSIZE];	/* The primary line buffer */

var	bool	listf;		/* Command should run in list mode */

var	char	*loc1;		/* Where re began to match (in linebuf) */

var	char	*loc2;		/* First char after re match (") */

var	line	names['z'-'a'+2];	/* Mark registers a-z,' */

var	int	notecnt;	/* Count for notify (to visual from cmd) */

var	bool	numberf;	/* Command should run in number mode */

var	char	obuf[BUFSIZ];	/* Buffer for tty output */

var	short	oprompt;	/* Saved during source */

extern	short	o_speed;	/* Output speed (from gtty) */

var	int	otchng;		/* Backup tchng to find changes in macros */

var	short	peekc;		/* Peek ahead character (cmd mode input) */

var	char	*pkill[2];	/* Trim for put with ragged (LISP) delete */

var	bool	pfast;		/* Have stty -nl'ed to go faster */

var	int	pid;		/* Process id of child */

var	int	ppid;		/* Process id of parent (e.g. main ex proc) */

var	jmp_buf	resetlab;	/* For error throws to top level (cmd mode) */

var	int	rpid;		/* Pid returned from wait() */

var	bool	ruptible;	/* Interruptible is normal state */

var	bool	seenprompt;	/* 1 if have gotten user input */

var	bool	shudclob;	/* Have a prompt to clobber (e.g. on ^D) */

var	int	status;		/* Status returned from wait() */

var	int	tchng;		/* If nonzero, then [Modified] */

extern	short	tfile;		/* Temporary file unit */

var	bool	vcatch;		/* Want to catch an error (open/visual) */

var	jmp_buf	vreslab;	/* For error throws to a visual catch */

var	bool	writing;	/* 1 if in middle of a file write */

var	int	xchng;		/* Suppresses multiple "No writes" in !cmd */

var	int	bsize;		/* Block size for disk i/o */

/*

 * Macros

 */

/*#define	CP(a, b)	(ignore(strcpy(a, b)))*/

#define 	CP(a,b) 	error error error

			/*

			 * FIXUNDO: do we want to mung undo vars?

			 * Usually yes unless in a macro or global.

			 */

#define FIXUNDO		(inopen >= 0 && (inopen || !inglobal))

#define ckaw()		{if (chng && value(AUTOWRITE)) wop(0);}

#define	copy(a,b,c)	Copy((char *) a, (char *) b, c)

#define	eq(a, b)	((a) && (b) && strcmp(a, b) == 0)

#define	getexit(a)	copy(a, resetlab, sizeof (jmp_buf))

#define	lastchar()	lastc

#define	outchar(c)	(*Outchar)(c)

#define	pastwh()	(ignore(skipwh()))

#define	pline(no)	(*Pline)(no)

#define	reset()		longjmp(resetlab,1)

#define	resexit(a)	copy(resetlab, a, sizeof (jmp_buf))

#define	setexit()	setjmp(resetlab)

#define	setlastchar(c)	lastc = c

#define	ungetchar(c)	peekc = c

#define	CATCH		vcatch = 1; if (setjmp(vreslab) == 0) {

#define	ONERR		} else { vcatch = 0;

#define	ENDCATCH	} vcatch = 0;

/*

 * Environment like memory

 */

var	char	altfile[FNSIZE];	/* Alternate file name */

extern	 char	direct[ONMSZ];		/* Temp file goes here */

extern	 char	shell[ONMSZ];		/* Copied to be settable */

extern	 char	ttytype[ONMSZ];		/* A long and pretty name */

var	char	uxb[UXBSIZE + 2];	/* Last !command for !! */

/*

 * The editor data structure for accessing the current file consists

 * of an incore array of pointers into the temporary file tfile.

 * Each pointer is 15 bits (the low bit is used by global) and is

 * padded with zeroes to make an index into the temp file where the

 * actual text of the line is stored.

 *

 * To effect undo, copies of affected lines are saved after the last

 * line considered to be in the buffer, between dol and unddol.

 * During an open or visual, which uses the command mode undo between

 * dol and unddol, a copy of the entire, pre-command buffer state

 * is saved between unddol and truedol.

 */

var	line	*addr1;			/* First addressed line in a command */

var	line	*addr2;			/* Second addressed line */

var	line	*dol;			/* Last line in buffer */

var	line	*dot;			/* Current line */

var	line	*one;			/* First line */

var	line	*truedol;		/* End of all lines, including saves */

var	line	*unddol;		/* End of undo saved lines */

var	line	*zero;			/* Points to empty slot before one */

/*

 * Undo information

 *

 * For most commands we save lines changed by salting them away between

 * dol and unddol before they are changed (i.e. we save the descriptors

 * into the temp file tfile which is never garbage collected).  The

 * lines put here go back after unddel, and to complete the undo

 * we delete the lines [undap1,undap2).

 *

 * Undoing a move is much easier and we treat this as a special case.

 * Similarly undoing a "put" is a special case for although there

 * are lines saved between dol and unddol we don't stick these back

 * into the buffer.

 */

var	short	undkind;

var	line	*unddel;	/* Saved deleted lines go after here */

var	line	*undap1;	/* Beginning of new lines */

var	line	*undap2;	/* New lines end before undap2 */

var	line	*undadot;	/* If we saved all lines, dot reverts here */

#define	UNDCHANGE	0

#define	UNDMOVE		1

#define	UNDALL		2

#define	UNDNONE		3

#define	UNDPUT		4

/*

 * Function type definitions

 */

#define	NOSTR	(char *) 0

#define	NOLINE	(line *) 0

extern	void	(*Outchar)(int);

extern	int	(*Pline)();

extern	void	(*Putchar)(short);

void	(*oldhup)();

void	(*setlist())();

int	(*setnorm())();

int	(*setnorm())();

int	(*setnumb())();

line	*address();

char	*cgoto();

char	*genindent();

char	*getblock();

char	*getenv();

line	*getmark();

char	*longname();

char	*mesg();

char	*place();

char	*plural();

line	*scanfor();

line	*setin();

char	*strcat();

char	*strcpy();

char	*strend();

char	*tailpath();

char	*tgetstr();

char	*tgoto();

char	*ttyname();

line	*vback();

char	*vfindcol();

char	*vgetline();

char	*vinit();

char	*vpastwh();

char	*vskipwh();

void	put();

void	putreg();

int	YANKreg();

int	delete();

int	execl();

int	filter();

int	getfile();

int	getsub();

int	gettty();

int	join();

void	listchar(short);

off_t	lseek();

void	normchar(short);

int	normline();

int	numbline();

var	void	(*oldquit)();

void	onhup();

void	onintr();

void	onsusp();

int	putch();

int	shift();

void	termchar();

void	vfilter();

#ifdef CBREAK

void	vintr();

#endif

int	vputch();

void	vshftop();

int	yank();

int tgets(char *, int cnt, int fd);

/*

 * C doesn't have a (void) cast, so we have to fake it for lint's sake.

 */

#ifdef lint

#	define	ignore(a)	Ignore((char *) (a))

#	define	ignorf(a)	Ignorf((int (*) ()) (a))

#else

#	define	ignore(a)	a

#	define	ignorf(a)	a

#endif