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

Test call 30-45.

parent ed9fd039
...@@ -3,7 +3,7 @@ ...@@ -3,7 +3,7 @@
# The following objects are created in this test case: # The following objects are created in this test case:
# Conferences # Conferences
# 7 "(So called) Christian Music", later "PRIMa musik" # 7 "(So called) Christian Music", later "PRIMa musik"
# 9 "Temporary Sancturay" # 9 "Temporary Sancturay" (immediately deleted)
# Persons # Persons
# 6 "Per Cederqvist" # 6 "Per Cederqvist"
# Member of 7. # Member of 7.
...@@ -11,8 +11,8 @@ ...@@ -11,8 +11,8 @@
# Member of 7. # Member of 7.
# Texts # Texts
# 1 "Old-style text 1" 0 7 6 1 # 1 "Old-style text 1" 0 7 6 1
# 2 "Old-style text 2" 0 7 6 2 # 2 "Old-style text 2" 0 7 6 2 (deleted at call 28)
# 3 "Old-style text 3" 0 7 6 3 # 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 # 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 # 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 # 6 "New-style text 6" 0 7 6 6; 15 8 6 1
...@@ -22,7 +22,8 @@ ...@@ -22,7 +22,8 @@
# or set_client_version or any other new and fancy stuff. # or set_client_version or any other new and fancy stuff.
# 1 logged in as person 8; all available asyncs; uses user_active; # 1 logged in as person 8; all available asyncs; uses user_active;
# calls set_client_version("dgt03", "sc 1"). # 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. # Default asyncs; does not us user_active or set_client_version.
read_versions read_versions
...@@ -589,49 +590,146 @@ simple_expect "=1167 $any_time 7 100 6 0 \\*" ...@@ -589,49 +590,146 @@ simple_expect "=1167 $any_time 7 100 6 0 \\*"
# call 28 is tested above # call 28 is tested above
# test call 29 (delete-text) # test call 29 (delete-text)
send "1168 29 2\n" send "1168 98 6 7\n"
# FIXME: why no async message here? simple_expect "=1168 .*"
# simple_expect ":18 14 2 $any_time 6 0 16 1 2 { 0 7 6 2 } 0 \\*" send "1169 29 2\n"
simple_expect "=1168" # No new'n'fancy async message here.
simple_expect "=1169"
talk_to client 1 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 \\*" simple_expect ":18 14 2 $any_time 6 0 16 1 2 { 0 7 6 2 } 0 \\*"
talk_to client 0 talk_to client 0
send "1169 40 7 6\n" send "1170 40 7 6\n"
simple_expect "=1169" simple_expect "=1170"
send "1170 9 6 7\n" send "1171 9 6 7\n"
simple_expect "=1170 $any_time 7 100 0 0 \\*" simple_expect "=1171 $any_time 7 100 0 0 \\*"
send "1171 27 7 1 { 1 }\n" send "1172 27 7 1 { 1 }\n"
simple_expect "=1171" simple_expect "=1172"
send "1172 9 6 7\n" send "1173 9 6 7\n"
simple_expect "=1172 $any_time 7 100 2 0 \\*" simple_expect "=1173 $any_time 7 100 2 0 \\*"
# FIXME: test call 30 # test call 30 (add-recipient)
# FIXME: test call 31 send "1174 30 3 2 0\n"
# FIXME: test call 32 simple_expect "=1174"
# FIXME: test call 33 send "1175 26 3\n"
# FIXME: test call 34 # This is marked since text 3 is presentation of conf 7.
# FIXME: test call 35 simple_expect "=1175 $any_time 6 0 16 1 5 { 0 7 6 3 0 2 6 1 9 $any_time }"
# FIXME: test call 36
# FIXME: test call 37 # test call 31 (sub-recipient)
# FIXME: test call 38 send "1176 31 3 2\n"
# FIXME: test call 39 simple_expect "=1176"
# call 40 is tested above send "1177 26 3\n"
# FIXME: test call 41 # This is marked since text 3 is presentation of conf 7.
# FIXME: test call 42 simple_expect "=1177 $any_time 6 0 16 1 2 { 0 7 6 3 }"
# FIXME: test call 43
# FIXME: test call 44 # test call 32 (add-comment)
# FIXME: test call 45 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 46
# FIXME: test call 47 # FIXME: test call 47
# FIXME: test call 48 # FIXME: test call 48
# FIXME: test call 49 # FIXME: test call 49
# test call 50 (get-conf-stat-old) # test call 50 (get-conf-stat-old)
send "1173 50 7\n" send "1203 50 7\n"
simple_expect "=1173 [holl "PRIMa musik"] 0100 $any_time $any_time 6 3 7 8 4 2 144 2 1 6" 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 51
# FIXME: test call 52 # FIXME: test call 52
# FIXME: test call 53 # 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 ...@@ -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 76
# FIXME: test call 77 # FIXME: test call 77
# test call 78 (get-uconf-stat) # test call 78 (get-uconf-stat)
send "1174 78 7\n" send "1204 78 7\n"
simple_expect "=1174 [holl "PRIMa musik"] 01001000 6 144" simple_expect "=1204 [holl "PRIMa musik"] 01001000 6 144"
# FIXME: test call 79 # FIXME: test call 79
# call 80 is tested during startup of client 1. # call 80 is tested during startup of client 1.
...@@ -691,32 +789,32 @@ simple_expect "=1174 [holl "PRIMa musik"] 01001000 6 144" ...@@ -691,32 +789,32 @@ simple_expect "=1174 [holl "PRIMa musik"] 01001000 6 144"
# FIXME: test call 104 # FIXME: test call 104
# There is no call 105--yet. # There is no call 105--yet.
send "1175 105\n" send "1205 105\n"
simple_expect "%1175 2 0" simple_expect "%1205 2 0"
# There is no call 106--yet. # There is no call 106--yet.
send "1176 106\n" send "1206 106\n"
simple_expect "%1176 2 0" simple_expect "%1206 2 0"
# There is no call 107--yet. # There is no call 107--yet.
send "1177 107\n" send "1207 107\n"
simple_expect "%1177 2 0" simple_expect "%1207 2 0"
# There is no call 108--yet. # There is no call 108--yet.
send "1178 108\n" send "1208 108\n"
simple_expect "%1178 2 0" simple_expect "%1208 2 0"
# There is no call 109--yet. # There is no call 109--yet.
send "1179 109\n" send "1209 109\n"
simple_expect "%1179 2 0" simple_expect "%1209 2 0"
# There is no call 110--yet. # There is no call 110--yet.
send "1180 110\n" send "1210 110\n"
simple_expect "%1180 2 0" simple_expect "%1210 2 0"
talk_to client 1 talk_to client 1
send "1181 55 2\n" send "1211 55 2\n"
simple_expect "=1181" simple_expect "=1211"
simple_expect ":2 13 8 2" simple_expect ":2 13 8 2"
client_death 1 client_death 1
...@@ -724,15 +822,15 @@ client_death 1 ...@@ -724,15 +822,15 @@ client_death 1
talk_to client 0 talk_to client 0
simple_expect ":2 13 8 2" 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 13 6 1"
simple_expect ":2 9 5 1" simple_expect ":2 9 5 1"
simple_expect "=1182" simple_expect "=1212"
send "1183 42 255\n" send "1213 42 255\n"
simple_expect "=1183" "42=enable succeeded" simple_expect "=1213" "42=enable succeeded"
send "1184 44 0\n" send "1214 44 0\n"
simple_expect "=1184" "44=shutdown-kom succeeded" simple_expect "=1214" "44=shutdown-kom succeeded"
simple_expect ":2 13 5 1" simple_expect ":2 13 5 1"
client_death 0 client_death 0
# FIXME: There are enqueued logout/disconnect messages to this client. # 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