pluto_hdl_adi/library/util_bsplit/util_bsplit_hw.tcl

69 lines
2.0 KiB
Tcl
Raw Normal View History

package require -exact qsys 13.0
source ../scripts/adi_env.tcl
source ../scripts/adi_ip_alt.tcl
set_module_property NAME util_bsplit
set_module_property DESCRIPTION "Channel Split Utility"
set_module_property VERSION 1.0
set_module_property DISPLAY_NAME util_bsplit
set_module_property ELABORATION_CALLBACK p_util_bsplit
# files
add_fileset quartus_synth QUARTUS_SYNTH "" "Quartus Synthesis"
set_fileset_property quartus_synth TOP_LEVEL util_bsplit
add_fileset_file util_bsplit.v VERILOG PATH util_bsplit.v TOP_LEVEL_FILE
# parameters
add_parameter CH_DW INTEGER 0
set_parameter_property CH_DW DEFAULT_VALUE 32
set_parameter_property CH_DW DISPLAY_NAME CH_DW
set_parameter_property CH_DW TYPE INTEGER
set_parameter_property CH_DW UNITS None
set_parameter_property CH_DW HDL_PARAMETER true
add_parameter CH_CNT INTEGER 0
set_parameter_property CH_CNT DEFAULT_VALUE 8
set_parameter_property CH_CNT DISPLAY_NAME CH_CNT
set_parameter_property CH_CNT TYPE INTEGER
set_parameter_property CH_CNT UNITS None
set_parameter_property CH_CNT HDL_PARAMETER true
# avalon streaming
ad_alt_intf signal data input CH_CNT*CH_DW
ad_alt_intf signal split_data_0 output CH_DW data
proc p_util_bsplit {} {
set p_ch_cnt [get_parameter_value "CH_CNT"]
set p_ch_dw [get_parameter_value "CH_DW"]
if {[get_parameter_value CH_CNT] > 1} {
ad_alt_intf signal split_data_1 output CH_DW data
}
if {[get_parameter_value CH_CNT] > 2} {
ad_alt_intf signal split_data_2 output CH_DW data
}
if {[get_parameter_value CH_CNT] > 3} {
ad_alt_intf signal split_data_3 output CH_DW data
}
if {[get_parameter_value CH_CNT] > 4} {
ad_alt_intf signal split_data_4 output CH_DW data
}
if {[get_parameter_value CH_CNT] > 5} {
ad_alt_intf signal split_data_5 output CH_DW data
}
if {[get_parameter_value CH_CNT] > 6} {
ad_alt_intf signal split_data_6 output CH_DW data
}
if {[get_parameter_value CH_CNT] > 7} {
ad_alt_intf signal split_data_7 output CH_DW data
}
}