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
a670cef6
Commit
a670cef6
authored
Aug 06, 1998
by
Per Cederqvist
Browse files
Options
Browse Files
Download
Email Patches
Plain Diff
Initial checkin. May contain errors.
parent
ba40ad5e
Changes
1
Hide whitespace changes
Inline
Side-by-side
Showing
1 changed file
with
65 additions
and
0 deletions
+65
-0
src/server/testsuite/lyskomd.0/00.exp
src/server/testsuite/lyskomd.0/00.exp
+65
-0
No files found.
src/server/testsuite/lyskomd.0/00.exp
0 → 100644
View file @
a670cef6
lyskomd_start
client_start 0
send "A3Hfoo\n"
unanchored_expect "^LysKOM$nl" "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"
# 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"
# 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 "0 130 1 0 50\n"
unanchored_expect "^%0 17 17$nl" "empty map (new-style 0)"
send "17 34 1 1 50\n"
unanchored_expect "^=17 1 0 \\*$nl" "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 "17 34 1 2 50\n"
unanchored_expect "^%17 16 2$nl" "empty map (old-style 2)"
send "0 130 1 2 50\n"
unanchored_expect "^%0 16 2$nl" "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"
# 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 "0 130 1 0 50\n"
unanchored_expect "^%17 17 0$nl" "one map (new-style 0)"
send "17 34 1 1 50\n"
unanchored_expect "^=17 1 1 { 1 }$nl" "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 "17 34 1 2 50\n"
unanchored_expect "^=17 1 0 \\*$nl" "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 "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"
lyskomd_death
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