Assura Directory Creation

Hi Patrick,

I don't really work with Assura much, but I think that I can answer your first question - it seems that you are asking for a SKILL command to create a directory, if so the answer is simple, the command createDir() is the one that you want.  Just as Derek noted in an earlier (unrelated) post; I found this by typing "dir" into the Find/Search field of the Finder (SKILL Finder, cdsFinder) utility - one of the many results was "createDir" and clicking on it tells you that it creates a directory.  This can be obtained by typing "startFinder()" in the CIW, or by typing "cdsFinder" at the Unix prompt where the Cadence tools are set up to run from.

Finder results:

createDir(
  S_name
 )
     => t | nil

Creates a directory.

If I get more time I will look into the other questions.

I hope this helps!

Regards,

Lawrence.

Hi Patrick

I have modified one of my skillscripts to give the output which you have requested. Hope that the script can solve your problem. : )

Best regards
Quek

procedure( vuiUserDefinedSetupCB(formHandle)
   let( (newDir libName cellName runType)
      if(formHandle->layoutSource->value=="DFII" then
         libName=formHandle->layLibrary->value
         cellName=formHandle->layCell->value
      else ;Stream/Oasis input
         libName="streamFiles"
         cellName=formHandle->layCellName->value
      ) ;if
      case( formHandle->hiFormSym
         (vuiLVSForm runType="lvs")
         (vuiDRCForm runType="drc")
         (vuiERCForm runType="erc")
      ) ;case
      unless( isDir("~/verification")
    csh("mkdir ~/verification")
      ) ;unless
      unless( isDir(strcat("~/verification/" libName))
    csh(strcat("mkdir ~/verification/" libName))
      ) ;unless
      unless( isDir(strcat("~/verification/" libName "/" cellName))
    csh(strcat("mkdir ~/verification/" libName "/" cellName))
      ) ;unless
     
      newDir=strcat("~/verification/" libName "/" cellName "/" runType)
      formHandle->runDir->value=newDir
   ) ;let
) ;procedure

Thanks for your help Quek, however, I am getting the following error:

*Error* def: function is write protected and cannot be redefined - vuiUserDefinedSetupCB

 And I've edited your code a bit, can you see anything wrong with this?

procedure( vuiUserDefinedSetupCB(vuiLVSForm)
   let( (newDir libName cellName runType)
      if(vuiLVSForm->layoutSource->value == "DFII" then
         libName = vuiLVSForm->layLibrary->value
         cellName = vuiLVSForm->layCell->value
      ) ;if
      case( vuiLVSForm->runsetField
         (vuiLVSForm runType = "LVS")
      ) ;case
      unless( isDir("/projects/Endeavour/poriorda/Cadence/verification")
    csh("mkdir /projects/Endeavour/poriorda/Cadence/verification")
      ) ;unless
      unless( isDir(strcat("/projects/Endeavour/poriorda/Cadence/verification" libName))
    csh(strcat("mkdir /projects/Endeavour/poriorda/Cadence/verification" libName))
      ) ;unless
      unless( isDir(strcat("/projects/Endeavour/poriorda/Cadence/verification" libName "/" cellName))
    csh(strcat("mkdir /projects/Endeavour/poriorda/Cadence/verification" libName "/" cellName))
      ) ;unless

      newDir = strcat("/projects/Endeavour/poriorda/Cadence/verification" libName "/" cellName "/" runType)
      vuiLVSForm->runsetField->value = newDir
   ) ;let
) ;procedure

Thanks again,

Patrick.

Hi Patrick

I think perhaps the cmd "sstatus(writeProtect t)" exists somewhere in your setup and hence is preventing a procedure from being redefined. Would you please restart Virtuoso and reload the edited file? It should be fine. The edits look ok

Best regards
Quek

Thanks very much for your help Quek and Lawrence.

Here is what I have come with, I've created a skill file for each verification Run and I've assigned each run it's own Bindkey (F4-LVS, F5-DRC, F6-ANTENNA, F7-DENSITY) and the following is the code I've used.  Thanks again for your help.

ibmPdkRunAssuraLVS()

   let( (libName cellName)
      if(vuiLVSForm->layoutSource->value == "DFII" then
         libName = vuiLVSForm->layLibrary->value
         cellName = vuiLVSForm->layCell->value
      ) ;if
    csh(strcat("mkdir -p /projects/Endeavour/poriorda/Cadence/verification/" libName "/" cellName "/lvs"))

   ) ;let

hiiSetCurrentForm('vuiLVSForm) vuiLVSForm->runName->value = vuiLVSForm->layCell->value
hiiSetCurrentForm('vuiLVSForm) vuiLVSForm->runDir->value = "/projects/Endeavour/poriorda/Cadence/verification"
vuiLVSForm->fileSelector = t   vuiRcxFileSelect(?returnVar vuiLVSForm->runDir->value ?startingDir _vuiGetRunDirBrowsePath(vuiLVSForm) ?mode 'dirs)   vuiLVSForm->fileSelector = nil
hiiSetCurrentForm('vuiRcxFileSelectForm)
vuiRcxFileSelectForm->dirList->value = list(vuiLVSForm->layLibrary->value)
vuiRcxDirDoubleCB(vuiRcxFileSelectForm)
vuiRcxFileSelectForm->dirList->value = list(vuiLVSForm->layCell->value)
vuiRcxDirDoubleCB(vuiRcxFileSelectForm)
vuiRcxFileSelectForm->dirList->value = '("lvs" )
vuiRcxDirDoubleCB(vuiRcxFileSelectForm)
hiFormDone(vuiRcxFileSelectForm)