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

src/driver/net/l3/ipv4.pas

@@ -10,6 +10,7 @@ uses
     eth2;
 
 procedure registerProtocol(Protocol_ID : uint8; recv_callback : TRecvCallback);
+function  getIPv4Config : PIPv4Configuration;
 procedure register;
 
 implementation
@@ -19,6 +20,11 @@ var
     Protocols  : Array[0..255] of TRecvCallback;
     Config     : TIPv4Configuration;
 
+function  getIPv4Config : PIPv4Configuration;
+begin
+    getIPv4Config:= @Config;
+end;
+
 procedure recv(p_data : void; p_len : uint16; p_context : PPacketContext);
 var
     Header  : PIPV4Header;