is-loader-up.exp

#!/usr/bin/expect

log_user 0

source vars.exp

set spawned [spawn -open [open $port w+]]
exec stty -f $port $baud raw -clocal -echo

send_user "Checking if the bootloader is already present\n"
send "\r"
while {1} {
	expect  ">" {
		send "g $bootloader_addr\r"
		while {1} {
			expect "Choose an Option: " {
				send_user "Bootloader present\n"
				exit 0
			} "SH-MobileR2 monitor" {
				send_user "Bootloader NOT present\n"
				exit 1
			}
		}
	} "Choose an Option: " {
		send_user "Bootloader present\n"
		exit 0
	}
}