IBM would like us to provide mainframe users with a sample punchcard
reader script along with the other boot files on s390x.
I'd just like to say that again: punch cards.
---
bootdisk/s390x/redhat.exec | 9 +++++++++
scripts/mk-images.s390 | 1 +
2 files changed, 10 insertions(+), 0 deletions(-)
create mode 100644 bootdisk/s390x/redhat.exec
diff --git a/bootdisk/s390x/redhat.exec b/bootdisk/s390x/redhat.exec
new file mode 100644
index 0000000..d5b7f74
--- /dev/null
+++ b/bootdisk/s390x/redhat.exec
@@ -0,0 +1,9 @@
+/* */
+'CL RDR'
+'PURGE RDR ALL'
+'SPOOL PUNCH * RDR'
+'PUNCH KERNEL IMG A (NOH'
+'PUNCH REDHAT PARM A (NOH'
+'PUNCH INITRD IMG A (NOH'
+'CH RDR ALL KEEP NOHOLD'
+'I 00C'
diff --git a/scripts/mk-images.s390 b/scripts/mk-images.s390
index 1f87232..b3e9db1 100644
--- a/scripts/mk-images.s390
+++ b/scripts/mk-images.s390
@@ -31,6 +31,7 @@ makeBootImages() {
$GENINITRDSZ $sz $TOPDESTPATH/images/initrd.size
cp -vf $KERNELROOT/boot/${KERNELNAME}-${version} $TOPDESTPATH/images/kernel.img
+ cp -v $BOOTDISKDIR/redhat.exec $TOPDESTPATH/images/redhat.exec
cp -v $BOOTDISKDIR/generic.prm $TOPDESTPATH/images/generic.prm
cp -v $BOOTDISKDIR/generic.ins $TOPDESTPATH/generic.ins
--
1.6.0.2
_______________________________________________
Anaconda-devel-list mailing list
Anaconda-devel-list@xxxxxxxxxx
https://www.redhat.com/mailman/listinfo/anaconda-devel-list
