forked from KolibriOS/kolibrios
576 lines
17 KiB
NASM
576 lines
17 KiB
NASM
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
|
|
;; ;;
|
|
;; Copyright (C) KolibriOS team 2010-2016. All rights reserved. ;;
|
|
;; Distributed under terms of the GNU General Public License ;;
|
|
;; ;;
|
|
;; netcfg.asm - Network driver control center for KolibriOS ;;
|
|
;; ;;
|
|
;; Written by hidnplayr@kolibrios.org ;;
|
|
;; ;;
|
|
;; GNU GENERAL PUBLIC LICENSE ;;
|
|
;; Version 2, June 1991 ;;
|
|
;; ;;
|
|
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
|
|
|
|
format binary as ""
|
|
|
|
__DEBUG__ = 1
|
|
__DEBUG_LEVEL__ = 1
|
|
|
|
use32
|
|
org 0x0
|
|
|
|
db 'MENUET01' ; 8 byte id
|
|
dd 0x01 ; header version
|
|
dd START ; start of code
|
|
dd IM_END ; size of image
|
|
dd (I_END+0x100) ; memory for app
|
|
dd (I_END+0x100) ; esp
|
|
dd param, 0x0 ; I_Param , I_Icon
|
|
|
|
include '../../macros.inc'
|
|
include '../../debug-fdo.inc'
|
|
|
|
START:
|
|
; first, check boot parameters
|
|
|
|
cmp byte[param], 0
|
|
je .noparams
|
|
|
|
mcall 40, 0
|
|
|
|
push .exit
|
|
cmp byte[param], 'A' ; A for All
|
|
je Get_PCI_Info
|
|
|
|
cmp byte[param], 'F' ; F for First
|
|
je Get_PCI_Info
|
|
|
|
ret
|
|
|
|
.exit:
|
|
mcall -1
|
|
|
|
.noparams:
|
|
call draw_window
|
|
|
|
still:
|
|
mcall 10 ; wait here for event
|
|
dec eax ; redraw request ?
|
|
jz red
|
|
dec eax ; key in buffer ?
|
|
jz key
|
|
dec eax ; button in buffer ?
|
|
jz button
|
|
jmp still
|
|
|
|
red: ; redraw
|
|
mcall 9, Proc_Info, -1 ; window redraw requested so get new window coordinates and size
|
|
mov eax, [Proc_Info.box.left]; store the window coordinates into the Form Structure
|
|
mov [Form + 2], ax ; x start position
|
|
mov eax, [Proc_Info.box.top];
|
|
mov [Form + 6], ax ; ystart position
|
|
mov eax, [Proc_Info.box.width] ;
|
|
mov [Form], ax ; window width
|
|
mov eax, [Proc_Info.box.height] ;
|
|
mov [Form + 4] ,ax ; window height
|
|
call draw_window ; go redraw window now
|
|
jmp still
|
|
|
|
key: ; key
|
|
mcall 2 ; just read it and ignore
|
|
jmp still
|
|
button: ; button
|
|
mcall 17 ; get id
|
|
|
|
cmp ah, 1 ; button id = 1 ?
|
|
jne @f
|
|
exit:
|
|
mcall -1 ; close this program
|
|
@@:
|
|
cmp eax, 0x0000ff00
|
|
jg load_drv
|
|
|
|
cmp ah, 4
|
|
je hook
|
|
|
|
cmp ah, 5
|
|
je reset
|
|
|
|
cmp ah, 6
|
|
je unload
|
|
|
|
jmp still
|
|
|
|
|
|
load_drv:
|
|
shr eax, 16
|
|
mov [selected], ax
|
|
|
|
mov bl, 6 ; get a dword
|
|
mov bh, ah ; bus
|
|
mov ch, al ; dev
|
|
mov cl, 0 ; offset to device/vendor id
|
|
mcall 62 ; get ID's
|
|
|
|
mov [PCI_Vendor], ax
|
|
shr eax, 16
|
|
mov [PCI_Device], ax
|
|
call get_drv_ptr
|
|
|
|
mov ecx, eax
|
|
mcall 68, 16
|
|
|
|
mov [IOCTL.handle], eax
|
|
|
|
call draw_window
|
|
|
|
cmp [IOCTL.handle], 0
|
|
jne still
|
|
|
|
mcall 4, 20 shl 16 + 30, 1 shl 31 + 0x00ff0000 , load_error
|
|
|
|
jmp still
|
|
|
|
|
|
hook:
|
|
mov ax, [selected]
|
|
test ax, ax
|
|
jz still
|
|
|
|
mov [hardwareinfo.pci_dev], al
|
|
mov [hardwareinfo.pci_bus], ah
|
|
|
|
mov [IOCTL.io_code], 1 ; SRV_HOOK
|
|
mov [IOCTL.inp_size], 3
|
|
mov [IOCTL.input], hardwareinfo
|
|
mov [IOCTL.out_size], 0
|
|
mov [IOCTL.output], 0
|
|
|
|
mcall 68, 17, IOCTL
|
|
mov [drivernumber], al
|
|
|
|
jmp still
|
|
|
|
reset:
|
|
movzx ebx, [drivernumber]
|
|
mcall 74,,2
|
|
|
|
jmp still
|
|
|
|
unload:
|
|
movzx ebx, [drivernumber]
|
|
mcall 74,,3
|
|
|
|
jmp still
|
|
|
|
draw_window:
|
|
mcall 12, 1 ; start of draw
|
|
mcall 0, dword[Form], dword[Form + 4], 0x13ffffff, 0x805080d0, title
|
|
|
|
call Get_PCI_Info ; get pci version and last bus, scan for and draw each pci device
|
|
|
|
cmp edx, 20 shl 16 + 110
|
|
je .nonefound
|
|
|
|
mcall 4, 20 shl 16 + 100, 1 shl 31 + 0x00000000, caption
|
|
|
|
cmp [selected], 0
|
|
jz .done
|
|
cmp [IOCTL.handle] ,0
|
|
jz .done
|
|
|
|
mcall 8, 18 shl 16 + 100, 35 shl 16 + 18, 4, 0x00007f00
|
|
mcall ,, 55 shl 16 + 18, 5, 0x0000007f
|
|
mcall ,, 75 shl 16 + 18, 6, 0x007f0000
|
|
|
|
mcall 4, 33 shl 16 + 42, 1 shl 31 + 0x00ffffff, btn_start
|
|
mcall , 33 shl 16 + 62, , btn_reset
|
|
mcall , 36 shl 16 + 82, , btn_stop
|
|
|
|
jmp .done
|
|
|
|
.nonefound:
|
|
mcall 4, 20 shl 16 + 30, 1 shl 31 + 0x00ff0000, nonefound
|
|
.done:
|
|
mcall 12, 2 ; end of draw
|
|
ret
|
|
|
|
|
|
|
|
|
|
|
|
;------------------------------------------------------------------
|
|
;* Gets the PCI Version and Last Bus
|
|
Get_PCI_Info:
|
|
mcall 62, 0
|
|
mov [PCI_Version], ax
|
|
mcall 62, 1
|
|
mov [PCI_LastBus], al
|
|
;----------------------------------------------------------
|
|
;* Get all devices on PCI Bus
|
|
cmp al, 0xff ; 0xFF means no pci bus found
|
|
jne Pci_Exists ;
|
|
ret ; if no bus then leave
|
|
|
|
Pci_Exists:
|
|
mov [V_Bus], 0
|
|
mov [V_Dev], 0
|
|
mov edx, 20 shl 16 + 110 ; set start write position
|
|
|
|
Start_Enum:
|
|
mov bl, 6 ; read dword
|
|
mov bh, [V_Bus]
|
|
mov ch, [V_Dev]
|
|
mov cl, 0 ; offset to device/vendor id
|
|
mcall 62 ; get ID's
|
|
|
|
cmp ax, 0 ; Vendor ID should not be 0 or 0xFFFF
|
|
je .nextDev ; check next device if nothing exists here
|
|
cmp ax, 0xffff ;
|
|
je .nextDev ;
|
|
|
|
mov [PCI_Vendor], ax ; There is a device here, save the ID's
|
|
shr eax, 16 ;
|
|
mov [PCI_Device], ax ;
|
|
mov bl, 4 ; Read config byte
|
|
mov bh, [V_Bus] ; Bus #
|
|
mov ch, [V_Dev] ; Device # on bus
|
|
mov cl, 0x08 ; Register to read (Get Revision)
|
|
mcall 62 ; Read it
|
|
mov [PCI_Rev], al ; Save it
|
|
|
|
mov cl, 0x0b ; Register to read (Get class)
|
|
mcall 62 ; Read it
|
|
mov [PCI_Class], al ; Save it
|
|
|
|
mov cl, 0x0a ; Register to read (Get Subclass)
|
|
mcall 62 ; Read it
|
|
mov [PCI_SubClass], al ; Save it
|
|
|
|
mov cl, 0x09 ; Register to read (Get Interface)
|
|
mcall 62 ; Read it
|
|
mov [PCI_Interface], al ; Save it
|
|
|
|
mov cl, 0x3c ; Register to read (Get IRQ)
|
|
mcall 62 ; Read it
|
|
mov [PCI_IRQ], al ; Save it
|
|
|
|
; Could it be a network card?
|
|
cmp [PCI_Class], 2 ; network controller
|
|
je .found
|
|
|
|
cmp [PCI_Class], 6 ; bridge type device
|
|
jne .nextDev
|
|
cmp [PCI_SubClass], 0x80 ; PCI-other bridge (for nvidia chipset)
|
|
jne .nextDev
|
|
cmp [PCI_Vendor], 0x10DE ; nvidia
|
|
jne .nextDev
|
|
|
|
.found:
|
|
cmp byte[param], 0 ; Load network driver immediately?
|
|
jne load_and_start
|
|
|
|
call Print_New_Device ; print device info to screen
|
|
|
|
.nextDev:
|
|
test [V_Dev], 7
|
|
jnz .nextFn
|
|
|
|
; Is this a multifunction device?
|
|
mov bl, 4 ; Read config byte
|
|
mov bh, [V_Bus] ; Bus #
|
|
mov ch, [V_Dev] ; Device # on bus
|
|
mov cl, 0x0e
|
|
mcall 62
|
|
test al, al
|
|
js .nextFn
|
|
|
|
; Not a multifunction device, go to the next device
|
|
or [V_Dev], 7
|
|
|
|
.nextFn:
|
|
inc [V_Dev] ; lower 3 bits are the function number
|
|
jnz Start_Enum ; jump until we reach zero
|
|
|
|
mov [V_Dev], 0 ; reset device number
|
|
inc [V_Bus] ; next bus
|
|
mov al, [PCI_LastBus] ; get last bus
|
|
cmp [V_Bus], al ; was it last bus
|
|
jbe Start_Enum ; if not jump to keep searching
|
|
ret
|
|
|
|
|
|
|
|
load_and_start:
|
|
|
|
call get_drv_ptr
|
|
cmp eax, lbl_none
|
|
je .notsupp
|
|
|
|
mov ecx, eax
|
|
mcall 68, 16
|
|
test eax, eax
|
|
jz .fail
|
|
mov [IOCTL.handle], eax
|
|
|
|
mov al, [V_Dev]
|
|
mov [hardwareinfo.pci_dev], al
|
|
mov al, [V_Bus]
|
|
mov [hardwareinfo.pci_bus], al
|
|
|
|
mov [IOCTL.io_code], 1 ; SRV_HOOK
|
|
mov [IOCTL.inp_size], 3
|
|
mov [IOCTL.input], hardwareinfo
|
|
mov [IOCTL.out_size], 0
|
|
mov [IOCTL.output], 0
|
|
|
|
mcall 68, 17, IOCTL
|
|
|
|
.next:
|
|
cmp byte[param], 'A'
|
|
je Start_Enum.nextDev
|
|
jmp exit
|
|
|
|
.fail:
|
|
DEBUGF 1,"Could not load network driver %s\n", ecx
|
|
jmp .next
|
|
|
|
.notsupp:
|
|
DEBUGF 1,"Unsupported PCI network card detected: 0x%x:0x%x\n", [PCI_Vendor]:4, [PCI_Device]:4
|
|
jmp .next
|
|
|
|
|
|
ITEM_H = 15
|
|
;------------------------------------------------------------------
|
|
;* Print device info to screen
|
|
Print_New_Device:
|
|
|
|
push edx ; Magic ! (to print a button...)
|
|
|
|
mov ebx, 18 shl 16
|
|
mov bx, [Form]
|
|
sub bx, 36
|
|
|
|
mov cx, dx
|
|
dec cx
|
|
shl ecx, 16
|
|
add ecx, ITEM_H
|
|
|
|
xor edx, edx
|
|
mov dh, [V_Bus]
|
|
mov dl, [V_Dev]
|
|
|
|
mov esi, 0x0059DFFF ; color: yellow if selected, blue otherwise
|
|
cmp [selected], dx
|
|
jne @f
|
|
mov esi, 0x00FFCD0B
|
|
@@:
|
|
|
|
shl edx, 8
|
|
or dl, 0xff
|
|
|
|
mcall 8
|
|
pop edx
|
|
|
|
xor esi, esi ; Color of text
|
|
movzx ecx, [PCI_Vendor] ; number to be written
|
|
add edx, 3
|
|
mcall 47, 0x00040100 ; Write Vendor ID
|
|
|
|
add edx, (4*6+18) shl 16
|
|
movzx ecx, [PCI_Device] ; get Vendor ID
|
|
mcall ; Draw Vendor ID to Window
|
|
|
|
add edx, (4*6+18) shl 16
|
|
movzx ecx, [V_Bus]
|
|
mcall ,0x00020100 ; draw bus number to screen
|
|
|
|
add edx, (2*6+18) shl 16
|
|
movzx ecx, [V_Dev]
|
|
shr ecx, 3 ; device number is bits 3-7
|
|
mcall ; Draw device Number To Window
|
|
|
|
add edx, (2*6+18) shl 16
|
|
movzx ecx, [PCI_Rev]
|
|
mcall ; Draw Revision to screen
|
|
|
|
add edx, (2*6+18) shl 16
|
|
movzx ecx, [PCI_IRQ]
|
|
cmp cl, 0x0f ; IRQ must be between 0 and 15
|
|
ja @f
|
|
mcall
|
|
@@:
|
|
;
|
|
;Write Names
|
|
movzx ebx, dx ; Set y position
|
|
or ebx, 230 shl 16 ; set Xposition
|
|
|
|
;------------------------------------------------------------------
|
|
; Prints the Vendor's Name based on Vendor ID
|
|
;------------------------------------------------------------------
|
|
mov edx, VendorsTab
|
|
mov cx, [PCI_Vendor]
|
|
|
|
.fn: mov ax, [edx]
|
|
add edx, 6
|
|
test ax, ax
|
|
jz .find
|
|
cmp ax, cx
|
|
jne .fn
|
|
.find: mov edx, [edx - 4]
|
|
mcall 4,, 0x80000000 ; lets print the vendor Name
|
|
|
|
;------------------------------------------------------------------
|
|
; Get description based on Class/Subclass
|
|
;------------------------------------------------------------------
|
|
mov eax, dword[PCI_Class]
|
|
and eax, 0xffffff
|
|
xor edx, edx
|
|
xor esi, esi
|
|
.fnc: inc esi
|
|
mov ecx, [Classes + esi * 8 - 8]
|
|
cmp cx , 0xffff
|
|
je .endfc
|
|
cmp cx , ax
|
|
jne .fnc
|
|
test ecx, 0xff000000
|
|
jz @f
|
|
mov edx, [Classes + esi * 8 - 4]
|
|
jmp .fnc
|
|
@@: cmp eax, ecx
|
|
jne .fnc
|
|
xor edx, edx
|
|
.endfc: test edx, edx
|
|
jnz @f
|
|
mov edx, [Classes + esi * 8 - 4]
|
|
@@:
|
|
add ebx, 288 shl 16
|
|
mcall 4,, 0x80000000,, 32 ; draw the text
|
|
movzx edx, bx ; get y coordinate
|
|
add edx, 0x0014000A ; add 10 to y coordinate and set x coordinate to 20
|
|
|
|
;------------------------------------------------------------------
|
|
; Print Driver Name
|
|
;------------------------------------------------------------------
|
|
push edx
|
|
add ebx, 120 shl 16
|
|
push ebx
|
|
|
|
call get_drv_ptr
|
|
mov edx, eax
|
|
pop ebx
|
|
mcall 4,,0x80000000 ; lets print the vendor Name
|
|
pop edx
|
|
ret
|
|
|
|
get_drv_ptr:
|
|
mov eax, driverlist ; eax will be the pointer to latest driver title
|
|
mov ebx, driverlist ; ebx is the current pointer
|
|
mov ecx, dword[PCI_Vendor] ; the device/vendor id of we want to find
|
|
|
|
.driverloop:
|
|
inc ebx
|
|
cmp byte[ebx], 0
|
|
jne .driverloop
|
|
inc ebx ; the device/vendor id list for the driver eax is pointing to starts here.
|
|
|
|
.deviceloop:
|
|
cmp dword[ebx], 0
|
|
je .nextdriver
|
|
cmp dword[ebx], ecx
|
|
je .driverfound
|
|
add ebx, 4
|
|
jmp .deviceloop
|
|
|
|
.nextdriver:
|
|
add ebx, 4
|
|
cmp dword[ebx], 0
|
|
je .nodriver
|
|
mov eax, ebx
|
|
jmp .driverloop
|
|
|
|
.nodriver:
|
|
mov eax, lbl_none ; lets print the vendor Name
|
|
ret
|
|
|
|
.driverfound:
|
|
ret
|
|
|
|
include 'vendors.inc'
|
|
include 'drivers.inc'
|
|
|
|
|
|
;------------------------------------------------------------------
|
|
; DATA AREA
|
|
|
|
|
|
DATA
|
|
|
|
|
|
Form: dw 740 ; window width (no more, special for 800x600)
|
|
dw 100 ; window x start
|
|
dw 220 ; window height
|
|
dw 100 ; window y start
|
|
|
|
title db 'Network Driver Control Center', 0
|
|
|
|
caption db 'Vendor Device Bus Dev Rev IRQ Company Description DRIVER',0
|
|
nonefound db 'No compatible devices were found!',0
|
|
btn_start db 'Start device',0
|
|
btn_reset db 'Reset device',0
|
|
btn_stop db 'Stop device',0
|
|
lbl_none db 'none',0
|
|
load_error db 'Could not load network driver!',0
|
|
|
|
include_debug_strings
|
|
|
|
hardwareinfo:
|
|
.type db 1 ; pci
|
|
.pci_bus db ?
|
|
.pci_dev db ?
|
|
|
|
|
|
IM_END:
|
|
|
|
;------------------------------------------------------------------
|
|
; UNINITIALIZED DATA AREA
|
|
|
|
|
|
IOCTL:
|
|
.handle dd ?
|
|
.io_code dd ?
|
|
.input dd ?
|
|
.inp_size dd ?
|
|
.output dd ?
|
|
.out_size dd ?
|
|
|
|
drivernumber db ?
|
|
MAC dp ?
|
|
|
|
|
|
type db ?
|
|
selected dw ?
|
|
V_Bus db ?
|
|
V_Dev db ?
|
|
PCI_Version dw ?
|
|
PCI_LastBus db ?
|
|
; Dont change order
|
|
PCI_Vendor dw ?
|
|
PCI_Device dw ?
|
|
|
|
PCI_Bus db ?
|
|
PCI_Dev db ?
|
|
PCI_Rev db ?
|
|
; Dont change order
|
|
PCI_Class db ?
|
|
PCI_SubClass db ?
|
|
PCI_Interface db ?
|
|
PCI_IRQ db ?
|
|
|
|
Proc_Info process_information
|
|
|
|
param rb 1024
|
|
|
|
|
|
I_END: |