| if { $::argc > 0 } { | |
| set PDN_CFG [lindex $::argv 0] | |
| } else { | |
| puts "no command line argument passed" | |
| exit | |
| } | |
| set dir $::env(SCRIPTS_DIR)/pdn/src/scripts | |
| source $dir/pkgIndex.tcl | |
| package require pdn | |
| set db [dbDatabase_create] | |
| odb_import_db $db $::env(pdn_tmp_file_tag).odb | |
| set block [[$db getChip] getBlock] | |
| pdn apply $block $PDN_CFG | |
| odb_write_def $block $::env(pdn_result_file_tag).def DEF_5_6 |