Skip to content
Snippets Groups Projects
Commit 8c9c2a96 authored by Per Cederqvist's avatar Per Cederqvist
Browse files

Many bugs fixed.

parent a92c9158
No related branches found
No related tags found
No related merge requests found
......@@ -2,64 +2,64 @@ lyskomd_start
client_start 0
send "A3Hfoo\n"
unanchored_expect "^LysKOM$nl" "connected"
simple_expect "LysKOM" "connected"
# Log in
send "0 0 5 [holl gazonk]\n"
unanchored_expect "^:2 9 5 1$nl" "0=login-old caused a login async msg"
unanchored_expect "^=0$nl" "0=login-old succeeded"
send "1000 0 5 [holl gazonk]\n"
simple_expect ":2 9 5 1" "0=login-old caused a login async msg"
simple_expect "=1000" "0=login-old succeeded"
# Become a member of conference 1 using 14=add-member-old
send "93 14 1 5 100 1\n"
unanchored_expect "^=93" "14=add-member-old succeeded"
send "1001 14 1 5 100 1\n"
simple_expect "=1001" "14=add-member-old succeeded"
# Get the map using 34=get-map and 103=local-to-global
send "17 34 1 0 50\n"
unanchored_expect "^%17 17 0$nl" "empty map (old-style 0)"
send "1002 34 1 0 50\n"
simple_expect "=1002 1 0 \\*" "empty map (old-style 0)"
send "0 130 1 0 50\n"
unanchored_expect "^%0 17 17$nl" "empty map (new-style 0)"
send "1003 103 1 0 50\n"
simple_expect "%1003 17 0" "empty map (new-style 0)"
send "17 34 1 1 50\n"
unanchored_expect "^=17 1 0 \\*$nl" "empty map (old-style 1)"
send "1004 34 1 1 50\n"
simple_expect "%1004 16 1" "empty map (old-style 1)"
send "0 130 1 1 50\n"
unanchored_expect "^=0 0 0 0 \\*$nl" "empty map (new-style 1)"
send "1005 103 1 1 50\n"
simple_expect "%1005 16 1" "empty map (new-style 1)"
send "17 34 1 2 50\n"
unanchored_expect "^%17 16 2$nl" "empty map (old-style 2)"
send "1006 34 1 2 50\n"
simple_expect "%1006 16 2" "empty map (old-style 2)"
send "0 130 1 2 50\n"
unanchored_expect "^%0 16 2$nl" "empty map (new-style 2)"
send "1007 103 1 2 50\n"
simple_expect "%1007 16 2" "empty map (new-style 2)"
# Create a text
send "0 28 [holl text0001] 1 { 0 1 }\n"
# FIXME: there should be at least one async message, right?
unanchored_expect "^=0 1"
send "1008 28 [holl text0001] 1 { 0 1 }\n"
simple_expect ":16 0 1 $any_time 5 0 8 0 2 { 0 1 6 1 }" "async text 1 created"
simple_expect "=1008 1" "text 1 created"
# Get the map using 34=get-map and 103=local-to-global
send "17 34 1 0 50\n"
unanchored_expect "^%17 17 0$nl" "one map (old-style 0)"
send "1009 34 1 0 50\n"
simple_expect "=1009 1 1 { 1 }" "one map (old-style 0)"
send "0 130 1 0 50\n"
unanchored_expect "^%17 17 0$nl" "one map (new-style 0)"
send "1010 103 1 0 50\n"
simple_expect "%1010 17 0" "one map (new-style 0)"
send "17 34 1 1 50\n"
unanchored_expect "^=17 1 1 { 1 }$nl" "one map (old-style)"
send "1011 34 1 1 50\n"
simple_expect "=1011 1 1 { 1 }" "one map (old-style)"
send "0 130 1 1 50\n"
unanchored_expect "^=0 0 1 1 1 { 1 }$nl" "one map (new-style)"
send "1012 103 1 1 50\n"
simple_expect "=1012 0 1 1 1 { 1 }" "one map (new-style)"
send "17 34 1 2 50\n"
unanchored_expect "^=17 1 0 \\*$nl" "one map (old-style 2)"
send "1013 34 1 2 50\n"
simple_expect "%1013 16 2" "one map (old-style 2)"
send "0 130 1 2 50\n"
unanchored_expect "^=0 0 0 0 \\*$nl" "one map (new-style 2)"
send "1014 103 1 2 50\n"
simple_expect "%1014 16 2" "one map (new-style 2)"
send "1 42 255\n"
unanchored_expect "^=1$nl" "42=enable succeeded"
send "2 44 0\n"
unanchored_expect "^=2$nl" "44=shutdown-kom succeeded"
unanchored_expect "^:2 13 5 1$nl" "auto-logout after 44=shutdown-kom"
send "1015 42 255\n"
simple_expect "=1015" "42=enable succeeded"
send "1016 44 0\n"
simple_expect "=1016" "44=shutdown-kom succeeded"
simple_expect ":2 13 5 1" "auto-logout after 44=shutdown-kom"
lyskomd_death
0% Loading or .
You are about to add 0 people to the discussion. Proceed with caution.
Please register or to comment