开通博客赚积分
发布资源赚积分
分类

源码开发语言/平台
当前位置：首页 > 源码/资料 > 操作系统开发 > 查看源码
vmm.inc
资源名称：DOS系统的源代码.rar　[点击查看]
上传用户：xiaoan1112
上传日期：2013-04-11
资源大小：19621k
文件大小：60k
源码类别：

操作系统开发

开发平台：

Visual C++

vmm.inc：源码内容
  1. ;******************************************************************************
  2. ;
  3. ;   (C) Copyright MICROSOFT Corp., 1988-1990
  4. ;
  5. ;   Title: VMM.INC - Include file for Virtual Machine Manager
  6. ;
  7. ;   Version: 1.00
  8. ;
  9. ;   Date: 05-May-1988
  10. ;
  11. ;   Author: RAL
  12. ;
  13. ;------------------------------------------------------------------------------
  14. ;
  15. ;   Change log:
  16. ;
  17. ;      DATE REV     DESCRIPTION
  18. ;   ----------- --- -----------------------------------------------------------
  19. ;   05-May-1988 RAL Original
  20. ;
  21. ;==============================================================================
  24. ; NON Windows/386 Virtual Device sources can include this file to get some
  25. ; useful equates by declaring the symbol "Not_VxD"  If this symbol is defined,
  26. ; then everything that has to do with the specifics of the 32 bit environment
  27. ; for virtual devices is removed.  Useful equates include:  device ID's, pushad
  28. ; structure, BeginDoc/EndDoc/BeginMsg/EndMsg equates, page table equates, etc.
  32. False EQU 0
  33. True EQU NOT False
  35. ;
  36. ;   These null macros are recognized by a utility program that produces
  37. ;   documentation files.
  38. ;
  39. BeginDoc EQU <>
  40. EndDoc EQU <>
  42. BeginMsg EQU <>
  43. EndMsg EQU <>
  46. BeginDoc
  47. ;******************************************************************************
  48. ;
  49. ; EQUATES FOR REQUIRED DEVICES
  50. ;
  51. ;   Device ID formulation note:
  52. ;
  53. ; Device ID's are a combination of OEM # and device # in the form:
  54. ;
  55. ; xOOOOOOOOOODDDDD
  56. ;
  57. ; The high bit of the device ID is reserved for future use.  The next
  58. ; 10 bits are the OEM # which is assigned by Microsoft.  The last 5 bits
  59. ; are the device #.  This allows each OEM to create 32 unique devices.
  60. ; If an OEM is creating a replacement for a standard device, then it
  61. ; should re-use the standard ID listed below.  Microsoft reserves the
  62. ; first 16 OEM #'s (0 thru 0Fh)
  63. ;
  64. ;==============================================================================
  66. Undefined_Device_ID EQU 00000h
  67. VMM_Device_ID EQU 00001h ; Used for dynalink table
  68. Debug_Device_ID  EQU 00002h
  69. VPICD_Device_ID  EQU 00003h
  70. VDMAD_Device_ID  EQU 00004h
  71. VTD_Device_ID EQU 00005h
  72. V86MMGR_Device_ID EQU 00006h
  73. PageSwap_Device_ID EQU 00007h
  74. Parity_Device_ID EQU 00008h
  75. Reboot_Device_ID EQU 00009h
  76. VDD_Device_ID EQU 0000Ah
  77. VSD_Device_ID EQU 0000Bh
  78. VMD_Device_ID EQU 0000Ch
  79. VKD_Device_ID EQU 0000Dh
  80. VCD_Device_ID EQU 0000Eh
  81. VPD_Device_ID EQU 0000Fh
  82. VHD_Device_ID EQU 00010h
  83. VMCPD_Device_ID  EQU 00011h
  84. EBIOS_Device_ID  EQU 00012h
  85. BIOSXlat_Device_ID EQU 00013h
  86. VNETBIOS_Device_ID EQU 00014h
  87. DOSMGR_Device_ID EQU 00015h
  88. WINLOAD_Device_ID EQU 00016h
  89. SHELL_Device_ID  EQU 00017h
  90. VMPoll_Device_ID EQU 00018h
  91. VPROD_Device_ID  EQU 00019h
  92. DOSNET_Device_ID EQU 0001Ah
  93. VFD_Device_ID EQU 0001Bh
  94. VDD2_Device_ID EQU 0001Ch ; Secondary display adapter
  95. WINDEBUG_Device_ID EQU 0001Dh
  96. TSRLoad_Device_ID EQU 0001Eh ; TSR instance utility ID
  98. ;
  99. ;   Initialization order equates.  Devices are initialized in order from
  100. ;   LOWEST to HIGHEST. If 2 or more devices have the same initialization
  101. ;   order value, then they are initialized in order of occurance, so a
  102. ;   specific order is not guaranteed.  Holes have been left to allow maximum
  103. ;   flexibility in ordering devices.
  104. ;
  106. VMM_Init_Order EQU 000000000h
  107. Debug_Init_Order EQU 004000000h
  108. VPROD_Init_Order EQU 008000000h
  109. VPICD_Init_Order EQU 00C000000h
  110. VTD_Init_Order EQU 014000000h
  111. PageSwap_Init_Order EQU 01C000000h
  112. Parity_Init_Order EQU 020000000h
  113. Reboot_Init_Order EQU 024000000h
  114. EBIOS_Init_Order EQU 026000000h
  115. VDD_Init_Order EQU 028000000h
  116. VSD_Init_Order EQU 02C000000h
  117. VCD_Init_Order EQU 030000000h
  118. VMD_Init_Order EQU 034000000h
  119. VKD_Init_Order EQU 038000000h
  120. VPD_Init_Order EQU 03C000000h
  121. VHD_Init_Order EQU 040000000h
  122. VFD_Init_Order EQU 044000000h
  123. VMCPD_Init_Order EQU 048000000h
  124. BIOSXlat_Init_Order EQU 050000000h
  125. VNETBIOS_Init_Order EQU 054000000h
  126. DOSMGR_Init_Order EQU 058000000h
  127. DOSNET_Init_Order EQU 05C000000h
  128. WINLOAD_Init_Order EQU 060000000h
  129. VMPoll_Init_Order EQU 064000000h
  131. Undefined_Init_Order EQU 080000000h
  133. WINDEBUG_Init_Order EQU 081000000h
  134. VDMAD_Init_Order EQU 090000000h
  135. V86MMGR_Init_Order EQU 0A0000000h
  136. SHELL_Init_Order EQU 0B0000000h
  137. EndDoc
  139. ;******************************************************************************
  140. ;
  141. ;   Macro to cause a delay in between I/O accesses to the same device.
  142. ;
  143. ;------------------------------------------------------------------------------
  145. IO_Delay    macro
  146. jmp $+2
  147. ENDM
  149. Pushad_Struc STRUC
  150. Pushad_EDI dd ? ; Client's EDI
  151. Pushad_ESI dd ? ; Client's ESI
  152. Pushad_EBP dd ? ; Client's EBP
  153. Pushad_ESP dd ? ; ESP at pushall
  154. Pushad_EBX dd ? ; Client's EBX
  155. Pushad_EDX dd ? ; Client's EDX
  156. Pushad_ECX dd ? ; Client's ECX
  157. Pushad_EAX dd ? ; Client's EAX
  158. Pushad_Struc ENDS
  162. IFNDEF Not_VxD
  164. ??_CUR_CODE_SEG = 0
  167. ??_CODE  = 1
  168. ??_ICODE = 2
  169. ??_LCODE = 3
  170. ??_RCODE = 4
  172. ?_CODE equ <(??_CUR_CODE_SEG MOD 8) - ??_CODE>
  173. ?_ICODE equ <(??_CUR_CODE_SEG MOD 8) - ??_ICODE>
  174. ?_LCODE equ <(??_CUR_CODE_SEG MOD 8) - ??_LCODE>
  175. ?_RCODE equ <(??_CUR_CODE_SEG MOD 8) - ??_RCODE>
  177. ;
  178. ;  SEGMENT definitions and order
  179. ;
  181. ;* 32 Bit locked code
  182. _LTEXT SEGMENT DWORD USE32 PUBLIC 'CODE'
  183. _LTEXT ENDS
  185. ;* 32 Bit code
  186. _TEXT SEGMENT DWORD USE32 PUBLIC 'PCODE'
  187. _TEXT ENDS
  189. ;* 32 Bit initialization code
  190. _ITEXT SEGMENT DWORD USE32 PUBLIC 'ICODE'
  191. _ITEXT ENDS
  193. ;* Contains 32 Bit locked data
  194. _LDATA SEGMENT DWORD PUBLIC 'CODE'
  195. _LDATA ENDS
  197. ;* Contains 32 Bit data
  198. _DATA SEGMENT DWORD PUBLIC 'PCODE'
  199. _DATA ENDS
  201. ;* Contains 32 Bit initialization data
  202. _IDATA SEGMENT DWORD PUBLIC 'ICODE'
  203. _IDATA ENDS
  205. ;* Real Mode initialization code/data for devices
  206. _RCODE SEGMENT WORD USE16 PUBLIC 'RCODE'
  207. _RCODE ENDS
  210. _LGROUP GROUP _LTEXT, _LDATA
  211. _PGROUP GROUP _TEXT, _DATA
  212. _IGROUP GROUP _ITEXT, _IDATA
  214. ASSUME CS:FLAT, DS:FLAT, ES:FLAT, SS:FLAT
  217. OFFSET32 EQU <OFFSET FLAT:>
  220. BeginDoc
  221. ;==============================================================================
  222. ; The following macros are used in defining the routines
  223. ;   in a VxD which are going to be registered with VMM as callable entry
  224. ;   points. Once registered, the entry points can be called by any other
  225. ;   devices via the "VxDCall" macro, defined below. In the comments below,
  226. ;   replace "VxD" with the appropriate device name.
  227. ;
  228. ;*******
  229. ;   In the VxD.INC file, put the following lines, replacing <function_name>
  230. ; with an appropriate name describing the function of the routine.
  231. ;
  232. ; Begin_Service_Table VxD[,<segname>]
  233. ; VxD_Service <function_name>[,<local segname>]
  234. ; VxD_Service <function_name>[,<local segname>]
  235. ; . . .
  236. ; VxD_Service <function_name>[,<local segname>]
  237. ; End_Service_Table   VxD[,<segname>]
  238. ;
  239. ;   Note that <segname> is an optional argument and, if specified, the
  240. ; table is put in the segment defined by the macro "yyy_Data_Seg",
  241. ; where yyy=segname. Otherwise the segment is defined by the
  242. ; "VxD_Data_Seg" macro, defined below.
  243. ;   Note that <local segname> is an optional argument and, if specified,
  244. ; the procedure's segment is defined by the macro "zzz_Code_Seg",
  245. ; where zzz=segname. Otherwise the segment is defined by the
  246. ; "VxD_Code_Seg" macro, defined below.
  247. ;
  248. ;*******
  249. ; One VxD module should have the following in order to define the entry points:
  250. ;Create_VxD_Service_Table = 1 ; Only in module where table is
  251. ; INCLUDE     VxD.INC ; Include the table definition
  252. ;
  253. ;*******
  254. ; All modules that want to call the services defined in the table should include
  255. ;   VxD.INC, but not define the label "Create_VxD_Service_Table". This
  256. ;   will define the service names to be used with the VxDCall macro.
  257. ;
  258. EndDoc
  260. Begin_Service_Table MACRO Device_Name, Def_Segment
  261. IFB <Def_Segment>
  262. BST2 Device_Name, VxD
  263. ELSE
  264. BST2 Device_Name, Def_Segment
  265. ENDIF
  266. ENDM
  269. BST2 MACRO Device_Name, Def_Segment
  271. Num_&Device_Name&_Services = 0
  273. IFDEF Create_&Device_Name&_Service_Table
  274. Def_Segment&_LOCKED_DATA_SEG
  275. Device_Name&_Service_Table LABEL DWORD
  277. Device_Name&_Service MACRO Procedure, Local_Seg
  278.     PUBLIC $&&Procedure
  279.     IF1
  280.     $&&Procedure LABEL DWORD
  281.     ENDIF
  282.     IFDIFI <Local_Seg>, <LOCAL>
  283. IFNB <Local_Seg>
  284. Local_Seg&&_SEG
  285. ELSE
  286. Def_Segment&_CODE_SEG
  287. ENDIF
  288. EXTRN @&&Procedure:NEAR
  289. IFNB <Local_Seg>
  290. Local_Seg&&_ENDS
  291. ELSE
  292. Def_Segment&_CODE_ENDS
  293. ENDIF
  294.     ENDIF
  295. dd OFFSET32 @&&Procedure
  296. Procedure = (Device_Name&_Device_ID SHL 16) + Num_&Device_Name&_Services
  297. Num_&Device_Name&_Services = Num_&Device_Name&_Services + 1
  298. ENDM
  300. ELSE
  302. Device_Name&_Service MACRO Procedure
  303. Procedure = (Device_Name&_Device_ID SHL 16) + Num_&Device_Name&_Services
  304. Num_&Device_Name&_Services = Num_&Device_Name&_Services + 1
  305. ENDM
  307. ENDIF
  309. ENDM
  311. ;------------------------------------------------------------------------------
  313. End_Service_Table MACRO Device_Name, Def_Segment
  315. PURGE Device_Name&_Service
  317. IFDEF Create_&Device_Name&_Service_Table
  318. IFB <Def_Segment>
  319. VxD_LOCKED_DATA_ENDS
  320. ELSE
  321. Def_Segment&_LOCKED_DATA_ENDS
  322. ENDIF
  323. ENDIF
  325. ENDM
  328. ;******************************************************************************
  329. ;
  330. ;   Dword_Align -- Aligns code to dword boundry by inserting nops
  331. ;
  332. ;------------------------------------------------------------------------------
  334. Dword_Align MACRO Seg_Name
  335. LOCAL segn
  336. IFNB <Seg_Name>
  337. segn equ Seg_Name
  338. ELSE
  339. IFE ?_CODE
  340. segn equ <_TEXT>
  341. ELSE
  342. IFE ?_ICODE
  343. segn equ <_ITEXT>
  344. ELSE
  345. IFE ?_LCODE
  346. segn equ <_LTEXT>
  347. ELSE
  348. .err Dword_Align not supported
  349. ENDIF
  350. ENDIF
  351. ENDIF
  352. ENDIF
  353. IF (($-OFFSET segn:0) MOD 4)
  354. db 4 - (($-OFFSET segn:0) MOD 4) DUP (90h)
  355. ENDIF
  356.     ENDM
  359. BeginDoc
  360. ;******************************************************************************
  361. ;
  362. ;   Fatal_Error
  363. ;
  364. ;   DESCRIPTION:
  365. ; This macro is used to crash Windows/386 when an unrecoverable error
  366. ; is detected.  If Msg_Ptr is ommitted then no error message will be
  367. ; displayed, otherwise Msg_Ptr is the address
  368. ; when the
  369. ;
  370. ;   PARAMETERS:
  371. ; Msg_Ptr (OPTIONAL) - Points to an ASCIIZ string to display.
  372. ;
  373. ;   EXIT:
  374. ; To DOS (hopefully).  This macro never returns.
  375. ;
  376. ;==============================================================================
  377. EndDoc
  379. Fatal_Error MACRO Msg_Ptr, Exit_Flags
  380. pushad
  381. IFB <Msg_Ptr>
  382. xor esi, esi
  383. ELSE
  384. mov esi, Msg_Ptr
  385. IFB <Exit_Flags>
  386. xor eax, eax
  387. ELSE
  388. mov eax, Exit_Flags
  389. ENDIF
  390. ENDIF
  391. VMMcall Fatal_Error_Handler
  392. ENDM
  394. EF_Hang_On_Exit     EQU     1h
  397. ;******************************************************************************
  398. ;==============================================================================
  399. ;------------------------------------------------------------------------------
  401. BeginDoc
  402. ;******************************************************************************
  403. ;   The following are control block offsets of items that can be of interest
  404. ; to VxDs.
  405. ;*******
  406. ; VM status indicates globally interesting VM states
  407. CB_VM_Status EQU DWORD PTR 00h
  409. VMStat_Exclusive EQU 000000000000000000001b ; VM is exclusive mode
  410. VMStat_Exclusive_Bit EQU 0
  411. VMStat_Background EQU 000000000000000000010b ; VM runs in background
  412. VMStat_Background_Bit EQU 1
  413. VMStat_Creating  EQU 000000000000000000100b ; In process of creating
  414. VMStat_Creating_Bit EQU 2
  415. VMStat_Suspended EQU 000000000000000001000b ; VM not scheduled
  416. VMStat_Suspended_Bit EQU 3
  417. VMStat_Not_Executeable EQU 000000000000000010000b ; VM partially destroyed
  418. VMStat_Not_Executeable_Bit  EQU 4
  419. VMStat_PM_Exec EQU 000000000000000100000b ; Currently in PM app
  420. VMStat_PM_Exec_Bit EQU 5
  421. VMStat_PM_App EQU 000000000000001000000b ; PM app present in VM
  422. VMStat_PM_App_Bit EQU 6
  423. VMStat_PM_Use32  EQU 000000000000010000000b ; PM app is 32-bit
  424. VMStat_PM_Use32_Bit EQU 7
  425. VMStat_VxD_Exec  EQU 000000000000100000000b ; Call from VxD
  426. VMStat_VxD_Exec_Bit EQU 8
  427. VMStat_High_Pri_Back EQU 000000000001000000000b ; High pri background
  428. VMStat_High_Pri_Back_Bit    EQU 9
  429. VMStat_Blocked EQU 000000000010000000000b ; Blocked on semaphore
  430. VMStat_Blocked_Bit EQU 0Ah
  431. VMStat_Awakening EQU 000000000100000000000b ; Woke up after blocked
  432. VMStat_Awakening_Bit EQU 0Bh
  433. VMStat_PageableV86 EQU 000000001000000000000b ; part of V86 is pageable (PM app)
  434. VMStat_PageableV86Bit EQU 0Ch
  435. VMStat_V86IntsLocked EQU 000000010000000000000b ; Rest of V86 is locked
  436. VMStat_V86IntsLockedBit EQU 0Dh ;  regardless of pager type
  437. VMStat_TS_Sched  EQU 000000100000000000000b ; Scheduled by time-slicer
  438. VMStat_TS_Sched_Bit EQU 0Eh
  439. VMStat_Idle EQU 000001000000000000000b ; VM has released time
  440. VMStat_Idle_Bit  EQU 0Fh ; slice
  442. VMStat_Use32_Mask EQU VMStat_PM_Use32 OR VMStat_VxD_Exec
  445. ;*******
  446. ; Add this value to a V86 linear address to get address of VM's memory in
  447. ; the VMM linear address space
  448. CB_High_Linear EQU DWORD PTR 04h
  450. ;*******
  451. CB_Client_Pointer EQU DWORD PTR 08h
  453. CB_VMID  EQU DWORD PTR 0Ch
  455. ;
  456. ;   Equates for protected mode application control blocks
  457. ;
  458. PMCB_Flags EQU DWORD PTR 00h
  459. PMCB_Parent EQU DWORD PTR 04h
  460. EndDoc
  462. ;******************************************************************************
  463. ;     V M M   S E R V I C E S
  464. ;******************************************************************************
  466. Begin_Service_Table VMM, VMM
  468. VMM_Service Get_VMM_Version, LOCAL ; MUST REMAIN SERVICE 0!
  470. VMM_Service Get_Cur_VM_Handle
  471. VMM_Service Test_Cur_VM_Handle
  472. VMM_Service Get_Sys_VM_Handle
  473. VMM_Service Test_Sys_VM_Handle
  474. VMM_Service Validate_VM_Handle
  476. VMM_Service Get_VMM_Reenter_Count, LOCAL
  477. VMM_Service Begin_Reentrant_Execution, LOCAL
  478. VMM_Service End_Reentrant_Execution, LOCAL
  480. VMM_Service Install_V86_Break_Point
  481. VMM_Service Remove_V86_Break_Point
  482. VMM_Service Allocate_V86_Call_Back
  483. VMM_Service Allocate_PM_Call_Back
  485. VMM_Service Call_When_VM_Returns
  488. VMM_Service Schedule_Global_Event
  489. VMM_Service Schedule_VM_Event
  490. VMM_Service Call_Global_Event
  491. VMM_Service Call_VM_Event
  492. VMM_Service Cancel_Global_Event
  493. VMM_Service Cancel_VM_Event
  494. VMM_Service Call_Priority_VM_Event
  495. VMM_Service Cancel_Priority_VM_Event
  497. VMM_Service Get_NMI_Handler_Addr, LOCAL
  498. VMM_Service Set_NMI_Handler_Addr, LOCAL
  499. VMM_Service Hook_NMI_Event
  501. VMM_Service Call_When_VM_Ints_Enabled
  502. VMM_Service Enable_VM_Ints
  503. VMM_Service Disable_VM_Ints
  505. VMM_Service Map_Flat
  506. VMM_Service Map_Lin_To_VM_Addr
  508. ;
  509. ;   Scheduler services
  510. ;
  511. VMM_Service Adjust_Exec_Priority
  512. VMM_Service Begin_Critical_Section
  513. VMM_Service End_Critical_Section
  514. VMM_Service End_Crit_And_Suspend
  515. VMM_Service Claim_Critical_Section
  516. VMM_Service Release_Critical_Section
  517. VMM_Service Call_When_Not_Critical
  518. VMM_Service Create_Semaphore
  519. VMM_Service Destroy_Semaphore
  520. VMM_Service Wait_Semaphore
  521. VMM_Service Signal_Semaphore
  522. VMM_Service Get_Crit_Section_Status
  523. VMM_Service Call_When_Task_Switched
  524. VMM_Service Suspend_VM
  525. VMM_Service Resume_VM
  526. VMM_Service No_Fail_Resume_VM
  527. VMM_Service Nuke_VM
  528. VMM_Service Crash_Cur_VM
  530. VMM_Service Get_Execution_Focus
  531. VMM_Service Set_Execution_Focus
  532. VMM_Service Get_Time_Slice_Priority
  533. VMM_Service Set_Time_Slice_Priority
  534. VMM_Service Get_Time_Slice_Granularity
  535. VMM_Service Set_Time_Slice_Granularity
  536. VMM_Service Get_Time_Slice_Info
  537. VMM_Service Adjust_Execution_Time
  538. VMM_Service Release_Time_Slice
  539. VMM_Service Wake_Up_VM
  540. VMM_Service Call_When_Idle
  542. VMM_Service Get_Next_VM_Handle
  544. ;
  545. ;   Time-out and system timer services
  546. ;
  547. VMM_Service Set_Global_Time_Out
  548. VMM_Service Set_VM_Time_Out
  549. VMM_Service Cancel_Time_Out
  550. VMM_Service Get_System_Time
  551. VMM_Service Get_VM_Exec_Time
  553. VMM_Service Hook_V86_Int_Chain
  554. VMM_Service Get_V86_Int_Vector
  555. VMM_Service Set_V86_Int_Vector
  556. VMM_Service Get_PM_Int_Vector
  557. VMM_Service Set_PM_Int_Vector
  559. VMM_Service Simulate_Int
  560. VMM_Service Simulate_Iret
  561. VMM_Service Simulate_Far_Call
  562. VMM_Service Simulate_Far_Jmp
  563. VMM_Service Simulate_Far_Ret
  564. VMM_Service Simulate_Far_Ret_N
  565. VMM_Service Build_Int_Stack_Frame
  567. VMM_Service Simulate_Push
  568. VMM_Service Simulate_Pop
  570. ;
  571. ; Heap Manager
  572. ;
  573. VMM_Service _HeapAllocate
  574. VMM_Service _HeapReAllocate
  575. VMM_Service _HeapFree
  576. VMM_Service _HeapGetSize
  578. ; ---------------------------------------------------
  579. ;
  580. ;  Flags for heap allocator calls
  581. ;
  582. ; ---------------------------------------------------
  585. HeapZeroInit equ 00000000000000000000000000000001B
  586. HeapZeroReInit equ 00000000000000000000000000000010B
  587. HeapNoCopy equ 00000000000000000000000000000100B
  589. ; NOTE: HIGH 8 BITS (bits 24-31) are reserved
  592. ;
  593. ; Page Manager
  594. ;
  595. VMM_Service _PageAllocate
  596. VMM_Service _PageReAllocate
  597. VMM_Service _PageFree
  598. VMM_Service _PageLock
  599. VMM_Service _PageUnLock
  600. VMM_Service _PageGetSizeAddr
  601. VMM_Service _PageGetAllocInfo
  602. VMM_Service _GetFreePageCount
  603. VMM_Service _GetSysPageCount
  604. VMM_Service _GetVMPgCount
  605. VMM_Service _MapIntoV86
  606. VMM_Service _PhysIntoV86
  607. VMM_Service _TestGlobalV86Mem
  608. VMM_Service _ModifyPageBits
  609. VMM_Service _CopyPageTable
  610. VMM_Service _LinMapIntoV86
  611. VMM_Service _LinPageLock
  612. VMM_Service _LinPageUnLock
  613. VMM_Service _SetResetV86Pageable
  614. VMM_Service _GetV86PageableArray
  615. VMM_Service _PageCheckLinRange
  616. VMM_Service _PageOutDirtyPages
  617. VMM_Service _PageDiscardPages
  619. ; ---------------------------------------------------
  620. ;
  621. ;  Flags for other page allocator calls
  622. ;
  623. ; ---------------------------------------------------
  624. PageZeroInit equ 00000000000000000000000000000001B
  625. PageUseAlign equ 00000000000000000000000000000010B
  626. PageContig equ 00000000000000000000000000000100B
  627. PageFixed equ 00000000000000000000000000001000B
  628. PageDEBUGNulFault equ 00000000000000000000000000010000B
  629. PageZeroReInit equ 00000000000000000000000000100000B
  630. PageNoCopy equ 00000000000000000000000001000000B
  631. PageLocked equ 00000000000000000000000010000000B
  632. PageLockedIfDP equ 00000000000000000000000100000000B
  633. PageSetV86Pageable equ 00000000000000000000001000000000B
  634. PageClearV86Pageable equ 00000000000000000000010000000000B
  635. PageSetV86IntsLocked equ 00000000000000000000100000000000B
  636. PageClearV86IntsLocked equ 00000000000000000001000000000000B
  637. PageMarkPageOut  equ 00000000000000000010000000000000B
  638. PagePDPSetBase equ 00000000000000000100000000000000B
  639. PagePDPClearBase equ 00000000000000001000000000000000B
  640. PageDiscard equ 00000000000000010000000000000000B
  641. PagePDPQueryDirty equ 00000000000000100000000000000000B
  643. ; NOTE: HIGH 8 BITS (bits 24-31) are reserved
  645. ;
  646. ; Informational services
  647. ;
  648. VMM_Service _GetNulPageHandle
  649. VMM_Service _GetFirstV86Page
  650. VMM_Service _MapPhysToLinear
  651. VMM_Service _GetAppFlatDSAlias
  652. VMM_Service _SelectorMapFlat
  653. VMM_Service _GetDemandPageInfo
  654. ;
  655. ; Data structure for _GetDemandPageInfo
  656. ;
  657. DemandInfoStruc struc
  658. DILin_Total_Count     dd       ?       ; # pages in linear address space
  659. DIPhys_Count       dd       ?       ; Count of phys pages
  660. DIFree_Count       dd       ?       ; Count of free phys pages
  661. DIUnlock_Count       dd       ?       ; Count of unlocked Phys Pages
  662. DILinear_Base_Addr    dd       ?       ; Base of pageable address space
  663. DILin_Total_Free      dd       ?       ; Total Count of free linear pages
  664. DIReserved       dd      10 dup (?)      ; Resvd for expansion
  665. DemandInfoStruc ends
  667. VMM_Service _GetSetPageOutCount
  668. ;
  669. ; Flags bits for _GetSetPageOutCount
  670. ;
  671. GSPOC_F_Get equ 00000000000000000000000000000001B
  673. ;
  674. ; Device VM page manager
  675. ;
  676. VMM_Service Hook_V86_Page
  677. VMM_Service _Assign_Device_V86_Pages
  678. VMM_Service _DeAssign_Device_V86_Pages
  679. VMM_Service _Get_Device_V86_Pages_Array
  680. VMM_Service MMGR_SetNULPageAddr
  682. ;
  683. ; GDT/LDT management
  684. ;
  685. VMM_Service _Allocate_GDT_Selector
  686. VMM_Service _Free_GDT_Selector
  687. VMM_Service _Allocate_LDT_Selector
  688. VMM_Service _Free_LDT_Selector
  689. VMM_Service _BuildDescriptorDWORDs
  690. ;
  691. ; Flag equates for _BuildDescriptorDWORDs
  692. ;
  693. BDDExplicitDPL EQU 00000000000000000000000000000001B
  694. ;
  695. ; Flag equates for _Allocate_LDT_Selector
  696. ;
  697. ALDTSpecSel EQU 00000000000000000000000000000001B
  699. VMM_Service _GetDescriptor
  700. VMM_Service _SetDescriptor
  703. VMM_Service _MMGR_Toggle_HMA
  704. ;
  705. ; Flag equates for _MMGR_Toggle_HMA
  706. ;
  707. MMGRHMAPhysical EQU 00000000000000000000000000000001B
  708. MMGRHMAEnable EQU 00000000000000000000000000000010B
  709. MMGRHMADisable EQU 00000000000000000000000000000100B
  710. MMGRHMAQuery EQU 00000000000000000000000000001000B
  713. VMM_Service Get_Fault_Hook_Addrs, LOCAL
  714. VMM_Service Hook_V86_Fault, LOCAL
  715. VMM_Service Hook_PM_Fault, LOCAL
  716. VMM_Service Hook_VMM_Fault, LOCAL
  718. VMM_Service Begin_Nest_V86_Exec
  719. VMM_Service Begin_Nest_Exec
  720. VMM_Service Exec_Int
  721. VMM_Service Resume_Exec
  722. VMM_Service End_Nest_Exec
  724. VMM_Service Allocate_PM_App_CB_Area, VMM_ICODE
  725. VMM_Service Get_Cur_PM_App_CB
  727. VMM_Service Set_V86_Exec_Mode
  728. VMM_Service Set_PM_Exec_Mode
  730. VMM_Service Begin_Use_Locked_PM_Stack
  731. VMM_Service End_Use_Locked_PM_Stack
  733. VMM_Service Save_Client_State
  734. VMM_Service Restore_Client_State
  736. VMM_Service Exec_VxD_Int
  738. VMM_Service Hook_Device_Service, LOCAL
  740. VMM_Service Hook_Device_V86_API
  741. VMM_Service Hook_Device_PM_API
  743. VMM_Service System_Control
  745. ;
  746. ;   I/O and software interrupt hooks
  747. ;
  748. VMM_Service Simulate_IO
  749. VMM_Service Install_Mult_IO_Handlers
  750. VMM_Service Install_IO_Handler
  751. VMM_Service Enable_Global_Trapping
  752. VMM_Service Enable_Local_Trapping
  753. VMM_Service Disable_Global_Trapping
  754. VMM_Service Disable_Local_Trapping
  757. ;
  758. ;   Linked List Abstract Data Type Services
  759. ;
  760. VMM_Service List_Create
  761. VMM_Service List_Destroy
  762. VMM_Service List_Allocate
  763. VMM_Service List_Attach
  764. VMM_Service List_Attach_Tail
  765. VMM_Service List_Insert
  766. VMM_Service List_Remove
  767. VMM_Service List_Deallocate
  768. VMM_Service List_Get_First
  769. VMM_Service List_Get_Next
  770. VMM_Service List_Remove_First
  772. ;
  773. ;   Flags used by List_Create
  774. ;
  775. LF_Async EQU 00000001b
  776. LF_Async_Bit EQU 0
  777. LF_Use_Heap EQU 00000010b
  778. LF_Use_Heap_Bit  EQU 1
  779. LF_Alloc_Error EQU 00000100b
  780. LF_Alloc_Error_Bit EQU 2
  783. ;==============================================================================
  784. ; I N I T I A L I Z A T I O N   P R O C E D U R E S
  785. ;------------------------------------------------------------------------------
  788. ;
  789. ; Instance data manager
  790. ;
  791. VMM_Service _AddInstanceItem
  792. ;
  793. ; Data structure for _AddInstanceItem
  794. ;
  795. InstDataStruc struc
  796. InstLinkF       dd       0       ; RESERVED SET TO 0
  797. InstLinkB       dd       0       ; RESERVED SET TO 0
  798. InstLinAddr       dd       ?       ; Linear address of start of block
  799. InstSize       dd       ?       ; Size of block in bytes
  800. InstType       dd       ?       ; Type of block
  801. InstDataStruc ends
  802. ;
  803. ; Values for InstType
  804. ;
  805. INDOS_Field equ 100h ; Bit indicating INDOS switch requirements
  806. ALWAYS_Field equ 200h ; Bit indicating ALWAYS switch requirements
  808. ;
  809. ; System structure data manager
  810. ;
  811. VMM_Service _Allocate_Device_CB_Area, VMM_ICODE
  812. VMM_Service _Allocate_Global_V86_Data_Area, VMM_ICODE
  813. VMM_Service _Allocate_Temp_V86_Data_Area, VMM_ICODE
  814. VMM_Service _Free_Temp_V86_Data_Area, VMM_ICODE
  816. ;
  817. ; Flag bits for _Allocate_Global_VM_Data_Area
  818. ;
  819. GVDAWordAlign EQU 00000000000000000000000000000001B
  820. GVDADWordAlign EQU 00000000000000000000000000000010B
  821. GVDAParaAlign EQU 00000000000000000000000000000100B
  822. GVDAPageAlign EQU 00000000000000000000000000001000B
  823. GVDAInstance EQU 00000000000000000000000100000000B
  824. GVDAZeroInit EQU 00000000000000000000001000000000B
  825. GVDAReclaim EQU 00000000000000000000010000000000B
  827. ;
  828. ; Initialization information calls (win.ini and environment parameters)
  829. ;
  830. VMM_Service Get_Profile_Decimal_Int, VMM_ICODE
  831. VMM_Service Convert_Decimal_String, VMM_ICODE
  832. VMM_Service Get_Profile_Fixed_Point, VMM_ICODE
  833. VMM_Service Convert_Fixed_Point_String, VMM_ICODE
  834. VMM_Service Get_Profile_Hex_Int, VMM_ICODE
  835. VMM_Service Convert_Hex_String, VMM_ICODE
  836. VMM_Service Get_Profile_Boolean, VMM_ICODE
  837. VMM_Service Convert_Boolean_String, VMM_ICODE
  838. VMM_Service Get_Profile_String, VMM_ICODE
  839. VMM_Service Get_Next_Profile_String, VMM_ICODE
  840. VMM_Service Get_Environment_String, VMM_ICODE
  841. VMM_Service Get_Exec_Path, VMM_ICODE
  842. VMM_Service Get_Config_Directory, VMM_ICODE
  843. VMM_Service OpenFile, VMM_ICODE
  844. VMM_Service Get_PSP_Segment, VMM_ICODE
  845. VMM_Service GetDOSVectors, VMM_ICODE
  846. VMM_Service Get_Machine_Info
  848. GMIF_80486 EQU 00010000h
  849. GMIF_80486_Bit EQU 10h
  850. GMIF_PCXT EQU 00020000h
  851. GMIF_PCXT_Bit EQU 11h
  852. GMIF_MCA EQU 00040000h
  853. GMIF_MCA_Bit EQU 12h
  854. GMIF_EISA EQU 00080000h
  855. GMIF_EISA_Bit EQU 13h
  858. ;
  859. ; Following service is not restricted to initialization
  860. ;
  861. VMM_Service GetSet_HMA_Info
  862. VMM_Service Set_System_Exit_Code
  864. VMM_Service Fatal_Error_Handler
  865. VMM_Service Fatal_Memory_Error
  867. ;
  868. ;   Called by VTD only
  869. ;
  870. VMM_Service Update_System_Clock
  872. ;==============================================================================
  873. ;     D E B U G G I N G E X T E R N S
  874. ;==============================================================================
  876. VMM_Service Test_Debug_Installed ; Valid call in retail also
  878. VMM_Service Out_Debug_String ; Valid in DEBLEVEL=1
  879. VMM_Service Out_Debug_Chr
  880. VMM_Service In_Debug_Chr
  881. VMM_Service Debug_Convert_Hex_Binary
  882. VMM_Service Debug_Convert_Hex_Decimal
  884. VMM_Service Debug_Test_Valid_Handle
  885. VMM_Service Validate_Client_Ptr
  886. VMM_Service Test_Reenter
  887. VMM_Service Queue_Debug_String
  888. VMM_Service Log_Proc_Call
  889. VMM_Service Debug_Test_Cur_VM
  891. .errnz Debug_Test_Cur_VM - 100CCh   ; VMM service table changed above this service
  893. VMM_Service Get_PM_Int_Type
  894. VMM_Service Set_PM_Int_Type
  896. VMM_Service Get_Last_Updated_System_Time
  897. VMM_Service Get_Last_Updated_VM_Exec_Time
  899. End_Service_Table VMM, VMM
  903. ;******************************************************************************
  905. IFDEF DEBUG
  906. DebFar EQU NEAR PTR
  907. ELSE
  908. DebFar EQU SHORT
  909. ENDIF
  911. BeginDoc
  913. ;******************************************************************************
  914. ;
  915. ;      EQUATES FOR SYSTEM_CONTROL CALLS
  916. ;
  917. ;==============================================================================
  919. ;
  920. ; Sys_Critical_Init is a device init call. Devices that have a critical
  921. ;   function that needs initializing before interrupts are enabled should
  922. ;   do it at Sys_Critical_Init. Devices which REQUIRE a certain range of
  923. ;   V86 pages to operate (such as the VDD video memory) should claim them
  924. ;   at Sys_Critical_Init. SYS VM Simulate_Int, Exec_Int ACTIVITY IS NOT
  925. ;   ALLOWED. Returning carry aborts device load only.
  926. ;
  927. Sys_Critical_Init EQU 0000h ; Devices required for virt mode
  928. ;
  929. ; Device init is where most devices do the bulk of their initialization.
  930. ;   SYS VM Simulate_Int, Exec_Int activity is allowed. Returning carry
  931. ;   aborts device load only.
  932. ;
  933. Device_Init EQU 0001h ; All other devices init
  934. ;
  935. ; Init_Complete is the final phase of device init called just before the
  936. ;   WIN386 INIT pages are released and the Instance snapshot is taken.
  937. ;   Devices which wish to search for a region of V86 pages >= A0h to use
  938. ;   should do it at Init_Complete.
  939. ;   SYS VM Simulate_Int, Exec_Int activity is allowed. Returning carry
  940. ;   aborts device load only.
  941. ;
  942. Init_Complete EQU 0002h ; All devices have initialized
  944. ;----------------- INITIALIZATION CODE AND DATA DISCARDED ---------------------
  946. ;
  947. ; Same as VM_Init, except for SYS VM.
  948. ;
  949. Sys_VM_Init EQU 0003h ; Execute the system VM (Win86)
  950. ;
  951. ; Same as VM_Terminate, except for SYS VM (Normal WIN386 exit ONLY, on a crash
  952. ;   exit this call is not made). SYS VM Simulate_Int, Exec_Int activity is
  953. ;   allowed.
  954. ;
  955. Sys_VM_Terminate EQU 0004h ; System VM terminted (exiting)
  957. ;------------------------------------------------------------------------------
  959. ;
  960. ; System_Exit call is made when WIN386 is exiting either normally or via
  961. ;   a crash. INTERRUPS ARE ENABLED. Instance snapshot has been restored.
  962. ;   SYS VM Simulate_Int, Exec_Int ACTIVITY IS NOT ALLOWED.
  963. ;
  964. System_Exit EQU 0005h ; Devices prepare to exit
  965. ;
  966. ; System_Exit call is made when WIN386 is exiting either normally or via
  967. ;   a crash. INTERRUPS ARE DISABLED. SYS VM Simulate_Int, Exec_Int ACTIVITY
  968. ;   IS NOT ALLOWED.
  969. ;
  970. Sys_Critical_Exit EQU 0006h ; System critical devices reset
  972. ;
  973. ; Create_VM creates a new VM. EBX = VM handle of new VM. Returning Carry will
  974. ;   fail the Create_VM.
  975. ;
  976. Create_VM EQU 0007h
  977. ;
  978. ; Second phase of Create_VM. EBX = VM handle of new VM. Returning Carry will
  979. ;   cause the VM to go Not_Executeable, then be destroyed. VM Simulate_Int,
  980. ;   Exec_Int activity is NOT allowed.
  981. ;
  982. VM_Critical_Init EQU 0008h
  983. ;
  984. ; Third phase of Create_VM. EBX = VM handle of new VM. Returning Carry will
  985. ;   cause the VM to go Not_Executeable, then be destroyed. VM Simulate_Int,
  986. ;   Exec_Int activity is allowed.
  987. ;
  988. VM_Init  EQU 0009h
  990. ;
  991. ; NORMAL (First phase) of Destroy_VM. EBX = VM Hanlde. This occurs on normal
  992. ;   termination of the VM. Call cannot be failed. VM Simulate_Int, Exec_Int
  993. ;   activity is allowed.
  994. ;
  995. VM_Terminate EQU 000Ah ; Still in VM -- About to die
  996. ;
  997. ; Second phase of Destroy_VM. EBX = VM Handle, EDX = Flags (see below). Note
  998. ;   that in the case of destroying a running VM, this is the first call made
  999. ;   (VM_Terminate call does not occur). Call cannot be failed. VM Simulate_Int,
  1000. ;   Exec_Int activity is NOT allowed.
  1001. ;
  1002. VM_Not_Executeable EQU 000Bh ; Most devices die (except VDD)
  1003. ;
  1004. ; Final phase of Destroy_VM. EBX = VM Handle. Note that considerable time
  1005. ;   can elaps between the VM_Not_Executeable call and this call. Call cannot
  1006. ;   be failed. VM Simulate_Int, Exec_Int activity is NOT allowed.
  1007. ;
  1008. Destroy_VM EQU 000Ch ; VM's control block about to go
  1010. ;
  1011. ;   Flags for VM_Not_Executeable control call (passed in EDX)
  1012. ;
  1013. VNE_Crashed EQU 0000000000000000000000001b
  1014. VNE_Crashed_Bit  EQU 0 ; VM was crashed
  1015. VNE_Nuked EQU 0000000000000000000000010b
  1016. VNE_Nuked_Bit EQU 1 ; VM was destroyed while active
  1017. VNE_CreateFail EQU 0000000000000000000000100b
  1018. VNE_CreateFail_Bit EQU 2 ; Some device failed Create_VM
  1019. VNE_CrInitFail EQU 0000000000000000000001000b
  1020. VNE_CrInitFail_Bit EQU 3 ; Some device failed VM_Critical_Init
  1021. VNE_InitFail EQU 0000000000000000000010000b
  1022. VNE_InitFail_Bit EQU 4 ; Some device failed VM_Init
  1024. ;------------------------------------------------------------------------------
  1026. ;
  1027. ; EBX = VM Handle. Call cannot be failed.
  1028. ;
  1029. VM_Suspend EQU 000Dh ; VM not runnable until resume
  1030. ;
  1031. ; EBX = VM Handle. Returning carry fails and backs out the resume.
  1032. ;
  1033. VM_Resume EQU 000Eh ; VM is leaving suspended state
  1035. ;------------------------------------------------------------------------------
  1037. ;
  1038. ; EBX = VM Handle to set device focus to. EDX = Device ID if device specific
  1039. ;   setfocus. == 0 if device critical setfocus (all devices). THIS CALL CANNOT
  1040. ;   BE FAILED.
  1041. ;
  1042. ;   NOTE: In case where EDX == 0, ESI is a FLAG word that indicates special
  1043. ;   functions. Currently Bit 0 being set indicates that this Device
  1044. ;   critical set focus is also "VM critical". It means that we do not
  1045. ;   want some other VM to take the focus from this app now. This is
  1046. ;   primarily used when doing a device critical set focus to Windows
  1047. ;   (the SYS VM) it is interpreted by the SHELL to mean "if an old app
  1048. ;   currently has the Windows activation, set the activation to the
  1049. ;   Windows Shell, not back to the old app". ALSO in the case where
  1050. ;   Bit 0 is set, EDI = The VM handle of the VM that is "having trouble".
  1051. ;   Set this to 0 if there is no specific VM associated with the problem.
  1052. ;
  1053. Set_Device_Focus EQU 000Fh
  1055. ;------------------------------------------------------------------------------
  1057. ;
  1058. ; EBX = VM Handle going into message mode. THIS CALL CANNOT BE FAILED.
  1059. ;
  1060. Begin_Message_Mode EQU 0010h
  1061. ;
  1062. ; EBX = VM Handle leaving message mode. THIS CALL CANNOT BE FAILED.
  1063. ;
  1064. End_Message_Mode EQU 0011h
  1066. ;------------------------- SPECIAL CONTROL CALLS ------------------------------
  1068. ;
  1069. ; Request for reboot. Call cannot be failed.
  1070. ;
  1071. Reboot_Processor EQU 0012h ; Request a machine reboot
  1072. ;
  1073. ; Query_Destroy is an information call made by the SHELL device before an
  1074. ;   attempt is made to initiate a destroy VM sequence on a running VM which
  1075. ;   has not exited normally. EBX = VM Handle. Returning carry indicates that
  1076. ;   a device "has a problem" with allowing this. THE DESTROY SEQUENCE CANNOT
  1077. ;   BE ABORTED HOWEVER, this decision is up to the user. All this does is
  1078. ;   indicate that there is a "problem" with allowing the destroy. The device
  1079. ;   which returns carry should call the SHELL_Message service to post an
  1080. ;   informational dialog about the reason for the problem.
  1081. ;
  1082. Query_Destroy EQU 0013h ; OK to destroy running VM?
  1084. ;------------------------- DEBUGGING CONTROL CALL -----------------------------
  1086. ;
  1087. ; Special call for device specific DEBUG information display and activity.
  1088. ;
  1089. Debug_Query EQU 0014h
  1091. ;---------- CALLS FOR BEGIN/END OF PROTECTED MODE VM EXECUTION ----------------
  1093. ;
  1094. ;   About to run a protected mode application.
  1095. ;   EBX = Current VM handle.
  1096. ;   EDX = Flags
  1097. ;   EDI -> Application Control Block
  1098. ;   Returning with carry set fails the call.
  1099. ;
  1100. Begin_PM_App EQU 0015h
  1102. ;
  1103. ;   Flags for Begin_PM_App (passed in EDX)
  1104. ;
  1105. BPA_32_Bit EQU 00000001b
  1106. BPA_32_Bit_Flag  EQU 1
  1108. ;
  1109. ;   Protected mode application is terminating.
  1110. ;   EBX = Current VM handle.  THIS CALL CAN NOT FAIL.
  1111. ;   EDI -> Application Control Block
  1112. ;
  1113. End_PM_App EQU 0016h
  1115. EndDoc
  1117. BeginDoc
  1118. ;******************************************************************************
  1119. ; BeginProc is a macro for defining entry points to routines in VMM and in the
  1120. ;   VxDs. It correctly defines the procedure name for VxD services(it prepends
  1121. ;   a "@" to the procedure name), DWORD aligns the procedure, takes care of
  1122. ;   public declaration and does some calling verification for debug versions
  1123. ;   of the software. EndProc is a macro which defines the end of the procedure.
  1124. ;
  1125. ; Valid parameters to the BeginProc macro are:
  1126. ; PUBLIC ; Routine used outside this module
  1127. ; HIGH_FREQ ; DWORD align procedure
  1128. ; SERVICE  ; Routine is called via VxDCall
  1129. ; ASYNC_SERVICE ; Same as "SERVICE" plus routine can
  1130. ; ; be called under interrupt.
  1131. ; After the routine header in which the routine entry conditions, exit
  1132. ;   conditions, side affects and functionality are specified, the BeginProc
  1133. ;   macro should be used to define the routine's entry point. It has up to
  1134. ;   four parameters as specified below. For example:
  1135. ;
  1136. ;BeginProc  <Function_Name>,PUBLIC, HIGH_FREQ, ASYNC_SERVICE
  1137. ;
  1138. ; <code>
  1139. ;
  1140. ;EndProc    <Function_Name>
  1141. ;==============================================================================
  1142. EndDoc
  1144. BeginProc MACRO Name, P1, P2, P3, P4
  1145. LOCAL Profile_Data, Skip_Data
  1147. IF ?_RCODE
  1149. Process_Param MACRO P
  1150. IFNB <P>
  1151. IFIDNI <P>, <HIGH_FREQ>
  1152. Dword_Align
  1153. ELSE
  1154. IFIDNI <P>, <SERVICE>
  1155. ??_SERVICE = 1
  1156. ELSE
  1157. IFIDNI <P>, <ASYNC_SERVICE>
  1158. ??_ASYNC_SERVICE = 1
  1159. IF ?_LCODE
  1160. %OUT ERROR:  ASYNC_SERVICE's must be in LOCKED code
  1161. ;;.err
  1162. ENDIF
  1163. ELSE
  1164. IFIDNI <P>, <NO_LOG>
  1165. ??_NO_LOG = 1
  1166. ELSE
  1167. IFDIFI <P>, <PUBLIC>
  1168. %OUT ERROR:  Bad para "&P" to BeginProc
  1169. .ERR
  1170. ENDIF
  1171. ENDIF
  1172. ENDIF
  1173. ENDIF
  1174. ENDIF
  1175. ENDIF
  1176. ENDM
  1179. ??_SERVICE = 0
  1180. ??_ASYNC_SERVICE = 0
  1181. ??_NO_LOG = 0
  1183. Process_Param P1
  1184. Process_Param P2
  1185. Process_Param P3
  1186. Process_Param P4
  1189. IFE ??_SERVICE + ??_ASYNC_SERVICE
  1191. PUBLIC Name
  1192. Name PROC NEAR
  1193. IFDEF DEBUG
  1194. IFE ??_NO_LOG
  1195. IFNDEF VMMSYS
  1196. VMMcall Log_Proc_Call
  1197. ENDIF
  1198. ENDIF
  1199. ENDIF
  1201. ELSE
  1203. IFDEF DEBUG
  1204. jmp SHORT Skip_Data
  1205. Profile_Data LABEL DWORD
  1206. dd 0
  1207. Skip_Data:
  1208. ENDIF
  1210. PUBLIC @&Name
  1211. @&Name PROC NEAR
  1213. IFDEF DEBUG
  1214. IFE ??_NO_LOG
  1215. ;;;;IFNDEF VMMSYS
  1216. VMMcall Log_Proc_Call
  1217. ;;;;ENDIF
  1218. ENDIF
  1219. pushfd
  1220. inc [Profile_Data]
  1221. IFE ??_ASYNC_SERVICE
  1222. VMMcall Test_Reenter
  1223. ENDIF
  1224. popfd
  1225. ENDIF
  1226. ENDIF
  1228. ELSE
  1229. IFIDNI <P1>, <PUBLIC>
  1230. PUBLIC Name
  1231. ENDIF
  1232. Name PROC NEAR
  1233. ENDIF
  1236. ENDM
  1240. EndProc MACRO Name
  1241. IFDEF @&Name
  1242. @&Name ENDP
  1243. ELSE
  1244. IFDEF Name
  1245. Name ENDP
  1246. ELSE
  1247. .ERR
  1248. %OUT EndProc for &Name does not match BeginProc
  1249. ENDIF
  1250. ENDIF
  1251. ENDM
  1254. ;******************************************************************************
  1255. ;        S C H E D U L E R   B O O S T   V A L U E S
  1256. ;==============================================================================
  1258. Reserved_Low_Boost EQU 00000000000000000000000000000001b
  1259. Cur_Run_VM_Boost EQU 00000000000000000000000000000100b
  1260. Low_Pri_Device_Boost EQU 00000000000000000000000000010000b
  1261. High_Pri_Device_Boost EQU 00000000000000000001000000000000b
  1262. Critical_Section_Boost EQU 00000000000100000000000000000000b
  1263. Time_Critical_Boost EQU 00000000010000000000000000000000b
  1264. Reserved_High_Boost EQU 01000000000000000000000000000000b
  1267. ;******************************************************************************
  1268. ;  F L A G S   F O R   C A L L _ P R I O R I T Y _ V M _ E V E N T
  1269. ;==============================================================================
  1271. PEF_Wait_For_STI EQU 0000001b
  1272. PEF_Wait_For_STI_Bit EQU 0
  1273. PEF_Wait_Not_Crit EQU 0000010b
  1274. PEF_Wait_Not_Crit_Bit EQU 1
  1275. PEF_Dont_Unboost EQU 0000100b
  1276. PEF_Dont_Unboost_Bit EQU 2
  1277. PEF_Always_Sched EQU 0001000b
  1278. PEF_Always_Sched_Bit EQU 3
  1281. ;******************************************************************************
  1282. ;  F L A G S   F O R   B E G I N _ C R I T I C A L _ S E C T I O N
  1283. ;        A N D   W A I T _ S E M A P H O R E
  1284. ;==============================================================================
  1286. Block_Svc_Ints EQU 0000001b
  1287. Block_Svc_Ints_Bit EQU 0
  1288. Block_Svc_If_Ints_Locked EQU 0000010b
  1289. Block_Svc_If_Ints_Locked_Bit EQU 1
  1290. Block_Enable_Ints EQU 0000100b
  1291. Block_Enable_Ints_Bit EQU 2
  1295. BeginDoc
  1296. ;******************************************************************************
  1297. ; The following structures are pointed to by EBP when VxD routines are entered,
  1298. ;   both for VxD control calls and traps(I/O traps, software INT traps, etc.).
  1299. ;   The first structure as DWORD values, the second WORD values and the last
  1300. ;   has BYTE values.
  1301. ;
  1302. Client_Reg_Struc   struc
  1303. Client_EDI dd ? ; Client's EDI
  1304. Client_ESI dd ? ; Client's ESI
  1305. Client_EBP dd ? ; Client's EBP
  1306. dd ? ; ESP at pushall
  1307. Client_EBX dd ? ; Client's EBX
  1308. Client_EDX dd ? ; Client's EDX
  1309. Client_ECX dd ? ; Client's ECX
  1310. Client_EAX dd ? ; Client's EAX
  1311. Client_Error dd ? ; Dword error code
  1312. Client_EIP dd ? ; EIP
  1313. Client_CS dw ? ; CS
  1314. dw ? ;   (padding)
  1315. Client_EFlags dd ? ; EFLAGS
  1316. Client_ESP dd ? ; ESP
  1317. Client_SS dw ? ; SS
  1318. dw ? ;   (padding)
  1319. Client_ES dw ? ; ES
  1320. dw ? ;   (padding)
  1321. Client_DS dw ? ; DS
  1322. dw ? ;   (padding)
  1323. Client_FS dw ? ; FS
  1324. dw ? ;   (padding)
  1325. Client_GS dw ? ; GS
  1326. dw ? ;   (padding)
  1327. Client_Alt_EIP dd ?
  1328. Client_Alt_CS dw ?
  1329. dw ?
  1330. Client_Alt_EFlags  dd ?
  1331. Client_Alt_ESP dd ?
  1332. Client_Alt_SS dw ?
  1333. dw ?
  1334. Client_Alt_ES dw ?
  1335. dw ?
  1336. Client_Alt_DS dw ?
  1337. dw ?
  1338. Client_Alt_FS dw ?
  1339. dw ?
  1340. Client_Alt_GS dw ?
  1341. dw ?
  1342. Client_Reg_Struc   ends
  1345. Client_Word_Reg_Struc struc
  1346. Client_DI dw ? ; Client's DI
  1347. dw ? ;   (padding)
  1348. Client_SI dw ? ; Client's SI
  1349. dw ? ;   (padding)
  1350. Client_BP dw ? ; Client's BP
  1351. dw ? ;   (padding)
  1352. dd ? ; ESP at pushall
  1353. Client_BX dw ? ; Client's BX
  1354. dw ? ;   (padding)
  1355. Client_DX dw ? ; Client's DX
  1356. dw ? ;   (padding)
  1357. Client_CX dw ? ; Client's CX
  1358. dw ? ;   (padding)
  1359. Client_AX dw ? ; Client's AX
  1360. dw ? ;   (padding)
  1361. dd ? ; Dword error code
  1362. Client_IP dw ? ; Client's IP
  1363. dw ? ;   (padding)
  1364. dd ? ; CS
  1365. Client_Flags dw ? ; Client's flags (low)
  1366. dw ? ;   (padding)
  1367. Client_SP dw ? ; SP
  1368. dw ?
  1369. dd 5 dup (?)
  1370. Client_Alt_IP dw ?
  1371. dw ?
  1372. dd ?
  1373. Client_Alt_Flags    dw ?
  1374. dw ?
  1375. Client_Alt_SP dw ?
  1376. Client_Word_Reg_Struc ends
  1380. Client_Byte_Reg_Struc struc
  1381. dd 4 dup (?) ; EDI, ESI, EBP, ESP at pushall
  1382. Client_BL db ? ; Client's BL
  1383. Client_BH db ? ; Client's BH
  1384. dw ? ;   (padding)
  1385. Client_DL db ? ; Client's DL
  1386. Client_DH db ? ; Client's DH
  1387. dw ? ;   (padding)
  1388. Client_CL db ? ; Client's CL
  1389. Client_CH db ? ; Client's CH
  1390. dw ? ;   (padding)
  1391. Client_AL db ? ; Client's AL
  1392. Client_AH db ? ; Client's AH
  1393. Client_Byte_Reg_Struc ends
  1395. ;==============================================================================
  1396. EndDoc
  1398. .ERRNZ Client_SP - Client_ESP
  1399. .ERRNZ Client_AL - Client_EAX
  1403. PushCParams MACRO P1, P2, P3, P4, P5, P6, P7, P8, P9, P10
  1404. IRP Param, <P10, P9, P8, P7, P6, P5, P4, P3, P2, P1>
  1405. IFNB <Param>
  1406. push Param
  1407. ENDIF
  1408. ENDM
  1409. ENDM
  1411. ClearCParams MACRO Count, P1, P2, P3, P4, P5, P6, P7, P8, P9, P10
  1412. IFNB <P1>
  1413. ClearCParams %(Count+1), <P2>, <P3>, <P4>, <P5>, <P6>, <P7>, <P8>, <P9>, <P10>
  1414. ELSE
  1415. IF Count
  1416. add esp, Count*4
  1417. ENDIF
  1418. ENDIF
  1419. ENDM
  1423. Dyna_Link_Int EQU 20h
  1425. ;
  1426. ;
  1427. BeginDoc
  1428. ;******************************************************************************
  1429. ; The VMMCall and VxDCall macros provide a dynamic link to the VMM and VxD
  1430. ;   service routines. For example:
  1431. ;
  1432. ;   VMMCall Enable_VM_Ints ; Equivalent to STI in VM code
  1433. ;
  1434. ;   mov     eax,[My_IRQ_Handle]
  1435. ;   VxDCall VPICD_Set_Int_Request ; Set IRQ for my device's interrupt
  1436. ;
  1437. ; Note that Enable_VM_Ints is defined in VMM.INC and VPICD_Set_Int_Request is
  1438. ; defined in VPICD.INC
  1439. ;
  1440. ;==============================================================================
  1441. EndDoc
  1444. BeginDoc
  1445. ;******************************************************************************
  1446. ; VxDCall
  1447. ;==============================================================================
  1448. EndDoc
  1449. VxDcall MACRO P, Param
  1450. PushCParams Param
  1451. int Dyna_Link_Int
  1452. dd P
  1453. ClearCParams 0, Param
  1454. ENDM
  1456. VxDjmp MACRO P, Param
  1457. IFNB <Param>
  1458. %OUT ERROR:  Parameters may not be passed to VxDjmp or VMMjmp macros
  1459. .ERR
  1460. ENDIF
  1461. int Dyna_Link_Int
  1462. IFDEF DEBUG
  1463. dd P
  1464. ret
  1465. ELSE
  1466. dd P OR DL_Jmp_Mask
  1467. ENDIF
  1468. ENDM
  1470. DL_Jmp_Mask EQU 8000h
  1471. DL_Jmp_Bit EQU 0Fh
  1474. VMMcall MACRO P, Param
  1475. .ERRNZ (P SHR 16) - VMM_Device_ID
  1476. VxDcall <P>, <Param>
  1477. ENDM
  1479. VMMjmp MACRO P, Param
  1480. .ERRNZ (P SHR 16) - VMM_Device_ID
  1481. VxDjmp <P>, <Param>
  1482. ENDM
  1484. cCall MACRO P, Param
  1485. PushCParams Param
  1486. call P
  1487. ClearCParams 0, Param
  1488. ENDM
  1491. BeginDoc
  1492. ;******************************************************************************
  1493. ; Segment definition macros
  1494. ;
  1495. ; The segment definition macros are a convenience used in defining the
  1496. ; segments used by the device driver. They are:
  1497. ;VxD_ICODE_SEG  defines start of initialization code segment
  1498. ;VxD_ICODE_ENDS  defines end of initialization code segment
  1499. ;VxD_IDATA_SEG  defines start of initialization data segment
  1500. ;VxD_IDATA_ENDS  defines end of initialization data segment
  1501. ;VxD_CODE_SEG  defines start of always present code segment
  1502. ;VxD_CODE_ENDS  defines end of always present code segment
  1503. ;VxD_DATA_SEG  defines start of always present data segment
  1504. ;VxD_DATA_ENDS  defines end of always present data segment
  1505. ;==============================================================================
  1506. EndDoc
  1509. ;   Protected mode code
  1510. VxD_CODE_SEG EQU <VxD_LOCKED_CODE_SEG>
  1511. VxD_CODE_ENDS EQU <VxD_LOCKED_CODE_ENDS>
  1514. VxD_LOCKED_CODE_SEG MACRO
  1515. _LTEXT  SEGMENT
  1516. ??_CUR_CODE_SEG = ??_CUR_CODE_SEG SHL 3 + ??_LCODE
  1517. ASSUME cs:FLAT, ds:FLAT, es:FLAT, ss:FLAT
  1518. ENDM
  1520. VxD_LOCKED_CODE_ENDS MACRO
  1521. ??_CUR_CODE_SEG = ??_CUR_CODE_SEG SHR 3
  1522. _LTEXT  ENDS
  1523. ENDM
  1527. ;   Protected mode initialization code
  1528. VxD_ICODE_SEG MACRO
  1529. _ITEXT SEGMENT
  1530. ??_CUR_CODE_SEG = ??_CUR_CODE_SEG SHL 3 + ??_ICODE
  1531. ASSUME cs:FLAT, ds:FLAT, es:FLAT, ss:FLAT
  1532. ENDM
  1534. VxD_ICODE_ENDS MACRO
  1535. ??_CUR_CODE_SEG = ??_CUR_CODE_SEG SHR 3
  1536. _ITEXT ENDS
  1537. ENDM
  1540. ;   Protected mode data
  1541. VxD_DATA_SEG EQU <VxD_LOCKED_DATA_SEG>
  1542. VxD_DATA_ENDS EQU <VxD_LOCKED_DATA_ENDS>
  1546. VxD_LOCKED_DATA_SEG MACRO NO_ALIGN
  1547. _LDATA  SEGMENT
  1548. IFB <NO_ALIGN>
  1549. ALIGN 4
  1550. ENDIF
  1551. ENDM
  1553. VxD_LOCKED_DATA_ENDS MACRO
  1554. _LDATA  ENDS
  1555. ENDM
  1560. ;   Protected mode initialization data
  1561. VxD_IDATA_SEG MACRO
  1562. _IDATA SEGMENT
  1563. ENDM
  1564. VxD_IDATA_ENDS MACRO
  1565. _IDATA ENDS
  1566. ENDM
  1568. VxD_REAL_INIT_SEG  MACRO
  1569. _RCODE SEGMENT
  1570. ASSUME CS:_RCODE, DS:_RCODE, ES:_RCODE, SS:_RCODE
  1571. ??_CUR_CODE_SEG = ??_CUR_CODE_SEG SHL 3 + ??_RCODE
  1572.   ENDM
  1574. VxD_REAL_INIT_ENDS MACRO
  1575. ??_CUR_CODE_SEG = ??_CUR_CODE_SEG SHR 3
  1576. _RCODE ENDS
  1577.    ENDM
  1579. ENDIF
  1581. DDK_Version equ 300h
  1583. VxD_Desc_Block STRUC
  1584. DDB_Next dd  ? ; VMM RESERVED FIELD
  1585. DDB_SDK_Version  dw  DDK_Version  ; VMM RESERVED FIELD
  1586. DDB_Req_Device_Number dw  Undefined_Device_ID ; Required device number
  1587. DDB_Dev_Major_Version db  0 ; Major device number
  1588. DDB_Dev_Minor_Version db  0 ; Minor device number
  1589. DDB_Flags dw  0 ; Flags for init calls complete
  1590. DDB_Name db  "        " ; Device name
  1591. DDB_Init_Order dd  Undefined_Init_Order; Initialization Order
  1592. DDB_Control_Proc dd  ? ; Offset of control procedure
  1593. DDB_V86_API_Proc dd  0 ; Offset of API procedure (or 0)
  1594. DDB_PM_API_Proc  dd  0 ; Offset of API procedure (or 0)
  1595. DDB_V86_API_CSIP dd  0 ; CS:IP of API entry point
  1596. DDB_PM_API_CSIP  dd  0 ; CS:IP of API entry point
  1597. DDB_Reference_Data dd  ? ; Reference data from real mode
  1598. DDB_Service_Table_Ptr dd  0 ; Pointer to service table
  1599. DDB_Service_Table_Size dd  0 ; Number of services
  1600. VxD_Desc_Block ENDS
  1603. IFNDEF Not_VxD
  1605. ; flag values for DDB_Flags
  1607. DDB_Sys_Crit_Init_Done     EQU 00000001b
  1608. DDB_Sys_Crit_Init_Done_Bit  EQU        0
  1609. DDB_Device_Init_Done     EQU 00000010b
  1610. DDB_Device_Init_Done_Bit    EQU       1
  1612. BeginDoc
  1613. ;******************************************************************************
  1614. ;
  1615. ;   Declare_Virtual_Device macro
  1616. ;
  1617. ; ???? Write something here ????
  1618. ;
  1619. ;==============================================================================
  1620. EndDoc
  1621. Declare_Virtual_Device MACRO Name, Major_Ver, Minor_Ver, Ctrl_Proc, Device_Num, Init_Order, V86_Proc, PM_Proc
  1622. LOCAL V86_API_Offset, PM_API_Offset, Serv_Tab_Offset, Serv_Tab_Len
  1624. dev_id_err MACRO
  1625. %OUT Device ID required when providing services
  1626. .ERR
  1627. ENDM
  1629. IFB <V86_Proc>
  1630. V86_API_Offset EQU 0
  1631. ELSE
  1632. IFB <Device_Num>
  1633. dev_id_err
  1634. ENDIF
  1635. V86_API_Offset EQU <OFFSET32 V86_Proc>
  1636. ENDIF
  1637. IFB <PM_Proc>
  1638. PM_API_Offset EQU 0
  1639. ELSE
  1640. IFB <Device_Num>
  1641. dev_id_err
  1642. ENDIF
  1643. PM_API_Offset EQU <OFFSET32 PM_Proc>
  1644. ENDIF
  1645. IFDEF Name&_Service_Table
  1646. IFB <Device_Num>
  1647. dev_id_err
  1648. ELSE
  1649. IFE Device_Num - Undefined_Device_ID
  1650. dev_id_err
  1651. ENDIF
  1652. ENDIF
  1653. Serv_Tab_Offset EQU <OFFSET32 Name&_Service_Table>
  1654. Serv_Tab_Len EQU Num_&Name&_Services
  1655. ELSE
  1656. Serv_Tab_Offset EQU 0
  1657. Serv_Tab_Len EQU 0
  1658. ENDIF
  1661. VxD_LOCKED_DATA_SEG
  1662. PUBLIC Name&_DDB
  1663. Name&_DDB VxD_Desc_Block <,,Device_Num,Major_Ver,Minor_Ver,,"&Name",Init_Order,
  1664.  OFFSET32 Ctrl_Proc, V86_API_Offset, PM_API_Offset, 
  1665.  ,,,Serv_Tab_Offset, Serv_Tab_Len>
  1666. VxD_LOCKED_DATA_ENDS
  1667. ENDM
  1670. BeginDoc
  1671. ;******************************************************************************
  1672. ; The Begin_Control_Dispatch macro is used for building a table for dispatching
  1673. ; messages passed to the VxD_Control procedure.  It is used with
  1674. ; Control_Dispatch and End_Control_Dispatch.  The only parameter is used to
  1675. ; contruct the procedure label by adding "_Control" to the end (normally the
  1676. ; device name is used i.e. VKD results in creating the procedure VKD_Control,
  1677. ; this created procedure label must be included in Declare_Virtual_Device)
  1678. ;
  1679. ; An example of building a complete dispatch table:
  1680. ;
  1681. ; Begin_Control_Dispatch MyDevice
  1682. ; Control_Dispatch  Device_Init, MyDeviceInitProcedure
  1683. ; Control_Dispatch  Sys_VM_Init, MyDeviceSysInitProcedure
  1684. ; Control_Dispatch  Create_VM,  MyDeviceCreateVMProcedure
  1685. ; End_Control_Dispatch MyDevice
  1686. ;
  1687. ; (NOTE: Control_Dispatch can be used without Begin_Control_Dispatch, but
  1688. ;  then it is the programmer's responsibility for declaring a procedure
  1689. ;  in locked code (VxD_LOCKED_CODE_SEG) and returning Carry clear for
  1690. ;  any messages not processed.  The advantage in using
  1691. ;  Begin_Control_Dispatch is when a large # of messages are processed by
  1692. ;  a device, because a jump table is built which will usually require
  1693. ;  less code space then the compares and jumps that are done when
  1694. ;  Control_Dispatch is used alone.
  1695. ;
  1696. ;==============================================================================
  1697. EndDoc
  1698. Begin_Control_Dispatch MACRO VxD_Name
  1699. ??_cd_low = 0FFFFFFFFh
  1700. ??_cd_high = 0
  1702. BeginProc VxD_Name&_Control
  1703. ENDM
  1705. End_Control_Dispatch   MACRO VxD_Name
  1706. LOCAL ignore, table
  1708. jmpproc MACRO num
  1709. jmp ??_cd_&&num
  1710. ENDM
  1712. procoff MACRO num
  1713. IFDEF ??_cd_&&num
  1714. dd OFFSET32 ??_cd_&&num
  1715. ELSE
  1716. dd OFFSET32 ignore
  1717. ENDIF
  1718. ENDM
  1720. IF ??_cd_low EQ ??_cd_high
  1721. cmp eax, ??_cd_low
  1722. jne short ignore
  1723. jmpproc %(??_cd_low)
  1724. ignore:
  1725. clc
  1726. ret
  1727. ELSE
  1728. cmp eax, ??_cd_high
  1729. ja short ignore
  1730. sub eax, ??_cd_low
  1731. jb short ignore
  1732. jmp cs:[eax*4+table]
  1733. ignore:
  1734. clc
  1735. ret
  1737. table label dword
  1738. REPT   ??_cd_high - ??_cd_low + 1
  1739. procoff %(??_cd_low)
  1740. ??_cd_low = ??_cd_low + 1
  1741. ENDM
  1742. ENDIF
  1744. EndProc VxD_Name&_Control
  1746. PURGE jmpproc
  1747. PURGE procoff
  1748. PURGE Begin_Control_Dispatch
  1749. PURGE Control_Dispatch
  1750. PURGE End_Control_Dispatch
  1751. ENDM
  1753. BeginDoc
  1754. ;******************************************************************************
  1755. ; The Control_Dispatch macro is used for dispatching based on message
  1756. ; passed to the VxD_Control procedure. E.G.:
  1757. ;
  1758. ; Control_Dispatch  Device_Init, MyDeviceInitProcedure
  1759. ;
  1760. ; (NOTE: Control_Dispatch can be used with Begin_Control_Dispatch and
  1761. ;  End_Control_Dispatch to create a jump table for dispatching messages,
  1762. ;  when a large # of messages are processed.)
  1763. ;
  1764. ;==============================================================================
  1765. EndDoc
  1766. Control_Dispatch MACRO Service, Procedure
  1767. LOCAL Skip_Interseg_Jump
  1769. IFE ?_lcode
  1770. IFDEF ??_cd_low
  1771. Equate_Service MACRO Serv
  1772. ??_cd_&&Serv equ Procedure
  1773. ENDM
  1775. Equate_Service %(Service)
  1777. IF Service LT ??_cd_low
  1778. ??_cd_low = Service
  1779. ENDIF
  1780. IF Service GT ??_cd_high
  1781. ??_cd_high = Service
  1782. ENDIF
  1784. PURGE Equate_Service
  1786. ELSE
  1787. cmp eax, Service
  1788. jne SHORT Skip_Interseg_Jump
  1789. jmp Procedure
  1790. Skip_Interseg_Jump:
  1791. ENDIF
  1792. ELSE
  1793. %OUT ERROR:  The Control proc should be in LOCKED code.
  1794. %OUT      Control_Dispatch can only be used inside of VxD_LOCKED_CODE_SEG.
  1795. .err
  1796. ENDIF
  1797. ENDM
  1800. BeginDoc
  1801. ;******************************************************************************
  1802. ; The following are the definitions for the "type of I/O" parameter passed
  1803. ;   to a I/O trap routine
  1804. Byte_Input EQU 000h
  1805. Byte_Output EQU 004h
  1806. Word_Input EQU 008h
  1807. Word_Output EQU 00Ch
  1808. Dword_Input EQU 010h
  1809. Dword_Output EQU 014h
  1811. Output EQU 0000000000000100b
  1812. Output_Bit EQU 2
  1813. Word_IO  EQU 0000000000001000b
  1814. Word_IO_Bit EQU 3
  1815. Dword_IO EQU 0000000000010000b
  1816. Dword_IO_Bit EQU 4
  1818. String_IO EQU 00000020h
  1819. String_IO_Bit EQU 5
  1820. Rep_IO EQU 00000040h
  1821. Rep_IO_Bit EQU 6
  1822. Addr_32_IO EQU 00000080h
  1823. Addr_32_IO_Bit EQU 7
  1824. Reverse_IO EQU 00000100h
  1825. Reverse_IO_Bit EQU 8
  1827. IO_Seg_Mask EQU 0FFFF0000h ; Use these bits to get segment
  1828. IO_Seg_Shift EQU 10h ; Must shift right this many
  1830. ;==============================================================================
  1831. EndDoc
  1833. BeginDoc
  1834. ;******************************************************************************
  1835. ;
  1836. ;   Dispatch_Byte_IO macro
  1837. ;
  1838. ; Dispatch_Byte_IO Byte_In_Proc, Byte_Out_Proc
  1839. ;==============================================================================
  1840. EndDoc
  1841. Dispatch_Byte_IO MACRO In_Proc, Out_Proc
  1842. LOCAL Byte_IO
  1843. cmp ecx, Byte_Output
  1844. jbe SHORT Byte_IO
  1845. VMMjmp Simulate_IO
  1846. Byte_IO:
  1847. IFIDNI <In_Proc>, <Fall_Through>
  1848. je Out_Proc
  1849. ELSE
  1850. IFIDNI <Out_Proc>, <Fall_Through>
  1851. jb In_Proc
  1852. ELSE
  1853. je Out_Proc
  1854. jmp In_Proc
  1855. ENDIF
  1856. ENDIF
  1857. ENDM
  1859. BeginDoc
  1860. ;******************************************************************************
  1861. ;
  1862. ;   Emulate_Non_Byte_IO
  1863. ;
  1864. ; Emulate_Non_Byte_IO
  1865. ;
  1866. ;==============================================================================
  1867. EndDoc
  1868. Emulate_Non_Byte_IO MACRO
  1869. LOCAL Byte_IO
  1870. cmp ecx, Byte_Output
  1871. jbe SHORT Byte_IO
  1872. VMMjmp Simulate_IO
  1873. Byte_IO:
  1874. ENDM
  1877. VxD_IOT_Hdr STRUC
  1878. VxD_IO_Ports dw  ?
  1879. VxD_IOT_Hdr ENDS
  1881. VxD_IO_Struc STRUC
  1882. VxD_IO_Port dw  ?
  1883. VxD_IO_Proc dd  ?
  1884. VxD_IO_Struc ENDS
  1887. BeginDoc
  1888. ;******************************************************************************
  1889. ;
  1890. ; Begin_VxD_IO_Table
  1891. ;
  1892. ;   Example:
  1893. ; Begin_VxD_IO_Table MyTableName
  1894. ;
  1895. ;==============================================================================
  1896. EndDoc
  1897. .ERRNZ SIZE VxD_IOT_Hdr - 2 ; Begin_VxD_IO_Table creates a 1 word count hdr
  1898. Begin_VxD_IO_Table MACRO Table_Name
  1899. PUBLIC Table_Name
  1900. Table_Name LABEL WORD
  1901. IF2
  1902. IFNDEF Table_Name&_Entries
  1903. %OUT ERROR:  No End_VxD_IO_Table for &Table_Name
  1904. .ERR
  1905. ENDIF
  1906. dw Table_Name&_Entries
  1907. ELSE
  1908. dw ?
  1909. ENDIF
  1911. ENDM
  1913. .ERRNZ SIZE VxD_IO_Struc - 6 ; VxD_IO creates 6 byte I/O port entries
  1914. VxD_IO MACRO Port, Proc_Name
  1915. dw Port
  1916. dd OFFSET32 Proc_Name
  1917. ENDM
  1919. End_VxD_IO_Table MACRO Table_Name
  1921. IFNDEF Table_Name
  1922. %OUT ERROR:  No Begin_VxD_IO_Table for &Table_Name
  1923. .ERR
  1924. ELSE
  1925. Table_Name&_Entries EQU (($-Table_Name)-2) / (SIZE VxD_IO_Struc)
  1926. IF Table_Name&_Entries LE 0
  1927. %OUT ERROR:  Invalid number of port traps in &Table_Name
  1928. .ERR
  1929. ENDIF
  1930. ENDIF
  1931.     ENDM
  1934. ;******************************************************************************
  1935. ;******************************************************************************
  1937. Push_Client_State MACRO
  1938. sub esp, SIZE Client_Reg_Struc
  1939. push edi
  1940. lea edi, [esp+4]
  1941. VMMcall Save_Client_State
  1942. pop edi
  1943. ENDM
  1945. Pop_Client_State MACRO
  1946. push esi
  1947. lea esi, [esp+4]
  1948. VMMcall Restore_Client_State
  1949. pop esi
  1950. add esp, SIZE Client_Reg_Struc
  1951. ENDM
  1953. BeginDoc
  1954. ;******************************************************************************
  1955. ;
  1956. ;   CallRet -- Call procedure and return.  For debugging purposes only.
  1957. ;        If compiled with debugging then this will generate a call
  1958. ;        followed by a return.  If non-debugging version then the
  1959. ;        specified label will be jumped to.
  1960. ;
  1961. ;   PARAMETERS:
  1962. ; Label_Name = Procedure to be called
  1963. ;
  1964. ;   EXIT:
  1965. ; Return from current procedure
  1966. ;
  1967. ;------------------------------------------------------------------------------
  1968. EndDoc
  1970. CallRet MACRO P1, P2
  1971. IFDEF DEBUG
  1972. IFIDNI <P1>, <SHORT>
  1973. call P2
  1974. ELSE
  1975. call P1
  1976. ENDIF
  1977. ret
  1978. ELSE
  1979. jmp P1 P2
  1980. ENDIF
  1981. ENDM
  1984. ; ebp offsets to segments pushed by PMode_Fault in Fault_Dispatch
  1985. PClient_DS equ WORD PTR -4
  1986. PClient_ES equ WORD PTR -8
  1987. PClient_FS equ WORD PTR -12
  1988. PClient_GS equ WORD PTR -16
  1991. Client_Ptr_Flat MACRO Reg_32, Cli_Seg, Cli_Off
  1993. IFDIFI <Reg_32>, <EAX>
  1994. push eax
  1995. ENDIF
  1996. IFB <Cli_Off>
  1997. mov ax, (Client_&Cli_Seg * 100h) + 0FFh
  1998. ELSE
  1999. mov ax, (Client_&Cli_Seg * 100h) + Client_&Cli_Off
  2000. ENDIF
  2001. VMMcall Map_Flat
  2003. IFDIFI <Reg_32>, <EAX>
  2004. mov Reg_32, eax
  2005. pop eax
  2006. ENDIF
  2008. ENDM
  2010. ;------------------------------------------------------------------------------
  2012. VxDint MACRO Int_Number
  2013. push DWORD PTR Int_Number
  2014. VMMcall Exec_VxD_Int
  2015. ENDM
  2018. ENDIF ; Not_VxD
  2021. BeginDoc
  2022. ;******************************************************************************
  2023. ;
  2024. ;   The following equates are for flags sent to the real mode
  2025. ;   initialization portion of a device driver:
  2026. ;
  2027. Duplicate_Device_ID     equ 0000000000000001b   ; duplicate device ID already
  2028. Duplicate_Device_ID_Bit     equ         0    ; loaded
  2029. Duplicate_From_INT2F     equ 0000000000000010b   ; duplicate device ID already
  2030. Duplicate_From_INT2F_Bit    equ        1     ; loaded as part of INT 2F
  2031.     ; device list
  2032. Loading_From_INT2F     equ 0000000000000100b   ; this device was specified
  2033. Loading_From_INT2F_Bit     equ       2     ; in the INT 2F device list
  2035. EndDoc
  2037. BeginDoc
  2038. ;******************************************************************************
  2039. ;
  2040. ;   The following equates are used to indicate the result of the real mode
  2041. ;   initialization portion of a device driver:
  2042. ;
  2044. Device_Load_Ok     equ 0 ; protected mode portion of device
  2045. ; should be loaded
  2046. Abort_Device_Load   equ 1 ; don't load any protected mode portion
  2047. ; of this device, but continue loading
  2048. ; the rest of the devices
  2049. Abort_Win386_Load   equ 2 ; fatal-error: abort the load of Win386
  2051. No_Fail_Message     equ 8000h ; The high bit is set in the return
  2052. No_Fail_Message_Bit equ 15 ; code, if the loader should not print
  2053. ; any message for results
  2054. ; Abort_Device_Load or Abort_Win386_Load
  2055. ;==============================================================================
  2056. EndDoc
  2059. ;==============================================================================
  2061. ; CR0 bit assignments
  2062. PE_Mask  EQU 0001h ; 1 = Protected Mode
  2063. PE_Bit EQU 0
  2064. MP_Mask  EQU 0002h ; 1 = Monitor Coprocessor
  2065. MP_Bit EQU 1
  2066. EM_Mask  EQU 0004h ; 1 = Emulate Math Coprocessor
  2067. EM_Bit EQU 2
  2068. TS_Mask  EQU 0008h ; 1 = Task Switch occured
  2069. TS_Bit EQU 3
  2070. ET_Mask  EQU 0010h ; 1 = 387 present, 0 = 287 present
  2071. ET_Bit EQU 4
  2072. PG_Mask  EQU 80000000h ; 1 = paging enabled, 0 = paging disabled
  2073. PG_Bit EQU 31
  2075. ; EFLAGs bit assignments
  2076. CF_Mask  EQU 000000000000000001b ; Carry flag
  2077. CF_Bit EQU 0
  2078. PF_Mask  EQU 000000000000000100b ; Parity flag
  2079. PF_Bit EQU 2
  2080. AF_Mask  EQU 000000000000010000b ; Aux flag
  2081. AF_Bit EQU 4
  2082. ZF_Mask  EQU 000000000001000000b ; Zero flag
  2083. ZF_Bit EQU 6
  2084. SF_Mask  EQU 000000000010000000b ; Sign flag
  2085. SF_Bit EQU 7
  2086. TF_Mask  EQU 000000000100000000b ; Trace flag
  2087. TF_Bit EQU 8
  2088. IF_Mask  EQU 000000001000000000b ; Int flag
  2089. IF_Bit EQU 9
  2090. DF_Mask  EQU 000000010000000000b ; Direction flag
  2091. DB_Bit EQU 10
  2092. OF_Mask  EQU 000000100000000000b ; Overflow flag
  2093. OF_Bit EQU 11
  2094. IOPL_Mask EQU 000011000000000000b ; IOPL flags
  2095. IOPL_Bit0 EQU 12
  2096. IOPL_Bit1 EQU 13
  2097. NT_Mask  EQU 000100000000000000b ; Nested task flag
  2098. NT_Bit EQU 14
  2099. RF_Mask  EQU 010000000000000000b ; Resume flag
  2100. RF_Bit EQU 16
  2101. VM_Mask  EQU 100000000000000000b ; Virtual Mode flag
  2102. VM_Bit EQU 17
  2105. ;------------------------------------------------------------------------------
  2106. ;
  2107. ;   Temporary MASM macros (to be removed when supported by MASM)
  2108. ;
  2109. ;------------------------------------------------------------------------------
  2111. loopd EQU <loop>
  2112. loopde EQU <loope>
  2113. loopdne EQU <loopne>
  2114. loopdz EQU <loopz>
  2115. loopdnz EQU <loopnz>
  2118. ;******************************************************************************
  2119. ; PAGE TABLE EQUATES
  2120. ;******************************************************************************
  2123. P_SIZE equ 1000h ; page size
  2125. ; ---------------------------------------------------
  2126. ;
  2127. ; Page table entry bits
  2128. ;
  2129. ; ---------------------------------------------------
  2131. P_PRES equ 01h ; page present bit
  2132. P_WRITE  equ 02h ; write access bit
  2133. P_USER equ 04h ; access bit for User mode
  2134. P_ACC equ 20h ; page accessed bit
  2135. P_DIRTY  equ 40h ; page dirty bit
  2137. P_AVAIL  equ (P_PRES+P_WRITE+P_USER) ; avail to everyone & present
  2139. ; ---------------------------------------------------
  2140. ;
  2141. ;  Page types - definition of the OS reserved bits in the page table
  2142. ; entry.
  2143. ; ---------------------------------------------------
  2145. PG_TYPE  equ 0E00h ; TYPE bits in PTE
  2147. ; ---------------------------------------------------
  2148. ;
  2149. ;  Page types for page allocator calls
  2150. ;
  2151. ; ---------------------------------------------------
  2152. PG_VM equ 0
  2153. PG_SYS equ 1
  2154. PG_RESERVED1 equ 2
  2155. PG_PRIVATE equ 3
  2156. PG_RESERVED2 equ 4
  2157. PG_RELOCK equ 5 ; PRIVATE to MMGR
  2158. PG_INSTANCE equ 6
  2159. PG_HOOKED equ 7
  2160. PG_IGNORE equ 0FFFFFFFFh
  2163. ; ---------------------------------------------------
  2164. ;
  2165. ;  Types for page table entries
  2166. ;
  2167. ; ---------------------------------------------------
  2168. PgT_VM equ PG_VM SHL 9
  2169. PgT_SYS  equ PG_SYS SHL 9
  2170. PgT_RESERVED1 equ PG_RESERVED1 SHL 9
  2171. PgT_PRIVATE equ PG_PRIVATE SHL 9
  2172. PgT_RESERVED2 equ PG_RESERVED2 SHL 9
  2173. PgT_RELOCK equ PG_RELOCK SHL 9
  2174. PgT_INSTANCE equ PG_INSTANCE SHL 9
  2175. PgT_HOOKED equ PG_HOOKED SHL 9
  2179. ;******************************************************************************
  2181. ; ---------------------------------------------------
  2182. ;
  2183. ; Definitions for the access byte in a descriptor
  2184. ;
  2185. ; ---------------------------------------------------
  2188. ; Following fields are common to segment and control descriptors
  2190. D_PRES equ 080h ; present in memory
  2191. D_NOTPRES equ 0 ; not present in memory
  2193. D_DPL0 equ 0 ; Ring 0
  2194. D_DPL1 equ 020h ; Ring 1
  2195. D_DPL2 equ 040h ; Ring 2
  2196. D_DPL3 equ 060h ; Ring 3
  2198. D_SEG equ 010h ; Segment descriptor
  2199. D_CTRL equ 0 ; Control descriptor
  2201. D_GRAN_BYTE equ 000h ; Segment length is byte granular
  2202. D_GRAN_PAGE equ 080h ; Segment length is page granular
  2203. D_DEF16  equ 000h ; Default operation size is 16 bits
  2204. D_DEF32  equ 040h ; Default operation size is 32 bits
  2207. ; Following fields are specific to segment descriptors
  2209. D_CODE equ 08h ; code
  2210. D_DATA equ 0 ; data
  2212. D_RX equ 02h ; if code, readable
  2213. D_X equ 0 ; if code, exec only
  2214. D_W equ 02h ; if data, writable
  2215. D_R equ 0 ; if data, read only
  2217. D_ACCESSED equ 1 ; segment accessed bit
  2220. ; Useful combination access rights bytes
  2222. RW_Data_Type equ (D_PRES+D_SEG+D_DATA+D_W)
  2223. R_Data_Type  equ (D_PRES+D_SEG+D_DATA+D_R)
  2224. Code_Type    equ (D_PRES+D_SEG+D_CODE+D_RX)
  2226. D_PAGE32 equ (D_GRAN_PAGE+D_DEF32)   ; 32 bit Page granular
  2228. ; Masks for selector fields
  2230. SELECTOR_MASK equ 0fff8h ; selector index
  2231. SEL_LOW_MASK equ 0f8h ; mask for low byte of sel indx
  2232. TABLE_MASK equ 04h ; table bit
  2233. RPL_MASK equ 03h ; privilige bits
  2234. RPL_CLR  equ not 03h  ; clear ring bits