fn62 rotation bug fixed

git-svn-id: svn://kolibrios.org@1602 a494cfbc-eb01-0410-851d-a64ba20cac60
This commit is contained in:
Artem Jerdev (art_zh) 2010-09-05 00:00:21 +00:00
parent d47a233b2a
commit 62007342e9

View File

@ -1,6 +1,6 @@
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
;; ;; ;; ;;
;; Copyright (C) KolibriOS team 2004-2010. All rights reserved. ;; ;; Copyright (C) KolibriOS team 2004-2007. All rights reserved. ;;
;; Distributed under terms of the GNU General Public License ;; ;; Distributed under terms of the GNU General Public License ;;
;; ;; ;; ;;
;; ;; ;; ;;
@ -35,14 +35,14 @@ $Revision$
iglobal iglobal
align 4 align 4
f62call: f62call:
dd pci_api.0 dd pci_fn_0
dd pci_api.1 dd pci_fn_1
dd pci_api.2 dd pci_fn_2
dd pci_api.not_support ;3 dd pci_service_not_supported ;3
dd pci_read_reg ;4 byte dd pci_read_reg ;4 byte
dd pci_read_reg ;5 word dd pci_read_reg ;5 word
dd pci_read_reg ;6 dword dd pci_read_reg ;6 dword
dd pci_api.not_support ;7 dd pci_service_not_supported ;7
dd pci_write_reg ;8 byte dd pci_write_reg ;8 byte
dd pci_write_reg ;9 word dd pci_write_reg ;9 word
dd pci_write_reg ;10 dword dd pci_write_reg ;10 dword
@ -51,95 +51,51 @@ if defined mmio_pci_addr
dd pci_mmio_map ;12 dd pci_mmio_map ;12
dd pci_mmio_unmap ;13 dd pci_mmio_unmap ;13
end if end if
f62_rcall:
dd pci_read_reg.0 ;4 byte
dd pci_read_reg.1 ;5 word
dd pci_read_reg.2 ;6 dword
f62_rcall2:
dd pci_read_reg_2.0 ;4 byte
dd pci_read_reg_2.1 ;5 word
dd pci_read_reg_2.2 ;6 dword
f62_wcall:
dd pci_write_reg.0 ;4 byte
dd pci_write_reg.1 ;5 word
dd pci_write_reg.2 ;6 dword
f62_wcall2:
dd pci_write_reg_2.0 ;4 byte
dd pci_write_reg_2.1 ;5 word
dd pci_write_reg_2.2 ;6 dword
endg endg
align 4 align 4
pci_api: pci_api:
movzx eax,bl
cmp [pci_access_enabled],1 cmp [pci_access_enabled],1
jne .no_pci_access_for_applications jne pci_service_not_supported
;cross
mov eax,ebx
mov ebx,ecx
mov ecx,edx
;;;;;;;;;;;;;;;;;;;
if defined mmio_pci_addr if defined mmio_pci_addr
cmp eax, 13 cmp eax, 13
jb .not_support jb pci_service_not_supported
else else
cmp eax, 10 cmp eax, 10
jb .not_support jb pci_service_not_supported
end if end if
call dword [f62call+eax*4]
call dword [f62call+eax*4]
mov dword [esp+32],eax mov dword [esp+32],eax
ret ret
;; ============================================
pci_fn_0:
; PCI function 0: get pci version (AH.AL)
; or al,al movzx eax,word [BOOT_VAR+0x9022]
; jnz pci_fn_1
; PCI function 0: get pci version (AH.AL)
.0:
movzx eax, word [BOOT_VAR+0x9022]
ret ret
;pci_fn_1: pci_fn_1:
; cmp al,1 ; PCI function 1: get last bus in AL
; jnz pci_fn_2 mov al,[BOOT_VAR+0x9021]
; PCI function 1: get last bus in AL
.1:
movzx eax, byte [BOOT_VAR+0x9021]
ret ret
;pci_fn_2: pci_fn_2:
; cmp al,2 ; PCI function 2: get pci access mechanism
; jne pci_fn_3 mov al,[BOOT_VAR+0x9020]
; PCI function 2: get pci access mechanism
.2:
movzx eax, byte [BOOT_VAR+0x9020]
ret ret
;pci_fn_3:
; cmp al,4 pci_service_not_supported:
; jz pci_read_reg ;byte or eax,-1
; cmp al,5
; jz pci_read_reg ;word
; cmp al,6
; jz pci_read_reg ;dword
; cmp al,8
; jz pci_write_reg ;byte
; cmp al,9
; jz pci_write_reg ;word
; cmp al,10
; jz pci_write_reg ;dword
;if defined mmio_pci_addr
; cmp al,11 ; user-level MMIO functions
; jz pci_mmio_init
; cmp al,12
; jz pci_mmio_map
; cmp al,13
; jz pci_mmio_unmap
;end if
.not_support:
.no_pci_access_for_applications:
or eax,-1
ret ret
;*************************************************************************** ;***************************************************************************
@ -148,20 +104,20 @@ end if
; ;
; Description ; Description
; creates a command dword for use with the PCI bus ; creates a command dword for use with the PCI bus
; bus # in bh;ah ; bus # in ah
; device+func in ch;bh (dddddfff) ; device+func in bh (dddddfff)
; register in cl;bl ; register in bl
; ;
; command dword returned in ebx;eax ( 10000000 bbbbbbbb dddddfff rrrrrr00 ) ; command dword returned in eax ( 10000000 bbbbbbbb dddddfff rrrrrr00 )
;*************************************************************************** ;***************************************************************************
align 4 align 4
pci_make_config_cmd: pci_make_config_cmd:
shl ebx,8;eax,8 ; move bus to bits 16-23 shl eax,8 ; move bus to bits 16-23
mov bx,cx;ax,bx ; combine all mov ax,bx ; combine all
and ebx,0xffffff;eax,0xffffff and eax,0xffffff
or ebx,0x80000000;eax,0x80000000 or eax,0x80000000
ret ret
;*************************************************************************** ;***************************************************************************
@ -170,8 +126,8 @@ pci_make_config_cmd:
; ;
; Description ; Description
; read a register from the PCI config space into EAX/AX/AL ; read a register from the PCI config space into EAX/AX/AL
; IN: bh=bus,device+func=ch,register address=cl ; IN: ah=bus,device+func=bh,register address=bl
; number of bytes to read (1,2,4) coded into BL, bits 0-1 ; number of bytes to read (1,2,4) coded into AL, bits 0-1
; (0 - byte, 1 - word, 2 - dword) ; (0 - byte, 1 - word, 2 - dword)
;*************************************************************************** ;***************************************************************************
@ -182,12 +138,12 @@ pci_read_reg:
je pci_read_reg_2 je pci_read_reg_2
; mechanism 1 ; mechanism 1
; push esi ; save register size into ESI push esi ; save register size into ESI
mov esi,ebx;eax mov esi,eax
and esi,3 and esi,3
call pci_make_config_cmd call pci_make_config_cmd
mov eax,ebx;ebx,eax mov ebx,eax
; get current state ; get current state
mov dx,0xcf8 mov dx,0xcf8
in eax, dx in eax, dx
@ -201,44 +157,42 @@ pci_read_reg:
and bl,3 and bl,3
or dl,bl ; add to port address first 2 bits of register address or dl,bl ; add to port address first 2 bits of register address
; or esi,esi or esi,esi
; jz pci_read_byte1 jz pci_read_byte1
; cmp esi,1 cmp esi,1
; jz pci_read_word1 jz pci_read_word1
; cmp esi,2 cmp esi,2
; jz pci_read_dword1 jz pci_read_dword1
; jmp pci_fin_read1 jmp pci_fin_read1
jmp dword [f62_rcall+esi*4]
.0: pci_read_byte1:
in al,dx in al,dx
jmp .pci_fin_read1 jmp pci_fin_read1
.1: pci_read_word1:
in ax,dx in ax,dx
jmp .pci_fin_read1 jmp pci_fin_read1
.2: pci_read_dword1:
in eax,dx in eax,dx
; jmp pci_fin_read1 jmp pci_fin_read1
.pci_fin_read1: pci_fin_read1:
; restore configuration control ; restore configuration control
xchg eax,[esp] xchg eax,[esp]
mov dx,0xcf8 mov dx,0xcf8
out dx,eax out dx,eax
pop eax pop eax
;pop esi pop esi
ret ret
pci_read_reg_2: pci_read_reg_2:
test ch,128;bh,128 ;mech#2 only supports 16 devices per bus test bh,128 ;mech#2 only supports 16 devices per bus
jnz pci_api.not_support jnz pci_read_reg_err
; push esi ; save register size into ESI push esi ; save register size into ESI
mov esi,ebx;eax mov esi,eax
and esi,3 and esi,3
push ebx;eax push eax
mov eax,ebx
;store current state of config space ;store current state of config space
mov dx,0xcf8 mov dx,0xcf8
in al,dx in al,dx
@ -255,30 +209,28 @@ pci_read_reg_2:
mov al,0x80 mov al,0x80
out dx,al out dx,al
; compute addr ; compute addr
shr ch,3;bh,3 ; func is ignored in mechanism 2 shr bh,3 ; func is ignored in mechanism 2
or ch,0xc0;bh,0xc0 or bh,0xc0
mov dx,cx;bx mov dx,bx
; or esi,esi or esi,esi
; jz pci_read_byte2 jz pci_read_byte2
; cmp esi,1 cmp esi,1
; jz pci_read_word2 jz pci_read_word2
; cmp esi,2 cmp esi,2
; jz pci_read_dword2 jz pci_read_dword2
; jmp pci_fin_read2 jmp pci_fin_read2
jmp dword [f62_rcall2+esi*4]
.0: pci_read_byte2:
in al,dx in al,dx
jmp .pci_fin_read2 jmp pci_fin_read2
.1: pci_read_word2:
in ax,dx in ax,dx
jmp .pci_fin_read2 jmp pci_fin_read2
.2: pci_read_dword2:
in eax,dx in eax,dx
; jmp pci_fin_read2 ; jmp pci_fin_read2
pci_fin_read2:
.pci_fin_read2:
; restore configuration space ; restore configuration space
xchg eax,[esp] xchg eax,[esp]
@ -289,12 +241,13 @@ pci_read_reg_2:
out dx,al out dx,al
pop eax pop eax
; pop esi pop esi
ret ret
;pci_read_reg_err: pci_read_reg_err:
; or dword [esp+32],-1 xor eax,eax
; ret dec eax
ret
;*************************************************************************** ;***************************************************************************
@ -303,9 +256,9 @@ pci_read_reg_2:
; ;
; Description ; Description
; write a register from ECX/CX/CL into the PCI config space ; write a register from ECX/CX/CL into the PCI config space
; IN: bh=bus,device+func=ch,register address (dword aligned)=cl, ; IN: ah=bus,device+func=bh,register address (dword aligned)=bl,
; value to write in edx ; value to write in ecx
; number of bytes to write (1,2,4) coded into BL, bits 0-1 ; number of bytes to write (1,2,4) coded into AL, bits 0-1
; (0 - byte, 1 - word, 2 - dword) ; (0 - byte, 1 - word, 2 - dword)
;*************************************************************************** ;***************************************************************************
@ -316,13 +269,12 @@ pci_write_reg:
je pci_write_reg_2 je pci_write_reg_2
; mechanism 1 ; mechanism 1
; push esi ; save register size into ESI push esi ; save register size into ESI
mov esi,ebx;eax mov esi,eax
and esi,3 ;not need and esi,3
call pci_make_config_cmd call pci_make_config_cmd
mov eax,ebx;ebx,eax mov ebx,eax
mov ecx,edx ;cross registers
; get current state into ecx ; get current state into ecx
mov dx,0xcf8 mov dx,0xcf8
in eax, dx in eax, dx
@ -337,23 +289,24 @@ pci_write_reg:
or dl,bl or dl,bl
mov eax,ecx mov eax,ecx
; or esi,esi or esi,esi
; jz pci_write_byte1 jz pci_write_byte1
; cmp esi,1 cmp esi,1
; jz pci_write_word1 jz pci_write_word1
; cmp esi,2 cmp esi,2
; jz pci_write_dword1 jz pci_write_dword1
; jmp pci_fin_write1 jmp pci_fin_write1
jmp dword [f62_wcall+esi*4]
.0: pci_write_byte1:
out dx,al out dx,al
jmp .pci_fin_write1 jmp pci_fin_write1
.1: pci_write_word1:
out dx,ax out dx,ax
jmp .pci_fin_write1 jmp pci_fin_write1
.2: pci_write_dword1:
out dx,eax out dx,eax
.pci_fin_write1: jmp pci_fin_write1
pci_fin_write1:
; restore configuration control ; restore configuration control
pop eax pop eax
@ -361,20 +314,20 @@ pci_write_reg:
out dx,eax out dx,eax
xor eax,eax xor eax,eax
;pop esi pop esi
ret ret
pci_write_reg_2: pci_write_reg_2:
test ch,128;bh,128 ;mech#2 only supports 16 devices per bus test bh,128 ;mech#2 only supports 16 devices per bus
jnz pci_api.not_support jnz pci_write_reg_err
; push esi ; save register size into ESI push esi ; save register size into ESI
mov esi,eax mov esi,eax
and esi,3 ;not need and esi,3
push eax push eax
mov ecx,edx ;cross registers
;store current state of config space ;store current state of config space
mov dx,0xcf8 mov dx,0xcf8
in al,dx in al,dx
@ -396,23 +349,24 @@ pci_write_reg_2:
; write register ; write register
mov eax,ecx mov eax,ecx
; or esi,esi or esi,esi
; jz pci_write_byte2 jz pci_write_byte2
; cmp esi,1 cmp esi,1
; jz pci_write_word2 jz pci_write_word2
; cmp esi,2 cmp esi,2
; jz pci_write_dword2 jz pci_write_dword2
; jmp pci_fin_write2 jmp pci_fin_write2
jmp dword [f62_wcall2+esi*4]
.0: pci_write_byte2:
out dx,al out dx,al
jmp .pci_fin_write2 jmp pci_fin_write2
.1: pci_write_word2:
out dx,ax out dx,ax
jmp .pci_fin_write2 jmp pci_fin_write2
.2: pci_write_dword2:
out dx,eax out dx,eax
.pci_fin_write2: jmp pci_fin_write2
pci_fin_write2:
; restore configuration space ; restore configuration space
pop eax pop eax
mov dx,0xcfa mov dx,0xcfa
@ -422,13 +376,13 @@ pci_write_reg_2:
out dx,al out dx,al
xor eax,eax xor eax,eax
;pop esi pop esi
ret ret
;pci_write_reg_err: pci_write_reg_err:
; xor eax,eax xor eax,eax
; dec eax dec eax
; ret ret
if defined mmio_pci_addr ; must be set above if defined mmio_pci_addr ; must be set above
;*************************************************************************** ;***************************************************************************
@ -436,7 +390,7 @@ if defined mmio_pci_addr ; must be set above
; pci_mmio_init ; pci_mmio_init
; ;
; Description ; Description
; IN: cx = device's PCI bus address (bbbbbbbbdddddfff) ; IN: bx = device's PCI bus address (bbbbbbbbdddddfff)
; Returns eax = user heap space available (bytes) ; Returns eax = user heap space available (bytes)
; Error codes ; Error codes
; eax = -1 : PCI user access blocked, ; eax = -1 : PCI user access blocked,
@ -444,7 +398,7 @@ if defined mmio_pci_addr ; must be set above
; eax = -3 : user heap initialization failure ; eax = -3 : user heap initialization failure
;*************************************************************************** ;***************************************************************************
pci_mmio_init: pci_mmio_init:
cmp cx, mmio_pci_addr cmp bx, mmio_pci_addr
jz @f jz @f
mov eax,-2 mov eax,-2
ret ret
@ -468,9 +422,9 @@ pci_mmio_init:
; WARNING! This VERY EXPERIMENTAL service is for one chosen PCI device only! ; WARNING! This VERY EXPERIMENTAL service is for one chosen PCI device only!
; The target device address should be set in kernel var mmio_pci_addr ; The target device address should be set in kernel var mmio_pci_addr
; ;
; IN: bh = BAR#; ; IN: ah = BAR#;
; IN: ecx = block size (bytes); ; IN: ebx = block size (bytes);
; IN: edx = offset in MMIO block (in 4K-pages, to avoid misaligned pages); ; IN: ecx = offset in MMIO block (in 4K-pages, to avoid misaligned pages);
; ;
; Returns eax = MMIO block's linear address in the userspace (if no error) ; Returns eax = MMIO block's linear address in the userspace (if no error)
; ;
@ -485,7 +439,7 @@ pci_mmio_init:
pci_mmio_map: pci_mmio_map:
and edx,0x0ffff and edx,0x0ffff
cmp bh, 6 cmp ah,6
jc .bar_0_5 jc .bar_0_5
jz .bar_rom jz .bar_rom
mov eax,-2 mov eax,-2
@ -493,18 +447,18 @@ pci_mmio_map:
.bar_rom: .bar_rom:
mov ah, 8 ; bar6 = Expansion ROM base address mov ah, 8 ; bar6 = Expansion ROM base address
.bar_0_5: .bar_0_5:
push edx
add ecx, 4095
and ecx, 0xFFFFF000 ; 4k-alignment
push ecx push ecx
mov cl, bh ; cl = BAR# (0..5), however cl=8 for BAR6 add ebx, 4095
shl cl, 1 and ebx,-4096
shl cl, 1 push ebx
add cl, 0x10 ; now cl = BAR offset in PCI config. space mov bl, ah ; bl = BAR# (0..5), however bl=8 for BAR6
shl bl, 1
shl bl, 1
add bl, 0x10 ; now bl = BAR offset in PCI config. space
mov ax, mmio_pci_addr mov ax, mmio_pci_addr
mov ch, al ; ch = dddddfff mov bh, al ; bh = dddddfff
mov bl, 2 ; bl : DW to read mov al, 2 ; al : DW to read
call pci_read_reg ; new call call pci_read_reg
or eax, eax or eax, eax
jnz @f jnz @f
mov eax,-3 ; empty I/O space mov eax,-3 ; empty I/O space
@ -515,12 +469,12 @@ pci_mmio_map:
mov eax,-4 ; damned ports (not MMIO space) mov eax,-4 ; damned ports (not MMIO space)
jmp mmio_ret_fail jmp mmio_ret_fail
@@: @@:
pop ecx ; ecx = block size, bytes (expanded to whole page) pop ecx ; ecx = block size, bytes (expanded to whole page)
mov ebx, ecx ; user_alloc destroys eax, ecx, edx, but saves ebx mov ebx, ecx ; user_alloc destroys eax, ecx, edx, but saves ebx
and al, 0xF0 ; clear flags and eax, 0xFFFFFFF0
push eax ; store MMIO physical address + keep 2DWords in the stack push eax ; store MMIO physical address + keep 2DWords in the stack
stdcall user_alloc, ecx stdcall user_alloc, ecx
or eax, eax or eax, eax
jnz mmio_map_over jnz mmio_map_over
mov eax,-5 ; problem with page allocation mov eax,-5 ; problem with page allocation
@ -533,11 +487,13 @@ mmio_map_over:
mov ecx, ebx ; ecx = size (bytes, expanded to whole page) mov ecx, ebx ; ecx = size (bytes, expanded to whole page)
shr ecx, 12 ; ecx = number of pages shr ecx, 12 ; ecx = number of pages
mov ebx, eax ; ebx = linear address mov ebx, eax ; ebx = linear address
pop eax ; eax = MMIO start pop eax ; eax = MMIO start
pop edx ; edx = MMIO shift (pages) pop edx ; edx = MMIO shift (pages)
shl edx, 12 ; edx = MMIO shift (bytes) shl edx, 12 ; edx = MMIO shift (bytes)
add eax, edx ; eax = uMMIO physical address add eax, edx ; eax = uMMIO physical address
or eax, PG_SHARED+PG_UW+PG_NOCACHE or eax, PG_SHARED
or eax, PG_UW
or eax, PG_NOCACHE
mov edi, ebx mov edi, ebx
call commit_pages call commit_pages
mov eax, edi mov eax, edi
@ -559,7 +515,7 @@ mmio_map_over:
;*************************************************************************** ;***************************************************************************
pci_mmio_unmap: pci_mmio_unmap:
stdcall user_free, ecx;ebx stdcall user_free, ebx
ret ret
end if end if
@ -635,18 +591,17 @@ sys_pcibios:
jmp ..nxt2 jmp ..nxt2
.not_FIND_PCI_CLASS_CODE: .not_FIND_PCI_CLASS_CODE:
mov edx, ecx
cmp ebp, 8 ; READ_CONFIG_* cmp ebp, 8 ; READ_CONFIG_*
jb .not_READ_CONFIG jb .not_READ_CONFIG
cmp ebp, 0x0A cmp ebp, 0x0A
ja .not_READ_CONFIG ja .not_READ_CONFIG
mov eax, ebp ; -- ?? mov eax, ebp
; mov ah, bh ; bus mov ah, bh
mov ecx, edi mov edx, edi
mov ch, bl ; dev+fn mov bh, bl
; mov cl, dl ; reg# mov bl, dl
call pci_read_reg call pci_read_reg
mov edx, eax mov ecx, eax
xor ah, ah ; SUCCESSFUL xor ah, ah ; SUCCESSFUL
jmp .return_abc jmp .return_abc
.not_READ_CONFIG: .not_READ_CONFIG:
@ -655,10 +610,10 @@ sys_pcibios:
cmp ebp, 0x0D cmp ebp, 0x0D
ja .not_WRITE_CONFIG ja .not_WRITE_CONFIG
lea eax, [ebp+1] lea eax, [ebp+1]
; mov ah, bh ; bus mov ah, bh
mov ecx, edi mov edx, edi
mov ch, bl mov bh, bl
; mov cl, dl mov bl, dl
call pci_write_reg call pci_write_reg
xor ah, ah ; SUCCESSFUL xor ah, ah ; SUCCESSFUL
jmp .return_abc jmp .return_abc