URL https://opencores.org/ocsvn/vga_lcd/vga_lcd/trunk

Subversion Repositories vga_lcd

[/] [vga_lcd/] [trunk/] [rtl/] [verilog/] [vga_wb_master.v] - Blame information for rev 33

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


/////////////////////////////////////////////////////////////////////
////                                                             ////
////  WISHBONE rev.B2 compliant enhanced VGA/LCD Core            ////
////  Wishbone master interface                                  ////
////                                                             ////
////  Author: Richard Herveille                                  ////
////          richard@asics.ws                                   ////
////          www.asics.ws                                       ////
////                                                             ////
////  Downloaded from: http://www.opencores.org/projects/vga_lcd ////
////                                                             ////
/////////////////////////////////////////////////////////////////////
////                                                             ////
//// Copyright (C) 2001, 2002 Richard Herveille                  ////
////                          richard@asics.ws                   ////
////                                                             ////
//// 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 SOFTWARE IS PROVIDED ``AS IS'' AND WITHOUT ANY     ////
//// EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED   ////
//// TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS   ////
//// FOR A PARTICULAR PURPOSE. IN NO EVENT SHALL THE AUTHOR      ////
//// OR CONTRIBUTORS BE LIABLE FOR ANY DIRECT, INDIRECT,         ////
//// INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES    ////
//// (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE   ////
//// GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR        ////
//// BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF  ////
//// LIABILITY, WHETHER IN  CONTRACT, STRICT LIABILITY, OR TORT  ////
//// (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT  ////
//// OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE         ////
//// POSSIBILITY OF SUCH DAMAGE.                                 ////
////                                                             ////
/////////////////////////////////////////////////////////////////////
 
//  CVS Log
//
//  $Id: vga_wb_master.v,v 1.8 2002-03-04 11:01:59 rherveille Exp $
//
//  $Date: 2002-03-04 11:01:59 $
//  $Revision: 1.8 $
//  $Author: rherveille $
//  $Locker:  $
//  $State: Exp $
//
// Change History:
//               $Log: not supported by cvs2svn $
//               Revision 1.7  2002/02/16 10:40:00  rherveille
//               Some minor bug-fixes.
//               Changed vga_ssel into vga_curproc (cursor processor).
//
//               Revision 1.6  2002/02/07 05:42:10  rherveille
//               Fixed some bugs discovered by modified testbench
//               Removed / Changed some strange logic constructions
//               Started work on hardware cursor support (not finished yet)
//               Changed top-level name to vga_enh_top.v
//
 
`include "timescale.v"
`include "vga_defines.v"
 
module vga_wb_master (clk_i, rst_i, nrst_i, cyc_o, stb_o, cab_o, we_o, adr_o, sel_o, ack_i, err_i, dat_i, sint,
        ctrl_ven, ctrl_cd, ctrl_pc, ctrl_vbl, ctrl_vbsw, ctrl_cbsw,
        cursor0_en, cursor0_res, cursor0_xy, cursor0_ba, cursor0_ld, cc0_adr_o, cc0_dat_i,
        cursor1_en, cursor1_res, cursor1_xy, cursor1_ba, cursor1_ld, cc1_adr_o, cc1_dat_i,
        VBAa, VBAb, Thgate, Tvgate,
        stat_avmp, stat_acmp, vmem_switch, clut_switch, line_fifo_wreq, line_fifo_d, line_fifo_full,
        clut_req, clut_ack, clut_adr, clut_q);
 
        // inputs & outputs
 
        // wishbone signals
        input         clk_i;    // master clock input
        input         rst_i;    // synchronous active high reset
        input         nrst_i;   // asynchronous low reset
        output        cyc_o;    // cycle output
        reg cyc_o;
        output        stb_o;    // strobe ouput
        reg stb_o;
        output        cab_o;    // consecutive address burst output
        reg cab_o;
        output        we_o;     // write enable output
        reg we_o;
        output [31:0] adr_o;    // address output
        output [ 3:0] sel_o;    // byte select outputs (only 32bits accesses are supported)
        reg [3:0] sel_o;
        input         ack_i;    // wishbone cycle acknowledge 
        input         err_i;    // wishbone cycle error
        input [31:0]  dat_i;    // wishbone data in
 
        output        sint;     // non recoverable error, interrupt host
 
        // control register settings
        input       ctrl_ven;   // video enable bit
        input [1:0] ctrl_cd;    // color depth
        input       ctrl_pc;    // 8bpp pseudo color/bw
        input [1:0] ctrl_vbl;   // burst length
        input       ctrl_vbsw;  // enable video bank switching
        input       ctrl_cbsw;  // enable clut bank switching
 
        input          cursor0_en;  // enable hardware cursor0
        input          cursor0_res; // cursor0 resolution
        input  [31: 0] cursor0_xy;  // (x,y) address hardware cursor0
        input  [31:11] cursor0_ba;  // cursor0 video memory base address
        input          cursor0_ld;  // reload cursor0 from video memory
        output [ 3: 0] cc0_adr_o;   // cursor0 color registers address output
        input  [15: 0] cc0_dat_i;   // cursor0 color registers data input
        input          cursor1_en;  // enable hardware cursor1
        input          cursor1_res; // cursor1 resolution
        input  [31: 0] cursor1_xy;  // (x,y) address hardware cursor1
        input  [31:11] cursor1_ba;  // cursor1 video memory base address
        input          cursor1_ld;  // reload cursor1 from video memory
        output [ 3: 0] cc1_adr_o;   // cursor1 color registers address output
        input  [15: 0] cc1_dat_i;   // cursor1 color registers data input
 
        // video memory addresses
        input [31: 2] VBAa;     // video memory base address A
        input [31: 2] VBAb;     // video memory base address B
 
        input [15:0] Thgate;    // horizontal visible area (in pixels)
        input [15:0] Tvgate;    // vertical visible area (in horizontal lines)
 
        output stat_avmp;       // active video memory page
        output stat_acmp;       // active CLUT memory page
        reg stat_acmp;
        output vmem_switch;     // video memory bank-switch request: memory page switched (when enabled)
        output clut_switch;     // clut memory bank-switch request: clut page switched (when enabled)
 
        // to/from line-fifo
        output        line_fifo_wreq;
        output [23:0] line_fifo_d;
        input         line_fifo_full;
 
        // to/from color lookup-table
        output        clut_req;  // clut access request
        input         clut_ack;  // clut access acknowledge
        output [ 8:0] clut_adr;  // clut access address
        input  [23:0] clut_q;    // clut access data in
 
        //
        // variable declarations
        //
 
        reg vmem_acc;                 // video memory access
        wire nvmem_req, vmem_ack;     // NOT video memory access request // video memory access acknowledge
 
        wire ImDone;                  // Done reading image from video mem 
        reg  dImDone;                 // delayed ImDone
        wire  ImDoneStrb;             // image done (strobe signal)
        reg  dImDoneStrb;             // delayed ImDoneStrb
 
        wire data_fifo_rreq, data_fifo_empty, data_fifo_hfull;
        wire [31:0] data_fifo_q;
        wire [23:0] color_proc_q, ssel1_q, rgb_fifo_d;
        wire        color_proc_wreq, ssel1_wreq, rgb_fifo_wreq;
        wire rgb_fifo_empty, rgb_fifo_full, rgb_fifo_rreq;
        wire ImDoneFifoQ;
        reg  dImDoneFifoQ, ddImDoneFifoQ;
 
        reg sclr; // synchronous clear
 
        wire [7:0] clut_offs; // color lookup table offset
 
        reg [8:0] cursor_adr;
        reg       cursor0_we, cursor1_we;
 
        //
        // module body
        //
 
        // generate synchronous clear
        always@(posedge clk_i)
                sclr <= #1 ~ctrl_ven;
 
        //
        // WISHBONE block
        //
        reg  [ 2:0] burst_cnt;                       // video memory burst access counter
        wire        burst_done;                      // completed burst access to video mem
        reg         sel_VBA;                         // select video memory base address
        reg  [31:2] vmemA;                           // video memory address 
 
        // wishbone access controller, video memory access request has highest priority (try to keep fifo full)
        always@(posedge clk_i)
                if (sclr)
                        vmem_acc <= #1 1'b0;
                else
                        vmem_acc <= #1 (!nvmem_req | (vmem_acc & !(burst_done & vmem_ack) ) ) & !ImDone;
 
        assign vmem_ack = ack_i;
        assign sint = err_i; // Non recoverable error, interrupt host system
 
        // select active memory page
        assign vmem_switch = ImDoneStrb;
 
        always@(posedge clk_i)
                if (sclr)
                        sel_VBA <= #1 1'b0;
                else if (ctrl_vbsw)
                        sel_VBA <= #1 sel_VBA ^ vmem_switch;  // select next video memory bank when finished reading current bank (and bank switch enabled)
 
        assign stat_avmp = sel_VBA; // assign output
 
        // selecting active clut page / cursor data
        // delay image done same amount as video-memory data
        vga_fifo #(4, 1) clut_sw_fifo (
                .clk(clk_i),
                .aclr(1'b1),
                .sclr(sclr),
                .d(ImDone),
                .wreq(vmem_ack),
                .q(ImDoneFifoQ),
                .rreq(data_fifo_rreq),
                .empty(),
                .hfull(),
                .full()
        );
 
        // clut bank switch / cursor data delay2: Account for ColorProcessor DataBuffer delay
        always@(posedge clk_i)
                if (sclr)
                        dImDoneFifoQ <= #1 1'b0;
                else    if (data_fifo_rreq)
                        dImDoneFifoQ <= #1 ImDoneFifoQ;
 
        always@(posedge clk_i)
                if (sclr)
                        ddImDoneFifoQ <= #1 1'b0;
                else
                        ddImDoneFifoQ <= #1 dImDoneFifoQ;
 
        assign clut_switch = ddImDoneFifoQ & !dImDoneFifoQ;
 
        always@(posedge clk_i)
                if (sclr)
                        stat_acmp <= #1 1'b0;
                else if (ctrl_cbsw)
                        stat_acmp <= #1 stat_acmp ^ clut_switch;  // select next clut when finished reading clut for current video bank (and bank switch enabled)
 
        // generate clut-address
        assign clut_adr = {stat_acmp, clut_offs};
 
        // generate burst counter
        wire [3:0] burst_cnt_val;
        assign burst_cnt_val = {1'b0, burst_cnt} -4'h1;
        assign burst_done = burst_cnt_val[3];
 
        always@(posedge clk_i)
                if ( (burst_done & vmem_ack) | !vmem_acc)
                        case (ctrl_vbl) // synopsis full_case parallel_case
                                2'b00: burst_cnt <= #1 3'b000; // burst length 1
                                2'b01: burst_cnt <= #1 3'b001; // burst length 2
                                2'b10: burst_cnt <= #1 3'b011; // burst length 4
                                2'b11: burst_cnt <= #1 3'b111; // burst length 8
                        endcase
                else if(vmem_ack)
                        burst_cnt <= #1 burst_cnt_val[2:0];
 
        //
        // generate image counters
        //
 
        // hgate counter
        reg  [15:0] hgate_cnt;
        reg  [16:0] hgate_cnt_val;
        reg  [1:0]  hgate_div_cnt;
        reg  [2:0]  hgate_div_val;
 
        wire hdone = hgate_cnt_val[16] & vmem_ack; // ????
 
        always@(hgate_cnt or hgate_div_cnt or ctrl_cd)
                begin
                        hgate_div_val = {1'b0, hgate_div_cnt} - 3'h1;
 
                        if (ctrl_cd != 2'b10)
                                hgate_cnt_val = {1'b0, hgate_cnt} - 17'h1;
                        else if ( hgate_div_val[2] )
                                hgate_cnt_val = {1'b0, hgate_cnt} - 17'h1;
                        else
                                hgate_cnt_val = {1'b0, hgate_cnt};
                end
 
        always@(posedge clk_i)
                if (sclr)
                                begin
                                        case(ctrl_cd) // synopsys full_case parallel_case
                                                2'b00: // 8bpp
                                                        hgate_cnt <= #1 Thgate >> 2; // 4 pixels per cycle
                                                2'b01: //16bpp
                                                        hgate_cnt <= #1 Thgate >> 1; // 2 pixels per cycle
                                                2'b10: //24bpp
                                                        hgate_cnt <= #1 Thgate >> 2; // 4/3 pixels per cycle
                                                2'b11: //32bpp
                                                        hgate_cnt <= #1 Thgate;      // 1 pixel per cycle
                                        endcase
 
                                        hgate_div_cnt <= 2'b10;
                                end
                else if (vmem_ack)
                        if (hdone)
                                begin
                                        case(ctrl_cd) // synopsys full_case parallel_case
                                                2'b00: // 8bpp
                                                        hgate_cnt <= #1 Thgate >> 2; // 4 pixels per cycle
                                                2'b01: //16bpp
                                                        hgate_cnt <= #1 Thgate >> 1; // 2 pixels per cycle
                                                2'b10: //24bpp
                                                        hgate_cnt <= #1 Thgate >> 2; // 4/3 pixels per cycle
                                                2'b11: //32bpp
                                                        hgate_cnt <= #1 Thgate;      // 1 pixel per cycle
                                        endcase
                                        hgate_div_cnt <= #1 2'b10;
                                end
                        else //if (vmem_ack)
                                begin
                                        hgate_cnt <= #1 hgate_cnt_val[15:0];
 
                                        if ( hgate_div_val[2] )
                                                hgate_div_cnt <= #1 2'b10;
                                        else
                                                hgate_div_cnt <= #1 hgate_div_val[1:0];
                                end
 
        // vgate counter
        reg  [15:0] vgate_cnt;
        wire [16:0] vgate_cnt_val = {1'b0, vgate_cnt} -17'h1;
        wire vdone = vgate_cnt_val[16];
 
        always@(posedge clk_i)
                if (sclr)
                        vgate_cnt <= #1 Tvgate;
                else if (ImDoneStrb)
                        vgate_cnt <= #1 Tvgate;
                else if (hdone)
                        vgate_cnt <= #1 vgate_cnt_val[15:0];
 
        assign ImDone = hdone & vdone;
 
        assign ImDoneStrb = ImDone & !dImDone;
 
        always@(posedge clk_i)
                begin
                        dImDone <= #1 ImDone;
                        dImDoneStrb <= #1 ImDoneStrb;
                end
 
        //
        // generate addresses
        //
 
        // select video memory base address
        always@(posedge clk_i)
                if (dImDoneStrb | sclr)
                        if (!sel_VBA)
                                vmemA <= #1 VBAa;
                        else
                                vmemA <= #1 VBAb;
                else if (vmem_ack)
                        vmemA <= #1 vmemA +30'h1;
 
        // generate wishbone signals
        assign adr_o = {vmemA, 2'b00};
        wire wb_cycle = vmem_acc & !(burst_done & vmem_ack & nvmem_req) & !ImDone;
 
        always@(posedge clk_i or negedge nrst_i)
                if (!nrst_i)
                        begin
                                cyc_o <= #1 1'b0;
                                stb_o <= #1 1'b0;
                                sel_o <= #1 4'b1111;
                                cab_o <= #1 1'b0;
                                we_o  <= #1 1'b0;
                        end
                else
                        if (rst_i)
                                begin
                                        cyc_o <= #1 1'b0;
                                        stb_o <= #1 1'b0;
                                        sel_o <= #1 4'b1111;
                                        cab_o <= #1 1'b0;
                                        we_o  <= #1 1'b0;
                                end
                        else
                                begin
                                        cyc_o <= #1 wb_cycle;
                                        stb_o <= #1 wb_cycle;
                                        sel_o <= #1 4'b1111;   // only 32bit accesses are supported
                                        cab_o <= #1 wb_cycle;
                                        we_o  <= #1 1'b0;      // read only
                                end
 
        // video-data buffer (temporary store data read from video memory)
        vga_fifo #(4, 32) data_fifo (
                .clk(clk_i),
                .aclr(1'b1),
                .sclr(sclr),
                .d(dat_i),
                .wreq(vmem_ack),
                .q(data_fifo_q),
                .rreq(data_fifo_rreq),
                .empty(data_fifo_empty),
                .hfull(data_fifo_hfull),
                .full()
        );
 
        assign nvmem_req = data_fifo_hfull;
 
 
        // hookup color processor
        vga_colproc color_proc (
                .clk(clk_i),
                .srst(sclr),
                .vdat_buffer_di(data_fifo_q),
                .ColorDepth(ctrl_cd),
                .PseudoColor(ctrl_pc),
                .vdat_buffer_empty(data_fifo_empty),
                .vdat_buffer_rreq(data_fifo_rreq),
                .rgb_fifo_full(rgb_fifo_full),
                .rgb_fifo_wreq(color_proc_wreq),
                .r(color_proc_q[23:16]),
                .g(color_proc_q[15:8]),
                .b(color_proc_q[7:0]),
                .clut_req(clut_req),
                .clut_ack(clut_ack),
                .clut_offs(clut_offs),
                .clut_q(clut_q)
        );
 
        // hookup data-source-selector && hardware cursor module
`ifdef VGA_HWC1 // generate Hardware Cursor1 (if enabled)
        reg scursor1_ld;
        reg scursor1_en;
        reg scursor1_res;
        reg [31:0] scursor1_xy;
 
        always@(posedge clk_i)
                if (sclr)
                        scursor1_ld <= #1 1'b0;
                else
                        scursor1_ld <= #1 cursor1_ld | (scursor1_ld & !(ddImDoneFifoQ & !dImDoneFifoQ));
 
        always@(posedge clk_i)
                if (sclr)
                        scursor1_en <= #1 1'b0;
                else if (scursor1_ld)
                        scursor1_en <= #1 cursor1_en;
 
        always@(posedge clk_i)
                if (scursor1_ld)
                        scursor1_xy <= #1 cursor1_xy;
 
        always@(posedge clk_i)
                if (scursor1_ld)
                        scursor1_res <= #1 cursor1_res;
 
        vga_curproc hw_cursor1 (
                .clk(clk_i),
                .rst_i(sclr),
                .Thgate(Thgate),
                .Tvgate(Tvgate),
                .idat(color_proc_q),
                .idat_wreq(color_proc_wreq),
                .cursor_xy(scursor1_xy),
                .cursor_res(scursor1_res),
                .cursor_en(scursor1_en),
                .cursor_wadr(cursor_adr),
                .cursor_we(cursor1_we),
                .cursor_wdat(dat_i),
                .cc_adr_o(cc1_adr_o),
                .cc_dat_i(cc1_dat_i),
                .rgb_fifo_wreq(ssel1_wreq),
                .rgb(ssel1_q)
        );
 
`ifdef VGA_HWC0 // generate additional signals for Hardware Cursor0 (if enabled)
        reg sddImDoneFifoQ, sdImDoneFifoQ;
 
        always@(posedge clk_i)
                if (ssel1_wreq)
                        begin
                                sdImDoneFifoQ  <= #1 dImDoneFifoQ;
                                sddImDoneFifoQ <= #1 sdImDoneFifoQ;
                        end
`endif
 
`else                   // Hardware Cursor1 disabled, generate pass-through signals
 
        assign ssel1_wreq = color_proc_wreq;
        assign ssel1_q    = color_proc_q;
 
        assign cc1_adr_0  = 4'h0;
 
`ifdef VGA_HWC0 // generate additional signals for Hardware Cursor0 (if enabled)
        wire sddImDoneFifoQ, sdImDoneFifoQ;
 
        assign sdImDoneFifoQ  = dImDoneFifoQ;
        assign sddImDoneFifoQ = ddImDoneFifoQ;
`endif
 
`endif
 
 
`ifdef VGA_HWC0 // generate Hardware Cursor0 (if enabled)
        reg scursor0_ld;
        reg scursor0_en;
        reg scursor0_res;
        reg [31:0] scursor0_xy;
 
        always@(posedge clk_i)
                if (sclr)
                        scursor0_ld <= #1 1'b0;
                else
                        scursor0_ld <= #1 cursor0_ld | (scursor0_ld & !(sddImDoneFifoQ & !sdImDoneFifoQ));
 
        always@(posedge clk_i)
                if (sclr)
                        scursor0_en <= #1 1'b0;
                else if (scursor0_ld)
                        scursor0_en <= #1 cursor0_en;
 
        always@(posedge clk_i)
                if (scursor0_ld)
                        scursor0_xy <= #1 cursor0_xy;
 
        always@(posedge clk_i)
                if (scursor0_ld)
                        scursor0_res <= #1 cursor0_res;
 
        vga_curproc hw_cursor0 (
                .clk(clk_i),
                .rst_i(sclr),
                .Thgate(Thgate),
                .Tvgate(Tvgate),
                .idat(ssel1_q),
                .idat_wreq(ssel1_wreq),
                .cursor_xy(scursor0_xy),
                .cursor_en(scursor0_en),
                .cursor_res(scursor0_res),
                .cursor_wadr(cursor_adr),
                .cursor_we(cursor0_we),
                .cursor_wdat(dat_i),
                .cc_adr_o(cc0_adr_o),
                .cc_dat_i(cc0_dat_i),
                .rgb_fifo_wreq(rgb_fifo_wreq),
                .rgb(rgb_fifo_d)
        );
`else   // Hardware Cursor0 disabled, generate pass-through signals
        assign rgb_fifo_wreq = ssel1_wreq;
        assign rgb_fifo_d = ssel1_q;
 
        assign cc0_adr_o  = 4'h0;
`endif
 
        // hookup RGB buffer (temporary station between WISHBONE-clock-domain 
        // and pixel-clock-domain)
        // The cursor_processor pipelines introduce a delay between the color
        // processor's rgb_fifo_wreq and the rgb_fifo_full signals. To compensate
        // for this we double the rgb_fifo.
        vga_fifo #(4, 24) rgb_fifo (
                .clk(clk_i),
                .aclr(1'b1),
                .sclr(sclr),
                .d(rgb_fifo_d),
                .wreq(rgb_fifo_wreq),
                .q(line_fifo_d),
                .rreq(rgb_fifo_rreq),
                .empty(rgb_fifo_empty),
                .hfull(rgb_fifo_full),
                .full()
        );
 
        assign rgb_fifo_rreq = !line_fifo_full && !rgb_fifo_empty;
        assign line_fifo_wreq = rgb_fifo_rreq;
 
endmodule
 
 

Line No.	Rev	Author	Line
1	23	rherveille	`/////////////////////////////////////////////////////////////////////`
2			`//// ////`
3	30	rherveille	`//// WISHBONE rev.B2 compliant enhanced VGA/LCD Core ////`
4	23	rherveille	`//// Wishbone master interface ////`
5			`//// ////`
6			`//// Author: Richard Herveille ////`
7			`//// richard@asics.ws ////`
8			`//// www.asics.ws ////`
9			`//// ////`
10			`//// Downloaded from: http://www.opencores.org/projects/vga_lcd ////`
11			`//// ////`
12			`/////////////////////////////////////////////////////////////////////`
13			`//// ////`
14	30	rherveille	`//// Copyright (C) 2001, 2002 Richard Herveille ////`
15			`//// richard@asics.ws ////`
16	23	rherveille	`//// ////`
17			`//// This source file may be used and distributed without ////`
18			`//// restriction provided that this copyright statement is not ////`
19			`//// removed from the file and that any derivative work contains ////`
20			`//// the original copyright notice and the associated disclaimer.////`
21			`//// ////`
22			//// THIS SOFTWARE IS PROVIDED ``AS IS'' AND WITHOUT ANY ////
23			`//// EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED ////`
24			`//// TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS ////`
25			`//// FOR A PARTICULAR PURPOSE. IN NO EVENT SHALL THE AUTHOR ////`
26			`//// OR CONTRIBUTORS BE LIABLE FOR ANY DIRECT, INDIRECT, ////`
27			`//// INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES ////`
28			`//// (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE ////`
29			`//// GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR ////`
30			`//// BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF ////`
31			`//// LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT ////`
32			`//// (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT ////`
33			`//// OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE ////`
34			`//// POSSIBILITY OF SUCH DAMAGE. ////`
35			`//// ////`
36			`/////////////////////////////////////////////////////////////////////`
37
38			`// CVS Log`
39	17	rherveille	`//`
40	33	rherveille	`// $Id: vga_wb_master.v,v 1.8 2002-03-04 11:01:59 rherveille Exp $`
41	17	rherveille	`//`
42	33	rherveille	`// $Date: 2002-03-04 11:01:59 $`
43			`// $Revision: 1.8 $`
44	23	rherveille	`// $Author: rherveille $`
45			`// $Locker: $`
46			`// $State: Exp $`
47			`//`
48			`// Change History:`
49			`// $Log: not supported by cvs2svn $`
50	33	rherveille	`// Revision 1.7 2002/02/16 10:40:00 rherveille`
51			`// Some minor bug-fixes.`
52			`// Changed vga_ssel into vga_curproc (cursor processor).`
53			`//`
54	31	rherveille	`// Revision 1.6 2002/02/07 05:42:10 rherveille`
55			`// Fixed some bugs discovered by modified testbench`
56			`// Removed / Changed some strange logic constructions`
57			`// Started work on hardware cursor support (not finished yet)`
58			`// Changed top-level name to vga_enh_top.v`
59			`//`
60	17	rherveille
61			`include "timescale.v"
62	30	rherveille	`include "vga_defines.v"
63	17	rherveille
64	19	rherveille	`module vga_wb_master (clk_i, rst_i, nrst_i, cyc_o, stb_o, cab_o, we_o, adr_o, sel_o, ack_i, err_i, dat_i, sint,`
65	30	rherveille	`ctrl_ven, ctrl_cd, ctrl_pc, ctrl_vbl, ctrl_vbsw, ctrl_cbsw,`
66	33	rherveille	`cursor0_en, cursor0_res, cursor0_xy, cursor0_ba, cursor0_ld, cc0_adr_o, cc0_dat_i,`
67			`cursor1_en, cursor1_res, cursor1_xy, cursor1_ba, cursor1_ld, cc1_adr_o, cc1_dat_i,`
68	30	rherveille	`VBAa, VBAb, Thgate, Tvgate,`
69	19	rherveille	`stat_avmp, stat_acmp, vmem_switch, clut_switch, line_fifo_wreq, line_fifo_d, line_fifo_full,`
70			`clut_req, clut_ack, clut_adr, clut_q);`
71	17	rherveille
72			`// inputs & outputs`
73
74			`// wishbone signals`
75	19	rherveille	`input clk_i; // master clock input`
76			`input rst_i; // synchronous active high reset`
77			`input nrst_i; // asynchronous low reset`
78			`output cyc_o; // cycle output`
79			`reg cyc_o;`
80			`output stb_o; // strobe ouput`
81			`reg stb_o;`
82			`output cab_o; // consecutive address burst output`
83			`reg cab_o;`
84			`output we_o; // write enable output`
85			`reg we_o;`
86			`output [31:0] adr_o; // address output`
87			`output [ 3:0] sel_o; // byte select outputs (only 32bits accesses are supported)`
88			`reg [3:0] sel_o;`
89			`input ack_i; // wishbone cycle acknowledge`
90			`input err_i; // wishbone cycle error`
91			`input [31:0] dat_i; // wishbone data in`
92	17	rherveille
93	19	rherveille	`output sint; // non recoverable error, interrupt host`
94	17	rherveille
95			`// control register settings`
96			`input ctrl_ven; // video enable bit`
97			`input [1:0] ctrl_cd; // color depth`
98			`input ctrl_pc; // 8bpp pseudo color/bw`
99			`input [1:0] ctrl_vbl; // burst length`
100			`input ctrl_vbsw; // enable video bank switching`
101			`input ctrl_cbsw; // enable clut bank switching`
102
103	33	rherveille	`input cursor0_en; // enable hardware cursor0`
104			`input cursor0_res; // cursor0 resolution`
105			`input [31: 0] cursor0_xy; // (x,y) address hardware cursor0`
106			`input [31:11] cursor0_ba; // cursor0 video memory base address`
107			`input cursor0_ld; // reload cursor0 from video memory`
108			`output [ 3: 0] cc0_adr_o; // cursor0 color registers address output`
109			`input [15: 0] cc0_dat_i; // cursor0 color registers data input`
110			`input cursor1_en; // enable hardware cursor1`
111			`input cursor1_res; // cursor1 resolution`
112			`input [31: 0] cursor1_xy; // (x,y) address hardware cursor1`
113			`input [31:11] cursor1_ba; // cursor1 video memory base address`
114			`input cursor1_ld; // reload cursor1 from video memory`
115			`output [ 3: 0] cc1_adr_o; // cursor1 color registers address output`
116			`input [15: 0] cc1_dat_i; // cursor1 color registers data input`
117	30	rherveille
118	17	rherveille	`// video memory addresses`
119			`input [31: 2] VBAa; // video memory base address A`
120			`input [31: 2] VBAb; // video memory base address B`
121
122			`input [15:0] Thgate; // horizontal visible area (in pixels)`
123			`input [15:0] Tvgate; // vertical visible area (in horizontal lines)`
124
125			`output stat_avmp; // active video memory page`
126			`output stat_acmp; // active CLUT memory page`
127	19	rherveille	`reg stat_acmp;`
128			`output vmem_switch; // video memory bank-switch request: memory page switched (when enabled)`
129			`output clut_switch; // clut memory bank-switch request: clut page switched (when enabled)`
130	17	rherveille
131			`// to/from line-fifo`
132			`output line_fifo_wreq;`
133			`output [23:0] line_fifo_d;`
134			`input line_fifo_full;`
135
136	19	rherveille	`// to/from color lookup-table`
137			`output clut_req; // clut access request`
138			`input clut_ack; // clut access acknowledge`
139			`output [ 8:0] clut_adr; // clut access address`
140			`input [23:0] clut_q; // clut access data in`
141
142	17	rherveille	`//`
143			`// variable declarations`
144			`//`
145	19	rherveille
146			`reg vmem_acc; // video memory access`
147	17	rherveille	`wire nvmem_req, vmem_ack; // NOT video memory access request // video memory access acknowledge`
148
149	30	rherveille	`wire ImDone; // Done reading image from video mem`
150	19	rherveille	`reg dImDone; // delayed ImDone`
151			`wire ImDoneStrb; // image done (strobe signal)`
152			`reg dImDoneStrb; // delayed ImDoneStrb`
153
154			`wire data_fifo_rreq, data_fifo_empty, data_fifo_hfull;`
155			`wire [31:0] data_fifo_q;`
156	30	rherveille	`wire [23:0] color_proc_q, ssel1_q, rgb_fifo_d;`
157			`wire color_proc_wreq, ssel1_wreq, rgb_fifo_wreq;`
158			`wire rgb_fifo_empty, rgb_fifo_full, rgb_fifo_rreq;`
159	19	rherveille	`wire ImDoneFifoQ;`
160	30	rherveille	`reg dImDoneFifoQ, ddImDoneFifoQ;`
161	19	rherveille
162			`reg sclr; // synchronous clear`
163
164			`wire [7:0] clut_offs; // color lookup table offset`
165
166	30	rherveille	`reg [8:0] cursor_adr;`
167			`reg cursor0_we, cursor1_we;`
168
169	17	rherveille	`//`
170			`// module body`
171			`//`
172
173	19	rherveille	`// generate synchronous clear`
174			`always@(posedge clk_i)`
175			`sclr <= #1 ~ctrl_ven;`
176	17	rherveille
177			`//`
178			`// WISHBONE block`
179			`//`
180			`reg [ 2:0] burst_cnt; // video memory burst access counter`
181			`wire burst_done; // completed burst access to video mem`
182	19	rherveille	`reg sel_VBA; // select video memory base address`
183	17	rherveille	`reg [31:2] vmemA; // video memory address`
184
185			`// wishbone access controller, video memory access request has highest priority (try to keep fifo full)`
186	19	rherveille	`always@(posedge clk_i)`
187			`if (sclr)`
188			`vmem_acc <= #1 1'b0;`
189	17	rherveille	`else`
190	19	rherveille	`vmem_acc <= #1 (!nvmem_req \| (vmem_acc & !(burst_done & vmem_ack) ) ) & !ImDone;`
191	17	rherveille
192	19	rherveille	`assign vmem_ack = ack_i;`
193			`assign sint = err_i; // Non recoverable error, interrupt host system`
194	17	rherveille
195	19	rherveille	`// select active memory page`
196			`assign vmem_switch = ImDoneStrb;`
197	17	rherveille
198	19	rherveille	`always@(posedge clk_i)`
199			`if (sclr)`
200	17	rherveille	`sel_VBA <= #1 1'b0;`
201			`else if (ctrl_vbsw)`
202	19	rherveille	`sel_VBA <= #1 sel_VBA ^ vmem_switch; // select next video memory bank when finished reading current bank (and bank switch enabled)`
203	17	rherveille
204			`assign stat_avmp = sel_VBA; // assign output`
205
206	30	rherveille	`// selecting active clut page / cursor data`
207			`// delay image done same amount as video-memory data`
208	19	rherveille	`vga_fifo #(4, 1) clut_sw_fifo (`
209			`.clk(clk_i),`
210			`.aclr(1'b1),`
211			`.sclr(sclr),`
212			`.d(ImDone),`
213	30	rherveille	`.wreq(vmem_ack),`
214	19	rherveille	`.q(ImDoneFifoQ),`
215			`.rreq(data_fifo_rreq),`
216			`.empty(),`
217			`.hfull(),`
218			`.full()`
219			`);`
220
221	30	rherveille	`// clut bank switch / cursor data delay2: Account for ColorProcessor DataBuffer delay`
222	19	rherveille	`always@(posedge clk_i)`
223	30	rherveille	`if (sclr)`
224			`dImDoneFifoQ <= #1 1'b0;`
225			`else if (data_fifo_rreq)`
226	19	rherveille	`dImDoneFifoQ <= #1 ImDoneFifoQ;`
227
228			`always@(posedge clk_i)`
229			`if (sclr)`
230	30	rherveille	`ddImDoneFifoQ <= #1 1'b0;`
231			`else`
232			`ddImDoneFifoQ <= #1 dImDoneFifoQ;`
233	19	rherveille
234	30	rherveille	`assign clut_switch = ddImDoneFifoQ & !dImDoneFifoQ;`
235	19	rherveille
236			`always@(posedge clk_i)`
237			`if (sclr)`
238			`stat_acmp <= #1 1'b0;`
239	17	rherveille	`else if (ctrl_cbsw)`
240	19	rherveille	`stat_acmp <= #1 stat_acmp ^ clut_switch; // select next clut when finished reading clut for current video bank (and bank switch enabled)`
241	17	rherveille
242	19	rherveille	`// generate clut-address`
243			`assign clut_adr = {stat_acmp, clut_offs};`
244	17	rherveille
245			`// generate burst counter`
246			`wire [3:0] burst_cnt_val;`
247			`assign burst_cnt_val = {1'b0, burst_cnt} -4'h1;`
248			`assign burst_done = burst_cnt_val[3];`
249
250	19	rherveille	`always@(posedge clk_i)`
251	17	rherveille	`if ( (burst_done & vmem_ack) \| !vmem_acc)`
252			`case (ctrl_vbl) // synopsis full_case parallel_case`
253			`2'b00: burst_cnt <= #1 3'b000; // burst length 1`
254			`2'b01: burst_cnt <= #1 3'b001; // burst length 2`
255			`2'b10: burst_cnt <= #1 3'b011; // burst length 4`
256			`2'b11: burst_cnt <= #1 3'b111; // burst length 8`
257			`endcase`
258			`else if(vmem_ack)`
259			`burst_cnt <= #1 burst_cnt_val[2:0];`
260
261			`//`
262			`// generate image counters`
263			`//`
264
265			`// hgate counter`
266	19	rherveille	`reg [15:0] hgate_cnt;`
267			`reg [16:0] hgate_cnt_val;`
268			`reg [1:0] hgate_div_cnt;`
269			`reg [2:0] hgate_div_val;`
270	17	rherveille
271	19	rherveille	`wire hdone = hgate_cnt_val[16] & vmem_ack; // ????`
272
273			`always@(hgate_cnt or hgate_div_cnt or ctrl_cd)`
274			`begin`
275			`hgate_div_val = {1'b0, hgate_div_cnt} - 3'h1;`
276
277			`if (ctrl_cd != 2'b10)`
278			`hgate_cnt_val = {1'b0, hgate_cnt} - 17'h1;`
279			`else if ( hgate_div_val[2] )`
280			`hgate_cnt_val = {1'b0, hgate_cnt} - 17'h1;`
281	17	rherveille	`else`
282	19	rherveille	`hgate_cnt_val = {1'b0, hgate_cnt};`
283			`end`
284	17	rherveille
285	19	rherveille	`always@(posedge clk_i)`
286			`if (sclr)`
287			`begin`
288			`case(ctrl_cd) // synopsys full_case parallel_case`
289			`2'b00: // 8bpp`
290			`hgate_cnt <= #1 Thgate >> 2; // 4 pixels per cycle`
291			`2'b01: //16bpp`
292			`hgate_cnt <= #1 Thgate >> 1; // 2 pixels per cycle`
293			`2'b10: //24bpp`
294			`hgate_cnt <= #1 Thgate >> 2; // 4/3 pixels per cycle`
295	28	rherveille	`2'b11: //32bpp`
296			`hgate_cnt <= #1 Thgate; // 1 pixel per cycle`
297	19	rherveille	`endcase`
298
299			`hgate_div_cnt <= 2'b10;`
300			`end`
301			`else if (vmem_ack)`
302			`if (hdone)`
303			`begin`
304			`case(ctrl_cd) // synopsys full_case parallel_case`
305			`2'b00: // 8bpp`
306			`hgate_cnt <= #1 Thgate >> 2; // 4 pixels per cycle`
307			`2'b01: //16bpp`
308			`hgate_cnt <= #1 Thgate >> 1; // 2 pixels per cycle`
309			`2'b10: //24bpp`
310			`hgate_cnt <= #1 Thgate >> 2; // 4/3 pixels per cycle`
311	28	rherveille	`2'b11: //32bpp`
312			`hgate_cnt <= #1 Thgate; // 1 pixel per cycle`
313	19	rherveille	`endcase`
314			`hgate_div_cnt <= #1 2'b10;`
315			`end`
316			`else //if (vmem_ack)`
317			`begin`
318			`hgate_cnt <= #1 hgate_cnt_val[15:0];`
319
320			`if ( hgate_div_val[2] )`
321			`hgate_div_cnt <= #1 2'b10;`
322			`else`
323			`hgate_div_cnt <= #1 hgate_div_val[1:0];`
324			`end`
325
326	17	rherveille	`// vgate counter`
327	19	rherveille	`reg [15:0] vgate_cnt;`
328			`wire [16:0] vgate_cnt_val = {1'b0, vgate_cnt} -17'h1;`
329			`wire vdone = vgate_cnt_val[16];`
330	17	rherveille
331	19	rherveille	`always@(posedge clk_i)`
332			`if (sclr)`
333	17	rherveille	`vgate_cnt <= #1 Tvgate;`
334	19	rherveille	`else if (ImDoneStrb)`
335			`vgate_cnt <= #1 Tvgate;`
336			`else if (hdone)`
337			`vgate_cnt <= #1 vgate_cnt_val[15:0];`
338	17	rherveille
339	30	rherveille	`assign ImDone = hdone & vdone;`
340	19	rherveille
341	17	rherveille	`assign ImDoneStrb = ImDone & !dImDone;`
342
343	19	rherveille	`always@(posedge clk_i)`
344			`begin`
345	17	rherveille	`dImDone <= #1 ImDone;`
346	19	rherveille	`dImDoneStrb <= #1 ImDoneStrb;`
347			`end`
348	17	rherveille
349			`//`
350			`// generate addresses`
351			`//`
352
353			`// select video memory base address`
354	19	rherveille	`always@(posedge clk_i)`
355			`if (dImDoneStrb \| sclr)`
356	17	rherveille	`if (!sel_VBA)`
357			`vmemA <= #1 VBAa;`
358			`else`
359			`vmemA <= #1 VBAb;`
360			`else if (vmem_ack)`
361			`vmemA <= #1 vmemA +30'h1;`
362
363			`// generate wishbone signals`
364	19	rherveille	`assign adr_o = {vmemA, 2'b00};`
365			`wire wb_cycle = vmem_acc & !(burst_done & vmem_ack & nvmem_req) & !ImDone;`
366	17	rherveille
367	19	rherveille	`always@(posedge clk_i or negedge nrst_i)`
368			`if (!nrst_i)`
369	17	rherveille	`begin`
370	19	rherveille	`cyc_o <= #1 1'b0;`
371			`stb_o <= #1 1'b0;`
372			`sel_o <= #1 4'b1111;`
373			`cab_o <= #1 1'b0;`
374			`we_o <= #1 1'b0;`
375	17	rherveille	`end`
376			`else`
377	19	rherveille	`if (rst_i)`
378	17	rherveille	`begin`
379	19	rherveille	`cyc_o <= #1 1'b0;`
380			`stb_o <= #1 1'b0;`
381			`sel_o <= #1 4'b1111;`
382			`cab_o <= #1 1'b0;`
383			`we_o <= #1 1'b0;`
384	17	rherveille	`end`
385			`else`
386			`begin`
387	19	rherveille	`cyc_o <= #1 wb_cycle;`
388			`stb_o <= #1 wb_cycle;`
389			`sel_o <= #1 4'b1111; // only 32bit accesses are supported`
390			`cab_o <= #1 wb_cycle;`
391			`we_o <= #1 1'b0; // read only`
392	17	rherveille	`end`
393
394	30	rherveille	`// video-data buffer (temporary store data read from video memory)`
395	19	rherveille	`vga_fifo #(4, 32) data_fifo (`
396			`.clk(clk_i),`
397	17	rherveille	`.aclr(1'b1),`
398	19	rherveille	`.sclr(sclr),`
399			`.d(dat_i),`
400	17	rherveille	`.wreq(vmem_ack),`
401	19	rherveille	`.q(data_fifo_q),`
402			`.rreq(data_fifo_rreq),`
403			`.empty(data_fifo_empty),`
404			`.hfull(data_fifo_hfull),`
405	17	rherveille	`.full()`
406			`);`
407
408	19	rherveille	`assign nvmem_req = data_fifo_hfull;`
409	17	rherveille
410
411			`// hookup color processor`
412			`vga_colproc color_proc (`
413	19	rherveille	`.clk(clk_i),`
414			`.srst(sclr),`
415	30	rherveille	`.vdat_buffer_di(data_fifo_q),`
416	17	rherveille	`.ColorDepth(ctrl_cd),`
417			`.PseudoColor(ctrl_pc),`
418	30	rherveille	`.vdat_buffer_empty(data_fifo_empty),`
419			`.vdat_buffer_rreq(data_fifo_rreq),`
420			`.rgb_fifo_full(rgb_fifo_full),`
421			`.rgb_fifo_wreq(color_proc_wreq),`
422			`.r(color_proc_q[23:16]),`
423			`.g(color_proc_q[15:8]),`
424			`.b(color_proc_q[7:0]),`
425	17	rherveille	`.clut_req(clut_req),`
426	19	rherveille	`.clut_ack(clut_ack),`
427	17	rherveille	`.clut_offs(clut_offs),`
428	19	rherveille	`.clut_q(clut_q)`
429	17	rherveille	`);`
430
431	30	rherveille	`// hookup data-source-selector && hardware cursor module`
432	31	rherveille	`ifdef VGA_HWC1 // generate Hardware Cursor1 (if enabled)
433	30	rherveille	`reg scursor1_ld;`
434			`reg scursor1_en;`
435	33	rherveille	`reg scursor1_res;`
436	30	rherveille	`reg [31:0] scursor1_xy;`
437
438			`always@(posedge clk_i)`
439			`if (sclr)`
440			`scursor1_ld <= #1 1'b0;`
441			`else`
442			`scursor1_ld <= #1 cursor1_ld \| (scursor1_ld & !(ddImDoneFifoQ & !dImDoneFifoQ));`
443
444			`always@(posedge clk_i)`
445			`if (sclr)`
446			`scursor1_en <= #1 1'b0;`
447			`else if (scursor1_ld)`
448			`scursor1_en <= #1 cursor1_en;`
449
450			`always@(posedge clk_i)`
451			`if (scursor1_ld)`
452			`scursor1_xy <= #1 cursor1_xy;`
453
454	33	rherveille	`always@(posedge clk_i)`
455			`if (scursor1_ld)`
456			`scursor1_res <= #1 cursor1_res;`
457
458	31	rherveille	`vga_curproc hw_cursor1 (`
459	30	rherveille	`.clk(clk_i),`
460			`.rst_i(sclr),`
461			`.Thgate(Thgate),`
462			`.Tvgate(Tvgate),`
463			`.idat(color_proc_q),`
464			`.idat_wreq(color_proc_wreq),`
465			`.cursor_xy(scursor1_xy),`
466	33	rherveille	`.cursor_res(scursor1_res),`
467	30	rherveille	`.cursor_en(scursor1_en),`
468	33	rherveille	`.cursor_wadr(cursor_adr),`
469	30	rherveille	`.cursor_we(cursor1_we),`
470	33	rherveille	`.cursor_wdat(dat_i),`
471			`.cc_adr_o(cc1_adr_o),`
472			`.cc_dat_i(cc1_dat_i),`
473	30	rherveille	`.rgb_fifo_wreq(ssel1_wreq),`
474			`.rgb(ssel1_q)`
475			`);`
476
477	31	rherveille	`ifdef VGA_HWC0 // generate additional signals for Hardware Cursor0 (if enabled)
478			`reg sddImDoneFifoQ, sdImDoneFifoQ;`
479
480			`always@(posedge clk_i)`
481			`if (ssel1_wreq)`
482			`begin`
483			`sdImDoneFifoQ <= #1 dImDoneFifoQ;`
484			`sddImDoneFifoQ <= #1 sdImDoneFifoQ;`
485			`end`
486			`endif
487
488			`else // Hardware Cursor1 disabled, generate pass-through signals
489
490	30	rherveille	`assign ssel1_wreq = color_proc_wreq;`
491			`assign ssel1_q = color_proc_q;`
492
493	33	rherveille	`assign cc1_adr_0 = 4'h0;`
494
495	31	rherveille	`ifdef VGA_HWC0 // generate additional signals for Hardware Cursor0 (if enabled)
496			`wire sddImDoneFifoQ, sdImDoneFifoQ;`
497
498	30	rherveille	`assign sdImDoneFifoQ = dImDoneFifoQ;`
499			`assign sddImDoneFifoQ = ddImDoneFifoQ;`
500			`endif

Browse

Tools

Subversion Repositories vga_lcd

[/] [vga_lcd/] [trunk/] [rtl/] [verilog/] [vga_wb_master.v] - Blame information for rev 33