summaryrefslogtreecommitdiff
path: root/v4.0/src/CMD/ATTRIB/PARSE.H
diff options
context:
space:
mode:
Diffstat (limited to 'v4.0/src/CMD/ATTRIB/PARSE.H')
-rw-r--r--v4.0/src/CMD/ATTRIB/PARSE.H185
1 files changed, 185 insertions, 0 deletions
diff --git a/v4.0/src/CMD/ATTRIB/PARSE.H b/v4.0/src/CMD/ATTRIB/PARSE.H
new file mode 100644
index 0000000..2421481
--- /dev/null
+++ b/v4.0/src/CMD/ATTRIB/PARSE.H
@@ -0,0 +1,185 @@
1/*  */
2/*----------------------------------------------------------------------+
3| |
4| This file contains the structures and defines that are needed to use |
5| the parser from a C program. |
6| |
7| |
8| Date: 5-21-87 |
9| |
10+----------------------------------------------------------------------*/
11
12#define BYTE unsigned char /*;AN000;*/
13#define WORD unsigned short /*;AN000;*/
14#define DWORD unsigned long /*;AN000;*/
15
16#define p_len_parms 4 /* length of p_parms */ /*;AN000;*/
17#define p_i_use_default 0 /* no extra stuff specified */ /*;AN000;*/
18#define p_i_have_delim 1 /* extra delimiter specified */ /*;AN000;*/
19#define p_i_have_eol 2 /* extra EOL specified */ /*;AN000;*/
20
21struct p_parms /*;AN000;*/
22 { /*;AN000;*/
23 struct p_parmsx *p_parmsx_address; /* address of p_parmsx */ /*;AN000;*/
24 BYTE p_num_extra; /* number of extra stuff */ /*;AN000;*/
25 BYTE p_len_extra_delim; /* length of extra delimiter */ /*;AN000;*/
26 char p_extra_delim[30]; /* extra delimiters */ /*;AN000;*/
27 }; /*;AN000;*/
28
29struct p_parmsx /*;AN000;*/
30 { /*;AN000;*/
31 BYTE p_minp; /* Minimum positional number */ /*;AN000;*/
32 BYTE p_maxp; /* Maximum positional number */ /*;AN000;*/
33 struct p_control_blk *p_control1; /* Address of the 1st CONTROL block */ /*;AN000;*/
34 struct p_control_blk *p_control2; /* Address of the 2nd CONTROL block */ /*;AN000;*/
35 struct p_control_blk *p_control3; /* Address of the 3nd CONTROL block */ /*;AN000;*/
36 struct p_control_blk *p_control4; /* Address of the 4th CONTROL block */ /*;AN000;*/
37 struct p_control_blk *p_control5; /* Address of the 3nd CONTROL block */ /*;AN000;*/
38 struct p_control_blk *p_control6; /* Address of the 4th CONTROL block */ /*;AN000;*/
39 BYTE p_maxs; /*;AN000;*/
40 struct p_control_blk *p_switch; /*;AN000;*/
41 BYTE p_maxk; /*;AN000;*/
42 struct p_control_blk *p_keyword1; /*;AN000;*/
43 struct p_control_blk *p_keyword2; /*;AN000;*/
44 struct p_control_blk *p_keyword3; /*;AN000;*/
45 }; /*;AN000;*/
46
47struct p_control_blk /*;AN000;*/
48 { /*;AN000;*/
49 WORD p_match_flag; /* Controls type matched */ /*;AN000;*/
50 WORD p_function_flag; /* Function should be taken */ /*;AN000;*/
51 WORD p_result_buf; /* Result buffer address */ /*;AN000;*/
52 WORD p_value_list; /* Value list address */ /*;AN000;*/
53 BYTE p_nid; /* # of keyword/SW synonyms */ /*;AN000;*/
54 char p_keyorsw[20]; /* keyword or sw */ /*;AN000;*/
55 }; /*;AN000;*/
56
57/* Match_Flags */ /*;AN000;*/
58#define p_num_val 0x8000 /* Numeric Value */ /*;AN000;*/
59#define p_snum_val 0x4000 /* Signed numeric value */ /*;AN000;*/
60#define p_simple_s 0x2000 /* Simple string */ /*;AN000;*/
61#define p_date_s 0x1000 /* Date string */ /*;AN000;*/
62#define p_time_s 0x0800 /* Time string */ /*;AN000;*/
63#define p_cmpx_s 0x0400 /* Complex string */ /*;AN000;*/
64#define p_file_spc 0x0200 /* File Spec */ /*;AN000;*/
65#define p_drv_only 0x0100 /* Drive Only */ /*;AN000;*/
66#define p_qu_string 0x0080 /* Quoted string */ /*;AN000;*/
67#define p_ig_colon 0x0010 /* Ignore colon at end in match */ /*;AN000;*/
68#define p_repeat 0x0002 /* Repeat allowed */ /*;AN000;*/
69#define p_optional 0x0001 /* Optional */ /*;AN000;*/
70
71/*----------------------------------------------------------------------+
72| |
73| Function flags |
74| |
75+----------------------------------------------------------------------*/
76
77#define p_cap_file 0x0001 /* CAP result by file table */ /*;AN000;*/
78#define p_cap_char 0x0002 /* CAP result by character table */ /*;AN000;*/
79#define p_rm_colon 0x0010 /* Remove ":" at the end */ /*;AN000;*/
80
81#define p_nval_none 0 /* no value list ID */ /*;AN000;*/
82#define p_nval_range 1 /* range list ID */ /*;AN000;*/
83#define p_nval_value 2 /* value list ID */ /*;AN000;*/
84#define p_nval_string 3 /* string list ID */ /*;AN000;*/
85#define p_len_range 9 /* Length of a range choice(two DD plus one DB) */ /*;AN000;*/
86#define p_len_value 5 /* Length of a value choice(one DD plus one DB) */ /*;AN000;*/
87#define p_len_string 3 /* Length of a string choice(one DW plus one DB) */ /*;AN000;*/
88
89/*----------------------------------------------------------------------+
90| |
91| Result block structure |
92| |
93+----------------------------------------------------------------------*/
94
95struct p_result_blk /*;AN000;*/
96 { /*;AN000;*/
97 BYTE p_type; /* Type returned */ /*;AN000;*/
98 BYTE p_item_tag; /* Matched item tag */ /*;AN000;*/
99 WORD p_synonym_ptr; /* pointer to Synonym list returned */ /*;AN000;*/
100 WORD p_result_buff[2]; /* result value */ /*;AN000;*/
101 }; /*;AN000;*/
102
103/*----------------------------------------------------------------------+
104| |
105| type |
106| |
107+----------------------------------------------------------------------*/
108
109#define p_eol 0 /* End of line */ /*;AN000;*/
110#define p_number 1 /* Number */ /*;AN000;*/
111#define p_list_idx 2 /* List Index */ /*;AN000;*/
112#define p_string 3 /* String */ /*;AN000;*/
113#define p_complex 4 /* Complex */ /*;AN000;*/
114#define p_file_spec 5 /* File Spec */ /*;AN000;*/
115#define p_drive 6 /* Drive */ /*;AN000;*/
116#define p_date_f 7 /* Date */ /*;AN000;*/
117#define p_time_f 8 /* Time */ /*;AN000;*/
118#define p_quoted_string 9 /* Quoted String */ /*;AN000;*/
119
120#define p_no_tag 0x0FF /* No ITEM_TAG found */ /*;AN000;*/
121
122/*----------------------------------------------------------------------+
123| |
124| following return code will be returned in the AX register. |
125| |
126+----------------------------------------------------------------------*/
127
128#define p_no_error 0 /* No error */ /*;AN000;*/
129#define p_too_many 1 /* Too many operands */ /*;AN000;*/
130#define p_op_missing 2 /* Required operand missing */ /*;AN000;*/
131#define p_not_in_sw 3 /* Not in switch list provided */ /*;AN000;*/
132#define p_not_in_key 4 /* Not in keyword list provided */ /*;AN000;*/
133#define p_out_of_range 6 /* Out of range specified */ /*;AN000;*/
134#define p_not_in_val 7 /* Not in value list provided */ /*;AN000;*/
135#define p_not_in_str 8 /* Not in string list provided */ /*;AN000;*/
136#define p_syntax 9 /* Syntax error */ /*;AN000;*/
137#define p_rc_eol 0x0ffff /* End of command line */ /*;AN000;*/
138
139/*----------------------------------------------------------------------+
140| |
141| String Value List Block Structure |
142| |
143+----------------------------------------------------------------------*/
144
145struct ps_valist_blk /*;AN000;*/
146 { /*;AN000;*/
147 BYTE ps_val; /* Value type */ /*;AN000;*/
148 BYTE ps_nrng; /* Number of ranges */ /*;AN000;*/
149 BYTE ps_nnval; /* Number of numbers */ /*;AN000;*/
150 BYTE ps_nstrval; /* Number of strings */ /*;AN000;*/
151 BYTE ps_item_tag1; /* Matched item tag */ /*;AN000;*/
152 WORD ps_strings1; /* Address of strings */ /*;AN000;*/
153 BYTE ps_item_tag2; /* Matched item tag */ /*;AN000;*/
154 WORD ps_strings2; /* Address of strings */ /*;AN000;*/
155 BYTE ps_item_tag3; /* Matched item tag */ /*;AN000;*/
156 WORD ps_strings3; /* Address of strings */ /*;AN000;*/
157 BYTE ps_item_tag4; /* Matched item tag */ /*;AN000;*/
158 WORD ps_strings4; /* Address of strings */ /*;AN000;*/
159 BYTE ps_item_tag5; /* Matched item tag */ /*;AN000;*/
160 WORD ps_strings5; /* Address of strings */ /*;AN000;*/
161 BYTE ps_item_tag6; /* Matched item tag */ /*;AN000;*/
162 WORD ps_strings6; /* Address of strings */ /*;AN000;*/
163 BYTE ps_item_tag7; /* Matched item tag */ /*;AN000;*/
164 WORD ps_strings7; /* Address of strings */ /*;AN000;*/
165 BYTE ps_item_tag8; /* Matched item tag */ /*;AN000;*/
166 WORD ps_strings8; /* Address of strings */ /*;AN000;*/
167 BYTE ps_item_tag9; /* Matched item tag */ /*;AN000;*/
168 WORD ps_strings9; /* Address of strings */ /*;AN000;*/
169 BYTE ps_item_tag10; /* Matched item tag */ /*;AN000;*/
170 WORD ps_strings10; /* Address of strings */ /*;AN000;*/
171 BYTE ps_item_tag11; /* Matched item tag */ /*;AN000;*/
172 WORD ps_strings11; /* Address of strings */ /*;AN000;*/
173 BYTE ps_item_tag12; /* Matched item tag */ /*;AN000;*/
174 WORD ps_strings12; /* Address of strings */ /*;AN000;*/
175 BYTE ps_item_tag13; /* Matched item tag */ /*;AN000;*/
176 WORD ps_strings13; /* Address of strings */ /*;AN000;*/
177 BYTE ps_item_tag14; /* Matched item tag */ /*;AN000;*/
178 WORD ps_strings14; /* Address of strings */ /*;AN000;*/
179 BYTE ps_item_tag15; /* Matched item tag */ /*;AN000;*/
180 WORD ps_strings15; /* Address of strings */ /*;AN000;*/
181 BYTE ps_item_tag16; /* Matched item tag */ /*;AN000;*/
182 WORD ps_strings16; /* Address of strings */ /*;AN000;*/
183 BYTE ps_item_tag17; /* Matched item tag */ /*;AN000;*/
184 WORD ps_strings17; /* Address of strings */ /*;AN000;*/
185 }; /*;AN000;*/
HIC SVNT DRACONES