home *** CD-ROM | disk | FTP | other *** search
MacBinary | 1992-11-22 | 3.8 KB | [TEXT/MPS ] |
open in:
MacOS 8.1
|
Win98
|
DOS
browse contents |
view JSON data
|
view as text
This file was processed as: MacBinary
(archive/macBinary).
Confidence | Program | Detection | Match Type | Support
|
---|
66%
| dexvert
| E-Tracker Chiptune (music/eTracker)
| ext
| Supported |
10%
| dexvert
| MacBinary (archive/macBinary)
| fallback
| Supported |
10%
| dexvert
| Jesper Olsen Module (music/jesperOlsen)
| magic
| Supported |
1%
| dexvert
| Simis (archive/simis)
| ext
| Unsupported |
1%
| dexvert
| TADS (other/tads)
| ext
| Unsupported |
1%
| dexvert
| Text File (text/txt)
| fallback
| Supported |
100%
| file
| TTComp archive data, binary, 1K dictionary
| default (weak)
| |
99%
| file
| MacBinary II, Sat Nov 21 21:00:39 1992, modified Sat Nov 21 21:00:39 1992, creator 'MPS ', type ASCII, 3090 bytes "fs.t"
| default (weak)
| |
98%
| file
| a ./perl script executable (binary data), at 0xc92 428 bytes resource
| default (weak)
| |
97%
| file
| a ./perl script executable (binary data)
| default (weak)
| |
96%
| file
| data
| default
| |
49%
| TrID
| Macintosh plain text (MacBinary)
| default
| |
33%
| TrID
| TTComp archive compressed (bin-1K)
| default (weak)
| |
16%
| TrID
| MacBinary 2
| default (weak)
| |
0%
| TrID
| Sybase iAnywhere database files
| default (weak)
| |
100%
| siegfried
| fmt/1762 MacBinary (II)
| default
| |
100%
| lsar
| MacBinary
| default
|
|
id metadata |
---|
key | value |
---|
macFileType | [TEXT] |
macFileCreator | [MPS ] |
hex view+--------+-------------------------+-------------------------+--------+--------+
|00000000| 00 04 66 73 2e 74 00 00 | 00 00 00 00 00 00 00 00 |..fs.t..|........|
|00000010| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000020| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000030| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000040| 00 54 45 58 54 4d 50 53 | 20 00 00 00 00 00 00 00 |.TEXTMPS| .......|
|00000050| 00 00 00 00 00 0c 12 00 | 00 01 ac a7 34 9a 47 a7 |........|....4.G.|
|00000060| 34 9a 47 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |4.G.....|........|
|00000070| 00 00 00 00 00 00 00 00 | 00 00 81 81 ff 3f 00 00 |........|.....?..|
|00000080| 23 21 2e 2f 70 65 72 6c | 0d 0d 23 20 24 48 65 61 |#!./perl|..# $Hea|
|00000090| 64 65 72 3a 20 66 73 2e | 74 2c 76 20 34 2e 30 20 |der: fs.|t,v 4.0 |
|000000a0| 39 31 2f 30 33 2f 32 30 | 20 30 31 3a 35 30 3a 35 |91/03/20| 01:50:5|
|000000b0| 35 20 6c 77 61 6c 6c 20 | 4c 6f 63 6b 65 64 20 24 |5 lwall |Locked $|
|000000c0| 0d 0d 70 72 69 6e 74 20 | 22 31 2e 2e 32 32 5c 6e |..print |"1..22\n|
|000000d0| 22 3b 0d 0d 24 77 64 20 | 3d 20 60 64 69 72 65 63 |";..$wd |= `direc|
|000000e0| 74 6f 72 79 60 3b 0d 63 | 68 6f 70 28 24 77 64 29 |tory`;.c|hop($wd)|
|000000f0| 3b 0d 0d 60 44 65 6c 65 | 74 65 20 2d 79 20 74 6d |;..`Dele|te -y tm|
|00000100| 70 b3 44 65 76 3a 4e 75 | 6c 6c 3b 20 4e 65 77 46 |p.Dev:Nu|ll; NewF|
|00000110| 6f 6c 64 65 72 20 74 6d | 70 b3 44 65 76 3a 4e 75 |older tm|p.Dev:Nu|
|00000120| 6c 6c 60 3b 0d 63 68 64 | 69 72 20 27 3a 74 6d 70 |ll`;.chd|ir ':tmp|
|00000130| 27 3b 0d 60 64 65 6c 65 | 74 65 20 2d 79 20 61 20 |';.`dele|te -y a |
|00000140| 62 20 63 20 78 60 3b 0d | 0d 23 20 75 6d 61 73 6b |b c x`;.|.# umask|
|00000150| 28 30 32 32 29 3b 0d 0d | 23 20 69 66 20 28 75 6d |(022);..|# if (um|
|00000160| 61 73 6b 28 30 29 20 3d | 3d 20 30 32 32 29 20 7b |ask(0) =|= 022) {|
|00000170| 70 72 69 6e 74 20 22 6f | 6b 20 31 5c 6e 22 3b 7d |print "o|k 1\n";}|
|00000180| 20 65 6c 73 65 20 7b 70 | 72 69 6e 74 20 22 6e 6f | else {p|rint "no|
|00000190| 74 20 6f 6b 20 31 5c 6e | 22 3b 7d 0d 6f 70 65 6e |t ok 1\n|";}.open|
|000001a0| 28 66 68 2c 27 3e 78 27 | 29 20 7c 7c 20 64 69 65 |(fh,'>x'|) || die|
|000001b0| 20 22 43 61 6e 27 74 20 | 63 72 65 61 74 65 20 78 | "Can't |create x|
|000001c0| 22 3b 0d 63 6c 6f 73 65 | 28 66 68 29 3b 0d 6f 70 |";.close|(fh);.op|
|000001d0| 65 6e 28 66 68 2c 27 3e | 61 27 29 20 7c 7c 20 64 |en(fh,'>|a') || d|
|000001e0| 69 65 20 22 43 61 6e 27 | 74 20 63 72 65 61 74 65 |ie "Can'|t create|
|000001f0| 20 61 22 3b 0d 63 6c 6f | 73 65 28 66 68 29 3b 0d | a";.clo|se(fh);.|
|00000200| 0d 69 66 20 28 73 79 6d | 6c 69 6e 6b 28 27 61 27 |.if (sym|link('a'|
|00000210| 2c 27 62 27 29 29 20 7b | 70 72 69 6e 74 20 22 6f |,'b')) {|print "o|
|00000220| 6b 20 32 5c 6e 22 3b 7d | 20 65 6c 73 65 20 7b 70 |k 2\n";}| else {p|
|00000230| 72 69 6e 74 20 22 6e 6f | 74 20 6f 6b 20 32 5c 6e |rint "no|t ok 2\n|
|00000240| 22 3b 7d 0d 0d 69 66 20 | 28 73 79 6d 6c 69 6e 6b |";}..if |(symlink|
|00000250| 28 27 62 27 2c 27 63 27 | 29 29 20 7b 70 72 69 6e |('b','c'|)) {prin|
|00000260| 74 20 22 6f 6b 20 33 5c | 6e 22 3b 7d 20 65 6c 73 |t "ok 3\|n";} els|
|00000270| 65 20 7b 70 72 69 6e 74 | 20 22 6e 6f 74 20 6f 6b |e {print| "not ok|
|00000280| 20 33 5c 6e 22 3b 7d 0d | 0d 28 24 64 65 76 2c 24 | 3\n";}.|.($dev,$|
|00000290| 69 6e 6f 2c 24 6d 6f 64 | 65 2c 24 6e 6c 69 6e 6b |ino,$mod|e,$nlink|
|000002a0| 2c 24 75 69 64 2c 24 67 | 69 64 2c 24 72 64 65 76 |,$uid,$g|id,$rdev|
|000002b0| 2c 24 73 69 7a 65 2c 24 | 61 74 69 6d 65 2c 24 6d |,$size,$|atime,$m|
|000002c0| 74 69 6d 65 2c 24 63 74 | 69 6d 65 2c 0d 20 20 24 |time,$ct|ime,. $|
|000002d0| 62 6c 6b 73 69 7a 65 2c | 24 62 6c 6f 63 6b 73 29 |blksize,|$blocks)|
|000002e0| 20 3d 20 73 74 61 74 28 | 27 63 27 29 3b 0d 0d 23 | = stat(|'c');..#|
|000002f0| 20 69 66 20 28 24 6e 6c | 69 6e 6b 20 3d 3d 20 33 | if ($nl|ink == 3|
|00000300| 29 20 7b 70 72 69 6e 74 | 20 22 6f 6b 20 34 5c 6e |) {print| "ok 4\n|
|00000310| 22 3b 7d 20 65 6c 73 65 | 20 7b 70 72 69 6e 74 20 |";} else| {print |
|00000320| 22 6e 6f 74 20 6f 6b 20 | 34 5c 6e 22 3b 7d 0d 23 |"not ok |4\n";}.#|
|00000330| 20 69 66 20 28 28 24 6d | 6f 64 65 20 26 20 30 37 | if (($m|ode & 07|
|00000340| 37 37 29 20 3d 3d 20 30 | 36 36 36 29 20 7b 70 72 |77) == 0|666) {pr|
|00000350| 69 6e 74 20 22 6f 6b 20 | 35 5c 6e 22 3b 7d 20 65 |int "ok |5\n";} e|
|00000360| 6c 73 65 20 7b 70 72 69 | 6e 74 20 22 6e 6f 74 20 |lse {pri|nt "not |
|00000370| 6f 6b 20 35 5c 6e 22 3b | 7d 0d 0d 23 20 69 66 20 |ok 5\n";|}..# if |
|00000380| 28 28 63 68 6d 6f 64 20 | 30 37 37 37 2c 27 61 27 |((chmod |0777,'a'|
|00000390| 29 20 3d 3d 20 31 29 20 | 7b 70 72 69 6e 74 20 22 |) == 1) |{print "|
|000003a0| 6f 6b 20 36 5c 6e 22 3b | 7d 20 65 6c 73 65 20 7b |ok 6\n";|} else {|
|000003b0| 70 72 69 6e 74 20 22 6e | 6f 74 20 6f 6b 20 36 5c |print "n|ot ok 6\|
|000003c0| 6e 22 3b 7d 0d 0d 23 20 | 28 24 64 65 76 2c 24 69 |n";}..# |($dev,$i|
|000003d0| 6e 6f 2c 24 6d 6f 64 65 | 2c 24 6e 6c 69 6e 6b 2c |no,$mode|,$nlink,|
|000003e0| 24 75 69 64 2c 24 67 69 | 64 2c 24 72 64 65 76 2c |$uid,$gi|d,$rdev,|
|000003f0| 24 73 69 7a 65 2c 24 61 | 74 69 6d 65 2c 24 6d 74 |$size,$a|time,$mt|
|00000400| 69 6d 65 2c 24 63 74 69 | 6d 65 2c 0d 23 20 20 20 |ime,$cti|me,.# |
|00000410| 20 24 62 6c 6b 73 69 7a | 65 2c 24 62 6c 6f 63 6b | $blksiz|e,$block|
|00000420| 73 29 20 3d 20 73 74 61 | 74 28 27 63 27 29 3b 0d |s) = sta|t('c');.|
|00000430| 23 20 69 66 20 28 28 24 | 6d 6f 64 65 20 26 20 30 |# if (($|mode & 0|
|00000440| 37 37 37 29 20 3d 3d 20 | 30 37 37 37 29 20 7b 70 |777) == |0777) {p|
|00000450| 72 69 6e 74 20 22 6f 6b | 20 37 5c 6e 22 3b 7d 20 |rint "ok| 7\n";} |
|00000460| 65 6c 73 65 20 7b 70 72 | 69 6e 74 20 22 6e 6f 74 |else {pr|int "not|
|00000470| 20 6f 6b 20 37 5c 6e 22 | 3b 7d 0d 0d 23 20 69 66 | ok 7\n"|;}..# if|
|00000480| 20 28 28 63 68 6d 6f 64 | 20 30 37 30 30 2c 27 63 | ((chmod| 0700,'c|
|00000490| 27 2c 27 78 27 29 20 3d | 3d 20 32 29 20 7b 70 72 |','x') =|= 2) {pr|
|000004a0| 69 6e 74 20 22 6f 6b 20 | 38 5c 6e 22 3b 7d 20 65 |int "ok |8\n";} e|
|000004b0| 6c 73 65 20 7b 70 72 69 | 6e 74 20 22 6e 6f 74 20 |lse {pri|nt "not |
|000004c0| 6f 6b 20 38 5c 6e 22 3b | 7d 0d 0d 23 20 28 24 64 |ok 8\n";|}..# ($d|
|000004d0| 65 76 2c 24 69 6e 6f 2c | 24 6d 6f 64 65 2c 24 6e |ev,$ino,|$mode,$n|
|000004e0| 6c 69 6e 6b 2c 24 75 69 | 64 2c 24 67 69 64 2c 24 |link,$ui|d,$gid,$|
|000004f0| 72 64 65 76 2c 24 73 69 | 7a 65 2c 24 61 74 69 6d |rdev,$si|ze,$atim|
|00000500| 65 2c 24 6d 74 69 6d 65 | 2c 24 63 74 69 6d 65 2c |e,$mtime|,$ctime,|
|00000510| 0d 23 20 20 20 20 20 24 | 62 6c 6b 73 69 7a 65 2c |.# $|blksize,|
|00000520| 24 62 6c 6f 63 6b 73 29 | 20 3d 20 73 74 61 74 28 |$blocks)| = stat(|
|00000530| 27 63 27 29 3b 0d 23 20 | 69 66 20 28 28 24 6d 6f |'c');.# |if (($mo|
|00000540| 64 65 20 26 20 30 37 37 | 37 29 20 3d 3d 20 30 37 |de & 077|7) == 07|
|00000550| 30 30 29 20 7b 70 72 69 | 6e 74 20 22 6f 6b 20 39 |00) {pri|nt "ok 9|
|00000560| 5c 6e 22 3b 7d 20 65 6c | 73 65 20 7b 70 72 69 6e |\n";} el|se {prin|
|00000570| 74 20 22 6e 6f 74 20 6f | 6b 20 39 5c 6e 22 3b 7d |t "not o|k 9\n";}|
|00000580| 0d 23 20 28 24 64 65 76 | 2c 24 69 6e 6f 2c 24 6d |.# ($dev|,$ino,$m|
|00000590| 6f 64 65 2c 24 6e 6c 69 | 6e 6b 2c 24 75 69 64 2c |ode,$nli|nk,$uid,|
|000005a0| 24 67 69 64 2c 24 72 64 | 65 76 2c 24 73 69 7a 65 |$gid,$rd|ev,$size|
|000005b0| 2c 24 61 74 69 6d 65 2c | 24 6d 74 69 6d 65 2c 24 |,$atime,|$mtime,$|
|000005c0| 63 74 69 6d 65 2c 0d 23 | 20 20 20 20 20 24 62 6c |ctime,.#| $bl|
|000005d0| 6b 73 69 7a 65 2c 24 62 | 6c 6f 63 6b 73 29 20 3d |ksize,$b|locks) =|
|000005e0| 20 73 74 61 74 28 27 78 | 27 29 3b 0d 23 20 69 66 | stat('x|');.# if|
|000005f0| 20 28 28 24 6d 6f 64 65 | 20 26 20 30 37 37 37 29 | (($mode| & 0777)|
|00000600| 20 3d 3d 20 30 37 30 30 | 29 20 7b 70 72 69 6e 74 | == 0700|) {print|
|00000610| 20 22 6f 6b 20 31 30 5c | 6e 22 3b 7d 20 65 6c 73 | "ok 10\|n";} els|
|00000620| 65 20 7b 70 72 69 6e 74 | 20 22 6e 6f 74 20 6f 6b |e {print| "not ok|
|00000630| 20 31 30 5c 6e 22 3b 7d | 0d 0d 69 66 20 28 28 75 | 10\n";}|..if ((u|
|00000640| 6e 6c 69 6e 6b 20 27 78 | 27 29 20 3d 3d 20 31 29 |nlink 'x|') == 1)|
|00000650| 20 7b 70 72 69 6e 74 20 | 22 6f 6b 20 31 31 5c 6e | {print |"ok 11\n|
|00000660| 22 3b 7d 20 65 6c 73 65 | 20 7b 70 72 69 6e 74 20 |";} else| {print |
|00000670| 22 6e 6f 74 20 6f 6b 20 | 31 31 5c 6e 22 3b 7d 0d |"not ok |11\n";}.|
|00000680| 23 20 28 24 64 65 76 2c | 24 69 6e 6f 2c 24 6d 6f |# ($dev,|$ino,$mo|
|00000690| 64 65 2c 24 6e 6c 69 6e | 6b 2c 24 75 69 64 2c 24 |de,$nlin|k,$uid,$|
|000006a0| 67 69 64 2c 24 72 64 65 | 76 2c 24 73 69 7a 65 2c |gid,$rde|v,$size,|
|000006b0| 24 61 74 69 6d 65 2c 24 | 6d 74 69 6d 65 2c 24 63 |$atime,$|mtime,$c|
|000006c0| 74 69 6d 65 2c 0d 23 20 | 20 20 20 20 24 62 6c 6b |time,.# | $blk|
|000006d0| 73 69 7a 65 2c 24 62 6c | 6f 63 6b 73 29 20 3d 20 |size,$bl|ocks) = |
|000006e0| 73 74 61 74 28 27 62 27 | 29 3b 0d 23 20 69 66 20 |stat('b'|);.# if |
|000006f0| 28 24 69 6e 6f 20 3d 3d | 20 30 29 20 7b 70 72 69 |($ino ==| 0) {pri|
|00000700| 6e 74 20 22 6f 6b 20 31 | 32 5c 6e 22 3b 7d 20 65 |nt "ok 1|2\n";} e|
|00000710| 6c 73 65 20 7b 70 72 69 | 6e 74 20 22 6e 6f 74 20 |lse {pri|nt "not |
|00000720| 6f 6b 20 31 32 5c 6e 22 | 3b 7d 0d 28 24 64 65 76 |ok 12\n"|;}.($dev|
|00000730| 2c 24 69 6e 6f 2c 24 6d | 6f 64 65 2c 24 6e 6c 69 |,$ino,$m|ode,$nli|
|00000740| 6e 6b 2c 24 75 69 64 2c | 24 67 69 64 2c 24 72 64 |nk,$uid,|$gid,$rd|
|00000750| 65 76 2c 24 73 69 7a 65 | 2c 24 61 74 69 6d 65 2c |ev,$size|,$atime,|
|00000760| 24 6d 74 69 6d 65 2c 24 | 63 74 69 6d 65 2c 0d 20 |$mtime,$|ctime,. |
|00000770| 20 20 20 24 62 6c 6b 73 | 69 7a 65 2c 24 62 6c 6f | $blks|ize,$blo|
|00000780| 63 6b 73 29 20 3d 20 73 | 74 61 74 28 27 78 27 29 |cks) = s|tat('x')|
|00000790| 3b 0d 69 66 20 28 24 69 | 6e 6f 20 3d 3d 20 30 29 |;.if ($i|no == 0)|
|000007a0| 20 7b 70 72 69 6e 74 20 | 22 6f 6b 20 31 33 5c 6e | {print |"ok 13\n|
|000007b0| 22 3b 7d 20 65 6c 73 65 | 20 7b 70 72 69 6e 74 20 |";} else| {print |
|000007c0| 22 6e 6f 74 20 6f 6b 20 | 31 33 5c 6e 22 3b 7d 0d |"not ok |13\n";}.|
|000007d0| 0d 69 66 20 28 72 65 6e | 61 6d 65 28 27 61 27 2c |.if (ren|ame('a',|
|000007e0| 27 62 27 29 29 20 7b 70 | 72 69 6e 74 20 22 6f 6b |'b')) {p|rint "ok|
|000007f0| 20 31 34 5c 6e 22 3b 7d | 20 65 6c 73 65 20 7b 70 | 14\n";}| else {p|
|00000800| 72 69 6e 74 20 22 6e 6f | 74 20 6f 6b 20 31 34 5c |rint "no|t ok 14\|
|00000810| 6e 22 3b 7d 0d 28 24 64 | 65 76 2c 24 69 6e 6f 2c |n";}.($d|ev,$ino,|
|00000820| 24 6d 6f 64 65 2c 24 6e | 6c 69 6e 6b 2c 24 75 69 |$mode,$n|link,$ui|
|00000830| 64 2c 24 67 69 64 2c 24 | 72 64 65 76 2c 24 73 69 |d,$gid,$|rdev,$si|
|00000840| 7a 65 2c 24 61 74 69 6d | 65 2c 24 6d 74 69 6d 65 |ze,$atim|e,$mtime|
|00000850| 2c 24 63 74 69 6d 65 2c | 0d 20 20 20 20 24 62 6c |,$ctime,|. $bl|
|00000860| 6b 73 69 7a 65 2c 24 62 | 6c 6f 63 6b 73 29 20 3d |ksize,$b|locks) =|
|00000870| 20 73 74 61 74 28 27 61 | 27 29 3b 0d 69 66 20 28 | stat('a|');.if (|
|00000880| 24 69 6e 6f 20 3d 3d 20 | 30 29 20 7b 70 72 69 6e |$ino == |0) {prin|
|00000890| 74 20 22 6f 6b 20 31 35 | 5c 6e 22 3b 7d 20 65 6c |t "ok 15|\n";} el|
|000008a0| 73 65 20 7b 70 72 69 6e | 74 20 22 6e 6f 74 20 6f |se {prin|t "not o|
|000008b0| 6b 20 31 35 5c 6e 22 3b | 7d 0d 23 20 24 66 6f 6f |k 15\n";|}.# $foo|
|000008c0| 20 3d 20 28 75 74 69 6d | 65 20 35 30 30 30 30 30 | = (utim|e 500000|
|000008d0| 30 30 30 2c 35 30 30 30 | 30 30 30 30 31 2c 27 62 |000,5000|00001,'b|
|000008e0| 27 29 3b 0d 23 20 69 66 | 20 28 24 66 6f 6f 20 3d |');.# if| ($foo =|
|000008f0| 3d 20 31 29 20 7b 70 72 | 69 6e 74 20 22 6f 6b 20 |= 1) {pr|int "ok |
|00000900| 31 36 5c 6e 22 3b 7d 20 | 65 6c 73 65 20 7b 70 72 |16\n";} |else {pr|
|00000910| 69 6e 74 20 22 6e 6f 74 | 20 6f 6b 20 31 36 20 24 |int "not| ok 16 $|
|00000920| 66 6f 6f 5c 6e 22 3b 7d | 0d 28 24 64 65 76 2c 24 |foo\n";}|.($dev,$|
|00000930| 69 6e 6f 2c 24 6d 6f 64 | 65 2c 24 6e 6c 69 6e 6b |ino,$mod|e,$nlink|
|00000940| 2c 24 75 69 64 2c 24 67 | 69 64 2c 24 72 64 65 76 |,$uid,$g|id,$rdev|
|00000950| 2c 24 73 69 7a 65 2c 24 | 61 74 69 6d 65 2c 24 6d |,$size,$|atime,$m|
|00000960| 74 69 6d 65 2c 24 63 74 | 69 6d 65 2c 0d 20 20 20 |time,$ct|ime,. |
|00000970| 20 24 62 6c 6b 73 69 7a | 65 2c 24 62 6c 6f 63 6b | $blksiz|e,$block|
|00000980| 73 29 20 3d 20 73 74 61 | 74 28 27 62 27 29 3b 0d |s) = sta|t('b');.|
|00000990| 69 66 20 28 24 69 6e 6f | 29 20 7b 70 72 69 6e 74 |if ($ino|) {print|
|000009a0| 20 22 6f 6b 20 31 37 5c | 6e 22 3b 7d 20 65 6c 73 | "ok 17\|n";} els|
|000009b0| 65 20 7b 70 72 69 6e 74 | 20 22 6e 6f 74 20 6f 6b |e {print| "not ok|
|000009c0| 20 31 37 5c 6e 22 3b 7d | 0d 69 66 20 28 28 24 61 | 17\n";}|.if (($a|
|000009d0| 74 69 6d 65 20 3d 3d 20 | 35 30 30 30 30 30 30 30 |time == |50000000|
|000009e0| 30 20 26 26 20 24 6d 74 | 69 6d 65 20 3d 3d 20 35 |0 && $mt|ime == 5|
|000009f0| 30 30 30 30 30 30 30 31 | 29 20 7c 7c 20 24 77 64 |00000001|) || $wd|
|00000a00| 20 3d 7e 20 6d 23 2f 61 | 66 73 2f 23 29 0d 20 20 | =~ m#/a|fs/#). |
|00000a10| 20 20 7b 70 72 69 6e 74 | 20 22 6f 6b 20 31 38 5c | {print| "ok 18\|
|00000a20| 6e 22 3b 7d 0d 65 6c 73 | 65 0d 20 20 20 20 7b 70 |n";}.els|e. {p|
|00000a30| 72 69 6e 74 20 22 6e 6f | 74 20 6f 6b 20 31 38 20 |rint "no|t ok 18 |
|00000a40| 24 61 74 69 6d 65 20 24 | 6d 74 69 6d 65 5c 6e 22 |$atime $|mtime\n"|
|00000a50| 3b 7d 0d 0d 69 66 20 28 | 28 75 6e 6c 69 6e 6b 20 |;}..if (|(unlink |
|00000a60| 27 62 27 29 20 3d 3d 20 | 31 29 20 7b 70 72 69 6e |'b') == |1) {prin|
|00000a70| 74 20 22 6f 6b 20 31 39 | 5c 6e 22 3b 7d 20 65 6c |t "ok 19|\n";} el|
|00000a80| 73 65 20 7b 70 72 69 6e | 74 20 22 6e 6f 74 20 6f |se {prin|t "not o|
|00000a90| 6b 20 31 39 5c 6e 22 3b | 7d 0d 28 24 64 65 76 2c |k 19\n";|}.($dev,|
|00000aa0| 24 69 6e 6f 2c 24 6d 6f | 64 65 2c 24 6e 6c 69 6e |$ino,$mo|de,$nlin|
|00000ab0| 6b 2c 24 75 69 64 2c 24 | 67 69 64 2c 24 72 64 65 |k,$uid,$|gid,$rde|
|00000ac0| 76 2c 24 73 69 7a 65 2c | 24 61 74 69 6d 65 2c 24 |v,$size,|$atime,$|
|00000ad0| 6d 74 69 6d 65 2c 24 63 | 74 69 6d 65 2c 0d 20 20 |mtime,$c|time,. |
|00000ae0| 20 20 24 62 6c 6b 73 69 | 7a 65 2c 24 62 6c 6f 63 | $blksi|ze,$bloc|
|00000af0| 6b 73 29 20 3d 20 73 74 | 61 74 28 27 62 27 29 3b |ks) = st|at('b');|
|00000b00| 0d 69 66 20 28 24 69 6e | 6f 20 3d 3d 20 30 29 20 |.if ($in|o == 0) |
|00000b10| 7b 70 72 69 6e 74 20 22 | 6f 6b 20 32 30 5c 6e 22 |{print "|ok 20\n"|
|00000b20| 3b 7d 20 65 6c 73 65 20 | 7b 70 72 69 6e 74 20 22 |;} else |{print "|
|00000b30| 6e 6f 74 20 6f 6b 20 32 | 30 5c 6e 22 3b 7d 0d 75 |not ok 2|0\n";}.u|
|00000b40| 6e 6c 69 6e 6b 20 27 63 | 27 3b 0d 0d 63 68 64 69 |nlink 'c|';..chdi|
|00000b50| 72 20 24 77 64 20 7c 7c | 20 64 69 65 20 22 43 61 |r $wd ||| die "Ca|
|00000b60| 6e 27 74 20 63 64 20 62 | 61 63 6b 20 74 6f 20 24 |n't cd b|ack to $|
|00000b70| 77 64 22 3b 0d 0d 75 6e | 6c 69 6e 6b 20 27 63 27 |wd";..un|link 'c'|
|00000b80| 3b 0d 69 66 20 28 60 6c | 73 20 2d 6c 20 70 65 72 |;.if (`l|s -l per|
|00000b90| 6c 20 32 3e 2f 64 65 76 | 2f 6e 75 6c 6c 60 20 3d |l 2>/dev|/null` =|
|00000ba0| 7e 20 2f 5e 6c 2e 2a 2d | 3e 2f 29 20 7b 20 20 23 |~ /^l.*-|>/) { #|
|00000bb0| 20 77 65 20 68 61 76 65 | 20 73 79 6d 62 6f 6c 69 | we have| symboli|
|00000bc0| 63 20 6c 69 6e 6b 73 0d | 20 20 20 20 69 66 20 28 |c links.| if (|
|00000bd0| 73 79 6d 6c 69 6e 6b 28 | 22 54 45 53 54 22 2c 22 |symlink(|"TEST","|
|00000be0| 63 22 29 29 20 7b 70 72 | 69 6e 74 20 22 6f 6b 20 |c")) {pr|int "ok |
|00000bf0| 32 31 5c 6e 22 3b 7d 20 | 65 6c 73 65 20 7b 70 72 |21\n";} |else {pr|
|00000c00| 69 6e 74 20 22 6e 6f 74 | 20 6f 6b 20 32 31 5c 6e |int "not| ok 21\n|
|00000c10| 22 3b 7d 0d 20 20 20 20 | 24 66 6f 6f 20 3d 20 60 |";}. |$foo = `|
|00000c20| 67 72 65 70 20 70 65 72 | 6c 20 63 60 3b 0d 20 20 |grep per|l c`;. |
|00000c30| 20 20 69 66 20 28 24 66 | 6f 6f 29 20 7b 70 72 69 | if ($f|oo) {pri|
|00000c40| 6e 74 20 22 6f 6b 20 32 | 32 5c 6e 22 3b 7d 20 65 |nt "ok 2|2\n";} e|
|00000c50| 6c 73 65 20 7b 70 72 69 | 6e 74 20 22 6e 6f 74 20 |lse {pri|nt "not |
|00000c60| 6f 6b 20 32 32 5c 6e 22 | 3b 7d 0d 7d 0d 65 6c 73 |ok 22\n"|;}.}.els|
|00000c70| 65 20 7b 0d 20 20 20 20 | 70 72 69 6e 74 20 22 6f |e {. |print "o|
|00000c80| 6b 20 32 31 5c 6e 6f 6b | 20 32 32 5c 6e 22 3b 0d |k 21\nok| 22\n";.|
|00000c90| 7d 0d 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |}.......|........|
|00000ca0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000cb0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000cc0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000cd0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000ce0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000cf0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000d00| 00 00 01 00 00 00 01 6e | 00 00 00 6e 00 00 00 3e |.......n|...n...>|
|00000d10| 00 c0 00 00 00 e0 00 c1 | c0 c1 c2 ca ca cf 00 a0 |........|........|
|00000d20| 10 00 76 75 82 b7 b5 16 | b8 b5 b6 f0 90 ff b9 b6 |..vu....|........|
|00000d30| 04 66 73 2e 74 80 02 00 | 00 00 54 45 58 54 4d 50 |.fs.t...|..TEXTMP|
|00000d40| 53 20 00 00 00 00 00 00 | 00 00 00 00 75 6e 00 00 |S ......|....un..|
|00000d50| 00 00 54 45 58 54 4d 50 | 53 20 00 00 00 00 00 00 |..TEXTMP|S ......|
|00000d60| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000d70| 00 00 a5 8c 0c 1b 00 00 | 0c 12 00 00 01 ac 63 62 |........|......cb|
|00000d80| 61 a1 d8 d5 da d4 15 d5 | d4 4f d6 d8 15 d9 d7 d8 |a.......|.O......|
|00000d90| 74 00 00 1d 00 81 0f 01 | 10 01 12 01 a4 00 06 02 |t.......|........|
|00000da0| 40 0a 00 00 d7 00 00 00 | 0a 00 00 0b 00 00 00 fd |@.......|........|
|00000db0| 00 00 00 00 00 00 0a 00 | 00 73 06 07 20 00 00 08 |........|.s.. ...|
|00000dc0| 04 09 00 08 08 ff 08 08 | 08 00 00 00 09 02 ff 02 |........|........|
|00000dd0| 02 02 02 02 02 02 02 ff | 02 02 02 13 00 00 09 02 |........|........|
|00000de0| ff 02 02 02 02 02 02 02 | 02 ff 02 02 02 13 00 00 |........|........|
|00000df0| 02 02 ff 02 02 02 02 02 | 02 02 02 fe 02 02 02 02 |........|........|
|00000e00| 00 00 00 48 00 09 4d 6f | 6e 61 63 6f 00 00 00 00 |...H..Mo|naco....|
|00000e10| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000e20| 00 00 00 00 00 00 00 06 | 00 03 00 50 00 20 01 dd |........|...P. ..|
|00000e30| 02 3d 00 50 00 20 01 dd | 02 3d a7 34 62 07 00 00 |.=.P. ..|.=.4b...|
|00000e40| 01 81 00 00 01 c4 00 00 | 06 6b 01 00 00 00 00 1e |........|.k......|
|00000e50| 00 50 00 20 01 dd 02 3d | 00 50 00 20 01 dd 02 3d |.P. ...=|.P. ...=|
|00000e60| 00 00 06 6b 00 00 00 00 | 00 00 00 00 00 00 00 00 |...k....|........|
|00000e70| 01 00 00 00 01 6e 00 00 | 00 6e 00 00 00 3e 00 51 |.....n..|.n...>.Q|
|00000e80| aa 40 12 bc 00 00 00 1c | 00 3e 00 00 4d 50 53 52 |.@......|.>..MPSR|
|00000e90| 00 01 00 0a 03 ed ff ff | 00 00 00 00 00 00 00 00 |........|........|
|00000ea0| 03 f0 ff ff 00 00 00 4c | 00 57 dd ac 00 00 00 00 |.......L|.W......|
|00000eb0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000ec0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000ed0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000ee0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000ef0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
+--------+-------------------------+-------------------------+--------+--------+