World:Local

&1 _ &server _ "apple1-nfs"
=> "apple1-nfs" 
&2 _ &rdir _ "<server>xerox3>"
=> "<server>xerox3>" 
&3 _ &ldir _ "[]<>data4.3>"
=> "[]<>data4.3>" 
&4 _ &ldir _ "[]<>dV>" -- for system V short file names
=> "[]<>dV>" 
&5 _ 
&5 _ SunNFSRemoteFileImpl.nfsSendBufferBytes _ 8192
=> 8192 
&6 _ SunNFSRemoteFileImpl.nfsSendBufferBytes _ 1024
=> 1024 
&7 _ SunNFSRemoteFileImpl.nfsRecvBufferBytes _ 2048
=> 2048 
&8 _ SunNFSRemoteFileImpl.nfsRecvBufferBytes _ 1024
=> 1024 
&9 _ CThonBasicTests.writeBufferBytes _ 8192
=> 8192 
&10 _ CThonBasicTests.writeBufferBytes _ 1024
=> 1024 
&11 _ CThonBasicTests.readBufferBytes _ 2048
=> 2048 
&12 _ CThonBasicTests.readBufferBytes _ 1024
=> 1024 
&13 _ SunNFSClientStub.mediumTimeout _ 1000
=> 1000 
&14 _ 
&14 _ &sldir _ "[]<>data>"
=> "[]<>data>" 
&15 _ &tldir _ "[]<>temp>"
=> "[]<>temp>" 
&16 _ &bf _ "bf" -- name of big file
=> "bf" 
&17 _ &sf _ "sf" -- name of small file
=> "sf" 
&18 _ 
&18 _ &urdir _ CThonBasicTests.StripTrailingSlash[FileNames.ConvertToSlashFormat[&rdir]]
=> "/server/xerox3" 
&19 _ &ursub1 _ Rope.Concat[&urdir, "/s1"]
=> "/server/xerox3/s1" 
&20 _ &ursub2 _ Rope.Concat[&urdir, "/s2"]
=> "/server/xerox3/s2" 
&21 _ 
&21 _ SunNFSRemoteServerImpl.mustMountRoot _ FALSE
=> FALSE 
&22 _ SunNFSRemoteServerImpl.ignoreBadExport _ TRUE
=> TRUE 
&23 _ 
&23 _ CThonBasicTests.ListExports[&server]
=> LIST["File System: /src", "Group: apple3", "Group: apple2", "Group: apple1", "File System: /"] 
&24 _ CThonBasicTests.SetupDirectory[&server, &urdir, TRUE]
=> [dirAttr: [type: dir, mode: 777B (511), nlink: 37777777777B (4294967295), uid: 37777777777B (4294967295), gid: 37777777777B (4294967295), size: 37777777777B (4294967295), blocksize: 37777777777B (4294967295), rdev: 177777B (65535), blocks: 37777777777B (4294967295), fsid: 37777777777B (4294967295), fileid: 37777777777B (4294967295), atime: [seconds: 37777777777B (4294967295), useconds: 37777777777B (4294967295)], mtime: [seconds: 37777777777B (4294967295), useconds: 37777777777B (4294967295)], ctime: [seconds: 37777777777B (4294967295), useconds: 37777777777B (4294967295)]], fileAttr: [type: reg, mode: 100666B (33206), nlink: 1B (1), uid: 5705B (3013), gid: 0B (0), size: 0B (0), blocksize: 2000B (1024), rdev: 0B (0), blocks: 0B (0), fsid: 14000B (6144), fileid: 7660B (4016), atime: [seconds: 4172755717B (569105359), useconds: 0B (0)], mtime: [seconds: 4172755717B (569105359), useconds: 37777777777B (4294967295)], ctime: [seconds: 4172755717B (569105359), useconds: 37777777777B (4294967295)]], dFH: ^[length: 32, text: (32)[...]]] 
&25 _ CThonBasicTests.attrStat
=> [status: ok, attributes: [type: dir, mode: 40777B (16895), nlink: 2B (2), uid: 5705B (3013), gid: 0B (0), size: 40B (32), blocksize: 2000B (1024), rdev: 137077B (48703), blocks: 1B (1), fsid: 14000B (6144), fileid: 7673B (4027), atime: [seconds: 4172755717B (569105359), useconds: 0B (0)], mtime: [seconds: 4172755717B (569105359), useconds: 22136000015B (2440560653)], ctime: [seconds: 4172755717B (569105359), useconds: 2056010400B (280498432)]]] 
&26 _ CThonFSTests.StoreRepeatedlyAndVerify[&server, &rdir, &ldir, "*.*!h", 2]
=> LIST["<server>xerox3>cb.m!1", "<server>xerox3>cb.m!2", "<server>xerox3>cf.m!1", "<server>xerox3>cf.m!2", "<server>xerox3>h1.t!1", "<server>xerox3>h1.t!2", "<server>xerox3>h2.t!1", "<server>xerox3>h2.t!2", "<server>xerox3>h3.t!1", "<server>xerox3>h3.t!2", "<server>xerox3>rs.m!1", "<server>xerox3>rs.m!2"] 
&27 _ CThonFSTests.DeleteFiles[&server, &rdir, "*!*"]
 
&28 _ CThonFSTests.EnumerateFiles[&server, &rdir, "*!*"]
=> NIL 
&29 _ CThonFSTests.StoreFiles[&server, &rdir, &sldir, Rope.Concat[&bf, "!h"], TRUE]
=> LIST["<server>xerox3>bf!1"] 
&30 _ CThonFSTests.RetrieveFile[&server, &rdir, &bf, &tldir, &bf]
 
&31 _ CThonFSTests.CompareLocalFiles[NIL, Rope.Concat[&tldir, &bf], Rope.Cat[&sldir, &bf, "!h"]]
=> [msg: NIL, index: 859136] 
&32 _ CThonBasicTests.StatFS[&server, &urdir]
=> [tsize: 20000B (8192), bsize: 2000B (1024), blocks: 154450B (55592), bfree: 14343B (6371), bavail: 14343B (6371)] 
&33 _ 
&33 _ &lattr _ CThonBasicTests.TestSymLinks[&server, &urdir, "tsyml", Rope.Cat[&urdir, "/", &bf]]
=> [type: lnk, mode: 120666B (41398), nlink: 1B (1), uid: 5705B (3013), gid: 0B (0), size: 21B (17), blocksize: 2000B (1024), rdev: 140105B (49221), blocks: 1B (1), fsid: 14000B (6144), fileid: 10503B (4419), atime: [seconds: 4172756535B (569105757), useconds: 0B (0)], mtime: [seconds: 4172756536B (569105758), useconds: 16631271057B (1986359855)], ctime: [seconds: 4172756536B (569105758), useconds: 17014627542B (2016620386)]] 
&34 _ BasicTime.Unpack[SunNFSRemoteFile.GMTFromSunTime[&lattr.atime]]
=> [year: 1988, month: January, day: 13, hour: 12, minute: 55, second: 57, zone: 480, dst: no, weekday: Wednesday, secondsThisYear: 1112157, daysThisYear: 12] 
&35 _ BasicTime.Unpack[SunNFSRemoteFile.GMTFromSunTime[&lattr.mtime]]
=> [year: 1988, month: January, day: 13, hour: 12, minute: 55, second: 58, zone: 480, dst: no, weekday: Wednesday, secondsThisYear: 1112158, daysThisYear: 12] 
&36 _ BasicTime.Unpack[SunNFSRemoteFile.GMTFromSunTime[&lattr.ctime]]
=> [year: 1988, month: January, day: 13, hour: 12, minute: 55, second: 58, zone: 480, dst: no, weekday: Wednesday, secondsThisYear: 1112158, daysThisYear: 12] 
&37 _ CThonBasicTests.RemoveDirTree[&server, &urdir]
 
&38 _ &server _ "apple1-nfs"
=> "apple1-nfs" 
&39 _ &rdir _ "<server>xerox3>"
=> "<server>xerox3>" 
&40 _ &ldir _ "[]<>data4.3>"
=> "[]<>data4.3>" 
&41 _ &ldir _ "[]<>dV>" -- for system V short file names
=> "[]<>dV>" 
&42 _ 
&42 _ SunNFSRemoteFileImpl.nfsSendBufferBytes _ 8192
=> 8192 
&43 _ SunNFSRemoteFileImpl.nfsSendBufferBytes _ 1024
=> 1024 
&44 _ SunNFSRemoteFileImpl.nfsRecvBufferBytes _ 2048
=> 2048 
&45 _ SunNFSRemoteFileImpl.nfsRecvBufferBytes _ 1024
=> 1024 
&46 _ CThonBasicTests.writeBufferBytes _ 8192
=> 8192 
&47 _ CThonBasicTests.writeBufferBytes _ 1024
=> 1024 
&48 _ CThonBasicTests.readBufferBytes _ 2048
=> 2048 
&49 _ CThonBasicTests.readBufferBytes _ 1024
=> 1024 
&50 _ SunNFSClientStub.mediumTimeout _ 1000
=> 1000 
&51 _ 
&51 _ &sldir _ "[]<>data>"
=> "[]<>data>" 
&52 _ &tldir _ "[]<>temp>"
=> "[]<>temp>" 
&53 _ &bf _ "bf" -- name of big file
=> "bf" 
&54 _ &sf _ "sf" -- name of small file
=> "sf" 
&55 _ 
&55 _ &urdir _ CThonBasicTests.StripTrailingSlash[FileNames.ConvertToSlashFormat[&rdir]]
=> "/server/xerox3" 
&56 _ &ursub1 _ Rope.Concat[&urdir, "/s1"]
=> "/server/xerox3/s1" 
&57 _ &ursub2 _ Rope.Concat[&urdir, "/s2"]
=> "/server/xerox3/s2" 
&58 _ 
&58 _ SunNFSRemoteServerImpl.mustMountRoot _ FALSE
=> FALSE 
&59 _ SunNFSRemoteServerImpl.ignoreBadExport _ TRUE
=> TRUE 
&60 _ 
&60 _ CThonBasicTests.ListExports[&server]
=> LIST["File System: /src", "Group: apple3", "Group: apple2", "Group: apple1", "File System: /"] 
&61 _ -- Here is the non-FS version XXX
&61 _ CThonBasicTests.SetupDirectory[&server, &urdir, FALSE]
=> [dirAttr: [type: dir, mode: 777B (511), nlink: 37777777777B (4294967295), uid: 37777777777B (4294967295), gid: 37777777777B (4294967295), size: 37777777777B (4294967295), blocksize: 37777777777B (4294967295), rdev: 177777B (65535), blocks: 37777777777B (4294967295), fsid: 37777777777B (4294967295), fileid: 37777777777B (4294967295), atime: [seconds: 37777777777B (4294967295), useconds: 37777777777B (4294967295)], mtime: [seconds: 37777777777B (4294967295), useconds: 37777777777B (4294967295)], ctime: [seconds: 37777777777B (4294967295), useconds: 37777777777B (4294967295)]], fileAttr: [type: dir, mode: 777B (511), nlink: 37777777777B (4294967295), uid: 37777777777B (4294967295), gid: 37777777777B (4294967295), size: 37777777777B (4294967295), blocksize: 37777777777B (4294967295), rdev: 177777B (65535), blocks: 37777777777B (4294967295), fsid: 37777777777B (4294967295), fileid: 37777777777B (4294967295), atime: [seconds: 37777777777B (4294967295), useconds: 37777777777B (4294967295)], mtime: [seconds: 37777777777B (4294967295), useconds: 37777777777B (4294967295)], ctime: [seconds: 37777777777B (4294967295), useconds: 37777777777B (4294967295)]], dFH: ^[length: 32, text: (32)[...]]] 
&62 _ CThonBasicTests.attrStat
=> [status: ok, attributes: [type: dir, mode: 40777B (16895), nlink: 2B (2), uid: 5705B (3013), gid: 0B (0), size: 40B (32), blocksize: 2000B (1024), rdev: 137077B (48703), blocks: 1B (1), fsid: 14000B (6144), fileid: 7662B (4018), atime: [seconds: 4172756631B (569105817), useconds: 0B (0)], mtime: [seconds: 4172756631B (569105817), useconds: 37701000015B (4278452237)], ctime: [seconds: 4172756631B (569105817), useconds: 2056010400B (280498432)]]] 
&63 _ 
&63 _ CThonBasicTests.WriteFiles[&server, &urdir, Rope.Cat[&sldir, &sf], 'g]
 
&64 _ &temp _ CThonBasicTests.List[&server, &urdir]
=> LIST["a", "b", "c", "d", "e", "f", "g"] 
&65 _ 
&65 _ CThonBasicTests.RemoveFiles[&server, &urdir, &temp, TRUE]
=> LIST["c: no mtime change"] 
&66 _ CThonBasicTests.List[&server, &urdir]
=> NIL 
&67 _ CThonBasicTests.RemoveDirTree[&server, &urdir]
 
&68 _ 

Ê ˜J˜ŠFJ˜—…—##4