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_vis.h	7.4 (Berkeley) 5/31/85

 */

/*

 * Ex version 3

 * Mark Horton, UCB

 * Bill Joy UCB

 *

 * Open and visual mode definitions.

 * 

 * There are actually 4 major states in open/visual modes.  These

 * are visual, crt open (where the cursor can move about the screen and

 * the screen can scroll and be erased), one line open (on dumb glass-crt's

 * like the adm3), and hardcopy open (for everything else).

 *

 * The basic state is given by bastate, and the current state by state,

 * since we can be in pseudo-hardcopy mode if we are on an adm3 and the

 * line is longer than 80.

 */

var	short	bastate;

var	short	state;

#define	VISUAL		0

#define	CRTOPEN		1

#define	ONEOPEN		2

#define	HARDOPEN	3

/*

 * The screen in visual and crtopen is of varying size; the basic

 * window has top basWTOP and basWLINES lines are thereby implied.

 * The current window (which may have grown from the basic size)

 * has top WTOP and WLINES lines.  The top line of the window is WTOP,

 * and the bottom line WBOT.  The line WECHO is used for messages,

 * search strings and the like.  If WBOT==WECHO then we are in ONEOPEN

 * or HARDOPEN and there is no way back to the line we were on if we

 * go to WECHO (i.e. we will have to scroll before we go there, and

 * we can't get back).  There are WCOLS columns per line.

 * If WBOT!=WECHO then WECHO will be the last line on the screen

 * and WBOT is the line before it.

 */

var	short	basWTOP;

var	short	basWLINES;

var	short	WTOP;

var	short	WBOT;

var	short	WLINES;

var	short	WCOLS;

var	short	WECHO;

/*

 * When we are dealing with the echo area we consider the window

 * to be "split" and set the variable splitw.  Otherwise, moving

 * off the bottom of the screen into WECHO causes a screen rollup.

 */

var	bool	splitw;

/*

 * Information about each line currently on the screen includes

 * the y coordinate associated with the line, the printing depth

 * of the line (0 indicates unknown), and a mask which indicates

 * whether the line is "unclean", i.e. whether we should check

 * to make sure the line is displayed correctly at the next

 * appropriate juncture.

 */

struct vlinfo {

	short	vliny;		/* Y coordinate */	/* mjm: was char */

	short	vdepth;		/* Depth of displayed line */ /*mjm: was char */

	short	vflags;		/* Is line potentially dirty ? */

};

var	struct vlinfo  vlinfo[TUBELINES + 2];

#define	DEPTH(c)	(vlinfo[c].vdepth)

#define	LINE(c)		(vlinfo[c].vliny)

#define	FLAGS(c)	(vlinfo[c].vflags)

#define	VDIRT	1

/*

 * Hacks to copy vlinfo structures around

 */

#ifdef	V6

	/* Kludge to make up for no structure assignment */

	struct {

		long	longi;

	};

#	define	vlcopy(i, j)	i.longi = j.longi

#else

#	define	vlcopy(i, j)	i = j;

#endif

/*

 * The current line on the screen is represented by vcline.

 * There are vcnt lines on the screen, the last being "vcnt - 1".

 * Vcline is intimately tied to the current value of dot,

 * and when command mode is used as a subroutine fancy footwork occurs.

 */

var	short	vcline;

var	short	vcnt;

/*

 * To allow many optimizations on output, an exact image of the terminal

 * screen is maintained in the space addressed by vtube0.  The vtube

 * array indexes this space as lines, and is shuffled on scrolls, insert+delete

 * lines and the like rather than (more expensively) shuffling the screen

 * data itself.  It is also rearranged during insert mode across line

 * boundaries to make incore work easier.

 */

#ifndef	BIT8

var	char	*vtube[TUBELINES];

var	char	*vtube0;

#else

var	short	*vtube[TUBELINES];

var	short	*vtube0;

#endif

/*

 * The current cursor position within the current line is kept in

 * cursor.  The current line is kept in linebuf.  During insertions

 * we use the auxiliary array genbuf as scratch area.

 * The cursor wcursor and wdot are used in operations within/spanning

 * lines to mark the other end of the affected area, or the target

 * for a motion.

 */

var	char	*cursor;

var	char	*wcursor;

var	line	*wdot;

/*

 * Undo information is saved in a LBSIZE buffer at "vutmp" for changes

 * within the current line, or as for command mode for multi-line changes

 * or changes on lines no longer the current line.

 * The change kind "VCAPU" is used immediately after a U undo to prevent

 * two successive U undo's from destroying the previous state.

 */

#define	VNONE	0

#define	VCHNG	1

#define	VMANY	2

#define	VCAPU	3

#define	VMCHNG	4

#define	VMANYINS 5

var	short	vundkind;	/* Which kind of undo - from above */

#ifndef	BIT8

var	char	*vutmp;		/* Prev line image when "VCHNG" */

#else

var	short	*vutmp;		/* Prev line image when "VCHNG" */

#endif

/*

 * State information for undoing of macros.  The basic idea is that

 * if the macro does only 1 change or even none, we don't treat it

 * specially.  If it does 2 or more changes we want to be able to

 * undo it as a unit.  We remember how many changes have been made

 * within the current macro.  (Remember macros can be nested.)

 */

#define VC_NOTINMAC	0	/* Not in a macro */

#define VC_NOCHANGE	1	/* In a macro, no changes so far */

#define VC_ONECHANGE	2	/* In a macro, one change so far */

#define VC_MANYCHANGE	3	/* In a macro, at least 2 changes so far */

var	short	vch_mac;	/* Change state - one of the above */

/*

 * For U undo's the line is grabbed by "vmove" after it first appears

 * on that line.  The "vUNDdot" which specifies which line has been

 * saved is selectively cleared when changes involving other lines

 * are made, i.e. after a 'J' join.  This is because a 'JU' would

 * lose completely the text of the line just joined on.

 */

var	char	*vUNDcurs;	/* Cursor just before 'U' */

var	line	*vUNDdot;	/* The line address of line saved in vUNDsav */

var	line	vUNDsav;	/* Grabbed initial "*dot" */

#define	killU()		vUNDdot = NOLINE

/*

 * There are a number of cases where special behaviour is needed

 * from deeply nested routines.  This is accomplished by setting

 * the bits of hold, which acts to change the state of the general

 * visual editing behaviour in specific ways.

 *

 * HOLDAT prevents the clreol (clear to end of line) routines from

 * putting out @'s or ~'s on empty lines.

 *

 * HOLDDOL prevents the reopen routine from putting a '$' at the

 * end of a reopened line in list mode (for hardcopy mode, e.g.).

 *

 * HOLDROL prevents spurious blank lines when scrolling in hardcopy

 * open mode.

 *

 * HOLDQIK prevents the fake insert mode during repeated commands.

 *

 * HOLDPUPD prevents updating of the physical screen image when

 * mucking around while in insert mode.

 *

 * HOLDECH prevents clearing of the echo area while rolling the screen

 * backwards (e.g.) in deference to the clearing of the area at the

 * end of the scroll (1 time instead of n times).  The fact that this

 * is actually needed is recorded in heldech, which says that a clear

 * of the echo area was actually held off.

 */

var	short	hold;

var	short	holdupd;	/* Hold off update when echo line is too long */

#define	HOLDAT		1

#define	HOLDDOL		2

#define	HOLDROL		4

#define	HOLDQIK		8

#define	HOLDPUPD	16

#define	HOLDECH		32

#define HOLDWIG		64

/*

 * Miscellaneous variables

 */

var	short	CDCNT;		/* Count of ^D's in insert on this line */

#ifndef	BIT8

var	char	DEL[VBSIZE];	/* Last deleted text */

#else

var	short	DEL[VBSIZE];	/* Last deleted text */

#endif

var	bool	HADUP;		/* This insert line started with ^ then ^D */

var	bool	HADZERO;	/* This insert line started with 0 then ^D */

#ifndef	BIT8

var	char	INS[VBSIZE];	/* Last inserted text */

#else

var	short	INS[VBSIZE];	/* Last inserted text */

#endif

var	int	Vlines;		/* Number of file lines "before" vi command */

var	int	Xcnt;		/* External variable holding last cmd's count */

var	bool	Xhadcnt;	/* Last command had explicit count? */

var	short	ZERO;

var	short	dir;		/* Direction for search (+1 or -1) */

var	short	doomed;		/* Disply chars right of cursor to be killed */

var	bool	gobblebl;	/* Wrapmargin space generated nl, eat a space */

var	bool	hadcnt;		/* (Almost) internal to vmain() */

var	bool	heldech;	/* We owe a clear of echo area */

var	bool	insmode;	/* Are in character insert mode */

#ifndef	BIT8

var	char	lastcmd[5];	/* Chars in last command */

#else

var	short	lastcmd[5];	/* Chars in last command */

#endif

var	int	lastcnt;	/* Count for last command */

#ifndef	BIT8

var	char	*lastcp;	/* Save current command here to repeat */

#else

var	short	*lastcp;	/* Save current command here to repeat */

#endif

var	bool	lasthad;	/* Last command had a count? */

var	short	lastvgk;	/* Previous input key, if not from keyboard */

var	short	lastreg;	/* Register with last command */

var	char	*ncols['z'-'a'+2];	/* Cursor positions of marks */

var	char	*notenam;	/* Name to be noted with change count */

var	char	*notesgn;	/* Change count from last command */

var	char	op;		/* Operation of current command */

var	short	Peekkey;	/* Peek ahead key */

var	bool	rubble;		/* Line is filthy (in hardcopy open), redraw! */

var	int	vSCROLL;	/* Number lines to scroll on ^D/^U */

#ifndef	BIT8

var	char	*vglobp;	/* Untyped input (e.g. repeat insert text) */

#else

var	short	*vglobp;	/* Untyped input (e.g. repeat insert text) */

#endif

var	char	vmacbuf[VBSIZE];   /* Text of visual macro, hence nonnestable */

var	char	*vmacp;		/* Like vglobp but for visual macros */

var	char	*vmcurs;	/* Cursor for restore after undo d), e.g. */

var	short	vmovcol;	/* Column to try to keep on arrow keys */

var	bool	vmoving;	/* Are trying to keep vmovcol */

var	short	vreg;		/* Reg for this command */   /* mjm: was char */

var	short	wdkind;		/* Liberal/conservative words? */

#ifndef	BIT8

var	char	workcmd[5];	/* Temporary for lastcmd */

#else

var	short	workcmd[5];	/* Temporary for lastcmd */

#endif

/*

 * Macros

 */

#define	INF		30000

#define	LASTLINE	LINE(vcnt)

#define	OVERBUF		QUOTE

#define	beep		obeep

#define	cindent()	((outline - vlinfo[vcline].vliny) * WCOLS + outcol)

#define	vputp(cp, cnt)	tputs(cp, cnt, vputch)

#define	vputc(c)	putch(c)

/*

 * Function types

 */

int	beep();

int	qcount();

int	vchange();

int	vdelete();

int	vgrabit();

int	vinschar();

int	vmove();

int	vputchar();

int	vshift();

int	vyankit();