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
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
|
<?php
namespace Roundcube\Plugins\Tests;
use PHPUnit\Framework\Attributes\DataProvider;
use PHPUnit\Framework\TestCase;
class Tests_Script extends TestCase
{
static function setUpBeforeClass(): void
{
include_once INSTALL_PATH . 'plugins/managesieve/lib/Roundcube/rcube_sieve_script.php';
}
/**
* Sieve script parsing
*
* @dataProvider data_parser
*/
#[DataProvider('data_parser')]
function test_parser($input, $output, $message)
{
// get capabilities list from the script
$caps = [];
if (preg_match('/require \[([a-z0-9", ]+)\]/', $input, $m)) {
foreach (explode(',', $m[1]) as $cap) {
$caps[] = trim($cap, '" ');
}
}
$script = new \rcube_sieve_script($input, $caps);
$result = $script->as_text();
$this->assertEquals(trim($output), trim($result), $message);
}
/**
* Data provider for test_parser()
*/
static function data_parser()
{
$dir_path = realpath(__DIR__ . '/src');
$dir = opendir($dir_path);
$result = [];
while ($file = readdir($dir)) {
if (preg_match('/^[a-z0-9_]+$/', $file)) {
$input = file_get_contents($dir_path . '/' . $file);
if (file_exists($dir_path . '/' . $file . '.out')) {
$output = file_get_contents($dir_path . '/' . $file . '.out');
}
else {
$output = $input;
}
$result[] = [
'input' => $input,
'output' => $output,
'message' => "Error in parsing '$file' file",
];
}
}
return $result;
}
/**
* Sieve script parsing
*/
public function test_parser_bug9562()
{
// This is an obviously invalid script
$input = "vacation :subject \"a\" :from \"b\"\n<a href=\"https://test.org/\">test</a>";
$script = new \rcube_sieve_script($input);
$result = $script->as_text();
// TODO: The output still is BS, but it at least does not cause an infinite loop
$this->assertSame("require [\"vacation\"];\r\nvacation :subject \"a\" :from \"b\" \"a\";\r\n", $result);
}
static function data_tokenizer()
{
return [
[1, "text: #test\nThis is test ; message;\nMulti line\n.\n;\n", '"This is test ; message;\nMulti line"'],
[1, "text: #test\r\nThis is test ; message;\nMulti line\r\n.\r\n;", '"This is test ; message;\nMulti line"'],
[0, '["test1","test2"]', '[["test1","test2"]]'],
[1, '["test"]', '["test"]'],
[1, '"te\\"st"', '"te\\"st"'],
[0, 'test #comment', '["test"]'],
[0, "text:\ntest\n.\ntext:\ntest\n.\n", '["test","test"]'],
[0, "text:\r\ntest\r\n.\r\ntext:\r\ntest\r\n.\r\n", '["test","test"]'],
[1, '"\\a\\\\\\"a"', '"a\\\\\\"a"'],
];
}
/**
* @dataProvider data_tokenizer
*/
#[DataProvider('data_tokenizer')]
function test_tokenizer($num, $input, $output)
{
$res = json_encode(\rcube_sieve_script::tokenize($input, $num));
$this->assertEquals(trim($output), trim($res));
}
public function test_escape_string()
{
$output = \rcube_sieve_script::escape_string([]);
$this->assertSame('""', $output);
$output = \rcube_sieve_script::escape_string(['"']);
$this->assertSame('"\""', $output);
$output = \rcube_sieve_script::escape_string('\\a');
$this->assertSame('"\\\\a"', $output);
$output = \rcube_sieve_script::escape_string(['"', 'b']);
$this->assertSame('["\"","b"]', $output);
// Multiline text
$input = "line1\r\nline2\n.line3\r\nline4";
$output = \rcube_sieve_script::escape_string($input);
$this->assertSame("text:\r\nline1\r\nline2\r\n..line3\r\nline4\r\n.\r\n", $output);
}
}
|
