File: bug51353.phpt

package info (click to toggle)
php8.4 8.4.11-1
  • links: PTS, VCS
  • area: main
  • in suites: forky, sid, trixie
  • size: 208,108 kB
  • sloc: ansic: 1,060,628; php: 35,345; sh: 11,866; cpp: 7,201; pascal: 4,913; javascript: 3,091; asm: 2,810; yacc: 2,411; makefile: 689; xml: 446; python: 301; awk: 148
file content (58 lines) | stat: -rw-r--r-- 1,196 bytes parent folder | download
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
--TEST--
Bug #51353 ZIP64 problem, archive with 100000 items
--EXTENSIONS--
zip
--SKIPIF--
<?php
die('skip the test might get very long, activate it manually');
?>
--FILE--
<?php
/* This test might get very long depending on the mashine it's running on. Therefore
adding an explicit skip, remove it to run this test. */
set_time_limit(0);

$base_path = __DIR__;

/* Either we ship a file with 100000 entries which would be >12M big,
    or create it dynamically. */
$zip = new ZipArchive;
$r = $zip->open("$base_path/51353.zip", ZIPARCHIVE::CREATE | ZIPARCHIVE::OVERWRITE);
if ($r) {
    for ($i = 0; $i < 100000; $i++) {
        $zip->addFromString("$i.txt", '1');
    }
    $zip->close();
} else {
    die("failed");
}

$zip = new ZipArchive;
$r = $zip->open("$base_path/51353.zip");
if ($r) {
    $zip->extractTo("$base_path/51353_unpack");
    $zip->close();

    $a = glob("$base_path/51353_unpack/*.txt");
    echo count($a) . "\n";
} else {
    die("failed");
}

echo "OK";
?>
--CLEAN--
<?php
$base_path = __DIR__;

unlink("$base_path/51353.zip");

$a = glob("$base_path/51353_unpack/*.txt");
foreach($a as $f) {
    unlink($f);
}
rmdir("$base_path/51353_unpack");
?>
--EXPECT--
100000
OK