Commit 8c9c2a96 authored by Per Cederqvist's avatar Per Cederqvist
Browse files

Many bugs fixed.

parent a92c9158
......@@ -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
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