4 |
# it under the terms of the GNU General Public License as published by |
# it under the terms of the GNU General Public License as published by |
5 |
# the Free Software Foundation; either version 2 of the License, or |
# the Free Software Foundation; either version 2 of the License, or |
6 |
# (at your option) any later version. |
# (at your option) any later version. |
7 |
# |
# |
8 |
# This program is distributed in the hope that it will be useful, |
# This program is distributed in the hope that it will be useful, |
9 |
# but WITHOUT ANY WARRANTY; without even the implied warranty of |
# but WITHOUT ANY WARRANTY; without even the implied warranty of |
10 |
# MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the |
# MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the |
11 |
# GNU General Public License for more details. |
# GNU General Public License for more details. |
12 |
# |
# |
13 |
# You should have received a copy of the GNU General Public License |
# You should have received a copy of the GNU General Public License |
14 |
# along with this program; if not, write to the Free Software |
# along with this program; if not, write to the Free Software |
15 |
# Foundation, 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA. |
# Foundation, 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA. |
85 |
exp_continue |
exp_continue |
86 |
} |
} |
87 |
-re "\[\r\n\]+" { |
-re "\[\r\n\]+" { |
88 |
if { ! $noappend } { |
if { ! $noappend } { |
89 |
append output $expect_out(buffer) |
append output $expect_out(buffer) |
90 |
if { [string length $output] < 512000 } { |
if { [string length $output] < 512000 } { |
91 |
exp_continue |
exp_continue |
118 |
warning "Resetting $dest." |
warning "Resetting $dest." |
119 |
remote_send $dest "r\n" |
remote_send $dest "r\n" |
120 |
remote_expect $dest 5 { |
remote_expect $dest 5 { |
121 |
-re "r.*$shell_prompt.*" { |
-re "r.*$shell_prompt.*" { |
122 |
verbose "Target reset." 2 |
verbose "Target reset." 2 |
123 |
} |
} |
124 |
timeout { |
timeout { |