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

This commit is contained in:
kieron committed 2018-05-10 08:02:14 +00:00
1 parent 514b6a1683
commit 63b6fd1670
19 files changed
+8 -11

No files matched your search

BIN
View File
Binary file not shown.
BIN
View File
Binary file not shown.
Binary file not shown.
BIN
View File
Binary file not shown.
BIN
View File
Binary file not shown.
BIN
View File
Binary file not shown.
BIN
View File
Binary file not shown.
BIN
View File
Binary file not shown.
Binary file not shown.
BIN
View File
Binary file not shown.
BIN
View File
Binary file not shown.
BIN
View File
Binary file not shown.
BIN
View File
Binary file not shown.
BIN
View File
Binary file not shown.
+2 -2
View File
@@ -83,7 +83,7 @@ end;
procedure send(p_data : void; p_len : uint16);
begin
push_trace('net.send');
writeToLogLn('net.send');
writeToLogLn('L1: net.send');
if CBSend <> nil then CBSend(p_data, p_len);
pop_trace;
end;
@@ -94,7 +94,7 @@ var
begin
push_trace('net.recv');
writeToLogLn('net.recv');
writeToLogLn('L1: net.recv');
context:= newPacketContext;
if CBNext <> nil then CBNext(p_data, p_len, context);
freePacketContext(context);
+1 -1
View File
@@ -35,7 +35,7 @@ var
begin
push_trace('eth2.recv');
if getNetlogHWND <> 0 then writestringlnWND('eth2.recv', getNetlogHWND);
writeToLogLn('L2: eth2.recv');
//console.outputln('net.eth2', 'RECV.');
buf:= puint8(p_data);
+2 -5
View File
@@ -5,7 +5,7 @@ interface
uses
tracer,
util, lists, console,
nettypes, netutils,
net, nettypes, netutils,
netlog,
eth2;
@@ -22,9 +22,6 @@ function MACToIIPv4(mac : puint8) : puint8;
implementation
uses
net;
var
Registered : Boolean = false;
Cache : PLinkedListBase;
@@ -73,7 +70,7 @@ var
begin
push_trace('arp.recv');
writeToLogLn('arp.recv');
writeToLogLn('L3: arp.recv');
{ Get our converted Header }
Header:= PARPHeader(p_data);
AHeader.Hardware_Type:= (Header^.Hardware_Type_Hi SHL 8) + Header^.Hardware_Type_Lo;
+1 -1
View File
@@ -29,7 +29,7 @@ var
begin
push_trace('ipv4.recv');
writeToLogLn('ipv4.recv');
writeToLogLn('L3: ipv4.recv');
Header:= PIPV4Header(p_data);
AHeader.version:= Header^.version;
AHeader.header_len:= Header^.header_len;
+2 -2
View File
@@ -9,14 +9,14 @@ const
VERSION_SUB = '1';
REVISION = '677';
RELEASE = 'ia';
LINE_COUNT = 27664;
LINE_COUNT = 27661;
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 = '08:56:35';
COMPILE_TIME = '09:02:09';
implementation