//////////////////////////////////////////////////////////////////////////                                                              ////////  can_fifo.v                                                  ////////                                                              ////////                                                              ////////  This file is part of the CAN Protocol Controller            ////////  http://www.opencores.org/projects/can/                      ////////                                                              ////////                                                              ////////  Author(s):                                                  ////////       Igor Mohor                                             ////////       igorm@opencores.org                                    ////////                                                              ////////                                                              ////////  All additional information is available in the README.txt   ////////  file.                                                       ////////                                                              //////////////////////////////////////////////////////////////////////////////                                                              //////// Copyright (C) 2002, 2003, 2004 Authors                       ////////                                                              //////// This source file may be used and distributed without         //////// restriction provided that this copyright statement is not    //////// removed from the file and that any derivative work contains  //////// the original copyright notice and the associated disclaimer. ////////                                                              //////// This source file is free software; you can redistribute it   //////// and/or modify it under the terms of the GNU Lesser General   //////// Public License as published by the Free Software Foundation; //////// either version 2.1 of the License, or (at your option) any   //////// later version.                                               ////////                                                              //////// This source is distributed in the hope that it will be       //////// useful, but WITHOUT ANY WARRANTY; without even the implied   //////// warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR      //////// PURPOSE.  See the GNU Lesser General Public License for more //////// details.                                                     ////////                                                              //////// You should have received a copy of the GNU Lesser General    //////// Public License along with this source; if not, download it   //////// from http://www.opencores.org/lgpl.shtml                     ////////                                                              //////// The CAN protocol is developed by Robert Bosch GmbH and       //////// protected by patents. Anybody who wants to implement this    //////// CAN IP core on silicon has to obtain a CAN protocol license  //////// from Bosch.                                                  ////////                                                              ////////////////////////////////////////////////////////////////////////////// CVS Revision History//// $Log: can_fifo.v,v $// Revision 1.27  2004/11/18 12:39:34  igorm// Fixes for compatibility after the SW reset.//// Revision 1.26  2004/02/08 14:30:57  mohor// Header changed.//// Revision 1.25  2003/10/23 16:52:17  mohor// Active high/low problem when Altera devices are used. Bug fixed by// Rojhalat Ibrahim.//// Revision 1.24  2003/10/17 05:55:20  markom// mbist signals updated according to newest convention//// Revision 1.23  2003/09/05 12:46:41  mohor// ALTERA_RAM supported.//// Revision 1.22  2003/08/20 09:59:16  mohor// Artisan RAM fixed (when not using BIST).//// Revision 1.21  2003/08/14 16:04:52  simons// Artisan ram instances added.//// Revision 1.20  2003/07/16 14:00:45  mohor// Fixed according to the linter.//// Revision 1.19  2003/07/03 09:30:44  mohor// PCI_BIST replaced with CAN_BIST.//// Revision 1.18  2003/06/27 22:14:23  simons// Overrun fifo implemented with FFs, because it is not possible to create such a memory.//// Revision 1.17  2003/06/27 20:56:15  simons// Virtual silicon ram instances added.//// Revision 1.16  2003/06/18 23:03:44  mohor// Typo fixed.//// Revision 1.15  2003/06/11 09:37:05  mohor// overrun and length_info fifos are initialized at the end of reset.//// Revision 1.14  2003/03/05 15:02:30  mohor// Xilinx RAM added.//// Revision 1.13  2003/03/01 22:53:33  mohor// Actel APA ram supported.//// Revision 1.12  2003/02/19 14:44:03  mohor// CAN core finished. Host interface added. Registers finished.// Synchronization to the wishbone finished.//// Revision 1.11  2003/02/14 20:17:01  mohor// Several registers added. Not finished, yet.//// Revision 1.10  2003/02/11 00:56:06  mohor// Wishbone interface added.//// Revision 1.9  2003/02/09 02:24:33  mohor// Bosch license warning added. Error counters finished. Overload frames// still need to be fixed.//// Revision 1.8  2003/01/31 01:13:38  mohor// backup.//// Revision 1.7  2003/01/17 17:44:31  mohor// Fifo corrected to be synthesizable.//// Revision 1.6  2003/01/15 13:16:47  mohor// When a frame with "remote request" is received, no data is stored// to fifo, just the frame information (identifier, ...). Data length// that is stored is the received data length and not the actual data// length that is stored to fifo.//// Revision 1.5  2003/01/14 17:25:09  mohor// Addresses corrected to decimal values (previously hex).//// Revision 1.4  2003/01/14 12:19:35  mohor// rx_fifo is now working.//// Revision 1.3  2003/01/09 21:54:45  mohor// rx fifo added. Not 100 % verified, yet.//// Revision 1.2  2003/01/09 14:46:58  mohor// Temporary files (backup).//// Revision 1.1  2003/01/08 02:10:55  mohor// Acceptance filter added.////////// synopsys translate_off`include "timescale.v"// synopsys translate_on`include "can_defines.v"module can_fifo(   clk,  rst,  wr,  data_in,  addr,  data_out,  fifo_selected,  reset_mode,  release_buffer,  extended_mode,  overrun,  info_empty,  info_cnt`ifdef CAN_BIST  ,  mbist_si_i,  mbist_so_o,  mbist_ctrl_i`endif);parameter Tp = 1;input         clk;input         rst;input         wr;input   [7:0] data_in;input   [5:0] addr;input         reset_mode;input         release_buffer;input         extended_mode;input         fifo_selected;output  [7:0] data_out;output        overrun;output        info_empty;output  [6:0] info_cnt;`ifdef CAN_BISTinput         mbist_si_i;output        mbist_so_o;input [`CAN_MBIST_CTRL_WIDTH - 1:0] mbist_ctrl_i;       // bist chain shift controlwire          mbist_s_0;`endif`ifdef ALTERA_RAM`else`ifdef ACTEL_APA_RAM`else`ifdef XILINX_RAM`else`ifdef ARTISAN_RAM  reg           overrun_info[0:63];`else`ifdef VIRTUALSILICON_RAM  reg           overrun_info[0:63];`else  reg     [7:0] fifo [0:63];  reg     [3:0] length_fifo[0:63];  reg           overrun_info[0:63];`endif`endif`endif`endif`endifreg     [5:0] rd_pointer;reg     [5:0] wr_pointer;reg     [5:0] read_address;reg     [5:0] wr_info_pointer;reg     [5:0] rd_info_pointer;reg           wr_q;reg     [3:0] len_cnt;reg     [6:0] fifo_cnt;reg     [6:0] info_cnt;reg           latch_overrun;reg           initialize_memories;wire    [3:0] length_info;wire          write_length_info;wire          fifo_empty;wire          fifo_full;wire          info_full;assign write_length_info = (~wr) & wr_q;// Delayed write signalalways @ (posedge clk or posedge rst)begin  if (rst)    wr_q <=#Tp 1'b0;  else if (reset_mode)    wr_q <=#Tp 1'b0;  else    wr_q <=#Tp wr;end// length counteralways @ (posedge clk or posedge rst)begin  if (rst)    len_cnt <= 4'h0;  else if (reset_mode | write_length_info)    len_cnt <=#Tp 4'h0;  else if (wr & (~fifo_full))    len_cnt <=#Tp len_cnt + 1'b1;end// wr_info_pointeralways @ (posedge clk or posedge rst)begin  if (rst)    wr_info_pointer <= 6'h0;  else if (write_length_info & (~info_full) | initialize_memories)    wr_info_pointer <=#Tp wr_info_pointer + 1'b1;  else if (reset_mode)    wr_info_pointer <=#Tp rd_info_pointer;end// rd_info_pointeralways @ (posedge clk or posedge rst)begin  if (rst)    rd_info_pointer <= 6'h0;  else if (release_buffer & (~fifo_empty))    rd_info_pointer <=#Tp rd_info_pointer + 1'b1;end// rd_pointeralways @ (posedge clk or posedge rst)begin  if (rst)    rd_pointer <= 5'h0;  else if (release_buffer & (~fifo_empty))    rd_pointer <=#Tp rd_pointer + {2'h0, length_info};end// wr_pointeralways @ (posedge clk or posedge rst)begin  if (rst)    wr_pointer <= 5'h0;  else if (reset_mode)    wr_pointer <=#Tp rd_pointer;  else if (wr & (~fifo_full))    wr_pointer <=#Tp wr_pointer + 1'b1;end// latch_overrunalways @ (posedge clk or posedge rst)begin  if (rst)    latch_overrun <= 1'b0;  else if (reset_mode | write_length_info)    latch_overrun <=#Tp 1'b0;  else if (wr & fifo_full)    latch_overrun <=#Tp 1'b1;end// Counting data in fifoalways @ (posedge clk or posedge rst)begin  if (rst)    fifo_cnt <= 7'h0;  else if (reset_mode)    fifo_cnt <=#Tp 7'h0;  else if (wr & (~release_buffer) & (~fifo_full))    fifo_cnt <=#Tp fifo_cnt + 1'b1;  else if ((~wr) & release_buffer & (~fifo_empty))    fifo_cnt <=#Tp fifo_cnt - {3'h0, length_info};  else if (wr & release_buffer & (~fifo_full) & (~fifo_empty))    fifo_cnt <=#Tp fifo_cnt - {3'h0, length_info} + 1'b1;endassign fifo_full = fifo_cnt == 7'd64;assign fifo_empty = fifo_cnt == 7'd0;// Counting data in length_fifo and overrun_info fifoalways @ (posedge clk or posedge rst)begin  if (rst)    info_cnt <=#Tp 7'h0;  else if (reset_mode)    info_cnt <=#Tp 7'h0;  else if (write_length_info ^ release_buffer)    begin      if (release_buffer & (~info_empty))        info_cnt <=#Tp info_cnt - 1'b1;      else if (write_length_info & (~info_full))        info_cnt <=#Tp info_cnt + 1'b1;    endend        assign info_full = info_cnt == 7'd64;assign info_empty = info_cnt == 7'd0;