|
|
1.1 root 1: /* Copyright (c) 1979 Regents of the University of California */
2: /*
3: * Ex version 2
4: * Mark Horton, UCB
5: * Bill Joy UCB
6: *
7: * Open and visual mode definitions.
8: *
9: * There are actually 4 major states in open/visual modes. These
10: * are visual, crt open (where the cursor can move about the screen and
11: * the screen can scroll and be erased), one line open (on dumb glass-crt's
12: * like the adm3), and hardcopy open (for everything else).
13: *
14: * The basic state is given by bastate, and the current state by state,
15: * since we can be in pseudo-hardcopy mode if we are on an adm3 and the
16: * line is longer than 80.
17: */
18:
19: short bastate;
20: short state;
21:
22: #define VISUAL 0
23: #define CRTOPEN 1
24: #define ONEOPEN 2
25: #define HARDOPEN 3
26:
27: /*
28: * The screen in visual and crtopen is of varying size; the basic
29: * window has top basWTOP and basWLINES lines are thereby implied.
30: * The current window (which may have grown from the basic size)
31: * has top WTOP and WLINES lines. The top line of the window is WTOP,
32: * and the bottom line WBOT. The line WECHO is used for messages,
33: * search strings and the like. If WBOT==WECHO then we are in ONEOPEN
34: * or HARDOPEN and there is no way back to the line we were on if we
35: * go to WECHO (i.e. we will have to scroll before we go there, and
36: * we can't get back). There are WCOLS columns per line.
37: * If WBOT!=WECHO then WECHO will be the last line on the screen
38: * and WBOT is the line before it.
39: */
40: short basWTOP;
41: short basWLINES;
42: short WTOP;
43: short WBOT;
44: short WLINES;
45: short WCOLS;
46: short WECHO;
47:
48: /*
49: * When we are dealing with the echo area we consider the window
50: * to be "split" and set the variable splitw. Otherwise, moving
51: * off the bottom of the screen into WECHO causes a screen rollup.
52: */
53: bool splitw;
54:
55: /*
56: * Information about each line currently on the screen includes
57: * the y coordinate associated with the line, the printing depth
58: * of the line (0 indicates unknown), and a mask which indicates
59: * whether the line is "unclean", i.e. whether we should check
60: * to make sure the line is displayed correctly at the next
61: * appropriate juncture.
62: */
63: struct vlinfo {
64: char vliny; /* Y coordinate */
65: char vdepth; /* Depth of displayed line */
66: short vflags; /* Is line potentially dirty ? */
67: } vlinfo[TUBELINES + 2];
68:
69: #define DEPTH(c) (vlinfo[c].vdepth)
70: #define LINE(c) (vlinfo[c].vliny)
71: #define FLAGS(c) (vlinfo[c].vflags)
72:
73: #define VDIRT 1
74:
75: /*
76: * Hacks to copy vlinfo structures around
77: */
78: #ifdef V6
79: /* Kludge to make up for no structure assignment */
80: struct {
81: long longi;
82: };
83: # define vlcopy(i, j) i.longi = j.longi
84: #else
85: # define vlcopy(i, j) i = j;
86: #endif
87:
88: /*
89: * The current line on the screen is represented by vcline.
90: * There are vcnt lines on the screen, the last being "vcnt - 1".
91: * Vcline is intimately tied to the current value of dot,
92: * and when command mode is used as a subroutine fancy footwork occurs.
93: */
94: short vcline;
95: short vcnt;
96:
97: /*
98: * To allow many optimizations on output, an exact image of the terminal
99: * screen is maintained in the space addressed by vtube0. The vtube
100: * array indexes this space as lines, and is shuffled on scrolls, insert+delete
101: * lines and the like rather than (more expensively) shuffling the screen
102: * data itself. It is also rearranged during insert mode across line
103: * boundaries to make incore work easier.
104: */
105: char *vtube[TUBELINES];
106: char *vtube0;
107:
108: /*
109: * The current cursor position within the current line is kept in
110: * cursor. The current line is kept in linebuf. During insertions
111: * we use the auxiliary array genbuf as scratch area.
112: * The cursor wcursor and wdot are used in operations within/spanning
113: * lines to mark the other end of the affected area, or the target
114: * for a motion.
115: */
116: char *cursor;
117: char *wcursor;
118: line *wdot;
119:
120: /*
121: * Undo information is saved in a LBSIZE buffer at "vutmp" for changes
122: * within the current line, or as for command mode for multi-line changes
123: * or changes on lines no longer the current line.
124: * The change kind "VCAPU" is used immediately after a U undo to prevent
125: * two successive U undo's from destroying the previous state.
126: */
127: #define VNONE 0
128: #define VCHNG 1
129: #define VMANY 2
130: #define VCAPU 3
131: #define VMCHNG 4
132: #define VMANYINS 5
133:
134: short vundkind; /* Which kind of undo - from above */
135: char *vutmp; /* Prev line image when "VCHNG" */
136:
137: /*
138: * For U undo's the line is grabbed by "vmove" after it first appears
139: * on that line. The "vUNDdot" which specifies which line has been
140: * saved is selectively cleared when changes involving other lines
141: * are made, i.e. after a 'J' join. This is because a 'JU' would
142: * lose completely the text of the line just joined on.
143: */
144: char *vUNDcurs; /* Cursor just before 'U' */
145: line *vUNDdot; /* The line address of line saved in vUNDsav */
146: line vUNDsav; /* Grabbed initial "*dot" */
147:
148: #define killU() vUNDdot = NOLINE
149:
150: /*
151: * There are a number of cases where special behaviour is needed
152: * from deeply nested routines. This is accomplished by setting
153: * the bits of hold, which acts to change the state of the general
154: * visual editing behaviour in specific ways.
155: *
156: * HOLDAT prevents the clreol (clear to end of line) routines from
157: * putting out @'s or ~'s on empty lines.
158: *
159: * HOLDDOL prevents the reopen routine from putting a '$' at the
160: * end of a reopened line in list mode (for hardcopy mode, e.g.).
161: *
162: * HOLDROL prevents spurious blank lines when scrolling in hardcopy
163: * open mode.
164: *
165: * HOLDQIK prevents the fake insert mode during repeated commands.
166: *
167: * HOLDPUPD prevents updating of the physical screen image when
168: * mucking around while in insert mode.
169: *
170: * HOLDECH prevents clearing of the echo area while rolling the screen
171: * backwards (e.g.) in deference to the clearing of the area at the
172: * end of the scroll (1 time instead of n times). The fact that this
173: * is actually needed is recorded in heldech, which says that a clear
174: * of the echo area was actually held off.
175: */
176: short hold;
177: short holdupd; /* Hold off update when echo line is too long */
178:
179: #define HOLDAT 1
180: #define HOLDDOL 2
181: #define HOLDROL 4
182: #define HOLDQIK 8
183: #define HOLDPUPD 16
184: #define HOLDECH 32
185: #define HOLDWIG 64
186:
187: /*
188: * Miscellaneous variables
189: */
190: short CDCNT; /* Count of ^D's in insert on this line */
191: char DEL[VBSIZE]; /* Last deleted text */
192: bool HADUP; /* This insert line started with ^ then ^D */
193: bool HADZERO; /* This insert line started with 0 then ^D */
194: char INS[VBSIZE]; /* Last inserted text */
195: int Vlines; /* Number of file lines "before" vi command */
196: int Xcnt; /* External variable holding last cmd's count */
197: bool Xhadcnt; /* Last command had explicit count? */
198: short ZERO;
199: short dir; /* Direction for search (+1 or -1) */
200: short doomed; /* Disply chars right of cursor to be killed */
201: bool gobblebl; /* Wrapmargin space generated nl, eat a space */
202: bool hadcnt; /* (Almost) internal to vmain() */
203: bool heldech; /* We owe a clear of echo area */
204: bool insmode; /* Are in character insert mode */
205: char lastcmd[5]; /* Chars in last command */
206: int lastcnt; /* Count for last command */
207: char *lastcp; /* Save current command here to repeat */
208: bool lasthad; /* Last command had a count? */
209: short lastvgk; /* Previous input key, if not from keyboard */
210: short lastreg; /* Register with last command */
211: char *ncols['z'-'a'+2]; /* Cursor positions of marks */
212: char *notenam; /* Name to be noted with change count */
213: char *notesgn; /* Change count from last command */
214: char op; /* Operation of current command */
215: short Peekkey; /* Peek ahead key */
216: bool rubble; /* Line is filthy (in hardcopy open), redraw! */
217: int vSCROLL; /* Number lines to scroll on ^D/^U */
218: char *vglobp; /* Untyped input (e.g. repeat insert text) */
219: char vmacbuf[VBSIZE]; /* Text of visual macro, hence nonnestable */
220: char *vmacp; /* Like vglobp but for visual macros */
221: char *vmcurs; /* Cursor for restore after undo d), e.g. */
222: short vmovcol; /* Column to try to keep on arrow keys */
223: bool vmoving; /* Are trying to keep vmovcol */
224: char vreg; /* Register for this command */
225: short wdkind; /* Liberal/conservative words? */
226: char workcmd[5]; /* Temporary for lastcmd */
227:
228:
229: /*
230: * Macros
231: */
232: #define INF 30000
233: #define LASTLINE LINE(vcnt)
234: #define OVERBUF QUOTE
235: #define beep obeep
236: #define cindent() ((outline - vlinfo[vcline].vliny) * WCOLS + outcol)
237: #define vputp(cp, cnt) tputs(cp, cnt, vputch)
238: #define vputc(c) putch(c)
239:
240: /*
241: * Function types
242: */
243: int beep();
244: int qcount();
245: int vchange();
246: int vdelete();
247: int vgrabit();
248: int vinschar();
249: int vmove();
250: int vputchar();
251: int vshift();
252: int vyankit();
This archive runs on limited infrastructure. Preserving old code on modern bandwidth. Automated agents are requested to crawl responsibly.