| 0,0 → 1,512 |
|---|
| ;*************************************************************** |
| ; 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 <cordata51@hotmail.com> |
| ;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 <kuzmin_serg@list.ru> |
| ;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 <cordata51@hotmail.com> |
| ;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 <kuzmin_serg@list.ru> |
| ;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 <vhanla@gmail.com> |
| ;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 <kuzmin_serg@list.ru> |
| ;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: |