;; Author: Shiv Sikand <sikand@users.sourceforge.net> ;; In Cadence Land, the 'simplifyFilename' command returns a ;; local name for a file, usually the 'pwd' name ;; /tmp_mnt/hosts/tower/root/N1/rev1.0 ;; However, in order for the interface to work cleanly, we need ;; to return an NFS friendly name that identifies a path thru ;; a common name, usually the $PWD name since that is usually ;; the 'Root' name in the client ;; /user/hwdesign/n1/rev1.0 ;; This is one way of restoring the pwd name to the $PWD name ;; if you know the NFS filesystems you are going to use ;; I'm sure there is a better way to do this for generic filesystems ; the regexp functions in Skill are VERY fast, btw. ;; You must have a working version of this routine ;; for your site to get anywhere procedure(CDS_NFSSimplify(nfilename) ;_Mar 16 00 sikand 228 prog(( filename head ) rexCompile("\\(/hosts/tower/N1\\)") when( rexExecute(nfilename) return(rexReplace(nfilename "/user/hwdesign/n1" 1)) ) if( rexMatchp("/user/hwdesign/" nfilename) then filename = nfilename else filename = simplifyFilename(nfilename) rexCompile("\\#2e") filename = rexReplace(filename "." 0) head = car(parseString(filename "/")) when( head != "hosts" && head != "usr" return(strcat("/hosts/" CDS_P4Host filename)) ) ) ; ** if rexMatchp ** return(filename) ) ; ** prog ** ) ; ** procedure CDS_NFSSimplify **
# | Change | User | Description | Committed | |
---|---|---|---|---|---|
#1 | 5093 | Hari Krishna Dara |
Populating perforce branch. I will be adding p4admin files to it. |
||
//guest/perforce_software/cdsp4/release/2.2/Skill/CdsP4Core/site-specific/CDS_P4NFS.il | |||||
#1 | 1675 | Shiv Sikand | New 2.2 tree |