blob: 44cc8ccc9a97ab085e79df479b54502415a2c389 (
plain) (
blame)
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
|
/* */
/*----------------------------------------------------------------------+
| |
| This file contains the structures and defines that are needed to use |
| the parser from a C program. |
| ** customized for the REPLACE utility ** |
| |
| |
| Date: 5-21-87 |
| |
+----------------------------------------------------------------------*/
struct p_parms
{
struct p_parmsx *p_parmsx_address; /* address of p_parmsx */
unsigned char p_num_extra; /* number of extra stuff */
};
struct p_parmsx
{
unsigned char p_minp; /* Minimum positional number */
unsigned char p_maxp; /* Maximum positional number */
struct p_control_blk *p_control1; /* Address of the 1st CONTROL block */
struct p_control_blk *p_control2; /* Address of the 2nd CONTROL block */
unsigned char p_maxs; /* Maximun switches */
struct p_switch_blk *p_switch; /* Address of the SWITCH block */
unsigned char p_maxk; /* Maximum keywords */
};
struct p_control_blk
{
unsigned int p_match_flag; /* Controls type matched */
unsigned int p_function_flag; /* Function should be taken */
unsigned int p_result_buf; /* Result buffer address */
unsigned int p_value_list; /* Value list address */
unsigned char p_nid; /* # of keyword/SW synonyms */
};
struct p_switch_blk
{
unsigned int sp_match_flag; /* Controls type matched */
unsigned int sp_function_flag; /* Function should be taken */
unsigned int sp_result_buf; /* Result buffer address */
unsigned int sp_value_list; /* Value list address */
unsigned char sp_nid; /* # of keyword/SW synonyms */
unsigned char sp_keyorsw1[3]; /* keyword or sw */
unsigned char sp_keyorsw2[3]; /* keyword or sw */
unsigned char sp_keyorsw3[3]; /* keyword or sw */
unsigned char sp_keyorsw4[3]; /* keyword or sw */
unsigned char sp_keyorsw5[3]; /* keyword or sw */
unsigned char sp_keyorsw6[3]; /* keyword or sw */
};
/* Match_Flags */
#define P_Num_Val 0x8000 /* Numeric Value */
#define P_SNum_Val 0x4000 /* Signed numeric value */
#define P_Simple_S 0x2000 /* Simple string */
#define P_Date_S 0x1000 /* Date string */
#define P_Time_S 0x0800 /* Time string */
#define P_Cmpx_S 0x0400 /* Complex string */
#define P_File_Spc 0x0200 /* File Spec */
#define P_Drv_Only 0x0100 /* Drive Only */
#define P_Qu_String 0x0080 /* Quoted string */
#define P_Ig_Colon 0x0010 /* Ignore colon at end in match */
#define P_Repeat 0x0002 /* Repeat allowed */
#define P_Optional 0x0001 /* Optional */
/*----------------------------------------------------------------------+
| |
| Function flags |
| |
+----------------------------------------------------------------------*/
#define P_CAP_File 0x0001 /* CAP result by file table */
#define P_CAP_Char 0x0002 /* CAP result by character table */
#define P_Rm_Colon 0x0010 /* Remove ":" at the end */
#define P_nval_None 0 /* no value list ID */
#define P_nval_Range 1 /* range list ID */
#define P_nval_Value 2 /* value list ID */
#define P_nval_String 3 /* string list ID */
#define P_Len_Range 9 /* Length of a range choice(two DD plus one DB) */
#define P_Len_Value 5 /* Length of a value choice(one DD plus one DB) */
#define P_Len_String 3 /* Length of a string choice(one DW plus one DB) */
/*----------------------------------------------------------------------+
| |
| Result block structure |
| |
+----------------------------------------------------------------------*/
struct p_result_blk
{
unsigned char P_Type; /* Type returned */
unsigned char P_Item_Tag; /* Matched item tag */
unsigned int P_SYNONYM_Ptr; /* pointer to Synonym list returned */
unsigned int p_result_buff[2]; /* result value */
};
struct p_fresult_blk
{
unsigned char fP_Type; /* Type returned */
unsigned char fP_Item_Tag; /* Matched item tag */
unsigned int fP_SYNONYM_Ptr; /* pointer to Synonym list returned */
char far * fp_result_buff; /* result value */
};
/*----------------------------------------------------------------------+
| |
| type |
| |
+----------------------------------------------------------------------*/
#define P_EOL 0 /* End of line */
#define P_Number 1 /* Number */
#define P_List_Idx 2 /* List Index */
#define P_String 3 /* String */
#define P_Complex 4 /* Complex */
#define P_File_Spec 5 /* File Spec */
#define P_Drive 6 /* Drive */
#define P_Date_F 7 /* Date */
#define P_Time_F 8 /* Time */
#define P_Quoted_String 9 /* Quoted String */
#define P_No_Tag 0x0FF /* No ITEM_TAG found */
/*----------------------------------------------------------------------+
| |
| Value list structure |
| |
+----------------------------------------------------------------------*/
struct noval
{
unsigned char null;
};
/*----------------------------------------------------------------------+
| |
| following return code will be returned in the AX register. |
| |
+----------------------------------------------------------------------*/
#define P_No_Error 0 /* No error */
#define P_Too_Many 1 /* Too many operands */
#define P_Op_Missing 2 /* Required operand missing */
#define P_Not_In_SW 3 /* Not in switch list provided */
#define P_Not_In_Key 4 /* Not in keyword list provided */
#define P_Out_Of_Range 6 /* Out of range specified */
#define P_Not_In_Val 7 /* Not in value list provided */
#define P_Not_In_Str 8 /* Not in string list provided */
#define P_Syntax 9 /* Syntax error */
#define P_RC_EOL 0x0ffff /* End of command line */
|
