NEW
  PREFIX
AUTO 4,1
#!/bin/sh
#
#  This script makes a proper tdboot disk using the files
#  found in a particular BUILD stored in /make/builds
#
. makefuncs
CALL CS
CALL TBOX "       tdboot Media Creator"
CALL PRINTXY 8 0 "You must have the correct image mounted on S7D2"
ECHO "\n"
READ -P "Do you want to proceed (Y/N)?  " P
SWITCH $P
  CASE Y
  CASE y
    ECHO
    BREAK
  DEFAULT
    ECHO "\n\nExiting.\n"
    EXIT
END
READ -P "WHICH BUILD NO:  " B
IF [ -Z $B ]
  ECHO "You did not enter any response."
  ECHO
  ECHO "Exiting"
  EXIT
FI
SET SRC = "/MAKE/BUILDS/BUILD${B}"
IF [ -D ${SRC} ]
  ECHO "\n\nFound Valid BUILD\n"
ELSE
  ECHO "\n\nValid BUILD not found."
  ECHO
  ECHO "Exiting"
  EXIT
FI
ECHO "Is this a (R)elease, (C)andidate or (S)table Build"
READ -P "ENTER R C or S:  " RCS
IF [ -Z $RCS ]
  ECHO "You did not enter any response."
  ECHO
  ECHO "Exiting"
  EXIT
FI
SWITCH $RCS
  CASE r
  CASE R
    SET IM = "Release Build No. ${B}"
    BREAK
  CASE c
  CASE C
    SET IM = "Release Candidate Build No. ${B}"
    BREAK
  CASE s
  CASE S
    SET IM = "Stable Release Build No. ${B}"
    BREAK
  DEFAULT
    ECHO "You did not enter a valid response."
    ECHO  "You must enter only one of the characters R C or S!"
    ECHO
    ECHO "Exiting"
    EXIT
END
ECHO "Formatting Destination..."
format -B 65535 s7d2 tdboot
ECHO "Making Directory Structure..."
md /tdboot/bin
md /tdboot/drv
md /tdboot/etc
md /tdboot/lib
md /tdboot/root
md /tdboot/sbin
md /tdboot/sys
md /tdboot/sys/km
md /tdboot/tmp
md /tdboot/var
md /tdboot/var/log
ECHO "Copying Files..."
FOR FILE IN (fullfiles)
  cp -Q ${SRC}/${FILE} /tdboot/${FILE}
NEXT
cp -Q -Y ${SRC}/PRODOS.FX /tdboot/ProDOS
cp -Q -Y tdbootinit /tdboot/etc/init
ECHO "Welcome to A2osX!" > /tdboot/etc/issue
ECHO >> /tdboot/etc/issue
ECHO $IM >> /tdboot/etc/issue
cp -Q tcpip.conf /tdboot/etc/tcpip.conf
cp -Q profile /tdboot/root/profile
ECHO "tdboot Disk Created!"
MAN
TEXT /MAKE/USR/SHARE/MAKE/MAKETD