ofs | hex dump | ascii |
---|
0000 | 2d 2d 54 45 53 54 2d 2d 0a 64 69 72 6e 61 6d 65 20 74 65 73 74 0a 2d 2d 46 49 4c 45 2d 2d 0a 3c | --TEST--.dirname.test.--FILE--.< |
0020 | 3f 70 68 70 0a 0a 2f 2f 20 41 6c 6c 6f 77 20 66 6f 72 20 65 69 74 68 65 72 20 57 69 6e 33 32 20 | ?php..//.Allow.for.either.Win32. |
0040 | 6f 72 20 55 6e 69 78 2e 0a 24 73 20 3d 20 64 69 72 6e 61 6d 65 28 22 2f 66 6f 6f 22 29 3b 0a 2f | or.Unix..$s.=.dirname("/foo");./ |
0060 | 2f 20 24 73 20 73 68 6f 75 6c 64 20 62 65 20 65 69 74 68 65 72 20 2f 20 28 55 6e 69 78 29 20 6f | /.$s.should.be.either./.(Unix).o |
0080 | 72 20 5c 20 28 57 69 6e 33 32 29 0a 0a 66 75 6e 63 74 69 6f 6e 20 63 68 65 63 6b 5f 64 69 72 6e | r.\.(Win32)..function.check_dirn |
00a0 | 61 6d 65 28 24 70 61 74 68 29 20 7b 0a 20 20 20 20 67 6c 6f 62 61 6c 20 24 73 3b 0a 20 20 20 20 | ame($path).{.....global.$s;..... |
00c0 | 24 70 61 74 68 31 20 3d 20 73 74 72 5f 72 65 70 6c 61 63 65 28 22 25 22 2c 24 73 2c 24 70 61 74 | $path1.=.str_replace("%",$s,$pat |
00e0 | 68 29 3b 0a 20 20 20 20 24 70 61 74 68 32 20 3d 20 64 69 72 6e 61 6d 65 28 24 70 61 74 68 31 29 | h);.....$path2.=.dirname($path1) |
0100 | 3b 0a 20 20 20 20 24 70 61 74 68 33 20 3d 20 73 74 72 5f 72 65 70 6c 61 63 65 28 24 73 2c 22 25 | ;.....$path3.=.str_replace($s,"% |
0120 | 22 2c 24 70 61 74 68 32 29 3b 0a 20 20 20 20 70 72 69 6e 74 20 22 64 69 72 6e 61 6d 65 28 24 70 | ",$path2);.....print."dirname($p |
0140 | 61 74 68 29 20 3d 3d 20 24 70 61 74 68 33 5c 6e 22 3b 0a 7d 0a 0a 63 68 65 63 6b 5f 64 69 72 6e | ath).==.$path3\n";.}..check_dirn |
0160 | 61 6d 65 28 22 25 66 6f 6f 25 22 29 3b 0a 63 68 65 63 6b 5f 64 69 72 6e 61 6d 65 28 22 25 66 6f | ame("%foo%");.check_dirname("%fo |
0180 | 6f 22 29 3b 0a 63 68 65 63 6b 5f 64 69 72 6e 61 6d 65 28 22 25 66 6f 6f 25 62 61 72 22 29 3b 0a | o");.check_dirname("%foo%bar");. |
01a0 | 63 68 65 63 6b 5f 64 69 72 6e 61 6d 65 28 22 25 22 29 3b 0a 63 68 65 63 6b 5f 64 69 72 6e 61 6d | check_dirname("%");.check_dirnam |
01c0 | 65 28 22 2e 2e 2e 25 66 6f 6f 22 29 3b 0a 63 68 65 63 6b 5f 64 69 72 6e 61 6d 65 28 22 2e 25 66 | e("...%foo");.check_dirname(".%f |
01e0 | 6f 6f 22 29 3b 0a 63 68 65 63 6b 5f 64 69 72 6e 61 6d 65 28 22 66 6f 6f 62 61 72 25 25 25 22 29 | oo");.check_dirname("foobar%%%") |
0200 | 3b 0a 63 68 65 63 6b 5f 64 69 72 6e 61 6d 65 28 22 25 5c 30 25 5c 30 25 5c 30 2e 25 5c 30 2e 22 | ;.check_dirname("%\0%\0%\0.%\0." |
0220 | 29 3b 0a 0a 66 75 6e 63 74 69 6f 6e 20 73 61 6d 65 28 24 61 2c 24 62 29 20 7b 0a 20 20 20 20 69 | );..function.same($a,$b).{.....i |
0240 | 66 20 28 24 61 20 3d 3d 20 24 62 29 20 7b 0a 20 20 20 20 20 20 20 20 70 72 69 6e 74 20 22 4f 4b | f.($a.==.$b).{.........print."OK |
0260 | 5c 6e 22 3b 0a 20 20 20 20 7d 20 65 6c 73 65 20 7b 0a 20 20 20 20 20 20 20 20 70 72 69 6e 74 20 | \n";.....}.else.{.........print. |
0280 | 22 46 41 49 4c 20 20 24 61 20 3d 3d 20 24 62 5c 6e 22 3b 0a 20 20 20 20 7d 0a 7d 0a 0a 69 66 20 | "FAIL..$a.==.$b\n";.....}.}..if. |
02a0 | 28 27 2f 27 20 3d 3d 20 24 73 29 20 7b 0a 20 20 20 20 73 61 6d 65 28 22 2e 22 2c 64 69 72 6e 61 | ('/'.==.$s).{.....same(".",dirna |
02c0 | 6d 65 28 22 64 3a 5c 5c 66 6f 6f 5c 5c 62 61 72 2e 69 6e 63 22 29 29 3b 0a 20 20 20 20 73 61 6d | me("d:\\foo\\bar.inc"));.....sam |
02e0 | 65 28 22 2e 22 2c 64 69 72 6e 61 6d 65 28 22 63 3a 5c 5c 66 6f 6f 22 29 29 3b 0a 20 20 20 20 73 | e(".",dirname("c:\\foo"));.....s |
0300 | 61 6d 65 28 22 2e 22 2c 64 69 72 6e 61 6d 65 28 22 63 3a 5c 5c 22 29 29 3b 0a 20 20 20 20 73 61 | ame(".",dirname("c:\\"));.....sa |
0320 | 6d 65 28 22 2e 22 2c 64 69 72 6e 61 6d 65 28 22 63 3a 22 29 29 3b 0a 7d 20 65 6c 73 65 20 7b 0a | me(".",dirname("c:"));.}.else.{. |
0340 | 20 20 20 20 73 61 6d 65 28 22 64 3a 5c 5c 66 6f 6f 22 2c 64 69 72 6e 61 6d 65 28 22 64 3a 5c 5c | ....same("d:\\foo",dirname("d:\\ |
0360 | 66 6f 6f 5c 5c 62 61 72 2e 69 6e 63 22 29 29 3b 0a 20 20 20 20 73 61 6d 65 28 22 63 3a 5c 5c 22 | foo\\bar.inc"));.....same("c:\\" |
0380 | 2c 64 69 72 6e 61 6d 65 28 22 63 3a 5c 5c 66 6f 6f 22 29 29 3b 0a 20 20 20 20 73 61 6d 65 28 22 | ,dirname("c:\\foo"));.....same(" |
03a0 | 63 3a 5c 5c 22 2c 64 69 72 6e 61 6d 65 28 22 63 3a 5c 5c 22 29 29 3b 0a 20 20 20 20 73 61 6d 65 | c:\\",dirname("c:\\"));.....same |
03c0 | 28 22 63 3a 22 2c 64 69 72 6e 61 6d 65 28 22 63 3a 22 29 29 3b 0a 7d 0a 0a 3f 3e 0a 2d 2d 45 58 | ("c:",dirname("c:"));.}..?>.--EX |
03e0 | 50 45 43 54 2d 2d 0a 64 69 72 6e 61 6d 65 28 25 66 6f 6f 25 29 20 3d 3d 20 25 0a 64 69 72 6e 61 | PECT--.dirname(%foo%).==.%.dirna |
0400 | 6d 65 28 25 66 6f 6f 29 20 3d 3d 20 25 0a 64 69 72 6e 61 6d 65 28 25 66 6f 6f 25 62 61 72 29 20 | me(%foo).==.%.dirname(%foo%bar). |
0420 | 3d 3d 20 25 66 6f 6f 0a 64 69 72 6e 61 6d 65 28 25 29 20 3d 3d 20 25 0a 64 69 72 6e 61 6d 65 28 | ==.%foo.dirname(%).==.%.dirname( |
0440 | 2e 2e 2e 25 66 6f 6f 29 20 3d 3d 20 2e 2e 2e 0a 64 69 72 6e 61 6d 65 28 2e 25 66 6f 6f 29 20 3d | ...%foo).==.....dirname(.%foo).= |
0460 | 3d 20 2e 0a 64 69 72 6e 61 6d 65 28 66 6f 6f 62 61 72 25 25 25 29 20 3d 3d 20 2e 0a 64 69 72 6e | =...dirname(foobar%%%).==...dirn |
0480 | 61 6d 65 28 25 00 25 00 25 00 2e 25 00 2e 29 20 3d 3d 20 25 00 25 00 25 00 2e 0a 4f 4b 0a 4f 4b | ame(%.%.%..%..).==.%.%.%...OK.OK |
04a0 | 0a 4f 4b 0a 4f 4b 0a | .OK.OK. |