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

This commit is contained in:
kieron 2018-05-10 08:02:14 +00:00
parent 514b6a1683
commit 63b6fd1670
19 changed files with 17 additions and 20 deletions

BIN
Asuro.iso

Binary file not shown.

Binary file not shown.

Binary file not shown.

Binary file not shown.

Binary file not shown.

Binary file not shown.

Binary file not shown.

Binary file not shown.

Binary file not shown.

Binary file not shown.

Binary file not shown.

Binary file not shown.

Binary file not shown.

Binary file not shown.

View File

@ -83,7 +83,7 @@ end;
procedure send(p_data : void; p_len : uint16); procedure send(p_data : void; p_len : uint16);
begin begin
push_trace('net.send'); push_trace('net.send');
writeToLogLn('net.send'); writeToLogLn('L1: net.send');
if CBSend <> nil then CBSend(p_data, p_len); if CBSend <> nil then CBSend(p_data, p_len);
pop_trace; pop_trace;
end; end;
@ -94,7 +94,7 @@ var
begin begin
push_trace('net.recv'); push_trace('net.recv');
writeToLogLn('net.recv'); writeToLogLn('L1: net.recv');
context:= newPacketContext; context:= newPacketContext;
if CBNext <> nil then CBNext(p_data, p_len, context); if CBNext <> nil then CBNext(p_data, p_len, context);
freePacketContext(context); freePacketContext(context);

View File

@ -35,7 +35,7 @@ var
begin begin
push_trace('eth2.recv'); push_trace('eth2.recv');
if getNetlogHWND <> 0 then writestringlnWND('eth2.recv', getNetlogHWND); writeToLogLn('L2: eth2.recv');
//console.outputln('net.eth2', 'RECV.'); //console.outputln('net.eth2', 'RECV.');
buf:= puint8(p_data); buf:= puint8(p_data);

View File

@ -5,7 +5,7 @@ interface
uses uses
tracer, tracer,
util, lists, console, util, lists, console,
nettypes, netutils, net, nettypes, netutils,
netlog, netlog,
eth2; eth2;
@ -22,9 +22,6 @@ function MACToIIPv4(mac : puint8) : puint8;
implementation implementation
uses
net;
var var
Registered : Boolean = false; Registered : Boolean = false;
Cache : PLinkedListBase; Cache : PLinkedListBase;
@ -73,7 +70,7 @@ var
begin begin
push_trace('arp.recv'); push_trace('arp.recv');
writeToLogLn('arp.recv'); writeToLogLn('L3: arp.recv');
{ Get our converted Header } { Get our converted Header }
Header:= PARPHeader(p_data); Header:= PARPHeader(p_data);
AHeader.Hardware_Type:= (Header^.Hardware_Type_Hi SHL 8) + Header^.Hardware_Type_Lo; AHeader.Hardware_Type:= (Header^.Hardware_Type_Hi SHL 8) + Header^.Hardware_Type_Lo;

View File

@ -29,7 +29,7 @@ var
begin begin
push_trace('ipv4.recv'); push_trace('ipv4.recv');
writeToLogLn('ipv4.recv'); writeToLogLn('L3: ipv4.recv');
Header:= PIPV4Header(p_data); Header:= PIPV4Header(p_data);
AHeader.version:= Header^.version; AHeader.version:= Header^.version;
AHeader.header_len:= Header^.header_len; AHeader.header_len:= Header^.header_len;

View File

@ -9,14 +9,14 @@ const
VERSION_SUB = '1'; VERSION_SUB = '1';
REVISION = '677'; REVISION = '677';
RELEASE = 'ia'; RELEASE = 'ia';
LINE_COUNT = 27664; LINE_COUNT = 27661;
FILE_COUNT = 89; FILE_COUNT = 89;
DRIVER_COUNT = 32; DRIVER_COUNT = 32;
FPC_VERSION = '2.6.4'; FPC_VERSION = '2.6.4';
NASM_VERSION = '2.10.09'; NASM_VERSION = '2.10.09';
MAKE_VERSION = '3.81'; MAKE_VERSION = '3.81';
COMPILE_DATE = '10/05/18'; COMPILE_DATE = '10/05/18';
COMPILE_TIME = '08:56:35'; COMPILE_TIME = '09:02:09';
implementation implementation