| — |
vlsi:icc:macro-list [2012/01/12 09:21] (当前版本) |
||
|---|---|---|---|
| 行 1: | 行 1: | ||
| + | ====== Script to Get Macro List ====== | ||
| + | |||
| + | <code tcl> | ||
| + | set all_memory [ all_macro_cells ] | ||
| + | |||
| + | array set mem_count {} | ||
| + | array set mem_area {} | ||
| + | foreach_in_collection m $all_memory { | ||
| + | set ref_name [ get_attr $m ref_name ] | ||
| + | set mem_count($ref_name) 0 | ||
| + | set mem_area($ref_name) [ get_attr $m area ] | ||
| + | } | ||
| + | |||
| + | foreach_in_collection m $all_memory { | ||
| + | set ref_name [ get_attr $m ref_name ] | ||
| + | set mem_count($ref_name) [expr $mem_count($ref_name) + 1] | ||
| + | } | ||
| + | |||
| + | |||
| + | foreach {ref_name count} [array get mem_count] { | ||
| + | set area $mem_area($ref_name) | ||
| + | echo $ref_name, $count, $area, [expr $count * $area / 1000000] | ||
| + | } | ||
| + | </code> | ||