summaryrefslogtreecommitdiff
path: root/v4.0/src/INC/REDIRSYM.INC
diff options
context:
space:
mode:
Diffstat (limited to 'v4.0/src/INC/REDIRSYM.INC')
-rw-r--r--v4.0/src/INC/REDIRSYM.INC174
1 files changed, 174 insertions, 0 deletions
diff --git a/v4.0/src/INC/REDIRSYM.INC b/v4.0/src/INC/REDIRSYM.INC
new file mode 100644
index 0000000..88bf209
--- /dev/null
+++ b/v4.0/src/INC/REDIRSYM.INC
@@ -0,0 +1,174 @@
1; - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
2; Redirector MACROS
3; - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
4
5EDW MACRO name
6 extrn name:near
7 DW OFFSET RG:name
8ENDM
9
10; - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
11
12CHECK_DIALECT MACRO name
13
14 IF2 ;AN000; If not defined yet,
15 IFNDEF CHECKDIALECT ;AN000; THEN Extrn
16 Extrn CHECKDIALECT&name:NEAR ;AN000;
17 ENDIF ;AN000;
18 ENDIF ;AN000;
19 CALL CHECKDIALECT&name ;AN000; Call the appropriate routine
20
21ENDM
22
23; - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
24
25CallREDIRSub MACRO name,fn,save,restore ;AN000;
26 IF2 ;AN000; If not defined yet,
27 IFNDEF REDIRSub&fn ;AN000; THEN Extrn
28 Extrn REDIRSub&fn:NEAR ;AN000;
29 ENDIF ;AN000;
30 ENDIF ;AN000;
31 IFNB <save> ;AN000; If not blank
32 SaveReg <save> ;AN000; Save the regs
33 ENDIF ;AN000;
34 CALL REDIRSub&fn ;AN000; Call the appropriate routine
35 IFNB <restore> ;AN000; If not blank
36 RestoreReg <restore> ;AN000; Save the regs
37 ENDIF ;AN000;
38ENDM ;AN000;
39
40; - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
41; Redirector structures
42; - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
43
44 INCLUDE IFSSYM.INC ;AN000;
45 INCLUDE ERROR.INC ;AN000;
46 INCLUDE FILEMODE.INC ;AN000;
47
48;; CD_FSDA STRUCTURE
49
50 CD_FSDA_OFF EQU WORD PTR CD_FSDA ;AN000;
51 CD_FSDA_SEG EQU WORD PTR CD_FSDA+2 ;AN000;
52 CD_FSDA_FLAGS EQU WORD PTR CD_FSDA+4 ;AN000;
53
54;; DFL_FSDA STRUCTURE
55
56 DF_FSDA_OFF EQU WORD PTR DFL_FSDA ;AN000;
57 DF_FSDA_SEG EQU WORD PTR DFL_FSDA+2 ;AN000;
58 DF_FSDA_FLAGS EQU WORD PTR DFL_FSDA+4 ;AN000;
59
60;; SFF_FSDA STRUCTURE
61
62 SFF_FSDA_OFF EQU WORD PTR SFF_FSDA ;AN000;
63 SFF_FSDA_SEG EQU WORD PTR SFF_FSDA+2 ;AN000;
64 SFF_FSDA_FLAGS EQU WORD PTR SFF_FSDA+4 ;AN000;
65
66;; IFS Structure fixes
67
68 ifsr_fcn_def EXECAPI ;AN000;
69 ifsr_api_def OPENFILE ;AN000;
70IFSR_OPENNAME@ = IFSR_NAME@ ;AN000;
71 ifsr_api_def SEARCHFILE ;AN000;
72IFSR_SRCHNAME@ = IFSR_NAME@ ;AN000;
73 ifsr_api_def MKDIR ;AN000;
74IFSR_DIRNAME@ = IFSR_NAME@ ;AN000;
75 ifsr_api_def DELFILE ;AN000;
76IFSR_DELNAME@ = IFSR_NAME@ ;AN000;
77 ifsr_api_def FILEATTR ;AN000;
78IFSR_ATTRNAME@ = IFSR_NAME@ ;AN000;
79
80; - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
81; Redirector Equates
82; - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
83
84Get_Interrupt_Vector EQU 35H ;AN000;
85Set_Interrupt_Vector EQU 25H ;AN000;
86Deallocate_memory EQU 49H ;AN000;
87
88GET_SYS_CONFIG EQU 0C000H ;AN000; INT 15H to get configuration
89CONFIG_STRUC STRUC ;AN001;
90 LENGTH DW ? ;AN001;
91 MODEL_BYTE DB ? ;AN001;
92CONFIG_STRUC ENDS ;AN001;
93
94LOWEST_386_MODEL EQU 0F8H ;AN001;
95
96INCOR_DOS EQU 1 ;AN000;
97ALREADY_INST EQU 2 ;AN000;
98NOT_INST EQU 3 ;AN000;
99NET_NOT_STARTED EQU 4 ;AN000;
100INSUFF_MEM EQU 5 ;AN000;
101BAD_PARM EQU 10 ;AN000;
102INSUFFICENT_MEM EQU 76 ;AN001; Extended Error
103
104ONE_REPLACE EQU 1 ;AN000;
105SINGLE_COUNT EQU 1 ;AN000;
106TESTDIALECT = 0 ;AN001;
107
108REDIR_INSTALLED EQU -1 ;AN000;
109REDIR_SYS_INSTALL EQU 0BF80H ;AN000; REDIR.SYS 2FH Function number
110REDIR_EXE_INSTALL EQU 0BF00H ;AN000; REDIR.EXE 2FH Function number
111
112FASSIGN_ON EQU -1 ;AN000;
113FASSIGN_OFF EQU 0 ;AN000;
114FPRINT_ON EQU -1 ;AN000;
115FPRINT_OFF EQU 0 ;AN000;
116
117EXT_ERR_72 EQU 72 ;AN000;
118PSP_ENVIRO_SEG EQU 002CH ;AN000; Offset into the PSP of the Enviroment Segment
119
120PrnIO EQU 17H ; Int vector for Printer IO
121PrntScr EQU 05H ; Int vector for Print Screen
122PrnRdrMark EQU 2 ; Mark for port addr
123
124VER12 EQU 00000010b ;AN001;
125VER13 EQU 00000100b ;AN001;
126
127FIRST_TIME EQU 1 ;AN001;
128SECOND_TIME EQU 2 ;AN001;
129
130SHIFT_BY_7 EQU 7 ;AN001;
131
132HI_BIT_SHARING_MASK EQU 1111111101111111b ;AN001; Turns off Hi bit in nibble
133
134
135;; ###############################################################
136;; MISC.INC
137;; ###############################################################
138
139; NETFILE
140
141attr_read_only = 00000001b
142
143; NETINIT
144
145IFSR_INVALID_CMD = -1 ;AN000;
146
147; NETUTIL
148
149MACRO_4 = 4
150DATE_TIME = 0
151
152
153; NETHAND
154
155LOCK_ALL_OPERS = 0
156POS_LEN_PTR_SIZE = 8 ;AN001; 8 bytes for position/length
157
158FIND_BUF STRUC
159
160find_buf_drive DB ? ; drive of search
161find_buf_name DB 11 DUP (?) ; formatted name
162find_buf_sattr DB ? ; attribute of search
163find_buf_LastEnt DW ? ; LastEnt
164find_buf_DirStart DW ? ; DirStart
165find_buf_NetID DB 4 DUP (?) ; Reserved for NET
166find_buf_attr DB ? ; attribute found
167find_buf_time DW ? ; time
168find_buf_date DW ? ; date
169find_buf_size_l DW ? ; low(size)
170find_buf_size_h DW ? ; high(size)
171find_buf_pname DB 13 DUP (?) ; packed name
172
173FIND_BUF ENDS
174
HIC SVNT DRACONES