add tcl script

tcl/generate_ethernet.tcl

@@ -6,34 +6,37 @@ set ProjectDirPath [file join ${::fwfwk::PrjBuildPath} ${::fwfwk::PrjBuildName}]
 set ipName "gig_axi_ethernet_$idx"
 
 #VLNV (cf GUI vivado)
-set xcipath [create_ip \
-    -name axi_ethernet \
-    -vendor xilinx.com \
-    -library ip -version 7.2 \
-    -module_name $ipName]
+#create IP + save IP paths
+set xcipath [ create_ip -name axi_ethernet -vendor xilinx.com -library ip -version 7.2 -module_name ${ipName}]cd 
+
+
 
 # These parameters are "hard coded" for our application:
 # GT_TYPE : GTY  (we are on FMC1 slot) GTH_LOC = X0Y5
 
 # Here we select IP configuration as if we were using the wizard 
-# TBC : Management Interface ? 
-set ipProp [list \
-
-    # Interface 
-    CONFIG.PHY_TYPE {1000BaseX}\
+# TBC : Management Interface ?  CONFIG.gt_type $GT_TYPE\     CONFIG.gt_type {GTY}\
+#    CONFIG.gtlocation {$GT_LOCATION}\
+#    CONFIG.gtrefclkrate {156.25}\
+#    CONFIG.speed_1_2p5 {1G}\
+#    CONFIG.processor_mode {false}\
+#    CONFIG.Statistics_Counters {true}\
+#    CONFIG.Statistics_Reset {true}\
+#    CONFIG.Statistics_Width {64bit}\
+#    CONFIG.PHY_TYPE {1000BaseX} \
+#    CONFIG.gtlocation {$GT_LOCATION}\
 
-    #GT parameters
+set ipProp [ list \
+   CONFIG.Statistics_Width 64bit \
+   CONFIG.gtlocation $GT_LOCATION \
    CONFIG.gt_type $GT_TYPE \
-    CONFIG.gtlocation $GT_LOC\
-    CONFIG.gtrefclkrate {156.25}\
+   CONFIG.gtrefclkrate 156.25 \
    CONFIG.speed_1_2p5 $GB_SPEED \
-
-    CONFIG.processor_mode {false}\
-
-    #Mac Features
-    CONFIG.Statistics_Counters {true}\
-    CONFIG.Statistics_Reset {true}\
-    CONFIG.Statistics_Width {64bit}\
+   CONFIG.processor_mode false \
+   CONFIG.Statistics_Counters true \
+   CONFIG.Statistics_Reset true \
+   CONFIG.Statistics_Width 64bit \
+   CONFIG.PHY_TYPE 1000BaseX 
    ]
 
 set_property -dict $ipProp [get_ips $ipName]
@@ -43,7 +46,6 @@ export_ip_user_files -of_objects [get_files ${ProjectDirPath}.srcs/sources_1/ip/
 create_ip_run [get_files -of_objects [get_fileset sources_1] ${ProjectDirPath}.srcs/sources_1/ip/$ipName/$ipName.xci]
 
 
-
 ## ------------------------------------- ##
 ## GT WIZARD
 ## ------------------------------------- ##

tcl/main.tcl

@@ -15,22 +15,22 @@ proc setSources {} {
     variable Sources
 
     # Generate VHDL package with module version
-    genModVerFile VHDL ../hdl/pkg_ccn_ethernet_version.vhd
+    #genModVerFile VHDL ../hdl/pkg_ccn_ethernet_version.vhd
 
     # {SrcFile SrcType srcLib usedIn procOrder}
-    lappend Sources {"../hdl/top_ccn_ethernet.vhd"          "VHDL"      "ccn_eth_lib"}
-    lappend Sources {"../hdl/ccn_ethernet.vhd"              "VHDL"      "ccn_eth_lib"}
-    lappend Sources {"../hdl/pkg_ccn_ethernet.vhd"          "VHDL"      "ccn_eth_lib"}
-    lappend Sources {"../hdl/pkg_ccn_ethernet_version.vhd"  "VHDL"      "ccn_eth_lib"}
-    lappend Sources {"../hdl/ccn_ethernet_reset.vhd"        "VHDL"      "ccn_eth_lib"}
+    #lappend Sources {"../hdl/top_ccn_ethernet.vhd"          "VHDL"      "ccn_eth_lib"}
+    #lappend Sources {"../hdl/ccn_ethernet.vhd"              "VHDL"      "ccn_eth_lib"}
+    #lappend Sources {"../hdl/pkg_ccn_ethernet.vhd"          "VHDL"      "ccn_eth_lib"}
+    #lappend Sources {"../hdl/pkg_ccn_ethernet_version.vhd"  "VHDL"      "ccn_eth_lib"}
+    #lappend Sources {"../hdl/ccn_ethernet_reset.vhd"        "VHDL"      "ccn_eth_lib"}
 
 }
 
 # ==============================================================================
 proc setAddressSpace {} {
-    variable AddressSpace
-    addAddressSpace AddressSpace "ccn_ethernet" RDL {} ../rdl/ccn_ethernet.rdl
-    addAddressSpace AddressSpace "xilinx_ethsubsyst" RDL {} ../rdl/xilinx_ethsubsyst.rdl
+    #variable AddressSpace
+    #addAddressSpace AddressSpace "ccn_ethernet" RDL {} ../rdl/ccn_ethernet.rdl
+    #addAddressSpace AddressSpace "xilinx_ethsubsyst" RDL {} ../rdl/xilinx_ethsubsyst.rdl
 }
 
 # ==============================================================================
@@ -38,10 +38,12 @@ proc doOnCreate {} {
   variable Sources
   variable Config
 
-  addSources Sources
+  #addSources Sources
 
   set idx 0
-  foreach GTH_LOC $Config(GTH_LOC) {
+  foreach GT_LOCATION $Config(GT_LOCATION) {
+      set GT_TYPE $Config(GT_TYPE)
+      set GB_SPEED $Config(GB_SPEED)
       source generate_ethernet.tcl 
       incr idx
   }