perl -p -i -e "s/PCI_CLOCK'event and PCI_CLOCK = '1'/rising_edge(PCI_CLOCK)/" *.vhd
[raggedstone] / dhwk / source / pci / config_04h.vhd
CommitLineData
696ded12 1-- J.STELZNER
2-- INFORMATIK-3 LABOR
3-- 23.08.2006
4-- File: CONFIG_04H.VHD
5
6library IEEE;
7use IEEE.std_logic_1164.all;
8
9entity CONFIG_04H is
2612d712 10 port
11 (
12 PCI_CLOCK :in std_logic;
13 PCI_RSTn :in std_logic;
14 SERR :in std_logic;
15 PERR :in std_logic;
16 AD_REG :in std_logic_vector(31 downto 0);
17 CBE_REGn :in std_logic_vector( 3 downto 0);
18 CONF_WR_04H :in std_logic;
19 CONF_DATA_04H :out std_logic_vector(31 downto 0)
20 );
696ded12 21end entity CONFIG_04H;
22
23architecture CONFIG_04H_DESIGN of CONFIG_04H is
24
2612d712 25 signal CONF_STATUS :std_logic_vector(31 downto 16);
26 signal CONF_COMMAND :std_logic_vector(15 downto 0);
696ded12 27
28begin
29
2612d712 30 --*******************************************************************
31 --************* PCI Configuration Space Header "STATUS" *************
32 --*******************************************************************
33
34 CONF_STATUS(20 downto 16) <= "00000";-- Reserved
35 CONF_STATUS(21 ) <= '0';-- MAS/TAR: "R_O" :'0'= 33MHz / '1'= 66MHz
36 CONF_STATUS(22 ) <= '0';-- MAS/TAR: "R_O"
37 CONF_STATUS(23 ) <= '0';-- ???/???: "R_O" : fast back-to-back
38 CONF_STATUS(24 ) <= '0';-- Master :
39 --CONF_STATUS(26 downto 25) <= "00";-- Mas/Tar: "R_O" : timing fast for "DEVSEL"
40 CONF_STATUS(26 downto 25) <= "01";-- Mas/Tar: "R_O" : timing medium for "DEVSEL"
41 --CONF_STATUS(26 downto 25) <= "10";-- Mas/Tar: "R_O" : timing slow for "DEVSEL"
42 --CONF_STATUS(26 downto 25) <= "11";-- Mas/Tar: "R_O" : reserved
43 CONF_STATUS(27 ) <= '0';-- Target : "R_W" : Taget-Abort
44 CONF_STATUS(28 ) <= '0';-- Master : "R_W" : Taget-Abort
45 CONF_STATUS(29 ) <= '0';-- Master : "R_W" : Master-Abort
46 --CONF_STATUS(30 ) <= SERR;-- Mas/Tar: "R_W" : SERR
47 --CONF_STATUS(31 ) <= PERR;-- Mas/Tar: "R_W" : PERR
48
49 process (PCI_CLOCK,PCI_RSTn)
50 begin
51 if PCI_RSTn = '0' then
52 CONF_STATUS(30) <= '0';
53 CONF_STATUS(31) <= '0';
54
aca9163e 55 elsif (rising_edge(PCI_CLOCK)) then
2612d712 56 if CONF_WR_04H = '1' and CBE_REGn(3) = '0' then
57 CONF_STATUS(30) <= not (AD_REG(30) and CONF_STATUS(30));
58 CONF_STATUS(31) <= not (AD_REG(31) and CONF_STATUS(31));
59
60 else
61 CONF_STATUS(30) <= SERR or CONF_STATUS(30);
62 CONF_STATUS(31) <= PERR or CONF_STATUS(31);
63
64 end if;
65 end if;
66end process;
67
68 --*******************************************************************
69 --*********** PCI Configuration Space Header "COMMAND" **************
70 --*******************************************************************
71
72-- CONF_COMMAND( 0) <= '0';-- I/O Space accesses ???
73-- CONF_COMMAND( 1) <= '0';-- Mem Space accesses ???
74-- CONF_COMMAND( 2) <= '0';-- abillity to act as a master on the PCI bus
75-- CONF_COMMAND( 3) <= '0';-- Special Cycle ???
76-- CONF_COMMAND( 4) <= '0';-- Master ???
77-- CONF_COMMAND( 5) <= '0';-- VGA ???
78-- CONF_COMMAND( 6) <= '0';-- Party checking enable/disable
79CONF_COMMAND( 7) <= '0';-- address/data stepping ???
80-- CONF_COMMAND( 8) <= '0';-- enable/disable "PCI_SERRn"
81-- CONF_COMMAND( 9) <= '0';-- fast back-to-back
82-- CONF_COMMAND(10) <= '0';-- Reserved
83-- CONF_COMMAND(11) <= '0';-- Reserved
84-- CONF_COMMAND(12) <= '0';-- Reserved
85-- CONF_COMMAND(13) <= '0';-- Reserved
86-- CONF_COMMAND(14) <= '0';-- Reserved
87-- CONF_COMMAND(15) <= '0';-- Reserved
88
89process (PCI_CLOCK,PCI_RSTn)
90begin
91 if PCI_RSTn = '0' then
92 CONF_COMMAND(15 downto 8) <= (others =>'0');
93 CONF_COMMAND( 6 downto 0) <= (others =>'0');
94
aca9163e 95 elsif (rising_edge(PCI_CLOCK)) then
2612d712 96
97 if CONF_WR_04H = '1'and CBE_REGn(1) = '0' then
98 CONF_COMMAND(15 downto 8) <= AD_REG(15 downto 8);
99 else
100 CONF_COMMAND(15 downto 8) <= CONF_COMMAND(15 downto 8);
101 end if;
102
103 if CONF_WR_04H = '1'and CBE_REGn(0) = '0' then
104 CONF_COMMAND( 6 downto 0) <= AD_REG( 6 downto 0);
105 else
106 CONF_COMMAND( 6 downto 0) <= CONF_COMMAND( 6 downto 0);
107 end if;
108 end if;
109end process;
110
111CONF_DATA_04H <= CONF_STATUS & CONF_COMMAND;
696ded12 112
113end architecture CONFIG_04H_DESIGN;
Impressum, Datenschutz