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

Subversion Repositories rtf68ksys

[/] [rtf68ksys/] [trunk/] [rtl/] [verilog/] [syncRam4kx9_1rw1r.v] - Blame information for rev 2

Details | Compare with Previous | View Log

Line No. Rev Author Line
1 2 robfinch
// ============================================================================
2
//      2008,2011  Robert Finch
3
//      robfinch@<remove>sympatico.ca
4
//
5
//      syncRam4kx9_1rw1r.v
6
//
7
// This source file is free software: you can redistribute it and/or modify 
8
// it under the terms of the GNU Lesser General Public License as published 
9
// by the Free Software Foundation, either version 3 of the License, or     
10
// (at your option) any later version.                                      
11
//                                                                          
12
// This source file is distributed in the hope that it will be useful,      
13
// but WITHOUT ANY WARRANTY; without even the implied warranty of           
14
// MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the            
15
// GNU General Public License for more details.                             
16
//                                                                          
17
// You should have received a copy of the GNU General Public License        
18
// along with this program.  If not, see <http://www.gnu.org/licenses/>.    
19
//                                                                          
20
//
21
// ============================================================================
22
//
23
`define SYNTHESIS
24
`define VENDOR_XILINX
25
`define SPARTAN3
26
 
27
module syncRam4kx9_1rw1r(
28
        input wrst,
29
        input wclk,
30
        input wce,
31
        input we,
32
        input [11:0] wadr,
33
        input [8:0] i,
34
        output [8:0] wo,
35
        input rrst,
36
        input rclk,
37
        input rce,
38
        input [11:0] radr,
39
        output [8:0] o
40
);
41
 
42
`ifdef SYNTHESIS
43
`ifdef VENDOR_XILINX
44
 
45
`ifdef SPARTAN3
46
        wire [8:0] o0;
47
        wire [8:0] o1;
48
        wire [8:0] wo0;
49
        wire [8:0] wo1;
50
        wire rrst0 =  radr[11];
51
        wire rrst1 = ~radr[11];
52
        wire wrst0 =  wadr[11];
53
        wire wrst1 = ~wadr[11];
54
        wire we0 = we & ~wadr[11];
55
        wire we1 = we &  wadr[11];
56
 
57
        RAMB16_S9_S9 ram0(
58
                .CLKA(wclk), .ADDRA(wadr), .DIA(i[7:0]), .DIPA(i[8]), .DOA(wo0[7:0]), .DOPA(wo0[8]), .ENA(wce), .WEA(we0), .SSRA(wrst0),
59
                .CLKB(rclk), .ADDRB(radr), .DIB(8'hFF), .DIPB(1'b1), .DOB(o0[7:0]), .DOPB(o0[8]), .ENB(rce), .WEB(1'b0), .SSRB(rrst0)  );
60
        RAMB16_S9_S9 ram1(
61
                .CLKA(wclk), .ADDRA(wadr), .DIA(i[7:0]), .DIPA(i[8]), .DOA(wo1[7:0]), .DOPA(wo1[8]), .ENA(wce), .WEA(we1), .SSRA(wrst1),
62
                .CLKB(rclk), .ADDRB(radr), .DIB(8'hFF), .DIPB(1'b1), .DOB(o1[7:0]), .DOPB(o1[8]), .ENB(rce), .WEB(1'b0), .SSRB(rrst1)  );
63
 
64
        assign o = o0|o1;
65
        assign wo = wo0|wo1;
66
 
67
`endif
68
 
69
`ifdef SPARTAN2
70
        RAMB4_S1_S1 ram0(
71
                .CLKA(wclk), .ADDRA(wadr), .DIA(i[0]), .DOA(wo[0]), .ENA(wce), .WEA(we), .RSTA(wrst),
72
                .CLKB(rclk), .ADDRB(radr), .DIB(1'b1), .DOB(o[0]), .ENB(rce), .WEB(1'b0), .RSTB(rrst)  );
73
        RAMB4_S1_S1 ram1(
74
                .CLKA(wclk), .ADDRA(wadr), .DIA(i[1]), .DOA(wo[1]), .ENA(wce), .WEA(we), .RSTA(wrst),
75
                .CLKB(rclk), .ADDRB(radr), .DIB(1'b1), .DOB(o[1]), .ENB(rce), .WEB(1'b0), .RSTB(rrst)  );
76
        RAMB4_S1_S1 ram2(
77
                .CLKA(wclk), .ADDRA(wadr), .DIA(i[2]), .DOA(wo[2]), .ENA(wce), .WEA(we), .RSTA(wrst),
78
                .CLKB(rclk), .ADDRB(radr), .DIB(1'b1), .DOB(o[2]), .ENB(rce), .WEB(1'b0), .RSTB(rrst)  );
79
        RAMB4_S1_S1 ram3(
80
                .CLKA(wclk), .ADDRA(wadr), .DIA(i[3]), .DOA(wo[3]), .ENA(wce), .WEA(we), .RSTA(wrst),
81
                .CLKB(rclk), .ADDRB(radr), .DIB(1'b1), .DOB(o[3]), .ENB(rce), .WEB(1'b0), .RSTB(rrst)  );
82
        RAMB4_S1_S1 ram4(
83
                .CLKA(wclk), .ADDRA(wadr), .DIA(i[4]), .DOA(wo[4]), .ENA(wce), .WEA(we), .RSTA(wrst),
84
                .CLKB(rclk), .ADDRB(radr), .DIB(1'b1), .DOB(o[4]), .ENB(rce), .WEB(1'b0), .RSTB(rrst)  );
85
        RAMB4_S1_S1 ram5(
86
                .CLKA(wclk), .ADDRA(wadr), .DIA(i[5]), .DOA(wo[5]), .ENA(wce), .WEA(we), .RSTA(wrst),
87
                .CLKB(rclk), .ADDRB(radr), .DIB(1'b1), .DOB(o[5]), .ENB(rce), .WEB(1'b0), .RSTB(rrst)  );
88
        RAMB4_S1_S1 ram6(
89
                .CLKA(wclk), .ADDRA(wadr), .DIA(i[6]), .DOA(wo[6]), .ENA(wce), .WEA(we), .RSTA(wrst),
90
                .CLKB(rclk), .ADDRB(radr), .DIB(1'b1), .DOB(o[6]), .ENB(rce), .WEB(1'b0), .RSTB(rrst)  );
91
        RAMB4_S1_S1 ram7(
92
                .CLKA(wclk), .ADDRA(wadr), .DIA(i[7]), .DOA(wo[7]), .ENA(wce), .WEA(we), .RSTA(wrst),
93
                .CLKB(rclk), .ADDRB(radr), .DIB(1'b1), .DOB(o[7]), .ENB(rce), .WEB(1'b0), .RSTB(rrst)  );
94
        RAMB4_S1_S1 ram8(
95
                .CLKA(wclk), .ADDRA(wadr), .DIA(i[8]), .DOA(wo[8]), .ENA(wce), .WEA(we), .RSTA(wrst),
96
                .CLKB(rclk), .ADDRB(radr), .DIB(1'b1), .DOB(o[8]), .ENB(rce), .WEB(1'b0), .RSTB(rrst)  );
97
`endif
98
 
99
`endif
100
 
101
`ifdef VENDOR_ALTERA
102
 
103
        reg [8:0] mem [4095:0];
104
        reg [10:0] rradr;
105
        reg [10:0] rwadr;
106
 
107
        // register read addresses
108
        always @(posedge rclk)
109
                if (rce) rradr <= radr;
110
 
111
        assign o = mem[rradr];
112
 
113
        // write side
114
        always @(posedge wclk)
115
                if (wce) rwadr <= wadr;
116
 
117
        always @(posedge wclk)
118
                if (wce) mem[wadr] <= i;
119
 
120
        assign wo = mem[rwadr];
121
 
122
`endif
123
 
124
`else
125
 
126
        reg [8:0] mem [4095:0];
127
        reg [10:0] rradr;
128
        reg [10:0] rwadr;
129
 
130
        // register read addresses
131
        always @(posedge rclk)
132
                if (rce) rradr <= radr;
133
 
134
        assign o = mem[rradr];
135
 
136
        // write side
137
        always @(posedge wclk)
138
                if (wce) rwadr <= wadr;
139
 
140
        always @(posedge wclk)
141
                if (wce) mem[wadr] <= i;
142
 
143
        assign wo = mem[rwadr];
144
 
145
`endif
146
 
147
endmodule

powered by: WebSVN 2.1.0

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