Return to test007.phpt CVS log

Up to [ELWIX - Embedded LightWeight unIX -] / embedaddon / php / tests / run-test

Annotation of embedaddon/php/tests/run-test/test007.phpt, revision 1.1.1.1

1.1       misho       1: --TEST--
                      2: dirname test
                      3: --FILE--
                      4: <?php
                      5: 
                      6: // Allow for either Win32 or Unix.
                      7: $s = dirname("/foo");
                      8: // $s should be either / (Unix) or \ (Win32)
                      9: 
                     10: function check_dirname($path) {
                     11:     global $s;
                     12:     $path1 = str_replace("%",$s,$path);
                     13:     $path2 = dirname($path1);
                     14:     $path3 = str_replace($s,"%",$path2);
                     15:     print "dirname($path) == $path3\n";
                     16: }
                     17: 
                     18: check_dirname("%foo%");
                     19: check_dirname("%foo");
                     20: check_dirname("%foo%bar");
                     21: check_dirname("%");
                     22: check_dirname("...%foo");
                     23: check_dirname(".%foo");
                     24: check_dirname("foobar%%%");
                     25: check_dirname("%\0%\0%\0.%\0.");
                     26: 
                     27: function same($a,$b) {
                     28:     if ($a == $b) {
                     29:         print "OK\n";
                     30:     } else {
                     31:         print "FAIL  $a == $b\n";
                     32:     }
                     33: }
                     34: 
                     35: if ('/' == $s) {
                     36:     same(".",dirname("d:\\foo\\bar.inc"));
                     37:     same(".",dirname("c:\\foo"));
                     38:     same(".",dirname("c:\\"));
                     39:     same(".",dirname("c:"));
                     40: } else {
                     41:     same("d:\\foo",dirname("d:\\foo\\bar.inc"));
                     42:     same("c:\\",dirname("c:\\foo"));
                     43:     same("c:\\",dirname("c:\\"));
                     44:     same("c:",dirname("c:"));
                     45: }
                     46: 
                     47: ?>
                     48: --EXPECT--
                     49: dirname(%foo%) == %
                     50: dirname(%foo) == %
                     51: dirname(%foo%bar) == %foo
                     52: dirname(%) == %
                     53: dirname(...%foo) == ...
                     54: dirname(.%foo) == .
                     55: dirname(foobar%%%) == .
                     56: dirname(%%%.%.) == %%%.
                     57: OK
                     58: OK
                     59: OK
                     60: OK