Skip to content
GitLab
Projects
Groups
Snippets
Help
Loading...
Help
What's new
10
Help
Support
Community forum
Keyboard shortcuts
?
Submit feedback
Contribute to GitLab
Sign in / Register
Toggle navigation
Open sidebar
Per Cederqvist
lyskom-server-ceder-1616-generations-topgit
Commits
8c2802e0
Commit
8c2802e0
authored
May 30, 1999
by
Per Cederqvist
Browse files
Options
Browse Files
Download
Email Patches
Plain Diff
This test now causes lyskomd to dump core while garbing texts.
parent
4643b8d1
Changes
1
Hide whitespace changes
Inline
Side-by-side
Showing
1 changed file
with
144 additions
and
23 deletions
+144
-23
src/server/testsuite/lyskomd.0/09.exp
src/server/testsuite/lyskomd.0/09.exp
+144
-23
No files found.
src/server/testsuite/lyskomd.0/09.exp
View file @
8c2802e0
...
...
@@ -254,22 +254,22 @@ simple_expect "=1020"
set tno 6
send "1021 86 [holl "text 5"] 2 { 0 7 0 9 } 2 { 20000 00100000 1 [holl "priv"] 20001 00000000 1 [holl "pub"] }\n"
extracting_expect ":16 0 $tno ($any_time) 6 0 6 0 4 { 0 7 6 6 0 9 6 2 }" time_
5
1
simple_expect ":18 15 $tno $time_
5
6 0 6 0 4 { 0 7 6 6 0 9 6 2 } 2 { 1 20000 6 $time_
5
00100000 1 [holl "priv"] 2 20001 6 $time_
5
00000000 1 [holl "pub"] }"
extracting_expect ":16 0 $tno ($any_time) 6 0 6 0 4 { 0 7 6 6 0 9 6 2 }" time_
6
1
simple_expect ":18 15 $tno $time_
6
6 0 6 0 4 { 0 7 6 6 0 9 6 2 } 2 { 1 20000 6 $time_
6
00100000 1 [holl "priv"] 2 20001 6 $time_
6
00000000 1 [holl "pub"] }"
talk_to client 0
# FIXME: the secret information is filtered away even though it
# shouldn't be.
#simple_expect ":16 0 $tno $time_
5
6 0 6 0 4 { 0 7 6 6 0 9 6 2 }"
#simple_expect ":18 15 $tno $time_
5
6 0 6 0 4 { 0 7 6 6 0 9 6 2 } 2 { 1 20000 5 $time_
5
00100000 1 [holl "priv"] 2 20001 5 $time_
5
00000000 1 [holl "pub"] }"
simple_expect ":16 0 $tno $time_
5
6 0 6 0 2 { 0 7 6 6 }"
simple_expect ":18 15 $tno $time_
5
6 0 6 0 2 { 0 7 6 6 } 1 { 2 20001 6 $time_
5
00000000 1 [holl "pub"] }"
#simple_expect ":16 0 $tno $time_
6
6 0 6 0 4 { 0 7 6 6 0 9 6 2 }"
#simple_expect ":18 15 $tno $time_
6
6 0 6 0 4 { 0 7 6 6 0 9 6 2 } 2 { 1 20000 5 $time_
6
00100000 1 [holl "priv"] 2 20001 5 $time_
6
00000000 1 [holl "pub"] }"
simple_expect ":16 0 $tno $time_
6
6 0 6 0 2 { 0 7 6 6 }"
simple_expect ":18 15 $tno $time_
6
6 0 6 0 2 { 0 7 6 6 } 1 { 2 20001 6 $time_
6
00000000 1 [holl "pub"] }"
setup_xfail "*"
fail "text 5: secret info not filtered for the admin"
talk_to client 1
simple_expect ":16 0 $tno $time_
5
6 0 6 0 2 { 0 7 6 6 }"
simple_expect ":18 15 $tno $time_
5
6 0 6 0 2 { 0 7 6 6 } 1 { 2 20001 6 $time_
5
00000000 1 [holl "pub"] }"
simple_expect ":16 0 $tno $time_
6
6 0 6 0 2 { 0 7 6 6 }"
simple_expect ":18 15 $tno $time_
6
6 0 6 0 2 { 0 7 6 6 } 1 { 2 20001 6 $time_
6
00000000 1 [holl "pub"] }"
talk_to client 2
simple_expect "=1021 $tno"
...
...
@@ -294,6 +294,8 @@ talk_to client 2
send "1026 35\n"
simple_expect "=1026 $any_time"
} else {
unsupported "testing the garb -- use configure --with-debug-calls to enable"
}
# Delete text 1
...
...
@@ -332,38 +334,157 @@ talk_to client 0
simple_expect "=1027"
# Delete text 3
talk_to client 1
send "1028 29 3\n"
simple_expect ":18 14 3 $time_3 5 0 6 0 6 { 0 7 6 3 0 8 6 3 15 6 6 3 } 2 { 1 20000 5 $time_3 00100000 1 [holl "priv"] 2 20001 5 $time_3 00000000 1 [holl "pub"] }"
# Run the garb once.
simple_expect ":3 17 3 7 0"
simple_expect ":3 17 3 8 0"
setup_xfail "*"
fail "Text 3: client 1: async-sub-recipient sent after async-deleted-text"
talk_to client 0
simple_expect ":18 14 3 $time_3 5 0 6 0 6 { 0 7 6 3 0 8 6 3 15 6 6 3 } 2 { 1 20000 5 $time_3 00100000 1 [holl "priv"] 2 20001 5 $time_3 00000000 1 [holl "pub"] }"
simple_expect ":3 17 3 7 0"
simple_expect ":3 17 3 8 0"
setup_xfail "*"
fail "Text 3: client 0: async-sub-recipient sent after async-deleted-text"
talk_to client 2
simple_expect ":18 14 3 $time_3 5 0 6 0 4 { 0 7 6 3 15 6 6 3 } 1 { 2 20001 5 $time_3 00000000 1 [holl "pub"] }"
simple_expect ":3 17 3 7 0"
simple_expect ":3 17 3 8 0"
simple_expect ":3 17 3 6 15"
setup_xfail "*"
fail "Text 3: client 2: async-sub-recipient sent after async-deleted-text"
talk_to client 1
simple_expect "=1028"
# Delete text 5
talk_to client 2
send "1029 29 5\n"
simple_expect ":18 14 5 $time_5 6 0 6 0 4 { 0 7 6 5 0 9 6 1 } 2 { 1 20000 6 $time_5 00100000 1 [holl "priv"] 2 20001 6 $time_5 00000000 1 [holl "pub"] }"
simple_expect ":3 17 5 7 0"
simple_expect ":3 17 5 9 0"
setup_xfail "*"
fail "Text 5: client 2: async-sub-recipient sent after async-deleted-text"
talk_to client 0
setup_xfail "*"
fail "text 5; client 0; censored too much"
simple_expect ":18 14 5 $time_5 6 0 6 0 2 { 0 7 6 5 } 1 { 2 20001 6 $time_5 00000000 1 [holl "pub"] }"
# FIXME: this is the proper data. We are enabled and have privileges.
# simple_expect ":18 14 5 $time_5 6 0 6 0 4 { 0 7 6 5 0 9 6 1 } 2 { 1 20000 6 $time_5 00100000 1 [holl "priv"] 2 20001 6 $time_5 00000000 1 [holl "pub"] }"
simple_expect ":3 17 5 7 0"
setup_xfail "*"
fail "Text 5: client 0: async-sub-recipient sent after async-deleted-text"
talk_to client 1
simple_expect ":18 14 5 $time_5 6 0 6 0 2 { 0 7 6 5 } 1 { 2 20001 6 $time_5 00000000 1 [holl "pub"] }"
simple_expect ":3 17 5 7 0"
setup_xfail "*"
fail "Text 5: client 1: async-sub-recipient sent after async-deleted-text"
talk_to client 2
simple_expect "=1029"
if {$debug_calls} {
# Run the garb. Nothing is deleted.
talk_to client 0
send "10
28
1003\n"
simple_expect "=10
28
"
send "10
30
1003\n"
simple_expect "=10
30
"
simple_expect ":1 1000 0"
# check that no async messages were produced
send "1029 35\n"
simple_expect "=1029 $any_time"
talk_to client 1
send "1030 35\n"
simple_expect "=1030 $any_time"
talk_to client 2
send "1031 35\n"
simple_expect "=1031 $any_time"
talk_to client 1
send "1032 35\n"
simple_expect "=1032 $any_time"
talk_to client 2
send "1033 35\n"
simple_expect "=1033 $any_time"
# Backdate texts 76 days.
talk_to client 0
send "1034 1002 2 [expr {76 * 24 * 3600}]\n"
simple_expect "=1034"
send "1035 1002 4 [expr {76 * 24 * 3600}]\n"
simple_expect "=1035"
send "1036 1002 6 [expr {76 * 24 * 3600}]\n"
simple_expect "=1036"
# Run the garb again. Nothing is deleted.
talk_to client 0
send "1037 1003\n"
simple_expect "=1037"
simple_expect ":1 1000 0"
# check that no async messages were produced
send "1038 35\n"
simple_expect "=1038 $any_time"
talk_to client 1
send "1039 35\n"
simple_expect "=1039 $any_time"
talk_to client 2
send "1040 35\n"
simple_expect "=1040 $any_time"
# Backdate texts 2 more days.
talk_to client 0
send "1041 1002 2 [expr {2 * 24 * 3600}]\n"
simple_expect "=1041"
send "1042 1002 4 [expr {2 * 24 * 3600}]\n"
simple_expect "=1042"
send "1043 1002 6 [expr {2 * 24 * 3600}]\n"
simple_expect "=1043"
# Run the garb -- all three texts should be removed
talk_to client 0
send "1044 1003\n"
simple_expect "=1044"
# FIXME: async for deletion of text 2
# FIXME: async for deletion of text 4
# FIXME: async for deletion of text 6
# Garb ends.
simple_expect ":1 1000 3"
# check that no other async messages were produced
send "1045 35\n"
simple_expect "=1045 $any_time"
talk_to client 1
send "1046 35\n"
simple_expect "=1046 $any_time"
talk_to client 2
send "1047 35\n"
simple_expect "=1047 $any_time"
}
# FIXME: backdate texts 76 days.
# FIXME: run the garb -- nothing should happen
# FIXME: backdate texts 2 days.
# FIXME: run the garb -- three texts should be removed
# Shut down the server.
talk_to client 0
send "10
32
44 0\n"
simple_expect "=10
32
"
send "10
48
44 0\n"
simple_expect "=10
48
"
client_death 0
client_death 1
client_death 2
lyskomd_death
Write
Preview
Markdown
is supported
0%
Try again
or
attach a new file
.
Attach a file
Cancel
You are about to add
0
people
to the discussion. Proceed with caution.
Finish editing this message first!
Cancel
Please
register
or
sign in
to comment