Commit 621bfa5c authored by Per Cederqvist's avatar Per Cederqvist

Test call 30-45.

parent ed9fd039
......@@ -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 the text marked?
# The 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 "1173 50 7\n"
simple_expect "=1173 [holl "PRIMa musik"] 0100 $any_time $any_time 6 3 7 8 4 2 144 2 1 6"
send "1203 50 7\n"
simple_expect "=1203 [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 "1174 78 7\n"
simple_expect "=1174 [holl "PRIMa musik"] 01001000 6 144"
send "1204 78 7\n"
simple_expect "=1204 [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 "1175 105\n"
simple_expect "%1175 2 0"
send "1205 105\n"
simple_expect "%1205 2 0"
# There is no call 106--yet.
send "1176 106\n"
simple_expect "%1176 2 0"
send "1206 106\n"
simple_expect "%1206 2 0"
# There is no call 107--yet.
send "1177 107\n"
simple_expect "%1177 2 0"
send "1207 107\n"
simple_expect "%1207 2 0"
# There is no call 108--yet.
send "1178 108\n"
simple_expect "%1178 2 0"
send "1208 108\n"
simple_expect "%1208 2 0"
# There is no call 109--yet.
send "1179 109\n"
simple_expect "%1179 2 0"
send "1209 109\n"
simple_expect "%1209 2 0"
# There is no call 110--yet.
send "1180 110\n"
simple_expect "%1180 2 0"
send "1210 110\n"
simple_expect "%1210 2 0"
talk_to client 1
send "1181 55 2\n"
simple_expect "=1181"
send "1211 55 2\n"
simple_expect "=1211"
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 "1182 62 5 [holl "bar"] 0\n"
send "1212 62 5 [holl "bar"] 0\n"
simple_expect ":2 13 6 1"
simple_expect ":2 9 5 1"
simple_expect "=1182"
simple_expect "=1212"
send "1183 42 255\n"
simple_expect "=1183" "42=enable succeeded"
send "1184 44 0\n"
simple_expect "=1184" "44=shutdown-kom succeeded"
send "1213 42 255\n"
simple_expect "=1213" "42=enable succeeded"
send "1214 44 0\n"
simple_expect "=1214" "44=shutdown-kom succeeded"
simple_expect ":2 13 5 1"
client_death 0
# FIXME: There are enqueued logout/disconnect messages to this client.
......
Markdown is supported
0% or
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment