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@701 6dbc8c32-bb84-406f-8558-d1cf31a0ab0c

Browse Source
This commit is contained in:
kieron
2018-05-10 13:57:06 +00:00
parent 2feb128853
commit 69c3ed24b3
12 changed files with 6 additions and 4 deletions
Download Patch File Download Diff File Expand all files Collapse all files

6
src/driver/net/l2/eth2.pas
View File

@ -37,6 +37,7 @@ var
buffer : void;
hdr : TEthernetHeader;
pad : sint32;
size : uint32;
begin
pad:= 46 - p_len;
@ -44,14 +45,15 @@ begin
push_trace('eth2.send');
writeToLogLn(' L2: eth2.send');
if p_context <> nil then begin
buffer:= kalloc(pad + p_len + sizeof(TEthernetHeader) + pad);
size:= pad + p_len + sizeof(TEthernetHeader) + pad;
buffer:= kalloc(size);
copyMAC(@p_context^.MAC.Source[0], @hdr.src[0]);
copyMAC(@p_context^.MAC.Destination[0], @hdr.dst[0]);
hdr.EthTypeHi:= eth_type SHR 8;
hdr.EthTypeLo:= eth_type AND $FF;
memcpy(uint32(@hdr), uint32(buffer), sizeof(TEthernetHeader));
memcpy(uint32(p_data), uint32(buffer)+sizeof(TEthernetHeader), p_len);
net.send(buffer, p_len + sizeof(TEthernetHeader));
net.send(buffer, size);
kfree(buffer);
end;
end;

4
src/include/asuro.pas
View File

@ -9,14 +9,14 @@ const
VERSION_SUB = '1';
REVISION = '677';
RELEASE = 'ia';
LINE_COUNT = 27907;
LINE_COUNT = 27909;
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 = '14:53:45';
COMPILE_TIME = '14:57:03';
implementation