1#!/usr/bin/expect -f 2# 3# Copyright (c) 2022, The OpenThread Authors. 4# All rights reserved. 5# 6# Redistribution and use in source and binary forms, with or without 7# modification, are permitted provided that the following conditions are met: 8# 1. Redistributions of source code must retain the above copyright 9# notice, this list of conditions and the following disclaimer. 10# 2. Redistributions in binary form must reproduce the above copyright 11# notice, this list of conditions and the following disclaimer in the 12# documentation and/or other materials provided with the distribution. 13# 3. Neither the name of the copyright holder nor the 14# names of its contributors may be used to endorse or promote products 15# derived from this software without specific prior written permission. 16# 17# THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS "AS IS" 18# AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE 19# IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE 20# ARE DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT HOLDER OR CONTRIBUTORS BE 21# LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR 22# CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF 23# SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS 24# INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN 25# CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) 26# ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE 27# POSSIBILITY OF SUCH DAMAGE. 28# 29 30source "tests/scripts/expect/_common.exp" 31source "tests/scripts/expect/_multinode.exp" 32 33spawn_node 2 "cli" 34spawn_node 1 "cli" 35setup_leader 36setup_node 2 "rnd" "router" 37 38switch_node 1 39send "tcp init circular\n" 40expect_line "Done" 41 42switch_node 2 43send "tcp init linked\n" 44expect_line "Done" 45set addr_2 [get_ipaddr mleid] 46send "tcp listen :: 30000\n" 47expect_line "Done" 48send "tcp stoplistening\n" 49expect_line "Done" 50 51switch_node 1 52send "tcp connect $addr_2 30000\n" 53expect_line "Done" 54expect "TCP: Connection refused" 55 56switch_node 2 57send "tcp listen :: 30000\n" 58expect_line "Done" 59 60switch_node 1 61set addr_1 [get_ipaddr mleid] 62send "tcp bind $addr_1 25000\n" 63expect_line "Done" 64send "tcp connect $addr_2 30000\n" 65expect_line "Done" 66expect "TCP: Connection established" 67 68switch_node 2 69expect "Accepted connection from \\\[$addr_1\\\]:25000" 70expect "TCP: Connection established" 71 72switch_node 1 73send "tcp send hello\n" 74expect_line "Done" 75 76switch_node 2 77expect "TCP: Received 5 bytes: hello" 78send "tcp send world\n" 79expect_line "Done" 80 81switch_node 1 82expect "TCP: Received 5 bytes: world" 83send "tcp send -x 546573740d0a4865780d0a\n" 84expect_line "Done" 85 86switch_node 2 87expect "TCP: Received 11 bytes: Test\r\nHex\r\n" 88 89switch_node 1 90send "tcp sendend\n" 91expect_line "Done" 92send "tcp send more\n" 93expect_line "Error 1: Failed" 94 95switch_node 2 96expect "TCP: Reached end of stream" 97send "tcp send goodbye\n" 98expect_line "Done" 99 100switch_node 1 101expect "TCP: Received 7 bytes: goodbye" 102 103switch_node 2 104send "tcp sendend\n" 105expect_line "Done" 106expect "TCP: Disconnected" 107 108switch_node 1 109expect "TCP: Reached end of stream" 110expect "TCP: Entered TIME-WAIT state" 111set timeout 130 112expect "TCP: Disconnected" 113 114dispose_all 115