/*********************************************************************
|
/*********************************************************************
|
|
|
ASYNC FIFO
|
ASYNC FIFO
|
|
|
This file is part of the sdram controller project
|
This file is part of the sdram controller project
|
http://www.opencores.org/cores/sdr_ctrl/
|
http://www.opencores.org/cores/sdr_ctrl/
|
|
|
Description: ASYNC FIFO
|
Description: ASYNC FIFO
|
|
|
To Do:
|
To Do:
|
nothing
|
nothing
|
|
|
Author(s): Dinesh Annayya, dinesha@opencores.org
|
Author(s): Dinesh Annayya, dinesha@opencores.org
|
|
|
Copyright (C) 2000 Authors and OPENCORES.ORG
|
Copyright (C) 2000 Authors and OPENCORES.ORG
|
|
|
This source file may be used and distributed without
|
This source file may be used and distributed without
|
restriction provided that this copyright statement is not
|
restriction provided that this copyright statement is not
|
removed from the file and that any derivative work contains
|
removed from the file and that any derivative work contains
|
the original copyright notice and the associated disclaimer.
|
the original copyright notice and the associated disclaimer.
|
|
|
This source file is free software; you can redistribute it
|
This source file is free software; you can redistribute it
|
and/or modify it under the terms of the GNU Lesser General
|
and/or modify it under the terms of the GNU Lesser General
|
Public License as published by the Free Software Foundation;
|
Public License as published by the Free Software Foundation;
|
either version 2.1 of the License, or (at your option) any
|
either version 2.1 of the License, or (at your option) any
|
later version.
|
later version.
|
|
|
This source is distributed in the hope that it will be
|
This source is distributed in the hope that it will be
|
useful, but WITHOUT ANY WARRANTY; without even the implied
|
useful, but WITHOUT ANY WARRANTY; without even the implied
|
warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR
|
warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR
|
PURPOSE. See the GNU Lesser General Public License for more
|
PURPOSE. See the GNU Lesser General Public License for more
|
details.
|
details.
|
|
|
You should have received a copy of the GNU Lesser General
|
You should have received a copy of the GNU Lesser General
|
Public License along with this source; if not, download it
|
Public License along with this source; if not, download it
|
from http://www.opencores.org/lgpl.shtml
|
from http://www.opencores.org/lgpl.shtml
|
|
|
*******************************************************************/
|
*******************************************************************/
|
|
|
//-------------------------------------------
|
//-------------------------------------------
|
// async FIFO
|
// async FIFO
|
//-----------------------------------------------
|
//-----------------------------------------------
|
`timescale 1ns/1ps
|
`timescale 1ns/1ps
|
|
|
module async_fifo (wr_clk,
|
module async_fifo (wr_clk,
|
wr_reset_n,
|
wr_reset_n,
|
wr_en,
|
wr_en,
|
wr_data,
|
wr_data,
|
full, // sync'ed to wr_clk
|
full, // sync'ed to wr_clk
|
afull, // sync'ed to wr_clk
|
afull, // sync'ed to wr_clk
|
rd_clk,
|
rd_clk,
|
rd_reset_n,
|
rd_reset_n,
|
rd_en,
|
rd_en,
|
empty, // sync'ed to rd_clk
|
empty, // sync'ed to rd_clk
|
aempty, // sync'ed to rd_clk
|
aempty, // sync'ed to rd_clk
|
rd_data);
|
rd_data);
|
|
|
parameter W = 4'd8;
|
parameter W = 4'd8;
|
parameter DP = 3'd4;
|
parameter DP = 3'd4;
|
parameter WR_FAST = 1'b1;
|
parameter WR_FAST = 1'b1;
|
parameter RD_FAST = 1'b1;
|
parameter RD_FAST = 1'b1;
|
parameter FULL_DP = DP;
|
parameter FULL_DP = DP;
|
parameter EMPTY_DP = 1'b0;
|
parameter EMPTY_DP = 1'b0;
|
|
|
parameter AW = (DP == 2) ? 1 :
|
parameter AW = (DP == 2) ? 1 :
|
(DP == 4) ? 2 :
|
(DP == 4) ? 2 :
|
(DP == 8) ? 3 :
|
(DP == 8) ? 3 :
|
(DP == 16) ? 4 :
|
(DP == 16) ? 4 :
|
(DP == 32) ? 5 :
|
(DP == 32) ? 5 :
|
(DP == 64) ? 6 :
|
(DP == 64) ? 6 :
|
(DP == 128) ? 7 :
|
(DP == 128) ? 7 :
|
(DP == 256) ? 8 : 0;
|
(DP == 256) ? 8 : 0;
|
|
|
output [W-1 : 0] rd_data;
|
output [W-1 : 0] rd_data;
|
input [W-1 : 0] wr_data;
|
input [W-1 : 0] wr_data;
|
input wr_clk, wr_reset_n, wr_en, rd_clk, rd_reset_n,
|
input wr_clk, wr_reset_n, wr_en, rd_clk, rd_reset_n,
|
rd_en;
|
rd_en;
|
output full, empty;
|
output full, empty;
|
output afull, aempty; // about full and about to empty
|
output afull, aempty; // about full and about to empty
|
|
|
|
|
// synopsys translate_off
|
// synopsys translate_off
|
|
|
initial begin
|
initial begin
|
if (AW == 0) begin
|
if (AW == 0) begin
|
$display ("%m : ERROR!!! Fifo depth %d not in range 2 to 256", DP);
|
$display ("%m : ERROR!!! Fifo depth %d not in range 2 to 256", DP);
|
end // if (AW == 0)
|
end // if (AW == 0)
|
end // initial begin
|
end // initial begin
|
|
|
// synopsys translate_on
|
// synopsys translate_on
|
|
|
reg [W-1 : 0] mem[DP-1 : 0];
|
reg [W-1 : 0] mem[DP-1 : 0];
|
|
|
/*********************** write side ************************/
|
/*********************** write side ************************/
|
reg [AW:0] sync_rd_ptr_0, sync_rd_ptr_1;
|
reg [AW:0] sync_rd_ptr_0, sync_rd_ptr_1;
|
wire [AW:0] sync_rd_ptr;
|
wire [AW:0] sync_rd_ptr;
|
reg [AW:0] wr_ptr, grey_wr_ptr;
|
reg [AW:0] wr_ptr, grey_wr_ptr;
|
reg [AW:0] grey_rd_ptr;
|
reg [AW:0] grey_rd_ptr;
|
reg full_q;
|
reg full_q;
|
wire full_c;
|
wire full_c;
|
wire afull_c;
|
wire afull_c;
|
wire [AW:0] wr_ptr_inc = wr_ptr + 1'b1;
|
wire [AW:0] wr_ptr_inc = wr_ptr + 1'b1;
|
wire [AW:0] wr_cnt = get_cnt(wr_ptr, sync_rd_ptr);
|
wire [AW:0] wr_cnt = get_cnt(wr_ptr, sync_rd_ptr);
|
|
|
assign full_c = (wr_cnt == FULL_DP) ? 1'b1 : 1'b0;
|
assign full_c = (wr_cnt == FULL_DP) ? 1'b1 : 1'b0;
|
assign afull_c = (wr_cnt == FULL_DP-1) ? 1'b1 : 1'b0;
|
assign afull_c = (wr_cnt == FULL_DP-1) ? 1'b1 : 1'b0;
|
|
|
|
|
always @(posedge wr_clk or negedge wr_reset_n) begin
|
always @(posedge wr_clk or negedge wr_reset_n) begin
|
if (!wr_reset_n) begin
|
if (!wr_reset_n) begin
|
wr_ptr <= 0;
|
wr_ptr <= 0;
|
grey_wr_ptr <= 0;
|
grey_wr_ptr <= 0;
|
full_q <= 0;
|
full_q <= 0;
|
end
|
end
|
else if (wr_en) begin
|
else if (wr_en) begin
|
wr_ptr <= wr_ptr_inc;
|
wr_ptr <= wr_ptr_inc;
|
grey_wr_ptr <= bin2grey(wr_ptr_inc);
|
grey_wr_ptr <= bin2grey(wr_ptr_inc);
|
if (wr_cnt == (FULL_DP-1)) begin
|
if (wr_cnt == (FULL_DP-1)) begin
|
full_q <= 1'b1;
|
full_q <= 1'b1;
|
end
|
end
|
end
|
end
|
else begin
|
else begin
|
if (full_q && (wr_cnt<FULL_DP)) begin
|
if (full_q && (wr_cnt<FULL_DP)) begin
|
full_q <= 1'b0;
|
full_q <= 1'b0;
|
end
|
end
|
end
|
end
|
end
|
end
|
|
|
assign full = (WR_FAST == 1) ? full_c : full_q;
|
assign full = (WR_FAST == 1) ? full_c : full_q;
|
assign afull = afull_c;
|
assign afull = afull_c;
|
|
|
always @(posedge wr_clk) begin
|
always @(posedge wr_clk) begin
|
if (wr_en) begin
|
if (wr_en) begin
|
mem[wr_ptr[AW-1:0]] <= wr_data;
|
mem[wr_ptr[AW-1:0]] <= wr_data;
|
end
|
end
|
end
|
end
|
|
|
wire [AW:0] grey_rd_ptr_dly ;
|
wire [AW:0] grey_rd_ptr_dly ;
|
assign #1 grey_rd_ptr_dly = grey_rd_ptr;
|
assign #1 grey_rd_ptr_dly = grey_rd_ptr;
|
|
|
// read pointer synchronizer
|
// read pointer synchronizer
|
always @(posedge wr_clk or negedge wr_reset_n) begin
|
always @(posedge wr_clk or negedge wr_reset_n) begin
|
if (!wr_reset_n) begin
|
if (!wr_reset_n) begin
|
sync_rd_ptr_0 <= 0;
|
sync_rd_ptr_0 <= 0;
|
sync_rd_ptr_1 <= 0;
|
sync_rd_ptr_1 <= 0;
|
end
|
end
|
else begin
|
else begin
|
sync_rd_ptr_0 <= grey_rd_ptr_dly;
|
sync_rd_ptr_0 <= grey_rd_ptr_dly;
|
sync_rd_ptr_1 <= sync_rd_ptr_0;
|
sync_rd_ptr_1 <= sync_rd_ptr_0;
|
end
|
end
|
end
|
end
|
|
|
assign sync_rd_ptr = grey2bin(sync_rd_ptr_1);
|
assign sync_rd_ptr = grey2bin(sync_rd_ptr_1);
|
|
|
/************************ read side *****************************/
|
/************************ read side *****************************/
|
reg [AW:0] sync_wr_ptr_0, sync_wr_ptr_1;
|
reg [AW:0] sync_wr_ptr_0, sync_wr_ptr_1;
|
wire [AW:0] sync_wr_ptr;
|
wire [AW:0] sync_wr_ptr;
|
reg [AW:0] rd_ptr;
|
reg [AW:0] rd_ptr;
|
reg empty_q;
|
reg empty_q;
|
wire empty_c;
|
wire empty_c;
|
wire aempty_c;
|
wire aempty_c;
|
wire [AW:0] rd_ptr_inc = rd_ptr + 1'b1;
|
wire [AW:0] rd_ptr_inc = rd_ptr + 1'b1;
|
wire [AW:0] sync_wr_ptr_dec = sync_wr_ptr - 1'b1;
|
wire [AW:0] sync_wr_ptr_dec = sync_wr_ptr - 1'b1;
|
wire [AW:0] rd_cnt = get_cnt(sync_wr_ptr, rd_ptr);
|
wire [AW:0] rd_cnt = get_cnt(sync_wr_ptr, rd_ptr);
|
|
|
assign empty_c = (rd_cnt == 0) ? 1'b1 : 1'b0;
|
assign empty_c = (rd_cnt == 0) ? 1'b1 : 1'b0;
|
assign aempty_c = (rd_cnt == 1) ? 1'b1 : 1'b0;
|
assign aempty_c = (rd_cnt == 1) ? 1'b1 : 1'b0;
|
|
|
always @(posedge rd_clk or negedge rd_reset_n) begin
|
always @(posedge rd_clk or negedge rd_reset_n) begin
|
if (!rd_reset_n) begin
|
if (!rd_reset_n) begin
|
rd_ptr <= 0;
|
rd_ptr <= 0;
|
grey_rd_ptr <= 0;
|
grey_rd_ptr <= 0;
|
empty_q <= 1'b1;
|
empty_q <= 1'b1;
|
end
|
end
|
else begin
|
else begin
|
if (rd_en) begin
|
if (rd_en) begin
|
rd_ptr <= rd_ptr_inc;
|
rd_ptr <= rd_ptr_inc;
|
grey_rd_ptr <= bin2grey(rd_ptr_inc);
|
grey_rd_ptr <= bin2grey(rd_ptr_inc);
|
if (rd_cnt==(EMPTY_DP+1)) begin
|
if (rd_cnt==(EMPTY_DP+1)) begin
|
empty_q <= 1'b1;
|
empty_q <= 1'b1;
|
end
|
end
|
end
|
end
|
else begin
|
else begin
|
if (empty_q && (rd_cnt!=EMPTY_DP)) begin
|
if (empty_q && (rd_cnt!=EMPTY_DP)) begin
|
empty_q <= 1'b0;
|
empty_q <= 1'b0;
|
end
|
end
|
end
|
end
|
end
|
end
|
end
|
end
|
|
|
assign empty = (RD_FAST == 1) ? empty_c : empty_q;
|
assign empty = (RD_FAST == 1) ? empty_c : empty_q;
|
assign aempty = aempty_c;
|
assign aempty = aempty_c;
|
|
|
assign rd_data = mem[rd_ptr[AW-1:0]];
|
reg [W-1 : 0] rd_data_q;
|
|
|
|
wire [W-1 : 0] rd_data_c = mem[rd_ptr[AW-1:0]];
|
|
always @(posedge rd_clk) begin
|
|
rd_data_q <= rd_data_c;
|
|
end
|
|
assign rd_data = (RD_FAST == 1) ? rd_data_c : rd_data_q;
|
|
|
wire [AW:0] grey_wr_ptr_dly ;
|
wire [AW:0] grey_wr_ptr_dly ;
|
assign #1 grey_wr_ptr_dly = grey_wr_ptr;
|
assign #1 grey_wr_ptr_dly = grey_wr_ptr;
|
|
|
// write pointer synchronizer
|
// write pointer synchronizer
|
always @(posedge rd_clk or negedge rd_reset_n) begin
|
always @(posedge rd_clk or negedge rd_reset_n) begin
|
if (!rd_reset_n) begin
|
if (!rd_reset_n) begin
|
sync_wr_ptr_0 <= 0;
|
sync_wr_ptr_0 <= 0;
|
sync_wr_ptr_1 <= 0;
|
sync_wr_ptr_1 <= 0;
|
end
|
end
|
else begin
|
else begin
|
sync_wr_ptr_0 <= grey_wr_ptr_dly;
|
sync_wr_ptr_0 <= grey_wr_ptr_dly;
|
sync_wr_ptr_1 <= sync_wr_ptr_0;
|
sync_wr_ptr_1 <= sync_wr_ptr_0;
|
end
|
end
|
end
|
end
|
assign sync_wr_ptr = grey2bin(sync_wr_ptr_1);
|
assign sync_wr_ptr = grey2bin(sync_wr_ptr_1);
|
|
|
|
|
/************************ functions ******************************/
|
/************************ functions ******************************/
|
function [AW:0] bin2grey;
|
function [AW:0] bin2grey;
|
input [AW:0] bin;
|
input [AW:0] bin;
|
reg [8:0] bin_8;
|
reg [8:0] bin_8;
|
reg [8:0] grey_8;
|
reg [8:0] grey_8;
|
begin
|
begin
|
bin_8 = bin;
|
bin_8 = bin;
|
grey_8[1:0] = do_grey(bin_8[2:0]);
|
grey_8[1:0] = do_grey(bin_8[2:0]);
|
grey_8[3:2] = do_grey(bin_8[4:2]);
|
grey_8[3:2] = do_grey(bin_8[4:2]);
|
grey_8[5:4] = do_grey(bin_8[6:4]);
|
grey_8[5:4] = do_grey(bin_8[6:4]);
|
grey_8[7:6] = do_grey(bin_8[8:6]);
|
grey_8[7:6] = do_grey(bin_8[8:6]);
|
grey_8[8] = bin_8[8];
|
grey_8[8] = bin_8[8];
|
bin2grey = grey_8;
|
bin2grey = grey_8;
|
end
|
end
|
endfunction
|
endfunction
|
|
|
function [AW:0] grey2bin;
|
function [AW:0] grey2bin;
|
input [AW:0] grey;
|
input [AW:0] grey;
|
reg [8:0] grey_8;
|
reg [8:0] grey_8;
|
reg [8:0] bin_8;
|
reg [8:0] bin_8;
|
begin
|
begin
|
grey_8 = grey;
|
grey_8 = grey;
|
bin_8[8] = grey_8[8];
|
bin_8[8] = grey_8[8];
|
bin_8[7:6] = do_bin({bin_8[8], grey_8[7:6]});
|
bin_8[7:6] = do_bin({bin_8[8], grey_8[7:6]});
|
bin_8[5:4] = do_bin({bin_8[6], grey_8[5:4]});
|
bin_8[5:4] = do_bin({bin_8[6], grey_8[5:4]});
|
bin_8[3:2] = do_bin({bin_8[4], grey_8[3:2]});
|
bin_8[3:2] = do_bin({bin_8[4], grey_8[3:2]});
|
bin_8[1:0] = do_bin({bin_8[2], grey_8[1:0]});
|
bin_8[1:0] = do_bin({bin_8[2], grey_8[1:0]});
|
grey2bin = bin_8;
|
grey2bin = bin_8;
|
end
|
end
|
endfunction
|
endfunction
|
|
|
|
|
function [1:0] do_grey;
|
function [1:0] do_grey;
|
input [2:0] bin;
|
input [2:0] bin;
|
begin
|
begin
|
if (bin[2]) begin // do reverse grey
|
if (bin[2]) begin // do reverse grey
|
case (bin[1:0])
|
case (bin[1:0])
|
2'b00: do_grey = 2'b10;
|
2'b00: do_grey = 2'b10;
|
2'b01: do_grey = 2'b11;
|
2'b01: do_grey = 2'b11;
|
2'b10: do_grey = 2'b01;
|
2'b10: do_grey = 2'b01;
|
2'b11: do_grey = 2'b00;
|
2'b11: do_grey = 2'b00;
|
endcase
|
endcase
|
end
|
end
|
else begin
|
else begin
|
case (bin[1:0])
|
case (bin[1:0])
|
2'b00: do_grey = 2'b00;
|
2'b00: do_grey = 2'b00;
|
2'b01: do_grey = 2'b01;
|
2'b01: do_grey = 2'b01;
|
2'b10: do_grey = 2'b11;
|
2'b10: do_grey = 2'b11;
|
2'b11: do_grey = 2'b10;
|
2'b11: do_grey = 2'b10;
|
endcase
|
endcase
|
end
|
end
|
end
|
end
|
endfunction
|
endfunction
|
|
|
function [1:0] do_bin;
|
function [1:0] do_bin;
|
input [2:0] grey;
|
input [2:0] grey;
|
begin
|
begin
|
if (grey[2]) begin // actually bin[2]
|
if (grey[2]) begin // actually bin[2]
|
case (grey[1:0])
|
case (grey[1:0])
|
2'b10: do_bin = 2'b00;
|
2'b10: do_bin = 2'b00;
|
2'b11: do_bin = 2'b01;
|
2'b11: do_bin = 2'b01;
|
2'b01: do_bin = 2'b10;
|
2'b01: do_bin = 2'b10;
|
2'b00: do_bin = 2'b11;
|
2'b00: do_bin = 2'b11;
|
endcase
|
endcase
|
end
|
end
|
else begin
|
else begin
|
case (grey[1:0])
|
case (grey[1:0])
|
2'b00: do_bin = 2'b00;
|
2'b00: do_bin = 2'b00;
|
2'b01: do_bin = 2'b01;
|
2'b01: do_bin = 2'b01;
|
2'b11: do_bin = 2'b10;
|
2'b11: do_bin = 2'b10;
|
2'b10: do_bin = 2'b11;
|
2'b10: do_bin = 2'b11;
|
endcase
|
endcase
|
end
|
end
|
end
|
end
|
endfunction
|
endfunction
|
|
|
function [AW:0] get_cnt;
|
function [AW:0] get_cnt;
|
input [AW:0] wr_ptr, rd_ptr;
|
input [AW:0] wr_ptr, rd_ptr;
|
begin
|
begin
|
if (wr_ptr >= rd_ptr) begin
|
if (wr_ptr >= rd_ptr) begin
|
get_cnt = (wr_ptr - rd_ptr);
|
get_cnt = (wr_ptr - rd_ptr);
|
end
|
end
|
else begin
|
else begin
|
get_cnt = DP*2 - (rd_ptr - wr_ptr);
|
get_cnt = DP*2 - (rd_ptr - wr_ptr);
|
end
|
end
|
end
|
end
|
endfunction
|
endfunction
|
|
|
// synopsys translate_off
|
// synopsys translate_off
|
always @(posedge wr_clk) begin
|
always @(posedge wr_clk) begin
|
if (wr_en && full) begin
|
if (wr_en && full) begin
|
$display($time, "%m Error! afifo overflow!");
|
$display($time, "%m Error! afifo overflow!");
|
$stop;
|
$stop;
|
end
|
end
|
end
|
end
|
|
|
always @(posedge rd_clk) begin
|
always @(posedge rd_clk) begin
|
if (rd_en && empty) begin
|
if (rd_en && empty) begin
|
$display($time, "%m error! afifo underflow!");
|
$display($time, "%m error! afifo underflow!");
|
$stop;
|
$stop;
|
end
|
end
|
end
|
end
|
// synopsys translate_on
|
// synopsys translate_on
|
|
|
endmodule
|
endmodule
|
|
|