Windows串口调试通信协议KDCOM.DLL的反向分析及Asm和C源代码

于 2008-09-21 21:08:00 发布
阅读量7.3k 收藏 1
点赞数
文章标签： c windows exception file byte transition
版权声明：本文为博主原创文章，遵循 CC 4.0 BY-SA 版权协议，转载请附上原文出处链接和本声明。
本文链接：https://blog.csdn.net/aerror/article/details/2958588
版权

前段时间突然兴趣大发,把KDCOM.DLL用IDA进行了分析和阅读,并导出成asm文件，作了修改和编译使之可以编译后替换原先的kdcom.dll正常工作, 这之间最难的莫过于kdcom.dll无法进行调试和跟踪的问题了, 手段非常有限, 我暂时只知道使用一下Vmware的后门I/O port进行一些检测性的LOG,以致使由反向代码编译出的kdom.dll最终能正常工作花费了我极多的时间.

事实上, 由IDA导出的代码要修改的问题并不多,只涉及到以下方面:

1.API函数导入和导出的问题,包括命名和正确链接;

2.代码的区段问题和一些全局绝对址的引用问题,如_KUSER_SHARED_DATA的引用,IDA反编出是这样的 
and byte ptr ds:0FFDF02D4h, 0FDh
事实上必须写成 and byte ptr ds:[0FFDF02D4h], 0FDh
否则Masm32编译生成出问题,VMWARE直接就崩溃.

3.导入变量的地址使用问题,这里是搞了我最多时间的地方,因为,发生这种异常VMWARE直接就出错,结束,郁闷呀.
 类似第2点的问题,
 例如,IDA反编出来的，关于使用KdDebuggerNotPresent这个由ntosknrl.exe导出的符时,语句是这样的

  1.  mov     eax, ds:_KdDebuggerNotPresent
  2.  and     byte ptr [eax], 0


 把_KdDebuggerNotPresent改成KdDebuggerNotPresent编译和链接都没有问题,都一运行VMWARE就直接崩溃.
 事实上应该写成这样的(这个可是花了我无数的时间才发现的,--#):

  1.  mov     eax, dword ptr ds:[KdDebuggerNotPresent]
  2.   and     byte ptr [eax], 0


下面给出可以编译生成正常运行的反向汇编源代码,有三个文件kdcom.Inc,kdcom.def和kdcom.Asm,需要安装RadASM这个IDE来编译.

kdcom.Inc:

 

  2. ;kdcom.Inc
  3. ;
  4. include w2k/ntstatus.inc
  5. include w2k/ntddk.inc
  6. include w2k/ntoskrnl.inc
  7. include w2k/hal.inc
  8. includelib hal.lib
  9. includelib ntoskrnl.lib

 

kdcom.def

  1. EXPORTS
  2.  KdD0Transition          
  3.  KdD3Transition=KdD0Transition 
  4.  KdDebuggerInitialize0      
  5.  KdDebuggerInitialize1      
  6.  KdReceivePacket            
  7.  KdRestore                  
  8.  KdSave                     
  9.  KdSendPacket               

kdcom.Asm:

 

 

 

  1. ;
  2. ; BBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBB
  3. ; ?This file is generated by The Interactive Disassembler (IDA)     ?
  5. .686p
  6. .model flat,stdcall
  8. include kdcom.inc
  10. ;
  11. ;import variable 
  12. ;            extrn KdComPortInUse:dword
  13. ;                extrn KdDebuggerNotPresent:dword
  14. ;                extrn HalPrivateDispatchTable:dword
  18. ; Section 2. (virtual address 00000D00)
  19. ; Virtual size          : 0000009C (    156.)
  20. ; Section size in file      : 00000100 (    256.)
  21. ; Offset to raw data for section: 00000D00
  22. ; Flags C8000040: Data Not pageable Readable Writable
  23. ; Alignment : default
  24. ; BBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBB
  26. ; Segment type: Pure data
  27. ; Segment permissions: Read/Write
  28. _data       segment para public 'DATA' use32
  29.         
  30. aKdReceivePacket        db 'KdReceivePacket',0Ah,0Dh,0
  31. aKdSendPacket           db 'KdSendPacket',0
  34. aSwitchingDebug         db 'Switching debugger to 9600 baud',0Ah,0 ; DATA XREF: CpReadLsr(x,x)+194o
  36. aDebugport          db 'DEBUGPORT',0        ; DATA XREF: KdDebuggerInitialize0(x)+18o
  38. aBaudrate           db 'BAUDRATE',0         ; DATA XREF: KdDebuggerInitialize0(x)+25o
  40. aCom                db 'COM',0              ; DATA XREF: KdDebuggerInitialize0(x)+3Bo
  42. _KdCompNumberRetries        dd  5       ; DATA XREF: KdReceivePacket(x,x,x,x,x)+51w
  43.                         ; KdSendPacket(x,x,x,x)+54w ...
  44. _KdCompRetryCount       dd  5           ; DATA XREF: KdReceivePacket(x,x,x,x,x)+4Br
  45.                         ; KdSendPacket(x,x,x,x)+3Br ...
  46. _KdCompDbgPortsPresent      db  1       ; DATA XREF: KdRestore(x)+7w
  47.                         ; CpReadLsr(x,x)+34w ...
  48. aPrtOvlFrm          db  20h         ; DATA XREF: CpReadLsr(x,x)+1ACo
  49.                 db  50h ; P
  50.                 db  52h ; R
  51.                 db  54h ; T
  52.                 db  20h
  53.                 db  4Fh ; O
  54.                 db  56h ; V
  55.                 db  4Ch ; L
  56.                 db  20h
  57.                 db  46h ; F
  58.                 db  52h ; R
  59.                 db  4Dh ; M
  60. aAt             db 0Ah          ; DATA XREF: CpReadLsr(x,x)+D5o
  61.                 db 0Dh,'AT',0Ah
  62.                 db 0Dh,0
  64. _Port               dd    0         ; DATA XREF: KdCompGetByte(x)+6o
  65.                     ; KdCompPollByte(x)+6o ...
  66. _com_status_flag        db    1         ; DATA XREF: KdCompRestore()w
  67.                     ; KdCompSave()w ...
  68.                 db    0
  69.                 db    0
  70.                 db    0
  71.                 db    0
  72.                 db    0
  73.                 db    0
  74.                 db    0
  75.                 db    0
  76.                 db    0
  77.                 db    0
  78.                 db    0
  79.                 db    0
  80.                 db    0
  81.                 db    0
  82.                 db    0
  83.                 db    0
  84.                 db    0
  85.                 db    0
  86.                 db    0
  88. _PortInformation        dd 0            ; DATA XREF: KdCompInitialize(x,x)+88w
  89.                     ; KdCompInitialize(x,x):loc_GetSavedPortInfow ...
  90. _ComBaudratePara        dd 0            ; DATA XREF: KdCompInitialize(x,x)+B5w
  91.                     ; KdCompInitialize(x,x)+CBw ...
  92.                 db    1
  93.                 db    0
  94.                 db    0
  95.                 db    0
  96.                 db    0
  97.                 db    0
  98.                 db    0
  99.                 db    0
  100.                 db    0
  101.                 db    0
  102.                 db    0
  103.                 db    0
  104.                 db    0
  105.                 db    0
  106.                 db    0
  107.                 db    0
  108.                 db    0
  109.                 db    0
  110.                 db    0
  111.                 db    0
  113. _KdComAddressID         db 1            ; DATA XREF: KdCompInitialize1()r
  114.                                 ; KdCompInitialize(x,x)+4Aw ...
  115. _KdWriteUchar           dd offset CpWritePortUchar ;    DATA XREF: CpSetBaud(x,x)+2Dr
  116.                                 ; CpSetBaud(x,x)+3Er ...
  117.                                 ; CpWritePortUchar(x,x)
  118. _KdReadUchar            dd offset CpReadPortUchar ; DATA XREF: CpSetBaud(x,x)+1Er
  119.                                 ; CpSendModemString(x,x)+A4r ...
  120.                                 ; CpReadPortUchar(x)
  121. _KdCompDbgParams        dd 0            ; DATA XREF: KdDebuggerInitialize0(x)+56w
  122.                                 ; KdDebuggerInitialize0(x)+7Fo
  123. _ArgKdcomBaudrate       dd 0            ; DATA XREF: KdDebuggerInitialize0(x)+78w
  124. _KdCompPacketIdExpected     dd 0        ; DATA XREF: KdDebuggerInitialize0(x)+98w
  125.                                 ; KdReceivePacket(x,x,x,x,x)+13Dr ...
  126. _KdCompNextPacketIdToSend   dd 0        ; DATA XREF: KdDebuggerInitialize0(x)+8Ew
  127.                                 ; KdReceivePacket(x,x,x,x,x)+F8r ...
  128. byte_MsrLastValue       db 0            ; DATA XREF: CpReadLsr(x,x)+149r
  129.                                 ; CpReadLsr(x,x)+1E0w
  130. byte_LsrExpectedError       db 0            ; DATA XREF: CpReadLsr(x,x)+74w
  131.                                 ; CpReadLsr(x,x)+13Er ...
  132. dword_80010D7C          dd 0            ; DATA XREF: CpSendModemString(x,x)+1Er
  133.                     ; CpSendModemString(x,x)+4Bw ...
  134. byte_LsrParityError     db 0            ; DATA XREF: CpReadLsr(x,x)+4Cw
  135.                     ; CpReadLsr(x,x)+1A7o
  136. byte_LsrOverrunError        db 0            ; DATA XREF: CpReadLsr(x,x)+58w
  137. byte_LsrFramingError        db 0            ; DATA XREF: CpReadLsr(x,x)+64w
  138. _KdCompDbgErrorCount        db  0       ; DATA XREF: CpReadLsr(x,x)+21w
  139.                     ; CpReadLsr(x,x)+27r ...
  140. byte_MsrRingIndicator       db 0            ; DATA XREF: CpReadLsr(x,x)+BDw
  141.                     ; CpReadLsr(x,x)+15Ew ...
  142. _ComPort            dd 0            ; DATA XREF: KdCompInitialize(x,x)+22Cw
  143. _HalpGetInfoFromACPI        db  0       ; DATA XREF: KdCompInitialize(x,x)+A1w
  144.                     ; KdCompInitialize(x,x)+E9r
  145.                     
  146. _DbgpKdComPhysicalAddress0      dd 0 ; DATA XREF: KdCompInitialize1()+13r
  147. _DbgpKdComPhysicalAddress4      dd 0 ; DATA XREF: KdCompInitialize1()+13r
  148.                     ; KdCompInitialize(x,x)+60w ...
  149. _HalpDebugPortTable         dd 0        ; DATA XREF: KdCompInitialize(x,x)+2Ew
  150.                     ; KdCompInitialize(x,x):loc_80010A63r ...
  151. _HintsCount         dd  0CAFEBEBEh      
  152. _data       ends
  155. .CODE _text     
  158. HintOsNotFound  proc near               ; CODE XREF: KdVmCommunicationsBackChannelNotify+1Ap
  159.                     pushad
  160.                 mov     eax, 564D5868h
  161.                 mov ebx,_HintsCount
  162.                 inc ebx
  163.                 mov _HintsCount,ebx
  164.                 cmp         ebx,0CAFEBEC0h
  165.                                 ja  loc_return
  166.                 mov     cx, 12h
  167.                 mov     dx, 5658h
  168.                 in      eax, dx         
  169. loc_return:
  170.                 popad
  171.                 retn
  172. HintOsNotFound  endp
  176. ; BBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBB
  178. ; Segment type: Pure code
  179. ; Segment permissions: Read/Execute
  180. ;_text      segment para public 'CODE' use32
  181. ;       assume cs:_text
  182.         ;org 80010344h
  183. ;       assume es:nothing, ss:nothing, _data, fs:nothing, gs:nothing
  185. ;AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
  186. ; Exported entry   1. KdD0Transition
  187. ; Exported entry   2. KdD3Transition
  188. ; _stdcall KdD0Transition()
  189.         public KdD0Transition
  190. KdD0Transition proc near
  191.         xor eax, eax    ; KdD0Transition
  192.         retn
  193. KdD0Transition endp
  195. ; CCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCC
  196. ; Exported entry   3. KdDebuggerInitialize0
  197. ; _stdcall KdDebuggerInitialize0(pctx)
  198.         public KdDebuggerInitialize0
  199. KdDebuggerInitialize0 proc near
  201. var_C       = dword ptr -0Ch
  202. arg_0       = dword ptr  8
  204.         push    ebx
  205.         mov ebx, [esp+arg_0]
  206.         test    ebx, ebx
  207.         jz  short loc_reinit
  208.         
  209.         push    esi
  210.         mov esi, [ebx+44h]
  211.         test    esi, esi
  212.         jz  short loc_80010423
  213.         push    edi
  214.         push    esi     ; char *
  215.         call    _strupr
  216.         
  217.         mov [esp+0Ch+var_C], offset aDebugport ; "DEBUGPORT"
  218.         push    esi     ; char *
  219.         call     strstr
  220.         push    offset aBaudrate ; "BAUDRATE"
  221.         push    esi     ; char *
  222.         mov edi, eax
  223.         call     strstr
  224.         add esp, 10h
  225.         test    edi, edi
  226.         mov esi, eax
  227.         jz  short loc_80010401
  228.         push    offset aCom ; "COM"
  229.         push    edi     ; char *
  230.         call     strstr
  231.         test    eax, eax
  232.         pop ecx
  233.         pop ecx
  234.         jz  short loc_80010401
  235.         add eax, 3
  236.         push    eax
  237.         call     atol
  238.         pop ecx
  239.         mov _KdCompDbgParams, eax
  241. loc_80010401:               ; CODE XREF: KdDebuggerInitialize0(x)+39j
  242.                     ; KdDebuggerInitialize0(x)+4Aj
  243.         test    esi, esi
  244.         pop edi
  245.         jz  short loc_80010423
  246.         add esi, 8
  247.         jmp short loc_8001040C
  248. ; CCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCC
  250. loc_8001040B:               ; CODE XREF: KdDebuggerInitialize0(x)+69j
  251.         inc esi
  253. loc_8001040C:               ; CODE XREF: KdDebuggerInitialize0(x)+63j
  254.         cmp byte ptr [esi], 20h ; Data Ready?
  255.         jz  short loc_8001040B
  256.         cmp byte ptr [esi], 0
  257.         jz  short loc_80010423
  258.         inc esi
  259.         push    esi
  260.         call     atol
  261.         pop ecx
  262.         mov _ArgKdcomBaudrate,  eax
  264. loc_80010423:               ; CODE XREF: KdDebuggerInitialize0(x)+Fj
  265.                     ; KdDebuggerInitialize0(x)+5Ej ...
  266.         pop esi
  268. loc_reinit:             ; CODE XREF: KdDebuggerInitialize0(x)+7j
  269.         push    ebx
  270.         push    offset _KdCompDbgParams
  271.         call    KdCompInitialize ; KdCompInitialize(_KdCompDbgParams,pctx)
  272.         
  273.         test    eax, eax
  274.         pop ebx
  275.         jl  short locret_80010448
  276.         mov _KdCompNextPacketIdToSend, 80800800h
  277.         mov _KdCompPacketIdExpected, 80800000h
  279. locret_80010448:            ; CODE XREF: KdDebuggerInitialize0(x)+8Cj
  280.         retn    4
  281. KdDebuggerInitialize0 endp
  283. ;++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
  284. ; Exported entry   4. KdDebuggerInitialize1
  285. ;------------------------------------------------------------------------ 
  287. ; _stdcall KdDebuggerInitialize1(x)
  288.         public KdDebuggerInitialize1
  289. KdDebuggerInitialize1 proc near
  290.         call    KdCompInitialize1 ; KdCompInitialize1()
  291.         xor eax, eax
  292.         retn    4
  293. KdDebuggerInitialize1 endp
  295. ; Exported entry   7. KdSave
  297. ;------------------------------------------------------------------------ 
  299. ; _stdcall KdSave(x)
  300.         public KdSave
  301. KdSave  proc near
  302.         call    KdCompSave  ; KdCompSave()
  303.         xor eax, eax
  304.         retn    4
  305. KdSave  endp
  307. ; Exported entry   6. KdRestore
  309. ;------------------------------------------------------------------------ 
  311. ; _stdcall KdRestore(x)
  312.         public KdRestore
  313. KdRestore   proc near
  315. arg_0       = byte ptr  4
  316.         cmp [esp+arg_0], 0
  317.         jz  short loc_80010470
  318.         and _KdCompDbgPortsPresent, 0
  319.         jmp short loc_80010475
  320. ; ++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
  322. loc_80010470:               ; CODE XREF: KdRestore(x)+5j
  323.         call    KdCompRestore ; KdCompRestore()
  325. loc_80010475:               ; CODE XREF: KdRestore(x)+Ej
  326.         xor eax, eax
  327.         retn    4
  328. KdRestore   endp
  331. ;------------------------------------------------------------------------ 
  332. ; Attributes: bp-based frame
  334. ; _stdcall CpSetBaud(x, x)
  335. CpSetBaud   proc near       ; CODE XREF: CpReadLsr(x,x)+1A0p
  336.                     ; CpGetByte(x,x,x)+3Ap ...
  338. arg_0       = dword ptr  8
  339. arg_4       = dword ptr  0Ch
  341.         
  342.         push    ebp
  343.         mov ebp, esp
  344.         push    ebx
  345.         mov ebx, [ebp+arg_4]
  346.         xor edx, edx
  347.         mov eax, 1C200h
  348.         div ebx
  349.         push    esi
  350.         push    edi
  351.         mov edi, [ebp+arg_0]
  352.         mov esi, [edi]
  353.         add esi, 3
  354.         push    esi
  355.         mov [ebp+arg_4], eax
  356.         call    _KdReadUchar    ; CpReadPortUchar(x)
  357.         
  358.         or  al, 80h
  359.         mov byte ptr [ebp+arg_0], al
  360.         push    [ebp+arg_0]
  361.         push    esi
  362.         call    _KdWriteUchar   ; CpWritePortUchar(x,x)
  363.         mov eax, [ebp+arg_4]
  364.         mov esi, [edi]
  365.         shr eax, 8
  366.         push    eax
  367.         inc esi
  368.         push    esi
  369.         call    _KdWriteUchar   ; CpWritePortUchar(x,x)
  370.         push    [ebp+arg_4]
  371.         dec esi
  372.         push    esi
  373.         call    _KdWriteUchar   ; CpWritePortUchar(x,x)
  374.         mov eax, [edi]
  375.         push    3
  376.         add eax, 3
  377.         push    eax
  378.         call    _KdWriteUchar   ; CpWritePortUchar(x,x)
  379.         mov [edi+4], ebx
  380.         pop edi
  381.         pop esi
  382.         pop ebx
  383.         pop ebp
  384.         retn    8
  385. CpSetBaud   endp
  387. ; ++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
  388. ;------------------------------------------------------------------------ 
  389. ; Attributes: bp-based frame
  391. ; _stdcall CpSendModemString(x, x)
  392. CpSendModemString proc near     ; CODE XREF: CpReadLsr(x,x)+ECp
  393.                     ; CpReadLsr(x,x)+120p
  395. var_10      = dword ptr -10h
  396. var_6       = word ptr -6
  397. arg_0       = dword ptr  8
  398. arg_4       = dword ptr  0Ch
  400.         push    ebp
  401.         mov ebp, esp
  402.         sub esp, 10h
  403.         push    esi
  404.         mov esi, [ebp+arg_0]
  405.         mov ax, [esi+8]
  406.         test    al, 40h
  407.         jnz loc_80010597
  408.         
  409.         or  ax, 40h
  410.         mov [esi+8], ax
  411.         mov eax, dword_80010D7C
  412.         test    eax, eax
  413.         push    ebx
  414.         push    edi
  415.         jnz short loc_80010548
  416.         
  417.         lea eax, [ebp+var_10]
  418.         push    eax
  419.         call     HalQueryRealTimeClock ; HalQueryRealTimeClock(x)
  420.         movsx   edi, [ebp+var_6]
  422. loc_80010518:               ; CODE XREF: CpSendModemString(x,x)+53j
  423.         push    0
  424.         push    esi
  425.         call    CpReadLsr   ; CpReadLsr(x,x)
  426.         lea eax, [ebp+var_10]
  427.         push    eax
  428.         call     HalQueryRealTimeClock ; HalQueryRealTimeClock(x)
  429.         movsx   eax, [ebp+var_6]
  430.         inc dword_80010D7C
  431.         cmp edi, eax
  432.         jz  short loc_80010518
  433.         
  434.         mov eax, dword_80010D7C
  435.         push    3
  436.         xor edx, edx
  437.         pop ecx
  438.         div ecx
  439.         mov dword_80010D7C, eax
  441. loc_80010548:               ; CODE XREF: CpSendModemString(x,x)+27j
  442.         mov edi, [ebp+arg_4]
  443.         mov ebx, eax
  444.         jmp short loc_8001058C
  445. ; ++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
  447. loc_8001054F:               ; CODE XREF: CpSendModemString(x,x)+ADj
  448.         lea eax, [ebp+var_10]
  449.         push    eax
  450.         call     HalQueryRealTimeClock ; HalQueryRealTimeClock(x)
  451.         push    0
  452.         push    esi
  453.         call    CpReadLsr   ; CpReadLsr(x,x)
  454.         test    al, 20h
  455.         mov byte ptr [ebp+arg_0+3], al
  456.         jz  short loc_8001057E
  457.         dec ebx
  458.         jnz short loc_8001057E
  459.         xor eax, eax
  460.         mov al, [edi]
  461.         push    eax
  462.         push    dword ptr [esi]
  463.         call    _KdWriteUchar   ; CpWritePortUchar(x,x)
  464.         mov ebx, dword_80010D7C
  465.         inc edi
  467. loc_8001057E:               ; CODE XREF: CpSendModemString(x,x)+83j
  468.                     ; CpSendModemString(x,x)+86j
  469.         test    byte ptr [ebp+arg_0+3], 1
  470.         jz  short loc_8001058C
  471.         push    dword ptr [esi]
  472.         call    _KdReadUchar    ; CpReadPortUchar(x)
  474. loc_8001058C:               ; CODE XREF: CpSendModemString(x,x)+6Bj
  475.                     ; CpSendModemString(x,x)+A0j
  476.         cmp byte ptr [edi], 0
  477.         jnz short loc_8001054F
  478.         and byte ptr [esi+8], 0BFh
  479.         pop edi
  480.         pop ebx
  482. loc_80010597:               ; CODE XREF: CpSendModemString(x,x)+10j
  483.         pop esi
  484.         leave
  485.         retn    8
  486. CpSendModemString endp
  488. ; ++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
  489. ;------------------------------------------------------------------------ 
  490. ; Attributes: bp-based frame
  492. ; _stdcall CpReadLsr(x, x)
  493. CpReadLsr   proc near       ; CODE XREF: CpSendModemString(x,x)+39p
  494.                     ; CpSendModemString(x,x)+79p ...
  496. var_18      = dword ptr -18h
  497. var_10      = dword ptr -10h
  498. var_8       = word ptr -8
  499. var_6       = word ptr -6
  500. port        = dword ptr  8
  501. vLsr        = dword ptr  0Bh
  502. CheckStatus = byte ptr  0Ch
  503. vMsr        = byte ptr  0Fh
  505.         push    ebp
  506.         mov ebp, esp
  507.         sub esp, 40h
  508.         push    esi
  509.         mov esi, [ebp+port]
  510.         mov eax, [esi]
  511.         add eax, 5
  512.         push    eax
  513.         call    _KdReadUchar    ; CpReadPortUchar(x)
  514.         mov cl, al
  515.         mov al, 0FFh
  516.         cmp cl, al
  517.         mov byte ptr [ebp+vLsr],    cl ;Lsr
  518.         jnz short loc_80010604
  519.         inc _KdCompDbgErrorCount
  520.         cmp _KdCompDbgErrorCount, 19h
  521.         jb  loc_800107A4
  522.         and _KdCompDbgPortsPresent, 0
  523.         and _KdCompDbgErrorCount, 0
  524.         jmp loc_800107A4
  525. ; ++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
  527. loc_80010604:               ; CODE XREF: CpReadLsr(x,x)+1Fj
  528.         test    cl, 4       ; Parity Error?
  529.         jz  short loc_80010610
  530.         mov byte_LsrParityError, 8
  532. loc_80010610:               ; CODE XREF: CpReadLsr(x,x)+4Aj
  533.         test    cl, 2       ; Overrun Error?
  534.         jz  short loc_8001061C
  535.         mov byte_LsrOverrunError, 8
  537. loc_8001061C:               ; CODE XREF: CpReadLsr(x,x)+56j
  538.         test    cl, 8       ; Framing Error?
  539.         jz  short loc_80010628
  540.         mov byte_LsrFramingError, 8
  542. loc_80010628:               ; CODE XREF: CpReadLsr(x,x)+62j
  543.         test    [ebp+CheckStatus], cl   ; ?Expectecd
  544.         jz  short loc_notCheckStatus
  545.         mov al, cl
  546.         or  al, 0FEh
  547.         mov byte_LsrExpectedError, al
  548.         mov al, cl
  549.         jmp loc_800107A4
  550. ; ++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
  552. loc_notCheckStatus:             ; CODE XREF: CpReadLsr(x,x)+6Ej
  553.         mov eax, [esi]
  554.         push    edi
  555.         add eax, 6
  556.         push    eax
  557.         call    _KdReadUchar    ; CpReadPortUchar(x)
  558.         mov [ebp+vMsr], al
  559.         mov ax, [esi+8]
  560.         test    al, 2
  561.         jz  loc_800106E2
  562.         test    [ebp+vMsr], 80h
  563.         jz  short loc_80010669
  564.         or  ax, 90h
  565.         mov [esi+8], ax
  566.         jmp short loc_800106E2
  567. ; ++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
  569. loc_80010669:               ; CODE XREF: CpReadLsr(x,x)+A0j
  570.         test    al, 10h
  571.         jz  short loc_80010681
  572.         lea eax, [esi+0Ah]
  573.         push    eax
  574.         call     HalQueryRealTimeClock ; HalQueryRealTimeClock(x)
  575.         and byte ptr [esi+8], 0EFh
  576.         and byte_MsrRingIndicator, 0
  578. loc_80010681:               ; CODE XREF: CpReadLsr(x,x)+AEj
  579.         lea eax, [ebp+var_10]
  580.         push    eax
  581.         call     HalQueryRealTimeClock ; HalQueryRealTimeClock(x)
  582.         mov ax, [ebp+var_8]
  583.         cmp ax, [esi+12h]
  584.         mov edi, offset aAt ; "/n/rAT/n/r"
  585.         jz  short loc_800106AE
  586.         mov ax, [ebp+var_6]
  587.         cmp ax, [esi+14h]
  588.         jl  short loc_800106AE
  589.         and byte ptr [esi+8], 0FDh
  590.         push    edi
  591.         push    esi
  592.         call    CpSendModemString ; CpSendModemString(x,x)
  594. loc_800106AE:               ; CODE XREF: CpReadLsr(x,x)+DAj
  595.                     ; CpReadLsr(x,x)+E4j
  596.         mov ax, [esi+8]
  597.         test    al, al
  598.         jns short loc_800106E2
  599.         mov cx, [esi+14h]
  600.         cmp [ebp+var_6], cx
  601.         jge short loc_800106C5
  602.         add [ebp+var_6], 3Ch
  604. loc_800106C5:               ; CODE XREF: CpReadLsr(x,x)+101j
  605.         movsx   edx, [ebp+var_6]
  606.         movsx   ecx, cx
  607.         add ecx, 0Ah
  608.         cmp edx, ecx
  609.         jle short loc_800106E2
  610.         push    edi
  611.         and ax, 0FF7Fh
  612.         push    esi
  613.         mov [esi+8], ax
  614.         call    CpSendModemString ; CpSendModemString(x,x)
  616. loc_800106E2:               ; CODE XREF: CpReadLsr(x,x)+96j
  617.                     ; CpReadLsr(x,x)+AAj ...
  618.         test    byte ptr [esi+8], 4
  619.         jnz short loc_800106F0
  620.         mov al, byte ptr [ebp+vLsr]
  621.         jmp loc_800107A3
  622. ; ++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
  624. loc_800106F0:               ; CODE XREF: CpReadLsr(x,x)+129j
  625.         mov eax, dword ptr ds:[HalPrivateDispatchTable]
  626.         call    dword ptr [eax+3Ch]
  627.         mov al, byte ptr [ebp+vLsr]
  628.         cmp al, byte_LsrExpectedError
  629.         jnz short loc_80010712
  630.         mov cl, [ebp+vMsr]
  631.         cmp cl, byte_MsrLastValue
  632.         jz  loc_800107A3
  634. loc_80010712:               ; CODE XREF: CpReadLsr(x,x)+144j
  635.         test    [ebp+vMsr], 40h ; Ring Indicator ?
  636.         setz    al
  637.         inc al
  638.         or  byte_MsrRingIndicator, al
  639.         cmp byte_MsrRingIndicator, 3
  640.         jnz short loc_80010762
  641.         and byte_MsrRingIndicator, 0
  642.         xor eax, eax
  643.         mov ax, [esi+8]
  644.         and eax, 0FF7Fh
  645.         or  eax, 12h
  646.         test    al, 1
  647.         mov [esi+8], ax
  648.         jz  short loc_80010762
  649.         mov edi, 2580h
  650.         cmp [esi+4], edi
  651.         jz  short loc_80010762
  652.         push    offset aSwitchingDebug ; "Switching debugger to 9600 baud/n"
  653.         call    ds:InbvDisplayString ; InbvDisplayString(x)
  654.         push    edi
  655.         push    esi
  656.         call    CpSetBaud   ; CpSetBaud(x,x)
  658. loc_80010762:               ; CODE XREF: CpReadLsr(x,x)+16Bj
  659.                     ; CpReadLsr(x,x)+188j ...
  660.         push    3
  661.         mov edx, offset byte_LsrParityError
  662.         mov esi, offset aPrtOvlFrm
  663.         lea ecx, [ebp+var_18]
  664.         pop edi
  666. loc_80010772:               ; CODE XREF: CpReadLsr(x,x)+1D3j
  667.         mov al, [edx]
  668.         test    al, al
  669.         jz  short loc_80010782
  670.         dec al
  671.         mov [edx], al
  672.         mov eax, [esi]
  673.         mov [ecx], eax
  674.         jmp short loc_80010788
  675. ; ++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
  677. loc_80010782:               ; CODE XREF: CpReadLsr(x,x)+1B9j
  678.         mov dword ptr [ecx], 20202020h
  680. loc_80010788:               ; CODE XREF: CpReadLsr(x,x)+1C3j
  681.         inc edx
  682.         add esi, 4
  683.         sub ecx, 4
  684.         dec edi
  685.         jnz short loc_80010772
  686.         mov al, byte ptr [ebp+vLsr]
  687.         mov cl, [ebp+vMsr]
  688.         mov byte_LsrExpectedError, al
  689.         mov byte_MsrLastValue, cl
  691. loc_800107A3:               ; CODE XREF: CpReadLsr(x,x)+12Ej
  692.                     ; CpReadLsr(x,x)+14Fj
  693.         pop edi
  695. loc_800107A4:               ; CODE XREF: CpReadLsr(x,x)+2Ej
  696.                     ; CpReadLsr(x,x)+42j ...
  697.         pop esi
  698.         leave
  699.         retn    8
  700. CpReadLsr   endp
  702. ; ++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
  703. ;------------------------------------------------------------------------ 
  704. ; _stdcall CpPutByte(x, x)
  705. CpPutByte   proc near       ; CODE XREF: KdCompPutByte(x)+9p
  707. arg_0       = dword ptr  4
  709.         cmp _KdCompDbgPortsPresent, 0
  710.         jz  short locret_8001080D
  711.         push    esi
  712.         mov esi, [esp+4+arg_0]
  713.         test    byte ptr [esi+8], 2
  714.         jz  short loc_800107F4
  715.         push    ebx
  717. loc_800107BF:               ; CODE XREF: CpPutByte(x,x)+47j
  718.         mov eax, [esi]
  719.         add eax, 6
  720.         push    eax
  721.         call    _KdReadUchar    ; CpReadPortUchar(x)
  722.         mov bl, al
  723.         and bl, 0B0h
  724.         cmp bl, 0B0h
  725.         jz  short loc_800107F3
  726.         push    0
  727.         push    esi
  728.         call    CpReadLsr   ; CpReadLsr(x,x)
  729.         test    bl, bl
  730.         js  short loc_800107ED
  731.         test    al, 1
  732.         jz  short loc_800107ED
  733.         push    dword ptr [esi]
  734.         call    _KdReadUchar    ; CpReadPortUchar(x)
  736. loc_800107ED:               ; CODE XREF: CpPutByte(x,x)+35j
  737.                     ; CpPutByte(x,x)+39j
  738.         test    byte ptr [esi+8], 2
  739.         jnz short loc_800107BF
  741. loc_800107F3:               ; CODE XREF: CpPutByte(x,x)+29j
  742.         pop ebx
  744. loc_800107F4:               ; CODE XREF: CpPutByte(x,x)+12j
  745.                     ; CpPutByte(x,x)+54j
  746.         push    20h
  747.         push    esi
  748.         call    CpReadLsr   ; CpReadLsr(x,x)
  749.         test    al, 20h
  750.         jz  short loc_800107F4
  751.         push    dword ptr [esp+0Ch]
  752.         push    dword ptr [esi]
  753.         call    _KdWriteUchar   ; CpWritePortUchar(x,x)
  754.         pop esi
  756. locret_8001080D:            ; CODE XREF: CpPutByte(x,x)+7j
  757.         retn    8
  758. CpPutByte   endp
  761. ;------------------------------------------------------------------------ 
  762. ; Attributes: bp-based frame
  763. ; _stdcall CpGetByte(x, x, x)
  764. CpGetByte   proc near       ; CODE XREF: KdCompGetByte(x)+Bp
  765.                     ; KdCompPollByte(x)+Bp
  767. arg_0       = dword ptr  8
  768. arg_4       = dword ptr  0Ch
  769. arg_8       = byte ptr  10h
  770. arg_B       = byte ptr  13h
  772.         push    ebp
  773.         mov ebp, esp
  774.         push    esi
  775.         mov esi, [ebp+arg_0]
  776.         cmp dword ptr [esi], 0
  777.         jnz short loc_portIsOk
  778.         
  779.         mov eax, dword ptr ds:[HalPrivateDispatchTable]
  780.         call    dword ptr [eax+3Ch]
  781.         mov ax, 1
  782.         jmp loc_return
  783. ; ++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
  785. loc_portIsOk:               ; CODE XREF: CpGetByte(x,x,x)+Aj
  786.         push    ebx
  787.         xor ebx, ebx
  788.         inc ebx
  789.         cmp _KdCompDbgPortsPresent, 0
  790.         push    edi
  791.         jnz short loc_80010855
  792.         
  793.         push    ebx
  794.         push    esi
  795.         call    CpReadLsr   ; CpReadLsr(x,x)
  796.         cmp al, 0FFh
  797.         jz  short loc_800108AE
  798.         
  799.         push    dword ptr [esi+4]
  800.         push    esi
  801.         call    CpSetBaud   ; CpSetBaud(x,x)
  802.         mov _KdCompDbgPortsPresent, bl
  804. loc_80010855:               ; CODE XREF: CpGetByte(x,x,x)+29j
  805.         mov al, [ebp+arg_8]
  806.         neg al
  807.         sbb eax, eax
  808.         and eax, 31FFFh
  809.         inc eax
  810.         mov edi, eax
  811.         jz  short loc_8001089F
  813. loc_80010866:               ; CODE XREF: CpGetByte(x,x,x)+8Dj
  814.         push    ebx
  815.         push    esi
  816.         dec edi
  817.         call    CpReadLsr   ; CpReadLsr(x,x)
  818.         cmp al, 0FFh
  819.         jz  short loc_800108AE
  820.         test    al, bl
  821.         jz  short loc_8001089B
  822.         test    al, 0Eh
  823.         jnz short loc_800108B8
  824.         push    dword ptr [esi]
  825.         call    _KdReadUchar    ; CpReadPortUchar(x)
  826.         test    byte ptr [esi+8], 2
  827.         mov [ebp+arg_B], al
  828.         jz  short loc_800108C4
  829.         mov eax, [esi]
  830.         add eax, 6
  831.         push    eax
  832.         call    _KdReadUchar    ; CpReadPortUchar(x)
  833.         test    al, al
  834.         js  short loc_800108C4
  836. loc_8001089B:               ; CODE XREF: CpGetByte(x,x,x)+64j
  837.         test    edi, edi
  838.         jnz short loc_80010866
  840. loc_8001089F:               ; CODE XREF: CpGetByte(x,x,x)+54j
  841.         and byte_LsrExpectedError, 0
  842.         push    0
  843.         push    esi
  844.         call    CpReadLsr   ; CpReadLsr(x,x)
  846. loc_800108AE:               ; CODE XREF: CpGetByte(x,x,x)+34j
  847.                     ; CpGetByte(x,x,x)+60j
  848.         mov ax, bx
  850. loc_800108B1:               ; CODE XREF: CpGetByte(x,x,x)+B2j
  851.                     ; CpGetByte(x,x,x)+BFj
  852.         pop edi
  853.         pop ebx
  855. loc_return:             ; CODE XREF: CpGetByte(x,x,x)+18j
  856.         pop esi
  857.         pop ebp
  858.         retn    0Ch
  859. ; ++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
  861. loc_800108B8:               ; CODE XREF: CpGetByte(x,x,x)+68j
  862.         mov eax, [ebp+arg_4]
  863.         and byte ptr [eax], 0
  864.         mov ax, 2
  865.         jmp short loc_800108B1
  866. ; ++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
  868. loc_800108C4:               ; CODE XREF: CpGetByte(x,x,x)+79j
  869.                     ; CpGetByte(x,x,x)+89j
  870.         mov eax, [ebp+arg_4]
  871.         mov cl, [ebp+arg_B]
  872.         mov [eax], cl
  873.         xor ax, ax
  874.         jmp short loc_800108B1
  875. CpGetByte   endp
  877. ; ++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
  878.         align 2
  880. ;------------------------------------------------------------------------ 
  881. ; Attributes: bp-based frame
  883. ; _stdcall CpDoesPortExist(x)
  884. CpDoesPortExist proc    near        ; CODE XREF: KdCompInitialize(x,x)+19Cp
  885.                     ; KdCompInitialize(x,x)+1B3p
  887. arg_0       = dword ptr  8
  888.         push    ebp
  889.         mov ebp, esp
  890.         push    ebx
  891.         push    esi
  892.         push    edi
  893.         mov edi, [ebp+arg_0]
  894.         lea esi, [edi+4]
  895.         push    esi
  896.         mov bl, 1
  897.         call    _KdReadUchar    ; CpReadPortUchar(x)
  898.         push    10h
  899.         push    esi
  900.         mov byte ptr [ebp+arg_0], al
  901.         call    _KdWriteUchar   ; CpWritePortUchar(x,x)
  902.         push    10h
  903.         push    esi
  904.         call    _KdWriteUchar   ; CpWritePortUchar(x,x)
  905.         add edi, 6
  906.         push    edi
  907.         call    _KdReadUchar    ; CpReadPortUchar(x)
  908.         test    al, 0F0h
  909.         jnz short loc_8001091E
  910.         push    14h
  911.         push    esi
  912.         call    _KdWriteUchar   ; CpWritePortUchar(x,x)
  913.         push    edi
  914.         call    _KdReadUchar    ; CpReadPortUchar(x)
  915.         test    al, 40h
  916.         jnz short loc_80010920
  918. loc_8001091E:               ; CODE XREF: CpDoesPortExist(x)+36j
  919.         xor bl, bl
  921. loc_80010920:               ; CODE XREF: CpDoesPortExist(x)+4Aj
  922.         push    [ebp+arg_0]
  923.         push    esi
  924.         call    _KdWriteUchar   ; CpWritePortUchar(x,x)
  925.         pop edi
  926.         pop esi
  927.         mov al, bl
  928.         pop ebx
  929.         pop ebp
  930.         retn    4
  931. CpDoesPortExist endp
  933. ; ++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
  934.         align 4
  936. ;------------------------------------------------------------------------ 
  938. ; _stdcall CpWritePortUchar(x,  x)
  939. CpWritePortUchar proc near      ; CODE XREF: CpSetBaud(x,x)+2Dp
  940.                     ; CpSetBaud(x,x)+3Ep ...
  941.         jmp  ds:WRITE_PORT_UCHAR ; WRITE_PORT_UCHAR(x,x)
  942. CpWritePortUchar endp
  944. ; ++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
  945.         align 2
  947. ;------------------------------------------------------------------------ 
  949. ; _stdcall CpReadPortUchar(x)
  950. CpReadPortUchar proc    near        ; CODE XREF: CpSetBaud(x,x)+1Ep
  951.                     ; CpSendModemString(x,x)+A4p ...
  952.         jmp  ds:READ_PORT_UCHAR ; READ_PORT_UCHAR(x)
  953. CpReadPortUchar endp
  955. ; ++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
  956.         align 10h
  958. ;------------------------------------------------------------------------ 
  960. ; _stdcall CpWriteRegisterUchar(x, x)
  961. CpWriteRegisterUchar    proc near   ; DATA XREF: KdCompInitialize(x,x)+246o
  962.         jmp  ds:WRITE_REGISTER_UCHAR ; WRITE_REGISTER_UCHAR(x,x)
  963. CpWriteRegisterUchar    endp
  966. ;------------------------------------------------------------------------ 
  968. ; _stdcall CpReadRegisterUchar(x)
  969. CpReadRegisterUchar proc near   ; DATA XREF: KdCompInitialize(x,x)+250o
  970.         jmp  ds:READ_REGISTER_UCHAR ; READ_REGISTER_UCHAR(x)
  971. CpReadRegisterUchar endp
  974. ;------------------------------------------------------------------------ 
  976. ; _stdcall CpInitialize(x, x, x)
  977. CpInitialize proc near      ; CODE XREF: KdCompInitialize(x,x)+266p
  979. arg_0       = dword ptr  4
  980. arg_4       = dword ptr  8
  981. arg_8       = dword ptr  0Ch
  982.         
  983.     
  984.         
  985.         mov eax, [esp+arg_4]
  986.         push    esi
  987.         mov esi, [esp+4+arg_0]
  988.         push    [esp+4+arg_8]
  989.         and dword ptr [esi+4], 0
  990.         push    esi
  991.         mov [esi], eax
  992.         call    CpSetBaud   ; CpSetBaud(x,x)
  993.         
  994.         mov eax, [esi]
  995.         push    3
  996.         add eax, 4
  997.         push    eax
  998.         call    _KdWriteUchar   ; CpWritePortUchar(x,x)
  999.         mov eax, [esi]
  1000.         push    0
  1001.         inc eax
  1002.         push    eax
  1003.         call    _KdWriteUchar   ; CpWritePortUchar(x,x)
  1004.         pop esi
  1005.         retn    0Ch
  1006. CpInitialize endp
  1008. ; ++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
  1009.         align 4
  1011. ;------------------------------------------------------------------------ 
  1013. ; _stdcall KdCompGetByte(x)
  1014. KdCompGetByte proc near  pucdata:PUCHAR     ; CODE XREF: KdCompReceivePacketLeader(x,x,x)+11p
  1015.                     ; KdpReceiveString(x,x)+11p ...
  1016.         push    1
  1017.         push    pucdata
  1018.         push    offset _Port
  1019.         call    CpGetByte   ; CpGetByte(x,x,x)
  1020.         movzx   eax, ax
  1021.         ret
  1022. KdCompGetByte endp
  1025. ;------------------------------------------------------------------------ 
  1027. ; _stdcall KdCompPollByte(x)
  1028. KdCompPollByte proc near  pucdata:PUCHAR        ; CODE XREF: KdReceivePacket(x,x,x,x,x)+10p
  1029.         push    0
  1030.         push    pucdata
  1031.         push    offset _Port
  1032.         call    CpGetByte   ; CpGetByte(x,x,x)
  1033.         movzx   eax, ax
  1034.         ret
  1035. KdCompPollByte endp
  1038. ;------------------------------------------------------------------------ 
  1040. ; _stdcall KdCompPutByte(x)
  1041. KdCompPutByte proc near ucdata:DWORD        ; CODE XREF: KdpSendString(x,x)+18p
  1042.                                                     ; KdSendPacket(x,x,x,x)+C9p
  1043.         push    ucdata
  1044.         push    offset _Port
  1045.         call    CpPutByte   ; CpPutByte(x,x)
  1046.         ret
  1047. KdCompPutByte endp
  1049. ; ++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
  1050.         align 2
  1052. ;------------------------------------------------------------------------ 
  1054. ; _stdcall KdCompRestore()
  1055. KdCompRestore proc near     ; CODE XREF: KdRestore(x):loc_80010470p
  1056.         and _com_status_flag, 0FBh
  1057.         retn
  1058. KdCompRestore endp
  1061. ;------------------------------------------------------------------------ 
  1063. ; _stdcall KdCompSave()
  1064. KdCompSave  proc near       ; CODE XREF: KdSave(x)p
  1065.         or  _com_status_flag, 4
  1066.         retn
  1067. KdCompSave  endp
  1070. ;------------------------------------------------------------------------ 
  1072. ; _stdcall KdCompInitialize1()
  1073. KdCompInitialize1 proc near     ; CODE XREF: KdDebuggerInitialize1(x)p
  1074.         cmp _KdComAddressID, 0
  1075.         jnz short locret_800109FE
  1076.         push    0       ; CacheType
  1077.         push    8       ; NumberOfBytes
  1078.         push    dword ptr _DbgpKdComPhysicalAddress4
  1079.         push    dword ptr _DbgpKdComPhysicalAddress0 ; PhysicalAddress
  1080.         call     MmMapIoSpace ; MmMapIoSpace(x,x,x,x)
  1081.         mov ecx, dword ptr ds:[KdComPortInUse]
  1082.         mov _Port, eax
  1083.         mov [ecx], eax
  1085. locret_800109FE:            ; CODE XREF: KdCompInitialize1()+7j
  1086.         retn
  1087. KdCompInitialize1 endp
  1089. ; ++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
  1090.         align 10h
  1092. ;------------------------------------------------------------------------ 
  1094. ; _stdcall KdCompGetDebugTblBaudRate(x)
  1095. KdCompGetDebugTblBaudRate proc near ; CODE XREF: KdCompInitialize(x,x)+C6p
  1097. arg_0       = byte ptr  4
  1099.         movzx   ecx, [esp+arg_0]
  1100.         sub ecx, 3
  1101.         mov eax, 0E100h
  1102.         jz  short loc_80010A25
  1103.         dec ecx
  1104.         jz  short loc_80010A1E
  1105.         sub ecx, 3
  1106.         jnz short locret_80010A2A
  1107.         mov eax, 1C200h
  1108.         jmp short locret_80010A2A
  1109. ; ++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
  1111. loc_80010A1E:               ; CODE XREF: KdCompGetDebugTblBaudRate(x)+10j
  1112.         mov eax, 4B00h
  1113.         jmp short locret_80010A2A
  1114. ; ++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
  1116. loc_80010A25:               ; CODE XREF: KdCompGetDebugTblBaudRate(x)+Dj
  1117.         mov eax, 2580h
  1119. locret_80010A2A:            ; CODE XREF: KdCompGetDebugTblBaudRate(x)+15j
  1120.                     ; KdCompGetDebugTblBaudRate(x)+1Cj ...
  1121.         retn    4
  1122. KdCompGetDebugTblBaudRate endp
  1124. ; ++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
  1125.         align 2
  1127. ;------------------------------------------------------------------------ 
  1128. ; Attributes: bp-based frame
  1130. ; _stdcall KdCompInitialize(_kdParams,  pctx)
  1131. KdCompInitialize proc near      ; CODE XREF: KdDebuggerInitialize0(x)+84p
  1133. var_8       = dword ptr -8
  1134. var_4       = dword ptr -4
  1135. arg_0       = dword ptr  8
  1136. arg_4       = dword ptr  0Ch
  1137.     
  1138.     
  1139.         
  1140.         push    ebp
  1141.         mov ebp, esp
  1142.         push    ecx
  1143.         push    ecx
  1144.         and [ebp+var_4], 0
  1145.         push    ebx
  1146.         mov ebx, [ebp+arg_4] ;pctx
  1147.         test    ebx, ebx
  1148.         push    esi
  1149.         push    edi
  1150.         mov [ebp+var_8], 4B00h
  1151.         
  1152.         
  1153.         
  1154.         jz  short loc_GetSavedDbgp
  1155.         
  1156.         
  1157.         mov eax, dword ptr ds:[HalPrivateDispatchTable] 
  1158.         mov eax, [eax+38h] 
  1159.         test    eax, eax
  1160.         jz  short loc_GetSavedDbgp
  1161.             
  1162.         
  1163.         
  1164.         push    50474244h ;'DBGP'
  1165.         push    ebx ;pctx
  1166.         call    eax  ; 取得 _HalpDebugPortTable 
  1167.         
  1168.         
  1169.         mov _HalpDebugPortTable , eax
  1170.         jmp short loc_DbgPortGot
  1171. ; ---------------------------------------------------------------------------------C--
  1173. loc_GetSavedDbgp:               ; CODE XREF: KdCompInitialize(x,x)+18j
  1174.                     ; KdCompInitialize(x,x)+24j
  1175.         mov eax, _HalpDebugPortTable
  1177. loc_DbgPortGot:             ; CODE XREF: KdCompInitialize(x,x)+33j
  1178.         
  1179.         
  1180.         test    eax, eax
  1181.         mov esi, [ebp+arg_0]
  1182.         
  1183.         jz  loc_checkDbgPortInfo ;无法取得_HalpDebugPortTable,则跳转
  1184.         
  1185.         mov dl, [eax+28h]
  1186.         test    dl, dl
  1187.         mov _KdComAddressID, dl
  1188.         jz  short loc_getPhiscalAddr ;如果_KdComAddressID为零,跳
  1189.         cmp dl, 1
  1190.         jnz loc_checkDbgPortInfo; 如果_KdComAddressID是1,跳转
  1192. loc_getPhiscalAddr:             ; CODE XREF: KdCompInitialize(x,x)+50j
  1193.         ;
  1194.         ;实际调试发现睟B嶂葱械秸饫?
  1195.         ;
  1196.         test    dl, dl
  1197.         mov ecx, [eax+2Ch]
  1198.         mov dword ptr _DbgpKdComPhysicalAddress0, ecx
  1199.         mov edi, [eax+30h]
  1200.         mov dword ptr _DbgpKdComPhysicalAddress4, edi
  1201.         
  1202.         jnz short loc_GetSavedPortInfo
  1203.         
  1204.         mov ecx, dword ptr ds:[HalPrivateDispatchTable]
  1205.         mov ecx, [ecx+44h]
  1206.         test    ecx, ecx
  1207.         jz  short loc_GotPortInfo
  1208.         
  1209.         push    1
  1210.         push    dword ptr [eax+30h] ;B厦嫒〉玫C物理地址
  1211.         push    dword ptr [eax+2Ch] ;
  1212.         call    ecx         ;B袢PortInformation.
  1213.         mov _PortInformation, eax
  1214.         mov eax, _HalpDebugPortTable
  1215.         jmp short loc_GotPortInfo
  1216. ; -----------------------------------------------------------------------------------C
  1218. loc_GetSavedPortInfo:               ; CODE XREF: KdCompInitialize(x,x)+6Fj
  1219.         mov _PortInformation, ecx
  1221. loc_GotPortInfo:                ; CODE XREF: KdCompInitialize(x,x)+7Cj
  1222.                         ; KdCompInitialize(x,x)+92j
  1223.         and _com_status_flag, 0FCh
  1224.         mov _HalpGetInfoFromACPI, 1
  1225.         cmp byte ptr [eax+24h], 0   
  1226.         
  1227.         jnz short loc_setDefaultBaudrate
  1228.         
  1229.         mov ecx, [esi+4]
  1230.         test    ecx, ecx
  1231.         jz  short loc_usrNotSetBaudrate
  1232.         mov _ComBaudratePara,   ecx
  1233.         jmp short loc_checkDbgPortInfo
  1234. ; -----------------------------------------------------------------------------------C
  1236. loc_usrNotSetBaudrate:              ; CODE XREF: KdCompInitialize(x,x)+B3j
  1237.         movzx   eax, byte ptr [eax+3Ah]     ;如果用BB有指定速度,则从刚才取读礐信息中B袢?
  1238.         test    al, al              
  1239.         
  1240.         jz  short loc_setDefaultBaudrate  ;如果速度礐tableIndex为零,B柚萌≡ざǖC0E100h
  1241.         
  1242.         push    eax         
  1243.         call    KdCompGetDebugTblBaudRate ; KdCompGetDebugTblBaudRate(x)
  1244.         mov _ComBaudratePara,   eax
  1245.         
  1246.         jmp short loc_checkDbgPortInfo
  1247. ; -----------------------------------------------------------------------------------C
  1249. loc_setDefaultBaudrate:             ; CODE XREF: KdCompInitialize(x,x)+ACj
  1250.                     ; KdCompInitialize(x,x)+C3j
  1251.         mov _ComBaudratePara,   0E100h
  1253. loc_checkDbgPortInfo:               ; CODE XREF: KdCompInitialize(x,x)+3Fj
  1254.                     ; KdCompInitialize(x,x)+55j ...
  1255.     
  1256.         mov eax, _PortInformation
  1257.         test    eax, eax
  1258.         jnz loc_PortInformationNonZero
  1259.         
  1260.         cmp _HalpGetInfoFromACPI, al
  1261.         jnz loc_PortInformationNonZero
  1262.         mov eax, [esi+4]
  1263.         test    eax, eax
  1264.         jz  short loc_passInBaudrateIsZero
  1265.         and _com_status_flag, 0FEh
  1266.         mov [ebp+var_8], eax
  1268. loc_passInBaudrateIsZero:               ; CODE XREF: KdCompInitialize(x,x)+FAj
  1269.         mov eax, [esi]
  1270.         test    eax, eax
  1271.         jz  short loc_portidIsZero
  1272.         
  1273.         test    ebx, ebx
  1274.         mov edi, eax
  1275.         lea eax, [edi-1]
  1276.         mov [ebp+arg_4], eax
  1277.         jz  short loc_80010B5E ;如果pCtx为空则跳转
  1278.         
  1279.         lea eax, [ebp+arg_4]
  1280.         push    eax
  1281.         push    11h
  1282.         push    4
  1283.         push    dword ptr [ebx+30h]
  1284.         call     ds:KeFindConfigurationEntry ;  KeFindConfigurationEntry(x,x,x,x)
  1285.         mov esi, eax
  1286.         jmp loc_80010BFC
  1287. ; -----------------------------------------------------------------------------------C
  1289. loc_80010B5E:               ; CODE XREF: KdCompInitialize(x,x)+116j
  1290.         xor esi, esi
  1291.         jmp loc_80010BFC
  1292. ; -----------------------------------------------------------------------------------C
  1294. loc_portidIsZero:               ; CODE XREF: KdCompInitialize(x,x)+10Aj
  1295.         test    ebx, ebx
  1296.         mov edi, ds:KeFindConfigurationEntry ; KeFindConfigurationEntry(x,x,x,x)
  1297.         mov [ebp+arg_4], 1
  1298.         jz  short loc_80010B87
  1299.         
  1300.         lea eax, [ebp+arg_4]
  1301.         push    eax
  1302.         push    11h
  1303.         push    4
  1304.         push    dword ptr [ebx+30h]
  1305.         call    edi ; KeFindConfigurationEntry(x,x,x,x) ; KeFindConfigurationEntry(x,x,x,x)
  1306.         mov esi, eax
  1307.         jmp short loc_FoundConfigEntry
  1308. ; -----------------------------------------------------------------------------------C
  1310. loc_80010B87:               ; CODE XREF: KdCompInitialize(x,x)+146j
  1311.         xor esi, esi
  1313. loc_FoundConfigEntry:               ; CODE XREF: KdCompInitialize(x,x)+157j
  1314.         test    esi, esi
  1315.         jz  short loc_80010BA0
  1316.         mov eax, [esi+4]
  1317.         test    eax, eax
  1318.         jz  short loc_80010B9C
  1319.         cmp dword ptr [eax+10h], 1Fh
  1320.         jnz short loc_80010B9C
  1321.         xor esi, esi
  1323. loc_80010B9C:               ; CODE XREF: KdCompInitialize(x,x)+164j
  1324.                     ; KdCompInitialize(x,x)+16Aj
  1325.         test    esi, esi
  1326.         jnz short loc_80010BF9
  1328. loc_80010BA0:               ; CODE XREF: KdCompInitialize(x,x)+15Dj
  1329.         and [ebp+arg_4], 0
  1330.         test    ebx, ebx
  1331.         jz  short loc_80010BB9
  1332.         lea eax, [ebp+arg_4]
  1333.         push    eax
  1334.         push    11h
  1335.         push    4
  1336.         push    dword ptr [ebx+30h]
  1337.         call    edi ; KeFindConfigurationEntry(x,x,x,x) ; KeFindConfigurationEntry(x,x,x,x)
  1338.         mov esi, eax
  1339.         jmp short loc_80010BBB
  1340. ; -----------------------------------------------------------------------------------C
  1342. loc_80010BB9:               ; CODE XREF: KdCompInitialize(x,x)+178j
  1343.         xor esi, esi
  1345. loc_80010BBB:               ; CODE XREF: KdCompInitialize(x,x)+189j
  1346.         test    esi, esi
  1347.         jz  short loc_TestPortIdBrute
  1349. loc_port3f8Ok:              ; CODE XREF: KdCompInitialize(x,x)+1BFj
  1350.         xor edi, edi
  1351.         inc edi
  1352.         jmp short loc_80010BFC
  1353. ; -----------------------------------------------------------------------------------C
  1355. loc_TestPortIdBrute:                ; CODE XREF: KdCompInitialize(x,x)+18Fj
  1356.         mov edi, 2F8h
  1357.         push    edi
  1358.         call    CpDoesPortExist ; CpDoesPortExist(x)
  1359.         test    al, al
  1360.         jz  short loc_TestPortIdBrute_3f8
  1361.         push    2
  1362.         mov [ebp+var_4], edi
  1363.         pop edi
  1364.         jmp short loc_SaveComPortId
  1365. ; -----------------------------------------------------------------------------------C
  1367. loc_TestPortIdBrute_3f8:                ; CODE XREF: KdCompInitialize(x,x)+1A3j
  1368.         mov edi, 3F8h       
  1369.         push    edi
  1370.         call    CpDoesPortExist ; CpDoesPortExist(x)
  1371.         test    al, al
  1372.         jz  short loc_Brutefailed
  1373.         mov [ebp+var_4], edi ;var_4 = tempport
  1374.         jmp short loc_port3f8Ok
  1375. ; -----------------------------------------------------------------------------------C
  1377. loc_Brutefailed:                ; CODE XREF: KdCompInitialize(x,x)+1BAj
  1378.         mov eax, 0C0000225h
  1379.         jmp loc_80010CC7
  1380. ; -----------------------------------------------------------------------------------C
  1382. loc_80010BF9:               ; CODE XREF: KdCompInitialize(x,x)+170j
  1383.         push    2
  1384.         pop edi
  1386. loc_80010BFC:               ; CODE XREF: KdCompInitialize(x,x)+12Bj
  1387.                     ; KdCompInitialize(x,x)+132j ...
  1388.         test    esi, esi
  1389.         jz  short loc_getPortIdByIndex
  1390.         mov esi, [esi+30h]
  1391.         mov ecx, [esi+4]
  1392.         test    ecx, ecx
  1393.         jbe short loc_getPortIdByIndex
  1394.         lea eax, [esi+8]
  1396. loc_80010C0D:               ; CODE XREF: KdCompInitialize(x,x)+1EEj
  1397.         cmp byte ptr [eax], 1
  1398.         jnz short loc_80010C18
  1399.         mov edx, [eax+4]
  1400.         mov [ebp+var_4], edx
  1402. loc_80010C18:               ; CODE XREF: KdCompInitialize(x,x)+1E2j
  1403.         add eax, 10h
  1404.         dec ecx
  1405.         jnz short loc_80010C0D
  1407. loc_getPortIdByIndex:               ; CODE XREF: KdCompInitialize(x,x)+1D0j
  1408.                     ; KdCompInitialize(x,x)+1DAj
  1409.         cmp [ebp+var_4], 0  ;TEMP PORT
  1410.         jnz short loc_SaveComPortId
  1411.         mov eax, edi
  1412.         dec eax
  1413.         jz  short loc_80010C4D
  1414.         dec eax
  1415.         jz  short loc_80010C44
  1416.         dec eax
  1417.         jz  short loc_80010C3B
  1418.         dec eax
  1419.         jnz short loc_SaveComPortId
  1420.         mov [ebp+var_4], 2E8h
  1421.         jmp short loc_SaveComPortId
  1422. ; -----------------------------------------------------------------------------------C
  1424. loc_80010C3B:               ; CODE XREF: KdCompInitialize(x,x)+1FFj
  1425.         mov [ebp+var_4], 3E8h
  1426.         jmp short loc_SaveComPortId
  1427. ; -----------------------------------------------------------------------------------C
  1429. loc_80010C44:               ; CODE XREF: KdCompInitialize(x,x)+1FCj
  1430.         mov [ebp+var_4], 2F8h
  1431.         jmp short loc_SaveComPortId
  1432. ; -----------------------------------------------------------------------------------C
  1434. loc_80010C4D:               ; CODE XREF: KdCompInitialize(x,x)+1F9j
  1435.         mov [ebp+var_4], 3F8h
  1437. loc_SaveComPortId:              ; CODE XREF: KdCompInitialize(x,x)+1ABj
  1438.                     ; KdCompInitialize(x,x)+1F4j ...
  1439.         mov eax, [ebp+var_4]
  1440.         mov ecx, [ebp+var_8]
  1441.         mov _ComPort, edi
  1442.         mov _PortInformation,   eax
  1443.         mov _ComBaudratePara,   ecx
  1445. loc_PortInformationNonZero:             ; CODE XREF: KdCompInitialize(x,x)+E3j
  1446.                     ; KdCompInitialize(x,x)+EFj
  1447.         cmp _KdComAddressID, 0
  1448.         jnz short loc_comAddrIdNonZero
  1449.         
  1450.         mov _KdWriteUchar, offset CpWriteRegisterUchar ;    CpWriteRegisterUchar(x,x)
  1451.         mov _KdReadUchar, offset CpReadRegisterUchar ; CpReadRegisterUchar(x)
  1453. loc_comAddrIdNonZero:               ; CODE XREF: KdCompInitialize(x,x)+244j
  1454.         push    _ComBaudratePara
  1455.         push    eax
  1456.         push    offset _Port
  1457.         call    CpInitialize ; CpInitialize(x,x,x)
  1458.         cmp _HalpDebugPortTable, 0
  1459.         jz  short loc_80010CB8
  1460.         cmp _KdComAddressID, 0
  1461.         jnz short loc_80010CB8
  1462.         mov eax, dword ptr ds:[KdComPortInUse]
  1463.         and dword ptr [eax], 0FFFh
  1464.         jmp short loc_80010CC5
  1465. ; -----------------------------------------------------------------------------------C
  1467. loc_80010CB8:               ; CODE XREF: KdCompInitialize(x,x)+272j
  1468.                     ; KdCompInitialize(x,x)+27Bj
  1469.         mov eax, _PortInformation
  1470.         mov ecx,dword ptr ds:[KdComPortInUse]
  1471.         mov [ecx], eax
  1473. loc_80010CC5:               ; CODE XREF: KdCompInitialize(x,x)+288j
  1474.         xor eax, eax
  1476. loc_80010CC7:               ; CODE XREF: KdCompInitialize(x,x)+1C6j
  1477.         pop edi
  1478.         pop esi
  1479.         pop ebx
  1480.         leave
  1481.         retn    8
  1482. KdCompInitialize endp
  1484.                  public DllEntryPoint
  1485. DllEntryPoint   proc near
  1486.              
  1487.                  jmp      HalInitSystem; HalInitSystem(x,x)
  1488.        
  1489.                  xor eax,eax
  1490.          retn 8;                 
  1491. DllEntryPoint   endp
  1494.         align 10h
  1495. _text       ends
  1499. ; Section 3. (virtual address 00000E00)
  1500. ; Virtual size          : 000004DF (   1247.)
  1501. ; Section size in file      : 00000500 (   1280.)
  1502. ; Offset to raw data for section: 00000E00
  1503. ; Flags 60000020: Text Executable Readable
  1504. ; Alignment : default
  1505. ; BBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBB
  1507. ; Segment type: Pure code
  1508. ; Segment permissions: Read/Execute
  1509. ;PAGEKD     segment para public 'CODE' use32
  1510. ;       assume cs:PAGEKD
  1511. ;       ;org 80010E00h
  1512. ;       assume es:nothing, ss:nothing, _data, fs:nothing, gs:nothing
  1513. .code PAGEKD 
  1515. ;------------------------------------------------------------------------ 
  1517. ; _stdcall KdpComputeChecksum(x, x)
  1518. KdpComputeChecksum proc near Buffer:PUCHAR,Len:ULONG
  1519.                     ; CODE XREF: KdReceivePacket(x,x,x,x,x)+1F0p
  1520.                     ; KdReceivePacket(x,x,x,x,x)+1FEp ...
  1522.         mov     edx, Len
  1523.         xor     eax, eax
  1524.         test    edx, edx
  1525.         jbe     short locret_80010E19
  1526.         mov     ecx, Buffer
  1527.         push    esi
  1529. loc_80010E0F:               ; CODE XREF: KdpComputeChecksum(x,x)+16j
  1530.         movzx   esi, byte ptr [ecx]
  1531.         add     eax, esi
  1532.         inc     ecx
  1533.         dec     edx
  1534.         jnz     short loc_80010E0F
  1535.         pop     esi
  1537. locret_80010E19:            ; CODE XREF: KdpComputeChecksum(x,x)+8j
  1538.         ret
  1539. KdpComputeChecksum endp
  1542. ;------------------------------------------------------------------------ 
  1543. ; Attributes: bp-based frame
  1545. ; _stdcall KdCompReceivePacketLeader(x, x, x)
  1546. KdCompReceivePacketLeader proc near ; CODE XREF: KdReceivePacket(x,x,x,x,x)+3Ep
  1547.    var_2           = dword ptr -2
  1548.    arg_4           = dword ptr  0Ch
  1549.    arg_8           = dword ptr  10h
  1550.                   
  1551.                   push    ebp
  1552.                 mov     ebp, esp
  1553.                 push    ecx
  1554.                 push    ebx
  1555.                 xor     bl, bl
  1556.                 and     byte ptr [ebp+var_2+1], bl
  1557.                 push    esi
  1559. loc_80010E27:                           ; CODE XREF: KdCompReceivePacketLeader(x,x,x)+20j
  1560.                                         ; KdCompReceivePacketLeader(x,x,x)+33j
  1561.                 xor     esi, esi
  1563. loc_80010E29:                           ; CODE XREF: KdCompReceivePacketLeader(x,x,x)+3Dj
  1564.                                         ; KdCompReceivePacketLeader(x,x,x)+4Dj
  1565.                 lea     eax, [ebp+var_2]
  1566.                 push    eax
  1567.                 call    KdCompGetByte ; KdCompGetByte(x)
  1568.                 xor     ecx, ecx
  1569.                 inc     ecx
  1570.                 cmp     eax, ecx
  1571.                 jz      short loc_80010EA9
  1572.                 cmp     eax, 2
  1573.                 jz      short loc_80010E27
  1574.                 mov     al, byte ptr [ebp+var_2]
  1575.                 cmp     al, 30h
  1576.                 jz      short loc_80010E51
  1577.                 cmp     al, 69h
  1578.                 jz      short loc_80010E51
  1579.                 cmp     al, 62h
  1580.                 setz    byte ptr [ebp+var_2+1]
  1581.                 jmp     short loc_80010E27
  1582. ;-------------------------------------------------------------------------
  1583.                                                                           
  1584. loc_80010E51:                           ; CODE XREF: KdCompReceivePacketLeader(x,x,x)+27j
  1585.                                         ; KdCompReceivePacketLeader(x,x,x)+2Bj
  1586.                 test    esi, esi
  1587.                 jnz     short loc_80010E5B
  1588.                 mov     bl, al
  1589.                 mov     esi, ecx
  1590.                 jmp     short loc_80010E29
  1591. ;-------------------------------------------------------------------------
  1592.                                                                           
  1593. loc_80010E5B:                           ; CODE XREF: KdCompReceivePacketLeader(x,x,x)+37j
  1594.                 cmp     al, bl
  1595.                 jnz     short loc_80010E62
  1596.                 inc     esi
  1597.                 jmp     short loc_80010E66
  1598. ;-------------------------------------------------------------------------
  1599.                                                                           
  1600. loc_80010E62:                           ; CODE XREF: KdCompReceivePacketLeader(x,x,x)+41j
  1601.                 mov     bl, al
  1602.                 mov     esi, ecx
  1604. loc_80010E66:                           ; CODE XREF: KdCompReceivePacketLeader(x,x,x)+44j
  1605.                 cmp     esi, 4
  1606.                 jb      short loc_80010E29
  1607.                 cmp     byte ptr [ebp+var_2+1], 0
  1608.                 jz      short loc_80010E78
  1609.                 mov     ecx, [ebp+arg_8]
  1610.                 mov     byte ptr [ecx+4], 1
  1612. loc_80010E78:                           ; CODE XREF: KdCompReceivePacketLeader(x,x,x)+53j
  1613.                 xor     ecx, ecx
  1614.                 cmp     al, 30h
  1615.                 mov     eax, [ebp+arg_4]
  1616.                 setnz   cl
  1617.                 dec     ecx
  1618.                 and     ecx, 0C6C6C6C7h
  1619.                 add     ecx, 69696969h
  1620.                 mov     [eax], ecx
  1621.                 mov     eax, dword ptr ds:[KdDebuggerNotPresent]
  1622.                 and     byte ptr [eax], 0
  1623.                 or      byte ptr ds:[0FFDF02D4h], 2
  1624.                 xor     ax, ax
  1626. loc_80010EA3:                           ; CODE XREF: KdCompReceivePacketLeader(x,x,x)+9Ej
  1627.                                         ; KdCompReceivePacketLeader(x,x,x)+A3j
  1628.                 pop     esi
  1629.                 pop     ebx
  1630.                 pop         ecx
  1631.                 leave
  1632.                 retn    0Ch
  1633. ;-------------------------------------------------------------------------
  1634.                                                                           
  1635. loc_80010EA9:                           ; CODE XREF: KdCompReceivePacketLeader(x,x,x)+1Bj
  1636.                 cmp     byte ptr [ebp+var_2+1], 0
  1637.                 jz      short loc_80010EBC
  1638.                 mov     eax, [ebp+arg_8]
  1639.                 mov     byte ptr [eax+4], 1
  1640.                 mov     ax, 2
  1641.                 jmp     short loc_80010EA3
  1642. ;-------------------------------------------------------------------------
  1644. loc_80010EBC:                           ; CODE XREF: KdCompReceivePacketLeader(x,x,x)+91j
  1645.                 mov     ax, cx
  1646.                 jmp     short loc_80010EA3
  1647. KdCompReceivePacketLeader endp
  1649. ; -----------------------------------------------------------------------------------C
  1650.         align 2
  1652. ;------------------------------------------------------------------------ 
  1653. ; Attributes: bp-based frame
  1655. ; _stdcall KdpReceiveString(x,  x)
  1656. KdpReceiveString proc near      ; CODE XREF: KdReceivePacket(x,x,x,x,x)+67p
  1657.                     ; KdReceivePacket(x,x,x,x,x)+92p ...
  1659. arg_0       = dword ptr  8
  1660. arg_4       = dword ptr  0Ch
  1662.         push    ebp
  1663.         mov ebp, esp
  1664.         cmp [ebp+arg_4], 0
  1665.         push    esi
  1666.         jbe short loc_80010EE7
  1667.         mov esi, [ebp+arg_0]
  1669. loc_80010ECF:               ; CODE XREF: KdpReceiveString(x,x)+23j
  1670.         lea eax, [ebp+arg_0+3]
  1671.         push    eax
  1672.         call     KdCompGetByte ; KdCompGetByte(x)
  1673.         test    eax, eax
  1674.         jnz short loc_80010EE9
  1675.         mov al, byte ptr [ebp+arg_0+3]
  1676.         mov [esi], al
  1677.         inc esi
  1678.         dec [ebp+arg_4]
  1679.         jnz short loc_80010ECF
  1681. loc_80010EE7:               ; CODE XREF: KdpReceiveString(x,x)+8j
  1682.         xor eax, eax
  1684. loc_80010EE9:               ; CODE XREF: KdpReceiveString(x,x)+18j
  1685.         pop esi
  1686.         pop ebp
  1687.         retn    8
  1688. KdpReceiveString endp
  1691. ;------------------------------------------------------------------------ 
  1692. ; Attributes: bp-based frame
  1694. ; _stdcall KdpSendString(x, x)
  1695. KdpSendString proc near     ; CODE XREF: KdpSendControlPacket(x,x)+2Ep
  1696.                     ; KdSendPacket(x,x,x,x)+A0p ...
  1698. arg_0       = dword ptr  8
  1699. arg_4       = dword ptr  0Ch
  1701.         push    ebp
  1702.         mov ebp, esp
  1703.         push    edi
  1704.         mov edi, [ebp+arg_4]
  1705.         test    edi, edi
  1706.         jbe short loc_80010F0F
  1707.         push    esi
  1708.         mov esi, [ebp+arg_0]
  1710. loc_80010EFD:               ; CODE XREF: KdpSendString(x,x)+1Ej
  1711.         mov al, [esi]
  1712.         mov byte ptr [ebp+arg_4], al
  1713.         push    [ebp+arg_4]
  1714.         inc esi
  1715.         call     KdCompPutByte ; KdCompPutByte(x)
  1716.         dec edi
  1717.         jnz short loc_80010EFD
  1718.         pop esi
  1720. loc_80010F0F:               ; CODE XREF: KdpSendString(x,x)+9j
  1721.         pop edi
  1722.         pop ebp
  1723.         retn    8
  1724. KdpSendString endp
  1727. ;------------------------------------------------------------------------ 
  1728. ; Attributes: bp-based frame
  1730. ; _stdcall KdpSendControlPacket(x, x)
  1731. KdpSendControlPacket    proc near   ; CODE XREF: KdReceivePacket(x,x,x,x,x):loc_sendControlPacketAndWaitAgainp
  1732.                     ; KdReceivePacket(x,x,x,x,x)+232p ...
  1734. var_10      = dword ptr -10h
  1735. var_C       = word ptr -0Ch
  1736. var_A       = word ptr -0Ah
  1737. var_8       = dword ptr -8
  1738. var_4       = dword ptr -4
  1739. arg_0       = word ptr  8
  1740. arg_4       = dword ptr  0Ch
  1742.         push    ebp
  1743.         mov ebp, esp
  1744.         sub esp, 10h
  1745.         mov eax, [ebp+arg_4]
  1746.         test    eax, eax
  1747.         mov [ebp+var_10], 69696969h
  1748.         jz  short loc_80010F2B
  1749.         mov [ebp+var_8], eax
  1751. loc_80010F2B:               ; CODE XREF: KdpSendControlPacket(x,x)+12j
  1752.         mov ax, [ebp+arg_0]
  1753.         and [ebp+var_A], 0
  1754.         and [ebp+var_4], 0
  1755.         mov [ebp+var_C], ax
  1756.         push    10h
  1757.         lea eax, [ebp+var_10]
  1758.         push    eax
  1759.         call    KdpSendString ; KdpSendString(x,x)
  1760.         leave
  1761.         retn    8
  1762. KdpSendControlPacket    endp
  1764. ; -----------------------------------------------------------------------------------C
  1765.         align 4
  1766. ; Exported entry   5. KdReceivePacket
  1768. ;------------------------------------------------------------------------ 
  1769. ; Attributes: bp-based frame
  1771. ; _stdcall KdReceivePacket(x, x, x, x,  x)
  1772.         public KdReceivePacket
  1773. KdReceivePacket proc near       ; CODE XREF: KdSendPacket(x,x,x,x)+D8p
  1775. PacketLeader        = dword ptr -10h
  1776. vPacketType         = dword ptr -0Ch
  1777. vByteCount          = dword ptr -0Ah
  1778. vPacketId       = dword ptr -8
  1779. varCheckSum     = dword ptr -4
  1780. argPacketType       = dword ptr  8
  1781. arg_7       = dword ptr  0Fh
  1782. arg_C       = dword ptr  14h
  1783. lpKdContext     = dword ptr  18h
  1784.         
  1785.         push    ebp
  1786.         mov ebp, esp
  1787.         sub esp, 10h
  1788.         cmp [ebp+argPacketType], 8  ;PACKET_TYPE_KD_POLL_BREAKIN
  1789.         jnz short loc_NormalPacketType
  1790.         
  1791.         ;
  1792.         ;PACKET_TYPE_KD_POLL_BREAKIN
  1793.         ;
  1794.         lea eax, [ebp+arg_7]
  1795.         push    eax
  1796.         call     KdCompPollByte ; KdCompPollByte(x)
  1797.         test    eax, eax
  1798.         jnz short loc_recvPacketTimeOut
  1799.         cmp byte ptr [ebp+arg_7], 62h
  1800.         jz  loc_return
  1802. loc_recvPacketTimeOut:              ; CODE XREF: KdReceivePacket(x,x,x,x,x)+17j
  1803.         xor eax, eax
  1804.         inc eax             ;KDP_PACKET_TIMEOUT
  1805.         jmp loc_return
  1806. ; -----------------------------------------------------------------------------------C
  1808. loc_NormalPacketType:               ; CODE XREF: KdReceivePacket(x,x,x,x,x)+Aj
  1809.         push    ebx
  1810.         mov ebx, [ebp+arg_C]
  1811.         push    esi
  1812.         push    edi
  1813.         mov edi, [ebp+0Ch]
  1815. loc_WaitForPacketLeader:                ; CODE XREF: KdReceivePacket(x,x,x,x,x)+DEj
  1816.                     ; KdReceivePacket(x,x,x,x,x)+105j ...
  1817.         push    [ebp+lpKdContext]
  1818.         lea eax, [ebp+PacketLeader]
  1819.         push    eax
  1820.         push    [ebp+argPacketType]
  1821.         
  1822.         call    KdCompReceivePacketLeader ; KdCompReceivePacketLeader(x,x,x)
  1824.         
  1825.         movzx   eax, ax
  1826.         cmp eax, 1
  1827.         jz  short loc_RecvTimeout
  1828.         
  1829.         mov ecx, _KdCompRetryCount
  1830.         mov _KdCompNumberRetries, ecx
  1832. loc_RecvTimeout:                ; CODE XREF: KdReceivePacket(x,x,x,x,x)+49j
  1833.         test    eax, eax
  1834.         jnz     loc_return0
  1835.         
  1836.         ;
  1837.         ;Read packet type.
  1838.         ;
  1839.         
  1840.         push    2
  1841.         pop     esi
  1842.         push    esi
  1843.         lea     eax, [ebp+vPacketType]
  1844.         push    eax
  1845.         call    KdpReceiveString ; KdpReceiveString(x,x)
  1846.         cmp     eax, 1      ;CP_GET_NODATA
  1847.         jz      loc_GetNoData
  1848.         
  1849.         cmp eax, esi    ;CP_GET_ERROR
  1850.         jz  short loc_GetStrError
  1851.         
  1852.         cmp [ebp+PacketLeader], 69696969h ;CONTROL_PACKET_LEADER
  1853.         jnz short loc_NotControlPacketLeader
  1854.         
  1855.         cmp word ptr [ebp+vPacketType], 5
  1856.         jz  loc_returnReSend
  1858. loc_NotControlPacketLeader:             ; CODE XREF: KdReceivePacket(x,x,x,x,x)+80j
  1859.         ;
  1860.         ; Read data length.
  1861.         ;
  1862.         push    esi
  1863.         lea eax, [ebp+vByteCount]
  1864.         push    eax
  1865.         call    KdpReceiveString ; KdpReceiveString(x,x)
  1866.         cmp eax, 1
  1867.         jz  loc_GetNoData
  1868.         cmp eax, esi
  1869.         jz  short loc_GetStrError
  1870.         
  1871.         ;
  1872.         ;Read Packet Id.
  1873.         ;
  1874.         push    4
  1875.         pop esi
  1876.         push    esi
  1877.         lea eax, [ebp+vPacketId]
  1878.         push    eax
  1879.         call    KdpReceiveString ; KdpReceiveString(x,x)
  1880.         cmp eax, 1
  1881.         jz  loc_GetNoData
  1882.         cmp eax, 2
  1883.         jz  short loc_GetStrError
  1884.         
  1885.         ;
  1886.         ; Read packet checksum.
  1887.         ;
  1888.         push    esi
  1889.         lea eax, [ebp+varCheckSum]
  1890.         push    eax
  1891.         call    KdpReceiveString ; KdpReceiveString(x,x)
  1892.         cmp eax, 1
  1893.         jz  loc_GetNoData
  1894.         
  1895.         cmp eax, 2
  1896.         jnz short loc_cpGetDataOk
  1898. loc_GetStrError:                ; CODE XREF: KdReceivePacket(x,x,x,x,x)+77j
  1899.                     ; KdReceivePacket(x,x,x,x,x)+A2j ...
  1900.         cmp [ebp+PacketLeader], 69696969h
  1901.         jz  loc_WaitForPacketLeader
  1902.         jmp loc_SendControlPacketResend
  1903. ; -----------------------------------------------------------------------------------C
  1905. loc_cpGetDataOk:                ; CODE XREF: KdReceivePacket(x,x,x,x,x)+D5j
  1906.         cmp [ebp+PacketLeader], 69696969h
  1907.         jnz short loc_NotControlPacketLeader2
  1908.         
  1909.         cmp word ptr [ebp+vPacketType], si
  1910.         jnz short loc_notPacketTypeAcknowlodge
  1911.         
  1912.         mov eax, _KdCompNextPacketIdToSend
  1913.         and eax, 0FFFFF7FFh
  1914.         cmp [ebp+vPacketId], eax
  1915.         jnz loc_WaitForPacketLeader
  1916.         cmp [ebp+argPacketType], 4
  1917.         jnz loc_WaitForPacketLeader
  1918.         jmp loc_PacketTypeAcknowlege
  1919. ; -----------------------------------------------------------------------------------C
  1921. loc_notPacketTypeAcknowlodge:               ; CODE XREF: KdReceivePacket(x,x,x,x,x)+F6j
  1922.         cmp word ptr [ebp+vPacketType], 6
  1923.         jz  loc_vPacketTypeReset
  1924.         cmp word ptr [ebp+vPacketType], 5
  1925.         jnz loc_WaitForPacketLeader
  1926.         jmp loc_vPacketTypeResend
  1927. ; -----------------------------------------------------------------------------------C
  1929. loc_NotControlPacketLeader2:                ; CODE XREF: KdReceivePacket(x,x,x,x,x)+F0j
  1930.         cmp [ebp+argPacketType], esi
  1931.         jnz short loc_receivedvByteCountOk
  1932.         mov eax, [ebp+vPacketId]
  1933.         cmp eax, _KdCompPacketIdExpected
  1934.         jz  loc_SendResendControlPacket
  1935.         
  1936.         push    eax
  1937.         push    esi
  1939. loc_sendControlPacketAndWaitAgain:              ; CODE XREF: KdReceivePacket(x,x,x,x,x)+1E1j
  1940.                                     ; KdReceivePacket(x,x,x,x,x)+211j
  1941.         call    KdpSendControlPacket    ; KdpSendControlPacket(x,x)
  1942.         jmp loc_WaitForPacketLeader
  1943. ; -----------------------------------------------------------------------------------C
  1945. loc_receivedvByteCountOk:               ; CODE XREF: KdReceivePacket(x,x,x,x,x)+138j
  1946.         cmp word ptr [ebp+vByteCount],  0FA0h
  1947.         movzx   esi, word ptr [edi+2]
  1948.         ja  loc_SendControlPacketResend
  1949.         
  1950.         cmp word ptr [ebp+vByteCount],  si
  1951.         jb  loc_SendControlPacketResend
  1952.         
  1953.         ;
  1954.         ;***Read the message header.
  1955.         ;
  1956.         movzx   eax, word ptr [ebp+vByteCount]
  1957.         sub eax, esi
  1958.         push    esi
  1959.         mov [ebx], eax
  1960.         push    dword ptr [edi+4]
  1961.         call    KdpReceiveString ; KdpReceiveString(x,x)
  1962.         test    eax, eax
  1963.         jnz loc_SendControlPacketResend
  1964.         
  1965.         ;
  1966.         ; ***Read the message data.
  1967.         ;
  1968.         mov [edi], si
  1969.         push    dword ptr [ebx]
  1970.         mov esi, [ebp+arg_7+1]
  1971.         push    dword ptr [esi+4]
  1972.         call    KdpReceiveString ; KdpReceiveString(x,x)
  1973.         test    eax, eax
  1974.         jnz short loc_SendControlPacketResend
  1975.         
  1976.         ;
  1977.         ;****Get Tailing Byte
  1978.         ;
  1979.         mov ax, [ebx]
  1980.         mov [esi], ax
  1981.         lea eax, [ebp+arg_7]
  1982.         push    eax
  1983.         call     KdCompGetByte ; KdCompGetByte(x)
  1984.         test    eax, eax
  1985.         jnz short loc_SendControlPacketResend
  1986.         
  1987.         cmp byte ptr [ebp+arg_7], 0AAh
  1988.         jnz short loc_SendControlPacketResend
  1989.         
  1990.         movzx   eax, word ptr [ebp+vPacketType]
  1991.         cmp [ebp+argPacketType], eax
  1992.         jz  short loc_ReceivedPacketIdOk
  1993.         
  1994.         push    [ebp+vPacketId]
  1995.         jmp short loc_AcknowledgeAndWait
  1996. ; -----------------------------------------------------------------------------------C
  1998. loc_ReceivedPacketIdOk:             ; CODE XREF: KdReceivePacket(x,x,x,x,x)+1BCj
  1999.         mov esi, [ebp+vPacketId]
  2000.         cmp esi, 80800000h      ;INITIAL_PACKET_ID
  2001.         jz  short loc_InitPacketId
  2002.         cmp esi, 80800001h      ;   INITIAL_PACKET_ID_1
  2003.         jnz short loc_SendControlPacketResend
  2005. loc_InitPacketId:               ; CODE XREF: KdReceivePacket(x,x,x,x,x)+1CCj
  2006.         cmp esi, _KdCompPacketIdExpected
  2007.         jz  short loc_ComputeCheckSum
  2008.         
  2009.         push    esi
  2011. loc_AcknowledgeAndWait:             ; CODE XREF: KdReceivePacket(x,x,x,x,x)+1C1j
  2012.         push    4
  2013.         jmp    loc_sendControlPacketAndWaitAgain
  2014. ; -----------------------------------------------------------------------------------C
  2016. loc_ComputeCheckSum:                ; CODE XREF: KdReceivePacket(x,x,x,x,x)+1DCj
  2017.         mov eax, [ebp+arg_7+1]
  2018.         movzx   ecx, word ptr [eax]
  2019.         push    ecx
  2020.         push    dword ptr [eax+4]
  2021.         call    KdpComputeChecksum ;    KdpComputeChecksum(x,x)
  2022.         mov ebx, eax
  2023.         movzx   eax, word ptr [edi]
  2024.         push    eax
  2025.         push    dword ptr [edi+4]
  2026.         call    KdpComputeChecksum ;    KdpComputeChecksum(x,x)
  2027.         add ebx, eax
  2028.         cmp ebx, [ebp+varCheckSum]
  2029.         jz  short loc_SendAcknowledgePacket
  2030.         
  2031.         mov ebx, [ebp+arg_C]
  2033. loc_SendControlPacketResend:                ; CODE XREF: KdReceivePacket(x,x,x,x,x)+E4j
  2034.                     ; KdReceivePacket(x,x,x,x,x)+15Fj ...
  2035.         push    0
  2036.         push    5   ;PACKET_TYPE_KD_RESEND
  2037.         jmp loc_sendControlPacketAndWaitAgain
  2038. ; -----------------------------------------------------------------------------------C
  2040. loc_GetNoData:              ; CODE XREF: KdReceivePacket(x,x,x,x,x)+6Fj
  2041.                     ; KdReceivePacket(x,x,x,x,x)+9Aj ...
  2042.         xor eax, eax
  2043.         inc eax
  2044.         jmp short loc_return0
  2045. ; -----------------------------------------------------------------------------------C
  2047. loc_returnReSend:               ; CODE XREF: KdReceivePacket(x,x,x,x,x)+87j
  2048.         mov eax, esi
  2049.         jmp short loc_return0
  2050. ; -----------------------------------------------------------------------------------C
  2052. loc_vPacketTypeReset:               ; CODE XREF: KdReceivePacket(x,x,x,x,x)+11Fj
  2053.         mov eax, 80800000h
  2054.         push    0
  2055.         push    6
  2056.         mov _KdCompNextPacketIdToSend, eax
  2057.         mov _KdCompPacketIdExpected, eax
  2058.         call    KdpSendControlPacket    ; KdpSendControlPacket(x,x)
  2060. loc_vPacketTypeResend:              ; CODE XREF: KdReceivePacket(x,x,x,x,x)+130j
  2061.         push    2
  2062.         pop eax
  2063.         jmp short loc_return0
  2064. ; -----------------------------------------------------------------------------------C
  2066. loc_SendResendControlPacket:                ; CODE XREF: KdReceivePacket(x,x,x,x,x)+143j
  2067.         push    0
  2068.         push    5
  2069.         call    KdpSendControlPacket    ; KdpSendControlPacket(x,x)
  2071. loc_PacketTypeAcknowlege:               ; CODE XREF: KdReceivePacket(x,x,x,x,x)+115j
  2072.         xor _KdCompNextPacketIdToSend, 1
  2073.         jmp short loc_returnOk
  2074. ; -----------------------------------------------------------------------------------C
  2076. loc_SendAcknowledgePacket:              ; CODE XREF: KdReceivePacket(x,x,x,x,x)+208j
  2077.         push    esi
  2078.         push    4           ;PACKET_TYPE_KD_ACKNOWLEDGE
  2079.         call    KdpSendControlPacket    ; KdpSendControlPacket(x,x)
  2080.         xor _KdCompPacketIdExpected, 1
  2082. loc_returnOk:               ; CODE XREF: KdReceivePacket(x,x,x,x,x)+24Cj
  2083.         xor eax, eax
  2085. loc_return0:                ; CODE XREF: KdReceivePacket(x,x,x,x,x)+59j
  2086.                     ; KdReceivePacket(x,x,x,x,x)+219j ...
  2087.         pop edi
  2088.         pop esi
  2089.         pop ebx
  2091. loc_return:         ; CODE XREF: KdReceivePacket(x,x,x,x,x)+1Dj
  2092.                     ; KdReceivePacket(x,x,x,x,x)+26j
  2093.         leave
  2094.         retn    14h
  2095. KdReceivePacket endp
  2097. ; Exported entry   8. KdSendPacket
  2099. ;------------------------------------------------------------------------ 
  2100. ; Attributes: bp-based frame
  2102. ; _stdcall KdSendPacket(x, x, x, x)
  2103.         public KdSendPacket
  2104. KdSendPacket proc near
  2106. vPacketLeader   = dword ptr -10h
  2107. vPacketType     = word ptr -0Ch
  2108. vByteCount      = word ptr -0Ah
  2109. vPacketId       = dword ptr -8
  2110. vCheckSum       = dword ptr -4
  2111. ArgPacketType   = dword ptr  8
  2112. MessageHeader   = dword ptr  0Ch
  2113. MessageData     = dword ptr  10h
  2114. KdContext       = dword ptr  14h
  2115.         
  2116.     
  2117.         push    ebp
  2118.         mov ebp, esp
  2119.         sub esp, 10h
  2120.         mov eax, [ebp+MessageData]
  2121.         push    ebx
  2122.         xor ebx, ebx
  2123.         cmp eax, ebx
  2124.         push    esi
  2125.         push    edi
  2126.         jz  short loc_noMessageData
  2127.         
  2128.         movzx   ebx, word ptr [eax]
  2129.         push    ebx
  2130.         push    dword ptr [eax+4]
  2131.         call    KdpComputeChecksum ;    KdpComputeChecksum(x,x)
  2132.         
  2133.         mov [ebp+vCheckSum], eax
  2134.         jmp short loc_computeHeaderCheckSum
  2135. ; -----------------------------------------------------------------------------------C
  2137. loc_noMessageData:              ; CODE XREF: KdSendPacket(x,x,x,x)+10j
  2138.         mov [ebp+vCheckSum], ebx
  2140. loc_computeHeaderCheckSum:              ; CODE XREF: KdSendPacket(x,x,x,x)+21j
  2141.         mov esi, [ebp+MessageHeader]
  2142.         mov di, [esi]
  2143.         movzx   eax, di
  2144.         push    eax
  2145.         push    dword ptr [esi+4]
  2146.         call    KdpComputeChecksum ;    KdpComputeChecksum(x,x)
  2147.         add [ebp+vCheckSum], eax
  2148.         mov eax, _KdCompRetryCount
  2149.         add edi, ebx
  2150.         mov [ebp+var_A], di
  2151.         mov edi, [ebp+ArgPacketType]
  2152.         mov [ebp+vPacketLeader], 30303030h
  2153.         mov [ebp+vPacketType], di
  2154.         mov _KdCompNumberRetries, eax
  2156. loc_loopSendData:               ; CODE XREF: KdSendPacket(x,x,x,x)+EAj
  2157.         cmp _KdCompNumberRetries, 0
  2158.         jnz short loc_normalSendString
  2159.         ;
  2160.         ; If the packet is not for reporting exception, we give up
  2161.         ; and declare debugger not present.
  2162.         ;
  2163.         
  2164.         cmp edi, 3          ;cmp edi, PACKET_TYPE_KD_DEBUG_IO
  2165.         jnz short loc_notPacketTypeDebugIo
  2166.     
  2167.         mov eax, [esi+4]            ;DebugIo->ApiNumber 
  2168.         cmp dword ptr [eax], 3230h  ;#define DbgKdPrintStringApi                 0x00003230
  2169.         jmp short loc_checkApiNumber
  2170. ; -----------------------------------------------------------------------------------C
  2172. loc_notPacketTypeDebugIo:               ; CODE XREF: KdSendPacket(x,x,x,x)+65j
  2173.         cmp edi, 7                  ;PACKET_TYPE_KD_STATE_CHANGE64 
  2174.         jnz short loc_notKdstateChange64
  2175.         
  2176.         mov eax, [esi+4]
  2177.         cmp dword ptr [eax], 3031h  ;#define DbgKdLoadSymbolsStateChange         0x00003031
  2178.         jmp short loc_checkApiNumber
  2179. ; -----------------------------------------------------------------------------------C
  2181. loc_notKdstateChange64:             ; CODE XREF: KdSendPacket(x,x,x,x)+75j
  2182.         cmp edi, 0Bh                ; PACKET_TYPE_KD_FILE_IO              11
  2183.         jnz short loc_normalSendString
  2184.         mov eax, [esi+4]
  2185.         cmp dword ptr [eax], 3430h  ;DbgKdCreateFileApi
  2187. loc_checkApiNumber:             ; CODE XREF: KdSendPacket(x,x,x,x)+70j
  2188.                     ; KdSendPacket(x,x,x,x)+80j
  2189.         jz  short loc_MarkDisableDuggerAndReturn
  2191. loc_normalSendString:               ; CODE XREF: KdSendPacket(x,x,x,x)+60j
  2192.                     ; KdSendPacket(x,x,x,x)+85j
  2193.         mov eax, _KdCompNextPacketIdToSend
  2194.         mov [ebp+vPacketId], eax
  2195.         
  2196.         push    10h
  2197.         lea eax, [ebp+vPacketLeader]
  2198.         push    eax
  2199.         call    KdpSendString ; KdpSendString(x,x)
  2200.         
  2201.         movzx   eax, word ptr [esi]
  2202.         push    eax
  2203.         push    dword ptr [esi+4]
  2204.         call    KdpSendString ; KdpSendString(x,x)
  2205.         
  2206.         test    ebx, ebx
  2207.         jz  short loc_sendTailingByte
  2208.         mov eax, [ebp+MessageData]
  2209.         movzx   ecx, word ptr [eax]
  2210.         push    ecx
  2211.         push    dword ptr [eax+4]
  2212.         call    KdpSendString ; KdpSendString(x,x)
  2214. loc_sendTailingByte:                ; CODE XREF: KdSendPacket(x,x,x,x)+B3j
  2215.         push    0AAh
  2216.         call     KdCompPutByte ; KdCompPutByte(x)
  2217.         push    [ebp+KdContext]
  2218.         xor eax, eax
  2219.         push    eax
  2220.         push    eax
  2221.         push    eax
  2222.         push    4
  2223.         call    KdReceivePacket ; KdReceivePacket(x,x,x,x,x)
  2224.         cmp eax, 1
  2225.         jnz short loc_receiveNotTimeOut
  2226.         
  2227.         dec _KdCompNumberRetries
  2229. loc_receiveNotTimeOut:              ; CODE XREF: KdSendPacket(x,x,x,x)+E0j
  2230.         test    eax, eax
  2231.         jnz loc_loopSendData            ;jump upon looOOOOOOp....
  2232.         
  2233.         ;Send Ok
  2234.         ;
  2235.         mov eax, [ebp+KdContext]
  2236.         
  2237.         ;
  2238.         ; Reset Sync bit in packet id.  The packet we sent may have Sync bit set
  2239.         ;
  2240.         ;
  2241.         and byte_MsrLastValue, 0F7h ; KdpNextPacketIdToSend &= ~SYNC_PACKET_ID;
  2242.         mov eax, [eax]
  2243.         mov _KdCompRetryCount, eax
  2245. loc_return:             ; CODE XREF: KdSendPacket(x,x,x,x)+12Bj
  2246.         pop edi
  2247.         pop esi
  2248.         pop ebx
  2249.         leave
  2250.         retn    10h
  2251. ; -----------------------------------------------------------------------------------C
  2253. loc_MarkDisableDuggerAndReturn:             ; CODE XREF: KdSendPacket(x,x,x,x):loc_80011242j
  2254.         mov eax, dword ptr ds:[KdDebuggerNotPresent]
  2255.         mov byte ptr [eax], 1
  2256.         
  2257.         
  2258.         and byte ptr ds:[0FFDF02D4h],   0FDh
  2259.         mov _KdCompNextPacketIdToSend,  80800800h
  2260.         mov _KdCompPacketIdExpected,    80800000h
  2261.         jmp short loc_return
  2262. KdSendPacket endp
  2264. ; -----------------------------------------------------------------------------------C
  2265. PAGEKD      ends
  2268. end DllEntryPoint

另外我结合了win2k的源代和reactos的代码,编译了部分成C语言,下面顺合给出这个文件kdcomio.c以供研究.
你可以使用将C言语实现过的函数从上面的asm代码中出除,然后使用以下命令混合编译ASM和C语言生成一个可用的kdcom.dll,
这个我也已经测试成的.假设你安装了RadAsm和VS或DDK,生成的命令如下:


  1. @rem build.bat
  3. E:/WINDDK/2600/bin/x86/ML.EXE /nologo /c /Gz /coff /I"C:/RadASM/Masm32/Include" "kdcom.asm"
  4. E:/WINDDK/2600/bin/x86/CL.EXE /c /Od /W3 /TC /Gz  "kdcomio.c"
  6. E:/WINDDK/2600/bin/x86/LINK.EXE /nologo /driver /base:0x80010000 /subsystem:native /NODEFAULTLIB:LIBC.lib /NODEFAULTLIB:OLDNAMES.lib  /align:128 /libpath:C:/RadASM/masm32/lib/w2k /entry:DllEntryPoint /DEF:kdcom.Def /out:"kdcom.dll" "kdcom.obj" "kdcomio.obj"
  8. pause

 

 

 

 

  1. /**
  2.     kdcomio.c 
  3.     Create by Aerror
  4. */
  6. #define IN 
  7. #define OUT
  8. #define IN_OUT 
  9. #define OPTIONAL
  11. #define FALSE  0  
  12. #define TRUE   1  
  13. #define NULL 0
  15. #define PACKET_MAX_SIZE           0x0FA0
  16. #define DBGKD_MAXSTREAM                     16
  17. #define EXCEPTION_MAXIMUM_PARAMETERS 15 // maximum number of exception parameters
  19. #define CP_GET_SUCCESS  0
  20. #define CP_GET_NODATA   1
  21. #define CP_GET_ERROR    2
  25. #define KDP_PACKET_RECEIVED 0
  26. #define KDP_PACKET_TIMEOUT 1
  27. #define KDP_PACKET_RESEND  2
  30. #define PACKET_LEADER_BYTE     0x30
  31. #define PACKET_LEADER        0x30303030
  32. #define CONTROL_PACKET_LEADER_BYTE 0x69
  33. #define CONTROL_PACKET_LEADER      0x69696969
  34. #define BREAKIN_PACKET_BYTE     0x62
  35. #define BREAKIN_PACKET             0x62626262
  36. #define PACKET_TRAILING_BYTE    0xAA
  38. #define DbgKdPrintStringApi                 0x00003230
  39. #define DbgKdGetStringApi                   0x00003231
  40. //
  41. // Wait State Change Types
  42. //
  43. #define DbgKdMinimumStateChange             0x00003030
  44. #define DbgKdExceptionStateChange           0x00003030
  45. #define DbgKdLoadSymbolsStateChange         0x00003031
  46. #define DbgKdCommandStringStateChange       0x00003032
  47. #define DbgKdMaximumStateChange             0x00003033
  49. //
  50. // Manipulate Types
  51. //
  52. #define DbgKdMinimumManipulate              0x00003130
  53. #define DbgKdReadVirtualMemoryApi           0x00003130
  54. #define DbgKdWriteVirtualMemoryApi          0x00003131
  55. #define DbgKdGetContextApi                  0x00003132
  56. #define DbgKdSetContextApi                  0x00003133
  57. #define DbgKdWriteBreakPointApi             0x00003134
  58. #define DbgKdRestoreBreakPointApi           0x00003135
  59. #define DbgKdContinueApi                    0x00003136
  60. #define DbgKdReadControlSpaceApi            0x00003137
  61. #define DbgKdWriteControlSpaceApi           0x00003138
  62. #define DbgKdReadIoSpaceApi                 0x00003139
  63. #define DbgKdWriteIoSpaceApi                0x0000313A
  64. #define DbgKdRebootApi                      0x0000313B
  65. #define DbgKdContinueApi2                   0x0000313C
  66. #define DbgKdReadPhysicalMemoryApi          0x0000313D
  67. #define DbgKdWritePhysicalMemoryApi         0x0000313E
  68. #define DbgKdQuerySpecialCallsApi           0x0000313F
  69. #define DbgKdSetSpecialCallApi              0x00003140
  70. #define DbgKdClearSpecialCallsApi           0x00003141
  71. #define DbgKdSetInternalBreakPointApi       0x00003142
  72. #define DbgKdGetInternalBreakPointApi       0x00003143
  73. #define DbgKdReadIoSpaceExtendedApi         0x00003144
  74. #define DbgKdWriteIoSpaceExtendedApi        0x00003145
  75. #define DbgKdGetVersionApi                  0x00003146
  76. #define DbgKdWriteBreakPointExApi           0x00003147
  77. #define DbgKdRestoreBreakPointExApi         0x00003148
  78. #define DbgKdCauseBugCheckApi               0x00003149
  79. #define DbgKdSwitchProcessor                0x00003150
  80. #define DbgKdPageInApi                      0x00003151
  81. #define DbgKdReadMachineSpecificRegister    0x00003152
  82. #define DbgKdWriteMachineSpecificRegister   0x00003153
  83. #define OldVlm1                             0x00003154
  84. #define OldVlm2                             0x00003155
  85. #define DbgKdSearchMemoryApi                0x00003156
  86. #define DbgKdGetBusDataApi                  0x00003157
  87. #define DbgKdSetBusDataApi                  0x00003158
  88. #define DbgKdCheckLowMemoryApi              0x00003159
  89. #define DbgKdClearAllInternalBreakpointsApi 0x0000315A
  90. #define DbgKdFillMemoryApi                  0x0000315B
  91. #define DbgKdQueryMemoryApi                 0x0000315C
  92. #define DbgKdSwitchPartition                0x0000315D
  93. #define DbgKdMaximumManipulate              0x0000315E
  95. //
  96. // Debug I/O Types
  97. //
  98. #define DbgKdPrintStringApi                 0x00003230
  99. #define DbgKdGetStringApi                   0x00003231
  101. //
  102. // Control Report Flags
  103. //
  104. #define REPORT_INCLUDES_SEGS                0x0001
  105. #define REPORT_INCLUDES_CS                  0x0002
  108. #define INITIAL_PACKET_ID      0x80800000
  109. #define INITIAL_PACKET_ID_1     0x80800001
  110. #define SYNC_PACKET_ID      0x0800
  113. #define PACKET_TYPE_UNUSED                  0
  114. #define PACKET_TYPE_KD_STATE_CHANGE32       1
  115. #define PACKET_TYPE_KD_STATE_MANIPULATE     2
  116. #define PACKET_TYPE_KD_DEBUG_IO             3
  117. #define PACKET_TYPE_KD_ACKNOWLEDGE          4
  118. #define PACKET_TYPE_KD_RESEND               5
  119. #define PACKET_TYPE_KD_RESET                6
  120. #define PACKET_TYPE_KD_STATE_CHANGE64       7
  121. #define PACKET_TYPE_KD_POLL_BREAKIN         8
  122. #define PACKET_TYPE_KD_TRACE_IO             9
  123. #define PACKET_TYPE_KD_CONTROL_REQUEST      10
  124. #define PACKET_TYPE_KD_FILE_IO              11
  125. #define PACKET_TYPE_MAX                     12
  128. #define ARGUMENT_PRESENT(ArgumentPointer)    (/
  129.     (CHAR *)(ArgumentPointer) != (CHAR *)(NULL) )
  130.     
  131.                         
  132. typedef   unsigned int   ULONG ;
  133. typedef   ULONG*     PULONG;
  134. typedef   unsigned char  UCHAR;
  135. typedef   UCHAR*     PUCHAR;
  136. typedef   unsigned short  USHORT;
  137. typedef   unsigned short* PUSHORT;
  138. typedef  char*      PCHAR;
  139. typedef  char      CHAR;
  140. typedef   void      VOID;
  141. typedef   void*      PVOID;
  142. typedef  unsigned char  BOOLEAN;
  143. typedef   long LONG_PTR, *PLONG_PTR;
  144. typedef   long ULONG_PTR, *PULONG_PTR;
  145. typedef  unsigned _int64 ULONGLONG;
  146. typedef  ULONGLONG    ULONG64;
  148. typedef struct _STRING {
  149.     USHORT Length;
  150.     USHORT MaximumLength;
  151.     PCHAR Buffer;
  152. } STRING;
  153. typedef STRING *PSTRING;
  155. typedef struct _KD_CONTEXT
  156. {
  157.  ULONG   RetryCount;
  158.  BOOLEAN BreakInRequested;
  159. } KD_CONTEXT, * PKD_CONTEXT;
  161. typedef struct _KSYSTEM_TIME{
  162.  ULONG LowPart           ; //+0x000
  163.  ULONG High1Time ;//       : Int4B
  164.  ULONG High2Time ;//       : Int4B
  165. }KSYSTEM_TIME;
  167. typedef enum _ALTERNATIVE_ARCHITECTURE_TYPE
  168. {
  170.    StandardDesign = 0,
  171.    NEC98x86 = 1,
  172.    EndAlternatives = 2
  173. }ALTERNATIVE_ARCHITECTURE_TYPE;
  174.   
  176. typedef enum _NT_PRODUCT_TYPE{
  177.    NtProductWinNt = 1,
  178.    NtProductLanManNt = 2,
  179.    NtProductServer = 3,
  180. }NT_PRODUCT_TYPE;
  182. typedef struct _LARGE_INTEGER{
  183.   ULONG LowPart          ;// Uint4B
  184.   ULONG  HighPart         ;// Int4B
  185. }LARGE_INTEGER;
  186.     
  187.     
  189. #define MAXIMUM_SUPPORTED_EXTENSION     512
  190. #define SIZE_OF_80387_REGISTERS      80
  192. typedef struct _FLOATING_SAVE_AREA {
  193.     ULONG   ControlWord;
  194.     ULONG   StatusWord;
  195.     ULONG   TagWord;
  196.     ULONG   ErrorOffset;
  197.     ULONG   ErrorSelector;
  198.     ULONG   DataOffset;
  199.     ULONG   DataSelector;
  200.     UCHAR    RegisterArea[SIZE_OF_80387_REGISTERS];
  201.     ULONG   Cr0NpxState;
  202. } FLOATING_SAVE_AREA;
  204. typedef FLOATING_SAVE_AREA *PFLOATING_SAVE_AREA;
  206. typedef struct _CONTEXT {
  208.     //
  209.     // The flags values within this flag control the contents of
  210.     // a CONTEXT record.
  211.     //
  212.     // If the context record is used as an input parameter, then
  213.     // for each portion of the context record controlled by a flag
  214.     // whose value is set, it is assumed that that portion of the
  215.     // context record contains valid context. If the context record
  216.     // is being used to modify a threads context, then only that
  217.     // portion of the threads context will be modified.
  218.     //
  219.     // If the context record is used as an IN OUT parameter to capture
  220.     // the context of a thread, then only those portions of the thread's
  221.     // context corresponding to set flags will be returned.
  222.     //
  223.     // The context record is never used as an OUT only parameter.
  224.     //
  226.     ULONG ContextFlags;
  228.     //
  229.     // This section is specified/returned if CONTEXT_DEBUG_REGISTERS is
  230.     // set in ContextFlags.  Note that CONTEXT_DEBUG_REGISTERS is NOT
  231.     // included in CONTEXT_FULL.
  232.     //
  234.     ULONG   Dr0;
  235.     ULONG   Dr1;
  236.     ULONG   Dr2;
  237.     ULONG   Dr3;
  238.     ULONG   Dr6;
  239.     ULONG   Dr7;
  241.     //
  242.     // This section is specified/returned if the
  243.     // ContextFlags word contians the flag CONTEXT_FLOATING_POINT.
  244.     //
  246.     FLOATING_SAVE_AREA FloatSave;
  248.     //
  249.     // This section is specified/returned if the
  250.     // ContextFlags word contians the flag CONTEXT_SEGMENTS.
  251.     //
  253.     ULONG   SegGs;
  254.     ULONG   SegFs;
  255.     ULONG   SegEs;
  256.     ULONG   SegDs;
  258.     //
  259.     // This section is specified/returned if the
  260.     // ContextFlags word contians the flag CONTEXT_INTEGER.
  261.     //
  263.     ULONG   Edi;
  264.     ULONG   Esi;
  265.     ULONG   Ebx;
  266.     ULONG   Edx;
  267.     ULONG   Ecx;
  268.     ULONG   Eax;
  270.     //
  271.     // This section is specified/returned if the
  272.     // ContextFlags word contians the flag CONTEXT_CONTROL.
  273.     //
  275.     ULONG   Ebp;
  276.     ULONG   Eip;
  277.     ULONG   SegCs;              // MUST BE SANITIZED
  278.     ULONG   EFlags;             // MUST BE SANITIZED
  279.     ULONG   Esp;
  280.     ULONG   SegSs;
  282.     //
  283.     // This section is specified/returned if the ContextFlags word
  284.     // contains the flag CONTEXT_EXTENDED_REGISTERS.
  285.     // The format and contexts are processor specific
  286.     //
  288.     UCHAR    ExtendedRegisters[MAXIMUM_SUPPORTED_EXTENSION];
  290. } CONTEXT;
  292.    
  294. typedef struct _EXCEPTION_RECORD64 {
  295.     ULONG    ExceptionCode;
  296.     ULONG ExceptionFlags;
  297.     ULONG64 ExceptionRecord;
  298.     ULONG64 ExceptionAddress;
  299.     ULONG NumberParameters;
  300.     ULONG __unusedAlignment;
  301.     ULONG64 ExceptionInformation[EXCEPTION_MAXIMUM_PARAMETERS];
  302. } EXCEPTION_RECORD64, *PEXCEPTION_RECORD64;
  304. //
  305. // DBGKM Structure for Exceptions
  306. //
  307. typedef struct _DBGKM_EXCEPTION64
  308. {
  309.     EXCEPTION_RECORD64 ExceptionRecord;
  310.     ULONG FirstChance;
  311. } DBGKM_EXCEPTION64, *PDBGKM_EXCEPTION64;
  313. //
  314. // DBGKD Structure for State Change
  315. //
  316. typedef struct _DBGKD_CONTROL_REPORT
  317. {
  318.     ULONG Dr6;
  319.     ULONG Dr7;
  320.     USHORT InstructionCount;
  321.     USHORT ReportFlags;
  322.     UCHAR InstructionStream[DBGKD_MAXSTREAM];
  323.     USHORT SegCs;
  324.     USHORT SegDs;
  325.     USHORT SegEs;
  326.     USHORT SegFs;
  327.     ULONG EFlags;
  328. } DBGKD_CONTROL_REPORT, *PDBGKD_CONTROL_REPORT;
  330. //
  331. // DBGKD Structure for Debug I/O Type Print String
  332. //
  333. typedef struct _DBGKD_PRINT_STRING
  334. {
  335.     ULONG LengthOfString;
  336. } DBGKD_PRINT_STRING, *PDBGKD_PRINT_STRING;
  338. //
  339. // DBGKD Structure for Debug I/O Type Get String
  340. //
  341. typedef struct _DBGKD_GET_STRING
  342. {
  343.     ULONG LengthOfPromptString;
  344.     ULONG LengthOfStringRead;
  345. } DBGKD_GET_STRING, *PDBGKD_GET_STRING;
  349. //
  350. // DBGKD Structure for Load Symbols
  351. //
  352. typedef struct _DBGKD_LOAD_SYMBOLS64
  353. {
  354.     ULONG PathNameLength;
  355.     ULONG64 BaseOfDll;
  356.     ULONG64 ProcessId;
  357.     ULONG CheckSum;
  358.     ULONG SizeOfImage;
  359.     BOOLEAN UnloadSymbols;
  360. } DBGKD_LOAD_SYMBOLS64, *PDBGKD_LOAD_SYMBOLS64;
  364. typedef struct _KUSER_SHARED_DATA
  365. {
  366. ULONG TickCountLow      ; //+0x000
  367. ULONG TickCountMultiplier  ; //+0x004
  368. KSYSTEM_TIME InterruptTime     ; //+0x008
  369. KSYSTEM_TIME SystemTime        ; //+0x014
  370. KSYSTEM_TIME TimeZoneBias      ; //+0x020
  371. USHORT ImageNumberLow    ; //+0x02c
  372. USHORT ImageNumberHigh   ; //+0x02e
  373.  USHORT NtSystemRoot [260]     ; //+0x030
  374. ULONG MaxStackTraceDepth  ; //+0x238
  375. ULONG CryptoExponent    ; //+0x23c
  376. ULONG TimeZoneId        ; //+0x240
  377. ULONG Reserved2[8]          ; //+0x244
  378. NT_PRODUCT_TYPE NtProductType     ; //+0x264
  379. UCHAR ProductTypeIsValid  ; //+0x268
  380. ULONG NtMajorVersion    ; //+0x26c
  381. ULONG NtMinorVersion    ; //+0x270
  382. UCHAR ProcessorFeatures[64]   ; //+0x274
  383. ULONG Reserved1         ; //+0x2b4
  384. ULONG Reserved3         ; //+0x2b8
  385. ULONG TimeSlip          ; //+0x2bc
  386. ALTERNATIVE_ARCHITECTURE_TYPE AlternativeArchitecture  ; //+0x2c0
  387. LARGE_INTEGER SystemExpirationDate  ; //+0x2c8
  388. ULONG SuiteMask         ; //+0x2d0
  389. UCHAR KdDebuggerEnabled  ; //+0x2d4
  390. UCHAR NXSupportPolicy   ; //+0x2d5
  391. ULONG ActiveConsoleId   ; //+0x2d8
  392. ULONG DismountCount     ; //+0x2dc
  393. ULONG ComPlusPackage    ; //+0x2e0
  394. ULONG LastSystemRITEventTickCount  ; //+0x2e4
  395. ULONG NumberOfPhysicalPages  ; //+0x2e8
  396. UCHAR SafeBootMode      ; //+0x2ec
  397. ULONG TraceLogging      ; //+0x2f0
  398. ULONGLONG TestRetInstruction  ; //+0x2f8
  399. ULONG SystemCall        ; //+0x300
  400. ULONG SystemCallReturn  ; //+0x304
  401. ULONGLONG SystemCallPad[3]     ; //+0x308
  402. KSYSTEM_TIME TickCount         ; //+0x320
  403. ULONGLONG TickCountQuad     ; //+0x320
  404. ULONG Cookie            ; //+0x330
  405. }KUSER_SHARED_DATA;
  407. typedef struct _KD_PACKET
  408. {
  409.   ULONG PacketLeader ; 
  410.   USHORT  PacketType ; 
  411.   USHORT byteCount  ;
  412.   ULONG PacketId  ;
  413.   ULONG Checksum  ;
  414. }KD_PACKET;
  418. typedef struct _DBGKD_DEBUG_IO
  419. {
  420.     ULONG ApiNumber;
  421.     USHORT ProcessorLevel;
  422.     USHORT Processor;
  423.     union
  424.     {
  425.         DBGKD_PRINT_STRING PrintString;
  426.         DBGKD_GET_STRING GetString;
  427.     } u;
  428. } DBGKD_DEBUG_IO, *PDBGKD_DEBUG_IO;
  430. typedef struct _DBGKD_WAIT_STATE_CHANGE64
  431. {
  432.     ULONG NewState;
  433.     USHORT ProcessorLevel;
  434.     USHORT Processor;
  435.     ULONG NumberProcessors;
  436.     ULONG64 Thread;
  437.     ULONG64 ProgramCounter;
  438.     union
  439.     {
  440.         DBGKM_EXCEPTION64 Exception;
  441.         DBGKD_LOAD_SYMBOLS64 LoadSymbols;
  442.     } u;
  443.     DBGKD_CONTROL_REPORT ControlReport;
  444.     CONTEXT Context;
  445. } DBGKD_WAIT_STATE_CHANGE64, *PDBGKD_WAIT_STATE_CHANGE64;
  448.  //
  449.  // If the packet type is PACKET_TYPE_KD_FILE_IO, then
  450.  // the format of the packet data is as follows:
  451.  //
  452.  #define DbgKdCreateFileApi 0x00003430L
  453.  #define DbgKdReadFileApi 0x00003431L
  454.  #define DbgKdWriteFileApi 0x00003432L
  455.  #define DbgKdCloseFileApi 0x00003433L
  457.  // Unicode filename follows as additional data.
  458.  typedef struct _DBGKD_CREATE_FILE {
  459.   ULONG DesiredAccess;
  460.   ULONG FileAttributes;
  461.   ULONG ShareAccess;
  462.   ULONG CreateDisposition;
  463.   ULONG CreateOptions;
  464.   // Return values.
  465.   ULONG64 Handle;
  466.   ULONG64 Length;
  467.  } DBGKD_CREATE_FILE, *PDBGKD_CREATE_FILE;
  469.  // Data is returned as additional data in the response.
  470.  typedef struct _DBGKD_READ_FILE {
  471.   ULONG64 Handle;
  472.   ULONG64 Offset;
  473.   ULONG Length;
  474.  } DBGKD_READ_FILE, *PDBGKD_READ_FILE;
  476.  // Data is given as additional data.
  477.  typedef struct _DBGKD_WRITE_FILE {
  478.   ULONG64 Handle;
  479.   ULONG64 Offset;
  480.   ULONG Length;
  481.  } DBGKD_WRITE_FILE, *PDBGKD_WRITE_FILE;
  483.  typedef struct _DBGKD_CLOSE_FILE {
  484.  ULONG64 Handle;
  485.  } DBGKD_CLOSE_FILE, *PDBGKD_CLOSE_FILE;
  487.  typedef struct _DBGKD_FILE_IO {
  488.   ULONG ApiNumber;
  489.   ULONG Status;
  490.   union {
  491.    ULONG64 ReserveSpace[7];
  492.    DBGKD_CREATE_FILE CreateFile;
  493.    DBGKD_READ_FILE ReadFile;
  494.    DBGKD_WRITE_FILE WriteFile;
  495.    DBGKD_CLOSE_FILE CloseFile;
  496.   } u;
  497.  } DBGKD_FILE_IO, *PDBGKD_FILE_IO;
  501. #define KI_USER_SHARED_DATA         0xffdf0000
  502. #define SharedUserData  ((KUSER_SHARED_DATA * const) KI_USER_SHARED_DATA)
  504. extern BOOLEAN KdDebuggerNotPresent;
  506. BOOLEAN KdpControlCPending    = FALSE;
  507. BOOLEAN KdpControlCPressed    = FALSE;
  509. ULONG KdpRetryCount      = 5;
  510. ULONG KdpNumberRetries     = 5;
  511. ULONG KdpPacketIdExpected   =0;
  512. ULONG KdpNextPacketIdToSend =0;
  513. //ULONG  KdpDefaultRetries   =0;
  514. //--------------------------------
  518. ULONG
  519. KdCompGetByte (
  520.     OUT PUCHAR Input 
  521.     );
  523. ULONG
  524. KdCompPollByte (
  525.     OUT PUCHAR Input
  526.     );
  529. VOID
  530. KdCompPutByte (
  531.     IN UCHAR Output
  532.     );
  533.     
  535. ULONG
  536. KdpComputeChecksum (
  537.     IN PUCHAR Buffer,
  538.     IN ULONG Length
  539.     );
  541. ULONG
  542. KdpReceiveString (
  543.     OUT PCHAR Destination,
  544.     IN ULONG Length
  545.     );
  547. VOID
  548. KdpSendString (
  549.     IN PCHAR Source,
  550.     IN ULONG Length
  551.     );
  553. VOID
  554. KdpSendControlPacket (
  555.     IN USHORT PacketType,
  556.     IN ULONG PacketId OPTIONAL
  557.     );
  559. #ifdef ALLOC_PRAGMA
  560. #pragma alloc_text(PAGEKD, KdpComputeChecksum)
  561. #pragma alloc_text(PAGEKD, KdpReceivePacketLeader)
  562. #pragma alloc_text(PAGEKD, KdpReceiveString)
  563. #pragma alloc_text(PAGEKD, KdpSendString)
  564. #pragma alloc_text(PAGEKD, KdpSendControlPacket)
  565. #pragma alloc_text(PAGEKD, KdReceivePacket)
  566. #pragma alloc_text(PAGEKD, KdSendPacket)
  567. #endif
  570. ULONG
  571. KdpComputeChecksum (
  572.     IN PUCHAR Buffer,
  573.     IN ULONG Length
  574.     )
  576. /*++
  578. Routine Description:
  580.     This routine computes the checksum for the string passed in.
  582. Arguments:
  584.     Buffer - Supplies a pointer to the string.
  586.     Length - Supplies the length of the string.
  588. Return Value:
  590.     A ULONG is return as the checksum for the input string.
  592. --*/
  594. {
  596.     ULONG Checksum = 0;
  598.     while (Length > 0) {
  599.         Checksum = Checksum + (ULONG)*Buffer++;
  600.         Length--;
  601.     }
  602.     return Checksum;
  603. }
  605. USHORT
  606. KdpReceivePacketLeader (
  607.     IN ULONG PacketType,
  608.     OUT PULONG PacketLeader,
  609.     IN_OUT PKD_CONTEXT KdContext OPTIONAL 
  610.     )
  612. /*++
  614. Routine Description:
  616.     This routine waits for a packet header leader.
  618. Arguments:
  620.     PacketType - supplies the type of packet we are expecting.
  622.     PacketLeader - supplies a pointer to a ulong variable to receive
  623.                    packet leader UCHARs.
  625. Return Value:
  627.     KDP_PACKET_RESEND - if resend is required.
  628.     KDP_PAKCET_TIMEOUT - if timeout.
  629.     KDP_PACKET_RECEIVED - if packet received.
  631. --*/
  633. {
  635.     UCHAR Input, PreviousUCHAR = 0;
  636.     ULONG PacketId = 0;
  637.     ULONG Index;
  638.     ULONG ReturnCode;
  639.     BOOLEAN BreakinDetected = FALSE;
  640.     if(KdContext)
  641.     {
  642.   KdContext->BreakInRequested = BreakinDetected;
  643.  }
  644.     //
  645.     // NOTE - With all the interrupts being off, it is very hard
  646.     // to implement the actual timeout code. (Maybe, by reading the CMOS.)
  647.     // Here we use a loop count to wait about 3 seconds.  The CpGetUCHAR
  648.     // will return with error code = CP_GET_NODATA if it cannot find data
  649.     // UCHAR within 1 second. Kernel debugger's timeout period is 5 seconds.
  650.     //
  652.     Index = 0;
  653.     do {
  654.         ReturnCode = KdCompGetByte(&Input);
  655.         
  656.   if (ReturnCode == CP_GET_NODATA) {
  657.             if (BreakinDetected) {
  658.                 KdpControlCPending = TRUE;
  659.                 if(KdContext)
  660.     {
  661.      KdContext->BreakInRequested = BreakinDetected;
  662.     }
  663.                 return KDP_PACKET_RESEND;
  664.             } else {
  665.     if(KdContext)
  666.     {
  667.      KdContext->BreakInRequested = BreakinDetected;
  668.     }
  669.                 return KDP_PACKET_TIMEOUT;
  670.             }
  671.         }
  672.   else if (ReturnCode == CP_GET_ERROR) {
  673.             Index = 0;
  674.             continue;
  675.         } 
  676.   else {                    // if (ReturnCode == CP_GET_SUCCESS)
  677.             if ( Input == PACKET_LEADER_BYTE ||
  678.                  Input == CONTROL_PACKET_LEADER_BYTE ) {
  679.                 if ( Index == 0 ) {
  680.                     PreviousUCHAR = Input;
  681.                     Index++;
  682.                 } else if (Input == PreviousUCHAR ) {
  683.                     Index++;
  684.                 } else {
  685.                     PreviousUCHAR = Input;
  686.                     Index = 1;
  687.                 }
  688.             } else {
  690.                 //
  691.                 // If we detect breakin character, we need to verify it
  692.                 // validity.  (It is possible that we missed a packet leader
  693.                 // and the breakin character is simply a data UCHAR in the
  694.                 // packet.)
  695.                 // Since kernel debugger send out breakin character ONLY
  696.                 // when it is waiting for State Change packet.  The breakin
  697.                 // character should not be followed by any other character
  698.                 // except packet leader UCHAR.
  699.                 //
  701.                 if ( Input == BREAKIN_PACKET_BYTE) {
  702.                     BreakinDetected = TRUE;
  703.                    
  704.                 } else {
  706.                     //
  707.                     // The following statement is ABSOLUTELY necessary.
  708.                     //
  710.                     BreakinDetected = FALSE;
  711.                   
  712.                 }
  713.                 Index = 0;
  714.             }
  715.         }
  716.     } while ( Index < 4 );
  718.     if (BreakinDetected) {
  719.         KdpControlCPending = TRUE;
  720.     }
  722.     //
  723.     // return the packet leader and FALSE to indicate no resend is needed.
  724.     //
  726.     if ( Input == PACKET_LEADER_BYTE ) {
  727.         *PacketLeader = PACKET_LEADER;
  728.     } else {
  729.         *PacketLeader = CONTROL_PACKET_LEADER;
  730.     }
  732.    if(KdContext)
  733.    {
  734.      KdContext->BreakInRequested = BreakinDetected;
  735.   }
  736.   
  737.     KdDebuggerNotPresent = FALSE;
  738.     SharedUserData->KdDebuggerEnabled |= 0x00000002;
  739.     return KDP_PACKET_RECEIVED;
  740. }
  742. ULONG
  743. KdpReceiveString (
  744.     OUT PCHAR Destination,
  745.     IN ULONG Length
  746.     )
  748. /*++
  750. Routine Description:
  752.     This routine reads a string from the kernel debugger port.
  754. Arguments:
  756.     Destination - Supplies a pointer to the input string.
  758.     Length - Supplies the length of the string to be read.
  760. Return Value:
  762.     CP_GET_SUCCESS is returned if string is successfully read from the
  763.         kernel debugger line.
  764.     CP_GET_ERROR is returned if error encountered during reading.
  765.     CP_GET_NODATA is returned if timeout.
  767. --*/
  769. {
  771.     UCHAR Input;
  772.     ULONG ReturnCode;
  774.     //
  775.     // Read UCHARs until either a error is encountered or the entire string
  776.     // has been read.
  777.     //
  778.     while (Length > 0) {
  779.         ReturnCode = KdCompGetByte(&Input);
  780.         if (ReturnCode != CP_GET_SUCCESS) {
  781.             return ReturnCode;
  782.         } else {
  783.             *Destination++ = Input;
  784.             Length -= 1;
  785.         }
  786.     }
  787.     return CP_GET_SUCCESS;
  788. }
  790. VOID
  791. KdpSendString (
  792.     IN PCHAR Source,
  793.     IN ULONG Length
  794.     )
  796. /*++
  798. Routine Description:
  800.     This routine writes a string to the kernel debugger port.
  802. Arguments:
  804.     Source - Supplies a pointer to the output string.
  806.     Length - Supplies the length of the string to be written.
  808. Return Value:
  810.     None.
  812. --*/
  814. {
  816.     UCHAR Output;
  818.     //
  819.     // Write UCHARs to the kernel debugger port.
  820.     //
  822.     while (Length > 0) {
  823.         Output = *Source++;
  824.         KdCompPutByte(Output);
  825.         Length -= 1;
  826.     }
  827.     return;
  828. }
  830. VOID
  831. KdpSendControlPacket (
  832.     IN USHORT PacketType,
  833.     IN ULONG PacketId OPTIONAL
  834.     )
  836. /*++
  838. Routine Description:
  840.     This routine sends a control packet to the host machine that is running the
  841.     kernel debugger and waits for an ACK.
  843. Arguments:
  845.     PacketType - Supplies the type of packet to send.
  847.     PacketId - Supplies packet id, optionally.
  849. Return Value:
  851.     None.
  853. --*/
  855. {
  857.     KD_PACKET PacketHeader;
  859.     //
  860.     // Initialize and send the packet header.
  861.     //
  863.     PacketHeader.PacketLeader = CONTROL_PACKET_LEADER;
  864.     if (ARGUMENT_PRESENT( (PVOID)(ULONG_PTR) PacketId )) {
  865.         PacketHeader.PacketId = PacketId;
  866.     }
  867.     PacketHeader.byteCount = 0;
  868.     PacketHeader.Checksum = 0;
  869.     PacketHeader.PacketType = PacketType;
  870.     KdpSendString((PCHAR)&PacketHeader, sizeof(KD_PACKET));
  872.     return;
  873. }
  875. ULONG
  876. KdReceivePacket (
  877.     IN ULONG PacketType,
  878.     OUT PSTRING MessageHeader,
  879.     OUT PSTRING MessageData,
  880.     OUT PULONG DataLength,
  881.     IN_OUT PKD_CONTEXT KdContext OPTIONAL
  883.     )
  885. /*++
  887. Routine Description:
  889.     This routine receives a packet from the host machine that is running
  890.     the kernel debugger UI.  This routine is ALWAYS called after packet being
  891.     sent by caller.  It first waits for ACK packet for the packet sent and
  892.     then waits for the packet desired.
  894.     N.B. If caller is KdPrintString, the parameter PacketType is
  895.        PACKET_TYPE_KD_ACKNOWLEDGE.  In this case, this routine will return
  896.        right after the ack packet is received.
  898. Arguments:
  900.     PacketType - Supplies the type of packet that is excepted.
  902.     MessageHeader - Supplies a pointer to a string descriptor for the input
  903.         message.
  905.     MessageData - Supplies a pointer to a string descriptor for the input data.
  907.     DataLength - Supplies pointer to ULONG to receive length of recv. data.
  909. Return Value:
  911.     KDP_PACKET_RESEND - if resend is required.
  912.     KDP_PAKCET_TIMEOUT - if timeout.
  913.     KDP_PACKET_RECEIVED - if packet received.
  915. --*/
  917. {
  919.     UCHAR Input;
  920.     ULONG MessageLength;
  921.     KD_PACKET PacketHeader;
  922.     ULONG ReturnCode;
  923.     ULONG Checksum;
  925.  if(PacketType==PACKET_TYPE_KD_POLL_BREAKIN)
  926.  {
  927.   ReturnCode= KdCompPollByte(&Input);
  928.   if(ReturnCode==CP_GET_SUCCESS && BREAKIN_PACKET_BYTE==Input)
  929.   {
  930.    return KDP_PACKET_RECEIVED;
  931.   }
  932.   else
  933.   {
  934.    return KDP_PACKET_TIMEOUT;
  935.   }
  936.  }
  938. WaitForPacketLeader:
  940.     //
  941.     // Read Packet Leader
  942.     //
  944.     ReturnCode = KdpReceivePacketLeader(PacketType, &PacketHeader.PacketLeader,KdContext);
  946.     //
  947.     // If we can successfully read packet leader, it has high possibility that
  948.     // kernel debugger is alive.  So reset count.
  949.     //
  951.     if (ReturnCode != KDP_PACKET_TIMEOUT) {
  952.         KdpNumberRetries = KdpRetryCount;
  953.     }
  954.     if (ReturnCode != KDP_PACKET_RECEIVED) {
  955.         return ReturnCode;
  956.     }
  958.     //
  959.     // Read packet type.
  960.     //
  962.     ReturnCode = KdpReceiveString((PCHAR)&PacketHeader.PacketType,
  963.                                   sizeof(PacketHeader.PacketType));
  964.     if (ReturnCode == CP_GET_NODATA) {
  965.         return KDP_PACKET_TIMEOUT;
  966.     } else if (ReturnCode == CP_GET_ERROR) {
  967.         if (PacketHeader.PacketLeader == CONTROL_PACKET_LEADER) {
  969.             //
  970.             // If read error and it is for a control packet, simply
  971.             // preptend that we have not seen this packet.  Hopefully
  972.             // we will receive the packet we desire which automatically acks
  973.             // the packet we just sent.
  974.             //
  976.             goto WaitForPacketLeader;
  977.         } else {
  979.             //
  980.             // if read error while reading data packet, we have to ask
  981.             // kernel debugger to resend us the packet.
  982.             //
  984.             goto SendResendPacket;
  985.         }
  986.     }
  988.     //
  989.     // if the packet we received is a resend request, we return true and
  990.     // let caller resend the packet.
  991.     //
  993.     if ( PacketHeader.PacketLeader == CONTROL_PACKET_LEADER &
  994.          PacketHeader.PacketType == PACKET_TYPE_KD_RESEND ) {
  995.         return KDP_PACKET_RESEND;
  996.     }
  998.     //
  999.     // Read data length.
  1000.     //
  1002.     ReturnCode = KdpReceiveString((PCHAR)&PacketHeader.byteCount,
  1003.                                   sizeof(PacketHeader.byteCount));
  1004.     if (ReturnCode == CP_GET_NODATA) {
  1005.         return KDP_PACKET_TIMEOUT;
  1006.     } else if (ReturnCode == CP_GET_ERROR) {
  1007.         if (PacketHeader.PacketLeader == CONTROL_PACKET_LEADER) {
  1008.             goto WaitForPacketLeader;
  1009.         } else {
  1010.             goto SendResendPacket;
  1011.         }
  1012.     }
  1014.     //
  1015.     // Read Packet Id.
  1016.     //
  1018.     ReturnCode = KdpReceiveString((PCHAR)&PacketHeader.PacketId,
  1019.                                   sizeof(PacketHeader.PacketId));
  1021.     if (ReturnCode == CP_GET_NODATA) {
  1022.         return KDP_PACKET_TIMEOUT;
  1023.     } else if (ReturnCode == CP_GET_ERROR) {
  1024.         if (PacketHeader.PacketLeader == CONTROL_PACKET_LEADER) {
  1025.             goto WaitForPacketLeader;
  1026.         } else {
  1027.             goto SendResendPacket;
  1028.         }
  1029.     }
  1031.     //
  1032.     // Read packet checksum.
  1033.     //
  1035.     ReturnCode = KdpReceiveString((PCHAR)&PacketHeader.Checksum,
  1036.                                   sizeof(PacketHeader.Checksum));
  1037.     if (ReturnCode == CP_GET_NODATA) {
  1038.         return KDP_PACKET_TIMEOUT;
  1039.     } else if (ReturnCode == CP_GET_ERROR) {
  1040.         if (PacketHeader.PacketLeader == CONTROL_PACKET_LEADER) {
  1041.             goto WaitForPacketLeader;
  1042.         } else {
  1043.             goto SendResendPacket;
  1044.         }
  1045.     }
  1047.     //
  1048.     // A complete packet header is received.  Check its validity and
  1049.     // perform appropriate action depending on packet type.
  1050.     //
  1052.     if (PacketHeader.PacketLeader == CONTROL_PACKET_LEADER ) {
  1053.         if (PacketHeader.PacketType == PACKET_TYPE_KD_ACKNOWLEDGE /*4*/) {
  1055.             //
  1056.             // If we received an expected ACK packet and we are not
  1057.             // waiting for any new packet, update outgoing packet id
  1058.             // and return.  If we are NOT waiting for ACK packet
  1059.             // we will keep on waiting.  If the ACK packet
  1060.             // is not for the packet we send, ignore it and keep on waiting.
  1061.             //
  1063.             if (PacketHeader.PacketId !=
  1064.                 (KdpNextPacketIdToSend & ~SYNC_PACKET_ID))  {
  1065.                 goto WaitForPacketLeader;
  1066.             } else if (PacketType == PACKET_TYPE_KD_ACKNOWLEDGE) {
  1067.                 KdpNextPacketIdToSend ^= 1;
  1068.                 return KDP_PACKET_RECEIVED;
  1069.             } else {
  1070.                 goto WaitForPacketLeader;
  1071.             }
  1072.         } else if (PacketHeader.PacketType == PACKET_TYPE_KD_RESET/*6*/) {
  1074.             //
  1075.             // if we received Reset packet, reset the packet control variables
  1076.             // and resend earlier packet.
  1077.             //
  1079.             KdpNextPacketIdToSend = INITIAL_PACKET_ID;
  1080.             KdpPacketIdExpected = INITIAL_PACKET_ID;
  1081.             KdpSendControlPacket(PACKET_TYPE_KD_RESET, 0L);
  1082.             return KDP_PACKET_RESEND;
  1083.         } else if (PacketHeader.PacketType == PACKET_TYPE_KD_RESEND/*5*/) {
  1084.             return KDP_PACKET_RESEND;
  1085.         } else {
  1087.             //
  1088.             // Invalid packet header, ignore it.
  1089.             //
  1091.             goto WaitForPacketLeader;
  1092.         }
  1094.     //
  1095.     // The packet header is for data packet (not control packet).
  1096.     //
  1098.     } else if (PacketType == PACKET_TYPE_KD_ACKNOWLEDGE) {
  1100.         //
  1101.         // if we are waiting for ACK packet ONLY
  1102.         // and we receive a data packet header, check if the packet id
  1103.         // is what we expected.  If yes, assume the acknowledge is lost (but
  1104.         // sent), ask sender to resend and return with PACKET_RECEIVED.
  1105.         //
  1107.         if (PacketHeader.PacketId == KdpPacketIdExpected) {
  1108.             KdpSendControlPacket(PACKET_TYPE_KD_RESEND, 0L);
  1109.             KdpNextPacketIdToSend ^= 1;
  1110.             return KDP_PACKET_RECEIVED;
  1111.         } else {
  1112.             KdpSendControlPacket(PACKET_TYPE_KD_ACKNOWLEDGE,
  1113.                                  PacketHeader.PacketId
  1114.                                  );
  1115.             goto WaitForPacketLeader;
  1116.         }
  1117.     }
  1119.     //
  1120.     // we are waiting for data packet and we received the packet header
  1121.     // for data packet. Perform the following checkings to make sure
  1122.     // it is the packet we are waiting for.
  1123.     //
  1125.     //
  1126.     // Check byteCount received is valid
  1127.     //
  1129.     MessageLength = MessageHeader->MaximumLength;
  1130.     if ((PacketHeader.byteCount > (USHORT)PACKET_MAX_SIZE) ||
  1131.         (PacketHeader.byteCount < (USHORT)MessageLength)) {
  1132.         goto SendResendPacket;
  1133.     }
  1134.     *DataLength = PacketHeader.byteCount - MessageLength;
  1136.     //
  1137.     // Read the message header.
  1138.     //
  1140.     ReturnCode = KdpReceiveString(MessageHeader->Buffer, MessageLength);
  1141.     if (ReturnCode != CP_GET_SUCCESS) {
  1142.         goto SendResendPacket;
  1143.     }
  1144.     MessageHeader->Length = (USHORT)MessageLength;
  1146.     //
  1147.     // Read the message data.
  1148.     //
  1150.     ReturnCode = KdpReceiveString(MessageData->Buffer, *DataLength);
  1151.     if (ReturnCode != CP_GET_SUCCESS) {
  1152.         goto SendResendPacket;
  1153.     }
  1154.     MessageData->Length = (USHORT)*DataLength;
  1156.     //
  1157.     // Read packet trailing byte
  1158.     //
  1160.     ReturnCode = KdCompGetByte(&Input);
  1161.     if (ReturnCode != CP_GET_SUCCESS || Input != PACKET_TRAILING_BYTE/*0AAh*/) {
  1162.         goto SendResendPacket;
  1163.     }
  1165.     //
  1166.     // Check PacketType is what we are waiting for.
  1167.     //
  1169.     if (PacketType != PacketHeader.PacketType) {
  1170.         KdpSendControlPacket(PACKET_TYPE_KD_ACKNOWLEDGE,
  1171.                              PacketHeader.PacketId
  1172.                              );
  1173.         goto WaitForPacketLeader;
  1174.     }
  1176.     //
  1177.     // Check PacketId is valid.
  1178.     //
  1180.     if (PacketHeader.PacketId == INITIAL_PACKET_ID ||
  1181.         PacketHeader.PacketId == (INITIAL_PACKET_ID ^ 1)) {
  1182.         if (PacketHeader.PacketId != KdpPacketIdExpected) {
  1183.             KdpSendControlPacket(PACKET_TYPE_KD_ACKNOWLEDGE,
  1184.                                  PacketHeader.PacketId
  1185.                                  );
  1186.             goto WaitForPacketLeader;
  1187.         }
  1188.     } else {
  1189.         goto SendResendPacket;
  1190.     }
  1192.     //
  1193.     // Check checksum is valid.
  1194.     //
  1196.     Checksum = KdpComputeChecksum(
  1197.                             MessageHeader->Buffer,
  1198.                             MessageHeader->Length
  1199.                             );
  1201.     Checksum += KdpComputeChecksum(
  1202.                             MessageData->Buffer,
  1203.                             MessageData->Length
  1204.                             );
  1205.     if (Checksum != PacketHeader.Checksum) {
  1206.         goto SendResendPacket;
  1207.     }
  1209.     //
  1210.     // Send Acknowledge UCHAR and the Id of the packet received.
  1211.     // Then, update the ExpectId for next incoming packet.
  1212.     //
  1214.     KdpSendControlPacket(PACKET_TYPE_KD_ACKNOWLEDGE,
  1215.                          PacketHeader.PacketId
  1216.                          );
  1218.     //
  1219.     // We have successfully received the packet so update the
  1220.     // packet control variables and return sucess.
  1221.     //
  1223.     KdpPacketIdExpected ^= 1;
  1224.     return KDP_PACKET_RECEIVED;
  1226. SendResendPacket:
  1227.     KdpSendControlPacket(PACKET_TYPE_KD_RESEND, 0L);
  1228.     goto WaitForPacketLeader;
  1229. }
  1231. void
  1232. KdSendPacket (
  1233.     IN ULONG PacketType,
  1234.     IN PSTRING MessageHeader,
  1235.     IN PSTRING MessageData OPTIONAL,
  1236.     IN_OUT PKD_CONTEXT KdContext OPTIONAL
  1237.     )
  1241. /*++
  1243. Routine Description:
  1245.     This routine sends a packet to the host machine that is running the
  1246.     kernel debugger and waits for an ACK.
  1248. Arguments:
  1250.     PacketType - Supplies the type of packet to send.
  1252.     MessageHeader - Supplies a pointer to a string descriptor that describes
  1253.         the message information.
  1255.     MessageData - Supplies a pointer to a string descriptor that describes
  1256.         the optional message data.
  1258. Return Value:
  1260.     None.
  1262. --*/
  1264. {
  1266.     KD_PACKET PacketHeader;
  1267.     ULONG MessageDataLength;
  1268.     ULONG ReturnCode;
  1269.     PDBGKD_DEBUG_IO DebugIo;
  1270.  PDBGKD_FILE_IO  FileIo;
  1271.     PDBGKD_WAIT_STATE_CHANGE64 StateChange;
  1275.     if ( ARGUMENT_PRESENT(MessageData) ) {
  1276.         MessageDataLength = MessageData->Length;
  1277.         PacketHeader.Checksum = KdpComputeChecksum(
  1278.                                         MessageData->Buffer,
  1279.                                         MessageData->Length
  1280.                                         );
  1281.     } else {
  1282.         MessageDataLength = 0;
  1283.         PacketHeader.Checksum = 0;
  1284.     }
  1286.     PacketHeader.Checksum += KdpComputeChecksum (
  1287.                                     MessageHeader->Buffer,
  1288.                                     MessageHeader->Length
  1289.                                     );
  1291.     //
  1292.     // Initialize and send the packet header.
  1293.     //
  1295.     PacketHeader.PacketLeader = PACKET_LEADER;
  1296.     PacketHeader.byteCount = (USHORT)(MessageHeader->Length + MessageDataLength);
  1297.     PacketHeader.PacketType = (USHORT)PacketType;
  1298.     KdpNumberRetries = KdpRetryCount;
  1299.     do {
  1300.         if (KdpNumberRetries == 0) {
  1302.             //
  1303.             // If the packet is not for reporting exception, we give up
  1304.             // and declare debugger not present.
  1305.             //
  1307.             if (PacketType == PACKET_TYPE_KD_DEBUG_IO) {
  1308.                 DebugIo = (PDBGKD_DEBUG_IO)MessageHeader->Buffer;
  1309.                 if (DebugIo->ApiNumber == DbgKdPrintStringApi) {
  1310.                     KdDebuggerNotPresent = TRUE;
  1311.                     SharedUserData->KdDebuggerEnabled &= ~0x00000002;
  1312.                     KdpNextPacketIdToSend = INITIAL_PACKET_ID | SYNC_PACKET_ID;//80800000|0800h
  1313.                     KdpPacketIdExpected = INITIAL_PACKET_ID; //80800000h
  1314.                     return;
  1315.                 }
  1316.             } else if (PacketType == PACKET_TYPE_KD_STATE_CHANGE64) {
  1317.                 StateChange = (PDBGKD_WAIT_STATE_CHANGE64)MessageHeader->Buffer;
  1318.                 if (StateChange->NewState == DbgKdLoadSymbolsStateChange) {
  1319.                     KdDebuggerNotPresent = TRUE;
  1320.                     SharedUserData->KdDebuggerEnabled &= ~0x00000002;
  1321.                     KdpNextPacketIdToSend = INITIAL_PACKET_ID | SYNC_PACKET_ID;
  1322.                     KdpPacketIdExpected = INITIAL_PACKET_ID;
  1323.                     return;
  1324.                 }
  1325.             }
  1326.    else if (PacketType == PACKET_TYPE_KD_FILE_IO)
  1327.    {
  1328.     FileIo = (PDBGKD_FILE_IO)MessageHeader->Buffer;
  1329.     if (FileIo->ApiNumber== DbgKdCreateFileApi) {
  1330.                     KdDebuggerNotPresent = TRUE;
  1331.                     SharedUserData->KdDebuggerEnabled &= ~0x00000002;
  1332.                     KdpNextPacketIdToSend = INITIAL_PACKET_ID | SYNC_PACKET_ID;
  1333.                     KdpPacketIdExpected = INITIAL_PACKET_ID;
  1334.                     return;
  1335.                 }
  1336.    }
  1337.         }
  1339.         //
  1340.         // Setting PacketId has to be in the do loop in case Packet Id was
  1341.         // reset.
  1342.         //
  1344.         PacketHeader.PacketId = KdpNextPacketIdToSend;
  1345.         KdpSendString((PCHAR)&PacketHeader, sizeof(KD_PACKET));
  1347.         //
  1348.         // Output message header.
  1349.         //
  1351.         KdpSendString(MessageHeader->Buffer, MessageHeader->Length);
  1353.         //
  1354.         // Output message data.
  1355.         //
  1357.         if ( MessageDataLength ) {
  1358.             KdpSendString(MessageData->Buffer, MessageData->Length);
  1359.         }
  1361.         //
  1362.         // Output a packet trailing UCHAR
  1363.         //
  1365.         KdCompPutByte(PACKET_TRAILING_BYTE);
  1367.         //
  1368.         // Wait for the Ack Packet
  1369.         //
  1371.         ReturnCode = KdReceivePacket(
  1372.                          PACKET_TYPE_KD_ACKNOWLEDGE,
  1373.                          NULL,
  1374.                          NULL,
  1375.                          NULL,
  1376.                          KdContext
  1377.                          );
  1378.         if (ReturnCode == KDP_PACKET_TIMEOUT) {
  1379.             KdpNumberRetries--;
  1380.         }
  1381.     } while (ReturnCode != KDP_PACKET_RECEIVED);
  1383.     //
  1384.     // Reset Sync bit in packet id.  The packet we sent may have Sync bit set
  1385.     //
  1387.     KdpNextPacketIdToSend &= ~SYNC_PACKET_ID;
  1389.     //
  1390.     // Since we are able to talk to debugger, the retrycount is set to
  1391.     // maximum value.
  1392.     //
  1394.     KdpRetryCount = KdContext->RetryCount;
  1395. }

另给出我在网上找到的关于串口通信的资料:


 

  1. Serial I/O  
  3. Table of Registers
  4. --------------------------------------------------------------------------------
  5. Base Address DLAB Read/Write  Abr.   Register Name  
  6. + 0   =0 Write  -   Transmitter Holding Buffer  
  7.   =0 Read  -   Receiver Buffer  
  8.   =1 Read/Write  -   Divisor Latch Low Byte  
  9. + 1   =0 Read/Write  IER   Interrupt Enable Register  
  10.   =1 Read/Write  -   Divisor Latch High Byte  
  11. + 2   - Read   IIR   Interrupt Identification Register 
  12.   - Write  FCR   FIFO Control Register  
  13. + 3   - Read/Write  LCR   Line Control Register  
  14. + 4   - Read/Write  MCR   Modem Control Register  
  15. + 5   - Read   LSR   Line Status Register  
  16. + 6   - Read   MSR   Modem Status Register  
  17. + 7   - Read/Write  -   Scratch Register  
  18. -------------------------------------------------------------------------------
  19. Table 5 : Table of Registers
  21. DLAB ?
  22. --------------------------------------------------------------------------------
  25. You will have noticed in the table of registers that there is a DLAB column. When DLAB is set to '0' or '1' some of the 
  26. registers change. This is how the UART is able to have 12 registers (including the scratch register) through only 8 port
  27.  addresses. DLAB stands for Divisor Latch Access Bit. When DLAB is set to '1' via the line control register, two registers 
  28. become available from which you can set your speed of communications measured in bits per second.
  30. The UART will have a crystal which should oscillate around 1.8432 MHZ. The UART incorporates a divide by 16 counter
  31.  which simply divides the incoming clock signal by 16. Assuming we had the 1.8432 MHZ clock signal, that would leave us
  32.  with a maximum, 115,200 hertz signal making the UART capable of transmitting and receiving at 115,200 Bits Per Second (BPS).
  33.  That would be fine for some of the faster modems and devices which can handle that speed, but others just wouldn't communicate 
  34. at all. Therefore the UART is fitted with a Programmable Baud Rate Generator which is controlled by two registers.
  36. Lets say for example we only wanted to communicate at 2400 BPS. We worked out that we would have to divide 115,200 by 48 to 
  37. get a workable 2400 Hertz Clock. The "Divisor", in this case 48, is stored in the two registers controlled by the 
  38. "Divisor Latch Access Bit". This divisor can be any number which can be stored in 16 bits (ie 0 to 65535). The UART only 
  39. has a 8 bit data bus, thus this is where the two registers are used. The first register (Base + 0) when DLAB = 1 stores
  40.  the "Divisor latch low byte" where as the second register (base + 1 when DLAB = 1) stores the "Divisor latch high byte."
  42. Below is a table of some more common speeds and their divisor latch high bytes & low bytes. Note that all the divisors are 
  43. shown in Hexadecimal.
  45. -------------------------------------------------------------------------------
  46. Speed (BPS)  Divisor (Dec)  Divisor Latch High Byte  Divisor Latch Low Byte  
  47. 50    2304     09h     00h  
  48. 300    384     01h     80h  
  49. 600    192     00h     C0h  
  50. 2400      48     00h     30h  
  51. 4800      24     00h     18h  
  52. 9600    12     00h     0Ch  
  53. 19200     6     00h    06h  
  54. 38400     3     00h     03h  
  55. 57600     2     00h     02h  
  56. 115200     1     00h     01h
  57. -------------------------------------------------------------------------------  
  58. Table 6 : Table of Commonly Used Baudrate Divisors 
  60. Interrupt Enable Register (IER)
  64. --------------------------------------------------------------------------------
  67. -------------------------------------------------------------------------------
  68. Bit   Notes 
  69. Bit 7 Reserved 
  70. Bit 6 Reserved 
  71. Bit 5 Enables Low Power Mode (16750) 
  72. Bit 4 Enables Sleep Mode (16750) 
  73. Bit 3 Enable Modem Status Interrupt 
  74. Bit 2 Enable Receiver Line Status Interrupt 
  75. Bit 1 Enable Transmitter Holding Register Empty Interrupt 
  76. Bit 0 Enable Received Data Available Interrupt 
  77. -------------------------------------------------------------------------------
  78. Table 7 : Interrupt Enable Register
  80. The Interrupt Enable Register could possibly be one of the easiest registers on a UART to understand. Setting Bit 0 high enables
  81.  the Received Data Available Interrupt which generates an interrupt when the receiving register/FIFO contains data to be read by 
  82. the CPU. 
  84. Bit 1 enables Transmit Holding Register Empty Interrupt. This interrupts the CPU when the transmitter buffer is empty. Bit 2 
  85. enables the receiver line status interrupt. The UART will interrupt when the receiver line status changes. Likewise for bit 3 
  86. which enables the modem status interrupt. Bits 4 to 7 are the easy ones. They are simply reserved. (If only everything was that
  87.  easy!) 
  89. Interrupt Identification Register (IIR)
  93. -------------------------------------------------------------------------------
  94. Bit   Notes 
  95. Bits 6 and 7  Bit 6  Bit 7   
  96.   0  0  No FIFO  
  97.   0  1  FIFO Enabled but Unusable  
  98.   1  1  FIFO Enabled  
  99. Bit 5   64 Byte Fifo Enabled (16750 only) 
  100. Bit 4   Reserved 
  101. Bit 3   0 Reserved on 8250, 16450 
  102.   1 16550 Time-out Interrupt Pending 
  103. Bits 1 and 2  Bit 2 Bit 1    
  104.   0  0 Modem Status Interrupt  
  105.   0  1 Transmitter Holding Register Empty Interrupt 
  106.   1  0 Received Data Available Interrupt 
  107.   1  1 Receiver Line Status Interrupt 
  108. Bit0   0 Interrupt Pending 
  109.   1 No Interrupt Pending 
  111. Table 8 : Interrupt Identification Register 
  112. The interrupt identification register is a read only register. Bits 6 and 7 give status on the FIFO Buffer. When both bits are '0'
  113.  no FIFO buffers are active. This should be the only result you will get from a 8250 or 16450. If bit 7 is active but bit 6 is not 
  114. active then the UART has it's buffers enabled but are unusable. This occurs on the 16550 UART where a bug in the FIFO buffer made 
  115. the FIFO's unusable. If both bits are '1' then the FIFO buffers are enabled and fully operational. 
  117. Bits 4 and 5 are reserved. Bit 3 shows the status of the time-out interrupt on a 16550 or higher. 
  119. Lets jump to Bit 0 which shows whether an interrupt has occurred. If an interrupt has occurred it's status will shown by bits 1 
  120. and 2. These interrupts work on a priority status. The Line Status Interrupt has the highest Priority, followed by the Data 
  121. Available Interrupt, then the Transmit Register Empty Interrupt and then the Modem Status Interrupt which has the lowest priority. 
  124. First In / First Out Control Register (FCR)
  126. -------------------------------------------------------------------------------
  127. Bit   Notes 
  128. Bits 6 and 7 Bit 7  Bit 6  Interrupt Trigger Level  
  129.   0  0  1 Byte  
  130.   0  1  4 Bytes  
  131.   1  0  8 Bytes  
  132.   1 1  14 Bytes 
  133. Bit 5   Enable 64 Byte FIFO (16750 only) 
  134. Bit 4   Reserved 
  135. Bit 3   DMA Mode Select. Change status of RXRDY & TXRDY pins from mode 1 to mode 2. 
  136. Bit 2   Clear Transmit FIFO 
  137. Bit 1   Clear Receive FIFO 
  138. Bit 0   Enable FIFO's 
  139. -------------------------------------------------------------------------------
  140. Table 9 : FIFO Control Register 
  142. The FIFO register is a write only register. This register is used to control the FIFO (First In / First Out) buffers which are 
  143. found on 16550's and higher. 
  145. Bit 0 enables the operation of the receive and transmit FIFO's. Writing a '0' to this bit will disable the operation of transmit 
  146. and receive FIFO's, thus you will loose all data stored in these FIFO buffers. 
  148. Bit's 1 and 2 control the clearing of the transmit or receive FIFO's. Bit 1 is responsible for the receive buffer while bit 2 is 
  149. responsible for the transmit buffer. Setting these bits to 1 will only clear the contents of the FIFO and will not affect the 
  150. shift registers. These two bits are self resetting, thus you don't need to set the bits to '0' when finished. 
  152. Bit 3 enables the DMA mode select which is found on 16550 UARTs and higher. More on this later. Bits 4 and 5 are those easy type 
  153. again, Reserved. 
  155. Bits 6 and 7 are used to set the triggering level on the Receive FIFO. For example if bit 7 was set to '1' and bit 6 was set to '0' 
  156. then the trigger level is set to 8 bytes. When there is 8 bytes of data in the receive FIFO then the Received Data Available 
  157. interrupt is set. See (IIR) 
  159. Line Control Register (LCR)
  163. ----------------------+---------------------------------------------------------
  164. Bit    Notes 
  165. Bit 7    1 Divisor Latch Access Bit 
  166.    0 Access to Receiver buffer, Transmitter buffer & Interrupt Enable Register 
  167. Bit 6    Set Break Enable 
  168. Bits 3, 4 And 5  Bit 5  Bit 4  Bit 3  Parity Select 
  169.    X  X  0  No Parity  
  170.    0  0  1  Odd Parity  
  171.    0  1  1  Even Parity  
  172.    1  0  1  High Parity (Sticky) 
  173.    1  1  1  Low Parity (Sticky) 
  174. Bit 2   Length of Stop Bit 
  175.    0 One Stop Bit 
  176.    1 2 Stop bits for words of length 6,7 or 8 bits or 1.5 Stop Bits for Word lengths of 5 bits. 
  177. Bits 0 And 1   Bit 1  Bit 0  Word Length 
  178.    0  0  5 Bits  
  179.    0  1  6 Bits  
  180.    1  0  7 Bits  
  181.    1  1  8 Bits  
  182. ----------------------+---------------------------------------------------------
  183. Table 10 : Line Control Register 
  185. The Line Control register sets the basic parameters for communication. Bit 7 is the Divisor Latch Access Bit or DLAB for short. 
  186. We have already talked about what it does. (See DLAB?) Bit 6 Sets break enable. When active, the TD line goes into "Spacing" 
  187. state which causes a break in the receiving UART. Setting this bit to '0' Disables the Break.
  189. Bits 3,4 and 5 select parity. If you study the 3 bits, you will find that bit 3 controls parity. That is, if it is
  190.  set to '0' then no parity is used, but if it is set to '1' then parity is used. Jumping to bit 5, we can see that it
  191.  controls sticky parity. Sticky parity is simply when the parity bit is always transmitted and checked as a '1' or '0'. 
  192. This has very little success in checking for errors as if the first 4 bits contain errors but the sticky parity bit contains 
  193. the appropriately set bit, then a parity error will not result. Sticky high parity is the use of a '1' for the parity bit, 
  194. while the opposite, sticky low parity is the use of a '0' for the parity bit. 
  196. If bit 5 controls sticky parity, then turning this bit off must produce normal parity provided bit 3 is still set to '1'.
  197.  Odd parity is when the parity bit is transmitted as a '1' or '0' so that there is a odd number of 1's. Even parity must 
  198. then be the parity bit produces and even number of 1's. This provides better error checking but still is not perfect, 
  199. thus CRC-32 is often used for software error correction. If one bit happens to be inverted with even or odd parity set, 
  200. then a parity error will occur, however if two bits are flipped in such a way that it produces the correct parity bit 
  201. then an parity error will no occur. 
  203. Bit 2 sets the length of the stop bits. Setting this bit to '0' will produce one stop bit, however setting it to '1' will 
  204. produce either 1.5 or 2 stop bits depending upon the word length. Note that the receiver only checks the first stop bit. 
  206. Bits 0 and 1 set the word length. This should be pretty straight forward. A word length of 8 bits is most commonly used today. 
  208. Modem Control Register (MCR)
  210. -----+--------------------------------------------------------------------------
  211. Bit   Notes 
  212. Bit 7 Reserved 
  213. Bit 6 Reserved 
  214. Bit 5 Autoflow Control Enabled (16750 only) 
  215. Bit 4 LoopBack Mode  
  216. Bit 3 Aux Output 2 
  217. Bit 2 Aux Output 1 
  218. Bit 1 Force Request to Send 
  219. Bit 0 Force Data Terminal Ready 
  220. -----+--------------------------------------------------------------------------
  221. Table 11 : Modem Control Register 
  223. The Modem Control Register is a Read/Write Register. Bits 5,6 and 7 are reserved. Bit 4 activates the loopback mode. In Loopback
  224. mode the transmitter serial output is placed into marking state. The receiver serial input is disconnected. The transmitter out 
  225. is looped back to the receiver in. DSR, CTS, RI & DCD are disconnected. DTR, RTS, OUT1 & OUT2 are connected to the modem control 
  226. inputs. The modem control output pins are then place in an inactive state. In this mode any data which is placed in the transmitter 
  227. registers for output is received by the receiver circuitry on the same chip and is available at the receiver buffer. This can be 
  228. used to test the UARTs operation.
  230. Aux Output 2 maybe connected to external circuitry which controls the UART-CPU interrupt process. Aux Output 1 is normally 
  231. disconnected, but on some cards is used to switch between a 1.8432MHZ crystal to a 4MHZ crystal which is used for MIDI. 
  232. Bits 0 and 1 simply control their relevant data lines. For example setting bit 1 to '1' makes the request to send line active. 
  234. Line Status Register (LSR)
  237. -----+--------------------------------------------------------------------------
  238. Bit  |Notes 
  239. -----+--------------------------------------------------------------------------
  240. Bit 7 Error in Received FIFO 
  241. Bit 6 Empty Data Holding Registers  
  242. Bit 5 Empty Transmitter Holding Register 
  243. Bit 4 Break Interrupt  
  244. Bit 3 Framing Error 
  245. Bit 2 Parity Error 
  246. Bit 1 Overrun Error 
  247. Bit 0 Data Ready 
  248. -----+--------------------------------------------------------------------------
  249. Table 12 : Line Status Register 
  250. The line status register is a read only register. Bit 7 is the error in received FIFO bit. This bit is high when at least one break,
  251.  parity or framing error has occurred on a byte which is contained in the FIFO. 
  253. When bit 6 is set, both the transmitter holding register and the shift register are empty. The UART's holding register holds the 
  254. next byte of data to be sent in parallel fashion. The shift register is used to convert the byte to serial, so that it can be 
  255. transmitted over one line. When bit 5 is set, only the transmitter holding register is empty. So what's the difference between the 
  256. two? When bit 6, the transmitter holding and shift registers are empty, no serial conversions are taking place so there should be 
  257. no activity on the transmit data line. When bit 5 is set, the transmitter holding register is empty, thus another byte can be sent 
  258. to the data port, but a serial conversion using the shift register may be taking place. 
  260. The break interrupt (Bit 4) occurs when the received data line is held in a logic state '0' (Space) for more than the time it takes 
  261. to send a full word. That includes the time for the start bit, data bits, parity bits and stop bits. 
  263. A framing error (Bit 3) occurs when the last bit is not a stop bit. This may occur due to a timing error. You will most commonly 
  264. encounter a framing error when using a null modem linking two computers or a protocol analyzer when the speed at which the data 
  265. is being sent is different to that of what you have the UART set to receive it at. 
  267. A overrun error normally occurs when your program can't read from the port fast enough. If you don't get an incoming byte out of 
  268. the register fast enough, and another byte just happens to be received, then the last byte will be lost and a overrun error will 
  269. result. 
  271. Bit 0 shows data ready, which means that a byte has been received by the UART and is at the receiver buffer ready to be read. 
  273. Modem Status Register (MSR)
  276. -----+--------------------------------------------------------------------------
  277. Bit  | Notes 
  278. -----+--------------------------------------------------------------------------
  279. Bit 7 Carrier Detect 
  280. Bit 6 Ring Indicator  
  281. Bit 5 Data Set Ready 
  282. Bit 4 Clear To Send  
  283. Bit 3 Delta Data Carrier Detect 
  284. Bit 2 Trailing Edge Ring Indicator 
  285. Bit 1 Delta Data Set Ready 
  286. Bit 0 Delta Clear to Send 
  287. -----+--------------------------------------------------------------------------
  288. Table 13 : Modem Status Register 
  290. Bit 0 of the modem status register shows delta clear to send, delta meaning a change in, thus delta clear to send means that there 
  291. was a change in the clear to send line, since the last read of this register. This is the same for bits 1 and 3. Bit 1 shows a 
  292. change in the Data Set Ready line where as Bit 3 shows a change in the Data Carrier Detect line. Bit 2 is the Trailing Edge Ring 
  293. Indicator which indicates that there was a transformation from low to high state on the Ring Indicator line. 
  295. Bits 4 to 7 show the current state of the data lines when read. Bit 7 shows Carrier Detect, Bit 6 shows Ring Indicator, Bit 5 shows 
  296. Data Set Ready & Bit 4 shows the status of the Clear To Send line. 
  298. --------------------------------------------------------------------------------
  300. Samples
  302. /* Name       : Sample Comm's Program - Polled Version - termpoll.c     */
  304. #include <dos.h>
  305. #include <stdio.h>
  306. #include <conio.h>
  308. #define PORT1 0x3F8
  310.   /* Defines Serial Ports Base Address */
  311.   /* COM1 0x3F8                        */
  312.   /* COM2 0x2F8          */
  313.   /* COM3 0x3E8          */
  314.   /* COM4 0x2E8          */
  316. void main(void)
  317. {
  318.  int c;
  319.  int ch;
  320.  outportb(PORT1 + 1 , 0);   /* Turn off interrupts - Port1 */
  322.  /*         PORT 1 - Communication Settings         */
  324.  outportb(PORT1 + 3 , 0x80);  /* SET DLAB ON */
  325.  outportb(PORT1 + 0 , 0x03);  /* Set Baud rate - Divisor Latch Low Byte */
  326.          /* Default 0x03 =  38,400 BPS */
  327.          /*         0x01 = 115,200 BPS */
  328.          /*         0x02 =  57,600 BPS */
  329.          /*         0x06 =  19,200 BPS */
  330.          /*         0x0C =   9,600 BPS */
  331.          /*         0x18 =   4,800 BPS */
  332.          /*         0x30 =   2,400 BPS */
  333.  outportb(PORT1 + 1 , 0x00);  /* Set Baud rate - Divisor Latch High Byte */
  334.  outportb(PORT1 + 3 , 0x03);  /* 8 Bits, No Parity, 1 Stop Bit */
  335.  outportb(PORT1 + 2 , 0xC7);  /* FIFO Control Register */
  336.  outportb(PORT1 + 4 , 0x0B);  /* Turn on DTR, RTS, and OUT2 */
  338.  printf("/nSample Comm's Program. Press ESC to quit /n");
  340.  do { c = inportb(PORT1 + 5);          /* Check to see if char has been */
  341.                                        /* received.                     */
  342.       if (c & 1) {ch = inportb(PORT1); /* If so, then get Char          */
  343.                   printf("%c",ch);}    /* Print Char to Screen          */
  345.       if (kbhit()){ch = getch();         /* If key pressed, get Char */
  346.                    outportb(PORT1, ch);} /* Send Char to Serial Port */
  348.     } while (ch !=27); /* Quit when ESC (ASC 27) is pressed */
  349. }
  350. --------------------------------------------------------------------------------
  351. The End

 

 

aerror
关注
  • 0
    点赞
  • 踩
  • 1
    收藏
    觉得还不错? 一键收藏
  • 3
    评论
评论 3
添加红包

请填写红包祝福语或标题

个

红包个数最小为10个

元

红包金额最低5元

当前余额3.43元 前往充值 >
需支付：10.00元
成就一亿技术人!
领取后你会自动成为博主和红包主的粉丝 规则
hope_wisdom
发出的红包
实付元
使用余额支付
点击重新获取
扫码支付
钱包余额 0

抵扣说明：

1.余额是钱包充值的虚拟货币，按照1:1的比例进行支付金额的抵扣。
2.余额无法直接购买下载，可以购买VIP、付费专栏及课程。

余额充值