08092b8d48
CR: 767582 Wall Data: Originally submitted from RDI_kkorath_new Build Type: full Test Types: pre-commits, gui pre-commits [git-p4: depot-paths = "//Rodin/HEAD/data/embeddedsw/": change = 926519]
191 lines
6 KiB
Tcl
Executable file
191 lines
6 KiB
Tcl
Executable file
###############################################################################
|
|
#
|
|
# Copyright (C) 2012 - 2014 Xilinx, Inc. All rights reserved.
|
|
#
|
|
# Permission is hereby granted, free of charge, to any person obtaining a copy
|
|
# of this software and associated documentation files (the "Software"), to deal
|
|
# in the Software without restriction, including without limitation the rights
|
|
# to use, copy, modify, merge, publish, distribute, sublicense, and/or sell
|
|
# copies of the Software, and to permit persons to whom the Software is
|
|
# furnished to do so, subject to the following conditions:
|
|
#
|
|
# The above copyright notice and this permission notice shall be included in
|
|
# all copies or substantial portions of the Software.
|
|
#
|
|
# Use of the Software is limited solely to applications:
|
|
# (a) running on a Xilinx device, or
|
|
# (b) that interact with a Xilinx device through a bus or interconnect.
|
|
#
|
|
# THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR
|
|
# IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY,
|
|
# FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE
|
|
# XILINX CONSORTIUM BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER LIABILITY,
|
|
# WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, OUT OF
|
|
# OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE
|
|
# SOFTWARE.
|
|
#
|
|
# Except as contained in this notice, the name of the Xilinx shall not be used
|
|
# in advertising or otherwise to promote the sale, use or other dealings in
|
|
# this Software without prior written authorization from Xilinx.
|
|
#
|
|
###############################################################################
|
|
#
|
|
# Modification History
|
|
#
|
|
# Ver Who Date Changes
|
|
# ----- ---- -------- -----------------------------------------------
|
|
# 2.01a sdm 06/17/10 Updated to support axi_spi
|
|
# 2.02a sdm 09/24/10 updated to use Tcl commands instead of unix commands
|
|
# 2.03a sdm 04/17/11 Updated to support axi_quad_spi
|
|
# 2.04a sdm 08/01/11 Added new parameter for Numonyx quad flash devices.
|
|
# 3.00a srt 06/20/12 Updated to support interfaces SPI PS and QSPI PS.
|
|
# Added support to SST flash.
|
|
# 3.02a srt 05/13/13 Removed compiler errors when not selecting proper
|
|
# interface for Zynq. (CR 716451)
|
|
#
|
|
##############################################################################
|
|
|
|
#---------------------------------------------
|
|
# ISF_drc - check system configuration and make sure
|
|
# all components to run ISF are available.
|
|
#---------------------------------------------
|
|
|
|
proc isf_drc {libhandle} {
|
|
puts "Running DRC for XilIsf library... \n"
|
|
|
|
# find the list of xps or opb spi cores
|
|
set sw_processor [get_sw_processor]
|
|
set processor [get_cells [get_property HW_INSTANCE $sw_processor]]
|
|
|
|
set spi_periphs_list [get_spi_periphs $processor]
|
|
|
|
if { [llength $spi_periphs_list] == 0 } {
|
|
set cpuname [get_property NAME $processor]
|
|
error "ERROR: No SPI core is addressable from processor $cpuname. \
|
|
XilIsf library requires a SPI Core \n"
|
|
return
|
|
}
|
|
}
|
|
|
|
proc get_spi_periphs {processor} {
|
|
set periphs_list [::hsm::utils::get_proc_slave_periphs $processor]
|
|
set spi_periphs_list {}
|
|
|
|
global spi_periphs_name_list
|
|
set spi_periphs_name_list {}
|
|
|
|
foreach periph $periphs_list {
|
|
set periphname [get_property IP_NAME $periph]
|
|
if {$periphname == "xps_spi"
|
|
|| $periphname == "opb_spi"
|
|
|| $periphname == "xps_insystem_flash"
|
|
|| $periphname == "axi_spi"
|
|
|| $periphname == "axi_quad_spi"
|
|
|| $periphname == "ps7_spi"
|
|
|| $periphname == "ps7_qspi"} {
|
|
lappend spi_periphs_list $periph
|
|
lappend spi_periphs_name_list $periphname
|
|
}
|
|
}
|
|
|
|
return $spi_periphs_list
|
|
}
|
|
|
|
#--------
|
|
# Check the following h/w requirements for XilIsf:
|
|
#--------
|
|
proc isf_hw_drc {libhandle spi_list} {
|
|
}
|
|
|
|
|
|
# SPI hw requirements
|
|
proc isf_spi_hw_drc {libhandle spi} {
|
|
|
|
}
|
|
|
|
|
|
proc generate {libhandle} {
|
|
|
|
}
|
|
|
|
|
|
#-------
|
|
# post_generate: called after generate called on all libraries
|
|
#-------
|
|
proc post_generate {libhandle} {
|
|
xgen_opts_file $libhandle
|
|
|
|
}
|
|
|
|
#-------
|
|
# execs_generate: called after BSP's, libraries and drivers have been compiled
|
|
# This procedure builds the libisf.a library
|
|
#-------
|
|
proc execs_generate {libhandle} {
|
|
|
|
}
|
|
|
|
|
|
proc xgen_opts_file {libhandle} {
|
|
|
|
# Open xparameters.h file
|
|
set file_handle [::hsm::utils::open_include_file "xparameters.h"]
|
|
|
|
# -----------------------------
|
|
# Generate Flash options
|
|
# -----------------------------
|
|
puts $file_handle "/* Xilinx EDK In-system and Serial Flash Library (XilIsf) User Settings */"
|
|
set serial_flash_family [get_property CONFIG.serial_flash_family $libhandle]
|
|
puts $file_handle "\#define XPAR_XISF_FLASH_FAMILY $serial_flash_family"
|
|
|
|
set serial_flash_interface [get_property CONFIG.serial_flash_interface $libhandle]
|
|
set ifaceselect 0
|
|
set ps7qspi 0
|
|
global spi_periphs_name_list
|
|
foreach periph $spi_periphs_name_list {
|
|
if {$periph == "axi_spi" || $periph == "axi_quad_spi"
|
|
|| $periph == "opb_spi"
|
|
|| $periph == "xps_insystem_flash"
|
|
|| $periph == "xps_spi"} {
|
|
if {$serial_flash_interface == 1} {
|
|
puts $file_handle "\#define XPAR_XISF_INTERFACE_AXISPI 1"
|
|
set ifaceselect 1
|
|
}
|
|
} elseif {$periph == "ps7_spi" &&
|
|
$serial_flash_interface == 2} {
|
|
puts $file_handle "\#define XPAR_XISF_INTERFACE_PSSPI 1"
|
|
set ifaceselect 1
|
|
} elseif {$periph == "ps7_qspi" &&
|
|
$serial_flash_interface == 3} {
|
|
puts $file_handle "\#define XPAR_XISF_INTERFACE_PSQSPI 1"
|
|
set ifaceselect 1
|
|
} elseif {$periph == "ps7_qspi"} {
|
|
set ps7qspi 1
|
|
}
|
|
}
|
|
|
|
if {$ps7qspi == 1 && $ifaceselect == 0} {
|
|
puts "WARN: Improper Flash Interface from BSP Settings!!!! Defaulting on 'ps7_qspi' interface"
|
|
puts $file_handle "\#define XPAR_XISF_INTERFACE_PSQSPI 1"
|
|
}
|
|
|
|
puts $file_handle ""
|
|
close $file_handle
|
|
|
|
# Copy the include files to the include directory
|
|
set srcdir [file join src include]
|
|
set dstdir [file join .. .. include]
|
|
|
|
# Create dstdir if it does not exist
|
|
if { ! [file exists $dstdir] } {
|
|
file mkdir $dstdir
|
|
}
|
|
|
|
# Get list of files in the srcdir
|
|
set sources [glob -join $srcdir *.h]
|
|
|
|
# Copy each of the files in the list to dstdir
|
|
foreach source $sources {
|
|
file copy -force $source $dstdir
|
|
}
|
|
}
|