# HG changeset patch
# User boisy
# Date 1123765584 0
# Node ID 298e596aa1431e23b9228129fbce0ef26d369218
# Parent  9db5440eef219ec7272e0490891fd45fef2c430e
New method of creating BUNDIs

diff -r 9db5440eef21 -r 298e596aa143 scripts/bootlistl2
--- /dev/null	Thu Jan 01 00:00:00 1970 +0000
+++ b/scripts/bootlistl2	Thu Aug 11 13:06:24 2005 +0000
@@ -0,0 +1,53 @@
+# NitrOS-9 Level 2 Bootlist
+$NITROS9DIR/$DISTRO/modules/krnp2
+$NITROS9DIR/$DISTRO/modules/ioman
+$NITROS9DIR/$DISTRO/modules/init
+$NITROS9DIR/$DISTRO/modules/rbf.mn
+$CLOUD9DIR/Products/SuperDrivers/software/$DISTRO/rbsuper.dr
+$CLOUD9DIR/Products/SuperDrivers/software/$DISTRO/llide.dr
+$CLOUD9DIR/Products/SuperDrivers/software/$DISTRO/lltc3.dr
+$CLOUD9DIR/Products/SuperDrivers/software/$DISTRO/dd_ide.dd
+$CLOUD9DIR/Products/SuperDrivers/software/$DISTRO/i0_ide.dd
+$CLOUD9DIR/Products/SuperDrivers/software/$DISTRO/i1_ide.dd
+$CLOUD9DIR/Products/SuperDrivers/software/$DISTRO/ih_ide.dd
+$CLOUD9DIR/Products/SuperDrivers/software/$DISTRO/s0_tc3.dd
+$CLOUD9DIR/Products/SuperDrivers/software/$DISTRO/s1_tc3.dd
+$CLOUD9DIR/Products/SuperDrivers/software/$DISTRO/s2_tc3.dd
+$CLOUD9DIR/Products/SuperDrivers/software/$DISTRO/s3_tc3.dd
+$CLOUD9DIR/Products/SuperDrivers/software/$DISTRO/s4_tc3.dd
+$CLOUD9DIR/Products/SuperDrivers/software/$DISTRO/s5_tc3.dd
+$CLOUD9DIR/Products/SuperDrivers/software/$DISTRO/s6_tc3.dd
+$CLOUD9DIR/Products/SuperDrivers/software/$DISTRO/s7_tc3.dd
+$CLOUD9DIR/Products/SuperDrivers/software/$DISTRO/sh_tc3.dd
+$CLOUD9DIR/Products/DriveWire/software/$DISTRO/drivewire.dr
+$CLOUD9DIR/Products/DriveWire/software/$DISTRO/x0.dd
+$CLOUD9DIR/Products/DriveWire/software/$DISTRO/x1.dd
+$CLOUD9DIR/Products/DriveWire/software/$DISTRO/x2.dd
+$CLOUD9DIR/Products/DriveWire/software/$DISTRO/x3.dd
+$NITROS9DIR/$DISTRO/modules/rb1773.dr
+$NITROS9DIR/$DISTRO/modules/d0_80d.dd
+$NITROS9DIR/$DISTRO/modules/d1_40d.dd
+$NITROS9DIR/$DISTRO/modules/scf.mn
+$NITROS9DIR/$DISTRO/modules/cc3io.dr
+$NITROS9DIR/$DISTRO/modules/term_win80.dt
+$NITROS9DIR/$DISTRO/modules/keydrv_cc3.sb
+$NITROS9DIR/$DISTRO/modules/joydrv_joy.sb
+$NITROS9DIR/$DISTRO/modules/snddrv_cc3.sb
+$NITROS9DIR/$DISTRO/modules/grfint.io
+$NITROS9DIR/$DISTRO/modules/w.dw
+$NITROS9DIR/$DISTRO/modules/w1.dw
+$NITROS9DIR/$DISTRO/modules/w2.dw
+$NITROS9DIR/$DISTRO/modules/w3.dw
+$NITROS9DIR/$DISTRO/modules/w4.dw
+$NITROS9DIR/$DISTRO/modules/w5.dw
+$NITROS9DIR/$DISTRO/modules/w6.dw
+$NITROS9DIR/$DISTRO/modules/w7.dw
+$NITROS9DIR/$DISTRO/modules/sc6551.dr
+$NITROS9DIR/$DISTRO/modules/t2_sc6551.dd
+$NITROS9DIR/$DISTRO/modules/t3_sc6551.dd
+$NITROS9DIR/$DISTRO/modules/pipeman.mn
+$NITROS9DIR/$DISTRO/modules/piper.dr
+$NITROS9DIR/$DISTRO/modules/pipe.dd
+$NITROS9DIR/$DISTRO/modules/clock_60hz
+$NITROS9DIR/$DISTRO/modules/clock2_cloud9
+#tom
diff -r 9db5440eef21 -r 298e596aa143 scripts/bundi
--- a/scripts/bundi	Thu Aug 11 03:21:53 2005 +0000
+++ b/scripts/bundi	Thu Aug 11 13:06:24 2005 +0000
@@ -11,6 +11,10 @@
 #
 # Size of image is 90,624 256-byte sectors, which fits in
 # $00B100 OS-9 Offset in HDB-DOS
+
+use IO::File;
+use POSIX qw(tmpnam);
+
 #
 # ATTENTION!  Set the HDB-DOS offset in your HDB-DOS ROM here! (must be in decimal)
 $hdbdos_offset = 45312;		# 0x00B100
@@ -18,18 +22,20 @@
 $num_hdbdos_disks = 128;
 $NITROS9DIR = $ENV{'NITROS9DIR'};
 $CLOUD9DIR = $ENV{'CLOUD9DIR'};
+$DISTRO = "6809l2";
 
 
 # Check for proper number of arguments
 $numargs = $#ARGV + 1;
-if ($numargs != 2)
+if ($numargs != 3)
 {
-	print "Usage: bundi <bootscript> <diskname>\n";
+	print "Usage: bundi <bootlist> <tracklist> <diskname>\n";
 	exit;
 }
 
-$scriptname = $ARGV[0];
-$diskname = $ARGV[1];
+$bootlist = $ARGV[0];
+$tracklist = $ARGV[1];
+$diskname = $ARGV[2];
 
 
 $multiplier = 2;
@@ -60,18 +66,60 @@
 
 print "Step 1 - Format the disk and make the boot disk\n";
 system("os9 format -qe -l$os9_sectors tmp.dsk");
-system("./$scriptname>&/dev/null");
-system("os9 gen -b=bootfile -t=boottrack tmp.dsk>&/dev/null");
-system("os9 copy -o=0 $NITROS9DIR/6309l2/modules/sysgo_dd tmp.dsk,sysgo");
+
+
+# Read bootlist file and expand any variables
+open(FILE, "$bootlist") or die ("Unable to open $bootlist");
+@bootarray = <FILE>;
+close(FILE);
+foreach $element (@bootarray)
+{
+	if ($element =~ /^#/)
+	{
+		$element = "";
+	}
+	else
+	{
+		$element =~ s/\$(\w+)/${$1}/g;
+		$element =~ s/\s+$//;
+	}
+}
+
+
+
+$bls = "@bootarray";
+system("cat $bls>bootfile");
+
+# Read tracklist file and expand any variables
+open(FILE, "$tracklist") or die ("Unable to open $tracklist");
+@trackarray = <FILE>;
+close(FILE);
+foreach $element (@trackarray)
+{
+	if ($element =~ /^#/)
+	{
+		$element = "";
+	}
+	else
+	{
+		$element =~ s/\$(\w+)/${$1}/g;
+		$element =~ s/\s+$//;
+	}
+}
+
+$tls = "@trackarray";
+system("cat $tls>trackfile");
+
+system("os9 gen -b=bootfile -t=trackfile tmp.dsk>&/dev/null");
+system("os9 copy -o=0 $NITROS9DIR/$DISTRO/modules/sysgo_dd tmp.dsk,sysgo");
 system("os9 attr tmp.dsk,sysgo -epepr");
-system("os9 dsave -e $NITROS9DIR/6309l2/nos96309l2_80d.dsk, tmp.dsk, >&/dev/null");
+system("os9 dsave -e $NITROS9DIR/$DISTRO/nos9$DISTRO_80d.dsk, tmp.dsk, >&/dev/null");
 system("os9 dsave -e $NITROS9DIR/3rdparty/packages/uucpbb/uucpbb21_6309.dsk, tmp.dsk, >&/dev/null");
 system("os9 dsave -e $NITROS9DIR/3rdparty/packages/cc/cc.dsk, tmp.dsk, >&/dev/null");
 system("os9 dsave -e $NITROS9DIR/3rdparty/packages/basic09/basic09v010100.dsk, tmp.dsk, >&/dev/null");
 system("os9 dsave -e $CLOUD9DIR/Products/Ved/Software/ved.dsk, tmp.dsk, >&/dev/null");
 system("os9 format -qe -ss -dd boot.dsk");
-system("os9 gen -b=bootfile -t=boottrack boot.dsk>&/dev/null");
-system("rm bootfile boottrack");
+system("os9 gen -b=bootfile -t=trackfile boot.dsk>&/dev/null");
 
 print "Step 2 - Build the HDB-DOS drives\n";
 system("rm hdbdrives.dsk");
diff -r 9db5440eef21 -r 298e596aa143 scripts/tracklistl2
--- /dev/null	Thu Jan 01 00:00:00 1970 +0000
+++ b/scripts/tracklistl2	Thu Aug 11 13:06:24 2005 +0000
@@ -0,0 +1,4 @@
+# Boot track list for NitrOS-9 Level 2
+$NITROS9DIR/$DISTRO/modules/rel_80
+$CLOUD9DIR/Products/SuperDrivers/software/$DISTRO/boot_ide
+$NITROS9DIR/$DISTRO/modules/krn