proc GetInfosCPUs ;(XP Pro Sp3 - 4µPs Q6600)

              mov ecx , IA32_SYSENTER_EIP
              rdmsr
              mov [KiDispServ] , eax  ;here, no matter the n° of processor,
                                      ;it's just a start reference point.
              call KeGetCurrentThread 

              mov [MyThread] , eax

              mov ecx,[eax + KTHREAD.ApcState.Process]
              mov edx,[ecx + KPROCESS.DirectoryTableBase]
              mov ecx,[ecx + KPROCESS.Affinity] ;= +5Ch

              push ecx

              call KeQueryActiveProcessors

              pop ecx

              xchg eax , ecx ; eax = "Mon_Affinity" - ecx = "System_Affinity"

;ici j'ai ceci:
;—————————————
;ecx = "System" Affinity 
;eax = "my" Affinity

              xor ebx , ebx
              xor edx , edx

              bsr esi , ecx
              bts edx , esi    ;"masque_maximum"
              bsf esi , ecx
              bts ebx , esi    ;"masque_minimum" = masque de départ

              xor edi , edi    ;edi = index pour la mémorisation. Départ = 0
              xor esi , esi

.next_µP:
              test ebx , ecx    ; bit/on dans "System_Affinity" ?
              jz .bad

              pushad

              mov [CPU.Masque + edi] , ebx

              test ebx , eax
              mov eax , 000010b      ;µP faisant partie de "Mon_Affinity"
              jnz .DMProc
              mov eax , 000100b      ;µP "extérieur"
.DMProc:      mov [CPU.Origine + edi] , eax

              push edi
 
              stdcall KeSetSystemAffinityThread , ebx 
 
              pop edi

              sidt fword [CPU.IDTR + edi] ;Mémo des IDTR et GDTR
              sgdt fword [CPU.GDTR + edi]

;-----------------------------------------------------

              ;mov eax , [fs:0 + KPCR.SelfPcr]
              ;or,
              mov ecx , IA32_FS_BASE ;IA32_FS_BASE equ 0C0000100h
              rdmsr
              mov [CPU.PKPCR + edi] , eax

;-----------------------------------------------------

              imul eax , esi , DimTAA * 256
              mov [CPU.ShiftTableAll + edi] , eax

;----------------------------------------------------- Mémo des MSR_ESP
              mov ecx , IA32_SYSENTER_ESP
              rdmsr             ;(YY)
              mov [CPU.R0_Stack + edi] , eax

              if pileperso eq 1 ;"ma" pile ? 
                 lea eax , [esi + 1]
                 imul eax , eax , 1000h
                 lea eax , [ma_pile + eax]
                 wrmsr            ;edx from (YY)
              end if

 ;-----------------------------------------------------

              mov ecx , IA32_SYSENTER_EIP
              rdmsr             ;(XX)
              mov [CPU.KiDispServ + edi] , eax

              cmp eax , [KiDispServ]
              jz .okKDS

              mov eax , 77000003h ;des "KiDispServ" différents !
              jmp problem   ;usually, never !

.okKDS:       cmp [CPU.Origine + edi] , 000100b
              jz .pasmoi

              imul eax , esi , DimSPC ;DimSPC = sizeof."SysParCpu"
              add eax , offset hook_se

              wrmsr ;<=== HOOK de "MSR_EIP" - edx from (XX)

.pasmoi:      nop

;HOOK de "MSR_EIP" = offset "hook_se" + (0xDimSPC),(1xDimSPC)...
;-----------------------------------------------------

              mov ecx , IA32_APIC_BASE ;mémo des "APIC_BASE"
              rdmsr
              mov [CPU.ApicBase + edi] , eax

              bt eax , 8       ;bootstrap processor ?
              jnc .no_BSPµP

              mov ebx , [fs:0 + KPCR.KdVersionBlock]
              mov [CPU.KdVersionBlock] , ebx

.no_BSPµP:

;----------------------------------------------------------
              popad
;----------------------------------------------------------

             inc esi        ;compteur
             add edi , Dim  ;Dim = sizeof(CPU) , CPU = struct "INFOµP".
.bad:        shl ebx , 1

             cmp ebx , edx

             jbe .next_µP   ;jump si scan_masque <= masque_maximum

; les butées (pas toucher)
; ————————————————————————
             mov [CPU.IdtrVecteur + edi] , 0      ;dans "close"
             mov [CPU.GdtrVecteur + edi] , 0      ;
             mov [CPU.ApicBase + edi]    , 0      ;
             mov [CPU.Masque + edi]      , 'stop' ;dans "close"

             call KeRevertToUserAffinityThread   ;pas de paramètres.

             retproc
endp
;-------------------------------------------------------------------------
Data "CPU = INFOµP"
;------------------
CPU INFOµP
rb (sizeof.INFOµP * (32-1)) ; max 0x20µPs with XP Pro


struct   INFOµP
;
 union
 IDTR               dp 0
    struct
       IdtrSize         dw 0
       IdtrVecteur  dd 0
    ends
 ends
 ;
 union
    GDTR            dp 0
    struct
       GdtrSize     dw 0
       GdtrVecteur  dd 0
    ends
 ends
 ;
 Masque             dd 0
 ApicBase           dd 0
 R0_Stack           dd 0
 KdVersionBlock     dd 0
 Origine            dd 0
 ShiftTableAll      dd 0
 KiDispServ         dd 0
 PKPCR              dd 0
      
 Int02h_NMI_A       dd 0
 Int02h_NMI_B       dd 0

 Res1               dd 0
 Res2               dd 0
 Res3               dd 0 
 ;
ends
Dim equ sizeof.INFOµP
    

but how can i check bugs with a single core ?