fast route: avoid repetition

Signed-off-by: Øyvind Harboe <[email protected]>

Author: oharboe

flow/Makefile

@@ -134,6 +134,9 @@ export GENERATE_ARTIFACTS_ON_FAILURE ?= 0
 # Try fixing all violating endpoints by default (reduce to 5% for runtime)
 export TNS_END_PERCENT ?=100
 
+# Default routing layer adjustment
+export ROUTING_LAYER_ADJUSTMENT ?= 0.5
+
 # If we are running headless use offscreen rendering for save_image
 ifndef DISPLAY
 export QT_QPA_PLATFORM ?= offscreen

flow/designs/asap7/mock-array/config.mk

@@ -61,14 +61,12 @@ power:
 # violations.
 export DETAILED_ROUTE_ARGS   = -bottom_routing_layer M2 -top_routing_layer M7 -save_guide_updates -verbose 1 -droute_end_iter 15
 
-# since we are specifying DETAILED_ROUTE_ARGS, we need to communicate the
-# same information to other stages in the flow.
 export MIN_ROUTING_LAYER = M2
 export MAX_ROUTING_LAYER = M7
+export ROUTING_LAYER_ADJUSTMENT = 0.45
 
 # works with 28 or more iterations as of writing, so give it a few more.
 export GLOBAL_ROUTE_ARGS=-congestion_iterations 40 -verbose
-export FASTROUTE_TCL = ./designs/$(PLATFORM)/mock-array/fastroute.tcl
 
 # ensure we have some rows, so we don't get a bad clock skew.
 export MACRO_HALO_X            = 0.5

flow/designs/asap7/mock-array/fastroute.tcl

@@ -4,16 +4,7 @@ load_design 3_2_place_iop.odb 2_floorplan.sdc
 
 set_dont_use $::env(DONT_USE_CELLS)
 
-# set fastroute layer reduction
-if {[info exist env(FASTROUTE_TCL)]} {
-  source $env(FASTROUTE_TCL)
-} else {
-  set_global_routing_layer_adjustment $env(MIN_ROUTING_LAYER)-$env(MAX_ROUTING_LAYER) 0.5
-  set_routing_layers -signal $env(MIN_ROUTING_LAYER)-$env(MAX_ROUTING_LAYER)
-  if {[info exist env(MACRO_EXTENSION)]} {
-    set_macro_extension $env(MACRO_EXTENSION)
-  }
-}
+fast_route
 
 source $::env(SCRIPTS_DIR)/set_place_density.tcl
 

flow/scripts/global_place.tcl

@@ -10,15 +10,7 @@ proc global_route_helper {} {
     source $::env(PRE_GLOBAL_ROUTE)
   }
 
-  if {[info exist ::env(FASTROUTE_TCL)]} {
-    source $::env(FASTROUTE_TCL)
-  } else {
-    set_global_routing_layer_adjustment $::env(MIN_ROUTING_LAYER)-$::env(MAX_ROUTING_LAYER) 0.5
-    set_routing_layers -signal $::env(MIN_ROUTING_LAYER)-$::env(MAX_ROUTING_LAYER)
-    if {[info exist ::env(MACRO_EXTENSION)]} {
-      set_macro_extension $::env(MACRO_EXTENSION)
-    }
-  }
+  fast_route
 
   # The default behavior if the user didn't specify GLOBAL_ROUTE_ARGS is to
   # produce a drc report every 5 iterations.

flow/scripts/global_route.tcl

@@ -53,15 +53,7 @@ if {![info exist ::env(GUI_NO_TIMING)]} {
     log_cmd estimate_parasitics -placement
   }
 
-  if {[info exist env(FASTROUTE_TCL)]} {
-    source $env(FASTROUTE_TCL)
-  } else {
-    set_global_routing_layer_adjustment $env(MIN_ROUTING_LAYER)-$env(MAX_ROUTING_LAYER) 0.5
-    set_routing_layers -signal $env(MIN_ROUTING_LAYER)-$env(MAX_ROUTING_LAYER)
-    if {[info exist env(MACRO_EXTENSION)]} {
-      set_macro_extension $env(MACRO_EXTENSION)
-    }
-  }
+  fast_route
 
   # Cleanup temporary variables
   unset sdc_file s design_stage

flow/scripts/gui.tcl

@@ -2,3 +2,15 @@ proc log_cmd {cmd args} {
   puts "$cmd [join $args " "]"
   $cmd {*}$args
 }
+
+proc fast_route {} {
+  if {[info exist env(FASTROUTE_TCL)]} {
+    source $::env(FASTROUTE_TCL)
+  } else {
+    set_global_routing_layer_adjustment $::env(MIN_ROUTING_LAYER)-$::env(MAX_ROUTING_LAYER) $::env(ROUTING_LAYER_ADJUSTMENT)
+    set_routing_layers -signal $::env(MIN_ROUTING_LAYER)-$::env(MAX_ROUTING_LAYER)
+    if {[info exist env(MACRO_EXTENSION)]} {
+      set_macro_extension $::env(MACRO_EXTENSION)
+    }
+  }
+}