<meter id="pryje"><nav id="pryje"><delect id="pryje"></delect></nav></meter>

<label id="pryje"></label>

新聞中心

EEPW首頁 > 嵌入式系統(tǒng) > 設(shè)計(jì)應(yīng)用 > SOC時(shí)序分析中的跳變點(diǎn)

SOC時(shí)序分析中的跳變點(diǎn)

作者：時(shí)間：2010-09-21 來源：網(wǎng)絡(luò)

加入技術(shù)交流群
- 掃碼加入
  和技術(shù)大咖面對(duì)面交流
  海量資料庫查詢

收藏

　　附錄 A：在SDF中考慮負(fù)互連時(shí)延的腳本

　　#!/usr/local/bin/perl

　　print n***************RUNNING PERL SCRIPT negaTIvedelinsdf_assarray.pl****nn;

　　if (!exists $ARGV[0] || !exists $ARGV[1]) { print USAGE:: negativedelinsdf_assarray.plnn; exit;

　　}

　　open(FILEA,$ARGV[0]) || die (ERROR:: SDF file $ARGV[0] cannot be opened for reADIngn);

　　open(file1, >$ARGV[1]) || die (ERROR:: file $ARGV[1] cannot be opened for writingn);

　　while()

　　{ $line = $_;

　　$line1 = $line;

　　$line =~ s/^s+//g ;

　　if ( $line =~ INTERCONNECT.*-[0-9]) ######## FINDING NEGATIVE INTERCONNECT ######

　　{

　　@array1 = split(/s+/,$line);

　　$count = @array1;

　　if ($count == 4){ ## To accont for the fact that only one INTERCONNECT triplet is present

　　$array1[$count]= $array1[$count-1];

　　$count = $count + 1;

　　}

　　for($i=0;$i= $count -3;$i++)

　　{print file1 $array1[$i] ;}

　　$value2 = $array1[$count -1];

　　$value1 = $array1[$count -2];

　　$instance_name = $array1[2];

　　@instance = split(///,$instance_name);

　　$count2 = @instance;

　　$pin_name = $instance[$count2 -1]; ####### GETTING LOAD INSTANCE PIN NAME ###############

　　$instance_name =~ s//[^(.*/)][A-Z0-9a-z_[0-9]+]*$//g; ####### GETTING LOAD INSTANCE NAME ###############

　　if( $value1 =~ ::)

　　{ $value1 =~ s/[()]//g;

　　@correct_value1 = split(/::/,$value1);

　　$load_correct_value1_0{$instance_name} = $correct_value1[0];

　　$load_correct_value1_1{$instance_name} = $correct_value1[1];

　　if($correct_value1[0] = -0.0) #####NEGATIVE CHANGED TO ZERO DELAY######

　　{$correct_value1[0] = 0.000;}

　　if($correct_value1[1] = -0.0)

　　{$correct_value1[1] = 0.000;}

　　print file1 ($correct_value1[0]::$correct_value1[1]);

　　}

　　elsif( $value1 =~ :[^:])

　　{ $value1 =~ s/[()]//g;

　　@correct_value1 = split(/:/,$value1);

　　$load_correct_value1_0{$instance_name} = $correct_value1[0];

　　$load_correct_value1_1{$instance_name} = $correct_value1[1];

　　$load_correct_value1_2{$instance_name} = $correct_value1[2];

　　if($correct_value1[0] = -0.0) #####NEGATIVE CHANGED TO ZERO DELAY######

　　{$correct_value1[0] = 0.000;}

　　if($correct_value1[1] = -0.0)

　　{$correct_value1[1] = 0.000;}

　　if($correct_value1[2] = -0.0)

　　{$correct_value1[2] = 0.000;}

　　print file1 ($correct_value1[0]:$correct_value1[1]:$correct_value1[2]);

　　}

　　else{print file1 $value1 ;}

　　if( $value2 =~ ::)

　　{ $value2 =~ s/[()]//g;

　　@correct_value2 = split(/::/,$value2);

　　$load_correct_value2_0{$instance_name} = $correct_value2[0]; ########NEGATIVE CHANGED TO ZERO DELAY#####

　　$load_correct_value2_1{$instance_name} = $correct_value2[1];

　　if($correct_value2[0] = -0.0)

　　{$correct_value2[0] = 0.000;}

　　if($correct_value2[1] = -0.0)

　　{$correct_value2[1] = 0.000;}

　　if ($correct_value1[0] == $correct_value2[0] $correct_value1[1] == $correct_value2[1] ) { # Print these values only if they are differnet from the already printed values for the INTERCONNECT

　　print file1 )n;

　　} else {

　　print file1 ($correct_value2[0]::$correct_value2[1]))n;

　　}

　　}

　　elsif( $value2 =~ :[^:])

　　{ $value2 =~ s/[()]//g;

　　@correct_value2 = split(/:/,$value2);

　　$load_correct_value2_0{$instance_name} = $correct_value2[0]; ########NEGATIVE CHANGED TO ZERO DELAY#####

　　$load_correct_value2_1{$instance_name} = $correct_value2[1];

　　$load_correct_value2_2{$instance_name} = $correct_value2[2];

　　if($correct_value2[0] = -0.0)

　　{$correct_value2[0] = 0.000;}

　　if($correct_value2[1] = -0.0)

　　{$correct_value2[1] = 0.000;}

　　if($correct_value2[2] = -0.0)

　　{$correct_value2[2] = 0.000;}

　　if ($correct_value1[0] == $correct_value2[0] $correct_value1[1] == $correct_value2[1] $correct_value1[2] == $correct_value2[2]) { # Print these values only if they are differnet from the already printed values for the INTERCONNECT

　　print file1 )n;

　　} else {

　　print file1 ($correct_value2[0]:$correct_value2[1]:$correct_value2[2]))n;

　　}

　　}

　　$load_instance{$instance_name} = $instance_name; ##SAVE ALL LOAD INSTACES FOR NEG DELAY IN THE ASSOCIATIVE ARRAY##

　　$load_pin{$instance_name.$pin_name} = $pin_name; ##SAVE ALL LOAD PINS FOR NEG DELAY IN THE ASSOCIATIVE ARRAY##

　　}

　　elsif ($line =~ CELL ) {

　　print file1 $line;

　　$find = 0;

　　}

　　elsif($line =~ INSTANCE ) ##CHECKING CORRESPONDING INSTANCES AND FIND FLAG = 1 IF FOUND######

　　{

　　print file1 $line1;

　　@array2 = split(/s+/,$line);

　　$instance_name2 = $array2[1]; ##GETTING THE LOAD INSTANCE NAME FOUND HERE##########

　　$instance_name2 =~ s/[()]//g;

　　$instance_definition{$instance_name2} = $instance_name2 ;

　　if(exists $load_instance{$instance_name2}) ####COMPARE INSTANCE NAME WITH THAT SAVED IN ASSO ARRAY#####

　　{

　　if($load_instance{$instance_name2} eq $instance_name2)

　　{$find = 1;}

　　}

　　}

　　elsif($line =~ IOPATH $find == 1) ##AFTER INSTANCES ARE FOUND CHECKING FOR CORRSPONDING PINS######

　　{

　　@array4 = split(/s+/,$line);

　　if ($array4[0] =~ COND ) { ## Take care of COND statements

　　$pin_name2 = $array4[3];

　　} else {

　　$pin_name2 = $array4[1];

　　}

　　if($line =~ IOPATH exists $load_pin{$instance_name2.$pin_name2} ) {

　　if ( $load_pin{$instance_name2.$pin_name2} eq $pin_name2 )

　　{

　　@array3 = split(/s+/,$line);

　　$count3 = @array3 ;

　　@value_IOPATH = ; # This is to initialize the array to blank

　　if ($array3[0] =~ COND ) {

　　for ($j=5; $j=$count3 ; $j++) {

　　$value_IOPATH[$j-5] = $array3[$j];

　　$value_IOPATH_width = @value_IOPATH;

　　if ($count3 == 6) { #### In case there is only one triplet for COND.*IOPATH

　　$value_IOPATH[1] = $value_IOPATH[0];

　　}

　　#$value1_IOPATH = $array3[5];

　　#$value2_IOPATH = $array3[6];

　　}

　　$constant_fields = 4;

　　} elsif ($array3[0] =~ IOPATH) {

　　for ($k=3; $k=$count3 ; $k++) {

　　$value_IOPATH[$k-3] = $array3[$k];

　　$value_IOPATH_width = @value_IOPATH;

　　if ($count3 == 4) { #### In case there is only one triplet for IOPATH

　　$value_IOPATH[1] = $value_IOPATH[0];

　　}

　　#$value1_IOPATH = $array3[3];

　　#$value2_IOPATH = $array3[4];

　　}

　　$constant_fields = 2;

　　}

　　for($i=0;$i= $constant_fields;$i++)

　　{print file1 $array3[$i] ;}

　　if( $value_IOPATH[0] =~ ::) ####CORRECT OR ACCOMODATING THE NEG DELAY VALUES HERE #########

　　{ $value_IOPATH[0] =~ s/[()]//g;

　　@correct_value1_IOPATH = split(/::/,$value_IOPATH[0]);

　　if(exists $load_correct_value1_0{$instance_name2}) {

　　if($load_correct_value1_0{$instance_name2} 0.0) { # So that only negative delay value triplet is changed in the IOPATH syntax

　　if ( abs($load_correct_value1_0{$instance_name2}) $correct_value1_IOPATH[0] ) { ###the absolute value to negative delay is larger than the timing of load arc. ######

　　$correct_value1_IOPATH[0] = $correct_value1_IOPATH[0] + $load_correct_value1_0{$instance_name2};

　　} else { print IOPATH delay for $load_pin{$instance_name2.$pin_name2} of $instance_name2 is smaller than the INTERCONNECT delay n;}

　　}

　　}

　　if(exists $load_correct_value1_1{$instance_name2})

　　{ if( $load_correct_value1_1{$instance_name2} 0.0) {

　　if ( abs($load_correct_value1_1{$instance_name2}) $correct_value1_IOPATH[1] ) {

　　$correct_value1_IOPATH[1] = $correct_value1_IOPATH[1] + $load_correct_value1_1{$instance_name2};}

　　else { print IOPATH delay for $load_pin{$instance_name2.$pin_name2} of $instance_name2 is smaller than the INTERCONNECT delay n;}}}

　　print file1 ($correct_value1_IOPATH[0]::$correct_value1_IOPATH[1]);

　　}

　　elsif( $value_IOPATH[0] =~ :[^:]) ####CORRECT OR ACCOMODATING THE NEG DELAY VALUES HERE #########

　　{ $value_IOPATH[0] =~ s/[()]//g;

　　@correct_value1_IOPATH = split(/:/,$value_IOPATH[0]);

　　if(exists $load_correct_value1_0{$instance_name2}) {

　　if($load_correct_value1_0{$instance_name2} 0.0) { # So that only negative delay value triplet is changed in the IOPATH syntax

　　if ( abs($load_correct_value1_0{$instance_name2}) $correct_value1_IOPATH[0] ) {

　　$correct_value1_IOPATH[0] = $correct_value1_IOPATH[0] + $load_correct_value1_0{$instance_name2};

　　} else { print IOPATH delay for $load_pin{$instance_name2.$pin_name2} of $instance_name2 is smaller than the INTERCONNECT delay n;}

　　}

　　}

　　if(exists $load_correct_value1_1{$instance_name2}) {

　　if($load_correct_value1_1{$instance_name2} 0.0) { # So that only negative delay value triplet is changed in the IOPATH syntax

　　if ( abs($load_correct_value1_1{$instance_name2}) $correct_value1_IOPATH[1] ) {

　　$correct_value1_IOPATH[1] = $correct_value1_IOPATH[1] + $load_correct_value1_1{$instance_name2};

　　} else { print IOPATH delay for $load_pin{$instance_name2.$pin_name2} of $instance_name2 is smaller than the INTERCONNECT delay n;}

　　}

　　}

　　if(exists $load_correct_value1_2{$instance_name2}) {

　　if($load_correct_value1_2{$instance_name2} 0.0) { # So that only negative delay value triplet is changed in the IOPATH syntax

　　if ( abs($load_correct_value1_2{$instance_name2}) $correct_value1_IOPATH[2] ) {

　　$correct_value1_IOPATH[2] = $correct_value1_IOPATH[2] + $load_correct_value1_2{$instance_name2};

　　} else { print IOPATH delay for $load_pin{$instance_name2.$pin_name2} of $instance_name2 is smaller than the INTERCONNECT delay n;}

　　}

　　}

　　print file1 ($correct_value1_IOPATH[0]:$correct_value1_IOPATH[1]:$correct_value1_IOPATH[2]);

　　}

　　else{print file1 $value_IOPATH[0] ;} # This is to print empty brackets in case rise and fall triplets are empty

　　if( $value_IOPATH[1] =~ ::)

　　{ $value_IOPATH[1] =~ s/[()]//g;

　　@correct_value2_IOPATH = split(/::/,$value_IOPATH[1]);

　　if(exists $load_correct_value2_0{$instance_name2}) {

　　if( $load_correct_value2_0{$instance_name2} 0.0)

　　{ if ( abs($load_correct_value2_0{$instance_name2}) $correct_value2_IOPATH[0] ) {

　　$correct_value2_IOPATH[0] = $correct_value2_IOPATH[0] + $load_correct_value2_0{$instance_name2};}

　　else { print IOPATH delay for $load_pin{$instance_name2.$pin_name2} of $instance_name2 is smaller than the INTERCONNECT delay n;}}}

　　if(exists $load_correct_value2_1{$instance_name2}) {

　　if( $load_correct_value2_1{$instance_name2} 0.0)

　　{ if ( abs($load_correct_value2_1{$instance_name2}) $correct_value2_IOPATH[1] ) {

　　$correct_value2_IOPATH[1] = $correct_value2_IOPATH[1] + $load_correct_value2_1{$instance_name2};}

　　else { print IOPATH delay for $load_pin{$instance_name2.$pin_name2} of $instance_name2 is smaller than the INTERCONNECT delay n;}}}

　　if ($correct_value1_IOPATH[0] == $correct_value2_IOPATH[0] $correct_value1_IOPATH[1] == $correct_value2_IOPATH[1]) { # Print these values only if they are differnet from the already printed values for the IOPATH

　　} else {

　　print file1 ($correct_value2_IOPATH[0]::$correct_value2_IOPATH[1]);

　　}

　　}

　　elsif( $value_IOPATH[1] =~ :[^:])

　　{ $value_IOPATH[1] =~ s/[()]//g;

　　@correct_value2_IOPATH = split(/:/,$value_IOPATH[1]);

　　if(exists $load_correct_value2_0{$instance_name2}) {

　　if( $load_correct_value2_0{$instance_name2} 0.0) {

　　if ( abs($load_correct_value2_0{$instance_name2}) $correct_value2_IOPATH[0] ) {

　　$correct_value2_IOPATH[0] = $correct_value2_IOPATH[0] + $load_correct_value2_0{$instance_name2};}

　　else { print IOPATH delay for $load_pin{$instance_name2.$pin_name2} of $instance_name2 is smaller than the INTERCONNECT delay n;}}}

　　if(exists $load_correct_value2_1{$instance_name2}) {

　　if( $load_correct_value2_1{$instance_name2} 0.0) {

　　if ( abs($load_correct_value2_1{$instance_name2}) $correct_value2_IOPATH[1] ) {

　　$correct_value2_IOPATH[1] = $correct_value2_IOPATH[1] + $load_correct_value2_1{$instance_name2};}

　　else { print IOPATH delay for $load_pin{$instance_name2.$pin_name2} of $instance_name2 is smaller than the INTERCONNECT delay n;}}}

　　if(exists $load_correct_value2_2{$instance_name2}) {

　　if( $load_correct_value2_2{$instance_name2} 0.0) {

　　if ( abs($load_correct_value2_2{$instance_name2}) $correct_value2_IOPATH[2] ) {

　　$correct_value2_IOPATH[2] = $correct_value2_IOPATH[2] + $load_correct_value2_2{$instance_name2};}

　　else { print IOPATH delay for $load_pin{$instance_name2.$pin_name2} of $instance_name2 is smaller than the INTERCONNECT delay n;}}}

　　if ($correct_value1_IOPATH[0] == $correct_value2_IOPATH[0] $correct_value1_IOPATH[1] == $correct_value2_IOPATH[1] $correct_value1_IOPATH[2] == $correct_value2_IOPATH[2]) { # Print these values only if they are differnet from the already printed values for the IOPATH

　　} else {

　　print file1 ($correct_value2_IOPATH[0]:$correct_value2_IOPATH[1]:$correct_value2_IOPATH[2]);

　　}

　　}

　　else{print file1 $value_IOPATH[1] ;} # This is to print empty brackets in case rise and fall triplets are empty

　　for ($m=2;$m=$value_IOPATH_width;$m++) {

　　if (exists $value_IOPATH[$m]) {

　　$value_IOPATH[$m] =~ s/)+/)/; # To account for the brackets

　　print file1 $value_IOPATH[$m];

　　}

　　}

　　if ($array4[0] =~ COND ) { ## Extra bracket for COND statements

　　print file1 ))n;

　　} else {print file1 )n;}

　　}

　　}

　　else

　　{print file1 $line1;} #######DUMPING OUT OF SDF IN FILE1######################

　　}

　　else

　　{print file1 $line1;}

　　}

　　close(file1);

　　close(fileA);

　　open(FILEA,$ARGV[0]) || die (ERROR:: SDF file $ARGV[0] cannot be opened for readingn);

　　print nn#############REPORTING INSTANCES WHOSE DEFINITION IS NOT THERE IN THE SDF#############n;

　　while()

　　{

　　$line2 = $_;

　　$line2 =~ s/^s+//g ;

　　if ( $line2 =~ INTERCONNECT.*-[0-9])

　　{ @array4 = split(/s+/,$line2);

　　$instance_name3 = $array4[2];

　　$instance_name3 =~ s//[^(.*/)][A-Z0-9a-z_[0-9]+]*$//g;

　　if(exists $instance_definition{$instance_name3})

　　{}

　　else

　　{print $line2;}

　　}

　　}

　　close(fileA);

　　print n;

上一頁 1 2 3 4 下一頁

<a target='_blank'><img src='https://ad.eepw.com.cn/www/delivery/avw.php?zoneid=114&cb=INSERT_RANDOM_NUMBER_HERE&n=a7a83b30' border='0' alt='' /></a>
<a target='_blank'><img src='https://ad.eepw.com.cn/www/delivery/avw.php?zoneid=115&cb=INSERT_RANDOM_NUMBER_HERE&n=a3d98779' border='0' alt='' /></a>
<a target='_blank'><img src='https://ad.eepw.com.cn/www/delivery/avw.php?zoneid=116&cb=INSERT_RANDOM_NUMBER_HERE&n=abca108c' border='0' alt='' /></a>
<a target='_blank'><img src='https://ad.eepw.com.cn/www/delivery/avw.php?zoneid=117&cb=INSERT_RANDOM_NUMBER_HERE&n=a1775170' border='0' alt='' /></a>
<a target='_blank'><img src='https://ad.eepw.com.cn/www/delivery/avw.php?zoneid=118&cb=INSERT_RANDOM_NUMBER_HERE&n=a449048b' border='0' alt='' /></a>

關(guān)鍵詞：分析 時(shí)序 SOC

評(píng)論

相關(guān)推薦

CAX軟件交流

hpnet | 2002-05-28

節(jié)能燈功率管失效機(jī)理分析

設(shè)計(jì)方案節(jié)能燈功率失效機(jī)理分析 | 2009-07-06

愛普科技與Mobiveil攜手開發(fā)UHS PSRAM控制器，提供SoC業(yè)者全新解決方案

EDA/PCB 愛普科技 Mobiveil UHS PSRAM 控制器 SoC | 2024-06-07

一季度手機(jī)SoC排名，紫光展銳出貨量暴增64%

手機(jī)與無線通信 SoC | 2024-05-21

高速電路設(shè)計(jì)與仿真下

視頻嵌入式 ARM MIPS 時(shí)序信號(hào)反射 | 2009-10-27

2nm制程：四強(qiáng)爭(zhēng)霸，誰是炮灰？

EDA/PCB SoC | 2024-06-05

VXWORKS內(nèi)核分析(老站轉(zhuǎn))

amine | 2002-05-28

ARM芯片的應(yīng)用和選型[芯片類]

資源下載 ARM MMU SOC RISC CPU 選型 | 2007-02-28

CC2431 - 低功耗射頻SOC

視頻 TI SoC CC2430 CC2431 | 2009-03-24

imec 宣布牽頭建設(shè)亞 2nm 制程 NanoIC 中試線，項(xiàng)目將獲 25 億歐元資金支持

EDA/PCB 半導(dǎo)體 2nm SoC 制程 | 2024-05-21

網(wǎng)絡(luò)維護(hù)幾種優(yōu)化工具

hpnet | 2002-05-17

完美結(jié)合無線連接、人工智能和安全性的智能家居解決方案

消費(fèi)電子智能家居芯科科技 SoC 物聯(lián)網(wǎng)安全 | 2024-06-07

LINUX V0.11源代碼分析

資源下載 LINUX V0.11 源代碼分析 | 2007-03-20

挑戰(zhàn)蘋果！曝谷歌自研Soc Tensor G5進(jìn)入流片階段：臺(tái)積電代工

手機(jī)與無線通信谷歌 Soc 臺(tái)積電 Pixel | 2024-07-05

時(shí)序電路

設(shè)計(jì)方案時(shí)序電路 | 2009-07-06

MCU&SOC

資源下載義隆電子 MCU SOC FLASH EDA | 2007-02-09

同步時(shí)序電路設(shè)計(jì)

設(shè)計(jì)方案同步時(shí)序電路設(shè)計(jì) | 2009-07-06

集成計(jì)數(shù)器功能分析及應(yīng)用

設(shè)計(jì)方案集成計(jì)數(shù)器功能分析應(yīng)用 | 2009-07-06

晶心科技與Arteris攜手加速RISC-V SoC的采用

EDA/PCB 晶心科技 Arteris RISC-V SoC | 2024-05-28

高速12位模數(shù)轉(zhuǎn)換器AD7892及其在圖像采集中的應(yīng)用

資源下載 AD公司模數(shù)轉(zhuǎn)換器 AD7892 高速ADC 并行串行時(shí)序圖象采集 | 2007-02-16

多級(jí)調(diào)諧放大器分析與調(diào)試方法

設(shè)計(jì)方案多級(jí) 調(diào)諧放大器分析調(diào)試方法 | 2009-07-06

基于信號(hào)完整性分析的高速數(shù)字PCB的設(shè)計(jì)方法

hpnet | 2002-06-05

如何從處理器和加速器內(nèi)核中榨取最大性能？

嵌入式系統(tǒng) SoC | 2024-06-05

MXT8051 SoC開發(fā)系統(tǒng)的設(shè)計(jì)方法

視頻時(shí)代民芯 MCU MXT8051 SoC | 2009-06-05

聯(lián)發(fā)科發(fā)布天璣 7350 芯片，CPU 大核 3.0 GHz

手機(jī)與無線通信聯(lián)發(fā)科天璣 SoC | 2024-07-17

片上系統(tǒng)芯片設(shè)計(jì)與靜態(tài)時(shí)序分析

資源下載集成電路設(shè)計(jì) SOC 靜態(tài)時(shí)序分析 | 2007-02-16

[轉(zhuǎn)帖]us/os就緒表的維護(hù)算法分析

amine | 2002-05-17

連接世界的SOC設(shè)計(jì)

視頻 MIPS SOC | 2009-12-21

泰凌微：公司發(fā)布新產(chǎn)品TLSR925x 系列 SoC

嵌入式系統(tǒng) 泰凌微 TLSR925x SoC | 2024-07-04

高速電路設(shè)計(jì)與仿真上

視頻嵌入式 ARM MIPS 時(shí)序 DRC | 2009-10-27

焦點(diǎn)

推薦視頻

技術(shù)專區(qū)

看屁屁www成人影院,亚洲人妻成人图片,亚洲精品成人午夜在线,日韩在线欧美成人 (function(){ var bp = document.createElement('script'); var curProtocol = window.location.protocol.split(':')[0]; if (curProtocol === 'https') { bp.src = 'https://zz.bdstatic.com/linksubmit/push.js'; } else { bp.src = 'http://push.zhanzhang.baidu.com/push.js'; } var s = document.getElementsByTagName("script")[0]; s.parentNode.insertBefore(bp, s); })();