From b3b2a1deeec742338ebf10c378b82324b4e03016 Mon Sep 17 00:00:00 2001
From: James Cameron <quozl@laptop.org>
Date: Tue, 4 Aug 2009 19:48:59 +1000
Subject: [PATCH] rework boot script for usb key to nand installer

	- mkbootable.sh: refer to xodist rather than debxo (the image names may
	  contain debxo), prompt for a more complex confirmation keyboard
	  sequence, allow for abort.

	- note that the xodist as at this version does not currently generate a
	  working XO NAND, tested on OLPC XO-1 C2 with OFW Q2E41B.
---
 mkbootable.sh | 22 +++++++++++++---------
 1 file changed, 13 insertions(+), 9 deletions(-)

diff --git a/mkbootable.sh b/mkbootable.sh
index bb2618a..03cff0d 100755
--- a/mkbootable.sh
+++ b/mkbootable.sh
@@ -110,11 +110,13 @@ cat <<EOF >${OUTPUT}/boot/olpc.fth
 \ OLPC boot script
 
 visible
+clear-screen
 cr
-." This is a debxo bootable install script." cr
+." This is a xodist bootable install script for the OLPC XO-1." cr
 cr
-." `md5sum ${IMAGE}.img`" cr
-." `md5sum ${IMAGE}.dat`" cr
+." Checksums:" cr
+."     `md5sum ${IMAGE}.img`" cr
+."     `md5sum ${IMAGE}.dat`" cr
 cr
 EOF
 
@@ -124,18 +126,20 @@ case $INTERACTIVE in
 		cat <<EOF >>${OUTPUT}/boot/olpc.fth
 
 \ --no-interactive was used, so we do not prompt
-." Erasing everything here and installing debxo ${IMAGE}" cr
+." Erasing everything here and installing ${IMAGE}" cr
 EOF
 		;;
 	yes|*)
 		cat <<EOF >>${OUTPUT}/boot/olpc.fth
 
 \ --interactive was used, so we prompt before erasing
-." Power off to abort, or" cr
-." press Enter to erase everything here and install debxo ${IMAGE} ?"
-begin
-    key d =
-until
+." Type yes then enter to erase everything here and install ${IMAGE} ? "
+cursor-on
+key  lcc  dup emit  ascii y = not  [if] cr abort [then]
+key  lcc  dup emit  ascii e = not  [if] cr abort [then]
+key  lcc  dup emit  ascii s = not  [if] cr abort [then]
+key       dup emit  d       = not  [if] cr abort [then]
+
 EOF
 		;;
 esac
-- 
2.39.5