Commit b2ec3688 authored by Per Cederqvist's avatar Per Cederqvist
Browse files

Initial commit. Far from complete.

parent 1a25a87a
# Check that all functions do the right thing in their most normal use.
read_versions
lyskomd_start
# Preamble: create a "typical database" containing some persons and
# texts created with traditional calls, and some created using newer
# calls.
# Client 0 is traditional. Let it start the race.
client_start 0
talk_to client 0
send "A[holl "ceder@gratia"]\n"
simple_expect "LysKOM" "connected"
send "1000 12 [holl "Per Cederqvist"]\n"
simple_expect "=1000 0 \\* \\*"
# This test was written while listening to Talitha, so it seemd proper
# to use her name as password.
send "1001 5 [holl "Per Cederqvist"] [holl "Talitha"]\n"
simple_expect ":2 9 6 1"
simple_expect "=1001 6"
# Create a conference
send "1002 10 [holl "(So called) Christian Music"] 0000\n"
simple_expect "=1002 7"
send "1003 2 7\n"
simple_expect "%1003 13 7"
send "1004 14 7 6 100 1\n"
simple_expect "=1004"
send "1005 2 7\n"
simple_expect "=1005"
send "1006 28 [holl "Old-style text 1"] 1 { 0 7 }\n"
simple_expect ":16 0 1 $any_time 6 0 16 0 2 { 0 7 6 1 }"
simple_expect "=1006 1"
send "1007 28 [holl "Old-style text 2"] 1 { 0 7 }\n"
simple_expect ":16 0 2 $any_time 6 0 16 0 2 { 0 7 6 2 }"
simple_expect "=1007 2"
send "1008 28 [holl "Old-style text 3"] 1 { 0 7 }\n"
simple_expect ":16 0 3 $any_time 6 0 16 0 2 { 0 7 6 3 }"
simple_expect "=1008 3"
# Client 1 is contemporary. Let it use all the latest fancy stuff.
client_start 1
talk_to client 1
send "A[holl "ic@gratia"]\n"
simple_expect "LysKOM" "client 1 connected"
send "1009 69 [holl "dgt03"] [holl "sc 1"]\n"
simple_expect "=1009"
send "1010 96\n"
simple_expect "=1010 15 { 15 14 13 12 11 10 9 8 7 6 5 4 3 2 1 }"
send "1011 82\n"
simple_expect "=1011"
send "1012 81\n"
simple_expect "=1012 8 { 0 5 7 8 9 11 12 13 }"
send "1013 80 129 { 0 1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36 37 38 39 40 41 42 43 44 45 46 47 48 49 50 51 52 53 54 55 56 57 58 59 60 61 62 63 64 65 66 67 68 69 70 71 72 73 74 75 76 77 78 79 80 81 82 83 84 85 86 87 88 89 90 91 92 93 94 95 96 97 98 99 100 101 102 103 104 105 106 107 108 109 110 111 112 113 114 115 116 117 118 119 120 121 122 123 124 125 126 127 128 }\n"
simple_expect "%1013 46 0"
send "1014 81\n"
simple_expect "=1014 8 { 0 5 7 8 9 11 12 13 }"
send "1015 80 128 { 0 1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36 37 38 39 40 41 42 43 44 45 46 47 48 49 50 51 52 53 54 55 56 57 58 59 60 61 62 63 64 65 66 67 68 69 70 71 72 73 74 75 76 77 78 79 80 81 82 83 84 85 86 87 88 89 90 91 92 93 94 95 96 97 98 99 100 101 102 103 104 105 106 107 108 109 110 111 112 113 114 115 116 117 118 119 120 121 122 123 124 125 126 129 }\n"
simple_expect "%1015 50 1"
send "1016 81\n"
simple_expect "=1016 11 { 0 5 6 7 8 9 11 12 13 14 15 }"
send "1017 80 127 { 0 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36 37 38 39 40 41 42 43 44 45 46 47 48 49 50 51 52 53 54 55 56 57 58 59 60 61 62 63 64 65 66 67 68 69 70 71 72 73 74 75 76 77 78 79 80 81 82 83 84 85 86 87 88 89 90 91 92 93 94 95 96 97 98 99 100 101 102 103 104 105 106 107 108 109 110 111 112 113 114 115 116 117 118 119 120 121 122 123 124 125 126 129 }\n"
simple_expect "%1017 50 2"
send "1018 80 126 { 0 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36 37 38 39 40 41 42 43 44 45 46 47 48 49 50 51 52 53 54 55 56 57 58 59 60 61 62 63 64 65 66 67 68 69 70 71 72 73 74 75 76 77 78 79 80 81 82 83 84 85 86 87 88 89 90 91 92 93 94 95 96 97 98 99 100 101 102 103 104 105 106 107 108 109 110 111 112 113 114 115 116 117 118 119 120 121 122 123 124 125 126 129 }\n"
simple_expect "%1018 50 3"
send "1019 81\n"
simple_expect "=1019 11 { 0 5 6 7 8 9 11 12 13 14 15 }"
send "1020 80 126 { 0 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36 37 38 39 40 41 42 43 44 45 46 47 48 49 50 51 52 53 54 55 56 57 58 59 60 61 62 63 64 65 66 67 68 69 70 71 72 73 74 75 76 77 78 79 80 81 82 83 84 85 86 87 88 89 90 91 92 93 94 95 96 97 98 99 100 101 102 103 104 105 106 107 108 109 110 111 112 113 114 115 116 117 118 119 120 121 122 123 124 125 126 127 3923 }\n"
simple_expect "%1020 50 4"
send "1021 81\n"
simple_expect "=1021 11 { 0 5 6 7 8 9 11 12 13 14 15 }"
send "1022 80 125 { 128 127 126 125 124 123 122 121 120 119 118 117 116 115 114 113 112 111 110 109 108 107 106 105 104 103 102 101 100 99 98 97 96 95 94 93 92 91 90 89 88 87 86 85 84 83 82 81 80 79 78 77 76 75 74 73 72 71 70 69 68 67 66 65 64 63 62 61 60 59 58 57 56 55 54 53 52 51 50 49 48 47 46 45 44 43 42 41 40 39 38 37 36 35 34 33 32 31 30 29 28 27 26 25 24 23 22 21 20 19 18 17 16 15 14 13 12 11 10 9 8 7 6 5 0 }\n"
simple_expect "%1022 50 128"
send "1023 80 124 { 0 5 6 7 8 9 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36 37 38 39 40 41 42 43 44 45 46 47 48 49 50 51 52 53 54 55 56 57 58 59 60 61 62 63 64 65 66 67 68 69 70 71 72 73 74 75 76 77 78 79 80 81 82 83 84 85 86 87 88 89 90 91 92 93 94 95 96 97 98 99 100 101 102 103 104 105 106 107 108 109 110 111 112 113 114 115 116 117 118 119 120 121 122 123 124 125 126 127 128 }\n"
simple_expect "%1023 50 16"
send "1024 81\n"
simple_expect "=1024 11 { 0 5 6 7 8 9 11 12 13 14 15 }"
send "1025 80 12 { 0 5 6 7 8 9 10 11 12 13 14 15 }\n"
simple_expect "%1025 50 10"
send "1025 80 11 { 0 5 6 7 8 9 11 12 13 14 15 }\n"
simple_expect "=1025"
send "1026 81\n"
simple_expect "=1026 11 { 0 5 6 7 8 9 11 12 13 14 15 }"
# FIXME: create a modern person with a few aux-items via client 1.
# FIXME: create a few texts and conferences via client 1.
# FIXME: test call 0
# FIXME: test call 1
# FIXME: test call 2
# FIXME: test call 3
# FIXME: test call 4
# FIXME: test call 5
# FIXME: test call 6
# FIXME: test call 7
# FIXME: test call 8
# FIXME: test call 9
# FIXME: test call 10
# FIXME: test call 11
# FIXME: test call 12
# FIXME: test call 13
# FIXME: test call 14
# FIXME: test call 15
# FIXME: test call 16
# FIXME: test call 17
# FIXME: test call 18
# FIXME: test call 19
# FIXME: test call 20
# FIXME: test call 21
# FIXME: test call 22
# FIXME: test call 23
# FIXME: test call 24
# FIXME: test call 25
# FIXME: test call 26
# FIXME: test call 27
# FIXME: test call 28
# FIXME: test call 29
# FIXME: test call 30
# FIXME: test call 31
# FIXME: test call 32
# FIXME: test call 33
# FIXME: test call 34
# FIXME: test call 35
# FIXME: test call 36
# FIXME: test call 37
# FIXME: test call 38
# FIXME: test call 39
# FIXME: test call 40
# FIXME: test call 41
# FIXME: test call 42
# FIXME: test call 43
# FIXME: test call 44
# FIXME: test call 45
# FIXME: test call 46
# FIXME: test call 47
# FIXME: test call 48
# FIXME: test call 49
# FIXME: test call 50
# FIXME: test call 51
# FIXME: test call 52
# FIXME: test call 53
# FIXME: test call 54
# FIXME: test call 55
# FIXME: test call 56
# FIXME: test call 57
# FIXME: test call 58
# FIXME: test call 59
# FIXME: test call 60
# FIXME: test call 61
# FIXME: test call 62
# FIXME: test call 63
# FIXME: test call 64
# FIXME: test call 65
# FIXME: test call 66
# FIXME: test call 67
# FIXME: test call 68
# FIXME: test call 69
# FIXME: test call 70
# FIXME: test call 71
# FIXME: test call 72
# FIXME: test call 73
# FIXME: test call 74
# FIXME: test call 75
# FIXME: test call 76
# FIXME: test call 77
# FIXME: test call 78
# FIXME: test call 79
# call 80 is tested during startup of client 1.
# call 81 is tested during startup of client 1.
# FIXME: test call 82
# FIXME: test call 83
# FIXME: test call 84
# FIXME: test call 85
# FIXME: test call 86
# FIXME: test call 87
# FIXME: test call 88
# FIXME: test call 89
# FIXME: test call 90
# FIXME: test call 91
# FIXME: test call 92
# FIXME: test call 93
# FIXME: test call 94
# FIXME: test call 95
# FIXME: test call 96
# FIXME: test call 97
# FIXME: test call 98
# FIXME: test call 99
# FIXME: test call 100
# FIXME: test call 101
# FIXME: test call 102
# FIXME: test call 103
# FIXME: test call 104
# There is no call 105--yet.
send "1027 105\n"
simple_expect "%1027 2 0"
# There is no call 106--yet.
send "1028 106\n"
simple_expect "%1028 2 0"
# There is no call 107--yet.
send "1029 107\n"
simple_expect "%1029 2 0"
# There is no call 108--yet.
send "1030 108\n"
simple_expect "%1030 2 0"
# There is no call 109--yet.
send "1031 109\n"
simple_expect "%1031 2 0"
# There is no call 110--yet.
send "1032 110\n"
simple_expect "%1032 2 0"
# FIXME: disconnect client 1
# Shut everything down
talk_to client 0
send "1033 62 5 [holl "gazonk"] 0\n"
simple_expect ":2 13 6 1"
simple_expect ":2 9 5 1"
simple_expect "=1033"
send "1034 42 255\n"
simple_expect "=1034" "42=enable succeeded"
send "1035 44 0\n"
simple_expect "=1035" "44=shutdown-kom succeeded"
simple_expect ":2 13 5 1"
client_death 0
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