Poorog

#!/bin/bash

# by Chris Kloiber <ckloiber@redhat.com>

# A quick hack that will create a bootable DVD iso of a Red Hat Linux
# Distribution. Feed it either a directory containing the downloaded
# iso files of a distribution, or point it at a directory containing
# the "RedHat", "isolinux", and "images" directories.

# This version only works with "isolinux" based Red Hat Linux versions.

# Lots of disk space required to work, 3X the distribution size at least.

# GPL version 2 applies. No warranties, yadda, yadda. Have fun.

if [ $# -lt 2 ]; then
 echo "Usage: `basename $0` source /destination/DVD.iso"
 echo ""
 echo "        The 'source' can be either a directory containing a single"
 echo "        set of isos, or an exploded tree like an ftp site."
 exit 1
fi

cleanup() {
[ ${LOOP:=/tmp/loop} = "/" ] && echo "LOOP mount point = \/, dying!" && exit
[ -d $LOOP ] && rm -rf $LOOP
[ ${DVD:=~/mkrhdvd} = "/" ] && echo "DVD data location is \/, dying!" && exit
[ -d $DVD ] && rm -rf $DVD
}

cleanup
mkdir -p $LOOP
mkdir -p $DVD

if [ !`ls $1/*.iso 2>&1>/dev/null ; echo $?` ]; then
 echo "Found ISO CD images..."
 CDS=`expr 0`
 DISKS="1"

 for f in `ls $1/*.iso`; do
  mount -o loop $f $LOOP
  cp -av $LOOP/* $DVD
  if [ -f $LOOP/.discinfo ]; then
   cp -av $LOOP/.discinfo $DVD
   CDS=`expr $CDS + 1`
   if [ $CDS != 1 ] ; then
                         DISKS=`echo ${DISKS},${CDS}`
                 fi
  fi
  umount $LOOP
 done
 if [ -e $DVD/.discinfo ]; then
  awk '{ if ( NR == 4 ) { print disks } else { print ; } }' disks="$DISKS" $DVD/.discinfo > $DVD/.discinfo.new
  mv $DVD/.discinfo.new $DVD/.discinfo
 fi
else
 echo "Found FTP-like tree..."
 cp -av $1/* $DVD
 [ -e $1/.discinfo ] && cp -av $1/.discinfo $DVD
fi

rm -rf $DVD/isolinux/boot.cat
find $DVD -name TRANS.TBL | xargs rm -f

cd $DVD
mkisofs -J -R -v -T -o $2 -b isolinux/isolinux.bin -c isolinux/boot.cat -no-emul-boot -boot-load-size 4 -boot-info-table .
/usr/lib/anaconda-runtime/implantisomd5 --force $2

cleanup
echo ""
echo "Process Complete!"
echo ""