;;; this script is used for fill the port name in the 'script' view of STDCell
procedure(fillPort()
let(( libId cellId cdfId )
inPort1 = infile( "/home/rhuang5579/work/AF54AFAT/Phy/lvs/CellName.txt" )
inPort2 = infile( "/home/rhuang5579/work/AF54AFAT/Phy/lvs/CellPort.txt" )
when( inPort1
for( cellNum 1 257
fscanf( inPort1 "%s" cellName )
gets( pinList inPort2 )
rexCompile( "\n" )
pinList = rexReplace( pinList "" 0 )
pinList = parseString( pinList )
cellId = ddGetObj( "csm18ic" CellName )
when( cdfId = cdfGetBaseCellCDF( cellId )
cdfDeleteCDF( cdfId )
);when
cdfId = cdfGetBaseCellCDF( cellId )
;;; Simulator Information
cdfId->simInfo = list( nil )
cdfId->simInfo->ams = '( nil )
cdfId->simInfo->auCdl = '( nil )
cdfId->simInfo->auLvs = '( nil )
cdfId->simInfo->cdsSpice = '( nil )
cdfId->simInfo->hspiceD = '( nil )
cdfId->simInfo->hspiceS = '( nil )
cdfId->simInfo->spectreS = '( nil )
cdfId->simInfo->spectre = '( nil )
putprop( cdfId->simInfo->spectre pinList 'termOrder )
;;; Properties
cdfId->formInitProc = ""
cdfId->doneProc = ""
cdfId->buttonFieldWidth = 340
cdfId->fieldHeight = 35
cdfId->fieldWidth = 350
cdfId->promptWidth = 175
cdfSaveCDF( cdfId )
);for
);when
close( inPort1 )
close( inPort2 )
);let
procedure
