200行Perl 语言实现 VCD 转ATE测试pattern

*前言：*最近几年芯片行业大火，也带动了IC测试行业的发展。CP(Chip Probing)测试的复杂度和覆盖率也逐渐增加。RD给出的仿真测试（VCD文件），要转成ATE机台（ND2）能看得动的pattern（.asc文件），成千上万行的pattern看着头大。一般机台厂商会有自家的转换程序。秉着自己动手，丰衣足食的理念（主要是厂商的要钱），自己写。

测试pattern在CP测试环节中，尤为重要。为IC输入提供不同的激励，对IC的输出响应状态与期望值进行比较，进行IC功能的分析。通俗的讲就是，IC有些参数上电完成就可以用机台的测试单元进行测试，比如OS，leakage。更多的function测试，比如Mbist，scan chain，动态功耗。就需要给DUT相应的激励（pattern）来让IC进入某种状态然后进行测试。废话不多说，上pattern。

;
;LPAT source program generated
;     by CATVert-VCD  R2.01-1 Build 080107
;Date : 03/01/22
;TesterType : T6372
;Dump File : XXXX.vcd
;
; COMMENT
;
LPAT XXXX
RDX 10

CHANNEL 6, 78, 79, 86, 87, 84, 85, 82, 83, 80, @
        81, 4, 5

;Channel   6    RESX
;Channel   78   LPM_CLK_P
;Channel   79   LPM_CLK_N
;Channel   86   LPM_DATA0_P
;Channel   87   LPM_DATA0_N
;Channel   84   LPM_DATA1_P
;Channel   85   LPM_DATA1_N
;Channel   82   LPM_DATA2_P
;Channel   83   LPM_DATA2_N
;Channel   80   LPM_DATA3_P
;Channel   81   LPM_DATA3_N
;Channel   4    OSC_TE
;Channel   5    OSC_IN
;Channel   88   MRX_WBIT_EN

CFPF

IDXI 29 /T1         ! 1111111111 111 ;0          ; Addr = 0,Pcnt = 1, Time = 0S
IDXI 29 /T1         ! 1111111111 111 ;0          ;
IDXI 29 /T1         ! 1111111111 111 ;0          ;
IDXI 29 /T1         ! 1111111111 111 ;0          ;
IDXI 4 /T1          ! 1111011111 111 ;0          ;
IDXI 4 /T1          ! 1110011111 111 ;0          ;
IDXI 4 /T1          ! 1110111111 111 ;0          ;
IDXI 4 /T1          ! 1110011111 111 ;0          ;
IDXI 4 /T1          ! 1111011111 111 ;0          ;
IDXI 4 /T1          ! 1110011111 111 ;0          ;
IDXI 4 /T1          ! 1111011111 111 ;0          ; Addr = 10,Pcnt = 200838, Time = 4016740nS
IDXI 4 /T1          ! 1110011111 111 ;0          ;
IDXI 4 /T1          ! 1111011111 111 ;0          ;
IDXI 4 /T1          ! 1110011111 111 ;0          ;
IDXI 4 /T1          ! 1110111111 111 ;0          ;
IDXI 4 /T1          ! 1110011111 111 ;0          ;
IDXI 4 /T1          ! 1110111111 111 ;0          ;
IDXI 4 /T1          ! 1110011111 111 ;0          ;
IDXI 4 /T1          ! 1110111111 111 ;0          ;
IDXI 4 /T1          ! 1110011111 111 ;0          ;
IDXI 4 /T1          ! 1110111111 111 ;0          ; Addr = 20,Pcnt = 200888, Time = 4017740nS
IDXI 4 /T1          ! 1110011111 111 ;0          ;
IDXI 4 /T1          ! 1111011111 111 ;0          ;
IDXI 29 /T1         ! 1110011111 111 ;0          ;
IDXI 4 /T1          ! 1111011111 111 ;0          ;
IDXI 4 /T1          ! 1110011111 111 ;0          ;
IDXI 4 /T1          ! 1110111111 111 ;0          ;
IDXI 4 /T1          ! 1110011111 111 ;0          ;
IDXI 4 /T1          ! 1110111111 111 ;0          ;
IDXI 4 /T1          ! 1110011111 111 ;0          ;
IDXI 4 /T1          ! 1111011111 111 ;0          ; Addr = 30,Pcnt = 200963, Time = 4019240nS
IDXI 4 /T1          ! 1110011111 111 ;0          ;
IDXI 4 /T1          ! 1110111111 111 ;0          ;
IDXI 4 /T1          ! 1110011111 111 ;0          ;
IDXI 4 /T1          ! 1111011111 111 ;0          ;
IDXI 4 /T1          ! 1110011111 111 ;0          ;
IDXI 4 /T1          ! 1110111111 111 ;0          ;
IDXI 4 /T1          ! 1110011111 111 ;0          ;
IDXI 4 /T1          ! 1110111111 111 ;0          ;
IDXI 29 /T1         ! 1110011111 111 ;0          ;
IDXI 4 /T1          ! 1111011111 111 ;0          ; Addr = 40,Pcnt = 201038, Time = 4020740nS
IDXI 4 /T1          ! 1110011111 111 ;0          ;
IDXI 4 /T1          ! 1110111111 111 ;0          ;
IDXI 4 /T1          ! 1110011111 111 ;0          ;
IDXI 4 /T1          ! 1110111111 111 ;0          ;
IDXI 4 /T1          ! 1110011111 111 ;0          ;
IDXI 4 /T1          ! 1111011111 111 ;0          ;
IDXI 4 /T1          ! 1110011111 111 ;0          ;
IDXI 4 /T1          ! 1110111111 111 ;0          ;
IDXI 4 /T1          ! 1110011111 111 ;0          ;
IDXI 4 /T1          ! 1110111111 111 ;0          ; Addr = 50,Pcnt = 201088, Time = 4021740nS
IDXI 4 /T1          ! 1110011111 111 ;0          ;
IDXI 4 /T1          ! 1110111111 111 ;0          ;
IDXI 4 /T1          ! 1110011111 111 ;0          ;
IDXI 4 /T1          ! 1110111111 111 ;0          ;
IDXI 29 /T1         ! 1110011111 111 ;0          ;
END

这是一个advantest 的T6372所有的pattern的节选，完整的有上万。言归正传，这是机台才能读得懂的语言。而在设计人员给出的仿真测试文件，行业通用的那就是.vcd文件。不同软件转出的.vcd文件略有不同。大概长成这样。

$date Wed Oct 20 15:04:11 2021 $end
$version libsigrok 0.5.2 $end
$comment
  Acquisition with 16/16 channels at 200 MHz
$end
$timescale 1 ns $end
$scope module libsigrok $end
$var wire 1 ! 0 $end
$var wire 1 " 1 $end
$var wire 1 # 2 $end
$var wire 1 $ 3 $end
$var wire 1 % 4 $end
$var wire 1 & 5 $end
$var wire 1 ' 6 $end
$var wire 1 ( 7 $end
$var wire 1 ) 8 $end
$var wire 1 * 9 $end
$var wire 1 + 10 $end
$var wire 1 , 11 $end
$var wire 1 - 12 $end
$var wire 1 . 13 $end
$var wire 1 / 14 $end
$var wire 1 0 15 $end
$upscope $end
$enddefinitions $end
#0 1! 1" 1# 0$ 0% 1& 1' 0( 0) 0* 0+ 0, 0- 0. 0/ 00
#2499371545 0'
#2499372810 0#
#2499998855 0!
#2500004690 1$
#2500009360 0" 0$
#2500014030 1$
#2500018695 1"
#2500018700 0$
#2500023370 1$
#2500028040 0" 0$
#2500032710 1$
#2500037380 0$
#2500042045 1$
#2500046715 1" 0$
#2500051380 1$
#2500056050 0" 0$
#2500060720 1$
#2500065385 1"
#2500065390 0$

它大概长成这样，感觉和pattern驴唇不对马嘴。是的，文件类型都不一样，肯定不相同。这时候就体现perl的强大性，数据处理真的是无敌的存在。我同事用Python也写出了一个转换工具。只能说语言是工具，各有各优势，用着顺手就可以。
接下来就是对vcd，pattern文件的理解。这两个是原料。只能充分了解食材的特性，才能做出美味的食物。下周继续学习。