Imported from /home/lorry/working-area/delta_php2/php-5.4.13.tar.bz2.HEADphp-5.4.13master

1 files changed, 146 insertions, 0 deletions

diff --git a/ext/standard/tests/file/001.phpt b/ext/standard/tests/file/001.phpt
new file mode 100644
index 0000000..d604699
--- /dev/null
+++ b/ext/standard/tests/file/001.phpt
@@ -0,0 +1,146 @@
+--TEST--
+File type functions
+--SKIPIF--
+<?php
+if (substr(PHP_OS, 0, 3) == 'WIN') {
+    die('skip no symlinks on Windows');
+}
+if (getenv("SKIP_SLOW_TESTS")) die("skip slow test");
+?>
+--FILE--
+<?php
+chdir(dirname(__FILE__));
+@unlink('test.file');
+@unlink('test.link');
+if (file_exists('test.file')) {
+    echo "test.file exists\n";
+} else {
+    echo "test.file does not exist\n";
+}
+fclose (fopen('test.file', 'w'));
+chmod ('test.file', 0744);
+if (file_exists('test.file')) {
+    echo "test.file exists\n";
+} else {
+    echo "test.file does not exist\n";
+}
+sleep (2);
+symlink('test.file','test.link');
+if (file_exists('test.link')) {
+    echo "test.link exists\n";
+} else {
+    echo "test.link does not exist\n";
+}
+if (is_link('test.file')) {
+    echo "test.file is a symlink\n";
+} else {
+    echo "test.file is not a symlink\n";
+}
+if (is_link('test.link')) {
+    echo "test.link is a symlink\n";
+} else {
+    echo "test.link is not a symlink\n";
+}
+if (file_exists('test.file')) {
+    echo "test.file exists\n";
+} else {
+    echo "test.file does not exist\n";
+}
+$s = stat ('test.file');
+$ls = lstat ('test.file');
+for ($i = 0; $i <= 12; $i++) {
+    if ($ls[$i] != $s[$i]) {
+	echo "test.file lstat and stat differ at element $i\n";
+    }
+}
+$s = stat ('test.link');
+$ls = lstat ('test.link');
+for ($i = 0; $i <= 11; $i++) {
+    if ($ls[$i] != $s[$i]) {
+	if ($i != 6 && $i != 10 && $i != 11) echo "test.link lstat and stat differ at element $i\n";
+    }
+}
+echo "test.file is " . filetype('test.file') . "\n";
+echo "test.link is " . filetype('test.link') . "\n";
+printf ("test.file permissions are 0%o\n", 0777 & fileperms('test.file'));
+echo "test.file size is " . filesize('test.file') . "\n";
+if (is_writeable('test.file')) {
+    echo "test.file is writeable\n";
+} else {
+    echo "test.file is not writeable\n";
+}
+if (is_readable('test.file')) {
+    echo "test.file is readable\n";
+} else {
+    echo "test.file is not readable\n";
+}
+if (is_executable('test.file')) {
+    echo "test.file is executable\n";
+} else {
+    echo "test.file is not executable\n";
+}
+if (is_file('test.file')) {
+    echo "test.file is a regular file\n";
+} else {
+    echo "test.file is not a regular file\n";
+}
+if (is_file('test.link')) {
+    echo "test.link is a regular file\n";
+} else {
+    echo "test.link is not a regular file\n";
+}
+if (is_dir('test.link')) {
+    echo "test.link is a directory\n";
+} else {
+    echo "test.link is not a directory\n";
+}
+if (is_dir('../file')) {
+    echo "../file is a directory\n";
+} else {
+    echo "../file is not a directory\n";
+}
+if (is_dir('test.file')) {
+    echo "test.file is a directory\n";
+} else {
+    echo "test.file is not a directory\n";
+}
+unlink('test.file');
+unlink('test.link');
+if (file_exists('test.file')) {
+    echo "test.file exists (cached)\n";
+} else {
+    echo "test.file does not exist\n";
+}
+clearstatcache();
+if (file_exists('test.file')) {
+    echo "test.file exists\n";
+} else {
+    echo "test.file does not exist\n";
+}
+?>
+--EXPECT--
+test.file does not exist
+test.file exists
+test.link exists
+test.file is not a symlink
+test.link is a symlink
+test.file exists
+test.link lstat and stat differ at element 1
+test.link lstat and stat differ at element 2
+test.link lstat and stat differ at element 7
+test.link lstat and stat differ at element 8
+test.link lstat and stat differ at element 9
+test.file is file
+test.link is link
+test.file permissions are 0744
+test.file size is 0
+test.file is writeable
+test.file is readable
+test.file is executable
+test.file is a regular file
+test.link is a regular file
+test.link is not a directory
+../file is a directory
+test.file is not a directory
+test.file does not exist
+test.file does not exist