/*批量修改cell的名字*/
procedure( cellRename()
 let((mySpecSrc mySpecDst)
  inPort = infile("inputfile path")  ;读取输入文件，里面包含需要修改的cell名字和新名字
  oldcellList = list()
  newcellList = list()
  when(
   while(fscanf(inPort "%s %s" l r)
    oldcellList = append1(oldcellList l)
    newcellList = append1(newcellList r)
    ;println(oldcellList)
    ;println(newcellList)
   );end while
  close(inPort)
  );end when
  num = length(oldcellList)
  for(i 0 num-1
   X = nth(i oldcellList)
   Y = nth(i newcellList)
   mySpecSrc = gdmCreateSpec("Library_name" X "layout" nil "CDBA")
   mySpecDst = gdmCreateSpec("Library_name" Y "layout" nil "CDBA")
   ccpRename(mySpecSrc mySpecDst t 'CCP_EXPAND_ALL 'CCP_UPDATE_DESTLIB_ONLY)
  );end for
 );end let
);end proc