php-src/ext/standard/tests/file/file_variation8-win32.phpt
Peter Kokot d679f02295 Sync leading and final newlines in *.phpt sections
This patch adds missing newlines, trims multiple redundant final
newlines into a single one, and trims redundant leading newlines in all
*.phpt sections.

According to POSIX, a line is a sequence of zero or more non-' <newline>'
characters plus a terminating '<newline>' character. [1] Files should
normally have at least one final newline character.

C89 [2] and later standards [3] mention a final newline:
"A source file that is not empty shall end in a new-line character,
which shall not be immediately preceded by a backslash character."

Although it is not mandatory for all files to have a final newline
fixed, a more consistent and homogeneous approach brings less of commit
differences issues and a better development experience in certain text
editors and IDEs.

[1] http://pubs.opengroup.org/onlinepubs/9699919799/basedefs/V1_chap03.html#tag_03_206
[2] https://port70.net/~nsz/c/c89/c89-draft.html#2.1.1.2
[3] https://port70.net/~nsz/c/c99/n1256.html#5.1.1.2
2018-10-15 04:33:09 +02:00

142 lines
2.8 KiB
PHP

--TEST--
Test file() function : variation - various absolute and relative paths
--CREDITS--
Dave Kelsey <d_kelsey@uk.ibm.com>
--SKIPIF--
<?php
if(substr(PHP_OS, 0, 3) != "WIN")
die("skip Only run on Windows");
?>
--FILE--
<?php
/* Prototype : array file(string filename [, int flags[, resource context]])
* Description: Read entire file into an array
* Source code: ext/standard/file.c
* Alias to functions:
*/
echo "*** Testing file() : variation ***\n";
$mainDir = "fileVar8.dir";
$subDir = "fileVar8Sub";
$absMainDir = dirname(__FILE__)."\\".$mainDir;
mkdir($absMainDir);
$absSubDir = $absMainDir."\\".$subDir;
mkdir($absSubDir);
$old_dir_path = getcwd();
chdir(dirname(__FILE__));
$unixifiedDir = '/'.substr(str_replace('\\','/',$absSubDir),3);
$allDirs = array(
// absolute paths
"$absSubDir\\",
"$absSubDir\\..\\".$subDir,
"$absSubDir\\\\..\\.\\".$subDir,
"$absSubDir\\..\\..\\".$mainDir."\\.\\".$subDir,
"$absSubDir\\..\\\\\\".$subDir."\\\\..\\\\..\\".$subDir,
"$absSubDir\\BADDIR",
// relative paths
$mainDir."\\".$subDir,
$mainDir."\\\\".$subDir,
$mainDir."\\\\\\".$subDir,
".\\".$mainDir."\\..\\".$mainDir."\\".$subDir,
"BADDIR",
// unixifed path
$unixifiedDir,
);
$filename = 'FileGetContentsVar7.tmp';
$absFile = $absSubDir.'/'.$filename;
$h = fopen($absFile,"w");
fwrite($h, "contents read");
fclose($h);
for($i = 0; $i<count($allDirs); $i++) {
$j = $i+1;
$dir = $allDirs[$i];
echo "\n-- Iteration $j --\n";
var_dump(file($dir."\\".$filename));
}
unlink($absFile);
chdir($old_dir_path);
rmdir($absSubDir);
rmdir($absMainDir);
echo "\n*** Done ***\n";
?>
--EXPECTF--
*** Testing file() : variation ***
-- Iteration 1 --
array(1) {
[0]=>
string(13) "contents read"
}
-- Iteration 2 --
array(1) {
[0]=>
string(13) "contents read"
}
-- Iteration 3 --
array(1) {
[0]=>
string(13) "contents read"
}
-- Iteration 4 --
array(1) {
[0]=>
string(13) "contents read"
}
-- Iteration 5 --
Warning: file(%sfileVar8.dir\fileVar8Sub\..\\\fileVar8Sub\\..\\..\fileVar8Sub\FileGetContentsVar7.tmp): failed to open stream: No such file or directory in %s on line %d
bool(false)
-- Iteration 6 --
Warning: file(%sfileVar8.dir\fileVar8Sub\BADDIR\FileGetContentsVar7.tmp): failed to open stream: No such file or directory in %s on line %d
bool(false)
-- Iteration 7 --
array(1) {
[0]=>
string(13) "contents read"
}
-- Iteration 8 --
array(1) {
[0]=>
string(13) "contents read"
}
-- Iteration 9 --
array(1) {
[0]=>
string(13) "contents read"
}
-- Iteration 10 --
array(1) {
[0]=>
string(13) "contents read"
}
-- Iteration 11 --
Warning: file(BADDIR\FileGetContentsVar7.tmp): failed to open stream: No such file or directory in %s on line %d
bool(false)
-- Iteration 12 --
array(1) {
[0]=>
string(13) "contents read"
}
*** Done ***