| 1 | /* $Id: DEVHELP.H,v 1.1.1.1 2003/07/02 13:56:58 eleph Exp $ */ | 
|---|
| 2 | /* | 
|---|
| 3 | * OS/2 device driver APIs (DevHelp) | 
|---|
| 4 | * | 
|---|
| 5 | * (C) 2000-2002 InnoTek Systemberatung GmbH | 
|---|
| 6 | * (C) 2000-2001 Sander van Leeuwen (sandervl@xs4all.nl) | 
|---|
| 7 | * | 
|---|
| 8 | * This program is free software; you can redistribute it and/or | 
|---|
| 9 | * modify it under the terms of the GNU General Public License as | 
|---|
| 10 | * published by the Free Software Foundation; either version 2 of | 
|---|
| 11 | * the License, or (at your option) any later version. | 
|---|
| 12 | * | 
|---|
| 13 | * This program is distributed in the hope that it will be useful, | 
|---|
| 14 | * but WITHOUT ANY WARRANTY; without even the implied warranty of | 
|---|
| 15 | * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the | 
|---|
| 16 | * GNU General Public License for more details. | 
|---|
| 17 | * | 
|---|
| 18 | * You should have received a copy of the GNU General Public | 
|---|
| 19 | * License along with this program; if not, write to the Free | 
|---|
| 20 | * Software Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, | 
|---|
| 21 | * USA. | 
|---|
| 22 | * | 
|---|
| 23 | */ | 
|---|
| 24 |  | 
|---|
| 25 |  | 
|---|
| 26 |  | 
|---|
| 27 | // DevHelp.h | 
|---|
| 28 | // | 
|---|
| 29 | // Watcom C++ callable entry points to the OS/2 DevHlp interface. | 
|---|
| 30 | // | 
|---|
| 31 | // All of the DevHlp functions in this library are prefaced with the string | 
|---|
| 32 | // "Dev" rather than "DevHlp_" which is used by the IBM DDK libraries.  The | 
|---|
| 33 | // names were made incompatible so that calls to the IBM DevHlp routines | 
|---|
| 34 | // are not confused with calls to these routines (which may have different | 
|---|
| 35 | // calling signatures).  If you need the IBM calling signatures, just use | 
|---|
| 36 | // some inline functions which call the Dev* functions. | 
|---|
| 37 | // | 
|---|
| 38 | // Also, the ordering of words in multi-word names has been changed so that | 
|---|
| 39 | // the object of an operation is the first word, and the operation name is | 
|---|
| 40 | // the second word.  For example, "DevHlp_AllocPhys" has been renamed to | 
|---|
| 41 | // "DevPhysAlloc". | 
|---|
| 42 | // | 
|---|
| 43 | // This DevHlp library does not include certain categories of DevHlps that | 
|---|
| 44 | // are available in the IBM DDK.  In particular, ABIOS specific functions | 
|---|
| 45 | // (function codes 29h and 34h to 37h), monitors (function codes 31h to | 
|---|
| 46 | // 35h), and some virtual memory functions (function codes 55h to 5Ah and | 
|---|
| 47 | // 66h) are not (yet) supported.  Also, functions which are no longer | 
|---|
| 48 | // meaningful under OS/2 2.1, such as UnPhysToVirt and SetRomVector are not | 
|---|
| 49 | // included either.  However, some undocumented or only partially | 
|---|
| 50 | // documented DevHlps such as the RAS tracing facility (DevSysTrace, | 
|---|
| 51 | // function code 28h) are included in this library. | 
|---|
| 52 | // | 
|---|
| 53 | // History: | 
|---|
| 54 | // | 
|---|
| 55 | // Sep 30, 94  David Bollo    Initial version | 
|---|
| 56 |  | 
|---|
| 57 | // Prevent multiple inclusion | 
|---|
| 58 | #if !defined(DevHelp_h) | 
|---|
| 59 | #define DevHelp_h 1 | 
|---|
| 60 |  | 
|---|
| 61 | #if !defined(__WATCOMC__) || !defined(__cplusplus) | 
|---|
| 62 | //#error Watcom C++ must be used for the inline DevHlp interface. | 
|---|
| 63 | #endif | 
|---|
| 64 |  | 
|---|
| 65 |  | 
|---|
| 66 | #include "devtype.h" | 
|---|
| 67 | #include <stacktoflat.h> | 
|---|
| 68 |  | 
|---|
| 69 |  | 
|---|
| 70 | // Calling conventions for device driver functions | 
|---|
| 71 | // | 
|---|
| 72 | // | 
|---|
| 73 |  | 
|---|
| 74 | // Strategy call calling convention | 
|---|
| 75 | #pragma aux STRATEGY parm [fs ebx]; | 
|---|
| 76 |  | 
|---|
| 77 | #pragma aux VDD __far loadds parm [ax] modify [bx cx dx si di]; | 
|---|
| 78 |  | 
|---|
| 79 | // Dynamic API calling convention | 
|---|
| 80 | #pragma aux DYNAMIC __far loadds parm [si] value [ax]; | 
|---|
| 81 |  | 
|---|
| 82 | // Interface to the OS/2 Ring 0 Device Helper functions | 
|---|
| 83 | // | 
|---|
| 84 | // | 
|---|
| 85 |  | 
|---|
| 86 | extern void DevHelp(); | 
|---|
| 87 | #pragma aux DevHelp "DevHlp" | 
|---|
| 88 |  | 
|---|
| 89 | extern void DevHelp_ModifiedDS(); | 
|---|
| 90 | #pragma aux DevHelp_ModifiedDS "DevHlp_ModifiedDS" | 
|---|
| 91 |  | 
|---|
| 92 | VOID DevCli                   // Disable interrupts | 
|---|
| 93 | ( | 
|---|
| 94 | );                          // Returns: Nothing | 
|---|
| 95 |  | 
|---|
| 96 | #pragma aux DevCli =          \ | 
|---|
| 97 | "cli"; | 
|---|
| 98 |  | 
|---|
| 99 | VOID DevSti                   // Enable interrupts | 
|---|
| 100 | ( | 
|---|
| 101 | );                          // Returns: Nothing | 
|---|
| 102 |  | 
|---|
| 103 | #pragma aux DevSti =          \ | 
|---|
| 104 | "sti"; | 
|---|
| 105 |  | 
|---|
| 106 | DWORD DevPushfCli(); | 
|---|
| 107 | #pragma aux DevPushfCli =       \ | 
|---|
| 108 | "pushfd"                      \ | 
|---|
| 109 | "cli"                         \ | 
|---|
| 110 | "pop eax"                     \ | 
|---|
| 111 | value [eax]; | 
|---|
| 112 |  | 
|---|
| 113 | VOID DevPopf(DWORD cpuflags); | 
|---|
| 114 | #pragma aux DevPopf =           \ | 
|---|
| 115 | "push eax"                    \ | 
|---|
| 116 | "popfd"                       \ | 
|---|
| 117 | parm [eax]; | 
|---|
| 118 |  | 
|---|
| 119 | WORD16 DevBlock               // Block the current thread | 
|---|
| 120 | ( | 
|---|
| 121 | WORD32 Id,                  // Id to be used by DevRun call | 
|---|
| 122 | WORD32 WaitMilliSec,        // Milliseconds to wait for (-1 = forever) | 
|---|
| 123 | BYTE InterruptableFlag      // 0 if block is interruptable, else 1 | 
|---|
| 124 | );                          // Returns: 0 = Ran, 1 = Timeout, 2 = Ctrl+C | 
|---|
| 125 |  | 
|---|
| 126 | #pragma aux DevBlock =        \ | 
|---|
| 127 | "mov bx, ax"                \ | 
|---|
| 128 | "shr eax,16"                \ | 
|---|
| 129 | "mov cx, di"                \ | 
|---|
| 130 | "shr edi,16"                \ | 
|---|
| 131 | "mov dl,04h"                \ | 
|---|
| 132 | "call DevHelp"              \ | 
|---|
| 133 | "setnz al"                  \ | 
|---|
| 134 | "setc bl"                   \ | 
|---|
| 135 | "inc al"                    \ | 
|---|
| 136 | "neg bl"                    \ | 
|---|
| 137 | "and al,bl"                 \ | 
|---|
| 138 | "xor ah,ah"                 \ | 
|---|
| 139 | modify [edx ebx ecx]        \ | 
|---|
| 140 | parm [eax] [edi] [dh]       \ | 
|---|
| 141 | value [ax]; | 
|---|
| 142 |  | 
|---|
| 143 |  | 
|---|
| 144 |  | 
|---|
| 145 | WORD16 DevRun                 // Run a blocked thread | 
|---|
| 146 | ( | 
|---|
| 147 | WORD32 Id                   // Id used in DevBlock call | 
|---|
| 148 | );                          // Returns: Count of awakened threads | 
|---|
| 149 |  | 
|---|
| 150 | #pragma aux DevRun =          \ | 
|---|
| 151 | "mov bx, ax"                \ | 
|---|
| 152 | "shr eax, 16"               \ | 
|---|
| 153 | "mov dl,05h"                \ | 
|---|
| 154 | "call DevHelp"              \ | 
|---|
| 155 | modify [edx ebx]            \ | 
|---|
| 156 | parm [eax]                  \ | 
|---|
| 157 | value [ax]; | 
|---|
| 158 |  | 
|---|
| 159 | WORD16 DevSegLock             // Lock a segment down in memory | 
|---|
| 160 | ( | 
|---|
| 161 | SEL Selector,               // Selector of memory to lock down | 
|---|
| 162 | WORD16 Type,                // Type (0 = short, 1 = long, 3 = long & hi, | 
|---|
| 163 | //       4 = short & verify) | 
|---|
| 164 | WORD16 NoWaitFlag,          // 0 to wait for lock or 1 to return immediately | 
|---|
| 165 | HLOCK *Handle               // Storage for segment lock handle | 
|---|
| 166 | );                          // Returns: 0 = success, 1 = error | 
|---|
| 167 |  | 
|---|
| 168 | #pragma aux DevSegLock =      \ | 
|---|
| 169 | "push edx"                  \ | 
|---|
| 170 | "mov bh,cl"                 \ | 
|---|
| 171 | "mov dl,13h"                \ | 
|---|
| 172 | "call DevHelp"              \ | 
|---|
| 173 | "setc cl"                   \ | 
|---|
| 174 | "xor ch,ch"                 \ | 
|---|
| 175 | "pop edx"                   \ | 
|---|
| 176 | "mov [edx],bx"              \ | 
|---|
| 177 | "mov [edx+2],ax"            \ | 
|---|
| 178 | parm [ax] [cx] [bx] [edx]   \ | 
|---|
| 179 | modify [eax ebx]            \ | 
|---|
| 180 | value [cx]; | 
|---|
| 181 |  | 
|---|
| 182 |  | 
|---|
| 183 |  | 
|---|
| 184 | WORD16 DevSegUnlock           // Unlock a segment locked by DevSegLock | 
|---|
| 185 | ( | 
|---|
| 186 | HLOCK Handle                // Handle of locked segment | 
|---|
| 187 | );                          // Returns: 0 = success, other = error code | 
|---|
| 188 |  | 
|---|
| 189 | #pragma aux DevSegUnlock =    \ | 
|---|
| 190 | "mov  bx, ax"               \ | 
|---|
| 191 | "shr eax,16"                \ | 
|---|
| 192 | "mov dl,14h"                \ | 
|---|
| 193 | "call DevHelp"              \ | 
|---|
| 194 | "setc dl"                   \ | 
|---|
| 195 | "xor dh,dh"                 \ | 
|---|
| 196 | "neg dx"                    \ | 
|---|
| 197 | "and ax,dx"                 \ | 
|---|
| 198 | modify [edx ebx]            \ | 
|---|
| 199 | parm [eax]                  \ | 
|---|
| 200 | value [ax]; | 
|---|
| 201 |  | 
|---|
| 202 | #define VMDHL_NOBLOCK           0x0001 | 
|---|
| 203 | #define VMDHL_CONTIGUOUS        0x0002 | 
|---|
| 204 | #define VMDHL_16M               0x0004 | 
|---|
| 205 | #define VMDHL_WRITE             0x0008 | 
|---|
| 206 | #define VMDHL_LONG              0x0010 | 
|---|
| 207 | #define VMDHL_VERIFY            0x0020 | 
|---|
| 208 |  | 
|---|
| 209 | int DevVMLock | 
|---|
| 210 | ( | 
|---|
| 211 | unsigned long flags, | 
|---|
| 212 | unsigned long lin, | 
|---|
| 213 | unsigned long length, | 
|---|
| 214 | LINEAR        pPageList, | 
|---|
| 215 | LINEAR        pLockHandle, | 
|---|
| 216 | LINEAR        pPageListCount | 
|---|
| 217 | );                          // Returns: 0 = success, 1 = error | 
|---|
| 218 |  | 
|---|
| 219 | #pragma aux DevVMLock =       \ | 
|---|
| 220 | "push edx"                  \ | 
|---|
| 221 | "mov  dl,55h"               \ | 
|---|
| 222 | "call DevHelp"              \ | 
|---|
| 223 | "setc dl"                   \ | 
|---|
| 224 | "pop  ebx"                  \ | 
|---|
| 225 | "mov  dword ptr [ebx], eax" \ | 
|---|
| 226 | "xor  eax, eax"             \ | 
|---|
| 227 | "mov  al, dl"               \ | 
|---|
| 228 | parm [eax] [ebx] [ecx] [edi] [esi] [edx] \ | 
|---|
| 229 | modify [edx ebx] \ | 
|---|
| 230 | value [eax]; | 
|---|
| 231 |  | 
|---|
| 232 | #define VMDHA_16M               0x0001 | 
|---|
| 233 | #define VMDHA_FIXED             0x0002 | 
|---|
| 234 | #define VMDHA_SWAP              0x0004 | 
|---|
| 235 | #define VMDHA_CONTIG            0x0008 | 
|---|
| 236 | #define VMDHA_PHYS              0x0010 | 
|---|
| 237 | #define VMDHA_PROCESS           0x0020 | 
|---|
| 238 | #define VMDHA_SGSCONT           0x0040 | 
|---|
| 239 | #define VMDHA_RESERVE           0x0100 | 
|---|
| 240 | #define VMDHA_USEHIGHMEM        0x0800 | 
|---|
| 241 |  | 
|---|
| 242 | int DevVMAlloc(ULONG flags, ULONG size, LINEAR physaddr, LINEAR addr); | 
|---|
| 243 | #pragma aux DevVMAlloc = \ | 
|---|
| 244 | "mov  dl,57h" \ | 
|---|
| 245 | "call DevHelp"               \ | 
|---|
| 246 | "setc dl"                    \ | 
|---|
| 247 | "mov  dword ptr [esi], eax"  \ | 
|---|
| 248 | "xor  eax, eax"              \ | 
|---|
| 249 | "mov  al, dl"                \ | 
|---|
| 250 | parm [eax] [ecx] [edi] [esi] \ | 
|---|
| 251 | modify [edx] \ | 
|---|
| 252 | value [eax]; | 
|---|
| 253 |  | 
|---|
| 254 | ULONG DevVMFree(LINEAR LinearAddr); | 
|---|
| 255 | #pragma aux DevVMFree = \ | 
|---|
| 256 | "mov  dl,58h" \ | 
|---|
| 257 | "call DevHelp"               \ | 
|---|
| 258 | "setc dl"                    \ | 
|---|
| 259 | "xor  eax, eax"              \ | 
|---|
| 260 | "mov  al, dl"                \ | 
|---|
| 261 | parm [eax] \ | 
|---|
| 262 | modify [edx] \ | 
|---|
| 263 | value [eax]; | 
|---|
| 264 |  | 
|---|
| 265 | #define VMDHGP_WRITE            0x0001 | 
|---|
| 266 | #define VMDHGP_SELMAP           0x0002 | 
|---|
| 267 | #define VMDHGP_SGSCONTROL       0x0004 | 
|---|
| 268 | #define VMDHGP_4MEG             0x0008 | 
|---|
| 269 |  | 
|---|
| 270 | ULONG DevVMGlobalToProcess(ULONG Flags, LINEAR LinearAddr, ULONG Length, | 
|---|
| 271 | LINEAR ProcessLinearAddr); | 
|---|
| 272 | #pragma aux DevVMGlobalToProcess = \ | 
|---|
| 273 | "mov  dl,5Ah" \ | 
|---|
| 274 | "call DevHelp"               \ | 
|---|
| 275 | "setc dl"                    \ | 
|---|
| 276 | "mov  dword ptr [edi], eax"  \ | 
|---|
| 277 | "xor  eax, eax"              \ | 
|---|
| 278 | "mov  al, dl"                \ | 
|---|
| 279 | parm [eax] [ebx] [ecx] [edi]\ | 
|---|
| 280 | modify [edx] \ | 
|---|
| 281 | value [eax]; | 
|---|
| 282 |  | 
|---|
| 283 | #define VMDHPG_READONLY         0x0000 | 
|---|
| 284 | #define VMDHPG_WRITE            0x0001 | 
|---|
| 285 |  | 
|---|
| 286 | ULONG DevVMProcessToGlobal(ULONG Flags, LINEAR LinearAddr, ULONG Length, | 
|---|
| 287 | LINEAR GlobalLinearAddr); | 
|---|
| 288 | #pragma aux DevVMProcessToGlobal = \ | 
|---|
| 289 | "mov  dl,59h"                \ | 
|---|
| 290 | "call DevHelp"               \ | 
|---|
| 291 | "setc dl"                    \ | 
|---|
| 292 | "mov  dword ptr [edi], eax"  \ | 
|---|
| 293 | "xor  eax, eax"              \ | 
|---|
| 294 | "mov  al, dl"                \ | 
|---|
| 295 | parm [eax] [ebx] [ecx] [edi] \ | 
|---|
| 296 | modify [edx]                 \ | 
|---|
| 297 | value [eax]; | 
|---|
| 298 |  | 
|---|
| 299 | #define VMDHS_DECOMMIT          0x0001 | 
|---|
| 300 | #define VMDHS_RESIDENT          0x0002 | 
|---|
| 301 | #define VMDHS_SWAP              0x0004 | 
|---|
| 302 |  | 
|---|
| 303 | ULONG DevVMSetMem(ULONG Flags, LINEAR LinearAddr, ULONG Size); | 
|---|
| 304 | #pragma aux DevHelp_VMSetMem = \ | 
|---|
| 305 | "mov  dl,66h"                \ | 
|---|
| 306 | "call DevHelp"               \ | 
|---|
| 307 | parm [eax] [ebx] [ecx]       \ | 
|---|
| 308 | modify [edx]                 \ | 
|---|
| 309 | value [eax]; | 
|---|
| 310 |  | 
|---|
| 311 | ULONG DevVMUnLock(LINEAR pLockHandle); | 
|---|
| 312 | #pragma aux DevVMUnLock = \ | 
|---|
| 313 | "mov  dl,56h"      \ | 
|---|
| 314 | "call DevHelp"     \ | 
|---|
| 315 | "setc dl"          \ | 
|---|
| 316 | "xor  eax, eax"    \ | 
|---|
| 317 | "mov  al, dl"      \ | 
|---|
| 318 | parm [esi]         \ | 
|---|
| 319 | modify [edx]       \ | 
|---|
| 320 | value [eax]; | 
|---|
| 321 |  | 
|---|
| 322 |  | 
|---|
| 323 | WORD16 DevPhysToVirt          // Convert a physical address to a 16:16 address | 
|---|
| 324 | ( | 
|---|
| 325 | PHYSICAL PhysAddr,          // Physical address to convert | 
|---|
| 326 | WORD16 Length,              // Length of virtual segment | 
|---|
| 327 | VIRTUAL FAR *VirtAddr           // Storage for virtual address | 
|---|
| 328 | );                          // Returns: 0 = success, other = error code | 
|---|
| 329 |  | 
|---|
| 330 | #pragma aux DevPhysToVirt =   \ | 
|---|
| 331 | "xchg ax,bx"                \ | 
|---|
| 332 | "mov dx,0115h"              \ | 
|---|
| 333 | "call DevHelp"              \ | 
|---|
| 334 | "setc dl"                   \ | 
|---|
| 335 | "xor dh,dh"                 \ | 
|---|
| 336 | "neg dx"                    \ | 
|---|
| 337 | "mov fs:[esi],di"           \ | 
|---|
| 338 | "mov fs:[esi+2],es"         \ | 
|---|
| 339 | "and ax,dx"                 \ | 
|---|
| 340 | modify [dx es di]           \ | 
|---|
| 341 | parm [bx ax] [cx] [fs esi]  \ | 
|---|
| 342 | value [ax]; | 
|---|
| 343 |  | 
|---|
| 344 |  | 
|---|
| 345 |  | 
|---|
| 346 | WORD16 DevVirtToPhys            // Convert a locked 16:16 address to physical | 
|---|
| 347 | ( | 
|---|
| 348 | VIRTUAL VirtAddr,           // Virtual address to convert (must be locked) | 
|---|
| 349 | PHYSICAL FAR *PhysAddr      // Storage for physical address | 
|---|
| 350 | );                          // Returns: Nothing | 
|---|
| 351 |  | 
|---|
| 352 | #pragma aux DevVirtToPhys =   \ | 
|---|
| 353 | "push ecx"                  \ | 
|---|
| 354 | "push ds"                   \ | 
|---|
| 355 | "mov si, ax"                \ | 
|---|
| 356 | "shr eax, 16"               \ | 
|---|
| 357 | "mov ds, ax"                \ | 
|---|
| 358 | "mov dl,16h"                \ | 
|---|
| 359 | "call DevHelp_ModifiedDS"   \ | 
|---|
| 360 | "setc dl"                   \ | 
|---|
| 361 | "xor dh,dh"                 \ | 
|---|
| 362 | "pop ds"                    \ | 
|---|
| 363 | "pop ecx"                   \ | 
|---|
| 364 | "mov fs:[ecx],bx"           \ | 
|---|
| 365 | "mov fs:[ecx+2],ax"         \ | 
|---|
| 366 | "mov ax,dx"                 \ | 
|---|
| 367 | modify [edx ebx esi]        \ | 
|---|
| 368 | parm [eax] [fs ecx]         \ | 
|---|
| 369 | value [ax]; | 
|---|
| 370 |  | 
|---|
| 371 |  | 
|---|
| 372 |  | 
|---|
| 373 | WORD16 DevPhysToUVirt         // Convert a physical address to an LDT address | 
|---|
| 374 | ( | 
|---|
| 375 | PHYSICAL PhysAddr,          // Physical address to convert | 
|---|
| 376 | WORD16 Length,              // Length of virtual segment | 
|---|
| 377 | BYTE Type,                  // Type (0 = code, 1 = data, 2 = free, 5 = video) | 
|---|
| 378 | BYTE Tag,                   // Tag (only with type 5) | 
|---|
| 379 | VIRTUAL FAR *VirtAddr       // Storage for virtual address | 
|---|
| 380 | );                          // Returns: 0 = success, 1 = error | 
|---|
| 381 |  | 
|---|
| 382 | #pragma aux DevPhysToUVirt =  \ | 
|---|
| 383 | "push es"                   \ | 
|---|
| 384 | "push edi"                  \ | 
|---|
| 385 | "mov bx,ax"                 \ | 
|---|
| 386 | "shr eax, 16"               \ | 
|---|
| 387 | "mov dl,17h"                \ | 
|---|
| 388 | "call DevHelp"              \ | 
|---|
| 389 | "setc dl"                   \ | 
|---|
| 390 | "xor dh,dh"                 \ | 
|---|
| 391 | "pop edi"                   \ | 
|---|
| 392 | "mov word ptr fs:[edi], bx"   \ | 
|---|
| 393 | "mov word ptr fs:[edi+2], es" \ | 
|---|
| 394 | "pop es"                    \ | 
|---|
| 395 | modify [ebx eax]            \ | 
|---|
| 396 | parm [eax] [cx] [dh] [si] [fs edi] \ | 
|---|
| 397 | value [dx]; | 
|---|
| 398 |  | 
|---|
| 399 |  | 
|---|
| 400 |  | 
|---|
| 401 | WORD16 DevPhysAlloc           // Allocate a block of physical memory | 
|---|
| 402 | ( | 
|---|
| 403 | WORD32 Size,                // Size of memory to allocate | 
|---|
| 404 | BYTE LoFlag,                // Flag: 0 = above 1 MB, 1 = below 1 MB | 
|---|
| 405 | PHYSICAL FAR *PhysAddr      // Storage for address of memory block | 
|---|
| 406 | );                          // Returns: 0 = success, other = error code | 
|---|
| 407 |  | 
|---|
| 408 | #pragma aux DevPhysAlloc =    \ | 
|---|
| 409 | "mov bx, ax"                \ | 
|---|
| 410 | "shr eax,16"                \ | 
|---|
| 411 | "mov dl,18h"                \ | 
|---|
| 412 | "call DevHelp"              \ | 
|---|
| 413 | "setc dl"                   \ | 
|---|
| 414 | "xor dh,dh"                 \ | 
|---|
| 415 | "neg dx"                    \ | 
|---|
| 416 | "mov fs:[esi],bx"           \ | 
|---|
| 417 | "mov fs:[esi+2],ax"         \ | 
|---|
| 418 | "and ax,dx"                 \ | 
|---|
| 419 | modify [edx ebx]            \ | 
|---|
| 420 | parm [eax] [dh] [fs esi]    \ | 
|---|
| 421 | value [ax]; | 
|---|
| 422 |  | 
|---|
| 423 |  | 
|---|
| 424 |  | 
|---|
| 425 | WORD16 DevPhysFree            // Free a block of physical memory | 
|---|
| 426 | ( | 
|---|
| 427 | PHYSICAL PhysAddr           // Address of memory block to be freed | 
|---|
| 428 | );                          // Returns: 0 = success, 1 = error | 
|---|
| 429 |  | 
|---|
| 430 | #pragma aux DevPhysFree =     \ | 
|---|
| 431 | "xchg ax,bx"                \ | 
|---|
| 432 | "mov dl,19h"                \ | 
|---|
| 433 | "call DevHelp"  \ | 
|---|
| 434 | "setc dl"                   \ | 
|---|
| 435 | "xor dh,dh"                 \ | 
|---|
| 436 | parm [bx ax]                \ | 
|---|
| 437 | value [dx]; | 
|---|
| 438 |  | 
|---|
| 439 |  | 
|---|
| 440 |  | 
|---|
| 441 | WORD16 DevIRQSet              // Register an interrupt handler for an IRQ | 
|---|
| 442 | ( | 
|---|
| 443 | WORD16 Handler,             // Handler function entry-point | 
|---|
| 444 | WORD16 IRQ,                 // IRQ Number to handle | 
|---|
| 445 | BYTE SharableFlag           // Sharable: 1 = sharable, 0 = exclusive | 
|---|
| 446 | );                          // Returns: 0 = success, other = error code | 
|---|
| 447 |  | 
|---|
| 448 | #pragma aux DevIRQSet =       \ | 
|---|
| 449 | "mov dl,1Bh"                \ | 
|---|
| 450 | "call DevHelp"  \ | 
|---|
| 451 | "setc dl"                   \ | 
|---|
| 452 | "xor dh,dh"                 \ | 
|---|
| 453 | "neg dx"                    \ | 
|---|
| 454 | "and ax,dx"                 \ | 
|---|
| 455 | modify [dl]                 \ | 
|---|
| 456 | parm [ax] [bx] [dh]         \ | 
|---|
| 457 | value [ax]; | 
|---|
| 458 |  | 
|---|
| 459 |  | 
|---|
| 460 |  | 
|---|
| 461 | WORD16 DevIRQClear            // Remove a registered IRQ handler | 
|---|
| 462 | ( | 
|---|
| 463 | WORD16 IRQ                  // IRQ Number to release | 
|---|
| 464 | );                          // Returns: 0 = success, 1 = error | 
|---|
| 465 |  | 
|---|
| 466 | #pragma aux DevIRQClear =     \ | 
|---|
| 467 | "mov dl,1Ch"                \ | 
|---|
| 468 | "call DevHelp"  \ | 
|---|
| 469 | "setc dl"                   \ | 
|---|
| 470 | "xor dh,dh"                 \ | 
|---|
| 471 | parm [bx]                   \ | 
|---|
| 472 | value [dx]; | 
|---|
| 473 |  | 
|---|
| 474 | WORD16 DevVerifyAccess        // Verify that the caller has access to memory | 
|---|
| 475 | ( | 
|---|
| 476 | VIRTUAL Address,            // Address of memory to verify | 
|---|
| 477 | WORD16 Length,              // Length of memory to verify | 
|---|
| 478 | BYTE Type                   // Type of access (0 = read, 1 = read/write) | 
|---|
| 479 | );                          // Returns: 0 = success, 1 = error | 
|---|
| 480 |  | 
|---|
| 481 | #pragma aux DevVerifyAccess = \ | 
|---|
| 482 | "mov di, ax"                \ | 
|---|
| 483 | "shr eax, 16"               \ | 
|---|
| 484 | "mov dl,27h"                \ | 
|---|
| 485 | "call DevHelp"              \ | 
|---|
| 486 | "setc dl"                   \ | 
|---|
| 487 | "xor dh,dh"                 \ | 
|---|
| 488 | modify [edx edi]            \ | 
|---|
| 489 | parm [eax] [cx] [dh]        \ | 
|---|
| 490 | value [dx]; | 
|---|
| 491 |  | 
|---|
| 492 |  | 
|---|
| 493 |  | 
|---|
| 494 | WORD16 DevAttachDD             // Attach to another device driver for IDC | 
|---|
| 495 | ( | 
|---|
| 496 | WORD32 DriverName,           // Device driver name (from device header) | 
|---|
| 497 | WORD32 IDCData               // Storage for IDC data | 
|---|
| 498 | );                             // Returns: 0 = success, 1 = error | 
|---|
| 499 |  | 
|---|
| 500 | #pragma aux DevAttachDD =     \ | 
|---|
| 501 | "mov dl,2Ah"                \ | 
|---|
| 502 | "call DevHelp"              \ | 
|---|
| 503 | "setc dl"                   \ | 
|---|
| 504 | "xor dh,dh"                 \ | 
|---|
| 505 | parm [ebx] [edi]            \ | 
|---|
| 506 | value [dx]; | 
|---|
| 507 |  | 
|---|
| 508 | WORD16 DevAllocGDTSel         // Allocate GDT selectors at Init time | 
|---|
| 509 | ( | 
|---|
| 510 | WORD32 SelectorArray,       // Storage for allocated GDT selectors (16:16) | 
|---|
| 511 | WORD16 Count                // Number of GDT selectors to allocate | 
|---|
| 512 | );                          // Returns: 0 = success, other = error code | 
|---|
| 513 |  | 
|---|
| 514 | #pragma aux DevAllocGDTSel =  \ | 
|---|
| 515 | "push es"                   \ | 
|---|
| 516 | "mov eax, edi"              \ | 
|---|
| 517 | "shr eax, 16"               \ | 
|---|
| 518 | "mov es, ax"                \ | 
|---|
| 519 | "mov dl,2Dh"                \ | 
|---|
| 520 | "call DevHelp"              \ | 
|---|
| 521 | "setc dl"                   \ | 
|---|
| 522 | "xor dh,dh"                 \ | 
|---|
| 523 | "neg dx"                    \ | 
|---|
| 524 | "and ax,dx"                 \ | 
|---|
| 525 | "pop es"                    \ | 
|---|
| 526 | modify [edx eax]            \ | 
|---|
| 527 | parm [edi] [cx]             \ | 
|---|
| 528 | value [ax]; | 
|---|
| 529 |  | 
|---|
| 530 |  | 
|---|
| 531 |  | 
|---|
| 532 |  | 
|---|
| 533 | WORD16 DevPhysToGDTSelector   // Convert a 32 bit address to a GDT selector | 
|---|
| 534 | ( | 
|---|
| 535 | PHYSICAL Address,           // 32 bit physical address to convert | 
|---|
| 536 | WORD16 Length,              // Length of fabricated segment | 
|---|
| 537 | SEL Selector                // Selector to refer to 32 bit address | 
|---|
| 538 | );                          // Returns: 0 = success, other = error code | 
|---|
| 539 |  | 
|---|
| 540 | #pragma aux DevPhysToGDTSelector = \ | 
|---|
| 541 | "mov ax, bx"                \ | 
|---|
| 542 | "shr eax,16"                \ | 
|---|
| 543 | "mov dl,2Eh"                \ | 
|---|
| 544 | "call DevHelp"              \ | 
|---|
| 545 | "setc dl"                   \ | 
|---|
| 546 | "xor dh,dh"                 \ | 
|---|
| 547 | "neg dx"                    \ | 
|---|
| 548 | "and ax,dx"                 \ | 
|---|
| 549 | modify [dx bx]              \ | 
|---|
| 550 | parm [eax] [cx] [si]        \ | 
|---|
| 551 | value [ax]; | 
|---|
| 552 |  | 
|---|
| 553 |  | 
|---|
| 554 |  | 
|---|
| 555 |  | 
|---|
| 556 | VOID DevEOI                   // Signal end of interrupt processing to PIC | 
|---|
| 557 | ( | 
|---|
| 558 | WORD16 IRQ                  // IRQ number to end | 
|---|
| 559 | );                          // Returns: Nothing | 
|---|
| 560 |  | 
|---|
| 561 | #pragma aux DevEOI =          \ | 
|---|
| 562 | "mov dl,31h"                \ | 
|---|
| 563 | "call DevHelp"  \ | 
|---|
| 564 | modify [dl]                 \ | 
|---|
| 565 | parm [ax]; | 
|---|
| 566 |  | 
|---|
| 567 |  | 
|---|
| 568 | WORD16 DevRegisterPDD           // Register driver for PDD-VDD communications | 
|---|
| 569 | ( | 
|---|
| 570 | WORD32 Name,                // Device driver name | 
|---|
| 571 | WORD32 EntryPoint           // Entry point for PDD-VDD communications | 
|---|
| 572 | );                          // Returns: 0 = success, 1 = error | 
|---|
| 573 |  | 
|---|
| 574 | #pragma aux DevRegisterPDD =  \ | 
|---|
| 575 | "push ds"                   \ | 
|---|
| 576 | "push es"                   \ | 
|---|
| 577 | "mov si,ax"                 \ | 
|---|
| 578 | "shr eax, 16"               \ | 
|---|
| 579 | "mov ds, ax"                \ | 
|---|
| 580 | "mov di, bx"                \ | 
|---|
| 581 | "shr ebx, 16"               \ | 
|---|
| 582 | "mov es, bx"                \ | 
|---|
| 583 | "mov dl,50h"                \ | 
|---|
| 584 | "call DevHelp"              \ | 
|---|
| 585 | "setc dl"                   \ | 
|---|
| 586 | "xor dh,dh"                 \ | 
|---|
| 587 | "pop es"                    \ | 
|---|
| 588 | "pop ds"                    \ | 
|---|
| 589 | modify [esi edi ebx]        \ | 
|---|
| 590 | parm [eax] [ebx]            \ | 
|---|
| 591 | value [dx]; | 
|---|
| 592 |  | 
|---|
| 593 |  | 
|---|
| 594 |  | 
|---|
| 595 | WORD16 DevBeep                // Generate a beep | 
|---|
| 596 | ( | 
|---|
| 597 | WORD16 Frequency,           // Beep pitch in hz | 
|---|
| 598 | WORD16 Duration             // Beep duration | 
|---|
| 599 | );                          // Returns: 0 = success, other = error code | 
|---|
| 600 |  | 
|---|
| 601 | #pragma aux DevBeep =         \ | 
|---|
| 602 | "mov dl,52h"                \ | 
|---|
| 603 | "call DevHelp"  \ | 
|---|
| 604 | "setc dl"                   \ | 
|---|
| 605 | "xor dh,dh"                 \ | 
|---|
| 606 | "neg dx"                    \ | 
|---|
| 607 | "and ax,dx"                 \ | 
|---|
| 608 | modify [dx]                 \ | 
|---|
| 609 | parm [bx] [cx]              \ | 
|---|
| 610 | value [ax]; | 
|---|
| 611 |  | 
|---|
| 612 |  | 
|---|
| 613 |  | 
|---|
| 614 | WORD16 DevFreeGDTSel          // Free an allocated GDT selector at task time | 
|---|
| 615 | ( | 
|---|
| 616 | SEL Selector                // Selector to free | 
|---|
| 617 | );                          // Returns: 0 = success, other = error code | 
|---|
| 618 |  | 
|---|
| 619 | #pragma aux DevFreeGDTSel =   \ | 
|---|
| 620 | "mov dl,53h"                \ | 
|---|
| 621 | "call DevHelp"  \ | 
|---|
| 622 | "setc dl"                   \ | 
|---|
| 623 | "xor dh,dh"                 \ | 
|---|
| 624 | "neg dx"                    \ | 
|---|
| 625 | "and ax,dx"                 \ | 
|---|
| 626 | modify [dx]                 \ | 
|---|
| 627 | parm [ax]                   \ | 
|---|
| 628 | value [ax]; | 
|---|
| 629 |  | 
|---|
| 630 | #define GDTSEL_R3CODE           0x0000                               /*@V76282*/ | 
|---|
| 631 | #define GDTSEL_R3DATA           0x0001                               /*@V76282*/ | 
|---|
| 632 | #define GDTSEL_R2CODE           0x0003                               /*@V76282*/ | 
|---|
| 633 | #define GDTSEL_R2DATA           0x0004                               /*@V76282*/ | 
|---|
| 634 | #define GDTSEL_R0CODE           0x0005                               /*@V76282*/ | 
|---|
| 635 | #define GDTSEL_R0DATA           0x0006                               /*@V76282*/ | 
|---|
| 636 |  | 
|---|
| 637 | /* GDTSEL_ADDR32 may be OR'd with above defines */                   /*@V76282*/ | 
|---|
| 638 | #define GDTSEL_ADDR32           0x0080                               /*@V76282*/ | 
|---|
| 639 |  | 
|---|
| 640 |  | 
|---|
| 641 | WORD16 DevPhysToGDTSel        // Map a physical address to a GDT selector | 
|---|
| 642 | ( | 
|---|
| 643 | PHYSICAL Address,           // 32 bit physical address to convert | 
|---|
| 644 | WORD32 Length,              // Length of fabricated segment | 
|---|
| 645 | SEL Selector,               // Selector to refer to 32 bit address | 
|---|
| 646 | BYTE Access                 // Descriptor access priviledges | 
|---|
| 647 | );                          // Returns: 0 = success, other = error code | 
|---|
| 648 |  | 
|---|
| 649 | #pragma aux DevPhysToGDTSel = \ | 
|---|
| 650 | "and ecx,0000FFFFh"         \ | 
|---|
| 651 | "mov dl,54h"                \ | 
|---|
| 652 | "call DevHelp"              \ | 
|---|
| 653 | "setc dl"                   \ | 
|---|
| 654 | "xor dh,dh"                 \ | 
|---|
| 655 | "neg dx"                    \ | 
|---|
| 656 | "and ax,dx"                 \ | 
|---|
| 657 | parm [eax] [ecx] [si] [dh]  \ | 
|---|
| 658 | modify [ecx edx]            \ | 
|---|
| 659 | value [ax]; | 
|---|
| 660 |  | 
|---|
| 661 |  | 
|---|
| 662 |  | 
|---|
| 663 | WORD16 DevVirtToLin           // Convert a virtual address to linear | 
|---|
| 664 | ( | 
|---|
| 665 | SEL Selector,               // Selector to convert | 
|---|
| 666 | WORD32 Offset,              // Offset to convert | 
|---|
| 667 | LINEAR FAR *Linear              // Storage for linear address | 
|---|
| 668 | );                          // Returns: 0 = success, other = error code | 
|---|
| 669 |  | 
|---|
| 670 | #pragma aux DevVirtToLin =    \ | 
|---|
| 671 | "mov dl,5Bh"                \ | 
|---|
| 672 | "call DevHelp"              \ | 
|---|
| 673 | "setc dl"                   \ | 
|---|
| 674 | "mov fs:[edi], eax"         \ | 
|---|
| 675 | "xor dh,dh"                 \ | 
|---|
| 676 | "neg dx"                    \ | 
|---|
| 677 | "and ax,dx"                 \ | 
|---|
| 678 | modify [edx]                \ | 
|---|
| 679 | parm [ax] [esi] [fs edi]    \ | 
|---|
| 680 | value [ax]; | 
|---|
| 681 |  | 
|---|
| 682 |  | 
|---|
| 683 | ULONG DevResetEventSem(ULONG hEvent, FARPTR16 pNumPosts); | 
|---|
| 684 | #pragma aux DevResetEventSem = \ | 
|---|
| 685 | "mov  dl,6Ah"      \ | 
|---|
| 686 | "call DevHelp"     \ | 
|---|
| 687 | "setc dl"          \ | 
|---|
| 688 | "xor  eax, eax"    \ | 
|---|
| 689 | "mov  al, dl"      \ | 
|---|
| 690 | parm [eax] [edi]   \ | 
|---|
| 691 | modify [edx]       \ | 
|---|
| 692 | value [eax]; | 
|---|
| 693 |  | 
|---|
| 694 | ULONG DevCloseEventSem(ULONG hEvent); | 
|---|
| 695 | #pragma aux DevCloseEventSem = \ | 
|---|
| 696 | "mov  dl,68h" \ | 
|---|
| 697 | "call DevHelp"     \ | 
|---|
| 698 | "setc dl"          \ | 
|---|
| 699 | "xor  eax, eax"    \ | 
|---|
| 700 | "mov  al, dl"      \ | 
|---|
| 701 | parm [eax]         \ | 
|---|
| 702 | modify [edx]       \ | 
|---|
| 703 | value [eax]; | 
|---|
| 704 |  | 
|---|
| 705 | ULONG DevOpenEventSem(ULONG hEvent); | 
|---|
| 706 | #pragma aux DevOpenEventSem = \ | 
|---|
| 707 | "mov  dl,67h" \ | 
|---|
| 708 | "call DevHelp"     \ | 
|---|
| 709 | "setc dl"          \ | 
|---|
| 710 | "xor  eax, eax"    \ | 
|---|
| 711 | "mov  al, dl"      \ | 
|---|
| 712 | parm [eax]         \ | 
|---|
| 713 | modify [edx]       \ | 
|---|
| 714 | value [eax]; | 
|---|
| 715 |  | 
|---|
| 716 | ULONG DevPostEventSem(ULONG hEvent); | 
|---|
| 717 | #pragma aux DevPostEventSem = \ | 
|---|
| 718 | "mov  dl,69h" \ | 
|---|
| 719 | "call DevHelp"     \ | 
|---|
| 720 | "setc dl"          \ | 
|---|
| 721 | "xor  eax, eax"    \ | 
|---|
| 722 | "mov  al, dl"      \ | 
|---|
| 723 | parm [eax]         \ | 
|---|
| 724 | modify [edx]       \ | 
|---|
| 725 | value [eax]; | 
|---|
| 726 |  | 
|---|
| 727 | ULONG DevFreeCtxHook(ULONG HookHandle); | 
|---|
| 728 | #pragma aux DevFreeCtxHook = \ | 
|---|
| 729 | "mov  dl,64h",     \ | 
|---|
| 730 | "call DevHelp"     \ | 
|---|
| 731 | "setc dl"          \ | 
|---|
| 732 | "xor  eax, eax"    \ | 
|---|
| 733 | "mov  al, dl"      \ | 
|---|
| 734 | parm [eax]         \ | 
|---|
| 735 | modify [edx]       \ | 
|---|
| 736 | value [eax]; | 
|---|
| 737 |  | 
|---|
| 738 | ULONG DevAllocateCtxHook(ULONG HookHandler, LINEAR HookHandle); | 
|---|
| 739 | #pragma aux DevAllocateCtxHook = \ | 
|---|
| 740 | "mov  ebx,-1"      \ | 
|---|
| 741 | "mov  dl,63h"      \ | 
|---|
| 742 | "call DevHelp"     \ | 
|---|
| 743 | "setc dl"          \ | 
|---|
| 744 | "mov  dword ptr [edi], eax" \ | 
|---|
| 745 | "xor  eax, eax"    \ | 
|---|
| 746 | "mov  al, dl"      \ | 
|---|
| 747 | parm [eax] [edi]   \ | 
|---|
| 748 | modify [edx ebx] \ | 
|---|
| 749 | value [eax]; | 
|---|
| 750 |  | 
|---|
| 751 | ULONG DevArmCtxHook(ULONG HookData, ULONG HookHandle); | 
|---|
| 752 | #pragma aux DevArmCtxHook = \ | 
|---|
| 753 | "mov  ecx, -1"     \ | 
|---|
| 754 | "mov  dl,65h",     \ | 
|---|
| 755 | "call DevHelp"     \ | 
|---|
| 756 | "setc dl"          \ | 
|---|
| 757 | "xor  eax, eax"    \ | 
|---|
| 758 | "mov  al, dl"      \ | 
|---|
| 759 | parm [eax] [ebx]   \ | 
|---|
| 760 | modify [edx ecx] \ | 
|---|
| 761 | value [eax]; | 
|---|
| 762 |  | 
|---|
| 763 | typedef struct { | 
|---|
| 764 | DWORD physaddr; | 
|---|
| 765 | DWORD size; | 
|---|
| 766 | } PAGELIST; | 
|---|
| 767 |  | 
|---|
| 768 | ULONG DevPageListToLin(ULONG Size, PAGELIST NEAR *pPageList, LINEAR NEAR *LinearAddr); | 
|---|
| 769 | #pragma aux DevPageListToLin = \ | 
|---|
| 770 | "mov  dl,5Fh" \ | 
|---|
| 771 | "call DevHelp"     \ | 
|---|
| 772 | "setc dl"          \ | 
|---|
| 773 | "mov  [esi], eax"  \ | 
|---|
| 774 | "xor  eax, eax"    \ | 
|---|
| 775 | "mov  al, dl"      \ | 
|---|
| 776 | parm [ecx] [edi] [esi] \ | 
|---|
| 777 | modify [edx]       \ | 
|---|
| 778 | value [eax]; | 
|---|
| 779 |  | 
|---|
| 780 | ULONG DevLinToPageList(LINEAR LinearAddr, ULONG Size, PAGELIST NEAR *pPageList); | 
|---|
| 781 | #pragma aux DevLinToPageList = \ | 
|---|
| 782 | "mov  dl,5Eh" \ | 
|---|
| 783 | "call DevHelp"     \ | 
|---|
| 784 | "setc dl"          \ | 
|---|
| 785 | "xor  eax, eax"    \ | 
|---|
| 786 | "mov  al, dl"      \ | 
|---|
| 787 | parm [eax] [ecx] [edi] \ | 
|---|
| 788 | modify [edx]       \ | 
|---|
| 789 | value [eax]; | 
|---|
| 790 |  | 
|---|
| 791 | ULONG DevHelp_LinToGDTSelector(SEL Selector, LINEAR LinearAddr, ULONG Size); | 
|---|
| 792 | #pragma aux DevHelp_LinToGDTSelector = \ | 
|---|
| 793 | "mov  dl,5Ch" \ | 
|---|
| 794 | "call DevHelp"     \ | 
|---|
| 795 | "setc dl"         \ | 
|---|
| 796 | "xor  eax, eax"    \ | 
|---|
| 797 | "mov  al, dl"      \ | 
|---|
| 798 | value [eax] \ | 
|---|
| 799 | modify [edx]       \ | 
|---|
| 800 | parm [ax] [ebx] [ecx] \ | 
|---|
| 801 |  | 
|---|
| 802 | #define DHGETDOSV_SYSINFOSEG            1 | 
|---|
| 803 | #define DHGETDOSV_LOCINFOSEG            2 | 
|---|
| 804 | #define DHGETDOSV_VECTORSDF             4 | 
|---|
| 805 | #define DHGETDOSV_VECTORREBOOT          5 | 
|---|
| 806 | #define DHGETDOSV_YIELDFLAG             7 | 
|---|
| 807 | #define DHGETDOSV_TCYIELDFLAG           8 | 
|---|
| 808 | #define DHGETDOSV_DOSCODEPAGE           11 | 
|---|
| 809 | #define DHGETDOSV_INTERRUPTLEV          13 | 
|---|
| 810 | #define DHGETDOSV_DEVICECLASSTABLE      14 | 
|---|
| 811 | #define DHGETDOSV_DMQSSELECTOR          15 | 
|---|
| 812 | #define DHGETDOSV_APMINFO               16 | 
|---|
| 813 |  | 
|---|
| 814 | ULONG DevGetDOSVar(ULONG VarNumber, ULONG VarMember, VOID NEAR *KernalVar); | 
|---|
| 815 | #pragma aux DevGetDOSVar = \ | 
|---|
| 816 | "xor  ebx, ebx" \ | 
|---|
| 817 | "mov  dl,24h" \ | 
|---|
| 818 | "call DevHelp"     \ | 
|---|
| 819 | "setc dl"          \ | 
|---|
| 820 | "mov  word ptr [edi],bx" \ | 
|---|
| 821 | "mov  word ptr [edi+2],ax" \ | 
|---|
| 822 | "xor  eax, eax"    \ | 
|---|
| 823 | "mov  al, dl"      \ | 
|---|
| 824 | value [eax] \ | 
|---|
| 825 | parm [eax] [ecx] [edi] \ | 
|---|
| 826 | modify [edx ebx]; | 
|---|
| 827 |  | 
|---|
| 828 | ULONG DevSetTimer(DWORD TimerHandler); | 
|---|
| 829 | #pragma aux DevSetTimer = \ | 
|---|
| 830 | "mov  dl,1Dh" \ | 
|---|
| 831 | "call DevHelp"     \ | 
|---|
| 832 | "setc dl"          \ | 
|---|
| 833 | "xor  eax, eax"    \ | 
|---|
| 834 | "mov  al, dl"      \ | 
|---|
| 835 | value [eax] \ | 
|---|
| 836 | parm [eax] \ | 
|---|
| 837 | modify [eax edx]; | 
|---|
| 838 |  | 
|---|
| 839 | ULONG DevTickCount(DWORD TimerHandler, DWORD TickCount); | 
|---|
| 840 | #pragma aux DevTickCount = \ | 
|---|
| 841 | "mov  dl,33h" \ | 
|---|
| 842 | "call DevHelp"     \ | 
|---|
| 843 | "setc dl"          \ | 
|---|
| 844 | "xor  eax, eax"    \ | 
|---|
| 845 | "mov  al, dl"      \ | 
|---|
| 846 | value [eax] \ | 
|---|
| 847 | parm [eax] [ebx] \ | 
|---|
| 848 | modify [eax edx]; | 
|---|
| 849 |  | 
|---|
| 850 | #endif // DevHelp_h | 
|---|