1# Copyright (C) 1997, 1998, 1999, 2000, 2001, 2002, 2003 Free Software
2# Foundation, Inc.
3#
4# This file is part of DejaGnu.
5#
6# DejaGnu is free software; you can redistribute it and/or modify it
7# under the terms of the GNU General Public License as published by
8# the Free Software Foundation; either version 2 of the License, or
9# (at your option) any later version.
10#
11# DejaGnu is distributed in the hope that it will be useful, but
12# WITHOUT ANY WARRANTY; without even the implied warranty of
13# MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
14# General Public License for more details.
15#
16# You should have received a copy of the GNU General Public License
17# along with DejaGnu; if not, write to the Free Software Foundation,
18# Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA.
19
20load_base_board_description "cygmon"
21
22set_board_info testcase_timeout 30
23
24proc ${board}_init { dest } {
25    global usparc_init_count
26    set shell_prompt [board_info $dest shell_prompt]
27
28    if ![info exists usparc_init_count] {
29	set usparc_init_count 0
30    } else {
31	incr usparc_init_count
32	if { $usparc_init_count == 3 } {
33	    return -1
34	}
35
36    }
37    remote_close $dest
38    set shell_id [remote_open $dest]
39    if { $shell_id == "" || $shell_id < 0 } {
40	return [remote_reboot $dest]
41    } else {
42	remote_binary $dest
43	remote_send $dest "\n"
44	set got_one 0
45	remote_expect $dest 5 {
46	    -re "$shell_prompt" { set got_one 1; exp_continue }
47	    default {
48		if { ! $got_one } {
49		    remote_close $dest
50		    return [remote_reboot $dest]
51		}
52	    }
53	}
54    	remote_send $dest "m \[15\]1fff1001f00 32\n"
55	remote_expect $dest 5 {
56	    -re "$shell_prompt" {
57		unset usparc_init_count
58		remote_close $dest
59		return 0
60	    }
61	    default {
62		remote_close $dest
63		return [remote_reboot $dest]
64	    }
65	}
66    }
67}
68