v4.0/src/INC/REDIRSYM.INC

   1 ; - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
   2 ;  Redirector MACROS
   3 ; - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
   4
   5 EDW     MACRO   name
   6         extrn   name:near
   7         DW      OFFSET  RG:name
   8 ENDM
   9
  10 ; - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
  11
  12 CHECK_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
  21 ENDM
  22
  23 ; - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
  24
  25 CallREDIRSub 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;
  38 ENDM                                            ;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;
  70 IFSR_OPENNAME@  =  IFSR_NAME@            ;AN000;
  71    ifsr_api_def    SEARCHFILE            ;AN000;
  72 IFSR_SRCHNAME@  =  IFSR_NAME@            ;AN000;
  73    ifsr_api_def    MKDIR                 ;AN000;
  74 IFSR_DIRNAME@   =  IFSR_NAME@            ;AN000;
  75    ifsr_api_def    DELFILE               ;AN000;
  76 IFSR_DELNAME@   =  IFSR_NAME@            ;AN000;
  77    ifsr_api_def    FILEATTR              ;AN000;
  78 IFSR_ATTRNAME@  =  IFSR_NAME@            ;AN000;
  79
  80 ; - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
  81 ;  Redirector Equates
  82 ; - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
  83
  84 Get_Interrupt_Vector EQU     35H      ;AN000;
  85 Set_Interrupt_Vector EQU     25H      ;AN000;
  86 Deallocate_memory    EQU     49H      ;AN000;
  87
  88 GET_SYS_CONFIG       EQU     0C000H   ;AN000; INT 15H to get configuration
  89 CONFIG_STRUC    STRUC                 ;AN001;
  90    LENGTH       DW   ?                ;AN001;
  91    MODEL_BYTE   DB   ?                ;AN001;
  92 CONFIG_STRUC    ENDS                  ;AN001;
  93
  94 LOWEST_386_MODEL     EQU     0F8H     ;AN001;
  95
  96 INCOR_DOS            EQU     1        ;AN000;
  97 ALREADY_INST         EQU     2        ;AN000;
  98 NOT_INST             EQU     3        ;AN000;
  99 NET_NOT_STARTED      EQU     4        ;AN000;
 100 INSUFF_MEM           EQU     5        ;AN000;
 101 BAD_PARM             EQU     10       ;AN000;
 102 INSUFFICENT_MEM      EQU     76       ;AN001; Extended Error
 103
 104 ONE_REPLACE          EQU     1        ;AN000;
 105 SINGLE_COUNT         EQU     1        ;AN000;
 106 TESTDIALECT          =       0        ;AN001;
 107
 108 REDIR_INSTALLED      EQU     -1       ;AN000;
 109 REDIR_SYS_INSTALL    EQU     0BF80H   ;AN000; REDIR.SYS 2FH Function number
 110 REDIR_EXE_INSTALL    EQU     0BF00H   ;AN000; REDIR.EXE 2FH Function number
 111
 112 FASSIGN_ON           EQU     -1       ;AN000;
 113 FASSIGN_OFF          EQU     0        ;AN000;
 114 FPRINT_ON            EQU     -1       ;AN000;
 115 FPRINT_OFF           EQU     0        ;AN000;
 116
 117 EXT_ERR_72           EQU     72       ;AN000;
 118 PSP_ENVIRO_SEG       EQU     002CH    ;AN000; Offset into the PSP of the Enviroment Segment
 119
 120 PrnIO                EQU     17H      ; Int vector for Printer IO
 121 PrntScr              EQU     05H      ; Int vector for Print Screen
 122 PrnRdrMark           EQU     2        ; Mark for port addr
 123
 124 VER12                EQU     00000010b ;AN001;
 125 VER13                EQU     00000100b ;AN001;
 126
 127 FIRST_TIME           EQU     1           ;AN001;
 128 SECOND_TIME          EQU     2           ;AN001;
 129
 130 SHIFT_BY_7           EQU     7           ;AN001;
 131
 132 HI_BIT_SHARING_MASK  EQU     1111111101111111b ;AN001; Turns off Hi bit in nibble
 133
 134
 135 ;; ###############################################################
 136 ;;              MISC.INC
 137 ;; ###############################################################
 138
 139 ; NETFILE
 140
 141 attr_read_only         = 00000001b
 142
 143 ; NETINIT
 144
 145 IFSR_INVALID_CMD        =   -1                                                        ;AN000;
 146
 147 ; NETUTIL
 148
 149 MACRO_4         =       4
 150 DATE_TIME       =       0
 151
 152
 153 ; NETHAND
 154
 155 LOCK_ALL_OPERS     =       0
 156 POS_LEN_PTR_SIZE   =       8              ;AN001; 8 bytes for position/length
 157
 158 FIND_BUF    STRUC
 159
 160 find_buf_drive      DB  ?               ; drive of search
 161 find_buf_name       DB  11 DUP (?)      ; formatted name
 162 find_buf_sattr      DB  ?               ; attribute of search
 163 find_buf_LastEnt    DW  ?               ; LastEnt
 164 find_buf_DirStart   DW  ?               ; DirStart
 165 find_buf_NetID      DB  4 DUP (?)       ; Reserved for NET
 166 find_buf_attr       DB  ?               ; attribute found
 167 find_buf_time       DW  ?               ; time
 168 find_buf_date       DW  ?               ; date
 169 find_buf_size_l     DW  ?               ; low(size)
 170 find_buf_size_h     DW  ?               ; high(size)
 171 find_buf_pname      DB  13 DUP (?)      ; packed name
 172
 173 FIND_BUF    ENDS
 174