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

Subversion Repositories openmsp430

[/] [openmsp430/] [trunk/] [fpga/] [actel_m1a3pl_dev_kit/] [rtl/] [verilog/] [openmsp430/] [periph/] [omsp_gpio.v] - Blame information for rev 111

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

Line No. Rev Author Line
1 80 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
// *File Name: omsp_gpio.v
26
// 
27
// *Module Description:
28
//                       Digital I/O interface
29
//
30
// *Author(s):
31
//              - Olivier Girard,    olgirard@gmail.com
32
//
33
//----------------------------------------------------------------------------
34 111 olivier.gi
// $Rev: 103 $
35 80 olivier.gi
// $LastChangedBy: olivier.girard $
36 111 olivier.gi
// $LastChangedDate: 2011-03-05 15:44:48 +0100 (Sat, 05 Mar 2011) $
37 80 olivier.gi
//----------------------------------------------------------------------------
38
 
39
module  omsp_gpio (
40
 
41
// OUTPUTs
42
    irq_port1,                      // Port 1 interrupt
43
    irq_port2,                      // Port 2 interrupt
44
    p1_dout,                        // Port 1 data output
45
    p1_dout_en,                     // Port 1 data output enable
46
    p1_sel,                         // Port 1 function select
47
    p2_dout,                        // Port 2 data output
48
    p2_dout_en,                     // Port 2 data output enable
49
    p2_sel,                         // Port 2 function select
50
    p3_dout,                        // Port 3 data output
51
    p3_dout_en,                     // Port 3 data output enable
52
    p3_sel,                         // Port 3 function select
53
    p4_dout,                        // Port 4 data output
54
    p4_dout_en,                     // Port 4 data output enable
55
    p4_sel,                         // Port 4 function select
56
    p5_dout,                        // Port 5 data output
57
    p5_dout_en,                     // Port 5 data output enable
58
    p5_sel,                         // Port 5 function select
59
    p6_dout,                        // Port 6 data output
60
    p6_dout_en,                     // Port 6 data output enable
61
    p6_sel,                         // Port 6 function select
62
    per_dout,                       // Peripheral data output
63
 
64
// INPUTs
65
    mclk,                           // Main system clock
66
    p1_din,                         // Port 1 data input
67
    p2_din,                         // Port 2 data input
68
    p3_din,                         // Port 3 data input
69
    p4_din,                         // Port 4 data input
70
    p5_din,                         // Port 5 data input
71
    p6_din,                         // Port 6 data input
72
    per_addr,                       // Peripheral address
73
    per_din,                        // Peripheral data input
74
    per_en,                         // Peripheral enable (high active)
75 107 olivier.gi
    per_we,                         // Peripheral write enable (high active)
76 111 olivier.gi
    puc_rst                         // Main system reset
77 80 olivier.gi
);
78
 
79
// PARAMETERs
80
//============
81
parameter           P1_EN = 1'b1;   // Enable Port 1
82
parameter           P2_EN = 1'b1;   // Enable Port 2
83
parameter           P3_EN = 1'b0;   // Enable Port 3
84
parameter           P4_EN = 1'b0;   // Enable Port 4
85
parameter           P5_EN = 1'b0;   // Enable Port 5
86
parameter           P6_EN = 1'b0;   // Enable Port 6
87
 
88
 
89
// OUTPUTs
90
//=========
91
output              irq_port1;      // Port 1 interrupt
92
output              irq_port2;      // Port 2 interrupt
93
output        [7:0] p1_dout;        // Port 1 data output
94
output        [7:0] p1_dout_en;     // Port 1 data output enable
95
output        [7:0] p1_sel;         // Port 1 function select
96
output        [7:0] p2_dout;        // Port 2 data output
97
output        [7:0] p2_dout_en;     // Port 2 data output enable
98
output        [7:0] p2_sel;         // Port 2 function select
99
output        [7:0] p3_dout;        // Port 3 data output
100
output        [7:0] p3_dout_en;     // Port 3 data output enable
101
output        [7:0] p3_sel;         // Port 3 function select
102
output        [7:0] p4_dout;        // Port 4 data output
103
output        [7:0] p4_dout_en;     // Port 4 data output enable
104
output        [7:0] p4_sel;         // Port 4 function select
105
output        [7:0] p5_dout;        // Port 5 data output
106
output        [7:0] p5_dout_en;     // Port 5 data output enable
107
output        [7:0] p5_sel;         // Port 5 function select
108
output        [7:0] p6_dout;        // Port 6 data output
109
output        [7:0] p6_dout_en;     // Port 6 data output enable
110
output        [7:0] p6_sel;         // Port 6 function select
111
output       [15:0] per_dout;       // Peripheral data output
112
 
113
// INPUTs
114
//=========
115
input               mclk;           // Main system clock
116
input         [7:0] p1_din;         // Port 1 data input
117
input         [7:0] p2_din;         // Port 2 data input
118
input         [7:0] p3_din;         // Port 3 data input
119
input         [7:0] p4_din;         // Port 4 data input
120
input         [7:0] p5_din;         // Port 5 data input
121
input         [7:0] p6_din;         // Port 6 data input
122 111 olivier.gi
input        [13:0] per_addr;       // Peripheral address
123 80 olivier.gi
input        [15:0] per_din;        // Peripheral data input
124
input               per_en;         // Peripheral enable (high active)
125 107 olivier.gi
input         [1:0] per_we;         // Peripheral write enable (high active)
126 111 olivier.gi
input               puc_rst;        // Main system reset
127 80 olivier.gi
 
128
 
129
//=============================================================================
130
// 1)  PARAMETER DECLARATION
131
//=============================================================================
132
 
133
// Masks
134 111 olivier.gi
parameter              P1_EN_MSK   = {8{P1_EN[0]}};
135
parameter              P2_EN_MSK   = {8{P2_EN[0]}};
136
parameter              P3_EN_MSK   = {8{P3_EN[0]}};
137
parameter              P4_EN_MSK   = {8{P4_EN[0]}};
138
parameter              P5_EN_MSK   = {8{P5_EN[0]}};
139
parameter              P6_EN_MSK   = {8{P6_EN[0]}};
140 80 olivier.gi
 
141 111 olivier.gi
// Register base address (must be aligned to decoder bit width)
142
parameter       [14:0] BASE_ADDR   = 15'h0000;
143 80 olivier.gi
 
144 111 olivier.gi
// Decoder bit width (defines how many bits are considered for address decoding)
145
parameter              DEC_WD      =  6;
146
 
147
// Register addresses offset
148
parameter [DEC_WD-1:0] P1IN        = 'h20,                    // Port 1
149
                       P1OUT       = 'h21,
150
                       P1DIR       = 'h22,
151
                       P1IFG       = 'h23,
152
                       P1IES       = 'h24,
153
                       P1IE        = 'h25,
154
                       P1SEL       = 'h26,
155
                       P2IN        = 'h28,                    // Port 2
156
                       P2OUT       = 'h29,
157
                       P2DIR       = 'h2A,
158
                       P2IFG       = 'h2B,
159
                       P2IES       = 'h2C,
160
                       P2IE        = 'h2D,
161
                       P2SEL       = 'h2E,
162
                       P3IN        = 'h18,                    // Port 3
163
                       P3OUT       = 'h19,
164
                       P3DIR       = 'h1A,
165
                       P3SEL       = 'h1B,
166
                       P4IN        = 'h1C,                    // Port 4
167
                       P4OUT       = 'h1D,
168
                       P4DIR       = 'h1E,
169
                       P4SEL       = 'h1F,
170
                       P5IN        = 'h30,                    // Port 5
171
                       P5OUT       = 'h31,
172
                       P5DIR       = 'h32,
173
                       P5SEL       = 'h33,
174
                       P6IN        = 'h34,                    // Port 6
175
                       P6OUT       = 'h35,
176
                       P6DIR       = 'h36,
177
                       P6SEL       = 'h37;
178
 
179
// Register one-hot decoder utilities
180
parameter              DEC_SZ      =  2**DEC_WD;
181
parameter [DEC_SZ-1:0] BASE_REG    =  {{DEC_SZ-1{1'b0}}, 1'b1};
182
 
183 80 olivier.gi
// Register one-hot decoder
184 111 olivier.gi
parameter [DEC_SZ-1:0] P1IN_D      =  (BASE_REG << P1IN),     // Port 1
185
                       P1OUT_D     =  (BASE_REG << P1OUT),
186
                       P1DIR_D     =  (BASE_REG << P1DIR),
187
                       P1IFG_D     =  (BASE_REG << P1IFG),
188
                       P1IES_D     =  (BASE_REG << P1IES),
189
                       P1IE_D      =  (BASE_REG << P1IE),
190
                       P1SEL_D     =  (BASE_REG << P1SEL),
191
                       P2IN_D      =  (BASE_REG << P2IN),     // Port 2
192
                       P2OUT_D     =  (BASE_REG << P2OUT),
193
                       P2DIR_D     =  (BASE_REG << P2DIR),
194
                       P2IFG_D     =  (BASE_REG << P2IFG),
195
                       P2IES_D     =  (BASE_REG << P2IES),
196
                       P2IE_D      =  (BASE_REG << P2IE),
197
                       P2SEL_D     =  (BASE_REG << P2SEL),
198
                       P3IN_D      =  (BASE_REG << P3IN),     // Port 3
199
                       P3OUT_D     =  (BASE_REG << P3OUT),
200
                       P3DIR_D     =  (BASE_REG << P3DIR),
201
                       P3SEL_D     =  (BASE_REG << P3SEL),
202
                       P4IN_D      =  (BASE_REG << P4IN),     // Port 4
203
                       P4OUT_D     =  (BASE_REG << P4OUT),
204
                       P4DIR_D     =  (BASE_REG << P4DIR),
205
                       P4SEL_D     =  (BASE_REG << P4SEL),
206
                       P5IN_D      =  (BASE_REG << P5IN),     // Port 5
207
                       P5OUT_D     =  (BASE_REG << P5OUT),
208
                       P5DIR_D     =  (BASE_REG << P5DIR),
209
                       P5SEL_D     =  (BASE_REG << P5SEL),
210
                       P6IN_D      =  (BASE_REG << P6IN),     // Port 6
211
                       P6OUT_D     =  (BASE_REG << P6OUT),
212
                       P6DIR_D     =  (BASE_REG << P6DIR),
213
                       P6SEL_D     =  (BASE_REG << P6SEL);
214 80 olivier.gi
 
215
 
216
//============================================================================
217
// 2)  REGISTER DECODER
218
//============================================================================
219
 
220 111 olivier.gi
// Local register selection
221
wire              reg_sel      =  per_en & (per_addr[13:DEC_WD-1]==BASE_ADDR[14:DEC_WD]);
222
 
223
// Register local address
224
wire [DEC_WD-1:0] reg_addr     =  {1'b0, per_addr[DEC_WD-2:0]};
225
 
226 80 olivier.gi
// Register address decode
227 111 olivier.gi
wire [DEC_SZ-1:0] reg_dec      =  (P1IN_D   &  {DEC_SZ{(reg_addr==(P1IN  >>1))  &  P1_EN[0]}})  |
228
                                  (P1OUT_D  &  {DEC_SZ{(reg_addr==(P1OUT >>1))  &  P1_EN[0]}})  |
229
                                  (P1DIR_D  &  {DEC_SZ{(reg_addr==(P1DIR >>1))  &  P1_EN[0]}})  |
230
                                  (P1IFG_D  &  {DEC_SZ{(reg_addr==(P1IFG >>1))  &  P1_EN[0]}})  |
231
                                  (P1IES_D  &  {DEC_SZ{(reg_addr==(P1IES >>1))  &  P1_EN[0]}})  |
232
                                  (P1IE_D   &  {DEC_SZ{(reg_addr==(P1IE  >>1))  &  P1_EN[0]}})  |
233
                                  (P1SEL_D  &  {DEC_SZ{(reg_addr==(P1SEL >>1))  &  P1_EN[0]}})  |
234
                                  (P2IN_D   &  {DEC_SZ{(reg_addr==(P2IN  >>1))  &  P2_EN[0]}})  |
235
                                  (P2OUT_D  &  {DEC_SZ{(reg_addr==(P2OUT >>1))  &  P2_EN[0]}})  |
236
                                  (P2DIR_D  &  {DEC_SZ{(reg_addr==(P2DIR >>1))  &  P2_EN[0]}})  |
237
                                  (P2IFG_D  &  {DEC_SZ{(reg_addr==(P2IFG >>1))  &  P2_EN[0]}})  |
238
                                  (P2IES_D  &  {DEC_SZ{(reg_addr==(P2IES >>1))  &  P2_EN[0]}})  |
239
                                  (P2IE_D   &  {DEC_SZ{(reg_addr==(P2IE  >>1))  &  P2_EN[0]}})  |
240
                                  (P2SEL_D  &  {DEC_SZ{(reg_addr==(P2SEL >>1))  &  P2_EN[0]}})  |
241
                                  (P3IN_D   &  {DEC_SZ{(reg_addr==(P3IN  >>1))  &  P3_EN[0]}})  |
242
                                  (P3OUT_D  &  {DEC_SZ{(reg_addr==(P3OUT >>1))  &  P3_EN[0]}})  |
243
                                  (P3DIR_D  &  {DEC_SZ{(reg_addr==(P3DIR >>1))  &  P3_EN[0]}})  |
244
                                  (P3SEL_D  &  {DEC_SZ{(reg_addr==(P3SEL >>1))  &  P3_EN[0]}})  |
245
                                  (P4IN_D   &  {DEC_SZ{(reg_addr==(P4IN  >>1))  &  P4_EN[0]}})  |
246
                                  (P4OUT_D  &  {DEC_SZ{(reg_addr==(P4OUT >>1))  &  P4_EN[0]}})  |
247
                                  (P4DIR_D  &  {DEC_SZ{(reg_addr==(P4DIR >>1))  &  P4_EN[0]}})  |
248
                                  (P4SEL_D  &  {DEC_SZ{(reg_addr==(P4SEL >>1))  &  P4_EN[0]}})  |
249
                                  (P5IN_D   &  {DEC_SZ{(reg_addr==(P5IN  >>1))  &  P5_EN[0]}})  |
250
                                  (P5OUT_D  &  {DEC_SZ{(reg_addr==(P5OUT >>1))  &  P5_EN[0]}})  |
251
                                  (P5DIR_D  &  {DEC_SZ{(reg_addr==(P5DIR >>1))  &  P5_EN[0]}})  |
252
                                  (P5SEL_D  &  {DEC_SZ{(reg_addr==(P5SEL >>1))  &  P5_EN[0]}})  |
253
                                  (P6IN_D   &  {DEC_SZ{(reg_addr==(P6IN  >>1))  &  P6_EN[0]}})  |
254
                                  (P6OUT_D  &  {DEC_SZ{(reg_addr==(P6OUT >>1))  &  P6_EN[0]}})  |
255
                                  (P6DIR_D  &  {DEC_SZ{(reg_addr==(P6DIR >>1))  &  P6_EN[0]}})  |
256
                                  (P6SEL_D  &  {DEC_SZ{(reg_addr==(P6SEL >>1))  &  P6_EN[0]}});
257 80 olivier.gi
 
258
// Read/Write probes
259 111 olivier.gi
wire              reg_lo_write =  per_we[0] & reg_sel;
260
wire              reg_hi_write =  per_we[1] & reg_sel;
261
wire              reg_read     = ~|per_we   & reg_sel;
262 80 olivier.gi
 
263
// Read/Write vectors
264 111 olivier.gi
wire [DEC_SZ-1:0] reg_hi_wr    = reg_dec & {DEC_SZ{reg_hi_write}};
265
wire [DEC_SZ-1:0] reg_lo_wr    = reg_dec & {DEC_SZ{reg_lo_write}};
266
wire [DEC_SZ-1:0] reg_rd       = reg_dec & {DEC_SZ{reg_read}};
267 80 olivier.gi
 
268
//============================================================================
269
// 3) REGISTERS
270
//============================================================================
271
 
272
// P1IN Register
273
//---------------
274 111 olivier.gi
wire [7:0] p1in;
275 80 olivier.gi
 
276 111 olivier.gi
omsp_sync_cell sync_cell_p1in_0 (.data_out(p1in[0]), .clk(mclk), .data_in(p1_din[0] & P1_EN[0]), .rst(puc_rst));
277
omsp_sync_cell sync_cell_p1in_1 (.data_out(p1in[1]), .clk(mclk), .data_in(p1_din[1] & P1_EN[0]), .rst(puc_rst));
278
omsp_sync_cell sync_cell_p1in_2 (.data_out(p1in[2]), .clk(mclk), .data_in(p1_din[2] & P1_EN[0]), .rst(puc_rst));
279
omsp_sync_cell sync_cell_p1in_3 (.data_out(p1in[3]), .clk(mclk), .data_in(p1_din[3] & P1_EN[0]), .rst(puc_rst));
280
omsp_sync_cell sync_cell_p1in_4 (.data_out(p1in[4]), .clk(mclk), .data_in(p1_din[4] & P1_EN[0]), .rst(puc_rst));
281
omsp_sync_cell sync_cell_p1in_5 (.data_out(p1in[5]), .clk(mclk), .data_in(p1_din[5] & P1_EN[0]), .rst(puc_rst));
282
omsp_sync_cell sync_cell_p1in_6 (.data_out(p1in[6]), .clk(mclk), .data_in(p1_din[6] & P1_EN[0]), .rst(puc_rst));
283
omsp_sync_cell sync_cell_p1in_7 (.data_out(p1in[7]), .clk(mclk), .data_in(p1_din[7] & P1_EN[0]), .rst(puc_rst));
284 80 olivier.gi
 
285
 
286
// P1OUT Register
287
//----------------
288
reg  [7:0] p1out;
289
 
290 111 olivier.gi
wire       p1out_wr  = P1OUT[0] ? reg_hi_wr[P1OUT] : reg_lo_wr[P1OUT];
291
wire [7:0] p1out_nxt = P1OUT[0] ? per_din[15:8]    : per_din[7:0];
292 80 olivier.gi
 
293 111 olivier.gi
always @ (posedge mclk or posedge puc_rst)
294
  if (puc_rst)        p1out <=  8'h00;
295 80 olivier.gi
  else if (p1out_wr)  p1out <=  p1out_nxt & P1_EN_MSK;
296
 
297
assign p1_dout = p1out;
298
 
299
 
300
// P1DIR Register
301
//----------------
302
reg  [7:0] p1dir;
303
 
304 111 olivier.gi
wire       p1dir_wr  = P1DIR[0] ? reg_hi_wr[P1DIR] : reg_lo_wr[P1DIR];
305
wire [7:0] p1dir_nxt = P1DIR[0] ? per_din[15:8]    : per_din[7:0];
306 80 olivier.gi
 
307 111 olivier.gi
always @ (posedge mclk or posedge puc_rst)
308
  if (puc_rst)        p1dir <=  8'h00;
309 80 olivier.gi
  else if (p1dir_wr)  p1dir <=  p1dir_nxt & P1_EN_MSK;
310
 
311
assign p1_dout_en = p1dir;
312
 
313
 
314
// P1IFG Register
315
//----------------
316
reg  [7:0] p1ifg;
317
 
318 111 olivier.gi
wire       p1ifg_wr  = P1IFG[0] ? reg_hi_wr[P1IFG] : reg_lo_wr[P1IFG];
319
wire [7:0] p1ifg_nxt = P1IFG[0] ? per_din[15:8]    : per_din[7:0];
320 80 olivier.gi
wire [7:0] p1ifg_set;
321
 
322 111 olivier.gi
always @ (posedge mclk or posedge puc_rst)
323
  if (puc_rst)        p1ifg <=  8'h00;
324 80 olivier.gi
  else if (p1ifg_wr)  p1ifg <=  (p1ifg_nxt | p1ifg_set) & P1_EN_MSK;
325
  else                p1ifg <=  (p1ifg     | p1ifg_set) & P1_EN_MSK;
326
 
327
// P1IES Register
328
//----------------
329
reg  [7:0] p1ies;
330
 
331 111 olivier.gi
wire       p1ies_wr  = P1IES[0] ? reg_hi_wr[P1IES] : reg_lo_wr[P1IES];
332
wire [7:0] p1ies_nxt = P1IES[0] ? per_din[15:8]    : per_din[7:0];
333 80 olivier.gi
 
334 111 olivier.gi
always @ (posedge mclk or posedge puc_rst)
335
  if (puc_rst)        p1ies <=  8'h00;
336 80 olivier.gi
  else if (p1ies_wr)  p1ies <=  p1ies_nxt & P1_EN_MSK;
337
 
338
 
339
// P1IE Register
340
//----------------
341
reg  [7:0] p1ie;
342
 
343 111 olivier.gi
wire       p1ie_wr  = P1IE[0] ? reg_hi_wr[P1IE] : reg_lo_wr[P1IE];
344
wire [7:0] p1ie_nxt = P1IE[0] ? per_din[15:8]   : per_din[7:0];
345 80 olivier.gi
 
346 111 olivier.gi
always @ (posedge mclk or posedge puc_rst)
347
  if (puc_rst)       p1ie <=  8'h00;
348 80 olivier.gi
  else if (p1ie_wr)  p1ie <=  p1ie_nxt & P1_EN_MSK;
349
 
350
 
351
// P1SEL Register
352
//----------------
353
reg  [7:0] p1sel;
354
 
355 111 olivier.gi
wire       p1sel_wr  = P1SEL[0] ? reg_hi_wr[P1SEL] : reg_lo_wr[P1SEL];
356
wire [7:0] p1sel_nxt = P1SEL[0] ? per_din[15:8]    : per_din[7:0];
357 80 olivier.gi
 
358 111 olivier.gi
always @ (posedge mclk or posedge puc_rst)
359
  if (puc_rst)       p1sel <=  8'h00;
360 80 olivier.gi
  else if (p1sel_wr) p1sel <=  p1sel_nxt & P1_EN_MSK;
361
 
362
assign p1_sel = p1sel;
363
 
364
 
365
// P2IN Register
366
//---------------
367 111 olivier.gi
wire [7:0] p2in;
368 80 olivier.gi
 
369 111 olivier.gi
omsp_sync_cell sync_cell_p2in_0 (.data_out(p2in[0]), .clk(mclk), .data_in(p2_din[0] & P2_EN[0]), .rst(puc_rst));
370
omsp_sync_cell sync_cell_p2in_1 (.data_out(p2in[1]), .clk(mclk), .data_in(p2_din[1] & P2_EN[0]), .rst(puc_rst));
371
omsp_sync_cell sync_cell_p2in_2 (.data_out(p2in[2]), .clk(mclk), .data_in(p2_din[2] & P2_EN[0]), .rst(puc_rst));
372
omsp_sync_cell sync_cell_p2in_3 (.data_out(p2in[3]), .clk(mclk), .data_in(p2_din[3] & P2_EN[0]), .rst(puc_rst));
373
omsp_sync_cell sync_cell_p2in_4 (.data_out(p2in[4]), .clk(mclk), .data_in(p2_din[4] & P2_EN[0]), .rst(puc_rst));
374
omsp_sync_cell sync_cell_p2in_5 (.data_out(p2in[5]), .clk(mclk), .data_in(p2_din[5] & P2_EN[0]), .rst(puc_rst));
375
omsp_sync_cell sync_cell_p2in_6 (.data_out(p2in[6]), .clk(mclk), .data_in(p2_din[6] & P2_EN[0]), .rst(puc_rst));
376
omsp_sync_cell sync_cell_p2in_7 (.data_out(p2in[7]), .clk(mclk), .data_in(p2_din[7] & P2_EN[0]), .rst(puc_rst));
377 80 olivier.gi
 
378
 
379
// P2OUT Register
380
//----------------
381
reg  [7:0] p2out;
382
 
383 111 olivier.gi
wire       p2out_wr  = P2OUT[0] ? reg_hi_wr[P2OUT] : reg_lo_wr[P2OUT];
384
wire [7:0] p2out_nxt = P2OUT[0] ? per_din[15:8]    : per_din[7:0];
385 80 olivier.gi
 
386 111 olivier.gi
always @ (posedge mclk or posedge puc_rst)
387
  if (puc_rst)        p2out <=  8'h00;
388 80 olivier.gi
  else if (p2out_wr)  p2out <=  p2out_nxt & P2_EN_MSK;
389
 
390
assign p2_dout = p2out;
391
 
392
 
393
// P2DIR Register
394
//----------------
395
reg  [7:0] p2dir;
396
 
397 111 olivier.gi
wire       p2dir_wr  = P2DIR[0] ? reg_hi_wr[P2DIR] : reg_lo_wr[P2DIR];
398
wire [7:0] p2dir_nxt = P2DIR[0] ? per_din[15:8]    : per_din[7:0];
399 80 olivier.gi
 
400 111 olivier.gi
always @ (posedge mclk or posedge puc_rst)
401
  if (puc_rst)        p2dir <=  8'h00;
402 80 olivier.gi
  else if (p2dir_wr)  p2dir <=  p2dir_nxt & P2_EN_MSK;
403
 
404
assign p2_dout_en = p2dir;
405
 
406
 
407
// P2IFG Register
408
//----------------
409
reg  [7:0] p2ifg;
410
 
411 111 olivier.gi
wire       p2ifg_wr  = P2IFG[0] ? reg_hi_wr[P2IFG] : reg_lo_wr[P2IFG];
412
wire [7:0] p2ifg_nxt = P2IFG[0] ? per_din[15:8]    : per_din[7:0];
413 80 olivier.gi
wire [7:0] p2ifg_set;
414
 
415 111 olivier.gi
always @ (posedge mclk or posedge puc_rst)
416
  if (puc_rst)        p2ifg <=  8'h00;
417 80 olivier.gi
  else if (p2ifg_wr)  p2ifg <=  (p2ifg_nxt | p2ifg_set) & P2_EN_MSK;
418
  else                p2ifg <=  (p2ifg     | p2ifg_set) & P2_EN_MSK;
419
 
420
 
421
// P2IES Register
422
//----------------
423
reg  [7:0] p2ies;
424
 
425 111 olivier.gi
wire       p2ies_wr  = P2IES[0] ? reg_hi_wr[P2IES] : reg_lo_wr[P2IES];
426
wire [7:0] p2ies_nxt = P2IES[0] ? per_din[15:8]    : per_din[7:0];
427 80 olivier.gi
 
428 111 olivier.gi
always @ (posedge mclk or posedge puc_rst)
429
  if (puc_rst)        p2ies <=  8'h00;
430 80 olivier.gi
  else if (p2ies_wr)  p2ies <=  p2ies_nxt & P2_EN_MSK;
431
 
432
 
433
// P2IE Register
434
//----------------
435
reg  [7:0] p2ie;
436
 
437 111 olivier.gi
wire       p2ie_wr  = P2IE[0] ? reg_hi_wr[P2IE] : reg_lo_wr[P2IE];
438
wire [7:0] p2ie_nxt = P2IE[0] ? per_din[15:8]   : per_din[7:0];
439 80 olivier.gi
 
440 111 olivier.gi
always @ (posedge mclk or posedge puc_rst)
441
  if (puc_rst)       p2ie <=  8'h00;
442 80 olivier.gi
  else if (p2ie_wr)  p2ie <=  p2ie_nxt & P2_EN_MSK;
443
 
444
 
445
// P2SEL Register
446
//----------------
447
reg  [7:0] p2sel;
448
 
449 111 olivier.gi
wire       p2sel_wr  = P2SEL[0] ? reg_hi_wr[P2SEL] : reg_lo_wr[P2SEL];
450
wire [7:0] p2sel_nxt = P2SEL[0] ? per_din[15:8]    : per_din[7:0];
451 80 olivier.gi
 
452 111 olivier.gi
always @ (posedge mclk or posedge puc_rst)
453
  if (puc_rst)       p2sel <=  8'h00;
454 80 olivier.gi
  else if (p2sel_wr) p2sel <=  p2sel_nxt & P2_EN_MSK;
455
 
456
assign p2_sel = p2sel;
457
 
458
 
459
// P3IN Register
460
//---------------
461 111 olivier.gi
wire  [7:0] p3in;
462 80 olivier.gi
 
463 111 olivier.gi
omsp_sync_cell sync_cell_p3in_0 (.data_out(p3in[0]), .clk(mclk), .data_in(p3_din[0] & P3_EN[0]), .rst(puc_rst));
464
omsp_sync_cell sync_cell_p3in_1 (.data_out(p3in[1]), .clk(mclk), .data_in(p3_din[1] & P3_EN[0]), .rst(puc_rst));
465
omsp_sync_cell sync_cell_p3in_2 (.data_out(p3in[2]), .clk(mclk), .data_in(p3_din[2] & P3_EN[0]), .rst(puc_rst));
466
omsp_sync_cell sync_cell_p3in_3 (.data_out(p3in[3]), .clk(mclk), .data_in(p3_din[3] & P3_EN[0]), .rst(puc_rst));
467
omsp_sync_cell sync_cell_p3in_4 (.data_out(p3in[4]), .clk(mclk), .data_in(p3_din[4] & P3_EN[0]), .rst(puc_rst));
468
omsp_sync_cell sync_cell_p3in_5 (.data_out(p3in[5]), .clk(mclk), .data_in(p3_din[5] & P3_EN[0]), .rst(puc_rst));
469
omsp_sync_cell sync_cell_p3in_6 (.data_out(p3in[6]), .clk(mclk), .data_in(p3_din[6] & P3_EN[0]), .rst(puc_rst));
470
omsp_sync_cell sync_cell_p3in_7 (.data_out(p3in[7]), .clk(mclk), .data_in(p3_din[7] & P3_EN[0]), .rst(puc_rst));
471 80 olivier.gi
 
472
 
473
// P3OUT Register
474
//----------------
475
reg  [7:0] p3out;
476
 
477 111 olivier.gi
wire       p3out_wr  = P3OUT[0] ? reg_hi_wr[P3OUT] : reg_lo_wr[P3OUT];
478
wire [7:0] p3out_nxt = P3OUT[0] ? per_din[15:8]    : per_din[7:0];
479 80 olivier.gi
 
480 111 olivier.gi
always @ (posedge mclk or posedge puc_rst)
481
  if (puc_rst)        p3out <=  8'h00;
482 80 olivier.gi
  else if (p3out_wr)  p3out <=  p3out_nxt & P3_EN_MSK;
483
 
484
assign p3_dout = p3out;
485
 
486
 
487
// P3DIR Register
488
//----------------
489
reg  [7:0] p3dir;
490
 
491 111 olivier.gi
wire       p3dir_wr  = P3DIR[0] ? reg_hi_wr[P3DIR] : reg_lo_wr[P3DIR];
492
wire [7:0] p3dir_nxt = P3DIR[0] ? per_din[15:8]    : per_din[7:0];
493 80 olivier.gi
 
494 111 olivier.gi
always @ (posedge mclk or posedge puc_rst)
495
  if (puc_rst)        p3dir <=  8'h00;
496 80 olivier.gi
  else if (p3dir_wr)  p3dir <=  p3dir_nxt & P3_EN_MSK;
497
 
498
assign p3_dout_en = p3dir;
499
 
500
 
501
// P3SEL Register
502
//----------------
503
reg  [7:0] p3sel;
504
 
505 111 olivier.gi
wire       p3sel_wr  = P3SEL[0] ? reg_hi_wr[P3SEL] : reg_lo_wr[P3SEL];
506
wire [7:0] p3sel_nxt = P3SEL[0] ? per_din[15:8]    : per_din[7:0];
507 80 olivier.gi
 
508 111 olivier.gi
always @ (posedge mclk or posedge puc_rst)
509
  if (puc_rst)       p3sel <=  8'h00;
510 80 olivier.gi
  else if (p3sel_wr) p3sel <=  p3sel_nxt & P3_EN_MSK;
511
 
512
assign p3_sel = p3sel;
513
 
514
 
515
// P4IN Register
516
//---------------
517 111 olivier.gi
wire  [7:0] p4in;
518 80 olivier.gi
 
519 111 olivier.gi
omsp_sync_cell sync_cell_p4in_0 (.data_out(p4in[0]), .clk(mclk), .data_in(p4_din[0] & P4_EN[0]), .rst(puc_rst));
520
omsp_sync_cell sync_cell_p4in_1 (.data_out(p4in[1]), .clk(mclk), .data_in(p4_din[1] & P4_EN[0]), .rst(puc_rst));
521
omsp_sync_cell sync_cell_p4in_2 (.data_out(p4in[2]), .clk(mclk), .data_in(p4_din[2] & P4_EN[0]), .rst(puc_rst));
522
omsp_sync_cell sync_cell_p4in_3 (.data_out(p4in[3]), .clk(mclk), .data_in(p4_din[3] & P4_EN[0]), .rst(puc_rst));
523
omsp_sync_cell sync_cell_p4in_4 (.data_out(p4in[4]), .clk(mclk), .data_in(p4_din[4] & P4_EN[0]), .rst(puc_rst));
524
omsp_sync_cell sync_cell_p4in_5 (.data_out(p4in[5]), .clk(mclk), .data_in(p4_din[5] & P4_EN[0]), .rst(puc_rst));
525
omsp_sync_cell sync_cell_p4in_6 (.data_out(p4in[6]), .clk(mclk), .data_in(p4_din[6] & P4_EN[0]), .rst(puc_rst));
526
omsp_sync_cell sync_cell_p4in_7 (.data_out(p4in[7]), .clk(mclk), .data_in(p4_din[7] & P4_EN[0]), .rst(puc_rst));
527 80 olivier.gi
 
528
 
529
// P4OUT Register
530
//----------------
531
reg  [7:0] p4out;
532
 
533 111 olivier.gi
wire       p4out_wr  = P4OUT[0] ? reg_hi_wr[P4OUT] : reg_lo_wr[P4OUT];
534
wire [7:0] p4out_nxt = P4OUT[0] ? per_din[15:8]    : per_din[7:0];
535 80 olivier.gi
 
536 111 olivier.gi
always @ (posedge mclk or posedge puc_rst)
537
  if (puc_rst)        p4out <=  8'h00;
538 80 olivier.gi
  else if (p4out_wr)  p4out <=  p4out_nxt & P4_EN_MSK;
539
 
540
assign p4_dout = p4out;
541
 
542
 
543
// P4DIR Register
544
//----------------
545
reg  [7:0] p4dir;
546
 
547 111 olivier.gi
wire       p4dir_wr  = P4DIR[0] ? reg_hi_wr[P4DIR] : reg_lo_wr[P4DIR];
548
wire [7:0] p4dir_nxt = P4DIR[0] ? per_din[15:8]    : per_din[7:0];
549 80 olivier.gi
 
550 111 olivier.gi
always @ (posedge mclk or posedge puc_rst)
551
  if (puc_rst)        p4dir <=  8'h00;
552 80 olivier.gi
  else if (p4dir_wr)  p4dir <=  p4dir_nxt & P4_EN_MSK;
553
 
554
assign p4_dout_en = p4dir;
555
 
556
 
557
// P4SEL Register
558
//----------------
559
reg  [7:0] p4sel;
560
 
561 111 olivier.gi
wire       p4sel_wr  = P4SEL[0] ? reg_hi_wr[P4SEL] : reg_lo_wr[P4SEL];
562
wire [7:0] p4sel_nxt = P4SEL[0] ? per_din[15:8]    : per_din[7:0];
563 80 olivier.gi
 
564 111 olivier.gi
always @ (posedge mclk or posedge puc_rst)
565
  if (puc_rst)       p4sel <=  8'h00;
566 80 olivier.gi
  else if (p4sel_wr) p4sel <=  p4sel_nxt & P4_EN_MSK;
567
 
568
assign p4_sel = p4sel;
569
 
570
 
571
// P5IN Register
572
//---------------
573 111 olivier.gi
wire  [7:0] p5in;
574 80 olivier.gi
 
575 111 olivier.gi
omsp_sync_cell sync_cell_p5in_0 (.data_out(p5in[0]), .clk(mclk), .data_in(p5_din[0] & P5_EN[0]), .rst(puc_rst));
576
omsp_sync_cell sync_cell_p5in_1 (.data_out(p5in[1]), .clk(mclk), .data_in(p5_din[1] & P5_EN[0]), .rst(puc_rst));
577
omsp_sync_cell sync_cell_p5in_2 (.data_out(p5in[2]), .clk(mclk), .data_in(p5_din[2] & P5_EN[0]), .rst(puc_rst));
578
omsp_sync_cell sync_cell_p5in_3 (.data_out(p5in[3]), .clk(mclk), .data_in(p5_din[3] & P5_EN[0]), .rst(puc_rst));
579
omsp_sync_cell sync_cell_p5in_4 (.data_out(p5in[4]), .clk(mclk), .data_in(p5_din[4] & P5_EN[0]), .rst(puc_rst));
580
omsp_sync_cell sync_cell_p5in_5 (.data_out(p5in[5]), .clk(mclk), .data_in(p5_din[5] & P5_EN[0]), .rst(puc_rst));
581
omsp_sync_cell sync_cell_p5in_6 (.data_out(p5in[6]), .clk(mclk), .data_in(p5_din[6] & P5_EN[0]), .rst(puc_rst));
582
omsp_sync_cell sync_cell_p5in_7 (.data_out(p5in[7]), .clk(mclk), .data_in(p5_din[7] & P5_EN[0]), .rst(puc_rst));
583 80 olivier.gi
 
584
 
585
// P5OUT Register
586
//----------------
587
reg  [7:0] p5out;
588
 
589 111 olivier.gi
wire       p5out_wr  = P5OUT[0] ? reg_hi_wr[P5OUT] : reg_lo_wr[P5OUT];
590
wire [7:0] p5out_nxt = P5OUT[0] ? per_din[15:8]    : per_din[7:0];
591 80 olivier.gi
 
592 111 olivier.gi
always @ (posedge mclk or posedge puc_rst)
593
  if (puc_rst)        p5out <=  8'h00;
594 80 olivier.gi
  else if (p5out_wr)  p5out <=  p5out_nxt & P5_EN_MSK;
595
 
596
assign p5_dout = p5out;
597
 
598
 
599
// P5DIR Register
600
//----------------
601
reg  [7:0] p5dir;
602
 
603 111 olivier.gi
wire       p5dir_wr  = P5DIR[0] ? reg_hi_wr[P5DIR] : reg_lo_wr[P5DIR];
604
wire [7:0] p5dir_nxt = P5DIR[0] ? per_din[15:8]    : per_din[7:0];
605 80 olivier.gi
 
606 111 olivier.gi
always @ (posedge mclk or posedge puc_rst)
607
  if (puc_rst)        p5dir <=  8'h00;
608 80 olivier.gi
  else if (p5dir_wr)  p5dir <=  p5dir_nxt & P5_EN_MSK;
609
 
610
assign p5_dout_en = p5dir;
611
 
612
 
613
// P5SEL Register
614
//----------------
615
reg  [7:0] p5sel;
616
 
617 111 olivier.gi
wire       p5sel_wr  = P5SEL[0] ? reg_hi_wr[P5SEL] : reg_lo_wr[P5SEL];
618
wire [7:0] p5sel_nxt = P5SEL[0] ? per_din[15:8]    : per_din[7:0];
619 80 olivier.gi
 
620 111 olivier.gi
always @ (posedge mclk or posedge puc_rst)
621
  if (puc_rst)       p5sel <=  8'h00;
622 80 olivier.gi
  else if (p5sel_wr) p5sel <=  p5sel_nxt & P5_EN_MSK;
623
 
624
assign p5_sel = p5sel;
625
 
626
 
627
// P6IN Register
628
//---------------
629 111 olivier.gi
wire  [7:0] p6in;
630 80 olivier.gi
 
631 111 olivier.gi
omsp_sync_cell sync_cell_p6in_0 (.data_out(p6in[0]), .clk(mclk), .data_in(p6_din[0] & P6_EN[0]), .rst(puc_rst));
632
omsp_sync_cell sync_cell_p6in_1 (.data_out(p6in[1]), .clk(mclk), .data_in(p6_din[1] & P6_EN[0]), .rst(puc_rst));
633
omsp_sync_cell sync_cell_p6in_2 (.data_out(p6in[2]), .clk(mclk), .data_in(p6_din[2] & P6_EN[0]), .rst(puc_rst));
634
omsp_sync_cell sync_cell_p6in_3 (.data_out(p6in[3]), .clk(mclk), .data_in(p6_din[3] & P6_EN[0]), .rst(puc_rst));
635
omsp_sync_cell sync_cell_p6in_4 (.data_out(p6in[4]), .clk(mclk), .data_in(p6_din[4] & P6_EN[0]), .rst(puc_rst));
636
omsp_sync_cell sync_cell_p6in_5 (.data_out(p6in[5]), .clk(mclk), .data_in(p6_din[5] & P6_EN[0]), .rst(puc_rst));
637
omsp_sync_cell sync_cell_p6in_6 (.data_out(p6in[6]), .clk(mclk), .data_in(p6_din[6] & P6_EN[0]), .rst(puc_rst));
638
omsp_sync_cell sync_cell_p6in_7 (.data_out(p6in[7]), .clk(mclk), .data_in(p6_din[7] & P6_EN[0]), .rst(puc_rst));
639 80 olivier.gi
 
640
 
641
// P6OUT Register
642
//----------------
643
reg  [7:0] p6out;
644
 
645 111 olivier.gi
wire       p6out_wr  = P6OUT[0] ? reg_hi_wr[P6OUT] : reg_lo_wr[P6OUT];
646
wire [7:0] p6out_nxt = P6OUT[0] ? per_din[15:8]    : per_din[7:0];
647 80 olivier.gi
 
648 111 olivier.gi
always @ (posedge mclk or posedge puc_rst)
649
  if (puc_rst)        p6out <=  8'h00;
650 80 olivier.gi
  else if (p6out_wr)  p6out <=  p6out_nxt & P6_EN_MSK;
651
 
652
assign p6_dout = p6out;
653
 
654
 
655
// P6DIR Register
656
//----------------
657
reg  [7:0] p6dir;
658
 
659 111 olivier.gi
wire       p6dir_wr  = P6DIR[0] ? reg_hi_wr[P6DIR] : reg_lo_wr[P6DIR];
660
wire [7:0] p6dir_nxt = P6DIR[0] ? per_din[15:8]    : per_din[7:0];
661 80 olivier.gi
 
662 111 olivier.gi
always @ (posedge mclk or posedge puc_rst)
663
  if (puc_rst)        p6dir <=  8'h00;
664 80 olivier.gi
  else if (p6dir_wr)  p6dir <=  p6dir_nxt & P6_EN_MSK;
665
 
666
assign p6_dout_en = p6dir;
667
 
668
 
669
// P6SEL Register
670
//----------------
671
reg  [7:0] p6sel;
672
 
673 111 olivier.gi
wire       p6sel_wr  = P6SEL[0] ? reg_hi_wr[P6SEL] : reg_lo_wr[P6SEL];
674
wire [7:0] p6sel_nxt = P6SEL[0] ? per_din[15:8]    : per_din[7:0];
675 80 olivier.gi
 
676 111 olivier.gi
always @ (posedge mclk or posedge puc_rst)
677
  if (puc_rst)       p6sel <=  8'h00;
678 80 olivier.gi
  else if (p6sel_wr) p6sel <=  p6sel_nxt & P6_EN_MSK;
679
 
680
assign p6_sel = p6sel;
681
 
682
 
683
 
684
//============================================================================
685
// 4) INTERRUPT GENERATION
686
//============================================================================
687
 
688
// Port 1 interrupt
689
//------------------
690
 
691
// Delay input
692
reg    [7:0] p1in_dly;
693 111 olivier.gi
always @ (posedge mclk or posedge puc_rst)
694
  if (puc_rst)  p1in_dly <=  8'h00;
695 80 olivier.gi
  else          p1in_dly <=  p1in & P1_EN_MSK;
696
 
697
// Edge detection
698
wire   [7:0] p1in_re   =   p1in & ~p1in_dly;
699
wire   [7:0] p1in_fe   =  ~p1in &  p1in_dly;
700
 
701
// Set interrupt flag
702
assign       p1ifg_set = {p1ies[7] ? p1in_fe[7] : p1in_re[7],
703
                          p1ies[6] ? p1in_fe[6] : p1in_re[6],
704
                          p1ies[5] ? p1in_fe[5] : p1in_re[5],
705
                          p1ies[4] ? p1in_fe[4] : p1in_re[4],
706
                          p1ies[3] ? p1in_fe[3] : p1in_re[3],
707
                          p1ies[2] ? p1in_fe[2] : p1in_re[2],
708
                          p1ies[1] ? p1in_fe[1] : p1in_re[1],
709
                          p1ies[0] ? p1in_fe[0] : p1in_re[0]} & P1_EN_MSK;
710
 
711
// Generate CPU interrupt
712
assign       irq_port1 = |(p1ie & p1ifg) & P1_EN[0];
713
 
714
 
715
// Port 1 interrupt
716
//------------------
717
 
718
// Delay input
719
reg    [7:0] p2in_dly;
720 111 olivier.gi
always @ (posedge mclk or posedge puc_rst)
721
  if (puc_rst)  p2in_dly <=  8'h00;
722 80 olivier.gi
  else          p2in_dly <=  p2in & P2_EN_MSK;
723
 
724
// Edge detection
725
wire   [7:0] p2in_re   =   p2in & ~p2in_dly;
726
wire   [7:0] p2in_fe   =  ~p2in &  p2in_dly;
727
 
728
// Set interrupt flag
729
assign       p2ifg_set = {p2ies[7] ? p2in_fe[7] : p2in_re[7],
730
                          p2ies[6] ? p2in_fe[6] : p2in_re[6],
731
                          p2ies[5] ? p2in_fe[5] : p2in_re[5],
732
                          p2ies[4] ? p2in_fe[4] : p2in_re[4],
733
                          p2ies[3] ? p2in_fe[3] : p2in_re[3],
734
                          p2ies[2] ? p2in_fe[2] : p2in_re[2],
735
                          p2ies[1] ? p2in_fe[1] : p2in_re[1],
736
                          p2ies[0] ? p2in_fe[0] : p2in_re[0]} & P2_EN_MSK;
737
 
738
// Generate CPU interrupt
739
assign      irq_port2 = |(p2ie & p2ifg) & P2_EN[0];
740
 
741
 
742
//============================================================================
743
// 5) DATA OUTPUT GENERATION
744
//============================================================================
745
 
746
// Data output mux
747 111 olivier.gi
wire [15:0] p1in_rd   = {8'h00, (p1in  & {8{reg_rd[P1IN]}})}  << (8 & {4{P1IN[0]}});
748
wire [15:0] p1out_rd  = {8'h00, (p1out & {8{reg_rd[P1OUT]}})} << (8 & {4{P1OUT[0]}});
749
wire [15:0] p1dir_rd  = {8'h00, (p1dir & {8{reg_rd[P1DIR]}})} << (8 & {4{P1DIR[0]}});
750
wire [15:0] p1ifg_rd  = {8'h00, (p1ifg & {8{reg_rd[P1IFG]}})} << (8 & {4{P1IFG[0]}});
751
wire [15:0] p1ies_rd  = {8'h00, (p1ies & {8{reg_rd[P1IES]}})} << (8 & {4{P1IES[0]}});
752
wire [15:0] p1ie_rd   = {8'h00, (p1ie  & {8{reg_rd[P1IE]}})}  << (8 & {4{P1IE[0]}});
753
wire [15:0] p1sel_rd  = {8'h00, (p1sel & {8{reg_rd[P1SEL]}})} << (8 & {4{P1SEL[0]}});
754
wire [15:0] p2in_rd   = {8'h00, (p2in  & {8{reg_rd[P2IN]}})}  << (8 & {4{P2IN[0]}});
755
wire [15:0] p2out_rd  = {8'h00, (p2out & {8{reg_rd[P2OUT]}})} << (8 & {4{P2OUT[0]}});
756
wire [15:0] p2dir_rd  = {8'h00, (p2dir & {8{reg_rd[P2DIR]}})} << (8 & {4{P2DIR[0]}});
757
wire [15:0] p2ifg_rd  = {8'h00, (p2ifg & {8{reg_rd[P2IFG]}})} << (8 & {4{P2IFG[0]}});
758
wire [15:0] p2ies_rd  = {8'h00, (p2ies & {8{reg_rd[P2IES]}})} << (8 & {4{P2IES[0]}});
759
wire [15:0] p2ie_rd   = {8'h00, (p2ie  & {8{reg_rd[P2IE]}})}  << (8 & {4{P2IE[0]}});
760
wire [15:0] p2sel_rd  = {8'h00, (p2sel & {8{reg_rd[P2SEL]}})} << (8 & {4{P2SEL[0]}});
761
wire [15:0] p3in_rd   = {8'h00, (p3in  & {8{reg_rd[P3IN]}})}  << (8 & {4{P3IN[0]}});
762
wire [15:0] p3out_rd  = {8'h00, (p3out & {8{reg_rd[P3OUT]}})} << (8 & {4{P3OUT[0]}});
763
wire [15:0] p3dir_rd  = {8'h00, (p3dir & {8{reg_rd[P3DIR]}})} << (8 & {4{P3DIR[0]}});
764
wire [15:0] p3sel_rd  = {8'h00, (p3sel & {8{reg_rd[P3SEL]}})} << (8 & {4{P3SEL[0]}});
765
wire [15:0] p4in_rd   = {8'h00, (p4in  & {8{reg_rd[P4IN]}})}  << (8 & {4{P4IN[0]}});
766
wire [15:0] p4out_rd  = {8'h00, (p4out & {8{reg_rd[P4OUT]}})} << (8 & {4{P4OUT[0]}});
767
wire [15:0] p4dir_rd  = {8'h00, (p4dir & {8{reg_rd[P4DIR]}})} << (8 & {4{P4DIR[0]}});
768
wire [15:0] p4sel_rd  = {8'h00, (p4sel & {8{reg_rd[P4SEL]}})} << (8 & {4{P4SEL[0]}});
769
wire [15:0] p5in_rd   = {8'h00, (p5in  & {8{reg_rd[P5IN]}})}  << (8 & {4{P5IN[0]}});
770
wire [15:0] p5out_rd  = {8'h00, (p5out & {8{reg_rd[P5OUT]}})} << (8 & {4{P5OUT[0]}});
771
wire [15:0] p5dir_rd  = {8'h00, (p5dir & {8{reg_rd[P5DIR]}})} << (8 & {4{P5DIR[0]}});
772
wire [15:0] p5sel_rd  = {8'h00, (p5sel & {8{reg_rd[P5SEL]}})} << (8 & {4{P5SEL[0]}});
773
wire [15:0] p6in_rd   = {8'h00, (p6in  & {8{reg_rd[P6IN]}})}  << (8 & {4{P6IN[0]}});
774
wire [15:0] p6out_rd  = {8'h00, (p6out & {8{reg_rd[P6OUT]}})} << (8 & {4{P6OUT[0]}});
775
wire [15:0] p6dir_rd  = {8'h00, (p6dir & {8{reg_rd[P6DIR]}})} << (8 & {4{P6DIR[0]}});
776
wire [15:0] p6sel_rd  = {8'h00, (p6sel & {8{reg_rd[P6SEL]}})} << (8 & {4{P6SEL[0]}});
777 80 olivier.gi
 
778
wire [15:0] per_dout  =  p1in_rd   |
779
                         p1out_rd  |
780
                         p1dir_rd  |
781
                         p1ifg_rd  |
782
                         p1ies_rd  |
783
                         p1ie_rd   |
784
                         p1sel_rd  |
785
                         p2in_rd   |
786
                         p2out_rd  |
787
                         p2dir_rd  |
788
                         p2ifg_rd  |
789
                         p2ies_rd  |
790
                         p2ie_rd   |
791
                         p2sel_rd  |
792
                         p3in_rd   |
793
                         p3out_rd  |
794
                         p3dir_rd  |
795
                         p3sel_rd  |
796
                         p4in_rd   |
797
                         p4out_rd  |
798
                         p4dir_rd  |
799
                         p4sel_rd  |
800
                         p5in_rd   |
801
                         p5out_rd  |
802
                         p5dir_rd  |
803
                         p5sel_rd  |
804
                         p6in_rd   |
805
                         p6out_rd  |
806
                         p6dir_rd  |
807
                         p6sel_rd;
808
 
809
endmodule // omsp_gpio

powered by: WebSVN 2.1.0

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