| Line 16... |
Line 16... |
input i_RxClk,
|
input i_RxClk,
|
input i_TxClk,
|
input i_TxClk,
|
input [07:00] i8_RxD,
|
input [07:00] i8_RxD,
|
input i_RxDV,
|
input i_RxDV,
|
input i_RxER,
|
input i_RxER,
|
|
|
|
|
output reg [07:00] o8_TxD,
|
output reg [07:00] o8_TxD,
|
output reg o_TxEN,
|
output reg o_TxEN,
|
output reg o_TxER,
|
output reg o_TxER,
|
|
|
|
input [1:0] i2_Speed,
|
input i_Reset_L);
|
input i_Reset_L);
|
|
|
reg r_Active;
|
reg r_Active;
|
integer Octet;
|
integer Octet;
|
integer ExtCycles;
|
integer ExtCycles;
|
| Line 73... |
Line 72... |
ExtCycles = 0;
|
ExtCycles = 0;
|
ErrCycles = 0;
|
ErrCycles = 0;
|
for(Octet=0;Octet<10000;Octet=Octet+1)
|
for(Octet=0;Octet<10000;Octet=Octet+1)
|
ov_ReceivedPkt[Octet]=0;
|
ov_ReceivedPkt[Octet]=0;
|
Octet=0;
|
Octet=0;
|
|
$display("(%d)MAC : Start Rx Task",$time);
|
|
if(i2_Speed==2'b10)
|
|
begin
|
while(w_Active!=1'b1||r_Active!=1'b0)
|
while(w_Active!=1'b1||r_Active!=1'b0)
|
@(posedge i_RxClk);
|
@(posedge i_RxClk);
|
while(w_Active!=1'b1||i8_RxD!=8'hD5||r8_LstRxD!=8'h55)
|
while(w_Active!=1'b1||i8_RxD!=8'hD5||r8_LstRxD!=8'h55)
|
@(posedge i_RxClk);
|
@(posedge i_RxClk);
|
|
|
| Line 87... |
Line 89... |
if(i_RxDV==1'b1 && i_RxER==1'b0)
|
if(i_RxDV==1'b1 && i_RxER==1'b0)
|
begin
|
begin
|
ov_ReceivedPkt[Octet]=i8_RxD;
|
ov_ReceivedPkt[Octet]=i8_RxD;
|
Octet=Octet+1;
|
Octet=Octet+1;
|
end
|
end
|
else if(i_RxDV==1'b0 && i_RxER==1'b1) begin
|
else if(i_RxDV==1'b0 && i_RxER==1'b1)
|
|
begin
|
case(i8_RxD)
|
case(i8_RxD)
|
8'h0F: begin
|
8'h0F: begin
|
ExtCycles = ExtCycles+1;
|
ExtCycles = ExtCycles+1;
|
end
|
end
|
8'h1F: begin
|
8'h1F: begin
|
| Line 100... |
Line 103... |
ErrCycles = ErrCycles+1;
|
ErrCycles = ErrCycles+1;
|
end
|
end
|
default: $display("Unknown %x",i8_RxD);
|
default: $display("Unknown %x",i8_RxD);
|
endcase
|
endcase
|
end
|
end
|
else if(i_RxDV==1'b1 && i_RxER==1'b1) begin
|
else if(i_RxDV==1'b1 && i_RxER==1'b1)
|
|
begin
|
ErrCycles = ErrCycles+1;
|
ErrCycles = ErrCycles+1;
|
end
|
end
|
@(posedge i_RxClk);
|
@(posedge i_RxClk);
|
end
|
end
|
|
end
|
|
else
|
|
begin
|
|
while(w_Active!=1'b1||r_Active!=1'b0)
|
|
@(posedge i_RxClk);
|
|
while(w_Active!=1'b1||i8_RxD[3:0]!=4'hD||r8_LstRxD[3:0]!=4'h5)
|
|
@(posedge i_RxClk);
|
|
@(posedge i_RxClk);
|
|
$display("MAC: Start Receiving");
|
|
while(r_Active!=1'b1||w_Active!=1'b0)
|
|
begin
|
|
if(i_RxDV==1'b1 && i_RxER==1'b0)
|
|
begin
|
|
ov_ReceivedPkt[Octet][3:0]=i8_RxD[3:0];
|
|
@(posedge i_RxClk);
|
|
ov_ReceivedPkt[Octet][7:4]=i8_RxD[3:0];
|
|
Octet=Octet+1;
|
|
end
|
|
else if(i_RxDV==1'b1 && i_RxER==1'b1)
|
|
begin
|
|
ErrCycles = ErrCycles+1;
|
|
end
|
|
@(posedge i_RxClk);
|
|
end
|
|
|
|
|
|
end
|
FrameSize=Octet;
|
FrameSize=Octet;
|
$display("MAC: Packet Received with %d bytes",FrameSize);
|
$display("MAC: Packet Received with %d bytes",FrameSize);
|
end
|
end
|
endtask
|
endtask
|
|
|
| Line 117... |
Line 148... |
input integer PktSize;
|
input integer PktSize;
|
input integer PktIFG;
|
input integer PktIFG;
|
|
|
integer Octet;
|
integer Octet;
|
begin
|
begin
|
|
if(i2_Speed==2'b10)
|
|
begin
|
for(Octet=0;Octet<8;Octet++)
|
for(Octet=0;Octet<8;Octet++)
|
begin
|
begin
|
@(posedge i_TxClk);#1;
|
@(posedge i_TxClk);#1;
|
o_TxEN = 1'b1;
|
o_TxEN = 1'b1;
|
o_TxER = 1'b0;
|
o_TxER = 1'b0;
|
| Line 136... |
Line 169... |
@(posedge i_TxClk);#1;
|
@(posedge i_TxClk);#1;
|
o_TxEN = 1'b0;
|
o_TxEN = 1'b0;
|
//Interframe Gap
|
//Interframe Gap
|
for(Octet=0;Octet
|
for(Octet=0;Octet
|
begin @(posedge i_TxClk);#1; end
|
begin @(posedge i_TxClk);#1; end
|
|
end else
|
|
begin
|
|
for(Octet=0;Octet<8;Octet++)
|
|
begin
|
|
@(posedge i_TxClk);#1;
|
|
o_TxEN = 1'b1;
|
|
o_TxER = 1'b0;
|
|
o8_TxD = (Octet==7)?8'h5:8'h5;
|
|
@(posedge i_TxClk);#1;
|
|
o8_TxD = (Octet==7)?8'hD:8'h5;
|
|
end
|
|
for(Octet=0;Octet
|
|
begin
|
|
@(posedge i_TxClk);#1;
|
|
o_TxEN = 1'b1;
|
|
o_TxER = 1'b0;
|
|
o8_TxD = iv_TransmitPkt[Octet][3:0];
|
|
@(posedge i_TxClk);#1;
|
|
o8_TxD = iv_TransmitPkt[Octet][7:4];
|
|
end
|
|
@(posedge i_TxClk);#1;
|
|
o_TxEN = 1'b0;
|
|
//Interframe Gap
|
|
for(Octet=0;Octet
|
|
begin @(posedge i_TxClk);#1; end
|
|
end
|
end
|
end
|
endtask
|
endtask
|
|
|
|
|
endmodule
|
endmodule
|
