Spexeah/Asuro
Spexeah/Asuro
3
1
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

PCI Stuff

Browse Source 
git-svn-id: https://spexeah.com:8443/svn/Asuro@271 6dbc8c32-bb84-406f-8558-d1cf31a0ab0c
This commit is contained in:
kieron 2017-10-27 07:28:53 +00:00
parent db166e1e03
commit 56df6282a1
9 changed files with 5 additions and 5 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

BIN
Asuro.iso
View File

Binary file not shown.

BIN
bin/kernel.bin
View File

Binary file not shown.

BIN
iso/boot/asuro.bin
View File

Binary file not shown.

BIN
lib/PCI.ppu
View File

Binary file not shown.

BIN
lib/kernel.ppu
View File

Binary file not shown.

BIN
lib/libpconsole.a
View File

Binary file not shown.

BIN
lib/libpmultiboot.a
View File

Binary file not shown.

BIN
lib/libpsystem.a
View File

Binary file not shown.

8
src/driver/PCI.pas
View File

@ -71,7 +71,7 @@ var
procedure init(); procedure init();
procedure scanBus(bus : uint8); procedure scanBus(bus : uint8);
function loadDeviceConfig(bus : uint8; slot : uint8; func : uint8) : boolean; function loadDeviceConfig(bus : uint8; slot : uint8; func : uint8) : boolean;
function getDeviceInfo(class_code : uint8; subclass_code : uint8; count : intptr) : deviceArray; //(Will in future)returns TPCI_DEVICE.vendor_id := 0xFFFF if no device found. function getDeviceInfo(class_code : uint8; subclass_code : uint8; var count : uint32) : deviceArray; //(Will in future)returns TPCI_DEVICE.vendor_id := 0xFFFF if no device found.
implementation implementation
@ -311,17 +311,17 @@ begin
end; end;
function getDeviceInfo(class_code : uint8; subclass_code : uint8; count : intptr) : deviceArray; function getDeviceInfo(class_code : uint8; subclass_code : uint8; var count : uint32) : deviceArray;
var var
i : uint16; i : uint16;
devices_out : array[0..31] of TPCI_Device; devices_out : array[0..31] of TPCI_Device;
begin begin
count^ := 0; count := 0;
for i:=0 to device_count do begin for i:=0 to device_count do begin
if (devices[i].class_code = class_code) and (devices[i].subclass_class = subclass_code) then begin if (devices[i].class_code = class_code) and (devices[i].subclass_class = subclass_code) then begin
devices_out[i] := devices[i]; //prog_if devices_out[i] := devices[i]; //prog_if
count^ := count^ + 1; count := count + 1;
end; end;
end; end;