git-svn-id: https://spexeah.com:8443/svn/Asuro@740 6dbc8c32-bb84-406f-8558-d1cf31a0ab0c
This commit is contained in:
Binary file not shown.
Binary file not shown.
Binary file not shown.
BIN
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.
BIN
Binary file not shown.
Binary file not shown.
Binary file not shown.
@@ -83,7 +83,7 @@ end;
|
||||
procedure send(p_data : void; p_len : uint16);
|
||||
begin
|
||||
push_trace('net.send');
|
||||
writeToLogLn('L1: 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('L1: net.recv');
|
||||
//writeToLogLn('L1: net.recv');
|
||||
context:= newPacketContext;
|
||||
if CBNext <> nil then CBNext(p_data, p_len, context);
|
||||
freePacketContext(context);
|
||||
|
||||
@@ -54,7 +54,7 @@ begin
|
||||
pad:= 46 - p_len;
|
||||
if pad < 0 then pad:= 0;
|
||||
push_trace('eth2.send');
|
||||
writeToLogLn(' L2: eth2.send');
|
||||
//writeToLogLn(' L2: eth2.send');
|
||||
if p_context <> nil then begin
|
||||
size:= sizeof(TEthernetHeader) + p_len + pad;// + 4;
|
||||
buffer:= kalloc(size);
|
||||
@@ -79,7 +79,7 @@ var
|
||||
|
||||
begin
|
||||
push_trace('eth2.recv');
|
||||
writeToLogLn(' L2: eth2.recv');
|
||||
//writeToLogLn(' L2: eth2.recv');
|
||||
buf:= puint8(p_data);
|
||||
|
||||
Header:= PEthernetHeader(buf);
|
||||
|
||||
+10
-10
@@ -181,7 +181,7 @@ var
|
||||
|
||||
begin
|
||||
push_trace('arp.recv');
|
||||
writeToLogLn(' L3: arp.recv');
|
||||
//writeToLogLn(' L3: arp.recv');
|
||||
console.redrawWindows;
|
||||
|
||||
{ Get our converted Header }
|
||||
@@ -210,7 +210,7 @@ begin
|
||||
if IPEqual(@AHeader.Destination_Protocol[0], @getIPv4Config^.Address[0]) then begin
|
||||
case AHeader.Operation of
|
||||
$1:begin { ARP Request }
|
||||
writeToLogLn(' arp.recv.arp.req');
|
||||
//writeToLogLn(' arp.recv.arp.req');
|
||||
context:= newPacketContext;
|
||||
copyMAC(@AHeader.Source_Hardware[0], @context^.MAC.Destination[0]);
|
||||
copyIPv4(@AHeader.Source_Protocol[0], @context^.IP.Destination[0]);
|
||||
@@ -220,28 +220,28 @@ begin
|
||||
freePacketContext(context);
|
||||
end;
|
||||
$2:begin { ARP Reply }
|
||||
writeToLogLn(' arp.recv.arp.rep');
|
||||
//writeToLogLn(' arp.recv.arp.rep');
|
||||
end;
|
||||
$3:begin { RARP Request }
|
||||
writeToLogLn(' arp.recv.rarp.req');
|
||||
//writeToLogLn(' arp.recv.rarp.req');
|
||||
end;
|
||||
$4:begin { RARP Reply }
|
||||
writeToLogLn(' arp.recv.rarp.rep');
|
||||
//writeToLogLn(' arp.recv.rarp.rep');
|
||||
end;
|
||||
$5:begin { DRARP Request }
|
||||
writeToLogLn(' arp.recv.drarp.req');
|
||||
//writeToLogLn(' arp.recv.drarp.req');
|
||||
end;
|
||||
$6:begin { DRARP Reply }
|
||||
writeToLogLn(' arp.recv.drarp.rep');
|
||||
//writeToLogLn(' arp.recv.drarp.rep');
|
||||
end;
|
||||
$7:begin { DRARP Error }
|
||||
writeToLogLn(' arp.recv.drarp.err');
|
||||
//writeToLogLn(' arp.recv.drarp.err');
|
||||
end;
|
||||
$8:begin { InARP Request }
|
||||
writeToLogLn(' arp.recv.inarp.req');
|
||||
//writeToLogLn(' arp.recv.inarp.req');
|
||||
end;
|
||||
$9:begin { InARP Reply }
|
||||
writeToLogLn(' arp.recv.inarp.rep');
|
||||
//writeToLogLn(' arp.recv.inarp.rep');
|
||||
end;
|
||||
end;
|
||||
end;
|
||||
|
||||
@@ -39,7 +39,7 @@ var
|
||||
buffer : void;
|
||||
|
||||
begin
|
||||
writeToLogLn(' L3: ipv4.send');
|
||||
//writeToLogLn(' L3: ipv4.send');
|
||||
inc(CurrentID);
|
||||
Header.version:= 4;
|
||||
Header.header_len:= 5;
|
||||
@@ -79,7 +79,7 @@ var
|
||||
|
||||
begin
|
||||
push_trace('ipv4.recv');
|
||||
writeToLogLn(' L3: ipv4.recv');
|
||||
//writeToLogLn(' L3: ipv4.recv');
|
||||
Header:= PIPV4Header(p_data);
|
||||
AHeader.version:= Header^.version;
|
||||
AHeader.header_len:= Header^.header_len;
|
||||
|
||||
@@ -417,7 +417,7 @@ var
|
||||
|
||||
begin
|
||||
push_trace('E1000.fire');
|
||||
writeToLogLn('L0: E1000 Fire');
|
||||
//writeToLogLn('L0: E1000 Fire');
|
||||
status:= readCommand($C0);
|
||||
if (status AND $04) > 0 then begin
|
||||
startLink();
|
||||
|
||||
@@ -16,7 +16,7 @@ const
|
||||
NASM_VERSION = '2.10.09';
|
||||
MAKE_VERSION = '3.81';
|
||||
COMPILE_DATE = '13/05/18';
|
||||
COMPILE_TIME = '12:33:02';
|
||||
COMPILE_TIME = '14:24:31';
|
||||
|
||||
implementation
|
||||
|
||||
|
||||
Reference in New Issue
Block a user