forked from cores/microwatt
You cannot select more than 25 topics
Topics must start with a letter or number, can include dashes ('-') and can be up to 35 characters long.
889 lines
28 KiB
Coq
889 lines
28 KiB
Coq
4 years ago
|
//////////////////////////////////////////////////////////////////////
|
||
|
//// ////
|
||
|
//// uart_regs.v ////
|
||
|
//// ////
|
||
|
//// ////
|
||
|
//// This file is part of the "UART 16550 compatible" project ////
|
||
|
//// http://www.opencores.org/cores/uart16550/ ////
|
||
|
//// ////
|
||
|
//// Documentation related to this project: ////
|
||
|
//// - http://www.opencores.org/cores/uart16550/ ////
|
||
|
//// ////
|
||
|
//// Projects compatibility: ////
|
||
|
//// - WISHBONE ////
|
||
|
//// RS232 Protocol ////
|
||
|
//// 16550D uart (mostly supported) ////
|
||
|
//// ////
|
||
|
//// Overview (main Features): ////
|
||
|
//// Registers of the uart 16550 core ////
|
||
|
//// ////
|
||
|
//// Known problems (limits): ////
|
||
|
//// Inserts 1 wait state in all WISHBONE transfers ////
|
||
|
//// ////
|
||
|
//// To Do: ////
|
||
|
//// Nothing or verification. ////
|
||
|
//// ////
|
||
|
//// Author(s): ////
|
||
|
//// - gorban@opencores.org ////
|
||
|
//// - Jacob Gorban ////
|
||
|
//// - Igor Mohor (igorm@opencores.org) ////
|
||
|
//// ////
|
||
|
//// Created: 2001/05/12 ////
|
||
|
//// Last Updated: (See log for the revision history ////
|
||
|
//// ////
|
||
|
//// ////
|
||
|
//////////////////////////////////////////////////////////////////////
|
||
|
//// ////
|
||
|
//// Copyright (C) 2000, 2001 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 ////
|
||
|
//// ////
|
||
|
//////////////////////////////////////////////////////////////////////
|
||
|
//
|
||
|
// CVS Revision History
|
||
|
//
|
||
|
// $Log: not supported by cvs2svn $
|
||
|
// Revision 1.41 2004/05/21 11:44:41 tadejm
|
||
|
// Added synchronizer flops for RX input.
|
||
|
//
|
||
|
// Revision 1.40 2003/06/11 16:37:47 gorban
|
||
|
// This fixes errors in some cases when data is being read and put to the FIFO at the same time. Patch is submitted by Scott Furman. Update is very recommended.
|
||
|
//
|
||
|
// Revision 1.39 2002/07/29 21:16:18 gorban
|
||
|
// The uart_defines.v file is included again in sources.
|
||
|
//
|
||
|
// Revision 1.38 2002/07/22 23:02:23 gorban
|
||
|
// Bug Fixes:
|
||
|
// * Possible loss of sync and bad reception of stop bit on slow baud rates fixed.
|
||
|
// Problem reported by Kenny.Tung.
|
||
|
// * Bad (or lack of ) loopback handling fixed. Reported by Cherry Withers.
|
||
|
//
|
||
|
// Improvements:
|
||
|
// * Made FIFO's as general inferrable memory where possible.
|
||
|
// So on FPGA they should be inferred as RAM (Distributed RAM on Xilinx).
|
||
|
// This saves about 1/3 of the Slice count and reduces P&R and synthesis times.
|
||
|
//
|
||
|
// * Added optional baudrate output (baud_o).
|
||
|
// This is identical to BAUDOUT* signal on 16550 chip.
|
||
|
// It outputs 16xbit_clock_rate - the divided clock.
|
||
|
// It's disabled by default. Define UART_HAS_BAUDRATE_OUTPUT to use.
|
||
|
//
|
||
|
// Revision 1.37 2001/12/27 13:24:09 mohor
|
||
|
// lsr[7] was not showing overrun errors.
|
||
|
//
|
||
|
// Revision 1.36 2001/12/20 13:25:46 mohor
|
||
|
// rx push changed to be only one cycle wide.
|
||
|
//
|
||
|
// Revision 1.35 2001/12/19 08:03:34 mohor
|
||
|
// Warnings cleared.
|
||
|
//
|
||
|
// Revision 1.34 2001/12/19 07:33:54 mohor
|
||
|
// Synplicity was having troubles with the comment.
|
||
|
//
|
||
|
// Revision 1.33 2001/12/17 10:14:43 mohor
|
||
|
// Things related to msr register changed. After THRE IRQ occurs, and one
|
||
|
// character is written to the transmit fifo, the detection of the THRE bit in the
|
||
|
// LSR is delayed for one character time.
|
||
|
//
|
||
|
// Revision 1.32 2001/12/14 13:19:24 mohor
|
||
|
// MSR register fixed.
|
||
|
//
|
||
|
// Revision 1.31 2001/12/14 10:06:58 mohor
|
||
|
// After reset modem status register MSR should be reset.
|
||
|
//
|
||
|
// Revision 1.30 2001/12/13 10:09:13 mohor
|
||
|
// thre irq should be cleared only when being source of interrupt.
|
||
|
//
|
||
|
// Revision 1.29 2001/12/12 09:05:46 mohor
|
||
|
// LSR status bit 0 was not cleared correctly in case of reseting the FCR (rx fifo).
|
||
|
//
|
||
|
// Revision 1.28 2001/12/10 19:52:41 gorban
|
||
|
// Scratch register added
|
||
|
//
|
||
|
// Revision 1.27 2001/12/06 14:51:04 gorban
|
||
|
// Bug in LSR[0] is fixed.
|
||
|
// All WISHBONE signals are now sampled, so another wait-state is introduced on all transfers.
|
||
|
//
|
||
|
// Revision 1.26 2001/12/03 21:44:29 gorban
|
||
|
// Updated specification documentation.
|
||
|
// Added full 32-bit data bus interface, now as default.
|
||
|
// Address is 5-bit wide in 32-bit data bus mode.
|
||
|
// Added wb_sel_i input to the core. It's used in the 32-bit mode.
|
||
|
// Added debug interface with two 32-bit read-only registers in 32-bit mode.
|
||
|
// Bits 5 and 6 of LSR are now only cleared on TX FIFO write.
|
||
|
// My small test bench is modified to work with 32-bit mode.
|
||
|
//
|
||
|
// Revision 1.25 2001/11/28 19:36:39 gorban
|
||
|
// Fixed: timeout and break didn't pay attention to current data format when counting time
|
||
|
//
|
||
|
// Revision 1.24 2001/11/26 21:38:54 gorban
|
||
|
// Lots of fixes:
|
||
|
// Break condition wasn't handled correctly at all.
|
||
|
// LSR bits could lose their values.
|
||
|
// LSR value after reset was wrong.
|
||
|
// Timing of THRE interrupt signal corrected.
|
||
|
// LSR bit 0 timing corrected.
|
||
|
//
|
||
|
// Revision 1.23 2001/11/12 21:57:29 gorban
|
||
|
// fixed more typo bugs
|
||
|
//
|
||
|
// Revision 1.22 2001/11/12 15:02:28 mohor
|
||
|
// lsr1r error fixed.
|
||
|
//
|
||
|
// Revision 1.21 2001/11/12 14:57:27 mohor
|
||
|
// ti_int_pnd error fixed.
|
||
|
//
|
||
|
// Revision 1.20 2001/11/12 14:50:27 mohor
|
||
|
// ti_int_d error fixed.
|
||
|
//
|
||
|
// Revision 1.19 2001/11/10 12:43:21 gorban
|
||
|
// Logic Synthesis bugs fixed. Some other minor changes
|
||
|
//
|
||
|
// Revision 1.18 2001/11/08 14:54:23 mohor
|
||
|
// Comments in Slovene language deleted, few small fixes for better work of
|
||
|
// old tools. IRQs need to be fix.
|
||
|
//
|
||
|
// Revision 1.17 2001/11/07 17:51:52 gorban
|
||
|
// Heavily rewritten interrupt and LSR subsystems.
|
||
|
// Many bugs hopefully squashed.
|
||
|
//
|
||
|
// Revision 1.16 2001/11/02 09:55:16 mohor
|
||
|
// no message
|
||
|
//
|
||
|
// Revision 1.15 2001/10/31 15:19:22 gorban
|
||
|
// Fixes to break and timeout conditions
|
||
|
//
|
||
|
// Revision 1.14 2001/10/29 17:00:46 gorban
|
||
|
// fixed parity sending and tx_fifo resets over- and underrun
|
||
|
//
|
||
|
// Revision 1.13 2001/10/20 09:58:40 gorban
|
||
|
// Small synopsis fixes
|
||
|
//
|
||
|
// Revision 1.12 2001/10/19 16:21:40 gorban
|
||
|
// Changes data_out to be synchronous again as it should have been.
|
||
|
//
|
||
|
// Revision 1.11 2001/10/18 20:35:45 gorban
|
||
|
// small fix
|
||
|
//
|
||
|
// Revision 1.10 2001/08/24 21:01:12 mohor
|
||
|
// Things connected to parity changed.
|
||
|
// Clock devider changed.
|
||
|
//
|
||
|
// Revision 1.9 2001/08/23 16:05:05 mohor
|
||
|
// Stop bit bug fixed.
|
||
|
// Parity bug fixed.
|
||
|
// WISHBONE read cycle bug fixed,
|
||
|
// OE indicator (Overrun Error) bug fixed.
|
||
|
// PE indicator (Parity Error) bug fixed.
|
||
|
// Register read bug fixed.
|
||
|
//
|
||
|
// Revision 1.10 2001/06/23 11:21:48 gorban
|
||
|
// DL made 16-bit long. Fixed transmission/reception bugs.
|
||
|
//
|
||
|
// Revision 1.9 2001/05/31 20:08:01 gorban
|
||
|
// FIFO changes and other corrections.
|
||
|
//
|
||
|
// Revision 1.8 2001/05/29 20:05:04 gorban
|
||
|
// Fixed some bugs and synthesis problems.
|
||
|
//
|
||
|
// Revision 1.7 2001/05/27 17:37:49 gorban
|
||
|
// Fixed many bugs. Updated spec. Changed FIFO files structure. See CHANGES.txt file.
|
||
|
//
|
||
|
// Revision 1.6 2001/05/21 19:12:02 gorban
|
||
|
// Corrected some Linter messages.
|
||
|
//
|
||
|
// Revision 1.5 2001/05/17 18:34:18 gorban
|
||
|
// First 'stable' release. Should be sythesizable now. Also added new header.
|
||
|
//
|
||
|
// Revision 1.0 2001-05-17 21:27:11+02 jacob
|
||
|
// Initial revision
|
||
|
//
|
||
|
//
|
||
|
|
||
|
`include "uart_defines.v"
|
||
|
|
||
|
`define UART_DL1 7:0
|
||
|
`define UART_DL2 15:8
|
||
|
|
||
|
module uart_regs
|
||
|
#(parameter SIM = 0)
|
||
|
(clk,
|
||
|
wb_rst_i, wb_addr_i, wb_dat_i, wb_dat_o, wb_we_i, wb_re_i,
|
||
|
|
||
|
// additional signals
|
||
|
modem_inputs,
|
||
|
stx_pad_o, srx_pad_i,
|
||
|
|
||
|
rts_pad_o, dtr_pad_o, int_o
|
||
|
`ifdef UART_HAS_BAUDRATE_OUTPUT
|
||
|
, baud_o
|
||
|
`endif
|
||
|
|
||
|
);
|
||
|
|
||
|
input clk;
|
||
|
input wb_rst_i;
|
||
|
input [2:0] wb_addr_i;
|
||
|
input [7:0] wb_dat_i;
|
||
|
output [7:0] wb_dat_o;
|
||
|
input wb_we_i;
|
||
|
input wb_re_i;
|
||
|
|
||
|
output stx_pad_o;
|
||
|
input srx_pad_i;
|
||
|
|
||
|
input [3:0] modem_inputs;
|
||
|
output rts_pad_o;
|
||
|
output dtr_pad_o;
|
||
|
output int_o;
|
||
|
`ifdef UART_HAS_BAUDRATE_OUTPUT
|
||
|
output baud_o;
|
||
|
`endif
|
||
|
|
||
|
wire [3:0] modem_inputs;
|
||
|
reg enable;
|
||
|
`ifdef UART_HAS_BAUDRATE_OUTPUT
|
||
|
assign baud_o = enable; // baud_o is actually the enable signal
|
||
|
`endif
|
||
|
|
||
|
|
||
|
wire stx_pad_o; // received from transmitter module
|
||
|
wire srx_pad_i;
|
||
|
wire srx_pad;
|
||
|
|
||
|
reg [7:0] wb_dat_o;
|
||
|
|
||
|
wire [2:0] wb_addr_i;
|
||
|
wire [7:0] wb_dat_i;
|
||
|
|
||
|
|
||
|
reg [3:0] ier;
|
||
|
reg [3:0] iir;
|
||
|
reg [1:0] fcr; /// bits 7 and 6 of fcr. Other bits are ignored
|
||
|
reg [4:0] mcr;
|
||
|
reg [7:0] lcr;
|
||
|
reg [7:0] msr;
|
||
|
reg [15:0] dl; // 32-bit divisor latch
|
||
|
reg [7:0] scratch; // UART scratch register
|
||
|
reg start_dlc; // activate dlc on writing to UART_DL1
|
||
|
reg lsr_mask_d; // delay for lsr_mask condition
|
||
|
reg msi_reset; // reset MSR 4 lower bits indicator
|
||
|
//reg threi_clear; // THRE interrupt clear flag
|
||
|
reg [15:0] dlc; // 32-bit divisor latch counter
|
||
|
reg int_o;
|
||
|
|
||
|
reg [3:0] trigger_level; // trigger level of the receiver FIFO
|
||
|
reg rx_reset;
|
||
|
reg tx_reset;
|
||
|
|
||
|
wire dlab; // divisor latch access bit
|
||
|
wire cts_pad_i, dsr_pad_i, ri_pad_i, dcd_pad_i; // modem status bits
|
||
|
wire loopback; // loopback bit (MCR bit 4)
|
||
|
wire cts, dsr, ri, dcd; // effective signals
|
||
|
wire cts_c, dsr_c, ri_c, dcd_c; // Complement effective signals (considering loopback)
|
||
|
wire rts_pad_o, dtr_pad_o; // modem control outputs
|
||
|
|
||
|
// LSR bits wires and regs
|
||
|
wire [7:0] lsr;
|
||
|
wire lsr0, lsr1, lsr2, lsr3, lsr4, lsr5, lsr6, lsr7;
|
||
|
reg lsr0r, lsr1r, lsr2r, lsr3r, lsr4r, lsr5r, lsr6r, lsr7r;
|
||
|
wire lsr_mask; // lsr_mask
|
||
|
|
||
|
//
|
||
|
// ASSINGS
|
||
|
//
|
||
|
|
||
|
assign lsr[7:0] = { lsr7r, lsr6r, lsr5r, lsr4r, lsr3r, lsr2r, lsr1r, lsr0r };
|
||
|
|
||
|
assign {cts_pad_i, dsr_pad_i, ri_pad_i, dcd_pad_i} = modem_inputs;
|
||
|
assign {cts, dsr, ri, dcd} = ~{cts_pad_i,dsr_pad_i,ri_pad_i,dcd_pad_i};
|
||
|
|
||
|
assign {cts_c, dsr_c, ri_c, dcd_c} = loopback ? {mcr[`UART_MC_RTS],mcr[`UART_MC_DTR],mcr[`UART_MC_OUT1],mcr[`UART_MC_OUT2]}
|
||
|
: {cts_pad_i,dsr_pad_i,ri_pad_i,dcd_pad_i};
|
||
|
|
||
|
assign dlab = lcr[`UART_LC_DL];
|
||
|
assign loopback = mcr[4];
|
||
|
|
||
|
// assign modem outputs
|
||
|
assign rts_pad_o = mcr[`UART_MC_RTS];
|
||
|
assign dtr_pad_o = mcr[`UART_MC_DTR];
|
||
|
|
||
|
// Interrupt signals
|
||
|
wire rls_int; // receiver line status interrupt
|
||
|
wire rda_int; // receiver data available interrupt
|
||
|
wire ti_int; // timeout indicator interrupt
|
||
|
wire thre_int; // transmitter holding register empty interrupt
|
||
|
wire ms_int; // modem status interrupt
|
||
|
|
||
|
// FIFO signals
|
||
|
reg tf_push;
|
||
|
reg rf_pop;
|
||
|
wire [`UART_FIFO_REC_WIDTH-1:0] rf_data_out;
|
||
|
wire rf_error_bit; // an error (parity or framing) is inside the fifo
|
||
|
wire rf_overrun;
|
||
|
wire rf_push_pulse;
|
||
|
wire [`UART_FIFO_COUNTER_W-1:0] rf_count;
|
||
|
wire [`UART_FIFO_COUNTER_W-1:0] tf_count;
|
||
|
wire [2:0] tstate;
|
||
|
wire [3:0] rstate;
|
||
|
wire [9:0] counter_t;
|
||
|
|
||
|
wire thre_set_en; // THRE status is delayed one character time when a character is written to fifo.
|
||
|
reg [7:0] block_cnt; // While counter counts, THRE status is blocked (delayed one character cycle)
|
||
|
reg [7:0] block_value; // One character length minus stop bit
|
||
|
|
||
|
// Transmitter Instance
|
||
|
wire serial_out;
|
||
|
|
||
|
uart_transmitter #(.SIM (SIM)) transmitter(clk, wb_rst_i, lcr, tf_push, wb_dat_i, enable, serial_out, tstate, tf_count, tx_reset, lsr_mask);
|
||
|
|
||
|
// Synchronizing and sampling serial RX input
|
||
|
uart_sync_flops i_uart_sync_flops
|
||
|
(
|
||
|
.rst_i (wb_rst_i),
|
||
|
.clk_i (clk),
|
||
|
.stage1_rst_i (1'b0),
|
||
|
.stage1_clk_en_i (1'b1),
|
||
|
.async_dat_i (srx_pad_i),
|
||
|
.sync_dat_o (srx_pad)
|
||
|
);
|
||
|
defparam i_uart_sync_flops.width = 1;
|
||
|
defparam i_uart_sync_flops.init_value = 1'b1;
|
||
|
|
||
|
// handle loopback
|
||
|
wire serial_in = loopback ? serial_out : srx_pad;
|
||
|
assign stx_pad_o = loopback ? 1'b1 : serial_out;
|
||
|
|
||
|
// Receiver Instance
|
||
|
uart_receiver receiver(clk, wb_rst_i, lcr, rf_pop, serial_in, enable,
|
||
|
counter_t, rf_count, rf_data_out, rf_error_bit, rf_overrun, rx_reset, lsr_mask, rstate, rf_push_pulse);
|
||
|
|
||
|
|
||
|
// Asynchronous reading here because the outputs are sampled in uart_wb.v file
|
||
|
always @(dl or dlab or ier or iir or scratch
|
||
|
or lcr or lsr or msr or rf_data_out or wb_addr_i or wb_re_i) // asynchrounous reading
|
||
|
begin
|
||
|
case (wb_addr_i)
|
||
|
`UART_REG_RB : wb_dat_o = dlab ? dl[`UART_DL1] : rf_data_out[10:3];
|
||
|
`UART_REG_IE : wb_dat_o = dlab ? dl[`UART_DL2] : {4'd0,ier};
|
||
|
`UART_REG_II : wb_dat_o = {4'b1100,iir};
|
||
|
`UART_REG_LC : wb_dat_o = lcr;
|
||
|
`UART_REG_LS : wb_dat_o = lsr;
|
||
|
`UART_REG_MS : wb_dat_o = msr;
|
||
|
`UART_REG_SR : wb_dat_o = scratch;
|
||
|
default: wb_dat_o = 8'b0; // ??
|
||
|
endcase // case(wb_addr_i)
|
||
|
end // always @ (dl or dlab or ier or iir or scratch...
|
||
|
|
||
|
|
||
|
// rf_pop signal handling
|
||
|
always @(posedge clk or posedge wb_rst_i)
|
||
|
begin
|
||
|
if (wb_rst_i)
|
||
|
rf_pop <= 0;
|
||
|
else
|
||
|
if (rf_pop) // restore the signal to 0 after one clock cycle
|
||
|
rf_pop <= 0;
|
||
|
else
|
||
|
if (wb_re_i && wb_addr_i == `UART_REG_RB && !dlab)
|
||
|
rf_pop <= 1; // advance read pointer
|
||
|
end
|
||
|
|
||
|
wire lsr_mask_condition;
|
||
|
wire iir_read;
|
||
|
wire msr_read;
|
||
|
wire fifo_read;
|
||
|
wire fifo_write;
|
||
|
|
||
|
assign lsr_mask_condition = (wb_re_i && wb_addr_i == `UART_REG_LS && !dlab);
|
||
|
assign iir_read = (wb_re_i && wb_addr_i == `UART_REG_II && !dlab);
|
||
|
assign msr_read = (wb_re_i && wb_addr_i == `UART_REG_MS && !dlab);
|
||
|
assign fifo_read = (wb_re_i && wb_addr_i == `UART_REG_RB && !dlab);
|
||
|
assign fifo_write = (wb_we_i && wb_addr_i == `UART_REG_TR && !dlab);
|
||
|
|
||
|
// lsr_mask_d delayed signal handling
|
||
|
always @(posedge clk or posedge wb_rst_i)
|
||
|
begin
|
||
|
if (wb_rst_i)
|
||
|
lsr_mask_d <= 0;
|
||
|
else // reset bits in the Line Status Register
|
||
|
lsr_mask_d <= lsr_mask_condition;
|
||
|
end
|
||
|
|
||
|
// lsr_mask is rise detected
|
||
|
assign lsr_mask = lsr_mask_condition && ~lsr_mask_d;
|
||
|
|
||
|
// msi_reset signal handling
|
||
|
always @(posedge clk or posedge wb_rst_i)
|
||
|
begin
|
||
|
if (wb_rst_i)
|
||
|
msi_reset <= 1;
|
||
|
else
|
||
|
if (msi_reset)
|
||
|
msi_reset <= 0;
|
||
|
else
|
||
|
if (msr_read)
|
||
|
msi_reset <= 1; // reset bits in Modem Status Register
|
||
|
end
|
||
|
|
||
|
|
||
|
//
|
||
|
// WRITES AND RESETS //
|
||
|
//
|
||
|
// Line Control Register
|
||
|
always @(posedge clk or posedge wb_rst_i)
|
||
|
if (wb_rst_i)
|
||
|
lcr <= 8'b00000011; // 8n1 setting
|
||
|
else
|
||
|
if (wb_we_i && wb_addr_i==`UART_REG_LC)
|
||
|
lcr <= wb_dat_i;
|
||
|
|
||
|
// Interrupt Enable Register or UART_DL2
|
||
|
always @(posedge clk or posedge wb_rst_i)
|
||
|
if (wb_rst_i)
|
||
|
begin
|
||
|
ier <= 4'b0000; // no interrupts after reset
|
||
|
`ifdef PRESCALER_PRESET_HARD
|
||
|
dl[`UART_DL2] <= `PRESCALER_HIGH_PRESET;
|
||
|
`else
|
||
|
dl[`UART_DL2] <= 8'b0;
|
||
|
`endif
|
||
|
end
|
||
|
else
|
||
|
if (wb_we_i && wb_addr_i==`UART_REG_IE)
|
||
|
if (dlab)
|
||
|
begin
|
||
|
dl[`UART_DL2] <=
|
||
|
`ifdef PRESCALER_PRESET_HARD
|
||
|
dl[`UART_DL2];
|
||
|
`else
|
||
|
wb_dat_i;
|
||
|
`endif
|
||
|
end
|
||
|
else
|
||
|
ier <= wb_dat_i[3:0]; // ier uses only 4 lsb
|
||
|
|
||
|
|
||
|
// FIFO Control Register and rx_reset, tx_reset signals
|
||
|
always @(posedge clk or posedge wb_rst_i)
|
||
|
if (wb_rst_i) begin
|
||
|
fcr <= 2'b11;
|
||
|
rx_reset <= 0;
|
||
|
tx_reset <= 0;
|
||
|
end else
|
||
|
if (wb_we_i && wb_addr_i==`UART_REG_FC) begin
|
||
|
fcr <= wb_dat_i[7:6];
|
||
|
rx_reset <= wb_dat_i[1];
|
||
|
tx_reset <= wb_dat_i[2];
|
||
|
end else begin
|
||
|
rx_reset <= 0;
|
||
|
tx_reset <= 0;
|
||
|
end
|
||
|
|
||
|
// Modem Control Register
|
||
|
always @(posedge clk or posedge wb_rst_i)
|
||
|
if (wb_rst_i)
|
||
|
mcr <= 5'b0;
|
||
|
else
|
||
|
if (wb_we_i && wb_addr_i==`UART_REG_MC)
|
||
|
mcr <= wb_dat_i[4:0];
|
||
|
|
||
|
// Scratch register
|
||
|
// Line Control Register
|
||
|
always @(posedge clk or posedge wb_rst_i)
|
||
|
if (wb_rst_i)
|
||
|
scratch <= 0; // 8n1 setting
|
||
|
else
|
||
|
if (wb_we_i && wb_addr_i==`UART_REG_SR)
|
||
|
scratch <= wb_dat_i;
|
||
|
|
||
|
// TX_FIFO or UART_DL1
|
||
|
always @(posedge clk or posedge wb_rst_i)
|
||
|
if (wb_rst_i)
|
||
|
begin
|
||
|
`ifdef PRESCALER_PRESET_HARD
|
||
|
dl[`UART_DL1] <= `PRESCALER_LOW_PRESET;
|
||
|
`else
|
||
|
dl[`UART_DL1] <= 8'b0;
|
||
|
`endif
|
||
|
tf_push <= 1'b0;
|
||
|
start_dlc <= 1'b0;
|
||
|
end
|
||
|
else
|
||
|
if (wb_we_i && wb_addr_i==`UART_REG_TR)
|
||
|
if (dlab)
|
||
|
begin
|
||
|
`ifdef PRESCALER_PRESET_HARD
|
||
|
dl[`UART_DL1] <= dl[`UART_DL1];
|
||
|
`else
|
||
|
dl[`UART_DL1] <= wb_dat_i;
|
||
|
`endif
|
||
|
start_dlc <= 1'b1; // enable DL counter
|
||
|
tf_push <= 1'b0;
|
||
|
end
|
||
|
else
|
||
|
begin
|
||
|
tf_push <= 1'b1;
|
||
|
start_dlc <= 1'b0;
|
||
|
end // else: !if(dlab)
|
||
|
else
|
||
|
begin
|
||
|
start_dlc <= 1'b0;
|
||
|
tf_push <= 1'b0;
|
||
|
end // else: !if(dlab)
|
||
|
|
||
|
// Receiver FIFO trigger level selection logic (asynchronous mux)
|
||
|
always @(fcr)
|
||
|
case (fcr[`UART_FC_TL])
|
||
|
2'b00 : trigger_level = 1;
|
||
|
2'b01 : trigger_level = 4;
|
||
|
2'b10 : trigger_level = 8;
|
||
|
2'b11 : trigger_level = 14;
|
||
|
endcase // case(fcr[`UART_FC_TL])
|
||
|
|
||
|
//
|
||
|
// STATUS REGISTERS //
|
||
|
//
|
||
|
|
||
|
// Modem Status Register
|
||
|
reg [3:0] delayed_modem_signals;
|
||
|
always @(posedge clk or posedge wb_rst_i)
|
||
|
begin
|
||
|
if (wb_rst_i)
|
||
|
begin
|
||
|
msr <= 0;
|
||
|
delayed_modem_signals[3:0] <= 0;
|
||
|
end
|
||
|
else begin
|
||
|
msr[`UART_MS_DDCD:`UART_MS_DCTS] <= msi_reset ? 4'b0 :
|
||
|
msr[`UART_MS_DDCD:`UART_MS_DCTS] | ({dcd, ri, dsr, cts} ^ delayed_modem_signals[3:0]);
|
||
|
msr[`UART_MS_CDCD:`UART_MS_CCTS] <= {dcd_c, ri_c, dsr_c, cts_c};
|
||
|
delayed_modem_signals[3:0] <= {dcd, ri, dsr, cts};
|
||
|
end
|
||
|
end
|
||
|
|
||
|
|
||
|
// Line Status Register
|
||
|
|
||
|
// activation conditions
|
||
|
assign lsr0 = (rf_count==0 && rf_push_pulse); // data in receiver fifo available set condition
|
||
|
assign lsr1 = rf_overrun; // Receiver overrun error
|
||
|
assign lsr2 = rf_data_out[1]; // parity error bit
|
||
|
assign lsr3 = rf_data_out[0]; // framing error bit
|
||
|
assign lsr4 = rf_data_out[2]; // break error in the character
|
||
|
assign lsr5 = (tf_count==5'b0 && thre_set_en); // transmitter fifo is empty
|
||
|
assign lsr6 = (tf_count==5'b0 && thre_set_en && (tstate == /*`S_IDLE */ 0)); // transmitter empty
|
||
|
assign lsr7 = rf_error_bit | rf_overrun;
|
||
|
|
||
|
// lsr bit0 (receiver data available)
|
||
|
reg lsr0_d;
|
||
|
|
||
|
always @(posedge clk or posedge wb_rst_i)
|
||
|
if (wb_rst_i) lsr0_d <= 0;
|
||
|
else lsr0_d <= lsr0;
|
||
|
|
||
|
always @(posedge clk or posedge wb_rst_i)
|
||
|
if (wb_rst_i) lsr0r <= 0;
|
||
|
else lsr0r <= (rf_count==1 && rf_pop && !rf_push_pulse || rx_reset) ? 1'b0 : // deassert condition
|
||
|
lsr0r || (lsr0 && ~lsr0_d); // set on rise of lsr0 and keep asserted until deasserted
|
||
|
|
||
|
// lsr bit 1 (receiver overrun)
|
||
|
reg lsr1_d; // delayed
|
||
|
|
||
|
always @(posedge clk or posedge wb_rst_i)
|
||
|
if (wb_rst_i) lsr1_d <= 0;
|
||
|
else lsr1_d <= lsr1;
|
||
|
|
||
|
always @(posedge clk or posedge wb_rst_i)
|
||
|
if (wb_rst_i) lsr1r <= 0;
|
||
|
else lsr1r <= lsr_mask ? 1'b0 : lsr1r || (lsr1 && ~lsr1_d); // set on rise
|
||
|
|
||
|
// lsr bit 2 (parity error)
|
||
|
reg lsr2_d; // delayed
|
||
|
|
||
|
always @(posedge clk or posedge wb_rst_i)
|
||
|
if (wb_rst_i) lsr2_d <= 0;
|
||
|
else lsr2_d <= lsr2;
|
||
|
|
||
|
always @(posedge clk or posedge wb_rst_i)
|
||
|
if (wb_rst_i) lsr2r <= 0;
|
||
|
else lsr2r <= lsr_mask ? 1'b0 : lsr2r || (lsr2 && ~lsr2_d); // set on rise
|
||
|
|
||
|
// lsr bit 3 (framing error)
|
||
|
reg lsr3_d; // delayed
|
||
|
|
||
|
always @(posedge clk or posedge wb_rst_i)
|
||
|
if (wb_rst_i) lsr3_d <= 0;
|
||
|
else lsr3_d <= lsr3;
|
||
|
|
||
|
always @(posedge clk or posedge wb_rst_i)
|
||
|
if (wb_rst_i) lsr3r <= 0;
|
||
|
else lsr3r <= lsr_mask ? 1'b0 : lsr3r || (lsr3 && ~lsr3_d); // set on rise
|
||
|
|
||
|
// lsr bit 4 (break indicator)
|
||
|
reg lsr4_d; // delayed
|
||
|
|
||
|
always @(posedge clk or posedge wb_rst_i)
|
||
|
if (wb_rst_i) lsr4_d <= 0;
|
||
|
else lsr4_d <= lsr4;
|
||
|
|
||
|
always @(posedge clk or posedge wb_rst_i)
|
||
|
if (wb_rst_i) lsr4r <= 0;
|
||
|
else lsr4r <= lsr_mask ? 1'b0 : lsr4r || (lsr4 && ~lsr4_d);
|
||
|
|
||
|
// lsr bit 5 (transmitter fifo is empty)
|
||
|
reg lsr5_d;
|
||
|
|
||
|
always @(posedge clk or posedge wb_rst_i)
|
||
|
if (wb_rst_i) lsr5_d <= 1;
|
||
|
else lsr5_d <= lsr5;
|
||
|
|
||
|
always @(posedge clk or posedge wb_rst_i)
|
||
|
if (wb_rst_i) lsr5r <= 1;
|
||
|
else lsr5r <= (fifo_write) ? 1'b0 : lsr5r || (lsr5 && ~lsr5_d);
|
||
|
|
||
|
// lsr bit 6 (transmitter empty indicator)
|
||
|
reg lsr6_d;
|
||
|
|
||
|
always @(posedge clk or posedge wb_rst_i)
|
||
|
if (wb_rst_i) lsr6_d <= 1;
|
||
|
else lsr6_d <= lsr6;
|
||
|
|
||
|
always @(posedge clk or posedge wb_rst_i)
|
||
|
if (wb_rst_i) lsr6r <= 1;
|
||
|
else lsr6r <= (fifo_write) ? 1'b0 : lsr6r || (lsr6 && ~lsr6_d);
|
||
|
|
||
|
// lsr bit 7 (error in fifo)
|
||
|
reg lsr7_d;
|
||
|
|
||
|
always @(posedge clk or posedge wb_rst_i)
|
||
|
if (wb_rst_i) lsr7_d <= 0;
|
||
|
else lsr7_d <= lsr7;
|
||
|
|
||
|
always @(posedge clk or posedge wb_rst_i)
|
||
|
if (wb_rst_i) lsr7r <= 0;
|
||
|
else lsr7r <= lsr_mask ? 1'b0 : lsr7r || (lsr7 && ~lsr7_d);
|
||
|
|
||
|
// Frequency divider
|
||
|
always @(posedge clk or posedge wb_rst_i)
|
||
|
begin
|
||
|
if (wb_rst_i)
|
||
|
dlc <= 0;
|
||
|
else
|
||
|
if (start_dlc | ~ (|dlc))
|
||
|
dlc <= dl - 16'd1; // preset counter
|
||
|
else
|
||
|
dlc <= dlc - 16'd1; // decrement counter
|
||
|
end
|
||
|
|
||
|
// Enable signal generation logic
|
||
|
always @(posedge clk or posedge wb_rst_i)
|
||
|
begin
|
||
|
if (wb_rst_i)
|
||
|
enable <= 1'b0;
|
||
|
else
|
||
|
if (|dl & ~(|dlc)) // dl>0 & dlc==0
|
||
|
enable <= 1'b1;
|
||
|
else
|
||
|
enable <= 1'b0;
|
||
|
end
|
||
|
|
||
|
// Delaying THRE status for one character cycle after a character is written to an empty fifo.
|
||
|
always @(lcr)
|
||
|
case (lcr[3:0])
|
||
|
4'b0000 : block_value = 95; // 6 bits
|
||
|
4'b0100 : block_value = 103; // 6.5 bits
|
||
|
4'b0001, 4'b1000 : block_value = 111; // 7 bits
|
||
|
4'b1100 : block_value = 119; // 7.5 bits
|
||
|
4'b0010, 4'b0101, 4'b1001 : block_value = 127; // 8 bits
|
||
|
4'b0011, 4'b0110, 4'b1010, 4'b1101 : block_value = 143; // 9 bits
|
||
|
4'b0111, 4'b1011, 4'b1110 : block_value = 159; // 10 bits
|
||
|
4'b1111 : block_value = 175; // 11 bits
|
||
|
endcase // case(lcr[3:0])
|
||
|
|
||
|
// Counting time of one character minus stop bit
|
||
|
always @(posedge clk or posedge wb_rst_i)
|
||
|
begin
|
||
|
if (wb_rst_i)
|
||
|
block_cnt <= 8'd0;
|
||
|
else
|
||
|
if(lsr5r & fifo_write) // THRE bit set & write to fifo occured
|
||
|
block_cnt <= SIM ? 8'd1 : block_value;
|
||
|
else
|
||
|
if (enable & block_cnt != 8'b0) // only work on enable times
|
||
|
block_cnt <= block_cnt - 8'd1; // decrement break counter
|
||
|
end // always of break condition detection
|
||
|
|
||
|
// Generating THRE status enable signal
|
||
|
assign thre_set_en = ~(|block_cnt);
|
||
|
|
||
|
|
||
|
//
|
||
|
// INTERRUPT LOGIC
|
||
|
//
|
||
|
|
||
|
assign rls_int = ier[`UART_IE_RLS] && (lsr[`UART_LS_OE] || lsr[`UART_LS_PE] || lsr[`UART_LS_FE] || lsr[`UART_LS_BI]);
|
||
|
assign rda_int = ier[`UART_IE_RDA] && (rf_count >= {1'b0,trigger_level});
|
||
|
assign thre_int = ier[`UART_IE_THRE] && lsr[`UART_LS_TFE];
|
||
|
assign ms_int = ier[`UART_IE_MS] && (| msr[3:0]);
|
||
|
assign ti_int = ier[`UART_IE_RDA] && (counter_t == 10'b0) && (|rf_count);
|
||
|
|
||
|
reg rls_int_d;
|
||
|
reg thre_int_d;
|
||
|
reg ms_int_d;
|
||
|
reg ti_int_d;
|
||
|
reg rda_int_d;
|
||
|
|
||
|
// delay lines
|
||
|
always @(posedge clk or posedge wb_rst_i)
|
||
|
if (wb_rst_i) rls_int_d <= 0;
|
||
|
else rls_int_d <= rls_int;
|
||
|
|
||
|
always @(posedge clk or posedge wb_rst_i)
|
||
|
if (wb_rst_i) rda_int_d <= 0;
|
||
|
else rda_int_d <= rda_int;
|
||
|
|
||
|
always @(posedge clk or posedge wb_rst_i)
|
||
|
if (wb_rst_i) thre_int_d <= 0;
|
||
|
else thre_int_d <= thre_int;
|
||
|
|
||
|
always @(posedge clk or posedge wb_rst_i)
|
||
|
if (wb_rst_i) ms_int_d <= 0;
|
||
|
else ms_int_d <= ms_int;
|
||
|
|
||
|
always @(posedge clk or posedge wb_rst_i)
|
||
|
if (wb_rst_i) ti_int_d <= 0;
|
||
|
else ti_int_d <= ti_int;
|
||
|
|
||
|
// rise detection signals
|
||
|
|
||
|
wire rls_int_rise;
|
||
|
wire thre_int_rise;
|
||
|
wire ms_int_rise;
|
||
|
wire ti_int_rise;
|
||
|
wire rda_int_rise;
|
||
|
|
||
|
assign rda_int_rise = rda_int & ~rda_int_d;
|
||
|
assign rls_int_rise = rls_int & ~rls_int_d;
|
||
|
assign thre_int_rise = thre_int & ~thre_int_d;
|
||
|
assign ms_int_rise = ms_int & ~ms_int_d;
|
||
|
assign ti_int_rise = ti_int & ~ti_int_d;
|
||
|
|
||
|
// interrupt pending flags
|
||
|
reg rls_int_pnd;
|
||
|
reg rda_int_pnd;
|
||
|
reg thre_int_pnd;
|
||
|
reg ms_int_pnd;
|
||
|
reg ti_int_pnd;
|
||
|
|
||
|
// interrupt pending flags assignments
|
||
|
always @(posedge clk or posedge wb_rst_i)
|
||
|
if (wb_rst_i) rls_int_pnd <= 0;
|
||
|
else
|
||
|
rls_int_pnd <= lsr_mask ? 1'b0 : // reset condition
|
||
|
rls_int_rise ? 1'b1 : // latch condition
|
||
|
rls_int_pnd && ier[`UART_IE_RLS]; // default operation: remove if masked
|
||
|
|
||
|
always @(posedge clk or posedge wb_rst_i)
|
||
|
if (wb_rst_i) rda_int_pnd <= 0;
|
||
|
else
|
||
|
rda_int_pnd <= ((rf_count == {1'b0,trigger_level}) && fifo_read) ? 1'b0 : // reset condition
|
||
|
rda_int_rise ? 1'b1 : // latch condition
|
||
|
rda_int_pnd && ier[`UART_IE_RDA]; // default operation: remove if masked
|
||
|
|
||
|
always @(posedge clk or posedge wb_rst_i)
|
||
|
if (wb_rst_i) thre_int_pnd <= 0;
|
||
|
else
|
||
|
thre_int_pnd <= fifo_write || (iir_read & ~iir[`UART_II_IP] & iir[`UART_II_II] == `UART_II_THRE)? 1'b0 :
|
||
|
thre_int_rise ? 1'b1 :
|
||
|
thre_int_pnd && ier[`UART_IE_THRE];
|
||
|
|
||
|
always @(posedge clk or posedge wb_rst_i)
|
||
|
if (wb_rst_i) ms_int_pnd <= 0;
|
||
|
else
|
||
|
ms_int_pnd <= msr_read ? 1'b0 :
|
||
|
ms_int_rise ? 1'b1 :
|
||
|
ms_int_pnd && ier[`UART_IE_MS];
|
||
|
|
||
|
always @(posedge clk or posedge wb_rst_i)
|
||
|
if (wb_rst_i) ti_int_pnd <= 0;
|
||
|
else
|
||
|
ti_int_pnd <= fifo_read ? 1'b0 :
|
||
|
ti_int_rise ? 1'b1 :
|
||
|
ti_int_pnd && ier[`UART_IE_RDA];
|
||
|
// end of pending flags
|
||
|
|
||
|
// INT_O logic
|
||
|
always @(posedge clk or posedge wb_rst_i)
|
||
|
begin
|
||
|
if (wb_rst_i)
|
||
|
int_o <= 1'b0;
|
||
|
else
|
||
|
int_o <=
|
||
|
rls_int_pnd ? ~lsr_mask :
|
||
|
rda_int_pnd ? 1'b1 :
|
||
|
ti_int_pnd ? ~fifo_read :
|
||
|
thre_int_pnd ? !(fifo_write & iir_read) :
|
||
|
ms_int_pnd ? ~msr_read :
|
||
|
1'd0; // if no interrupt are pending
|
||
|
end
|
||
|
|
||
|
|
||
|
// Interrupt Identification register
|
||
|
always @(posedge clk or posedge wb_rst_i)
|
||
|
begin
|
||
|
if (wb_rst_i)
|
||
|
iir <= 1;
|
||
|
else
|
||
|
if (rls_int_pnd) // interrupt is pending
|
||
|
begin
|
||
|
iir[`UART_II_II] <= `UART_II_RLS; // set identification register to correct value
|
||
|
iir[`UART_II_IP] <= 1'b0; // and clear the IIR bit 0 (interrupt pending)
|
||
|
end else // the sequence of conditions determines priority of interrupt identification
|
||
|
if (rda_int)
|
||
|
begin
|
||
|
iir[`UART_II_II] <= `UART_II_RDA;
|
||
|
iir[`UART_II_IP] <= 1'b0;
|
||
|
end
|
||
|
else if (ti_int_pnd)
|
||
|
begin
|
||
|
iir[`UART_II_II] <= `UART_II_TI;
|
||
|
iir[`UART_II_IP] <= 1'b0;
|
||
|
end
|
||
|
else if (thre_int_pnd)
|
||
|
begin
|
||
|
iir[`UART_II_II] <= `UART_II_THRE;
|
||
|
iir[`UART_II_IP] <= 1'b0;
|
||
|
end
|
||
|
else if (ms_int_pnd)
|
||
|
begin
|
||
|
iir[`UART_II_II] <= `UART_II_MS;
|
||
|
iir[`UART_II_IP] <= 1'b0;
|
||
|
end else // no interrupt is pending
|
||
|
begin
|
||
|
iir[`UART_II_II] <= 0;
|
||
|
iir[`UART_II_IP] <= 1'b1;
|
||
|
end
|
||
|
end
|
||
|
|
||
|
endmodule
|