;;; 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