Skip to content
GitLab
Menu
Projects
Groups
Snippets
Help
Help
Support
Community forum
Keyboard shortcuts
?
Submit feedback
Contribute to GitLab
Sign in / Register
Toggle navigation
Menu
Open sidebar
Per Cederqvist
lyskom-server-ceder-1616-generations-topgit
Commits
5d065a6a
Commit
5d065a6a
authored
Nov 14, 2002
by
Per Cederqvist
Browse files
Renumber.
parent
2a70df69
Changes
3
Hide whitespace changes
Inline
Side-by-side
src/server/testsuite/lyskomd.0/bug-37-2.exp
View file @
5d065a6a
...
...
@@ -155,32 +155,32 @@ send "1027 46 6 0 100 1\n"
simple_expect "=1027 4 { $any_time 6 255 0 0 \\* $any_time 10 200 0 0 \\* $any_time 11 200 0 0 \\* $any_time 12 200 0 0 \\* }"
# foo does get-membership of foo. Should return 4 { 6 10 11 12 }.
send "102
6
108 6 0 100 1 0\n"
simple_expect "=102
6
4 { 0 $any_time 6 255 0 \\* 6 $any_time 00000000 1 $any_time 10 200 0 \\* 7 $any_time 10100000 2 $any_time 11 200 0 \\* 7 $any_time 10100000 3 $any_time 12 200 0 \\* 7 $any_time 10100000 }"
send "102
8
108 6 0 100 1 0\n"
simple_expect "=102
8
4 { 0 $any_time 6 255 0 \\* 6 $any_time 00000000 1 $any_time 10 200 0 \\* 7 $any_time 10100000 2 $any_time 11 200 0 \\* 7 $any_time 10100000 3 $any_time 12 200 0 \\* 7 $any_time 10100000 }"
# foo does query-read-texts-10 on foo and 10, 11 and 12. Should get results.
send "102
8
98 6 10\n"
simple_expect "=102
8
1 $any_time 10 200 0 0 \\* 7 $any_time 10100000"
send "10
29
98 6 11\n"
simple_expect "=10
29
2 $any_time 11 200 0 0 \\* 7 $any_time 10100000"
send "103
0
98 6 12\n"
simple_expect "=103
0
3 $any_time 12 200 0 0 \\* 7 $any_time 10100000"
send "102
9
98 6 10\n"
simple_expect "=102
9
1 $any_time 10 200 0 0 \\* 7 $any_time 10100000"
send "10
30
98 6 11\n"
simple_expect "=10
30
2 $any_time 11 200 0 0 \\* 7 $any_time 10100000"
send "103
1
98 6 12\n"
simple_expect "=103
1
3 $any_time 12 200 0 0 \\* 7 $any_time 10100000"
# foo does query-read-texts-old on foo and 10, 11 and 12. Should get results.
send "103
1
9 6 10\n"
simple_expect "=103
1
$any_time 10 200 0 0 \\*"
send "103
2
9 6 11\n"
simple_expect "=103
2
$any_time 11 200 0 0 \\*"
send "103
3
9 6 12\n"
simple_expect "=103
3
$any_time 12 200 0 0 \\*"
send "103
2
9 6 10\n"
simple_expect "=103
2
$any_time 10 200 0 0 \\*"
send "103
3
9 6 11\n"
simple_expect "=103
3
$any_time 11 200 0 0 \\*"
send "103
4
9 6 12\n"
simple_expect "=103
4
$any_time 12 200 0 0 \\*"
# foo does query-read-texts on foo and 10, 11 and 12. Should get results.
send "10
28
107 6 10 1 0\n"
simple_expect "=10
28
1 $any_time 10 200 0 \\* 7 $any_time 10100000"
send "10
29
107 6 11 1 0\n"
simple_expect "=10
29
2 $any_time 11 200 0 \\* 7 $any_time 10100000"
send "103
0
107 6 12 1 0\n"
simple_expect "=103
0
3 $any_time 12 200 0 \\* 7 $any_time 10100000"
send "10
35
107 6 10 1 0\n"
simple_expect "=10
35
1 $any_time 10 200 0 \\* 7 $any_time 10100000"
send "10
36
107 6 11 1 0\n"
simple_expect "=10
36
2 $any_time 11 200 0 \\* 7 $any_time 10100000"
send "103
7
107 6 12 1 0\n"
simple_expect "=103
7
3 $any_time 12 200 0 \\* 7 $any_time 10100000"
#
# gazonk examines foo.
...
...
@@ -189,196 +189,196 @@ simple_expect "=1030 3 $any_time 12 200 0 \\* 7 $any_time 10100000"
talk_to client 3
# gazonk does get-unread-confs of foo. Should return the empty list.
send "103
4
52 6\n"
simple_expect "=103
4
0 \\*"
send "103
8
52 6\n"
simple_expect "=103
8
0 \\*"
# gazonk does get-membership-10 of foo. Should return 1 { 6 }.
send "103
5
99 6 0 100 1\n"
simple_expect "=103
5
1 { 0 $any_time 6 255 0 0 \\* 6 $any_time 00000000 }"
send "103
9
99 6 0 100 1\n"
simple_expect "=103
9
1 { 0 $any_time 6 255 0 0 \\* 6 $any_time 00000000 }"
# (Just a quick check: does the renumber work properly even if we don't
# start from the beginning of the list?)
send "10
36
99 6 2 100 1\n"
simple_expect "%10
36
19 2"
send "10
37
99 6 1 100 1\n"
simple_expect "%10
37
19 1"
send "10
40
99 6 2 100 1\n"
simple_expect "%10
40
19 2"
send "10
41
99 6 1 100 1\n"
simple_expect "%10
41
19 1"
# gazonk does get-membership-old of foo. Should return 1 { 6 }.
send "10
38
46 6 0 100 1\n"
simple_expect "=10
38
1 { $any_time 6 255 0 0 \\* }"
send "10
42
46 6 0 100 1\n"
simple_expect "=10
42
1 { $any_time 6 255 0 0 \\* }"
# gazonk does get-membership of foo. Should return 1 { 6 }.
send "103
5
108 6 0 100 1 0\n"
simple_expect "=103
5
1 { 0 $any_time 6 255 0 \\* 6 $any_time 00000000 }"
send "10
4
3 108 6 0 100 1 0\n"
simple_expect "=10
4
3 1 { 0 $any_time 6 255 0 \\* 6 $any_time 00000000 }"
# (Just a quick check: does the renumber work properly even if we don't
# start from the beginning of the list?)
send "10
36
108 6 2 100 1 0\n"
simple_expect "%10
36
19 2"
send "10
37
108 6 1 100 1 0\n"
simple_expect "%10
37
19 1"
send "10
44
108 6 2 100 1 0\n"
simple_expect "%10
44
19 2"
send "10
45
108 6 1 100 1 0\n"
simple_expect "%10
45
19 1"
# gazonk does query-read-texts-10 on foo and 10, 11 and 12. All should fail.
send "10
39
98 6 10\n"
simple_expect "%10
39
9 10"
send "104
0
98 6 11\n"
simple_expect "%104
0
13 11"
send "104
1
98 6 12\n"
simple_expect "%104
1
13 12"
send "10
46
98 6 10\n"
simple_expect "%10
46
9 10"
send "104
7
98 6 11\n"
simple_expect "%104
7
13 11"
send "104
8
98 6 12\n"
simple_expect "%104
8
13 12"
# gazonk does query-read-texts-old on foo and 10, 11 and 12. 10 should fail.
send "104
2
9 6 10\n"
simple_expect "%104
2
9 10"
send "10
43
9 6 11\n"
simple_expect "%10
43
13 11"
send "10
44
9 6 12\n"
simple_expect "%10
44
13 12"
send "104
9
9 6 10\n"
simple_expect "%104
9
9 10"
send "10
50
9 6 11\n"
simple_expect "%10
50
13 11"
send "10
51
9 6 12\n"
simple_expect "%10
51
13 12"
# gazonk does query-read-texts on foo and 10, 11 and 12. All should fail.
send "10
39
107 6 10 1 0\n"
simple_expect "%10
39
9 10"
send "10
40
107 6 11 1 0\n"
simple_expect "%10
40
13 11"
send "104
1
107 6 12 1 0\n"
simple_expect "%104
1
13 12"
send "10
52
107 6 10 1 0\n"
simple_expect "%10
52
9 10"
send "10
53
107 6 11 1 0\n"
simple_expect "%10
53
13 11"
send "10
5
4 107 6 12 1 0\n"
simple_expect "%10
5
4 13 12"
#
# gazonk examines bar.
#
# gazonk does get-unread-confs of bar. Should return undefined-person.
send "10
4
5 52 7\n"
good_bad_expect "%10
4
5 10 7" "=0 \\*" "Bug 37"
send "10
5
5 52 7\n"
good_bad_expect "%10
5
5 10 7" "=0 \\*" "Bug 37"
# gazonk does get-membership-10 of bar. Should return undefined-person.
send "10
4
6 99 7 0 100 1\n"
simple_expect "%10
4
6 10 7"
send "10
5
6 99 7 0 100 1\n"
simple_expect "%10
5
6 10 7"
# gazonk does get-membership-old of bar. Should return undefined-person.
send "10
4
7 46 7 0 100 1\n"
simple_expect "%10
4
7 10 7"
send "10
5
7 46 7 0 100 1\n"
simple_expect "%10
5
7 10 7"
# gazonk does get-membership of bar. Should return undefined-person.
send "10
46
108 7 0 100 1 0\n"
simple_expect "%10
46
10 7"
send "10
58
108 7 0 100 1 0\n"
simple_expect "%10
58
10 7"
# gazonk does query-read-texts-10 on bar and 10, 11 and 12. undefined-person.
send "10
48
98 7 10\n"
simple_expect "%10
48
10 7"
send "10
49
98 7 11\n"
simple_expect "%10
49
10 7"
send "10
50
98 7 12\n"
simple_expect "%10
50
10 7"
send "10
59
98 7 10\n"
simple_expect "%10
59
10 7"
send "10
60
98 7 11\n"
simple_expect "%10
60
10 7"
send "10
61
98 7 12\n"
simple_expect "%10
61
10 7"
# gazonk does query-read-texts-old on bar and 10, 11 and 12. undefined-person.
send "10
51
9 7 10\n"
simple_expect "%10
51
10 7"
send "10
52
9 7 11\n"
simple_expect "%10
52
10 7"
send "10
53
9 7 12\n"
simple_expect "%10
53
10 7"
send "10
62
9 7 10\n"
simple_expect "%10
62
10 7"
send "10
63
9 7 11\n"
simple_expect "%10
63
10 7"
send "10
64
9 7 12\n"
simple_expect "%10
64
10 7"
# gazonk does query-read-texts on bar and 10, 11 and 12. undefined-person.
send "10
48
107 7 10 1 0\n"
simple_expect "%10
48
10 7"
send "10
49
107 7 11 1 0\n"
simple_expect "%10
49
10 7"
send "10
50
107 7 12 1 0\n"
simple_expect "%10
50
10 7"
send "10
65
107 7 10 1 0\n"
simple_expect "%10
65
10 7"
send "10
66
107 7 11 1 0\n"
simple_expect "%10
66
10 7"
send "10
67
107 7 12 1 0\n"
simple_expect "%10
67
10 7"
#
# gazonk examines citrus.
#
# gazonk does get-unread-confs of citrus. Should return the empty list.
send "10
54
52 8\n"
simple_expect "=10
54
0 \\*"
send "10
68
52 8\n"
simple_expect "=10
68
0 \\*"
# gazonk does get-membership-10 of citrus. Should return 1 { 6 }.
send "10
55
99 8 0 100 1\n"
simple_expect "=10
55
1 { 0 $any_time 8 255 0 0 \\* 8 $any_time 00000000 }"
send "10
69
99 8 0 100 1\n"
simple_expect "=10
69
1 { 0 $any_time 8 255 0 0 \\* 8 $any_time 00000000 }"
# gazonk does get-membership-old of citrus. Should return 1 { 6 }.
send "10
56
46 8 0 100 1\n"
simple_expect "=10
56
1 { $any_time 8 255 0 0 \\* }"
send "10
70
46 8 0 100 1\n"
simple_expect "=10
70
1 { $any_time 8 255 0 0 \\* }"
# gazonk does get-membership of citrus. Should return 1 { 6 }.
send "10
55
108 8 0 100 1 0\n"
simple_expect "=10
55
1 { 0 $any_time 8 255 0 \\* 8 $any_time 00000000 }"
send "10
71
108 8 0 100 1 0\n"
simple_expect "=10
71
1 { 0 $any_time 8 255 0 \\* 8 $any_time 00000000 }"
# gazonk does query-read-texts-10 on citrus and 10, 11 and 12. All fails.
send "10
5
7 98 8 10\n"
simple_expect "%10
5
7 9 10"
send "10
58
98 8 11\n"
simple_expect "%10
58
13 11"
send "10
59
98 8 12\n"
simple_expect "%10
59
13 12"
send "107
2
98 8 10\n"
simple_expect "%107
2
9 10"
send "10
73
98 8 11\n"
simple_expect "%10
73
13 11"
send "10
74
98 8 12\n"
simple_expect "%10
74
13 12"
# gazonk does query-read-texts-old on citrus and 10, 11 and 12. All fails.
send "10
60
9 8 10\n"
simple_expect "%10
60
9 10"
send "106
1
9 8 11\n"
simple_expect "%106
1
13 11"
send "10
62
9 8 12\n"
simple_expect "%10
62
13 12"
send "10
75
9 8 10\n"
simple_expect "%10
75
9 10"
send "10
7
6 9 8 11\n"
simple_expect "%10
7
6 13 11"
send "10
77
9 8 12\n"
simple_expect "%10
77
13 12"
# gazonk does query-read-texts on citrus and 10, 11 and 12. All should fail.
send "10
5
7 107 8 10 1 0\n"
simple_expect "%10
5
7 9 10"
send "10
58
107 8 11 1 0\n"
simple_expect "%10
58
13 11"
send "10
59
107 8 12 1 0\n"
simple_expect "%10
59
13 12"
send "107
8
107 8 10 1 0\n"
simple_expect "%107
8
9 10"
send "10
79
107 8 11 1 0\n"
simple_expect "%10
79
13 11"
send "10
80
107 8 12 1 0\n"
simple_expect "%10
80
13 12"
#
# foo writes a text with secret, rd-prot and public as recipients.
#
talk_to client 0
send "10
63
86 [holl "foo"] 3 { 0 10 0 11 0 12 } 0 { }\n"
simple_expect "=10
63
1"
send "10
81
86 [holl "foo"] 3 { 0 10 0 11 0 12 } 0 { }\n"
simple_expect "=10
81
1"
#
# foo examines foo
#
# foo does get-unread-confs of foo. Should return 3 { 10 11 12 }.
send "10
64
52 6\n"
simple_expect "=10
64
3 { 10 11 12 }"
send "10
82
52 6\n"
simple_expect "=10
82
3 { 10 11 12 }"
# foo does get-membership-10 of foo. Should return 4 { 6 10 11 12 }.
send "10
65
99 6 0 100 1\n"
simple_expect "=10
65
4 { 0 $any_time 6 255 0 0 \\* 6 $any_time 00000000 1 $any_time 10 200 0 0 \\* 7 $any_time 10100000 2 $any_time 11 200 0 0 \\* 7 $any_time 10100000 3 $any_time 12 200 0 0 \\* 7 $any_time 10100000 }"
send "10
83
99 6 0 100 1\n"
simple_expect "=10
83
4 { 0 $any_time 6 255 0 0 \\* 6 $any_time 00000000 1 $any_time 10 200 0 0 \\* 7 $any_time 10100000 2 $any_time 11 200 0 0 \\* 7 $any_time 10100000 3 $any_time 12 200 0 0 \\* 7 $any_time 10100000 }"
# foo does get-membership-old of foo. Should return 4 { 6 10 11 12 }.
send "10
66
46 6 0 100 1\n"
simple_expect "=10
66
4 { $any_time 6 255 0 0 \\* $any_time 10 200 0 0 \\* $any_time 11 200 0 0 \\* $any_time 12 200 0 0 \\* }"
send "10
84
46 6 0 100 1\n"
simple_expect "=10
84
4 { $any_time 6 255 0 0 \\* $any_time 10 200 0 0 \\* $any_time 11 200 0 0 \\* $any_time 12 200 0 0 \\* }"
# foo does get-membership of foo. Should return 4 { 6 10 11 12 }.
send "10
6
5 108 6 0 100 1 0\n"
simple_expect "=10
6
5 4 { 0 $any_time 6 255 0 \\* 6 $any_time 00000000 1 $any_time 10 200 0 \\* 7 $any_time 10100000 2 $any_time 11 200 0 \\* 7 $any_time 10100000 3 $any_time 12 200 0 \\* 7 $any_time 10100000 }"
send "10
8
5 108 6 0 100 1 0\n"
simple_expect "=10
8
5 4 { 0 $any_time 6 255 0 \\* 6 $any_time 00000000 1 $any_time 10 200 0 \\* 7 $any_time 10100000 2 $any_time 11 200 0 \\* 7 $any_time 10100000 3 $any_time 12 200 0 \\* 7 $any_time 10100000 }"
# foo does query-read-texts-10 on foo and 10, 11 and 12. Should get results.
send "106
7
98 6 10\n"
simple_expect "=106
7
1 $any_time 10 200 0 0 \\* 7 $any_time 10100000"
send "10
6
8 98 6 11\n"
simple_expect "=10
6
8 2 $any_time 11 200 0 0 \\* 7 $any_time 10100000"
send "10
69
98 6 12\n"
simple_expect "=10
69
3 $any_time 12 200 0 0 \\* 7 $any_time 10100000"
send "10
8
6 98 6 10\n"
simple_expect "=10
8
6 1 $any_time 10 200 0 0 \\* 7 $any_time 10100000"
send "108
7
98 6 11\n"
simple_expect "=108
7
2 $any_time 11 200 0 0 \\* 7 $any_time 10100000"
send "10
88
98 6 12\n"
simple_expect "=10
88
3 $any_time 12 200 0 0 \\* 7 $any_time 10100000"
# foo does query-read-texts-old on foo and 10, 11 and 12. Should get results.
send "10
70
9 6 10\n"
simple_expect "=10
70
$any_time 10 200 0 0 \\*"
send "10
71
9 6 11\n"
simple_expect "=10
71
$any_time 11 200 0 0 \\*"
send "10
72
9 6 12\n"
simple_expect "=10
72
$any_time 12 200 0 0 \\*"
send "10
89
9 6 10\n"
simple_expect "=10
89
$any_time 10 200 0 0 \\*"
send "10
90
9 6 11\n"
simple_expect "=10
90
$any_time 11 200 0 0 \\*"
send "10
91
9 6 12\n"
simple_expect "=10
91
$any_time 12 200 0 0 \\*"
# foo does query-read-texts on foo and 10, 11 and 12. Should get results.
send "10
67
107 6 10 1 0\n"
simple_expect "=10
67
1 $any_time 10 200 0 \\* 7 $any_time 10100000"
send "10
68
107 6 11 1 0\n"
simple_expect "=10
68
2 $any_time 11 200 0 \\* 7 $any_time 10100000"
send "10
6
9 107 6 12 1 0\n"
simple_expect "=10
6
9 3 $any_time 12 200 0 \\* 7 $any_time 10100000"
send "10
92
107 6 10 1 0\n"
simple_expect "=10
92
1 $any_time 10 200 0 \\* 7 $any_time 10100000"
send "10
93
107 6 11 1 0\n"
simple_expect "=10
93
2 $any_time 11 200 0 \\* 7 $any_time 10100000"
send "109
4
107 6 12 1 0\n"
simple_expect "=109
4
3 $any_time 12 200 0 \\* 7 $any_time 10100000"
#
# gazonk examines foo.
...
...
@@ -387,132 +387,132 @@ simple_expect "=1069 3 $any_time 12 200 0 \\* 7 $any_time 10100000"
talk_to client 3
# gazonk does get-unread-confs of foo. Should return the empty list.
send "10
73
52 6\n"
simple_expect "=10
73
0 \\*"
send "10
95
52 6\n"
simple_expect "=10
95
0 \\*"
# gazonk does get-membership-10 of foo. Should return 1 { 6 }.
send "10
74
99 6 0 100 1\n"
simple_expect "=10
74
1 { 0 $any_time 6 255 0 0 \\* 6 $any_time 00000000 }"
send "10
96
99 6 0 100 1\n"
simple_expect "=10
96
1 { 0 $any_time 6 255 0 0 \\* 6 $any_time 00000000 }"
# gazonk does get-membership-old of foo. Should return 1 { 6 }.
send "107
5
46 6 0 100 1\n"
simple_expect "=107
5
1 { $any_time 6 255 0 0 \\* }"
send "10
9
7 46 6 0 100 1\n"
simple_expect "=10
9
7 1 { $any_time 6 255 0 0 \\* }"
# gazonk does get-membership of foo. Should return 1 { 6 }.
send "10
74
108 6 0 100 1 0\n"
simple_expect "=10
74
1 { 0 $any_time 6 255 0 \\* 6 $any_time 00000000 }"
send "10
98
108 6 0 100 1 0\n"
simple_expect "=10
98
1 { 0 $any_time 6 255 0 \\* 6 $any_time 00000000 }"
# gazonk does query-read-texts-10 on foo and 10, 11 and 12. All should fail.
send "10
76
98 6 10\n"
simple_expect "%10
76
9 10"
send "1
077
98 6 11\n"
simple_expect "%1
077
13 11"
send "1
078
98 6 12\n"
simple_expect "%1
078
13 12"
send "10
99
98 6 10\n"
simple_expect "%10
99
9 10"
send "1
100
98 6 11\n"
simple_expect "%1
100
13 11"
send "1
101
98 6 12\n"
simple_expect "%1
101
13 12"
# gazonk does query-read-texts-old on foo and 10, 11 and 12. All should fail.
send "1
079
9 6 10\n"
simple_expect "%1
079
9 10"
send "1
080
9 6 11\n"
simple_expect "%1
080
13 11"
send "1
081
9 6 12\n"
simple_expect "%1
081
13 12"
send "1
102
9 6 10\n"
simple_expect "%1
102
9 10"
send "1
103
9 6 11\n"
simple_expect "%1
103
13 11"
send "1
104
9 6 12\n"
simple_expect "%1
104
13 12"
# gazonk does query-read-texts on foo and 10, 11 and 12. All should fail.
send "1
076
107 6 10 1 0\n"
simple_expect "%1
076
9 10"
send "1
077
107 6 11 1 0\n"
simple_expect "%1
077
13 11"
send "107
8
107 6 12 1 0\n"
simple_expect "%107
8
13 12"
send "1
105
107 6 10 1 0\n"
simple_expect "%1
105
9 10"
send "1
106
107 6 11 1 0\n"
simple_expect "%1
106
13 11"
send "
1
107 107 6 12 1 0\n"
simple_expect "%
1
107 13 12"
#
# gazonk examines bar
#
# gazonk does get-unread-confs of bar. Should return undefined-person.
send "108
2
52 7\n"
good_bad_expect "%108
2
10 7" "=0 \\*" "Bug 37"
send "
1
108 52 7\n"
good_bad_expect "%
1
108 10 7" "=0 \\*" "Bug 37"
# gazonk does get-membership-10 of bar. Should return undefined-person.
send "1
083
99 7 0 100 1\n"
simple_expect "%1
083
10 7"
send "1
109
99 7 0 100 1\n"
simple_expect "%1
109
10 7"
# gazonk does get-membership-old of bar. Should return undefined-person.
send "1
084
46 7 0 100 1\n"
simple_expect "%1
084
10 7"
send "1
110
46 7 0 100 1\n"
simple_expect "%1
110
10 7"
# gazonk does get-membership of bar. Should return undefined-person.
send "1
083
108 7 0 100 1 0\n"
simple_expect "%1
083
10 7"
send "1
111
108 7 0 100 1 0\n"
simple_expect "%1
111
10 7"
# gazonk does query-read-texts-10 on bar and 10, 11 and 12. undefined-person.
send "1
085
98 7 10\n"
simple_expect "%1
085
10 7"
send "1
086
98 7 11\n"
simple_expect "%1
086
10 7"
send "1
087
98 7 12\n"
simple_expect "%1
087
10 7"
send "1
112
98 7 10\n"
simple_expect "%1
112
10 7"
send "1
113
98 7 11\n"
simple_expect "%1
113
10 7"
send "1
114
98 7 12\n"
simple_expect "%1
114
10 7"
# gazonk does query-read-texts-old on bar and 10, 11 and 12. undefined-person.
send "1
088
9 7 10\n"
simple_expect "%1
088
10 7"
send "1
089
9 7 11\n"
simple_expect "%1
089
10 7"
send "1
090
9 7 12\n"
simple_expect "%1
090
10 7"
send "1
115
9 7 10\n"
simple_expect "%1
115
10 7"
send "1
116
9 7 11\n"
simple_expect "%1
116
10 7"
send "1
117
9 7 12\n"
simple_expect "%1
117
10 7"
# gazonk does query-read-texts on bar and 10, 11 and 12. undefined-person.
send "1
085
107 7 10 1 0\n"
simple_expect "%1
085
10 7"
send "1
086
107 7 11 1 0\n"
simple_expect "%1
086
10 7"
send "1
087
107 7 12 1 0\n"
simple_expect "%1
087
10 7"
send "1
118
107 7 10 1 0\n"
simple_expect "%1
118
10 7"
send "1
119
107 7 11 1 0\n"
simple_expect "%1
119
10 7"
send "1
120
107 7 12 1 0\n"
simple_expect "%1
120
10 7"
#
# gazonk examines citrus.
#
# gazonk does get-unread-confs of citrus. Should return the empty list.
send "1
09
1 52 8\n"
simple_expect "=1
09
1 0 \\*"
send "1
12
1 52 8\n"
simple_expect "=1
12
1 0 \\*"
# gazonk does get-membership-10 of citrus. Should return 1 { 6 }.
send "1
09
2 99 8 0 100 1\n"
simple_expect "=1
09
2 1 { 0 $any_time 8 255 0 0 \\* 8 $any_time 00000000 }"
send "1
12
2 99 8 0 100 1\n"
simple_expect "=1
12
2 1 { 0 $any_time 8 255 0 0 \\* 8 $any_time 00000000 }"
# gazonk does get-membership-old of citrus. Should return 1 { 6 }.
send "1
09
3 46 8 0 100 1\n"
simple_expect "=1
09
3 1 { $any_time 8 255 0 0 \\* }"
send "1
12
3 46 8 0 100 1\n"
simple_expect "=1
12
3 1 { $any_time 8 255 0 0 \\* }"
# gazonk does get-membership of citrus. Should return 1 { 6 }.
send "1
092
108 8 0 100 1 0\n"
simple_expect "=1
092
1 { 0 $any_time 8 255 0 \\* 8 $any_time 00000000 }"
send "1
124
108 8 0 100 1 0\n"
simple_expect "=1
124
1 { 0 $any_time 8 255 0 \\* 8 $any_time 00000000 }"
# gazonk does query-read-texts-10 on citrus and 10, 11 and 12. All fails.
send "1
094
98 8 10\n"
simple_expect "%1
094
9 10"
send "1
095
98 8 11\n"
simple_expect "%1
095
13 11"
send "1
096
98 8 12\n"
simple_expect "%1
096
13 12"
send "1
125
98 8 10\n"
simple_expect "%1
125
9 10"
send "1
126
98 8 11\n"
simple_expect "%1
126
13 11"
send "1
127
98 8 12\n"
simple_expect "%1
127
13 12"
# gazonk does query-read-texts-old on citrus and 10, 11 and 12. All fails.
send "1
097
9 8 10\n"
simple_expect "%1
097
9 10"
send "1
098
9 8 11\n"
simple_expect "%1
098
13 11"
send "1
099
9 8 12\n"
simple_expect "%1
099
13 12"
send "1
128
9 8 10\n"
simple_expect "%1
128
9 10"
send "1
129
9 8 11\n"
simple_expect "%1
129
13 11"
send "1
130
9 8 12\n"
simple_expect "%1
130
13 12"
# gazonk does query-read-texts on citrus and 10, 11 and 12. All should fail.
send "1
094
107 8 10 1 0\n"
simple_expect "%1
094
9 10"
send "1
095
107 8 11 1 0\n"
simple_expect "%1
095
13 11"
send "1
096
107 8 12 1 0\n"
simple_expect "%1
096
13 12"
send "1
131
107 8 10 1 0\n"
simple_expect "%1
131
9 10"
send "1
132
107 8 11 1 0\n"
simple_expect "%1
132
13 11"
send "1
133
107 8 12 1 0\n"
simple_expect "%1
133
13 12"
#
...
...
@@ -521,30 +521,30 @@ simple_expect "%1096 13 12"
# foo marks the text as read
talk_to client 0
send "11
00
27 10 1 { 1 }\n"
simple_expect "=11
00
"
send "11
01
27 11 1 { 1 }\n"
simple_expect "=11
01
"
send "11
02
27 12 1 { 1 }\n"
simple_expect "=11
02
"
send "11
34
27 10 1 { 1 }\n"
simple_expect "=11
34
"
send "11
35
27 11 1 { 1 }\n"
simple_expect "=11
35
"
send "11
36
27 12 1 { 1 }\n"
simple_expect "=11
36
"
# bar marks the text as read
talk_to client 1
send "11
0
3 27 10 1 { 1 }\n"
simple_expect "=11
0
3"
send "11
04
27 11 1 { 1 }\n"
simple_expect "=11
04
"
send "11
05
27 12 1 { 1 }\n"
simple_expect "=11
05
"
send "113
7
27 10 1 { 1 }\n"
simple_expect "=113
7
"
send "11
38
27 11 1 { 1 }\n"
simple_expect "=11
38
"
send "11
39
27 12 1 { 1 }\n"
simple_expect "=11
39
"
# citrus marks the text as read
talk_to client 2
send "110
6
27 10 1 { 1 }\n"
simple_expect "=110
6
"
send "11
07
27 11 1 { 1 }\n"
simple_expect "=11
07
"
send "11
08
27 12 1 { 1 }\n"
simple_expect "=11
08
"
send "11
4
0 27 10 1 { 1 }\n"
simple_expect "=11
4
0"
send "11
41
27 11 1 { 1 }\n"
simple_expect "=11
41
"
send "11
42
27 12 1 { 1 }\n"
simple_expect "=11
42
"
#
# foo examines foo.
...
...
@@ -553,44 +553,44 @@ simple_expect "=1108"
talk_to client 0
# foo does get-unread-confs of foo. Should return the empty list.
send "11
09
52 6\n"
