Firebee/FireBee_SVN
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

reformatted

Browse Source
This commit is contained in:
Markus Fröschle
2014-12-20 08:25:53 +00:00
parent cbff11f5d8
commit c51e6c6098
1 changed files with 267 additions and 267 deletions
Download Patch File Download Diff File Expand all files Collapse all files

534
vhdl/rtl/vhdl/DDR/DDR_CTRL.vhd
View File

@@ -1,37 +1,37 @@
----------------------------------------------------------------------
---- ----
---- This file IS part of the 'Firebee' project. ----
---- This file is part of the 'Firebee' project. ----
---- http://acp.atari.org ----
---- ----
---- Description: ----
---- This design unit provides the DDR controller of the 'Firebee'----
---- computer. It IS optimized for the use of an Altera Cyclone ----
---- FPGA (EP3C40F484). This IP-Core IS based on the first edi- ----
---- computer. It is optimized for the use of an Altera Cyclone ----
---- FPGA (EP3C40F484). This IP-Core is based on the first edi- ----
---- tion of the Firebee configware originally provided by Fredi ----
---- AshwANDen AND Wolfgang Förster. This release IS IN compa- ----
---- rision to the first edition completely written IN VHDL. ----
---- Aschwanden and Wolfgang Förster. This release is in compa- ----
---- rision to the first edition completely written in VHDL. ----
---- ----
---- Author(s): ----
---- - Wolfgang Foerster, wf@experiment-s.de; wf@inventronik.de ----
---- ----
----------------------------------------------------------------------
---- ----
---- Copyright (C) 2012 Fredi AschwANDen, Wolfgang Förster ----
---- Copyright (C) 2012 Fredi Aschwanden, Wolfgang Förster ----
---- ----
---- This source file IS free software; you can redistribute it ----
---- This source file is free software; you can redistribute it ----
---- AND/OR modify it under the terms of the GNU General Public ----
---- License as published by the Free Software Foundation; either ----
---- version 2 of the License, OR (at your option) any later ----
---- version. ----
---- ----
---- This program IS distributed IN the hope that it will be ----
---- This program is distributed in the hope that it will be ----
---- useful, but WITHOUT ANY WARRANTY; WITHout even the implied ----
---- warranty of MERCHANTABILITY OR FITNESS FOR A PARTICULAR ----
---- PURPOSE. See the GNU General Public License for more ----
---- details. ----
---- ----
---- You should have received a copy of the GNU General Public ----
---- License along WITH this program; IF NOT, write to the Free ----
---- License along WITH this program; IF not, write to the Free ----
---- Software Foundation, Inc., 51 Franklin Street, Fifth Floor, ----
---- Boston, MA 02110-1301, USA. ----
---- ----
@@ -46,7 +46,7 @@ LIBRARY IEEE;
USE IEEE.std_logic_1164.ALL;
USE IEEE.numeric_std.ALL;
ENTITY DDR_CTRL_V1 IS
ENTITY DDR_CTRL IS
PORT(
clk_main : IN STD_LOGIC;
DDR_SYNC_66M : IN STD_LOGIC;
@@ -59,13 +59,13 @@ ENTITY DDR_CTRL_V1 IS
FB_WRn : IN STD_LOGIC;
FIFO_CLR : IN STD_LOGIC;
video_control_register : IN STD_LOGIC_VECTOR (15 DOWNTO 0);
BLITTER_ADR : IN STD_LOGIC_VECTOR (31 DOWNTO 0);
blitter_adr : IN STD_LOGIC_VECTOR (31 DOWNTO 0);
blitter_sig : IN STD_LOGIC;
BLITTER_WR : IN STD_LOGIC;
DDRCLK0 : IN STD_LOGIC;
ddrclk0 : IN STD_LOGIC;
CLK_33M : IN STD_LOGIC;
FIFO_MW : IN STD_LOGIC_VECTOR (8 DOWNTO 0);
fifo_mw : IN STD_LOGIC_VECTOR (8 DOWNTO 0);
VA : OUT STD_LOGIC_VECTOR (12 DOWNTO 0); -- video Adress bus at the DDR chips
vwen : OUT STD_LOGIC; -- video memory write enable
@@ -78,13 +78,13 @@ ENTITY DDR_CTRL_V1 IS
FB_VDOE : OUT STD_LOGIC_VECTOR (3 DOWNTO 0);
sr_fifo_wre : OUT STD_LOGIC;
SR_DDR_FB : OUT STD_LOGIC;
SR_DDR_WR : OUT STD_LOGIC;
SR_DDRWR_D_SEL : OUT STD_LOGIC;
SR_VDMP : OUT STD_LOGIC_VECTOR (7 DOWNTO 0);
sr_ddr_fb : OUT STD_LOGIC;
sr_ddr_wr : OUT STD_LOGIC;
sr_ddrwr_d_sel : OUT STD_LOGIC;
sr_vdmp : OUT STD_LOGIC_VECTOR (7 DOWNTO 0);
VIDEO_DDR_TA : OUT STD_LOGIC;
SR_BLITTER_DACK : OUT STD_LOGIC;
sr_blitter_dack : OUT STD_LOGIC;
BA : OUT STD_LOGIC_VECTOR (1 DOWNTO 0);
ddrwr_d_sel1 : OUT STD_LOGIC;
VDM_SEL : OUT STD_LOGIC_VECTOR (3 DOWNTO 0);
@@ -93,33 +93,33 @@ ENTITY DDR_CTRL_V1 IS
DATA_EN_H : OUT STD_LOGIC;
DATA_EN_L : OUT STD_LOGIC
);
END ENTITY DDR_CTRL_V1;
END ENTITY DDR_CTRL;
ARCHITECTURE BEHAVIOUR of DDR_CTRL_V1 IS
-- FIFO WATER MARK:
CONSTANT FIFO_LWM : INTEGER := 0; -- low water mark
CONSTANT FIFO_MWM : INTEGER := 200; -- medium water mark
CONSTANT FIFO_HWM : INTEGER := 500; -- high water mark
ARCHITECTURE BEHAVIOUR of DDR_CTRL IS
-- fifo WATER MARK:
CONSTANT fifo_lwm : INTEGER := 0; -- low water mark
CONSTANT fifo_mwM : INTEGER := 200; -- medium water mark
CONSTANT fifo_hwm : INTEGER := 500; -- high water mark
-- constants for bits IN video_control_register
CONSTANT vrcr_vcke : INTEGER := 0;
CONSTANT vrcr_vcs : INTEGER := 1;
CONSTANT vrcr_refresh_on : INTEGER := 2;
CONSTANT vrcr_config_on : INTEGER := 3;
CONSTANT vrcr_vcs : INTEGER := 1;
--
CONSTANT vrcr_fifo_on : INTEGER := 24;
CONSTANT vrcr_border_on : INTEGER := 25;
TYPE access_width_t IS (LONG, WORD, BYTE);
TYPE ddr_access_t IS (CPU, FIFO, BLITTER, NONE);
TYPE fb_regddr_t IS (FR_WAIT, FR_S0, FR_S1, FR_S2, FR_S3);
TYPE ddr_sm_t IS (DS_T1, DS_T2A, DS_T2B, DS_T3, DS_N5, DS_N6, DS_N7, DS_N8, -- Start (normal 8 cycles total = 60ns).
DS_C2, DS_C3, DS_C4, DS_C5, DS_C6, DS_C7, -- Configuration.
DS_T4R, DS_T5R, -- Read CPU OR BLITTER.
DS_T4W, DS_T5W, DS_T6W, DS_T7W, DS_T8W, DS_T9W, -- Write CPU OR BLITTER.
DS_T4F, DS_T5F, DS_T6F, DS_T7F, DS_T8F, DS_T9F, DS_T10F, -- Read FIFO.
DS_CB6, DS_CB8, -- Close FIFO bank.
DS_R2, DS_R3, DS_R4, DS_R5, DS_R6); -- Refresh: 10 x 7.5ns = 75ns.
TYPE ddr_access_t IS (cpu, fifo, blitter, NONE);
TYPE fb_regddr_t IS (FR_WAIT, FR_S0, fr_s1, FR_S2, fr_s3);
TYPE ddr_sm_t IS (ds_t1, ds_t2a, ds_t2b, ds_t3, ds_n5, ds_n6, ds_n7, ds_n8, -- Start (normal 8 cycles total = 60ns).
DS_C2, ds_c3, dc_c4, ds_c5, ds_c6, ds_c7, -- Configuration.
DS_T4R, ds_t5r, -- Read cpu OR blitter.
DS_T4W, DS_T5W, DS_T6W, ds_t7w, DS_T8W, ds_t9w, -- Write cpu OR blitter.
ds_t4f, ds_t5f, ds_t6f, ds_t7f, DS_T8F, ds_t9f, ds_t10f, -- Read fifo.
ds_cb6, ds_cb8, -- Close fifo bank.
ds_r2, ds_r3, ds_r4, ds_r5, ds_r6); -- Refresh: 10 x 7.5ns = 75ns.
SIGNAL access_width : access_width_t;
SIGNAL fb_regddr : fb_regddr_t;
@@ -205,7 +205,7 @@ BEGIN
'1' WHEN FB_ADR(1 DOWNTO 0) = "11" ELSE '0'; -- Byte 3.
---------------------------------------------------------------------------------------------------------------------------------------------------------------
------------------------------------ CPU READ (REG DDR => CPU) AND WRITE (CPU => REG DDR) ---------------------------------------------------------------------
------------------------------------ cpu READ (REG DDR => cpu) AND WRITE (cpu => REG DDR) ---------------------------------------------------------------------
fbctrl_reg : PROCESS
BEGIN
WAIT UNTIL RISING_EDGE(clk_main);
@@ -226,12 +226,12 @@ BEGIN
WHEN FR_S0 =>
IF ddr_cs = '1' AND access_width = LONG THEN
fb_regddr_next <= FR_S1;
fb_regddr_next <= fr_s1;
ELSE
fb_regddr_next <= FR_WAIT;
END IF;
WHEN FR_S1 =>
WHEN fr_s1 =>
IF ddr_cs = '1' THEN
fb_regddr_next <= FR_S2;
ELSE
@@ -242,96 +242,96 @@ BEGIN
IF ddr_cs = '1' AND bus_cyc = '0' AND access_width = LONG AND FB_WRn = '0' THEN -- wait during long word access IF needed
fb_regddr_next <= FR_S2;
ELSIF ddr_cs = '1' THEN
fb_regddr_next <= FR_S3;
fb_regddr_next <= fr_s3;
ELSE
fb_regddr_next <= FR_WAIT;
END IF;
WHEN FR_S3 =>
WHEN fr_s3 =>
fb_regddr_next <= FR_WAIT;
END CASE;
END PROCESS FBCTRL_DEC;
-- Coldfire CPU access:
-- Coldfire cpu access:
FB_LE(0) <= NOT FB_WRn WHEN fb_regddr = FR_WAIT ELSE
NOT FB_WRn WHEN fb_regddr = FR_S0 AND ddr_cs = '1' ELSE '0';
FB_LE(1) <= NOT FB_WRn WHEN fb_regddr = FR_S1 AND ddr_cs = '1' ELSE '0';
FB_LE(1) <= NOT FB_WRn WHEN fb_regddr = fr_s1 AND ddr_cs = '1' ELSE '0';
FB_LE(2) <= NOT FB_WRn WHEN fb_regddr = FR_S2 AND ddr_cs = '1' ELSE '0';
FB_LE(3) <= NOT FB_WRn WHEN fb_regddr = FR_S3 AND ddr_cs = '1' ELSE '0';
FB_LE(3) <= NOT FB_WRn WHEN fb_regddr = fr_s3 AND ddr_cs = '1' ELSE '0';
-- Video data access:
VIDEO_DDR_TA <= '1' WHEN fb_regddr = FR_S0 AND ddr_cs = '1' ELSE
'1' WHEN fb_regddr = FR_S1 AND ddr_cs = '1' ELSE
'1' WHEN fb_regddr = FR_S2 AND fb_regddr_next = FR_S3 ELSE
'1' WHEN fb_regddr = FR_S3 AND ddr_cs = '1' ELSE '0';
'1' WHEN fb_regddr = fr_s1 AND ddr_cs = '1' ELSE
'1' WHEN fb_regddr = FR_S2 AND fb_regddr_next = fr_s3 ELSE
'1' WHEN fb_regddr = fr_s3 AND ddr_cs = '1' ELSE '0';
-- FB_VDOE # VIDEO_OE.
-- Write access for video data:
FB_VDOE(0) <= '1' WHEN fb_regddr = FR_S0 AND ddr_cs = '1' AND FB_OEn = '0' AND ddr_config = '0' AND access_width = LONG ELSE
'1' WHEN fb_regddr = FR_S0 AND ddr_cs = '1' AND FB_OEn = '0' AND ddr_config = '0' AND access_width /= LONG AND clk_main = '0' ELSE '0';
FB_VDOE(1) <= '1' WHEN fb_regddr = FR_S1 AND ddr_cs = '1' AND FB_OEn = '0' AND ddr_config = '0' ELSE '0';
FB_VDOE(1) <= '1' WHEN fb_regddr = fr_s1 AND ddr_cs = '1' AND FB_OEn = '0' AND ddr_config = '0' ELSE '0';
FB_VDOE(2) <= '1' WHEN fb_regddr = FR_S2 AND ddr_cs = '1' AND FB_OEn = '0' AND ddr_config = '0' ELSE '0';
FB_VDOE(3) <= '1' WHEN fb_regddr = FR_S3 AND ddr_cs = '1' AND FB_OEn = '0' AND ddr_config = '0' AND clk_main = '0' ELSE '0';
FB_VDOE(3) <= '1' WHEN fb_regddr = fr_s3 AND ddr_cs = '1' AND FB_OEn = '0' AND ddr_config = '0' AND clk_main = '0' ELSE '0';
bus_cyc_end <= '1' WHEN fb_regddr = FR_S0 AND ddr_cs = '1' AND access_width /= LONG ELSE
'1' WHEN fb_regddr = FR_S3 AND ddr_cs = '1' ELSE '0';
'1' WHEN fb_regddr = fr_s3 AND ddr_cs = '1' ELSE '0';
---------------------------------------------------------------------------------------------------------------------------------------------------------------
------------------------------------------------------ DDR State Machine --------------------------------------------------------------------------------------
ddr_state_REG: PROCESS
ddr_state_reg: PROCESS
BEGIN
WAIT UNTIL RISING_EDGE(DDRCLK0);
WAIT UNTIL RISING_EDGE(ddrclk0);
ddr_state <= ddr_next_state;
END PROCESS ddr_state_REG;
END PROCESS ddr_state_reg;
ddr_state_DEC: PROCESS(ddr_state, ddr_refresh_req, cpu_ddr_sync, ddr_config, FB_WRn, ddr_access, BLITTER_WR, fifo_req, fifo_bank_ok,
FIFO_MW, cpu_req, video_adr_cnt, ddr_sel, tsiz, data_in, fifo_ba, ddr_refresh_sig)
ddr_state_dec: PROCESS(ddr_state, ddr_refresh_req, cpu_ddr_sync, ddr_config, FB_WRn, ddr_access, BLITTER_WR, fifo_req, fifo_bank_ok,
fifo_mw, cpu_req, video_adr_cnt, ddr_sel, tsiz, data_in, fifo_ba, ddr_refresh_sig)
BEGIN
CASE ddr_state IS
WHEN DS_T1 =>
WHEN ds_t1 =>
IF ddr_refresh_req = '1' THEN
ddr_next_state <= DS_R2;
ddr_next_state <= ds_r2;
ELSIF cpu_ddr_sync = '1' AND ddr_config = '1' THEN -- Synchronous start.
ddr_next_state <= DS_C2;
ELSIF cpu_ddr_sync = '1' AND cpu_req = '1' THEN -- Synchronous start.
ddr_next_state <= DS_T2B;
ddr_next_state <= ds_t2b;
ELSIF cpu_ddr_sync = '1' THEN
ddr_next_state <= DS_T2A;
ddr_next_state <= ds_t2a;
ELSE
ddr_next_state <= DS_T1; -- Synchronize.
ddr_next_state <= ds_t1; -- Synchronize.
END IF;
WHEN DS_T2A => -- Fast access, IN this CASE page IS always NOT ok.
ddr_next_state <= DS_T3;
WHEN ds_t2a => -- Fast access, IN this CASE page IS always NOT ok.
ddr_next_state <= ds_t3;
WHEN DS_T2B =>
ddr_next_state <= DS_T3;
WHEN ds_t2b =>
ddr_next_state <= ds_t3;
WHEN DS_T3 =>
IF ddr_access = CPU AND FB_WRn = '0' THEN
WHEN ds_t3 =>
IF ddr_access = cpu AND FB_WRn = '0' THEN
ddr_next_state <= DS_T4W;
ELSIF ddr_access = BLITTER AND BLITTER_WR = '1' THEN
ELSIF ddr_access = blitter AND BLITTER_WR = '1' THEN
ddr_next_state <= DS_T4W;
ELSIF ddr_access = CPU THEN -- CPU?
ELSIF ddr_access = cpu THEN -- cpu?
ddr_next_state <= DS_T4R;
ELSIF ddr_access = FIFO THEN -- FIFO?
ddr_next_state <= DS_T4F;
ELSIF ddr_access = BLITTER THEN
ELSIF ddr_access = fifo THEN -- fifo?
ddr_next_state <= ds_t4f;
ELSIF ddr_access = blitter THEN
ddr_next_state <= DS_T4R;
ELSE
ddr_next_state <= DS_N8;
ddr_next_state <= ds_n8;
END IF;
-- Read:
WHEN DS_T4R =>
ddr_next_state <= DS_T5R;
ddr_next_state <= ds_t5r;
WHEN DS_T5R =>
IF fifo_req = '1' AND fifo_bank_ok = '1' THEN -- Insert FIFO read, WHEN bank ok.
ddr_next_state <= DS_T6F;
WHEN ds_t5r =>
IF fifo_req = '1' AND fifo_bank_ok = '1' THEN -- Insert fifo read, WHEN bank ok.
ddr_next_state <= ds_t6f;
ELSE
ddr_next_state <= DS_CB6;
ddr_next_state <= ds_cb6;
END IF;
-- Write:
@@ -342,144 +342,144 @@ BEGIN
ddr_next_state <= DS_T6W;
WHEN DS_T6W =>
ddr_next_state <= DS_T7W;
ddr_next_state <= ds_t7w;
WHEN DS_T7W =>
WHEN ds_t7w =>
ddr_next_state <= DS_T8W;
WHEN DS_T8W =>
ddr_next_state <= DS_T9W;
ddr_next_state <= ds_t9w;
WHEN DS_T9W =>
WHEN ds_t9w =>
IF fifo_req = '1' AND fifo_bank_ok = '1' THEN
ddr_next_state <= DS_T6F;
ddr_next_state <= ds_t6f;
ELSE
ddr_next_state <= DS_CB6;
ddr_next_state <= ds_cb6;
END IF;
-- FIFO read:
WHEN DS_T4F =>
ddr_next_state <= DS_T5F;
-- fifo read:
WHEN ds_t4f =>
ddr_next_state <= ds_t5f;
WHEN DS_T5F =>
WHEN ds_t5f =>
IF fifo_req = '1' THEN
ddr_next_state <= DS_T6F;
ddr_next_state <= ds_t6f;
ELSE
ddr_next_state <= DS_CB6; -- Leave open.
ddr_next_state <= ds_cb6; -- Leave open.
END IF;
WHEN DS_T6F =>
ddr_next_state <= DS_T7F;
WHEN ds_t6f =>
ddr_next_state <= ds_t7f;
WHEN DS_T7F =>
IF cpu_req = '1' AND FIFO_MW > STD_LOGIC_VECTOR (to_UNSIGNED(FIFO_LWM, FIFO_MW'length)) THEN
ddr_next_state <= DS_CB8; -- Close bank.
WHEN ds_t7f =>
IF cpu_req = '1' AND fifo_mw > STD_LOGIC_VECTOR (TO_UNSIGNED(fifo_lwm, fifo_mw'LENGTH)) THEN
ddr_next_state <= ds_cb8; -- Close bank.
ELSIF fifo_req = '1' AND video_adr_cnt(7 DOWNTO 0) = x"FF" THEN -- New page?
ddr_next_state <= DS_CB8; -- Close bank.
ddr_next_state <= ds_cb8; -- Close bank.
ELSIF fifo_req = '1' THEN
ddr_next_state <= DS_T8F;
ELSE
ddr_next_state <= DS_CB8; -- Close bank.
ddr_next_state <= ds_cb8; -- Close bank.
END IF;
WHEN DS_T8F =>
IF FIFO_MW < STD_LOGIC_VECTOR (to_UNSIGNED(FIFO_LWM, FIFO_MW'length)) THEN -- Emergency?
ddr_next_state <= DS_T5F; -- Yes!
IF fifo_mw < STD_LOGIC_VECTOR (TO_UNSIGNED(fifo_lwm, fifo_mw'LENGTH)) THEN -- Emergency?
ddr_next_state <= ds_t5f; -- Yes!
ELSE
ddr_next_state <= DS_T9F;
ddr_next_state <= ds_t9f;
END IF;
WHEN DS_T9F =>
WHEN ds_t9f =>
IF fifo_req = '1' AND video_adr_cnt(7 DOWNTO 0) = x"FF" THEN -- New page?
ddr_next_state <= DS_CB6; -- Close bank.
ddr_next_state <= ds_cb6; -- Close bank.
ELSIF fifo_req = '1' THEN
ddr_next_state <= DS_T10F;
ddr_next_state <= ds_t10f;
ELSE
ddr_next_state <= DS_CB6; -- Close bank.
ddr_next_state <= ds_cb6; -- Close bank.
END IF;
WHEN DS_T10F =>
WHEN ds_t10f =>
IF ddr_sel = '1' AND (FB_WRn = '1' OR tsiz /= "11") AND data_in(13 DOWNTO 12) /= fifo_ba THEN
ddr_next_state <= DS_T3;
ddr_next_state <= ds_t3;
ELSE
ddr_next_state <= DS_T7F;
ddr_next_state <= ds_t7f;
END IF;
-- Configuration cycles:
WHEN DS_C2 =>
ddr_next_state <= DS_C3;
ddr_next_state <= ds_c3;
WHEN DS_C3 =>
ddr_next_state <= DS_C4;
WHEN ds_c3 =>
ddr_next_state <= dc_c4;
WHEN DS_C4 =>
WHEN dc_c4 =>
IF cpu_req = '1' THEN
ddr_next_state <= DS_C5;
ddr_next_state <= ds_c5;
ELSE
ddr_next_state <= DS_T1;
ddr_next_state <= ds_t1;
END IF;
WHEN DS_C5 =>
ddr_next_state <= DS_C6;
WHEN ds_c5 =>
ddr_next_state <= ds_c6;
WHEN DS_C6 =>
ddr_next_state <= DS_C7;
WHEN ds_c6 =>
ddr_next_state <= ds_c7;
WHEN DS_C7 =>
ddr_next_state <= DS_N8;
WHEN ds_c7 =>
ddr_next_state <= ds_n8;
-- Close FIFO bank.
WHEN DS_CB6 =>
ddr_next_state <= DS_N7;
-- Close fifo bank.
WHEN ds_cb6 =>
ddr_next_state <= ds_n7;
WHEN DS_CB8 =>
ddr_next_state <= DS_T1;
WHEN ds_cb8 =>
ddr_next_state <= ds_t1;
-- Refresh 70ns = ten cycles.
WHEN DS_R2 =>
WHEN ds_r2 =>
IF ddr_refresh_sig = x"9" THEN -- One cycle delay to close all banks.
ddr_next_state <= DS_R4;
ddr_next_state <= ds_r4;
ELSE
ddr_next_state <= DS_R3;
ddr_next_state <= ds_r3;
END IF;
WHEN DS_R3 =>
ddr_next_state <= DS_R4;
WHEN ds_r3 =>
ddr_next_state <= ds_r4;
WHEN DS_R4 =>
ddr_next_state <= DS_R5;
WHEN ds_r4 =>
ddr_next_state <= ds_r5;
WHEN DS_R5 =>
ddr_next_state <= DS_R6;
WHEN ds_r5 =>
ddr_next_state <= ds_r6;
WHEN DS_R6 =>
ddr_next_state <= DS_N5;
WHEN ds_r6 =>
ddr_next_state <= ds_n5;
-- Loop:
WHEN DS_N5 =>
ddr_next_state <= DS_N6;
WHEN ds_n5 =>
ddr_next_state <= ds_n6;
WHEN DS_N6 =>
ddr_next_state <= DS_N7;
WHEN ds_n6 =>
ddr_next_state <= ds_n7;
WHEN DS_N7 =>
ddr_next_state <= DS_N8;
WHEN ds_n7 =>
ddr_next_state <= ds_n8;
WHEN DS_N8 =>
ddr_next_state <= DS_T1;
WHEN ds_n8 =>
ddr_next_state <= ds_t1;
END CASE;
END PROCESS ddr_state_DEC;
END PROCESS ddr_state_dec;
P_CLK0: PROCESS
p_clk0 : PROCESS
BEGIN
WAIT UNTIL RISING_EDGE(DDRCLK0);
WAIT UNTIL RISING_EDGE(ddrclk0);
-- Default assignments;
ddr_access <= NONE;
sr_fifo_wre_i <= '0';
SR_VDMP <= x"00";
SR_DDR_WR <= '0';
SR_DDRWR_D_SEL <= '0';
sr_vdmp <= x"00";
sr_ddr_wr <= '0';
sr_ddrwr_d_sel <= '0';
mcs <= mcs(0) & clk_main; -- sync on clk_main
@@ -488,9 +488,9 @@ BEGIN
clear_fifo_cnt <= fifo_clr_sync OR NOT fifo_active;
stop <= fifo_clr_sync OR clear_fifo_cnt;
IF FIFO_MW < STD_LOGIC_VECTOR (to_UNSIGNED(FIFO_MWM, FIFO_MW'length)) THEN
IF fifo_mw < STD_LOGIC_VECTOR (TO_UNSIGNED(fifo_mwm, fifo_mw'LENGTH)) THEN
fifo_req <= '1';
ELSIF FIFO_MW < STD_LOGIC_VECTOR (to_UNSIGNED(FIFO_HWM, FIFO_MW'length)) AND fifo_req = '1' THEN
ELSIF fifo_mw < STD_LOGIC_VECTOR (TO_UNSIGNED(fifo_hwm, fifo_mw'LENGTH)) AND fifo_req = '1' THEN
fifo_req <= '1';
ELSIF fifo_active = '1' AND clear_fifo_cnt = '0' AND stop = '0' AND ddr_config = '0' AND video_control_register(vrcr_vcke) = '1' AND video_control_register(vrcr_vcs) = '1' THEN
fifo_req <= '1';
@@ -524,7 +524,7 @@ BEGIN
IF refresh_time = '1' AND video_control_register(vrcr_refresh_on) = '1' AND ddr_config = '0' THEN
ddr_refresh_sig <= x"9";
ELSIF ddr_state = DS_R6 AND video_control_register(vrcr_refresh_on) = '1' AND ddr_config = '0' THEN
ELSIF ddr_state = ds_r6 AND video_control_register(vrcr_refresh_on) = '1' AND ddr_config = '0' THEN
ddr_refresh_sig <= ddr_refresh_sig - 1;
ELSE
ddr_refresh_sig <= x"0";
@@ -532,175 +532,175 @@ BEGIN
IF bus_cyc_end = '1' THEN
bus_cyc <= '0';
ELSIF ddr_state = DS_T1 AND cpu_ddr_sync = '1' AND cpu_req = '1' THEN
ELSIF ddr_state = ds_t1 AND cpu_ddr_sync = '1' AND cpu_req = '1' THEN
bus_cyc <= '1';
ELSIF ddr_state = DS_T2A AND ddr_sel = '1' AND FB_WRn = '0' THEN
ELSIF ddr_state = ds_t2a AND ddr_sel = '1' AND FB_WRn = '0' THEN
bus_cyc <= '1';
ELSIF ddr_state = DS_T2A AND ddr_sel = '1' AND access_width /= LONG THEN
ELSIF ddr_state = ds_t2a AND ddr_sel = '1' AND access_width /= LONG THEN
bus_cyc <= '1';
ELSIF ddr_state = DS_T2B THEN
ELSIF ddr_state = ds_t2b THEN
bus_cyc <= '1';
ELSIF ddr_state = DS_T10F AND FB_WRn = '0' AND data_in(13 DOWNTO 12) = fifo_ba THEN
ELSIF ddr_state = ds_t10f AND FB_WRn = '0' AND data_in(13 DOWNTO 12) = fifo_ba THEN
bus_cyc <= '1';
ELSIF ddr_state = DS_T10F AND access_width /= LONG AND data_in(13 DOWNTO 12) = fifo_ba THEN
ELSIF ddr_state = ds_t10f AND access_width /= LONG AND data_in(13 DOWNTO 12) = fifo_ba THEN
bus_cyc <= '1';
ELSIF ddr_state = DS_C3 THEN
ELSIF ddr_state = ds_c3 THEN
bus_cyc <= cpu_req;
END IF;
IF ddr_state = DS_T1 AND cpu_ddr_sync = '1' AND cpu_req = '1' THEN
IF ddr_state = ds_t1 AND cpu_ddr_sync = '1' AND cpu_req = '1' THEN
va_s <= cpu_row_adr;
ba_s <= cpu_ba;
ddr_access <= CPU;
ELSIF ddr_state = DS_T1 AND cpu_ddr_sync = '1' AND fifo_req = '1' THEN
ddr_access <= cpu;
ELSIF ddr_state = ds_t1 AND cpu_ddr_sync = '1' AND fifo_req = '1' THEN
va_p <= fifo_row_adr;
ba_p <= fifo_ba;
ddr_access <= FIFO;
ELSIF ddr_state = DS_T1 AND cpu_ddr_sync = '1' AND blitter_req = '0' THEN
ddr_access <= fifo;
ELSIF ddr_state = ds_t1 AND cpu_ddr_sync = '1' AND blitter_req = '0' THEN
va_p <= blitter_row_adr;
ba_p <= blitter_ba;
ddr_access <= BLITTER;
ELSIF ddr_state = DS_T2A AND ddr_sel = '1' AND FB_WRn = '0' THEN
ddr_access <= blitter;
ELSIF ddr_state = ds_t2a AND ddr_sel = '1' AND FB_WRn = '0' THEN
va_s(10) <= '1';
ddr_access <= CPU;
ELSIF ddr_state = DS_T2A AND ddr_sel = '1' AND access_width /= LONG THEN
ddr_access <= cpu;
ELSIF ddr_state = ds_t2a AND ddr_sel = '1' AND access_width /= LONG THEN
va_s(10) <= '1';
ddr_access <= CPU;
ELSIF ddr_state = DS_T2A THEN
ddr_access <= cpu;
ELSIF ddr_state = ds_t2a THEN
-- ?? mfro
va_s(10) <= NOT (fifo_active AND fifo_req);
ddr_access <= FIFO;
ddr_access <= fifo;
fifo_bank_ok <= fifo_active AND fifo_req;
IF ddr_access = BLITTER AND blitter_req = '1' THEN
ddr_access <= BLITTER;
IF ddr_access = blitter AND blitter_req = '1' THEN
ddr_access <= blitter;
END IF;
-- ?? mfro BLITTER_AC <= BLITTER_ACTIVE AND blitter_req;
ELSIF ddr_state = DS_T2B THEN
ELSIF ddr_state = ds_t2b THEN
fifo_bank_ok <= '0';
ELSIF ddr_state = DS_T3 THEN
ELSIF ddr_state = ds_t3 THEN
va_s(10) <= va_s(10);
IF (FB_WRn = '0' AND ddr_access = CPU) OR (BLITTER_WR = '1' AND ddr_access = BLITTER) THEN
IF (FB_WRn = '0' AND ddr_access = cpu) OR (BLITTER_WR = '1' AND ddr_access = blitter) THEN
va_s(9 DOWNTO 0) <= cpu_col_adr;
ba_s <= cpu_ba;
ELSIF fifo_active = '1' THEN
va_s(9 DOWNTO 0) <= STD_LOGIC_VECTOR (fifo_col_adr);
ba_s <= fifo_ba;
ELSIF ddr_access = BLITTER THEN
ELSIF ddr_access = blitter THEN
va_s(9 DOWNTO 0) <= blitter_col_adr;
ba_s <= blitter_ba;
END IF;
ELSIF ddr_state = DS_T4R THEN
-- mfro change next two statements
IF ddr_access = CPU THEN
SR_DDR_FB <= '1';
ELSIF ddr_access = BLITTER THEN
SR_BLITTER_DACK <= '1';
IF ddr_access = cpu THEN
sr_ddr_fb <= '1';
ELSIF ddr_access = blitter THEN
sr_blitter_dack <= '1';
END IF;
ELSIF ddr_state = DS_T5R AND fifo_req = '1' AND fifo_bank_ok = '1' THEN
ELSIF ddr_state = ds_t5r AND fifo_req = '1' AND fifo_bank_ok = '1' THEN
va_s(10) <= '0';
va_s(9 DOWNTO 0) <= STD_LOGIC_VECTOR (fifo_col_adr);
ba_s <= fifo_ba;
ELSIF ddr_state = DS_T5R THEN
ELSIF ddr_state = ds_t5r THEN
va_s(10) <= '1';
ELSIF ddr_state = DS_T4W THEN
va_s(10) <= va_s(10);
-- mfro changed next IF
IF ddr_access = BLITTER THEN
SR_BLITTER_DACK <= '1';
IF ddr_access = blitter THEN
sr_blitter_dack <= '1';
END IF;
ELSIF ddr_state = DS_T5W THEN
va_s(10) <= va_s(10);
IF ddr_access = CPU THEN
IF ddr_access = cpu THEN
va_s(9 DOWNTO 0) <= cpu_col_adr;
ba_s <= cpu_ba;
ELSIF ddr_access = BLITTER THEN
ELSIF ddr_access = blitter THEN
va_s(9 DOWNTO 0) <= blitter_col_adr;
ba_s <= blitter_ba;
END IF;
IF ddr_access = BLITTER AND access_width = LONG THEN
SR_VDMP <= byte_sel & x"F";
ELSIF ddr_access = BLITTER THEN
SR_VDMP <= byte_sel & x"0";
IF ddr_access = blitter AND access_width = LONG THEN
sr_vdmp <= byte_sel & x"F";
ELSIF ddr_access = blitter THEN
sr_vdmp <= byte_sel & x"0";
ELSE
SR_VDMP <= byte_sel & x"0";
sr_vdmp <= byte_sel & x"0";
END IF;
ELSIF ddr_state = DS_T6W THEN
SR_DDR_WR <= '1';
SR_DDRWR_D_SEL <= '1';
IF ddr_access = BLITTER OR access_width = LONG THEN
SR_VDMP <= x"FF";
sr_ddr_wr <= '1';
sr_ddrwr_d_sel <= '1';
IF ddr_access = blitter OR access_width = LONG THEN
sr_vdmp <= x"FF";
ELSE
SR_VDMP <= x"00";
sr_vdmp <= x"00";
END IF;
ELSIF ddr_state = DS_T7W THEN
SR_DDR_WR <= '1';
SR_DDRWR_D_SEL <= '1';
ELSIF ddr_state = DS_T9W AND fifo_req = '1' AND fifo_bank_ok = '1' THEN
ELSIF ddr_state = ds_t7w THEN
sr_ddr_wr <= '1';
sr_ddrwr_d_sel <= '1';
ELSIF ddr_state = ds_t9w AND fifo_req = '1' AND fifo_bank_ok = '1' THEN
va_s(10) <= '0';
va_s(9 DOWNTO 0) <= STD_LOGIC_VECTOR (fifo_col_adr);
ba_s <= fifo_ba;
ELSIF ddr_state = DS_T9W THEN
ELSIF ddr_state = ds_t9w THEN
va_s(10) <= '0';
ELSIF ddr_state = DS_T4F THEN
ELSIF ddr_state = ds_t4f THEN
sr_fifo_wre_i <= '1';
ELSIF ddr_state = DS_T5F AND fifo_req = '1' AND video_adr_cnt(7 DOWNTO 0) = x"FF" THEN
ELSIF ddr_state = ds_t5f AND fifo_req = '1' AND video_adr_cnt(7 DOWNTO 0) = x"FF" THEN
va_s(10) <= '1';
ELSIF ddr_state = DS_T5F AND fifo_req = '1' THEN
ELSIF ddr_state = ds_t5f AND fifo_req = '1' THEN
va_s(10) <= '0';
va_s(9 DOWNTO 0) <= STD_LOGIC_VECTOR (fifo_col_adr + "100");
ba_s <= fifo_ba;
ELSIF ddr_state = DS_T5F THEN
ELSIF ddr_state = ds_t5f THEN
va_s(10) <= '0';
ELSIF ddr_state = DS_T6F THEN
ELSIF ddr_state = ds_t6f THEN
sr_fifo_wre_i <= '1';
ELSIF ddr_state = DS_T7F AND cpu_req = '1' AND FIFO_MW > STD_LOGIC_VECTOR (to_UNSIGNED(FIFO_LWM, FIFO_MW'length)) THEN
ELSIF ddr_state = ds_t7f AND cpu_req = '1' AND fifo_mw > STD_LOGIC_VECTOR (TO_UNSIGNED(fifo_lwm, fifo_mw'LENGTH)) THEN
va_s(10) <= '1';
ELSIF ddr_state = DS_T7F AND fifo_req = '1' AND video_adr_cnt(7 DOWNTO 0) = x"FF" THEN
ELSIF ddr_state = ds_t7f AND fifo_req = '1' AND video_adr_cnt(7 DOWNTO 0) = x"FF" THEN
va_s(10) <= '1';
ELSIF ddr_state = DS_T7F AND fifo_req = '1' THEN
ELSIF ddr_state = ds_t7f AND fifo_req = '1' THEN
va_s(10) <= '0';
va_s(9 DOWNTO 0) <= STD_LOGIC_VECTOR (fifo_col_adr + "100");
ba_s <= fifo_ba;
ELSIF ddr_state = DS_T7F THEN
ELSIF ddr_state = ds_t7f THEN
va_s(10) <= '1';
ELSIF ddr_state = DS_T9F AND fifo_req = '1' AND video_adr_cnt(7 DOWNTO 0) = x"FF" THEN
ELSIF ddr_state = ds_t9f AND fifo_req = '1' AND video_adr_cnt(7 DOWNTO 0) = x"FF" THEN
va_s(10) <= '1';
ELSIF ddr_state = DS_T9F AND fifo_req = '1' THEN
ELSIF ddr_state = ds_t9f AND fifo_req = '1' THEN
va_p(10) <= '0';
va_p(9 DOWNTO 0) <= STD_LOGIC_VECTOR (fifo_col_adr + "100");
ba_p <= fifo_ba;
ELSIF ddr_state = DS_T9F THEN
ELSIF ddr_state = ds_t9f THEN
va_s(10) <= '1';
ELSIF ddr_state = DS_T10F AND FB_WRn = '0' AND data_in(13 DOWNTO 12) = fifo_ba THEN
ELSIF ddr_state = ds_t10f AND FB_WRn = '0' AND data_in(13 DOWNTO 12) = fifo_ba THEN
va_s(10) <= '1';
ddr_access <= CPU;
ELSIF ddr_state = DS_T10F AND access_width /= LONG AND data_in(13 DOWNTO 12) = fifo_ba THEN
ddr_access <= cpu;
ELSIF ddr_state = ds_t10f AND access_width /= LONG AND data_in(13 DOWNTO 12) = fifo_ba THEN
va_s(10) <= '1';
ddr_access <= CPU;
ELSIF ddr_state = DS_T10F THEN
ddr_access <= cpu;
ELSIF ddr_state = ds_t10f THEN
sr_fifo_wre_i <= '1';
ELSIF ddr_state = DS_C6 THEN
ELSIF ddr_state = ds_c6 THEN
va_s <= data_in(12 DOWNTO 0);
ba_s <= data_in(14 DOWNTO 13);
ELSIF ddr_state = DS_CB6 THEN
ELSIF ddr_state = ds_cb6 THEN
fifo_bank_ok <= '0';
ELSIF ddr_state = DS_CB8 THEN
ELSIF ddr_state = ds_cb8 THEN
fifo_bank_ok <= '0';
ELSIF ddr_state = DS_R2 THEN
ELSIF ddr_state = ds_r2 THEN
fifo_bank_ok <= '0';
ELSE
END IF;
END PROCESS P_CLK0;
END PROCESS p_clk0;
ddr_sel <= '1' WHEN FB_ALE = '1' AND data_in(31 DOWNTO 30) = "01" ELSE '0';
P_ddr_cs: PROCESS
p_ddr_cs: PROCESS
BEGIN
WAIT UNTIL RISING_EDGE(clk_main);
IF FB_ALE = '1' THEN
ddr_cs <= ddr_sel;
END IF;
END PROCESS P_ddr_cs;
END PROCESS p_ddr_cs;
p_cpu_req: PROCESS
BEGIN
@@ -712,9 +712,9 @@ BEGIN
cpu_req <= '1';
ELSIF ddr_sel = '1' AND ddr_config = '1' THEN -- Config, start immediately.
cpu_req <= '1';
ELSIF fb_regddr = FR_S1 AND FB_WRn = '0' THEN -- Long word write later.
ELSIF fb_regddr = fr_s1 AND FB_WRn = '0' THEN -- Long word write later.
cpu_req <= '1';
ELSIF fb_regddr /= FR_S1 AND fb_regddr /= FR_S3 AND bus_cyc_end = '0' AND bus_cyc = '0' THEN -- Halt, bus cycle IN progress OR ready.
ELSIF fb_regddr /= fr_s1 AND fb_regddr /= fr_s3 AND bus_cyc_end = '0' AND bus_cyc = '0' THEN -- Halt, bus cycle IN progress OR ready.
cpu_req <= '0';
END IF;
END PROCESS p_cpu_req;
@@ -725,55 +725,55 @@ BEGIN
BEGIN
WAIT UNTIL RISING_EDGE(CLK_33M);
ddr_refresh_cnt <= ddr_refresh_cnt + 1; -- Count 0 to 2047.
END PROCESS P_REFRESH;
END PROCESS p_refresh;
sr_fifo_wre <= sr_fifo_wre_i;
VA <= data_in(26 DOWNTO 14) WHEN ddr_state = DS_T2A AND ddr_sel = '1' AND FB_WRn = '0' ELSE
data_in(26 DOWNTO 14) WHEN ddr_state = DS_T2A AND ddr_sel = '1' AND (FB_SIZE0 = '0' OR FB_SIZE1= '0') ELSE
va_p WHEN ddr_state = DS_T2A ELSE
data_in(26 DOWNTO 14) WHEN ddr_state = DS_T10F AND FB_WRn = '0' AND data_in(13 DOWNTO 12) = fifo_ba ELSE
data_in(26 DOWNTO 14) WHEN ddr_state = DS_T10F AND (FB_SIZE0 = '0' OR FB_SIZE1= '0') AND data_in(13 DOWNTO 12) = fifo_ba ELSE
va_p WHEN ddr_state = DS_T10F ELSE
"0010000000000" WHEN ddr_state = DS_R2 AND ddr_refresh_sig = x"9" ELSE va_s;
VA <= data_in(26 DOWNTO 14) WHEN ddr_state = ds_t2a AND ddr_sel = '1' AND FB_WRn = '0' ELSE
data_in(26 DOWNTO 14) WHEN ddr_state = ds_t2a AND ddr_sel = '1' AND (FB_SIZE0 = '0' OR FB_SIZE1= '0') ELSE
va_p WHEN ddr_state = ds_t2a ELSE
data_in(26 DOWNTO 14) WHEN ddr_state = ds_t10f AND FB_WRn = '0' AND data_in(13 DOWNTO 12) = fifo_ba ELSE
data_in(26 DOWNTO 14) WHEN ddr_state = ds_t10f AND (FB_SIZE0 = '0' OR FB_SIZE1= '0') AND data_in(13 DOWNTO 12) = fifo_ba ELSE
va_p WHEN ddr_state = ds_t10f ELSE
"0010000000000" WHEN ddr_state = ds_r2 AND ddr_refresh_sig = x"9" ELSE va_s;
BA <= data_in(13 DOWNTO 12) WHEN ddr_state = DS_T2A AND ddr_sel = '1' AND FB_WRn = '0' ELSE
data_in(13 DOWNTO 12) WHEN ddr_state = DS_T2A AND ddr_sel = '1' AND (FB_SIZE0 = '0' OR FB_SIZE1= '0') ELSE
ba_p WHEN ddr_state = DS_T2A ELSE
data_in(13 DOWNTO 12) WHEN ddr_state = DS_T10F AND FB_WRn = '0' AND data_in(13 DOWNTO 12) = fifo_ba ELSE
data_in(13 DOWNTO 12) WHEN ddr_state = DS_T10F AND (FB_SIZE0 = '0' OR FB_SIZE1= '0') AND data_in(13 DOWNTO 12) = fifo_ba ELSE
ba_p WHEN ddr_state = DS_T10F ELSE ba_s;
BA <= data_in(13 DOWNTO 12) WHEN ddr_state = ds_t2a AND ddr_sel = '1' AND FB_WRn = '0' ELSE
data_in(13 DOWNTO 12) WHEN ddr_state = ds_t2a AND ddr_sel = '1' AND (FB_SIZE0 = '0' OR FB_SIZE1= '0') ELSE
ba_p WHEN ddr_state = ds_t2a ELSE
data_in(13 DOWNTO 12) WHEN ddr_state = ds_t10f AND FB_WRn = '0' AND data_in(13 DOWNTO 12) = fifo_ba ELSE
data_in(13 DOWNTO 12) WHEN ddr_state = ds_t10f AND (FB_SIZE0 = '0' OR FB_SIZE1= '0') AND data_in(13 DOWNTO 12) = fifo_ba ELSE
ba_p WHEN ddr_state = ds_t10f ELSE ba_s;
vras <= '1' WHEN ddr_state = DS_T2A AND ddr_sel = '1' AND FB_WRn = '0' ELSE
'1' WHEN ddr_state = DS_T2A AND ddr_sel = '1' AND (FB_SIZE0 = '0' OR FB_SIZE1= '0') ELSE
'1' WHEN ddr_state = DS_T2A AND ddr_access = FIFO AND fifo_req = '1' ELSE
'1' WHEN ddr_state = DS_T2A AND ddr_access = BLITTER AND blitter_req = '1' ELSE
'1' WHEN ddr_state = DS_T2B ELSE
'1' WHEN ddr_state = DS_T10F AND FB_WRn = '0' AND data_in(13 DOWNTO 12) = fifo_ba ELSE
'1' WHEN ddr_state = DS_T10F AND (FB_SIZE0 = '0' OR FB_SIZE1= '0') AND data_in(13 DOWNTO 12) = fifo_ba ELSE
data_in(18) AND NOT FB_WRn AND NOT FB_SIZE0 AND NOT FB_SIZE1 WHEN ddr_state = DS_C7 ELSE
'1' WHEN ddr_state = DS_CB6 ELSE
'1' WHEN ddr_state = DS_CB8 ELSE
'1' WHEN ddr_state = DS_R2 ELSE '0';
vras <= '1' WHEN ddr_state = ds_t2a AND ddr_sel = '1' AND FB_WRn = '0' ELSE
'1' WHEN ddr_state = ds_t2a AND ddr_sel = '1' AND (FB_SIZE0 = '0' OR FB_SIZE1= '0') ELSE
'1' WHEN ddr_state = ds_t2a AND ddr_access = fifo AND fifo_req = '1' ELSE
'1' WHEN ddr_state = ds_t2a AND ddr_access = blitter AND blitter_req = '1' ELSE
'1' WHEN ddr_state = ds_t2b ELSE
'1' WHEN ddr_state = ds_t10f AND FB_WRn = '0' AND data_in(13 DOWNTO 12) = fifo_ba ELSE
'1' WHEN ddr_state = ds_t10f AND (FB_SIZE0 = '0' OR FB_SIZE1= '0') AND data_in(13 DOWNTO 12) = fifo_ba ELSE
data_in(18) AND NOT FB_WRn AND NOT FB_SIZE0 AND NOT FB_SIZE1 WHEN ddr_state = ds_c7 ELSE
'1' WHEN ddr_state = ds_cb6 ELSE
'1' WHEN ddr_state = ds_cb8 ELSE
'1' WHEN ddr_state = ds_r2 ELSE '0';
vcas <= '1' WHEN ddr_state = DS_T4R ELSE
'1' WHEN ddr_state = DS_T6W ELSE
'1' WHEN ddr_state = DS_T4F ELSE
'1' WHEN ddr_state = DS_T6F ELSE
'1' WHEN ddr_state = ds_t4f ELSE
'1' WHEN ddr_state = ds_t6f ELSE
'1' WHEN ddr_state = DS_T8F ELSE
'1' WHEN ddr_state = DS_T10F AND vras = '0' ELSE
data_in(17) AND NOT FB_WRn AND NOT FB_SIZE0 AND NOT FB_SIZE1 WHEN ddr_state = DS_C7 ELSE
'1' WHEN ddr_state = DS_R2 AND ddr_refresh_sig /= x"9" ELSE '0';
'1' WHEN ddr_state = ds_t10f AND vras = '0' ELSE
data_in(17) AND NOT FB_WRn AND NOT FB_SIZE0 AND NOT FB_SIZE1 WHEN ddr_state = ds_c7 ELSE
'1' WHEN ddr_state = ds_r2 AND ddr_refresh_sig /= x"9" ELSE '0';
vwe <= '1' WHEN ddr_state = DS_T6W ELSE
data_in(16) AND NOT FB_WRn AND NOT FB_SIZE0 AND NOT FB_SIZE1 WHEN ddr_state = DS_C7 ELSE
'1' WHEN ddr_state = DS_CB6 ELSE
'1' WHEN ddr_state = DS_CB8 ELSE
'1' WHEN ddr_state = DS_R2 AND ddr_refresh_sig = x"9" ELSE '0';
data_in(16) AND NOT FB_WRn AND NOT FB_SIZE0 AND NOT FB_SIZE1 WHEN ddr_state = ds_c7 ELSE
'1' WHEN ddr_state = ds_cb6 ELSE
'1' WHEN ddr_state = ds_cb8 ELSE
'1' WHEN ddr_state = ds_r2 AND ddr_refresh_sig = x"9" ELSE '0';
-- DDR controller:
-- VIDEO RAM CONTROL REGISTER (IS IN VIDEO_MUX_CTR)
-- $F0000400: BIT 0: VCKE; 1: NOT nVCS ;2:REFRESH ON , (0=FIFO AND CNT CLEAR);
-- $F0000400: BIT 0: VCKE; 1: NOT nVCS ;2:REFRESH ON , (0=fifo AND CNT CLEAR);
-- 3: CONFIG; 8: fifo_active;
VCSn <= NOT(video_control_register(vrcr_refresh_on));
ddr_config <= video_control_register(3);
@@ -786,11 +786,11 @@ BEGIN
vcasn <= NOT vcas;
vwen <= NOT vwe;
ddrwr_d_sel1 <= '1' WHEN ddr_access = BLITTER ELSE '0';
ddrwr_d_sel1 <= '1' WHEN ddr_access = blitter ELSE '0';
blitter_row_adr <= BLITTER_ADR(26 DOWNTO 14);
blitter_ba <= BLITTER_ADR(13 DOWNTO 12);
blitter_col_adr <= BLITTER_ADR(11 DOWNTO 2);
blitter_row_adr <= blitter_adr(26 DOWNTO 14);
blitter_ba <= blitter_adr(13 DOWNTO 12);
blitter_col_adr <= blitter_adr(11 DOWNTO 2);
fifo_row_adr <= STD_LOGIC_VECTOR (video_adr_cnt(22 DOWNTO 10));
fifo_ba <= STD_LOGIC_VECTOR (video_adr_cnt(9 DOWNTO 8));
@@ -805,10 +805,10 @@ BEGIN
vdm_sel_i <= video_base_l_d(3 DOWNTO 0);
-- Current video address:
video_act_adr(26 DOWNTO 4) <= STD_LOGIC_VECTOR (video_adr_cnt - UNSIGNED(FIFO_MW));
video_act_adr(26 DOWNTO 4) <= STD_LOGIC_VECTOR (video_adr_cnt - UNSIGNED(fifo_mw));
video_act_adr(3 DOWNTO 0) <= vdm_sel_i;
P_VIDEO_REGS: PROCESS
p_video_regs : PROCESS
-- Video registers.
BEGIN
WAIT UNTIL RISING_EDGE(clk_main);
@@ -827,7 +827,7 @@ BEGIN
IF video_base_h = '1' AND FB_WRn = '0' AND byte_sel(0) = '1' THEN
video_base_x_d <= data_in(26 DOWNTO 24);
END IF;
END PROCESS P_VIDEO_REGS;
END PROCESS p_video_regs;
fb_adr_i <= FB_ADR & '0';