blob: f5f934f72ef223f8976c9774aab2c9f92bae248c (plain)

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.