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

git-svn-id: https://spexeah.com:8443/svn/Asuro@687 6dbc8c32-bb84-406f-8558-d1cf31a0ab0c

Browse Source
This commit is contained in:
kieron
2018-05-10 10:59:24 +00:00
parent 333a95d075
commit 8b5f920d51
14 changed files with 3 additions and 9 deletions
Download Patch File Download Diff File Expand all files Collapse all files

2
src/driver/net/l3/arp.pas
View File

@ -112,6 +112,7 @@ var
begin
push_trace('arp.recv');
writeToLogLn(' L3: arp.recv');
console.redrawWindows;
{ Get our converted Header }
Header:= PARPHeader(p_data);
@ -142,7 +143,6 @@ begin
$1:begin { ARP Request }
writeToLogLn(' arp.recv.arp.req');
context:= newPacketContext;
//context^.
copyMAC(@AHeader.Source_Hardware[0], @context^.MAC.Destination[0]);
copyIPv4(@AHeader.Source_Protocol[0], @context^.IP.Destination[0]);
copyMAC(getMAC, @context^.MAC.Source[0]);

6
src/driver/timers/TMR_0_ISR.pas
View File

@ -27,7 +27,6 @@ implementation
var
Hooks : Array[1..MAX_HOOKS] of pp_hook_method;
Registered : boolean = false;
v : uint32 = 0;
procedure Main; //IRQ0, 1024.19hz aprox
var
@ -35,11 +34,6 @@ var
begin
CLI;
inc(v);
if v = 1024 then begin
console.redrawWindows;
v:= 0;
end;
for i:=0 to MAX_HOOKS-1 do begin
if uint32(Hooks[i]) <> 0 then begin
Hooks[i](nil);

4
src/include/asuro.pas
View File

@ -9,14 +9,14 @@ const
VERSION_SUB = '1';
REVISION = '677';
RELEASE = 'ia';
LINE_COUNT = 27778;
LINE_COUNT = 27772;
FILE_COUNT = 89;
DRIVER_COUNT = 32;
FPC_VERSION = '2.6.4';
NASM_VERSION = '2.10.09';
MAKE_VERSION = '3.81';
COMPILE_DATE = '10/05/18';
COMPILE_TIME = '11:55:16';
COMPILE_TIME = '11:59:12';
implementation