1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
137
138
139
140
141
142
143
144
145
146
147
148
149
150
151
152
153
154
155
156
157
158
159
160
161
162
163
164
165
166
167
168
169
170
|
/* ex.h */
/* Copyright 1995 by Steve Kirkendall */
/* This is a list of all possible print flag combinations */
typedef enum
{
PF_NONE, /* don't print */
PF_PRINT, /* print the line */
PF_NUMBER, /* print line number, then print line */
PF_LIST, /* list the line (making control characters visible) */
PF_NUMLIST /* print line number, then list line */
} PFLAG;
typedef enum
{
EX_ABBR, EX_ALIAS, EX_ALL, EX_APPEND, EX_ARGS, EX_AT,
EX_BANG, EX_BBROWSE, EX_BREAK, EX_BROWSE, EX_BUFFER,
EX_CALC, EX_CASE, EX_CC, EX_CD, EX_CHANGE, EX_CLOSE, EX_COLOR,
EX_COMMENT, EX_COPY,
EX_DEFAULT, EX_DELETE, EX_DIGRAPH, EX_DISPLAY, EX_DO, EX_DOALIAS,
EX_ECHO, EX_EDIT, EX_ELSE, EX_EQUAL, EX_ERRLIST, EX_ERROR, EX_EVAL,
EX_FILE,
EX_GOTO, EX_GLOBAL, EX_GUI,
EX_HELP,
EX_IF, EX_INSERT,
EX_LAST, EX_LET, EX_LIST, EX_LOCAL, EX_LPR,
EX_MAKE, EX_MAP, EX_MARK, EX_MESSAGE, EX_MKEXRC, EX_MOVE,
EX_NEXT, EX_NORMAL, EX_NUMBER,
EX_ONLY, EX_OPEN,
EX_POP, EX_PRESERVE, EX_PREVIOUS, EX_PRINT, EX_PUT,
EX_QALL, EX_QUIT,
EX_READ, EX_REDO, EX_REWIND,
EX_SALL, EX_SAFER, EX_SBBROWSE, EX_SBROWSE, EX_SET, EX_SHELL,
EX_SHIFTL, EX_SHIFTR, EX_SLAST, EX_SNEW, EX_SNEXT, EX_SOURCE,
EX_SPLIT, EX_SPREVIOUS, EX_SREWIND, EX_STAG, EX_STACK, EX_STOP,
EX_SUBAGAIN, EX_SUBRECENT, EX_SUBSTITUTE, EX_SUSPEND, EX_SWITCH,
EX_TAG, EX_THEN, EX_TRY,
EX_UNABBR, EX_UNALIAS, EX_UNBREAK, EX_UNDO, EX_UNMAP,
EX_VERSION, EX_VGLOBAL, EX_VISUAL,
EX_WARNING, EX_WHILE, EX_WINDOW, EX_WNEXT, EX_WQUIT, EX_WRITE,
EX_XIT,
EX_YANK,
EX_Z
} EXCMD;
/* This structure is used to store a parsed ex command */
typedef struct
{
WINDOW window; /* window where line was entered */
MARKBUF defaddr; /* default address (includes buffer spec) */
long from, to; /* range line numbers */
long fromoffset; /* exact offset of an addressed point */
MARK fromaddr; /* start of the "from" line */
MARK toaddr; /* end of "to" line (start of following line) */
BOOLEAN anyaddr; /* True if any addresses given, False if none */
char *cmdname; /* name of command (for diagnostics) */
EXCMD command; /* code for command name, e.g. EX_PRINT */
int cmdidx; /* index into internal array of cmd attributes */
int multi; /* number of times cmd name was stuttered */
BOOLEAN bang; /* True if '!' appended to command name */
MARK destaddr; /* end of destination line */
regexp *re; /* regular expression */
CHAR *lhs; /* single-word argument or "+lineno" string */
CHAR *rhs; /* multi-word argument, or command line */
char **file; /* array of file names */
int nfiles; /* size of "file" array */
CHAR cutbuf; /* cut buffer name */
long count; /* count argument, or plus value */
PFLAG pflag; /* print flag, causes output of some lines */
long delta; /* print offset */
BOOLEAN global; /* executed as part of :global command? */
BOOLEAN undo; /* save an "undo" version before first change? */
MARK newcurs; /* where cursor should be left (NULL to not move) */
} EXINFO;
/* This stores the current state of ex's control structures */
typedef struct
{
BOOLEAN thenflag; /* result of an :if */
BOOLEAN switchcarry; /* falling through to next :case? */
CHAR *switchvalue; /* result of :switch, compare to :case value */
CHAR *dotest; /* expression to be evaluated by :do */
} EXCTLSTATE;
/* defined in exconfig.c */
extern EXCTLSTATE exctlstate;
/* macros for saving & restoring the control state in a local variable */
#define exctlsave(v) {(v) = exctlstate; memset(&exctlstate, 0, sizeof exctlstate);}
#define exctlrestore(v) {if (exctlstate.switchvalue) safefree(exctlstate.switchvalue);\
if (exctlstate.dotest) safefree(exctlstate.dotest);\
exctlstate = (v);}
/* defined in exmake.c */
extern BOOLEAN makeflag;
BEGIN_EXTERNC
extern BOOLEAN exparseaddress P_((CHAR **refp, EXINFO *xinf));
extern RESULT experform P_((WINDOW win, MARK from, MARK to));
extern RESULT exstring P_((WINDOW win, CHAR *str, char *name));
extern CHAR *exname P_((CHAR *name));
extern RESULT exenter P_((WINDOW win));
extern long exprintlines P_((WINDOW win, MARK line, long qty, PFLAG pflag));
extern CHAR *excomplete P_((WINDOW win, MARK from, MARK to));
extern void exfree P_((EXINFO *xinf));
extern BOOLEAN exaddfilearg P_((char ***file, int *nfiles, char *filename, BOOLEAN wild));
extern char *exisalias P_((char *name, BOOLEAN inuse));
extern RESULT ex_alias P_((EXINFO *xinf));
extern RESULT ex_doalias P_((EXINFO *xinf));
extern RESULT ex_all P_((EXINFO *xinf));
extern RESULT ex_append P_((EXINFO *xinf));
extern RESULT ex_args P_((EXINFO *xinf));
extern RESULT ex_at P_((EXINFO *xinf));
extern RESULT ex_bang P_((EXINFO *xinf));
extern RESULT ex_browse P_((EXINFO *xinf));
extern RESULT ex_buffer P_((EXINFO *xinf));
extern RESULT ex_case P_((EXINFO *xinf));
extern RESULT ex_cd P_((EXINFO *xinf));
extern RESULT ex_color P_((EXINFO *xinf));
extern RESULT ex_comment P_((EXINFO *xinf));
extern RESULT ex_delete P_((EXINFO *xinf));
extern RESULT ex_digraph P_((EXINFO *xinf));
extern RESULT ex_display P_((EXINFO *xinf));
extern RESULT ex_do P_((EXINFO *xinf));
extern RESULT ex_edit P_((EXINFO *xinf));
extern RESULT ex_errlist P_((EXINFO *xinf));
extern RESULT ex_file P_((EXINFO *xinf));
extern RESULT ex_global P_((EXINFO *xinf));
extern RESULT ex_gui P_((EXINFO *xinf));
extern RESULT ex_help P_((EXINFO *xinf));
extern RESULT ex_if P_((EXINFO *xinf));
extern RESULT ex_join P_((EXINFO *xinf));
extern RESULT ex_lpr P_((EXINFO *xinf));
extern RESULT ex_make P_((EXINFO *xinf));
extern RESULT ex_map P_((EXINFO *xinf));
extern RESULT ex_mark P_((EXINFO *xinf));
extern RESULT ex_message P_((EXINFO *xinf));
extern RESULT ex_mkexrc P_((EXINFO *xinf));
extern RESULT ex_move P_((EXINFO *xinf));
extern RESULT ex_next P_((EXINFO *xinf));
extern RESULT ex_pop P_((EXINFO *xinf));
extern RESULT ex_print P_((EXINFO *xinf));
extern RESULT ex_put P_((EXINFO *xinf));
extern RESULT ex_qall P_((EXINFO *xinf));
extern RESULT ex_read P_((EXINFO *xinf));
extern RESULT ex_sall P_((EXINFO *xinf));
extern RESULT ex_set P_((EXINFO *xinf));
extern RESULT ex_shift P_((EXINFO *xinf));
extern RESULT ex_source P_((EXINFO *xinf));
extern RESULT ex_stack P_((EXINFO *xinf));
extern RESULT ex_substitute P_((EXINFO *xinf));
extern RESULT ex_suspend P_((EXINFO *xinf));
extern RESULT ex_switch P_((EXINFO *xinf));
extern RESULT ex_tag P_((EXINFO *xinf));
extern RESULT ex_then P_((EXINFO *xinf));
extern RESULT ex_undo P_((EXINFO *xinf));
extern RESULT ex_version P_((EXINFO *xinf));
extern RESULT ex_split P_((EXINFO *xinf));
extern RESULT ex_while P_((EXINFO *xinf));
extern RESULT ex_window P_((EXINFO *xinf));
extern RESULT ex_write P_((EXINFO *xinf));
extern RESULT ex_xit P_((EXINFO *xinf));
extern RESULT ex_z P_((EXINFO *xinf));
extern void colorsave P_((BUFFER custom));
END_EXTERNC
|
