1--TEST--
2Test fopen and fclose() functions - usage variations - "r+" mode
3--FILE--
4<?php
5/*
6 fopen() function:
7 Prototype: resource fopen(string $filename, string $mode
8                            [, bool $use_include_path [, resource $context]] );
9 Description: Opens file or URL.
10*/
11/*
12 fclose() function:
13 Prototype: bool fclose ( resource $handle );
14 Description: Closes an open file pointer
15*/
16
17/* Test fopen() and fclose(): Opening the file in "r+" mode,
18   checking for the file creation, write & read operations,
19   checking for the file pointer position,
20   and fclose function
21*/
22$file_path = dirname(__FILE__);
23require($file_path."/file.inc");
24
25create_files($file_path, 1, "text_with_new_line", 0755, 20, "w", "007_variation", 2, "bytes");
26$file = $file_path."/007_variation2.tmp";
27$string = "abcdefghij\nmnopqrst\tuvwxyz\n0123456789";
28
29echo "*** Test fopen() & fclose() functions:  with 'r+' mode ***\n";
30$file_handle = fopen($file, "r+");  //opening the file in "r+" mode
31var_dump($file_handle);  //Check for the content of handle
32var_dump( get_resource_type($file_handle) );  //Check for the type of resource
33var_dump( ftell($file_handle) );  //Initial file pointer position, expected at the begining of the file
34var_dump( fread($file_handle, 100) );  //Check for read operation
35var_dump( ftell($file_handle) );  //File pointer position after read operation, expected at the end of the file
36var_dump( fwrite($file_handle, $string) );  //Check for write operation; passes; expected:size of the $string
37var_dump( ftell($file_handle) );  //File pointer position after write operation, expected at the end of the file
38var_dump( fclose($file_handle) );  //Check for close operation on the file handle
39var_dump( get_resource_type($file_handle) );  //Check whether resource is lost after close operation
40echo "*** Done ***\n";
41--CLEAN--
42<?php
43unlink(dirname(__FILE__)."/007_variation2.tmp");
44?>
45--EXPECTF--
46*** Test fopen() & fclose() functions:  with 'r+' mode ***
47resource(%d) of type (stream)
48string(6) "stream"
49int(0)
50string(20) "line
51line of text
52li"
53int(20)
54int(37)
55int(57)
56bool(true)
57string(7) "Unknown"
58*** Done ***