|
|
1.1 root 1: /* Copyright (c) 1981 Regents of the University of California */
2: /* sccs id: @(#)ex.h 7.4 9/3/81 */
3: #ifdef V6
4: #include <retrofit.h>
5: #endif
6:
7: /*
8: * Ex version 3 (see exact version in ex_cmds.c, search for /Version/)
9: *
10: * Mark Horton, UC Berkeley
11: * Bill Joy, UC Berkeley
12: * November 1979
13: *
14: * This file contains most of the declarations common to a large number
15: * of routines. The file ex_vis.h contains declarations
16: * which are used only inside the screen editor.
17: * The file ex_tune.h contains parameters which can be diddled per installation.
18: *
19: * The declarations relating to the argument list, regular expressions,
20: * the temporary file data structure used by the editor
21: * and the data describing terminals are each fairly substantial and
22: * are kept in the files ex_{argv,re,temp,tty}.h which
23: * we #include separately.
24: *
25: * If you are going to dig into ex, you should look at the outline of the
26: * distribution of the code into files at the beginning of ex.c and ex_v.c.
27: * Code which is similar to that of ed is lightly or undocumented in spots
28: * (e.g. the regular expression code). Newer code (e.g. open and visual)
29: * is much more carefully documented, and still rough in spots.
30: *
31: * Please forward bug reports to
32: *
33: * Mark Horton
34: * Computer Science Division, EECS
35: * EVANS HALL
36: * U.C. Berkeley 94704
37: * (415) 642-4948
38: * (415) 642-1024 (dept. office)
39: *
40: * or to csvax.mark@berkeley on the ARPA-net. I would particularly like to hear
41: * of additional terminal descriptions you add to the termcap data base.
42: */
43:
44: #include <sys/types.h>
45: #include <ctype.h>
46: #include <errno.h>
47: #include <signal.h>
48: #include <setjmp.h>
49: #include <sys/stat.h>
50:
51: #ifndef var
52: #define var extern
53: #endif
54: /*
55: * The following little dance copes with the new USG tty handling.
56: * This stuff has the advantage of considerable flexibility, and
57: * the disadvantage of being incompatible with anything else.
58: * The presence of the symbol USG3TTY will indicate the new code:
59: * in this case, we define CBREAK (because we can simulate it exactly),
60: * but we won't actually use it, so we set it to a value that will
61: * probably blow the compilation if we goof up.
62: */
63: #ifdef USG3TTY
64: #include <termio.h>
65: #define CBREAK xxxxx
66: #else
67: #include <sgtty.h>
68: #endif
69:
70: extern int errno;
71:
72: #ifndef VMUNIX
73: typedef short line;
74: #else
75: typedef int line;
76: #endif
77: typedef short bool;
78:
79: #include "ex_tune.h"
80: #include "ex_vars.h"
81: /*
82: * Options in the editor are referred to usually by "value(name)" where
83: * name is all uppercase, i.e. "value(PROMPT)". This is actually a macro
84: * which expands to a fixed field in a static structure and so generates
85: * very little code. The offsets for the option names in the structure
86: * are generated automagically from the structure initializing them in
87: * ex_data.c... see the shell script "makeoptions".
88: */
89: struct option {
90: char *oname;
91: char *oabbrev;
92: short otype; /* Types -- see below */
93: short odefault; /* Default value */
94: short ovalue; /* Current value */
95: char *osvalue;
96: };
97:
98: #define ONOFF 0
99: #define NUMERIC 1
100: #define STRING 2 /* SHELL or DIRECTORY */
101: #define OTERM 3
102:
103: #define value(a) options[a].ovalue
104: #define svalue(a) options[a].osvalue
105:
106: extern struct option options[NOPTS + 1];
107:
108:
109: /*
110: * The editor does not normally use the standard i/o library. Because
111: * we expect the editor to be a heavily used program and because it
112: * does a substantial amount of input/output processing it is appropriate
113: * for it to call low level read/write primitives directly. In fact,
114: * when debugging the editor we use the standard i/o library. In any
115: * case the editor needs a printf which prints through "putchar" ala the
116: * old version 6 printf. Thus we normally steal a copy of the "printf.c"
117: * and "strout" code from the standard i/o library and mung it for our
118: * purposes to avoid dragging in the stdio library headers, etc if we
119: * are not debugging. Such a modified printf exists in "printf.c" here.
120: */
121: #ifdef TRACE
122: # include <stdio.h>
123: var FILE *trace;
124: var bool trubble;
125: var bool techoin;
126: var char tracbuf[BUFSIZ];
127: # undef putchar
128: # undef getchar
129: #else
130: # ifdef VMUNIX
131: # define BUFSIZ 1024
132: # else
133: # ifdef u370
134: # define BUFSIZ 4096
135: # else
136: # define BUFSIZ 512
137: # endif
138: # endif
139: # define NULL 0
140: # define EOF -1
141: #endif
142:
143: /*
144: * Character constants and bits
145: *
146: * The editor uses the QUOTE bit as a flag to pass on with characters
147: * e.g. to the putchar routine. The editor never uses a simple char variable.
148: * Only arrays of and pointers to characters are used and parameters and
149: * registers are never declared character.
150: */
151: #define QUOTE 0200
152: #define TRIM 0177
153: #define CTRL(c) ('c' & 037)
154: #define NL CTRL(j)
155: #define CR CTRL(m)
156: #define DELETE 0177 /* See also ATTN, QUIT in ex_tune.h */
157: #define ESCAPE 033
158:
159: /*
160: * Miscellaneous random variables used in more than one place
161: */
162: var bool aiflag; /* Append/change/insert with autoindent */
163: var bool anymarks; /* We have used '[a-z] */
164: var int chng; /* Warn "No write" */
165: var char *Command;
166: var short defwind; /* -w# change default window size */
167: var int dirtcnt; /* When >= MAXDIRT, should sync temporary */
168: #ifdef SIGTSTP
169: var bool dosusp; /* Do SIGTSTP in visual when ^Z typed */
170: #endif
171: var bool edited; /* Current file is [Edited] */
172: var line *endcore; /* Last available core location */
173: extern bool endline; /* Last cmd mode command ended with \n */
174: #ifndef VMUNIX
175: var short erfile; /* Error message file unit */
176: #endif
177: var line *fendcore; /* First address in line pointer space */
178: var char file[FNSIZE]; /* Working file name */
179: var char genbuf[LBSIZE]; /* Working buffer when manipulating linebuf */
180: var bool hush; /* Command line option - was given, hush up! */
181: var char *globp; /* (Untyped) input string to command mode */
182: var bool holdcm; /* Don't cursor address */
183: var bool inappend; /* in ex command append mode */
184: var bool inglobal; /* Inside g//... or v//... */
185: var char *initev; /* Initial : escape for visual */
186: var bool inopen; /* Inside open or visual */
187: var char *input; /* Current position in cmd line input buffer */
188: var bool intty; /* Input is a tty */
189: var short io; /* General i/o unit (auto-closed on error!) */
190: extern short lastc; /* Last character ret'd from cmd input */
191: var bool laste; /* Last command was an "e" (or "rec") */
192: var char lastmac; /* Last macro called for ** */
193: var char lasttag[TAGSIZE]; /* Last argument to a tag command */
194: var char *linebp; /* Used in substituting in \n */
195: var char linebuf[LBSIZE]; /* The primary line buffer */
196: var bool listf; /* Command should run in list mode */
197: var char *loc1; /* Where re began to match (in linebuf) */
198: var char *loc2; /* First char after re match (") */
199: var line names['z'-'a'+2]; /* Mark registers a-z,' */
200: var int notecnt; /* Count for notify (to visual from cmd) */
201: var bool numberf; /* Command should run in number mode */
202: var char obuf[BUFSIZ]; /* Buffer for tty output */
203: var short oprompt; /* Saved during source */
204: extern short ospeed; /* Output speed (from gtty) */
205: var int otchng; /* Backup tchng to find changes in macros */
206: var short peekc; /* Peek ahead character (cmd mode input) */
207: var char *pkill[2]; /* Trim for put with ragged (LISP) delete */
208: var bool pfast; /* Have stty -nl'ed to go faster */
209: var int pid; /* Process id of child */
210: var int ppid; /* Process id of parent (e.g. main ex proc) */
211: var jmp_buf resetlab; /* For error throws to top level (cmd mode) */
212: var int rpid; /* Pid returned from wait() */
213: var bool ruptible; /* Interruptible is normal state */
214: var bool seenprompt; /* 1 if have gotten user input */
215: var bool shudclob; /* Have a prompt to clobber (e.g. on ^D) */
216: var int status; /* Status returned from wait() */
217: var int tchng; /* If nonzero, then [Modified] */
218: extern short tfile; /* Temporary file unit */
219: var bool vcatch; /* Want to catch an error (open/visual) */
220: var jmp_buf vreslab; /* For error throws to a visual catch */
221: var bool writing; /* 1 if in middle of a file write */
222: var int xchng; /* Suppresses multiple "No writes" in !cmd */
223:
224: /*
225: * Macros
226: */
227: #define CP(a, b) (ignore(strcpy(a, b)))
228: /*
229: * FIXUNDO: do we want to mung undo vars?
230: * Usually yes unless in a macro or global.
231: */
232: #define FIXUNDO (inopen >= 0 && (inopen || !inglobal))
233: #define ckaw() {if (chng && value(AUTOWRITE)) wop(0);}
234: #define copy(a,b,c) Copy((char *) a, (char *) b, c)
235: #define eq(a, b) ((a) && (b) && strcmp(a, b) == 0)
236: #define getexit(a) copy(a, resetlab, sizeof (jmp_buf))
237: #define lastchar() lastc
238: #define outchar(c) (*Outchar)(c)
239: #define pastwh() (ignore(skipwh()))
240: #define pline(no) (*Pline)(no)
241: #define reset() longjmp(resetlab,1)
242: #define resexit(a) copy(resetlab, a, sizeof (jmp_buf))
243: #define setexit() setjmp(resetlab)
244: #define setlastchar(c) lastc = c
245: #define ungetchar(c) peekc = c
246:
247: #define CATCH vcatch = 1; if (setjmp(vreslab) == 0) {
248: #define ONERR } else { vcatch = 0;
249: #define ENDCATCH } vcatch = 0;
250:
251: /*
252: * Environment like memory
253: */
254: var char altfile[FNSIZE]; /* Alternate file name */
255: extern char direct[ONMSZ]; /* Temp file goes here */
256: extern char shell[ONMSZ]; /* Copied to be settable */
257: extern char ttytype[ONMSZ]; /* A long and pretty name */
258: var char uxb[UXBSIZE + 2]; /* Last !command for !! */
259:
260: /*
261: * The editor data structure for accessing the current file consists
262: * of an incore array of pointers into the temporary file tfile.
263: * Each pointer is 15 bits (the low bit is used by global) and is
264: * padded with zeroes to make an index into the temp file where the
265: * actual text of the line is stored.
266: *
267: * To effect undo, copies of affected lines are saved after the last
268: * line considered to be in the buffer, between dol and unddol.
269: * During an open or visual, which uses the command mode undo between
270: * dol and unddol, a copy of the entire, pre-command buffer state
271: * is saved between unddol and truedol.
272: */
273: var line *addr1; /* First addressed line in a command */
274: var line *addr2; /* Second addressed line */
275: var line *dol; /* Last line in buffer */
276: var line *dot; /* Current line */
277: var line *one; /* First line */
278: var line *truedol; /* End of all lines, including saves */
279: var line *unddol; /* End of undo saved lines */
280: var line *zero; /* Points to empty slot before one */
281:
282: /*
283: * Undo information
284: *
285: * For most commands we save lines changed by salting them away between
286: * dol and unddol before they are changed (i.e. we save the descriptors
287: * into the temp file tfile which is never garbage collected). The
288: * lines put here go back after unddel, and to complete the undo
289: * we delete the lines [undap1,undap2).
290: *
291: * Undoing a move is much easier and we treat this as a special case.
292: * Similarly undoing a "put" is a special case for although there
293: * are lines saved between dol and unddol we don't stick these back
294: * into the buffer.
295: */
296: var short undkind;
297:
298: var line *unddel; /* Saved deleted lines go after here */
299: var line *undap1; /* Beginning of new lines */
300: var line *undap2; /* New lines end before undap2 */
301: var line *undadot; /* If we saved all lines, dot reverts here */
302:
303: #define UNDCHANGE 0
304: #define UNDMOVE 1
305: #define UNDALL 2
306: #define UNDNONE 3
307: #define UNDPUT 4
308:
309: #ifdef CRYPT
310: /*
311: * Various miscellaneous flags and buffers needed by the encryption routines.
312: */
313: #define KSIZE 9 /* key size for encryption */
314: #define KEYPROMPT "Key: "
315: var int xflag; /* True if we are in encryption mode */
316: var int xtflag; /* True if the temp file is being encrypted */
317: var int kflag; /* True if the key has been accepted */
318: var char perm[768];
319: var char tperm[768];
320: var char *key;
321: var char crbuf[CRSIZE];
322: char *getpass();
323: #endif
324:
325: /*
326: * Function type definitions
327: */
328: #define NOSTR (char *) 0
329: #define NOLINE (line *) 0
330:
331: extern int (*Outchar)();
332: extern int (*Pline)();
333: extern int (*Putchar)();
334: var int (*oldhup)();
335: int (*setlist())();
336: int (*setnorm())();
337: int (*setnorm())();
338: int (*setnumb())();
339: line *address();
340: char *cgoto();
341: char *genindent();
342: char *getblock();
343: char *getenv();
344: line *getmark();
345: char *longname();
346: char *mesg();
347: char *place();
348: char *plural();
349: line *scanfor();
350: line *setin();
351: char *strcat();
352: char *strcpy();
353: char *strend();
354: char *tailpath();
355: char *tgetstr();
356: char *tgoto();
357: char *ttyname();
358: line *vback();
359: char *vfindcol();
360: char *vgetline();
361: char *vinit();
362: char *vpastwh();
363: char *vskipwh();
364: int put();
365: int putreg();
366: int YANKreg();
367: int delete();
368: int execl();
369: int filter();
370: int getfile();
371: int getsub();
372: int gettty();
373: int join();
374: int listchar();
375: off_t lseek();
376: int normchar();
377: int normline();
378: int numbline();
379: var int (*oldquit)();
380: int onhup();
381: int onintr();
382: int onsusp();
383: int putch();
384: int shift();
385: int termchar();
386: int vfilter();
387: #ifdef CBREAK
388: int vintr();
389: #endif
390: int vputch();
391: int vshftop();
392: int yank();
393:
394: /*
395: * C doesn't have a (void) cast, so we have to fake it for lint's sake.
396: */
397: #ifdef lint
398: # define ignore(a) Ignore((char *) (a))
399: # define ignorf(a) Ignorf((int (*) ()) (a))
400: #else
401: # define ignore(a) a
402: # define ignorf(a) a
403: #endif
This archive runs on limited infrastructure. Preserving old code on modern bandwidth. Automated agents are requested to crawl responsibly.