;*************************************************************** ; project name: PCI Device Enumeration ; target platform: KolibriOS and MenuetOS ; compiler: flat assmebler 1.63.2 ; version: 1.31 ; last update: 13(th) May 2006 ; maintained by: Jason Delozier (cordata51) ; e-mail: cordata51@hotmail.com ; project site: http://www.asmfreaks.com/menuetos ;*************************************************************** ;Summary: This program will attempt to scan the PCI Bus ; and display basic information about each device ; connected to the PCI Bus. ;*************************************************************** ;HISTORY: ;keep dates in european format (dd/mm/yyyy), please ; '!' means big changes ; to-do: ;PCI version should be normalized (0210->02.10) ;---------------------------------------------------------------- ;1.31: PCIDEV 13/05/2006 ;Author: Jason Delozier ;Features: ; fixed ; * ! bug in Company Name look up code that would cause Unknown Name errors. ; * ! possible bugs, many instructions missing byte, word, dword prefixes ; * ! possible bug which could have occured after removing "PREVIOUSVERSIONLIST" ; entry in loop up code and not fixing jump parameters. ; added ; * comments to various parts of the code ; optimized ; * various parts of the source, too many to remember and mention. ; * changed entries for Subclasses in vendors.inc to Byte format, saves a little space. ;---------------------------------------------------------------- ;1.30: PCIDEV 11/05/2006 ;Author: Sergey Kuzmin aka Wildwest ;Features: ; added ; * 3 new vendor id's (ESS from Madis Kalme and 2 id's ; forgotten from 1.15 release: Broadcom -SiByte and Chaintech Comp.) ; changed ; * I don't know why other devs (Jason or Victor) changed window style ; to old ugly one, so I changed it back to skinned type 3. ; * the same goes to the use of macroc.inc - it is enabled again. ; deleted ; * there is no more label "PREVIOUSVERSIONLIST" - id's moved to the ; appropriate parts of global list. ;---------------------------------------------------------------- ;1.29: PCIDEV 30/04/2006 ;Author: Jason Delozier ;Features: ; fixed ; * ! bug that would not allow devices with device ; numbers > 16 to be displayed. ; added ; * ! another heading called "FNC" (function) which allows ; the multipurpose Device/Function varible to be split and ; displayed to the user properly. ; * horizontal bars to display for easier reading. ; optimized ; * vendor/description search routines for speed and space. ;---------------------------------------------------------------- ;1.25: PCIDEV 02/10/2005 ;Author: Sergey Kuzmin aka Wildwest ;Features: ; changed ; * ! Description is based on Class and SubClass ; now (PCI 3.0). The Names of Classes and SubClasses ; are in the end of Vendors.inc ; deleted ; * label "Descriptions" (names of Classes) ; ;---------------------------------------------------------------- ;1.20: PCIDEV 16/08/2005 ;Author: Victor Alberto Gil Hanla a.k.a. vhanla ;Features: ; added ; * ! many vendor lists (865) ; deleted ; * previous version's list ; changed ; * previous Company Name searching and printing ;---------------------------------------------------------------- ;1.15: PCIDEV 03/06/2005 ;Author: Sergey Kuzmin aka Wildwest ;Features: ; added ; * quantity of devices, ; * ! detection of Company Name based on Vendor ID, ; * database of VenID (35 ID's), ; * macros.inc for smaller size, ; changed ; * interface+(skinned window), ; * VenID before DevID in 'table'(was DevID before VenID) ;---------------------------------------------------------------- ;1.0: PCIDEV 30/01/2005 ;Author: Jason Delozier ;Features: ; able to ; * detect PCI version, ; * quantity of PCI buses, ; * Vendor&Device ID for appropriate Device on Bus; ; * detect Revision, Class and Subclass of Device, ; * and make Description based on Class ;------------------------------------------------------------- use32 org 0x0 db 'MENUET01'; 8 byte id dd 0x01 ; header version dd START ; start of code dd I_END ; size of image dd 0xFFFF ; memory for app = 64 KB dd I_END ; esp dd 0x0 , 0x0 ; I_Param , I_Icon include 'macros.inc' include 'VENDORS.INC' START: ; start of execution call draw_window still: mov eax,10 ; wait here for event int 0x40 cmp eax,1 ; redraw request ? je red cmp eax,2 ; key in buffer ? je key cmp eax,3 ; button in buffer ? je button jmp still red: ; redraw mov eax, 9 ;window redraw requested so get new window coordinates and size mov ebx, Proc_Info ;area to store process information mov ecx, -1 ; int 0x40 ;get the process information mov eax,[Proc_Info+34] ;store the window coordinates into the Form Structure mov [Form+2], ax ;x start position mov eax,[Proc_Info+38] ; mov [Form+6],ax ;ystart position mov eax,[Proc_Info+42] ; mov [Form],ax ;window width mov eax,[Proc_Info+46] ; mov [Form+4] ,ax ;window height call draw_window ;go redraw window now jmp still key: ; key mov eax,2 ; just read it and ignore int 0x40 jmp still button: ; button mov eax,17 ; get id int 0x40 cmp ah,1 ; button id=1 ? jne noclose mov eax,-1 ; close this program int 0x40 noclose: jmp still ; ********************************************* ; ******* WINDOW DEFINITIONS AND DRAW ******** ; ********************************************* Form: dw 780 ;window width dw 100 ;window x start dw 420 ;window height dw 100 ;window y start draw_window: mov byte [total],0 mov eax,12 ; function 12:tell os about windowdraw mov ebx,1 ; 1, start of draw int 0x40 ; DRAW WINDOW mov eax,0 ; function 0 : define and draw window mov ebx, dword [Form] ; x/width of window mov ecx, dword [Form+4] ; y/height of window mov edx,0x03ffffff ; color of work area RRGGBB,8->color gl mov esi,0x805080d0 ; color of grab bar RRGGBB,8->color gl mov edi,0x005080d0 ; color of frames RRGGBB int 0x40 ; draw the window ; WINDOW LABEL mov eax,4 ; function 4 : write text to window mov ebx,8*65536+8 ; [x start] *65536 + [y start] mov ecx,0x10ddeeff ; font 1 & color ( 0xF0RRGGBB ) mov edx,labelt ; pointer to text beginning mov esi,labellen-labelt ; text length int 0x40 ;draw captions to window mov ebx, 20*65536+25 ;x start, ystart of text mov ecx, 0x224466 ;color of text mov edx, dword PCIWin ;start of text buffer mov esi, 106 ;lenght of line newline: ; mov eax, 4 ;draw text system function int 0x40 ;draw the text add ebx, 10 ;one line down add edx, esi ;add lenght of line to offset of text buffer cmp byte[edx], byte 'x' ;is it the end of buffer? jne newline ;if not draw another line of text ;Insert horizontal bars in list area mov eax, 13 ;draw bar system function mov ebx, 18 ;set Xstart position of bar shl ebx, 16 ; mov bx,word [Form] ;get width of window sub bx, 32 ;bar is 32 pixels shorter then window width mov ecx, 109*65536+10 ;set Ystart(109) and Height(10) of bar mov edx, 0xb6b6b6 ;set color of bar again: ;begin draw bar loop int 0x40 ;draw bar to window area shr ecx, 16 ;move the Ystart position to working area add ecx, 34 ;add 34 pixels to Y Start (moves bar down) cmp cx,word [Form+4] ;is the Ystart position outside of window area jae nomo ;if so stop drawing bars sub ecx, 14 ;if not, we only need 20 pixels between bar tops shl ecx, 16 ;set that values as Ystart add ecx, 10 ;Bar Height is always 10 pixels jmp again ;draw another bar nomo: ;done drawing bars here ;start PCI stuff call Get_PCI_Info ;get pci version and last bus mov cx,word [PCI_Version] ;number to draw mov eax, 47 ;draw number system function xor esi, esi ;color of text mov ebx, 0x00040100 ;4 digits to draw in hex format mov edx, 110*65536+45 ;x/y start position of number int 0x40 ;draw pci version to window mov cl,byte [PCI_LastBus] ;number to draw mov ebx, 0x00020100 ;2 digits hex format add edx, 10 ;one line below pci version int 0x40 ;draw the last bus to window call scan_Pci ;scan for and draw each pci device movzx ecx, byte [total] ;number to draw mov eax, 47 ;draw number system function mov ebx, 0x00020000 ;2 digits to draw in decimal format xor esi, esi ;color of text mov edx, 150*65536+65 ;x/y position to draw to int 0x40 ;draw total number of devices to window mov eax,12 ; function 12:tell os about windowdraw mov ebx,2 ; 2, end of draw int 0x40 ret ; *********************************************** ; ******* END WINDOW DEFINITIONS & DRAW ******* ; *********************************************** ;****************************************************** ;* Gets the PCI Versioin and Last Bus Get_PCI_Info: mov eax, 62 xor ebx, ebx int 0x40 mov word [PCI_Version], ax mov eax, 62 mov ebx, 1 int 0x40 mov byte [PCI_LastBus], al ret ;****************************************************** ;****************************************************** ;* Get all devices on PCI Bus scan_Pci: cmp byte [PCI_LastBus],0xff ;0xFF means no pci bus found jne Pci_Exists ; ret ;if no bus then leave Pci_Exists: mov byte [V_Bus], 0 ;reset varibles mov byte [V_Dev], 0 ; mov edx, 20*65536+110 ;set start write position Start_Enum: mov bl, 6 ;get a dword mov bh, byte [V_Bus] ;bus of pci device mov ch, byte [V_Dev] ;device number/function mov cl, 0 ;offset to device/vendor id mov eax, 62 ;pci system function int 0x40 ;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 word [PCI_Vendor], ax ;There is a device here, save the ID's shr eax, 16 ; mov word [PCI_Device], ax ; mov eax, 62 ;PCI Sys Function mov bl, 4 ;Read config byte mov bh, byte [V_Bus] ;Bus # mov ch, byte [V_Dev] ;Device # on bus mov cl, 0x08 ;Register to read (Get Revision) int 0x40 ;Read it mov byte [PCI_Rev], al ;Save it mov eax, 62 ;PCI Sys Function mov cl, 0x0b ;Register to read (Get class) int 0x40 ;Read it mov byte [PCI_Class], al ;Save it mov eax, 62 ;PCI Sys Function mov cl, 0x0a ;Register to read (Get Subclass) int 0x40 ;Read it mov byte [PCI_SubClass], al ;Save it inc byte [total] ;one more device found call Print_New_Device ;print device info to screen nextDev: inc byte [V_Dev] ;next device on this bus jnz Start_Enum ;jump until we reach zero ;(used to be JNO which caused bug!!! 30-4-2006, JMD) mov byte [V_Dev], 0 ;reset device number inc byte [V_Bus] ;next bus mov al, byte [PCI_LastBus] ;get last bus cmp byte [V_Bus], al ;was it last bus jbe Start_Enum ;if not jump to keep searching ret ;****************************************************** ;****************************************************** ;* Print device info to screen Print_New_Device: mov eax, 47 ;Write number to screen system function mov ebx, 0x00040100 ;4 byte number, print in hexidecimal xor esi, esi ;Color of text movzx ecx,word [PCI_Vendor] ;Pointer to number to be written int 0x40 ;Write Vendor ID and edx, 0xFFFF ;***************************************** or edx, 54*65536 ;X start becomes 54 movzx ecx,word [PCI_Device] ;get Vendor ID int 0x40 ;Draw Vendor ID to Window mov ebx, 0x00020100 ;2 digit number, in hexidecimal format and edx, 0xFFFF ;***************************************** or edx, 98*65536 ;X start becomes 98 movzx ecx,byte [V_Bus] ;get bus number int 0x40 ;draw bus number to screen and edx, 0xFFFF ;***************************************** or edx, 128*65536 ;X start becomes 128 movzx ecx,byte [V_Dev] ;get device number shr ecx, 3 ;device number is bits 3-7 int 0x40 ;Draw device Number To Window and edx, 0xFFFF ;***************************************** or edx, 155*65536 ;X start becomes 155 movzx ecx, byte [V_Dev] ;get Function number and ecx, 7 ;function is first 3 bits int 0x40 ;Draw Function Number To Window and edx, 0xFFFF ;***************************************** or edx, 179*65536 ;X start becomes 179 movzx ecx,byte [PCI_Rev] ;get revision number int 0x40 ;Draw Revision to screen and edx, 0xFFFF ;***************************************** or edx, 215*65536 ;X start becomes 215 movzx ecx,byte [PCI_Class] ;get PCI_Class int 0x40 ;Draw Class to screen and edx, 0xFFFF ;***************************************** or edx, 266*65536 ;X start becomes 266 movzx ecx,byte [PCI_SubClass];get sub class int 0x40 ;Draw Sub Class to screen ;Write Names movzx ebx, dx ;Set y position or ebx, 310*65536 ;set Xposition to 310 ;********************************************************** ;Prints the Vendor's Name based on Vendor ID ; ; modified part by vhanla (I know it is not a fastest way to search) ; it needs optimization... HELP this project! ; ; Modified on 30-04-2006 by JMD for size ;----------------------------------------------------------------------------- ;first determine which list to find the vendor in mov ax, word [PCI_Vendor] mov ecx, 255 ;# vendors in most lists cmp ax,4800 ;Check if Vendor's value is less than this number jae next1 ;if it is less, let's continue, or jump to next1 mov edx, _FIRSTPART ;select this list jmp rep1 ;start searching list next1: ; cmp ax,5314 ;same thing happening here as above^ jae next2 ; mov edx, _SECONDPART ; jmp rep1 ; next2: ; cmp ax,5574 ; jae next3 ; mov edx, _THIRDPART ; jmp rep1 ; next3: ; mov ecx, 110 ;only 110 vendors in this list mov edx, _FOURTHPART ; rep1: cmp ax,word[edx+50] ;are Vendor ID's the same? je ex ;if so jump to print the description to screen add edx, 52 ;if not put us at start of next description dec ecx ;one less description in list jnz rep1 ;was it our last? mov edx, _UNKNOWN ;if so we dont know this Vendor ex: ;lets print the vendor Name xor ecx, ecx ;font color mov eax,4 ;OS CMD mov esi,50 ;Length of text int 0x40 ;Print the text ;------------------------------------------------------------------ ;------------------------------------------------------------------ ;Get description based on Class/Subclass cmp byte [PCI_Class], 11h ;we only know of 17 classes ja endd ;if its more then, its unknown to us, so jump movzx eax, byte [PCI_Class] ;load our class shl eax, 3 ;multiply for jump table mov ecx, [ClassList+eax+4] ;number of descriptions for this class mov edx, [ClassList+eax] ;start of description list for class movzx eax, byte [PCI_SubClass] ;get subclass repu1: cmp al,byte[edx+32] ;are subclasses the same? je endd ;if so jump to print the description to screen add edx, 33 ;if not put us at start of next description dec ecx ;one less description in list jnz repu1 ;was it our last? mov edx,_UNKNOWND ;if so its unknown device endd: and ebx, 0x0000FFFF ;clear X position or ebx, 0x02300000 ;set X position to 560 pixels xor ecx, ecx ;color of text mov eax,4 ;draw text system function mov esi,32 ;length of text to draw int 0x40 ;draw the text movzx edx, bx ;get y coordinate add edx, 0x0014000A ;add 10 to y coordinate and set x coordinate to 20 ret ClassList: dd Class0 , 2, Class1 , 8, Class2, 8, Class3, 4 dd Class4 , 4, Class5 , 3, Class6, 12, Class7, 7 dd Class8 , 8, Class9 , 6, ClassA, 2, ClassB, 7 dd ClassC , 10, ClassD , 8, ClassE, 1, ClassF, 4 dd Class10, 3, Class11, 5 ;------------------------------------------------------------------ ; DATA AREA labelt: db 'PCI Device Enumeration v 1.31 by J. Delozier, S. Kuzmin and V. Hanla' labellen: PCIWin: db 'Please remember to enable PCI Access to Applications in Setup Menu.' db ' ' db ' ' db ' ' db 'PCI Version = ' db ' ' db 'Last PCI Bus = ' db ' ' db 'Quantity of devices = ' db ' ' db ' ' db ' ' db 'VenID DevID Bus# Dev# Fnc Rev Class Subclass Comp' db 'any Description ' db '----- ----- ---- ---- --- --- ----- -------- --------------------' db '---------------------- ----------------' db 'x' total db 0 V_Bus db 0 V_Dev db 0 PCI_Version dw 0 PCI_LastBus db 0 PCI_Device dw 0 PCI_Vendor dw 0 PCI_Bus db 0 PCI_Dev db 0 PCI_Rev db 0 PCI_Class db 0 PCI_SubClass db 0 Proc_Info: times 1024 db 0 I_END: