Skip to content
GitLab
Projects
Groups
Snippets
Help
Loading...
Help
What's new
7
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
621bfa5c
Commit
621bfa5c
authored
Oct 17, 1998
by
Per Cederqvist
Browse files
Options
Browse Files
Download
Email Patches
Plain Diff
Test call 30-45.
parent
ed9fd039
Changes
1
Hide whitespace changes
Inline
Side-by-side
Showing
1 changed file
with
157 additions
and
59 deletions
+157
-59
src/server/testsuite/lyskomd.0/03.exp
src/server/testsuite/lyskomd.0/03.exp
+157
-59
No files found.
src/server/testsuite/lyskomd.0/03.exp
View file @
621bfa5c
...
...
@@ -3,7 +3,7 @@
# The following objects are created in this test case:
# Conferences
# 7 "(So called) Christian Music", later "PRIMa musik"
# 9 "Temporary Sancturay"
# 9 "Temporary Sancturay"
(immediately deleted)
# Persons
# 6 "Per Cederqvist"
# Member of 7.
...
...
@@ -11,8 +11,8 @@
# Member of 7.
# Texts
# 1 "Old-style text 1" 0 7 6 1
# 2 "Old-style text 2" 0 7 6 2
# 3 "Old-style text 3" 0 7 6 3
# 2 "Old-style text 2" 0 7 6 2
(deleted at call 28)
# 3 "Old-style text 3" 0 7 6 3
(; 0 2 6 1 at call 29)
# 4 "New-style text 4" 0 7 6 4; 15 6 6 1
# 5 "New-style text 5" 0 7 6 5; 15 6 6 2
# 6 "New-style text 6" 0 7 6 6; 15 8 6 1
...
...
@@ -22,7 +22,8 @@
# or set_client_version or any other new and fancy stuff.
# 1 logged in as person 8; all available asyncs; uses user_active;
# calls set_client_version("dgt03", "sc 1").
# 2 logged in as person 8 for brief moments. Mostly not logged in.
# 2 logged in as person 8 for brief moments. Logged in invisibly
# as person 5 from the testing of call 8 and onwards.
# Default asyncs; does not us user_active or set_client_version.
read_versions
...
...
@@ -589,49 +590,146 @@ simple_expect "=1167 $any_time 7 100 6 0 \\*"
# call 28 is tested above
# test call 29 (delete-text)
send "1168 29 2\n"
# FIXME: why no async message here?
# simple_expect ":18 14 2 $any_time 6 0 16 1 2 { 0 7 6 2 } 0 \\*"
simple_expect "=1168"
send "1168 98 6 7\n"
simple_expect "=1168 .*"
send "1169 29 2\n"
# No new'n'fancy async message here.
simple_expect "=1169"
talk_to client 1
#
FIXME: why is t
he text marked
?
#
T
he text
is
marked
since it is motd of conference 7.
simple_expect ":18 14 2 $any_time 6 0 16 1 2 { 0 7 6 2 } 0 \\*"
talk_to client 0
send "1169 40 7 6\n"
simple_expect "=1169"
send "1170 9 6 7\n"
simple_expect "=1170 $any_time 7 100 0 0 \\*"
send "1171 27 7 1 { 1 }\n"
simple_expect "=1171"
send "1172 9 6 7\n"
simple_expect "=1172 $any_time 7 100 2 0 \\*"
# FIXME: test call 30
# FIXME: test call 31
# FIXME: test call 32
# FIXME: test call 33
# FIXME: test call 34
# FIXME: test call 35
# FIXME: test call 36
# FIXME: test call 37
# FIXME: test call 38
# FIXME: test call 39
# call 40 is tested above
# FIXME: test call 41
# FIXME: test call 42
# FIXME: test call 43
# FIXME: test call 44
# FIXME: test call 45
send "1170 40 7 6\n"
simple_expect "=1170"
send "1171 9 6 7\n"
simple_expect "=1171 $any_time 7 100 0 0 \\*"
send "1172 27 7 1 { 1 }\n"
simple_expect "=1172"
send "1173 9 6 7\n"
simple_expect "=1173 $any_time 7 100 2 0 \\*"
# test call 30 (add-recipient)
send "1174 30 3 2 0\n"
simple_expect "=1174"
send "1175 26 3\n"
# This is marked since text 3 is presentation of conf 7.
simple_expect "=1175 $any_time 6 0 16 1 5 { 0 7 6 3 0 2 6 1 9 $any_time }"
# test call 31 (sub-recipient)
send "1176 31 3 2\n"
simple_expect "=1176"
send "1177 26 3\n"
# This is marked since text 3 is presentation of conf 7.
simple_expect "=1177 $any_time 6 0 16 1 2 { 0 7 6 3 }"
# test call 32 (add-comment)
send "1178 32 3 1\n"
simple_expect "=1178"
send "1179 26 3\n"
# This is marked since text 3 is presentation of conf 7.
simple_expect "=1179 $any_time 6 0 16 1 4 { 0 7 6 3 2 1 9 $any_time }"
send "1180 26 1\n"
simple_expect "=1180 $any_time 6 0 16 0 3 { 0 7 6 1 3 3 }"
# test call 33 (sub-comment)
send "1181 33 3 1\n"
simple_expect "=1181"
send "1182 26 3\n"
# This is marked since text 3 is presentation of conf 7.
simple_expect "=1182 $any_time 6 0 16 1 2 { 0 7 6 3 }"
send "1183 26 1\n"
simple_expect "=1183 $any_time 6 0 16 0 2 { 0 7 6 1 }"
# test call 34 (get-map)
send "1184 34 7 1 50\n"
simple_expect "=1184 1 6 { 1 0 3 4 5 6 }"
# test call 35 (get-time)
send "1185 35\n"
simple_expect "=1185 $any_time"
# test call 36 (get-info-old)
send "1186 36\n"
simple_expect "=1186 $server_compat_version 1 2 3 4 0"
# test call 37 (add-footnote)
send "1187 37 3 1\n"
simple_expect "=1187"
send "1188 26 3\n"
# This is marked since text 3 is presentation of conf 7.
simple_expect "=1188 $any_time 6 0 16 1 4 { 0 7 6 3 4 1 9 $any_time }"
send "1189 26 1\n"
simple_expect "=1189 $any_time 6 0 16 0 3 { 0 7 6 1 5 3 }"
# test call 38 (sub-footnote)
send "1190 38 3 1\n"
simple_expect "=1190"
send "1191 26 3\n"
# This is marked since text 3 is presentation of conf 7.
simple_expect "=1191 $any_time 6 0 16 1 2 { 0 7 6 3 }"
send "1192 26 1\n"
simple_expect "=1192 $any_time 6 0 16 0 2 { 0 7 6 1 }"
# test call 39 (who-is-on-old)
send "1193 39\n"
simple_expect "=1193 2 { 8 0 [holl "Accepting i-am-on"] 6 6 [holl "Running a test suite"] }"
# call 40 (set-unread) is tested above
# test call 41 (set-motd-of-lyskom)
talk_to client 2
send "1194 42 255\n"
simple_expect "=1194"
send "1195 41 7\n"
simple_expect "=1195"
send "1196 42 0\n"
simple_expect "=1196"
send "1197 36\n"
simple_expect "=1197 $server_compat_version 1 2 3 4 7"
# call 42 (enable) is tested above
# test call 43 (sync-kom)
send "1198 43\n"
simple_expect "%1198 12 0"
send "1199 42 255\n"
simple_expect "=1199"
send "1200 43\n"
simple_expect ":0 7"
simple_expect ":0 7"
simple_expect "=1200"
talk_to client 0
simple_expect ":0 7"
simple_expect ":0 7"
talk_to client 1
simple_expect ":0 7"
simple_expect ":0 7"
talk_to client 2
send "1201 42 0\n"
simple_expect "=1201"
# test call 44 (shutdown-kom) is tested below
# test call 45 (broadcast)
send "1202 45 [holl "a broadcast message"]\n"
simple_expect ":3 12 0 5 [holl "a broadcast message"]"
simple_expect "=1202"
talk_to client 1
simple_expect ":3 12 0 5 [holl "a broadcast message"]"
talk_to client 0
simple_expect ":3 12 0 5 [holl "a broadcast message"]"
# FIXME: test call 46
# FIXME: test call 47
# FIXME: test call 48
# FIXME: test call 49
# test call 50 (get-conf-stat-old)
send "1
17
3 50 7\n"
simple_expect "=1
17
3 [holl "PRIMa musik"] 0100 $any_time $any_time 6 3 7 8 4 2 144 2 1 6"
send "1
20
3 50 7\n"
simple_expect "=1
20
3 [holl "PRIMa musik"] 0100 $any_time $any_time 6 3 7 8 4 2 144 2 1 6"
# FIXME: test call 51
# FIXME: test call 52
# FIXME: test call 53
...
...
@@ -660,8 +758,8 @@ simple_expect "=1173 [holl "PRIMa musik"] 0100 $any_time $any_time 6 3 7 8 4 2 1
# FIXME: test call 76
# FIXME: test call 77
# test call 78 (get-uconf-stat)
send "1
17
4 78 7\n"
simple_expect "=1
17
4 [holl "PRIMa musik"] 01001000 6 144"
send "1
20
4 78 7\n"
simple_expect "=1
20
4 [holl "PRIMa musik"] 01001000 6 144"
# FIXME: test call 79
# call 80 is tested during startup of client 1.
...
...
@@ -691,32 +789,32 @@ simple_expect "=1174 [holl "PRIMa musik"] 01001000 6 144"
# FIXME: test call 104
# There is no call 105--yet.
send "1
17
5 105\n"
simple_expect "%1
17
5 2 0"
send "1
20
5 105\n"
simple_expect "%1
20
5 2 0"
# There is no call 106--yet.
send "1
17
6 106\n"
simple_expect "%1
17
6 2 0"
send "1
20
6 106\n"
simple_expect "%1
20
6 2 0"
# There is no call 107--yet.
send "1
17
7 107\n"
simple_expect "%1
17
7 2 0"
send "1
20
7 107\n"
simple_expect "%1
20
7 2 0"
# There is no call 108--yet.
send "1
17
8 108\n"
simple_expect "%1
17
8 2 0"
send "1
20
8 108\n"
simple_expect "%1
20
8 2 0"
# There is no call 109--yet.
send "1
17
9 109\n"
simple_expect "%1
17
9 2 0"
send "1
20
9 109\n"
simple_expect "%1
20
9 2 0"
# There is no call 110--yet.
send "11
8
0 110\n"
simple_expect "%11
8
0 2 0"
send "1
2
10 110\n"
simple_expect "%1
2
10 2 0"
talk_to client 1
send "11
8
1 55 2\n"
simple_expect "=11
8
1"
send "1
2
11 55 2\n"
simple_expect "=1
2
11"
simple_expect ":2 13 8 2"
client_death 1
...
...
@@ -724,15 +822,15 @@ client_death 1
talk_to client 0
simple_expect ":2 13 8 2"
send "11
8
2 62 5 [holl "bar"] 0\n"
send "1
2
12 62 5 [holl "bar"] 0\n"
simple_expect ":2 13 6 1"
simple_expect ":2 9 5 1"
simple_expect "=11
8
2"
simple_expect "=1
2
12"
send "11
8
3 42 255\n"
simple_expect "=11
8
3" "42=enable succeeded"
send "11
8
4 44 0\n"
simple_expect "=11
8
4" "44=shutdown-kom succeeded"
send "1
2
13 42 255\n"
simple_expect "=1
2
13" "42=enable succeeded"
send "1
2
14 44 0\n"
simple_expect "=1
2
14" "44=shutdown-kom succeeded"
simple_expect ":2 13 5 1"
client_death 0
# FIXME: There are enqueued logout/disconnect messages to this client.
...
...
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