#!/bin/bash

ALL_KERNELS="all.kernels"

function f() { 
    echo -n "."
    v=`perl -Iperl-install -Mmodules -e "print qq(\\$_.o\n) foreach modules::module_of_type__4update_kernel(\"$1\")"` 
}

function create_marfile() {
    marfile=$1
    shift
    for i in $*
    do
	j=`basename $i .o`
        needed=`cat modules.dep | perl -ne "print "'$1'" if /^$j: (.*)/"`
        for k in $needed
	do
	    [ -z "`echo $* | grep $k`" ] \
              && [ -z "`echo $PCMCIA_COREMODULES | grep $k`" ] \
              && echo "WARNING! in $marfile, $k is missing (required by $i)"
        done
    done
    $GIBASEDIR/mdk-stage1/mar/mar -c $marfile $(ls $*)
}

function create_modules() {
    kernel_path=$1
    kern=$2
    echo "Updating modules in '`pwd`' for kernel '$kern'"
    cp -f `find $kernel_path/lib/modules/ -name "*.o"` .
    /sbin/depmod -F $kernel_path/boot/System.map* -e *.o | perl -pe 's/\\\n//' \
	| perl -ne 's/\.o//g; s/[ \t]+/ /g; print if /: /' > modules.dep
    perl -pi -e 's/((plip|ppa|imm): parport)/$1 parport_pc/' modules.dep
    ls *.o               | packdrake -b9s modules.cz 400000
    mv modules.cz "../modules.cz$kern"
    create_marfile network_modules.mar  $NETWORK_MODULES $GENERIC_MODULES
    create_marfile cdrom_modules.mar    $CDROM_MODULES $GENERIC_MODULES
    create_marfile hd_modules.mar       $HD_MODULES $GENERIC_MODULES
    create_marfile pcmcia_modules.mar   $PCMCIA_MODULES $PCMCIA_COREMODULES $GENERIC_MODULES
    create_marfile other_modules.mar    $BIG_MODULES $GENERIC_MODULES
    create_marfile all_modules.mar      $ALL_MODULES $GENERIC_MODULES
    rm -f $ALL_MODULES $PCMCIA_COREMODULES $NOT_USEFULL_IN_STAGE1 # leave in the directory non-install1 used modules
}


ARCH=`uname -m | sed -e 's/i.86/i386/' -e 's/sparc.*/sparc/'`

echo -n "Finding modules categories"
f "scsi" ; SCSI_DRIVERS=$v
f "disk" ; DISK_DRIVERS=$v
f "net" ; NETWORK_DRIVERS=$v
f "scsi cdrom" ; CD_DRIVERS=$v
f "pcmcia net_raw cdrom_raw scsi_raw disk_raw" ; PCMCIA_DRIVERS=$v
f "big net_raw cdrom_raw scsi_raw disk_raw" ; BIG_DRIVERS=$v
f "pcmcia net cdrom scsi disk keepbig" ; ALL_DRIVERS=$v
[ $ARCH == "i386" ] && DOSMODULES="vfat.o fat.o"
echo "done."

NETWORK_MODULES="  $NETWORK_DRIVERS"
CDROM_MODULES="    $CD_DRIVERS"
HD_MODULES="       $DOSMODULES $SCSI_DRIVERS $DISK_DRIVERS loop.o isofs.o reiserfs.o"
PCMCIA_MODULES="   $DOSMODULES $PCMCIA_DRIVERS"
BIG_MODULES="      $BIG_DRIVERS"
ALL_MODULES="      $DOSMODULES $ALL_DRIVERS loop.o isofs.o reiserfs.o"
NOT_USEFULL_IN_STAGE1="nls_*.o parport_probe.o raid*.o serial.o smbfs.o usb-*.o"

GENERIC_MODULES="isa-pnp.o floppy.o"

PCMCIA_COREMODULES="pcmcia_core.o tcic.o ds.o i82365.o"


if [ "$ARCH" == "i386" ]; then
    for i in $ALL_KERNELS/*/boot/vmlinuz*; do
	#disable any existing resolution!!!
	/usr/sbin/rdev -v $i 65535 #788 #785 
    done
else
    if [ "$ARCH" == "ppc" ]; then
        cp -f "$KERNEL_BOOT_PATH"/boot/vmlinux .
    else
        cp -f "$KERNEL_BOOT_PATH"/boot/vmlinux.gz .
    fi
fi


GIBASEDIR=`pwd`

rm -rf all.modules ; mkdir all.modules
rm -rf $ALL_KERNELS/cardmgr
for i in $ALL_KERNELS/*; do
	[ -d $ALL_KERNELS/cardmgr ] || mkdir $ALL_KERNELS/cardmgr
	kern=`basename $i`
	[ -e $i/cardmgr ] && (
	    cd $i/cardmgr
	    echo "int main(int argc, char **argv) { cardmgr_main(argc, argv); }" > main.c
	    gcc -o cardmgr *.o main.c
	    cp cardmgr $GIBASEDIR/$ALL_KERNELS/cardmgr/cardmgr$kern
	)
	( mkdir all.modules/$kern ; cd all.modules/$kern
	create_modules ../../$i $kern ; cd ../.. )
done


# v=kernel-2.2.17-BOOT3.tar.bz2
# scp kenobi:~chmou/work/kernel/archive/$v /tmp
# cd ~/gi/kernel ; rm -rf * ; tar xfI /tmp/$v 
# cd ~/gi ; ./update_kernel ; rm -f network.rdz ; ./make_boot_img network.rdz network ; scp vmlinuz network.rdz kenobi:/tftpboot ; cp -f ~/gi/modules/modules.cz /export/Mandrake/mdkinst/lib/modules.cz