--------------------------------------------------------------------------------
|
--------------------------------------------------------------------------------
|
-- Company:
|
--This file is part of fpga_gpib_controller.
|
-- Engineer:
|
--
|
|
-- Fpga_gpib_controller 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 3 of the License, or
|
|
-- (at your option) any later version.
|
|
--
|
|
-- Fpga_gpib_controller 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 Fpga_gpib_controller. If not, see <http://www.gnu.org/licenses/>.
|
|
--------------------------------------------------------------------------------
|
|
-- Author: Andrzej Paluch
|
--
|
--
|
-- Create Date: 23:21:05 10/21/2011
|
-- Create Date: 23:21:05 10/21/2011
|
-- Design Name:
|
-- Design Name:
|
-- Module Name: /windows/h/projekty/elektronika/USB_to_HPIB/usbToHpib/test_scr//gpibInterfaceTest.vhd
|
-- Module Name: /windows/h/projekty/elektronika/USB_to_HPIB/usbToHpib/test_scr//gpibInterfaceTest.vhd
|
-- Project Name: usbToHpib
|
-- Project Name: usbToHpib
|
-- Target Device:
|
-- Target Device:
|
-- Tool versions:
|
-- Tool versions:
|
-- Description:
|
-- Description:
|
--
|
--
|
-- VHDL Test Bench Created by ISE for module: gpibInterface
|
-- VHDL Test Bench Created by ISE for module: gpibInterface
|
--
|
--
|
-- Dependencies:
|
-- Dependencies:
|
--
|
--
|
-- Revision:
|
-- Revision:
|
-- Revision 0.01 - File Created
|
-- Revision 0.01 - File Created
|
-- Additional Comments:
|
-- Additional Comments:
|
--
|
--
|
-- Notes:
|
-- Notes:
|
-- This testbench has been automatically generated using types std_logic and
|
-- This testbench has been automatically generated using types std_logic and
|
-- std_logic_vector for the ports of the unit under test. Xilinx recommends
|
-- std_logic_vector for the ports of the unit under test. Xilinx recommends
|
-- that these types always be used for the top-level I/O of a design in order
|
-- that these types always be used for the top-level I/O of a design in order
|
-- to guarantee that the testbench will bind correctly to the post-implementation
|
-- to guarantee that the testbench will bind correctly to the post-implementation
|
-- simulation model.
|
-- simulation model.
|
--------------------------------------------------------------------------------
|
--------------------------------------------------------------------------------
|
LIBRARY ieee;
|
LIBRARY ieee;
|
USE ieee.std_logic_1164.ALL;
|
USE ieee.std_logic_1164.ALL;
|
USE ieee.std_logic_unsigned.all;
|
USE ieee.std_logic_unsigned.all;
|
USE ieee.numeric_std.ALL;
|
USE ieee.numeric_std.ALL;
|
|
|
use work.gpibComponents.all;
|
use work.gpibComponents.all;
|
use work.helperComponents.all;
|
use work.helperComponents.all;
|
|
|
|
|
ENTITY gpibInterfaceTest IS
|
ENTITY gpibInterfaceTest IS
|
END gpibInterfaceTest;
|
END gpibInterfaceTest;
|
|
|
ARCHITECTURE behavior OF gpibInterfaceTest IS
|
ARCHITECTURE behavior OF gpibInterfaceTest IS
|
|
|
-- Component Declaration for the Unit Under Test (UUT)
|
-- Component Declaration for the Unit Under Test (UUT)
|
|
|
component gpibCableEmulator is port (
|
component gpibCableEmulator is port (
|
-- interface signals
|
-- interface signals
|
DIO_1 : in std_logic_vector (7 downto 0);
|
DIO_1 : in std_logic_vector (7 downto 0);
|
output_valid_1 : in std_logic;
|
output_valid_1 : in std_logic;
|
DIO_2 : in std_logic_vector (7 downto 0);
|
DIO_2 : in std_logic_vector (7 downto 0);
|
output_valid_2 : in std_logic;
|
output_valid_2 : in std_logic;
|
DIO : out std_logic_vector (7 downto 0);
|
DIO : out std_logic_vector (7 downto 0);
|
-- attention
|
-- attention
|
ATN_1 : in std_logic;
|
ATN_1 : in std_logic;
|
ATN_2 : in std_logic;
|
ATN_2 : in std_logic;
|
ATN : out std_logic;
|
ATN : out std_logic;
|
-- data valid
|
-- data valid
|
DAV_1 : in std_logic;
|
DAV_1 : in std_logic;
|
DAV_2 : in std_logic;
|
DAV_2 : in std_logic;
|
DAV : out std_logic;
|
DAV : out std_logic;
|
-- not ready for data
|
-- not ready for data
|
NRFD_1 : in std_logic;
|
NRFD_1 : in std_logic;
|
NRFD_2 : in std_logic;
|
NRFD_2 : in std_logic;
|
NRFD : out std_logic;
|
NRFD : out std_logic;
|
-- no data accepted
|
-- no data accepted
|
NDAC_1 : in std_logic;
|
NDAC_1 : in std_logic;
|
NDAC_2 : in std_logic;
|
NDAC_2 : in std_logic;
|
NDAC : out std_logic;
|
NDAC : out std_logic;
|
-- end or identify
|
-- end or identify
|
EOI_1 : in std_logic;
|
EOI_1 : in std_logic;
|
EOI_2 : in std_logic;
|
EOI_2 : in std_logic;
|
EOI : out std_logic;
|
EOI : out std_logic;
|
-- service request
|
-- service request
|
SRQ_1 : in std_logic;
|
SRQ_1 : in std_logic;
|
SRQ_2 : in std_logic;
|
SRQ_2 : in std_logic;
|
SRQ : out std_logic;
|
SRQ : out std_logic;
|
-- interface clear
|
-- interface clear
|
IFC_1 : in std_logic;
|
IFC_1 : in std_logic;
|
IFC_2 : in std_logic;
|
IFC_2 : in std_logic;
|
IFC : out std_logic;
|
IFC : out std_logic;
|
-- remote enable
|
-- remote enable
|
REN_1 : in std_logic;
|
REN_1 : in std_logic;
|
REN_2 : in std_logic;
|
REN_2 : in std_logic;
|
REN : out std_logic
|
REN : out std_logic
|
);
|
);
|
end component;
|
end component;
|
|
|
-- inputs common
|
-- inputs common
|
signal clk : std_logic := '0';
|
signal clk : std_logic := '0';
|
signal reset : std_logic := '0';
|
signal reset : std_logic := '0';
|
signal T1 : std_logic_vector(7 downto 0) := "00000100";
|
signal T1 : std_logic_vector(7 downto 0) := "00000100";
|
|
|
-- inputs 1
|
-- inputs 1
|
signal data_1 : std_logic_vector(7 downto 0) := (others => '0');
|
signal data_1 : std_logic_vector(7 downto 0) := (others => '0');
|
signal status_byte_1 : std_logic_vector(7 downto 0) := (others => '0');
|
signal status_byte_1 : std_logic_vector(7 downto 0) := (others => '0');
|
signal rdy_1 : std_logic := '0';
|
signal rdy_1 : std_logic := '0';
|
signal nba_1 : std_logic := '0';
|
signal nba_1 : std_logic := '0';
|
signal ltn_1 : std_logic := '0';
|
signal ltn_1 : std_logic := '0';
|
signal lun_1 : std_logic := '0';
|
signal lun_1 : std_logic := '0';
|
signal lon_1 : std_logic := '0';
|
signal lon_1 : std_logic := '0';
|
signal ton_1 : std_logic := '0';
|
signal ton_1 : std_logic := '0';
|
signal endOf_1 : std_logic := '0';
|
signal endOf_1 : std_logic := '0';
|
signal gts_1 : std_logic := '0';
|
signal gts_1 : std_logic := '0';
|
signal rpp_1 : std_logic := '0';
|
signal rpp_1 : std_logic := '0';
|
signal tcs_1 : std_logic := '0';
|
signal tcs_1 : std_logic := '0';
|
signal tca_1 : std_logic := '0';
|
signal tca_1 : std_logic := '0';
|
signal sic_1 : std_logic := '0';
|
signal sic_1 : std_logic := '0';
|
signal rsc_1 : std_logic := '0';
|
signal rsc_1 : std_logic := '0';
|
signal sre_1 : std_logic := '0';
|
signal sre_1 : std_logic := '0';
|
signal rtl_1 : std_logic := '0';
|
signal rtl_1 : std_logic := '0';
|
signal rsv_1 : std_logic := '0';
|
signal rsv_1 : std_logic := '0';
|
signal ist_1 : std_logic := '0';
|
signal ist_1 : std_logic := '0';
|
signal lpe_1 : std_logic := '0';
|
signal lpe_1 : std_logic := '0';
|
|
|
-- inputs 2
|
-- inputs 2
|
signal data_2 : std_logic_vector(7 downto 0) := (others => '0');
|
signal data_2 : std_logic_vector(7 downto 0) := (others => '0');
|
signal status_byte_2 : std_logic_vector(7 downto 0) := (others => '0');
|
signal status_byte_2 : std_logic_vector(7 downto 0) := (others => '0');
|
signal rdy_2 : std_logic := '0';
|
signal rdy_2 : std_logic := '0';
|
signal nba_2 : std_logic := '0';
|
signal nba_2 : std_logic := '0';
|
signal ltn_2 : std_logic := '0';
|
signal ltn_2 : std_logic := '0';
|
signal lun_2 : std_logic := '0';
|
signal lun_2 : std_logic := '0';
|
signal lon_2 : std_logic := '0';
|
signal lon_2 : std_logic := '0';
|
signal ton_2 : std_logic := '0';
|
signal ton_2 : std_logic := '0';
|
signal endOf_2 : std_logic := '0';
|
signal endOf_2 : std_logic := '0';
|
signal gts_2 : std_logic := '0';
|
signal gts_2 : std_logic := '0';
|
signal rpp_2 : std_logic := '0';
|
signal rpp_2 : std_logic := '0';
|
signal tcs_2 : std_logic := '0';
|
signal tcs_2 : std_logic := '0';
|
signal tca_2 : std_logic := '0';
|
signal tca_2 : std_logic := '0';
|
signal sic_2 : std_logic := '0';
|
signal sic_2 : std_logic := '0';
|
signal rsc_2 : std_logic := '0';
|
signal rsc_2 : std_logic := '0';
|
signal sre_2 : std_logic := '0';
|
signal sre_2 : std_logic := '0';
|
signal rtl_2 : std_logic := '0';
|
signal rtl_2 : std_logic := '0';
|
signal rsv_2 : std_logic := '0';
|
signal rsv_2 : std_logic := '0';
|
signal ist_2 : std_logic := '0';
|
signal ist_2 : std_logic := '0';
|
signal lpe_2 : std_logic := '0';
|
signal lpe_2 : std_logic := '0';
|
|
|
-- outputs 1
|
-- outputs 1
|
signal dvd_1 : std_logic;
|
signal dvd_1 : std_logic;
|
signal wnc_1 : std_logic;
|
signal wnc_1 : std_logic;
|
signal tac_1 : std_logic;
|
signal tac_1 : std_logic;
|
signal cwrc_1 : std_logic;
|
signal cwrc_1 : std_logic;
|
signal cwrd_1 : std_logic;
|
signal cwrd_1 : std_logic;
|
signal clr_1 : std_logic;
|
signal clr_1 : std_logic;
|
signal trg_1 : std_logic;
|
signal trg_1 : std_logic;
|
signal atl_1 : std_logic;
|
signal atl_1 : std_logic;
|
signal att_1 : std_logic;
|
signal att_1 : std_logic;
|
signal mla_1 : std_logic;
|
signal mla_1 : std_logic;
|
signal lsb_1 : std_logic;
|
signal lsb_1 : std_logic;
|
signal spa_1 : std_logic;
|
signal spa_1 : std_logic;
|
signal ppr_1 : std_logic;
|
signal ppr_1 : std_logic;
|
signal sreq_1 : std_logic;
|
signal sreq_1 : std_logic;
|
signal isLocal_1 : std_logic;
|
signal isLocal_1 : std_logic;
|
signal currentSecAddr_1 : std_logic_vector (4 downto 0);
|
signal currentSecAddr_1 : std_logic_vector (4 downto 0);
|
|
|
-- outputs 2
|
-- outputs 2
|
signal dvd_2 : std_logic;
|
signal dvd_2 : std_logic;
|
signal wnc_2 : std_logic;
|
signal wnc_2 : std_logic;
|
signal tac_2 : std_logic;
|
signal tac_2 : std_logic;
|
signal cwrc_2 : std_logic;
|
signal cwrc_2 : std_logic;
|
signal cwrd_2 : std_logic;
|
signal cwrd_2 : std_logic;
|
signal clr_2 : std_logic;
|
signal clr_2 : std_logic;
|
signal trg_2 : std_logic;
|
signal trg_2 : std_logic;
|
signal atl_2 : std_logic;
|
signal atl_2 : std_logic;
|
signal att_2 : std_logic;
|
signal att_2 : std_logic;
|
signal mla_2 : std_logic;
|
signal mla_2 : std_logic;
|
signal lsb_2 : std_logic;
|
signal lsb_2 : std_logic;
|
signal spa_2 : std_logic;
|
signal spa_2 : std_logic;
|
signal ppr_2 : std_logic;
|
signal ppr_2 : std_logic;
|
signal sreq_2 : std_logic;
|
signal sreq_2 : std_logic;
|
signal isLocal_2 : std_logic;
|
signal isLocal_2 : std_logic;
|
signal currentSecAddr_2 : std_logic_vector (4 downto 0);
|
signal currentSecAddr_2 : std_logic_vector (4 downto 0);
|
|
|
-- common
|
-- common
|
signal DO : std_logic_vector (7 downto 0);
|
signal DO : std_logic_vector (7 downto 0);
|
signal DI_1 : std_logic_vector (7 downto 0);
|
signal DI_1 : std_logic_vector (7 downto 0);
|
signal output_valid_1 : std_logic;
|
signal output_valid_1 : std_logic;
|
signal DI_2 : std_logic_vector (7 downto 0);
|
signal DI_2 : std_logic_vector (7 downto 0);
|
signal output_valid_2 : std_logic;
|
signal output_valid_2 : std_logic;
|
signal ATN_1, ATN_2, ATN : std_logic;
|
signal ATN_1, ATN_2, ATN : std_logic;
|
signal DAV_1, DAV_2, DAV : std_logic;
|
signal DAV_1, DAV_2, DAV : std_logic;
|
signal NRFD_1, NRFD_2, NRFD : std_logic;
|
signal NRFD_1, NRFD_2, NRFD : std_logic;
|
signal NDAC_1, NDAC_2, NDAC : std_logic;
|
signal NDAC_1, NDAC_2, NDAC : std_logic;
|
signal EOI_1, EOI_2, EOI : std_logic;
|
signal EOI_1, EOI_2, EOI : std_logic;
|
signal SRQ_1, SRQ_2, SRQ : std_logic;
|
signal SRQ_1, SRQ_2, SRQ : std_logic;
|
signal IFC_1, IFC_2, IFC : std_logic;
|
signal IFC_1, IFC_2, IFC : std_logic;
|
signal REN_1, REN_2, REN : std_logic;
|
signal REN_1, REN_2, REN : std_logic;
|
|
|
|
|
-- Clock period definitions
|
-- Clock period definitions
|
constant clk_period : time := 2ps;
|
constant clk_period : time := 2ps;
|
|
|
BEGIN
|
BEGIN
|
|
|
-- Instantiate the Unit Under Test (UUT)
|
-- Instantiate the Unit Under Test (UUT)
|
gpib1: gpibInterface PORT MAP (
|
gpib1: gpibInterface PORT MAP (
|
clk => clk,
|
clk => clk,
|
reset => reset,
|
reset => reset,
|
isLE => '0',
|
isLE => '0',
|
isTE => '0',
|
isTE => '0',
|
lpeUsed => '0',
|
lpeUsed => '0',
|
fixedPpLine => "000",
|
fixedPpLine => "000",
|
eosUsed => '0',
|
eosUsed => '0',
|
eosMark => "00000000",
|
eosMark => "00000000",
|
myListAddr => "00001",
|
myListAddr => "00001",
|
myTalkAddr => "00001",
|
myTalkAddr => "00001",
|
secAddrMask => (others => '0'),
|
secAddrMask => (others => '0'),
|
data => data_1,
|
data => data_1,
|
status_byte => status_byte_1,
|
status_byte => status_byte_1,
|
T1 => T1,
|
T1 => T1,
|
rdy => rdy_1,
|
rdy => rdy_1,
|
nba => nba_1,
|
nba => nba_1,
|
ltn => ltn_1,
|
ltn => ltn_1,
|
lun => lun_1,
|
lun => lun_1,
|
lon => lon_1,
|
lon => lon_1,
|
ton => ton_1,
|
ton => ton_1,
|
endOf => endOf_1,
|
endOf => endOf_1,
|
gts => gts_1,
|
gts => gts_1,
|
rpp => rpp_1,
|
rpp => rpp_1,
|
tcs => tcs_1,
|
tcs => tcs_1,
|
tca => tca_1,
|
tca => tca_1,
|
sic => sic_1,
|
sic => sic_1,
|
rsc => rsc_1,
|
rsc => rsc_1,
|
sre => sre_1,
|
sre => sre_1,
|
rtl => rtl_1,
|
rtl => rtl_1,
|
rsv => rsv_1,
|
rsv => rsv_1,
|
ist => ist_1,
|
ist => ist_1,
|
lpe => lpe_1,
|
lpe => lpe_1,
|
dvd => dvd_1,
|
dvd => dvd_1,
|
wnc => wnc_1,
|
wnc => wnc_1,
|
tac => tac_1,
|
tac => tac_1,
|
cwrc => cwrc_1,
|
cwrc => cwrc_1,
|
cwrd => cwrd_1,
|
cwrd => cwrd_1,
|
clr => clr_1,
|
clr => clr_1,
|
trg => trg_1,
|
trg => trg_1,
|
atl => atl_1,
|
atl => atl_1,
|
att => att_1,
|
att => att_1,
|
mla => mla_1,
|
mla => mla_1,
|
lsb => lsb_1,
|
lsb => lsb_1,
|
spa => spa_1,
|
spa => spa_1,
|
ppr => ppr_1,
|
ppr => ppr_1,
|
sreq => sreq_1,
|
sreq => sreq_1,
|
isLocal => isLocal_1,
|
isLocal => isLocal_1,
|
currentSecAddr => currentSecAddr_1,
|
currentSecAddr => currentSecAddr_1,
|
DI => DO,
|
DI => DO,
|
DO => DI_1,
|
DO => DI_1,
|
output_valid => output_valid_1,
|
output_valid => output_valid_1,
|
ATN_in => ATN,
|
ATN_in => ATN,
|
ATN_out => ATN_1,
|
ATN_out => ATN_1,
|
DAV_in => DAV,
|
DAV_in => DAV,
|
DAV_out => DAV_1,
|
DAV_out => DAV_1,
|
NRFD_in => NRFD,
|
NRFD_in => NRFD,
|
NRFD_out => NRFD_1,
|
NRFD_out => NRFD_1,
|
NDAC_in => NDAC,
|
NDAC_in => NDAC,
|
NDAC_out => NDAC_1,
|
NDAC_out => NDAC_1,
|
EOI_in => EOI,
|
EOI_in => EOI,
|
EOI_out => EOI_1,
|
EOI_out => EOI_1,
|
SRQ_in => SRQ,
|
SRQ_in => SRQ,
|
SRQ_out => SRQ_1,
|
SRQ_out => SRQ_1,
|
IFC_in => IFC,
|
IFC_in => IFC,
|
IFC_out => IFC_1,
|
IFC_out => IFC_1,
|
REN_in => REN,
|
REN_in => REN,
|
REN_out => REN_1
|
REN_out => REN_1
|
);
|
);
|
|
|
-- Instantiate the Unit Under Test (UUT)
|
-- Instantiate the Unit Under Test (UUT)
|
gpib2: gpibInterface PORT MAP (
|
gpib2: gpibInterface PORT MAP (
|
clk => clk,
|
clk => clk,
|
reset => reset,
|
reset => reset,
|
isLE => '0',
|
isLE => '0',
|
isTE => '0',
|
isTE => '0',
|
lpeUsed => '0',
|
lpeUsed => '0',
|
fixedPpLine => "000",
|
fixedPpLine => "000",
|
eosUsed => '0',
|
eosUsed => '0',
|
eosMark => "00000000",
|
eosMark => "00000000",
|
myListAddr => "00010",
|
myListAddr => "00010",
|
myTalkAddr => "00010",
|
myTalkAddr => "00010",
|
secAddrMask => (others => '0'),
|
secAddrMask => (others => '0'),
|
data => data_2,
|
data => data_2,
|
status_byte => status_byte_2,
|
status_byte => status_byte_2,
|
T1 => T1,
|
T1 => T1,
|
rdy => rdy_2,
|
rdy => rdy_2,
|
nba => nba_2,
|
nba => nba_2,
|
ltn => ltn_2,
|
ltn => ltn_2,
|
lun => lun_2,
|
lun => lun_2,
|
lon => lon_2,
|
lon => lon_2,
|
ton => ton_2,
|
ton => ton_2,
|
endOf => endOf_2,
|
endOf => endOf_2,
|
gts => gts_2,
|
gts => gts_2,
|
rpp => rpp_2,
|
rpp => rpp_2,
|
tcs => tcs_2,
|
tcs => tcs_2,
|
tca => tca_2,
|
tca => tca_2,
|
sic => sic_2,
|
sic => sic_2,
|
rsc => rsc_2,
|
rsc => rsc_2,
|
sre => sre_2,
|
sre => sre_2,
|
rtl => rtl_2,
|
rtl => rtl_2,
|
rsv => rsv_2,
|
rsv => rsv_2,
|
ist => ist_2,
|
ist => ist_2,
|
lpe => lpe_2,
|
lpe => lpe_2,
|
dvd => dvd_2,
|
dvd => dvd_2,
|
wnc => wnc_2,
|
wnc => wnc_2,
|
tac => tac_2,
|
tac => tac_2,
|
cwrc => cwrc_2,
|
cwrc => cwrc_2,
|
cwrd => cwrd_2,
|
cwrd => cwrd_2,
|
clr => clr_2,
|
clr => clr_2,
|
trg => trg_2,
|
trg => trg_2,
|
atl => atl_2,
|
atl => atl_2,
|
att => att_2,
|
att => att_2,
|
mla => mla_2,
|
mla => mla_2,
|
lsb => lsb_2,
|
lsb => lsb_2,
|
spa => spa_2,
|
spa => spa_2,
|
ppr => ppr_2,
|
ppr => ppr_2,
|
sreq => sreq_2,
|
sreq => sreq_2,
|
isLocal => isLocal_2,
|
isLocal => isLocal_2,
|
currentSecAddr => currentSecAddr_2,
|
currentSecAddr => currentSecAddr_2,
|
DI => DO,
|
DI => DO,
|
DO => DI_2,
|
DO => DI_2,
|
output_valid => output_valid_2,
|
output_valid => output_valid_2,
|
ATN_in => ATN,
|
ATN_in => ATN,
|
ATN_out => ATN_2,
|
ATN_out => ATN_2,
|
DAV_in => DAV,
|
DAV_in => DAV,
|
DAV_out => DAV_2,
|
DAV_out => DAV_2,
|
NRFD_in => NRFD,
|
NRFD_in => NRFD,
|
NRFD_out => NRFD_2,
|
NRFD_out => NRFD_2,
|
NDAC_in => NDAC,
|
NDAC_in => NDAC,
|
NDAC_out => NDAC_2,
|
NDAC_out => NDAC_2,
|
EOI_in => EOI,
|
EOI_in => EOI,
|
EOI_out => EOI_2,
|
EOI_out => EOI_2,
|
SRQ_in => SRQ,
|
SRQ_in => SRQ,
|
SRQ_out => SRQ_2,
|
SRQ_out => SRQ_2,
|
IFC_in => IFC,
|
IFC_in => IFC,
|
IFC_out => IFC_2,
|
IFC_out => IFC_2,
|
REN_in => REN,
|
REN_in => REN,
|
REN_out => REN_2
|
REN_out => REN_2
|
);
|
);
|
|
|
ce: gpibCableEmulator port map (
|
ce: gpibCableEmulator port map (
|
-- interface signals
|
-- interface signals
|
DIO_1 => DI_1,
|
DIO_1 => DI_1,
|
output_valid_1 => output_valid_1,
|
output_valid_1 => output_valid_1,
|
DIO_2 => DI_2,
|
DIO_2 => DI_2,
|
output_valid_2 => output_valid_2,
|
output_valid_2 => output_valid_2,
|
DIO => DO,
|
DIO => DO,
|
-- attention
|
-- attention
|
ATN_1 => ATN_1, ATN_2 => ATN_2, ATN => ATN,
|
ATN_1 => ATN_1, ATN_2 => ATN_2, ATN => ATN,
|
DAV_1 => DAV_1, DAV_2 => DAV_2, DAV => DAV,
|
DAV_1 => DAV_1, DAV_2 => DAV_2, DAV => DAV,
|
NRFD_1 => NRFD_1, NRFD_2 => NRFD_2, NRFD => NRFD,
|
NRFD_1 => NRFD_1, NRFD_2 => NRFD_2, NRFD => NRFD,
|
NDAC_1 => NDAC_1, NDAC_2 => NDAC_2, NDAC => NDAC,
|
NDAC_1 => NDAC_1, NDAC_2 => NDAC_2, NDAC => NDAC,
|
EOI_1 => EOI_1, EOI_2 => EOI_2, EOI => EOI,
|
EOI_1 => EOI_1, EOI_2 => EOI_2, EOI => EOI,
|
SRQ_1 => SRQ_1, SRQ_2 => SRQ_2, SRQ => SRQ,
|
SRQ_1 => SRQ_1, SRQ_2 => SRQ_2, SRQ => SRQ,
|
IFC_1 => IFC_1, IFC_2 => IFC_2, IFC => IFC,
|
IFC_1 => IFC_1, IFC_2 => IFC_2, IFC => IFC,
|
REN_1 => REN_1, REN_2 => REN_2, REN => REN
|
REN_1 => REN_1, REN_2 => REN_2, REN => REN
|
);
|
);
|
|
|
-- Clock process definitions
|
-- Clock process definitions
|
clk_process :process
|
clk_process :process
|
begin
|
begin
|
clk <= '0';
|
clk <= '0';
|
wait for clk_period/2;
|
wait for clk_period/2;
|
clk <= '1';
|
clk <= '1';
|
wait for clk_period/2;
|
wait for clk_period/2;
|
end process;
|
end process;
|
|
|
|
|
-- Stimulus process
|
-- Stimulus process
|
stim_proc: process
|
stim_proc: process
|
begin
|
begin
|
-- hold reset state for 10 clock periods.
|
-- hold reset state for 10 clock periods.
|
reset <= '1';
|
reset <= '1';
|
wait for clk_period*10;
|
wait for clk_period*10;
|
reset <= '0';
|
reset <= '0';
|
wait for clk_period*10;
|
wait for clk_period*10;
|
|
|
-- requests system control
|
-- requests system control
|
rsc_1 <= '1';
|
rsc_1 <= '1';
|
-- interface clear
|
-- interface clear
|
sic_1 <= '1';
|
sic_1 <= '1';
|
wait for clk_period*2;
|
wait for clk_period*2;
|
sic_1 <= '0';
|
sic_1 <= '0';
|
wait until ifc_1='0';
|
wait until ifc_1='0';
|
-- address gpib2 to listen
|
-- address gpib2 to listen
|
data_1 <= "00100010";
|
data_1 <= "00100010";
|
nba_1 <= '1';
|
nba_1 <= '1';
|
wait until DAV='1';
|
wait until DAV='1';
|
nba_1 <= '0';
|
nba_1 <= '0';
|
wait for clk_period*20;
|
wait for clk_period*20;
|
-- address gpib1 to talk
|
-- address gpib1 to talk
|
data_1 <= "01000001";
|
data_1 <= "01000001";
|
wait for clk_period*1;
|
wait for clk_period*1;
|
nba_1 <= '1';
|
nba_1 <= '1';
|
wait until DAV='1';
|
wait until DAV='1';
|
nba_1 <= '0';
|
nba_1 <= '0';
|
wait for clk_period*30;
|
wait for clk_period*30;
|
gts_1 <= '1';
|
gts_1 <= '1';
|
wait until tac_1='1';
|
wait until tac_1='1';
|
-- send data to gpib2
|
-- send data to gpib2
|
rdy_2 <= '1';
|
rdy_2 <= '1';
|
wait until NRFD='0';
|
wait until NRFD='0';
|
data_1 <= "10101010";
|
data_1 <= "10101010";
|
nba_1 <= '1';
|
nba_1 <= '1';
|
wait until DAV_1='1';
|
wait until DAV_1='1';
|
nba_1 <= '0';
|
nba_1 <= '0';
|
wait until dvd_2='1';
|
wait until dvd_2='1';
|
rdy_2 <= '0';
|
rdy_2 <= '0';
|
wait until NDAC_2='0';
|
wait until NDAC_2='0';
|
rdy_2 <= '1';
|
rdy_2 <= '1';
|
-- send end data to gpib2
|
-- send end data to gpib2
|
wait until NRFD='0';
|
wait until NRFD='0';
|
data_1 <= "10101010";
|
data_1 <= "10101010";
|
endOf_1 <= '1';
|
endOf_1 <= '1';
|
nba_1 <= '1';
|
nba_1 <= '1';
|
wait until DAV_1='1';
|
wait until DAV_1='1';
|
nba_1 <= '0';
|
nba_1 <= '0';
|
wait until dvd_2='1';
|
wait until dvd_2='1';
|
rdy_2 <= '0';
|
rdy_2 <= '0';
|
wait until NDAC_2='0';
|
wait until NDAC_2='0';
|
rdy_2 <= '1';
|
rdy_2 <= '1';
|
|
|
wait;
|
wait;
|
end process;
|
end process;
|
|
|
END;
|
END;
|
|
|