Skip to content
GitLab
Explore
Sign in
Register
Primary navigation
Search or go to…
Project
L
lyskom-server-ceder-1616-generations-topgit
Manage
Activity
Members
Labels
Plan
Issues
Issue boards
Milestones
Wiki
Code
Merge requests
Repository
Branches
Commits
Tags
Repository graph
Compare revisions
Build
Pipelines
Jobs
Pipeline schedules
Artifacts
Deploy
Releases
Model registry
Operate
Environments
Monitor
Incidents
Analyze
Value stream analytics
Contributor analytics
CI/CD analytics
Repository analytics
Model experiments
Help
Help
Support
GitLab documentation
Compare GitLab plans
GitLab community forum
Contribute to GitLab
Provide feedback
Keyboard shortcuts
?
Snippets
Groups
Projects
Show more breadcrumbs
Per Cederqvist
lyskom-server-ceder-1616-generations-topgit
Commits
0cd0330d
Commit
0cd0330d
authored
21 years ago
by
Per Cederqvist
Browse files
Options
Downloads
Patches
Plain Diff
Test async-new-motd.
parent
ac752a17
No related branches found
No related tags found
No related merge requests found
Changes
1
Show whitespace changes
Inline
Side-by-side
Showing
1 changed file
src/server/testsuite/lyskomd.0/41.exp
+264
-0
264 additions, 0 deletions
src/server/testsuite/lyskomd.0/41.exp
with
264 additions
and
0 deletions
src/server/testsuite/lyskomd.0/41.exp
0 → 100644
+
264
−
0
View file @
0cd0330d
# Test suite for lyskomd.
# Copyright (C) 2003 Lysator Academic Computer Association.
#
# This file is part of the LysKOM server.
#
# LysKOM is free software; you can redistribute it and/or modify it
# under the terms of the GNU General Public License as published by
# the Free Software Foundation; either version 1, or (at your option)
# any later version.
#
# LysKOM is distributed in the hope that it will be useful, but WITHOUT
# ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or
# FITNESS FOR A PARTICULAR PURPOSE. See the GNU General Public License
# for more details.
#
# You should have received a copy of the GNU General Public License
# along with LysKOM; see the file COPYING. If not, write to
# Lysator, c/o ISY, Linkoping University, S-581 83 Linkoping, SWEDEN,
# or the Free Software Foundation, Inc., 675 Mass Ave, Cambridge,
# MA 02139, USA.
#
# Please mail bug reports to bug-lyskom@lysator.liu.se.
# Test async-new-motd.
#
# Persons:
# 5: admin
# 6: super: creator of 9 and 10
# 7: member: a member of 9 and 10
# 8: bystander: not a member
#
# Conferences:
# 9: public
# 10: secret
#
# Texts:
# 1: conf 1 as recipient
# 2: conf 1 as recipient
# 3: conf 10 as recipient
# 4: conf 10 as recipient
lyskomd_start
# Log in as admin, and enable.
client_start 5
send "A[holl "five"]\n"
simple_expect "LysKOM" "connected"
send "1000 80 1 { 21 }\n"
good_bad_expect "=1000" "%50 20"
send "1001 0 5 [holl "gazonk"]\n"
simple_expect "=1001"
send "1002 42 255\n"
simple_expect "=1002"
# Create person 6 and log in.
client_start 6
send "A[holl "six"]\n"
simple_expect "LysKOM" "connected"
send "1003 80 1 { 21 }\n"
good_bad_expect "=1003" "%50 20"
send "1004 89 [holl "super"] [holl "super"] 00000000 0 { }\n"
simple_expect "=1004 6"
send "1005 0 6 [holl "super"]\n"
simple_expect "=1005"
# Create person 7 and log in.
client_start 7
send "A[holl "seven"]\n"
simple_expect "LysKOM" "connected"
send "1006 80 1 { 21 }\n"
good_bad_expect "=1006" "%50 20"
send "1007 89 [holl "member"] [holl "member"] 00000000 0 { }\n"
simple_expect "=1007 7"
send "1008 0 7 [holl "member"]\n"
simple_expect "=1008"
# Create person 8 and log in.
client_start 8
send "A[holl "eight"]\n"
simple_expect "LysKOM" "connected"
send "1009 80 1 { 21 }\n"
good_bad_expect "=1009" "%50 20"
send "1010 89 [holl "bystander"] [holl "bystander"] 00000000 0 { }\n"
simple_expect "=1010 8"
send "1011 0 8 [holl "bystander"]\n"
simple_expect "=1011"
# Create conferences 9 and 10, and let person 6 and 7 join them.
talk_to client 6
send "1012 88 [holl "public"] 00000000 0 { }\n"
simple_expect "=1012 9"
send "1013 88 [holl "secret"] 10100000 0 { }\n"
simple_expect "=1013 10"
send "1014 100 9 6 200 1 00000000\n"
simple_expect "=1014"
send "1015 100 9 7 200 1 00000000\n"
lyskomd_expect "Person 7 added to conference 9 by 6\."
simple_expect "=1015"
send "1016 100 10 6 200 1 00000000\n"
simple_expect "=1016"
send "1017 100 10 7 200 1 00000000\n"
lyskomd_expect "Person 7 added to conference 10 by 6\."
simple_expect "=1017"
# Person 7 accepts the invitations.
talk_to client 7
send "1018 100 9 7 200 1 00000000\n"
simple_expect "=1018"
send "1019 100 10 7 200 1 00000000\n"
simple_expect "=1019"
# Person 6 creates the four texts that will be used as motds.
talk_to client 6
send "1020 86 [holl "text 1"] 1 { 0 1 } 0 { }\n"
simple_expect "=1020 1"
send "1021 86 [holl "text 2"] 1 { 0 1 } 0 { }\n"
simple_expect "=1021 2"
send "1022 86 [holl "text 3"] 1 { 0 10 } 0 { }\n"
simple_expect "=1022 3"
send "1023 86 [holl "text 4"] 1 { 0 10 } 0 { }\n"
simple_expect "=1023 4"
# Set text 1 as motd of conference 9.
send "1024 17 9 1\n"
simple_expect ":3 21 9 0 1"
client_expect 5 ":3 21 9 0 1"
client_expect 7 ":3 21 9 0 1"
client_expect 8 ":3 21 9 0 1"
simple_expect "=1024"
# Set text 2 as motd of conference 9.
send "1025 17 9 2\n"
simple_expect ":3 21 9 1 2"
client_expect 5 ":3 21 9 1 2"
client_expect 7 ":3 21 9 1 2"
client_expect 8 ":3 21 9 1 2"
simple_expect "=1025"
# Set text 3 as motd of conference 9. Since it isn't visible
# to the bystander, the bystander will think the motd has been
# removed.
send "1026 17 9 3\n"
simple_expect ":3 21 9 2 3"
client_extracting_expect 5 ":3 21 9 2 (0|3)" seen 1
setup_xfail "*-*-*" "Bug 178"
set test "administrator sees proper text"
if {$seen == 3} {
pass "$test"
} else {
fail "$test (filtered)"
}
unset test
client_expect 7 ":3 21 9 2 3"
client_expect 8 ":3 21 9 2 0"
simple_expect "=1026"
# Set text 4 as presentation of conference 9. This text is also not
# visible to the bystander. In the view of the bystander, the
# presentation changes from 0 to 0. That is no change, so no async
# message is sent to the bystander.
send "1027 17 9 4\n"
simple_expect ":3 21 9 3 4"
# FIXME (bug 178): Due to bug 178, this message never appears.
#client_expect 5 ":3 21 9 3 4"
setup_xfail "*-*-*" "Bug 178"
fail "admin sees message"
client_expect 7 ":3 21 9 3 4"
simple_expect "=1027"
# View the conf-stat of conference 9.
send "1028 91 9\n"
simple_expect "=1028 [holl "public"] 00000000 $any_time $any_time 6 0 6 0 6 4 77 77 2 1 0 0 0 \\*"
talk_to client 5
send "1029 91 9\n"
simple_expect "=1029 [holl "public"] 00000000 $any_time $any_time 6 0 6 0 6 4 77 77 2 1 0 0 0 \\*"
talk_to client 7
send "1030 91 9\n"
simple_expect "=1030 [holl "public"] 00000000 $any_time $any_time 6 0 6 0 6 4 77 77 2 1 0 0 0 \\*"
talk_to client 8
send "1031 91 9\n"
extracting_expect "=1031 [holl "public"] 00000000 $any_time $any_time 6 0 6 0 6 ($any_num) 77 77 2 1 0 0 0 \\*" motd 1
setup_xfail "*-*-*" "Bug 1074"
set test "Unreadable motd filtered"
if {$motd == 0} {
pass "$test"
} else {
fail "$test (motd visible)"
if {$motd != 4} {
fail "$test (strange result $motd)"
}
}
unset test
# Set text 1 as motd of conference 10.
talk_to client 6
send "1032 17 10 1\n"
simple_expect ":3 21 10 0 1"
client_expect 5 ":3 21 10 0 1"
client_expect 7 ":3 21 10 0 1"
simple_expect "=1032"
# Set text 2 as motd of conference 10.
send "1033 17 10 2\n"
simple_expect ":3 21 10 1 2"
client_expect 5 ":3 21 10 1 2"
client_expect 7 ":3 21 10 1 2"
simple_expect "=1033"
# Set text 3 as motd of conference 10.
# removed.
send "1034 17 10 3\n"
simple_expect ":3 21 10 2 3"
client_extracting_expect 5 ":3 21 10 2 (0|3)" seen 1
setup_xfail "*-*-*" "Bug 178"
set test "administrator sees proper text"
if {$seen == 3} {
pass "$test"
} else {
fail "$test (filtered)"
}
unset test
client_expect 7 ":3 21 10 2 3"
simple_expect "=1034"
# Set text 4 as motd of conference 10.
send "1035 17 10 4\n"
simple_expect ":3 21 10 3 4"
# FIXME (bug 178): Due to bug 178, this message never appears.
#client_expect 5 ":3 21 10 3 4"
setup_xfail "*-*-*" "Bug 178"
fail "admin sees message"
client_expect 7 ":3 21 10 3 4"
simple_expect "=1035"
# View the conf-stat of conference 10.
send "1036 91 10\n"
simple_expect "=1036 [holl "secret"] 10100000 $any_time $any_time 6 0 6 0 6 4 77 77 2 1 2 0 0 \\*"
talk_to client 5
send "1037 91 10\n"
simple_expect "=1037 [holl "secret"] 10100000 $any_time $any_time 6 0 6 0 6 4 77 77 2 1 2 0 0 \\*"
talk_to client 7
send "1038 91 10\n"
simple_expect "=1038 [holl "secret"] 10100000 $any_time $any_time 6 0 6 0 6 4 77 77 2 1 2 0 0 \\*"
talk_to client 8
send "1039 91 10\n"
simple_expect "%1039 9 10"
# Shut down.
talk_to client 5
send "1040 44 0\n"
simple_expect "=1040"
client_death 5
client_death 6
client_death 7
client_death 8
lyskomd_death
This diff is collapsed.
Click to expand it.
Preview
0%
Loading
Try again
or
attach a new file
.
Cancel
You are about to add
0
people
to the discussion. Proceed with caution.
Finish editing this message first!
Save comment
Cancel
Please
register
or
sign in
to comment