mirror of
https://github.com/wfjm/w11.git
synced 2026-04-26 04:08:17 +00:00
e1479d4e5d
- Add sysmon/xadc support (for nexys4,basys3,arty designs) - Add Vivado simulator support (DPI not yet working)
241 lines
11 KiB
VHDL
241 lines
11 KiB
VHDL
-- $Id: bpgenlib.vhd 737 2016-02-28 09:07:18Z mueller $
|
|
--
|
|
-- Copyright 2011-2016 by Walter F.J. Mueller <W.F.J.Mueller@gsi.de>
|
|
--
|
|
-- This program is free software; you may redistribute and/or modify it under
|
|
-- the terms of the GNU General Public License as published by the Free
|
|
-- Software Foundation, either version 2, or at your option any later version.
|
|
--
|
|
-- 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 complete details.
|
|
--
|
|
------------------------------------------------------------------------------
|
|
-- Package Name: bpgenlib
|
|
-- Description: Generic Board/Part components
|
|
--
|
|
-- Dependencies: -
|
|
-- Tool versions: ise 12.1-14.7; viv 2014.4-2015.4; ghdl 0.26-0.31
|
|
-- Revision History:
|
|
-- Date Rev Version Comment
|
|
-- 2016-02-27 737 1.2 add rgbdrv entity
|
|
-- 2015-01-24 637 1.1.2 add generics to sn_humanio and sn_7segctl
|
|
-- 2013-09-21 534 1.1.1 add bp_rs232_4l4l_iob
|
|
-- 2013-01-26 476 1.1 moved rbus depended components to bpgenrbuslib
|
|
-- 2013-01-06 472 1.0.7 add sn_humanio_demu_rbus
|
|
-- 2011-11-16 426 1.0.6 now numeric_std clean
|
|
-- 2011-10-10 413 1.0.5 add sn_humanio_demu
|
|
-- 2011-08-07 404 1.0.4 add RELAY generic for bp_rs232_2l4l_iob
|
|
-- 2011-08-06 403 1.0.3 add RESET port for bp_rs232_2l4l_iob
|
|
-- 2011-07-09 391 1.0.2 move in bp_rs232_2l4l_iob from s3boardlib
|
|
-- 2011-07-08 390 1.0.1 move in sn_(4x7segctl|humanio*) from s3boardlib
|
|
-- 2011-07-01 386 1.0 Initial version (with rs232_iob's and bp_swibtnled)
|
|
------------------------------------------------------------------------------
|
|
|
|
library ieee;
|
|
use ieee.std_logic_1164.all;
|
|
use ieee.numeric_std.all;
|
|
|
|
use work.slvtypes.all;
|
|
|
|
package bpgenlib is
|
|
|
|
component bp_rs232_2line_iob is -- iob's for 2 line rs232 (RXD,TXD)
|
|
port (
|
|
CLK : in slbit; -- clock
|
|
RXD : out slbit; -- receive data (board view)
|
|
TXD : in slbit; -- transmit data (board view)
|
|
I_RXD : in slbit; -- pad-i: receive data (board view)
|
|
O_TXD : out slbit -- pad-o: transmit data (board view)
|
|
);
|
|
end component;
|
|
|
|
component bp_rs232_4line_iob is -- iob's for 4 line rs232 (w/ RTS,CTS)
|
|
port (
|
|
CLK : in slbit; -- clock
|
|
RXD : out slbit; -- receive data (board view)
|
|
TXD : in slbit; -- transmit data (board view)
|
|
CTS_N : out slbit; -- clear to send (act. low)
|
|
RTS_N : in slbit; -- request to send (act. low)
|
|
I_RXD : in slbit; -- pad-i: receive data (board view)
|
|
O_TXD : out slbit; -- pad-o: transmit data (board view)
|
|
I_CTS_N : in slbit; -- pad-i: clear to send (act. low)
|
|
O_RTS_N : out slbit -- pad-o: request to send (act. low)
|
|
);
|
|
end component;
|
|
|
|
component bp_rs232_2l4l_iob is -- iob's for dual 2l+4l rs232, w/ select
|
|
generic (
|
|
RELAY : boolean := false); -- add a relay stage towards IOB's
|
|
port (
|
|
CLK : in slbit; -- clock
|
|
RESET : in slbit := '0'; -- reset
|
|
SEL : in slbit; -- select, '0' for port 0
|
|
RXD : out slbit; -- receive data (board view)
|
|
TXD : in slbit; -- transmit data (board view)
|
|
CTS_N : out slbit; -- clear to send (act. low)
|
|
RTS_N : in slbit; -- request to send (act. low)
|
|
I_RXD0 : in slbit; -- pad-i: p0: receive data (board view)
|
|
O_TXD0 : out slbit; -- pad-o: p0: transmit data (board view)
|
|
I_RXD1 : in slbit; -- pad-i: p1: receive data (board view)
|
|
O_TXD1 : out slbit; -- pad-o: p1: transmit data (board view)
|
|
I_CTS1_N : in slbit; -- pad-i: p1: clear to send (act. low)
|
|
O_RTS1_N : out slbit -- pad-o: p1: request to send (act. low)
|
|
);
|
|
end component;
|
|
|
|
component bp_rs232_4l4l_iob is -- iob's for dual 4l+4l rs232, w/ select
|
|
generic (
|
|
RELAY : boolean := false); -- add a relay stage towards IOB's
|
|
port (
|
|
CLK : in slbit; -- clock
|
|
RESET : in slbit := '0'; -- reset
|
|
SEL : in slbit; -- select, '0' for port 0
|
|
RXD : out slbit; -- receive data (board view)
|
|
TXD : in slbit; -- transmit data (board view)
|
|
CTS_N : out slbit; -- clear to send (act. low)
|
|
RTS_N : in slbit; -- request to send (act. low)
|
|
I_RXD0 : in slbit; -- pad-i: p0: receive data (board view)
|
|
O_TXD0 : out slbit; -- pad-o: p0: transmit data (board view)
|
|
I_CTS0_N : in slbit; -- pad-i: p0: clear to send (act. low)
|
|
O_RTS0_N : out slbit; -- pad-o: p0: request to send (act. low)
|
|
I_RXD1 : in slbit; -- pad-i: p1: receive data (board view)
|
|
O_TXD1 : out slbit; -- pad-o: p1: transmit data (board view)
|
|
I_CTS1_N : in slbit; -- pad-i: p1: clear to send (act. low)
|
|
O_RTS1_N : out slbit -- pad-o: p1: request to send (act. low)
|
|
);
|
|
end component;
|
|
|
|
component bp_swibtnled is -- generic SWI, BTN and LED handling
|
|
generic (
|
|
SWIDTH : positive := 4; -- SWI port width
|
|
BWIDTH : positive := 4; -- BTN port width
|
|
LWIDTH : positive := 4; -- LED port width
|
|
DEBOUNCE : boolean := true); -- instantiate debouncer for SWI,BTN
|
|
port (
|
|
CLK : in slbit; -- clock
|
|
RESET : in slbit := '0'; -- reset
|
|
CE_MSEC : in slbit; -- 1 ms clock enable
|
|
SWI : out slv(SWIDTH-1 downto 0); -- switch settings, debounced
|
|
BTN : out slv(BWIDTH-1 downto 0); -- button settings, debounced
|
|
LED : in slv(LWIDTH-1 downto 0); -- led data
|
|
I_SWI : in slv(SWIDTH-1 downto 0); -- pad-i: switches
|
|
I_BTN : in slv(BWIDTH-1 downto 0); -- pad-i: buttons
|
|
O_LED : out slv(LWIDTH-1 downto 0) -- pad-o: leds
|
|
);
|
|
end component;
|
|
|
|
component sn_7segctl is -- 7 segment display controller
|
|
generic (
|
|
DCWIDTH : positive := 2; -- digit counter width (2 or 3)
|
|
CDWIDTH : positive := 6); -- clk divider width (must be >= 5)
|
|
port (
|
|
CLK : in slbit; -- clock
|
|
DIN : in slv(4*(2**DCWIDTH)-1 downto 0); -- data 16 or 32
|
|
DP : in slv((2**DCWIDTH)-1 downto 0); -- decimal points 4 or 8
|
|
ANO_N : out slv((2**DCWIDTH)-1 downto 0); -- anodes (act.low) 4 or 8
|
|
SEG_N : out slv8 -- segements (act.low)
|
|
);
|
|
end component;
|
|
|
|
component sn_humanio is -- human i/o handling: swi,btn,led,dsp
|
|
generic (
|
|
SWIDTH : positive := 8; -- SWI port width
|
|
BWIDTH : positive := 4; -- BTN port width
|
|
LWIDTH : positive := 8; -- LED port width
|
|
DCWIDTH : positive := 2; -- digit counter width (2 or 3)
|
|
DEBOUNCE : boolean := true); -- instantiate debouncer for SWI,BTN
|
|
port (
|
|
CLK : in slbit; -- clock
|
|
RESET : in slbit := '0'; -- reset
|
|
CE_MSEC : in slbit; -- 1 ms clock enable
|
|
SWI : out slv(SWIDTH-1 downto 0); -- switch settings, debounced
|
|
BTN : out slv(BWIDTH-1 downto 0); -- button settings, debounced
|
|
LED : in slv(LWIDTH-1 downto 0); -- led data
|
|
DSP_DAT : in slv(4*(2**DCWIDTH)-1 downto 0); -- display data
|
|
DSP_DP : in slv((2**DCWIDTH)-1 downto 0); -- display decimal points
|
|
I_SWI : in slv(SWIDTH-1 downto 0); -- pad-i: switches
|
|
I_BTN : in slv(BWIDTH-1 downto 0); -- pad-i: buttons
|
|
O_LED : out slv(LWIDTH-1 downto 0); -- pad-o: leds
|
|
O_ANO_N : out slv((2**DCWIDTH)-1 downto 0); -- pad-o: disp: anodes (act.low)
|
|
O_SEG_N : out slv8 -- pad-o: disp: segments (act.low)
|
|
);
|
|
end component;
|
|
|
|
component sn_humanio_demu is -- human i/o handling: swi,btn,led only
|
|
generic (
|
|
DEBOUNCE : boolean := true); -- instantiate debouncer for SWI,BTN
|
|
port (
|
|
CLK : in slbit; -- clock
|
|
RESET : in slbit := '0'; -- reset
|
|
CE_MSEC : in slbit; -- 1 ms clock enable
|
|
SWI : out slv8; -- switch settings, debounced
|
|
BTN : out slv4; -- button settings, debounced
|
|
LED : in slv8; -- led data
|
|
DSP_DAT : in slv16; -- display data
|
|
DSP_DP : in slv4; -- display decimal points
|
|
I_SWI : in slv8; -- pad-i: switches
|
|
I_BTN : in slv6; -- pad-i: buttons
|
|
O_LED : out slv8 -- pad-o: leds
|
|
);
|
|
end component;
|
|
|
|
component rgbdrv_master is -- rgbled driver: master
|
|
generic (
|
|
DWIDTH : positive := 8); -- dimmer width
|
|
port (
|
|
CLK : in slbit; -- clock
|
|
RESET : in slbit := '0'; -- reset
|
|
CE_USEC : in slbit; -- 1 us clock enable
|
|
RGBCNTL : out slv3; -- rgb control
|
|
DIMCNTL : out slv(DWIDTH-1 downto 0) -- dim control
|
|
);
|
|
end component;
|
|
|
|
component rgbdrv_analog is -- rgbled driver: analog channel
|
|
generic (
|
|
DWIDTH : positive := 8); -- dimmer width
|
|
port (
|
|
CLK : in slbit; -- clock
|
|
RESET : in slbit := '0'; -- reset
|
|
RGBCNTL : in slv3; -- rgb control
|
|
DIMCNTL : in slv(DWIDTH-1 downto 0);-- dim control
|
|
DIMR : in slv(DWIDTH-1 downto 0); -- dim red
|
|
DIMG : in slv(DWIDTH-1 downto 0); -- dim green
|
|
DIMB : in slv(DWIDTH-1 downto 0); -- dim blue
|
|
O_RGBLED : out slv3 -- pad-o: rgb led
|
|
);
|
|
end component;
|
|
|
|
component rgbdrv_binary is -- rgbled driver: binary channel
|
|
generic (
|
|
DWIDTH : positive := 8); -- dimmer width
|
|
port (
|
|
CLK : in slbit; -- clock
|
|
RESET : in slbit := '0'; -- reset
|
|
RGBCNTL : in slv3; -- rgb control
|
|
DIMCNTL : in slv(DWIDTH-1 downto 0);-- dim control
|
|
DIM : in slv(DWIDTH-1 downto 0); -- dim
|
|
ENARGB : in slv3; -- enable [0] red [1] green [2] blue
|
|
O_RGBLED : out slv3 -- pad-o: rgb led
|
|
);
|
|
end component;
|
|
|
|
component rgbdrv_3x4mux is -- rgbled driver: mux three 4bit inputs
|
|
port (
|
|
CLK : in slbit; -- clock
|
|
RESET : in slbit := '0'; -- reset
|
|
CE_USEC : in slbit; -- 1 us clock enable
|
|
DATR : in slv4; -- red data
|
|
DATG : in slv4; -- green data
|
|
DATB : in slv4; -- blue data
|
|
O_RGBLED0 : out slv3; -- pad-o: rgb led 0
|
|
O_RGBLED1 : out slv3; -- pad-o: rgb led 1
|
|
O_RGBLED2 : out slv3; -- pad-o: rgb led 2
|
|
O_RGBLED3 : out slv3 -- pad-o: rgb led 3
|
|
);
|
|
end component;
|
|
|
|
end package bpgenlib;
|