OpenCores
URL https://opencores.org/ocsvn/openmsp430/openmsp430/trunk

Subversion Repositories openmsp430

[/] [openmsp430/] [trunk/] [core/] [rtl/] [verilog/] [omsp_dbg_uart.v] - Blame information for rev 111

Go to most recent revision | Details | Compare with Previous | View Log

Line No. Rev Author Line
1 2 olivier.gi
//----------------------------------------------------------------------------
2
// Copyright (C) 2001 Authors
3
//
4
// This source file may be used and distributed without restriction provided
5
// that this copyright statement is not removed from the file and that any
6
// derivative work contains the original copyright notice and the associated
7
// disclaimer.
8
//
9
// This source file is free software; you can redistribute it and/or modify
10
// it under the terms of the GNU Lesser General Public License as published
11
// by the Free Software Foundation; either version 2.1 of the License, or
12
// (at your option) any later version.
13
//
14
// This source is distributed in the hope that it will be useful, but WITHOUT
15
// ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or
16
// FITNESS FOR A PARTICULAR PURPOSE. See the GNU Lesser General Public
17
// License for more details.
18
//
19
// You should have received a copy of the GNU Lesser General Public License
20
// along with this source; if not, write to the Free Software Foundation,
21
// Inc., 51 Franklin Street, Fifth Floor, Boston, MA  02110-1301  USA
22
//
23
//----------------------------------------------------------------------------
24
//
25 34 olivier.gi
// *File Name: omsp_dbg_uart.v
26 2 olivier.gi
// 
27
// *Module Description:
28
//                       Debug UART communication interface (8N1, Half-duplex)
29
//
30
// *Author(s):
31
//              - Olivier Girard,    olgirard@gmail.com
32
//
33
//----------------------------------------------------------------------------
34 17 olivier.gi
// $Rev: 111 $
35
// $LastChangedBy: olivier.girard $
36
// $LastChangedDate: 2011-05-20 22:39:02 +0200 (Fri, 20 May 2011) $
37
//----------------------------------------------------------------------------
38 103 olivier.gi
`ifdef OMSP_NO_INCLUDE
39
`else
40 23 olivier.gi
`include "openMSP430_defines.v"
41 103 olivier.gi
`endif
42 2 olivier.gi
 
43 34 olivier.gi
module  omsp_dbg_uart (
44 2 olivier.gi
 
45
// OUTPUTs
46
    dbg_addr,                       // Debug register address
47
    dbg_din,                        // Debug register data input
48
    dbg_rd,                         // Debug register data read
49
    dbg_uart_txd,                   // Debug interface: UART TXD
50
    dbg_wr,                         // Debug register data write
51
 
52
// INPUTs
53 106 olivier.gi
    dbg_clk,                        // Debug unit clock
54 2 olivier.gi
    dbg_dout,                       // Debug register data output
55
    dbg_rd_rdy,                     // Debug register data is ready for read
56 106 olivier.gi
    dbg_rst,                        // Debug unit reset
57 2 olivier.gi
    dbg_uart_rxd,                   // Debug interface: UART RXD
58
    mem_burst,                      // Burst on going
59
    mem_burst_end,                  // End TX/RX burst
60
    mem_burst_rd,                   // Start TX burst
61
    mem_burst_wr,                   // Start RX burst
62 106 olivier.gi
    mem_bw                          // Burst byte width
63 2 olivier.gi
);
64
 
65
// OUTPUTs
66
//=========
67
output        [5:0] dbg_addr;       // Debug register address
68
output       [15:0] dbg_din;        // Debug register data input
69
output              dbg_rd;         // Debug register data read
70
output              dbg_uart_txd;   // Debug interface: UART TXD
71
output              dbg_wr;         // Debug register data write
72
 
73
// INPUTs
74
//=========
75 106 olivier.gi
input               dbg_clk;        // Debug unit clock
76 2 olivier.gi
input        [15:0] dbg_dout;       // Debug register data output
77
input               dbg_rd_rdy;     // Debug register data is ready for read
78 106 olivier.gi
input               dbg_rst;        // Debug unit reset
79 2 olivier.gi
input               dbg_uart_rxd;   // Debug interface: UART RXD
80
input               mem_burst;      // Burst on going
81
input               mem_burst_end;  // End TX/RX burst
82
input               mem_burst_rd;   // Start TX burst
83
input               mem_burst_wr;   // Start RX burst
84
input               mem_bw;         // Burst byte width
85
 
86
 
87
//=============================================================================
88
// 1)  UART RECEIVE LINE SYNCHRONIZTION & FILTERING
89
//=============================================================================
90
 
91 111 olivier.gi
// Synchronize RXD input
92 2 olivier.gi
//--------------------------------
93 111 olivier.gi
`ifdef SYNC_DBG_UART_RXD
94
 
95
    wire uart_rxd_n;
96
 
97
    omsp_sync_cell sync_cell_uart_rxd (
98
        .data_out (uart_rxd_n),
99
        .clk      (dbg_clk),
100
        .data_in  (~dbg_uart_rxd),
101
        .rst      (dbg_rst)
102
    );
103
    wire uart_rxd = ~uart_rxd_n;
104
`else
105
    wire uart_rxd = dbg_uart_rxd;
106
`endif
107
 
108
// RXD input buffer
109
//--------------------------------
110
reg  [1:0] rxd_buf;
111 106 olivier.gi
always @ (posedge dbg_clk or posedge dbg_rst)
112 111 olivier.gi
  if (dbg_rst) rxd_buf <=  2'h3;
113
  else         rxd_buf <=  {rxd_buf[0], uart_rxd};
114 2 olivier.gi
 
115
// Majority decision
116
//------------------------
117
reg        rxd_maj;
118
 
119 111 olivier.gi
wire [1:0] rxd_maj_cnt = {1'b0, uart_rxd}   +
120
                         {1'b0, rxd_buf[0]} +
121
                         {1'b0, rxd_buf[1]};
122 2 olivier.gi
wire       rxd_maj_nxt = (rxd_maj_cnt>=2'b10);
123
 
124 106 olivier.gi
always @ (posedge dbg_clk or posedge dbg_rst)
125
  if (dbg_rst) rxd_maj <=  1'b0;
126
  else         rxd_maj <=  rxd_maj_nxt;
127 2 olivier.gi
 
128
wire rxd_s  =  rxd_maj;
129
wire rxd_fe =  rxd_maj & ~rxd_maj_nxt;
130
wire rxd_re = ~rxd_maj &  rxd_maj_nxt;
131
 
132
 
133
//=============================================================================
134
// 2)  UART STATE MACHINE
135
//=============================================================================
136
 
137
// Receive state
138
//------------------------
139
reg  [2:0] uart_state;
140
reg  [2:0] uart_state_nxt;
141
 
142
wire       sync_done;
143
wire       xfer_done;
144
reg [19:0] xfer_buf;
145
 
146
// State machine definition
147
parameter  RX_SYNC  = 3'h0;
148
parameter  RX_CMD   = 3'h1;
149
parameter  RX_DATA1 = 3'h2;
150
parameter  RX_DATA2 = 3'h3;
151
parameter  TX_DATA1 = 3'h4;
152
parameter  TX_DATA2 = 3'h5;
153
 
154
// State transition
155
always @(uart_state or xfer_buf or mem_burst or mem_burst_wr or mem_burst_rd or mem_burst_end or mem_bw)
156
  case (uart_state)
157
    RX_SYNC  : uart_state_nxt =  RX_CMD;
158
    RX_CMD   : uart_state_nxt =  mem_burst_wr                ?
159
                                (mem_bw                      ? RX_DATA2 : RX_DATA1) :
160
                                 mem_burst_rd                ?
161
                                (mem_bw                      ? TX_DATA2 : TX_DATA1) :
162
                                (xfer_buf[`DBG_UART_WR]      ?
163
                                (xfer_buf[`DBG_UART_BW]      ? RX_DATA2 : RX_DATA1) :
164
                                (xfer_buf[`DBG_UART_BW]      ? TX_DATA2 : TX_DATA1));
165
    RX_DATA1 : uart_state_nxt =  RX_DATA2;
166
    RX_DATA2 : uart_state_nxt = (mem_burst & ~mem_burst_end) ?
167
                                (mem_bw                      ? RX_DATA2 : RX_DATA1) :
168
                                 RX_CMD;
169
    TX_DATA1 : uart_state_nxt =  TX_DATA2;
170
    TX_DATA2 : uart_state_nxt = (mem_burst & ~mem_burst_end) ?
171
                                (mem_bw                      ? TX_DATA2 : TX_DATA1) :
172
                                 RX_CMD;
173
    default  : uart_state_nxt =  RX_CMD;
174
  endcase
175
 
176
// State machine
177 106 olivier.gi
always @(posedge dbg_clk or posedge dbg_rst)
178
  if (dbg_rst)                          uart_state <= RX_SYNC;
179 2 olivier.gi
  else if (xfer_done    | sync_done |
180
           mem_burst_wr | mem_burst_rd) uart_state <= uart_state_nxt;
181
 
182
// Utility signals
183
wire cmd_valid = (uart_state==RX_CMD) & xfer_done;
184
wire tx_active = (uart_state==TX_DATA1) | (uart_state==TX_DATA2);
185
 
186
 
187
//=============================================================================
188
// 3)  UART SYNCHRONIZATION
189
//=============================================================================
190 106 olivier.gi
// After DBG_RST, the host needs to fist send a synchronization character (0x80)
191 2 olivier.gi
// If this feature doesn't work properly, it is possible to disable it by
192
// commenting the DBG_UART_AUTO_SYNC define in the openMSP430.inc file.
193
 
194
reg        sync_busy;
195 106 olivier.gi
always @ (posedge dbg_clk or posedge dbg_rst)
196
  if (dbg_rst)                             sync_busy <=  1'b0;
197 2 olivier.gi
  else if ((uart_state==RX_SYNC) & rxd_fe) sync_busy <=  1'b1;
198
  else if ((uart_state==RX_SYNC) & rxd_re) sync_busy <=  1'b0;
199
 
200
assign sync_done =  (uart_state==RX_SYNC) & rxd_re & sync_busy;
201
 
202
`ifdef DBG_UART_AUTO_SYNC
203
 
204 74 olivier.gi
reg [`DBG_UART_XFER_CNT_W+2:0] sync_cnt;
205 106 olivier.gi
always @ (posedge dbg_clk or posedge dbg_rst)
206
  if (dbg_rst)        sync_cnt <=  {{`DBG_UART_XFER_CNT_W{1'b1}}, 3'b000};
207 74 olivier.gi
  else if (sync_busy) sync_cnt <=  sync_cnt+{{`DBG_UART_XFER_CNT_W+2{1'b0}}, 1'b1};
208 2 olivier.gi
 
209 74 olivier.gi
wire [`DBG_UART_XFER_CNT_W-1:0] bit_cnt_max = sync_cnt[`DBG_UART_XFER_CNT_W+2:3];
210 2 olivier.gi
`else
211 74 olivier.gi
wire [`DBG_UART_XFER_CNT_W-1:0] bit_cnt_max = `DBG_UART_CNT;
212 2 olivier.gi
`endif
213
 
214
 
215
//=============================================================================
216
// 4)  UART RECEIVE / TRANSMIT
217
//=============================================================================
218
 
219
// Transfer counter
220
//------------------------
221 74 olivier.gi
reg                      [3:0] xfer_bit;
222
reg [`DBG_UART_XFER_CNT_W-1:0] xfer_cnt;
223 2 olivier.gi
 
224
wire       txd_start    = dbg_rd_rdy | (xfer_done & (uart_state==TX_DATA1));
225
wire       rxd_start    = (xfer_bit==4'h0) & rxd_fe & ((uart_state!=RX_SYNC));
226 74 olivier.gi
wire       xfer_bit_inc = (xfer_bit!=4'h0) & (xfer_cnt=={`DBG_UART_XFER_CNT_W{1'b0}});
227 2 olivier.gi
assign     xfer_done    = (xfer_bit==4'hb);
228
 
229 106 olivier.gi
always @ (posedge dbg_clk or posedge dbg_rst)
230
  if (dbg_rst)                       xfer_bit <=  4'h0;
231 2 olivier.gi
  else if (txd_start | rxd_start)    xfer_bit <=  4'h1;
232
  else if (xfer_done)                xfer_bit <=  4'h0;
233
  else if (xfer_bit_inc)             xfer_bit <=  xfer_bit+4'h1;
234
 
235 106 olivier.gi
always @ (posedge dbg_clk or posedge dbg_rst)
236
  if (dbg_rst)                       xfer_cnt <=  {`DBG_UART_XFER_CNT_W{1'b0}};
237 74 olivier.gi
  else if (rxd_start)                xfer_cnt <=  {1'b0, bit_cnt_max[`DBG_UART_XFER_CNT_W-1:1]};
238 2 olivier.gi
  else if (txd_start | xfer_bit_inc) xfer_cnt <=  bit_cnt_max;
239 74 olivier.gi
  else                               xfer_cnt <=  xfer_cnt+{`DBG_UART_XFER_CNT_W{1'b1}};
240 2 olivier.gi
 
241
 
242
// Receive/Transmit buffer
243
//-------------------------
244
wire [19:0] xfer_buf_nxt =  {rxd_s, xfer_buf[19:1]};
245
 
246 106 olivier.gi
always @ (posedge dbg_clk or posedge dbg_rst)
247
  if (dbg_rst)           xfer_buf <=  20'h00000;
248 2 olivier.gi
  else if (dbg_rd_rdy)   xfer_buf <=  {1'b1, dbg_dout[15:8], 2'b01, dbg_dout[7:0], 1'b0};
249
  else if (xfer_bit_inc) xfer_buf <=  xfer_buf_nxt;
250
 
251
 
252
// Generate TXD output
253
//------------------------
254
reg dbg_uart_txd;
255
 
256 106 olivier.gi
always @ (posedge dbg_clk or posedge dbg_rst)
257
  if (dbg_rst)                       dbg_uart_txd <=  1'b1;
258 2 olivier.gi
  else if (xfer_bit_inc & tx_active) dbg_uart_txd <=  xfer_buf[0];
259
 
260
 
261
//=============================================================================
262
// 5) INTERFACE TO DEBUG REGISTERS
263
//=============================================================================
264
 
265
reg [5:0] dbg_addr;
266 106 olivier.gi
 always @ (posedge dbg_clk or posedge dbg_rst)
267
  if (dbg_rst)        dbg_addr <=  6'h00;
268 2 olivier.gi
  else if (cmd_valid) dbg_addr <=  xfer_buf[`DBG_UART_ADDR];
269
 
270
reg       dbg_bw;
271 106 olivier.gi
always @ (posedge dbg_clk or posedge dbg_rst)
272
  if (dbg_rst)        dbg_bw   <=  1'b0;
273 2 olivier.gi
  else if (cmd_valid) dbg_bw   <=  xfer_buf[`DBG_UART_BW];
274
 
275
wire        dbg_din_bw =  mem_burst  ? mem_bw : dbg_bw;
276
 
277
wire [15:0] dbg_din    =  dbg_din_bw ? {8'h00,           xfer_buf[18:11]} :
278
                                       {xfer_buf[18:11], xfer_buf[8:1]};
279
wire        dbg_wr     = (xfer_done & (uart_state==RX_DATA2));
280
wire        dbg_rd     = mem_burst ? (xfer_done & (uart_state==TX_DATA2)) :
281
                                     (cmd_valid & ~xfer_buf[`DBG_UART_WR]) | mem_burst_rd;
282
 
283
 
284
 
285 34 olivier.gi
endmodule // omsp_dbg_uart
286 2 olivier.gi
 
287 103 olivier.gi
`ifdef OMSP_NO_INCLUDE
288
`else
289 33 olivier.gi
`include "openMSP430_undefines.v"
290 103 olivier.gi
`endif

powered by: WebSVN 2.1.0

© copyright 1999-2024 OpenCores.org, equivalent to Oliscience, all rights reserved. OpenCores®, registered trademark.