#!/bin/sh

# Auto conversion of a single 32-bit or 64-bit x86 RPM to DEB and indexing
# of the DEB repository
# Needed to be installed (script runs only on x86_64/amd64):
# fakeroot, alien, linux32 (util-linux), ia32-libs, apt-utils (or
# apt-ftparchive)

maindir=/srv/www/openprinting/download/printdriver
mainurl=http://www.openprinting.org/download/printdriver

echo 

mkdir -p $maindir/debian
cd $maindir

if [ $# = 1 ]; then

    if [ ! -f $1 ]; then
	echo "Non-existent file."
	exit 1
    fi

    file=`readlink -fn $1`
    shortfile=`basename $file`

    componentexceptions=../components.lst
    #list=`( cd /srv/www/openprinting/; ./query.php type=driver moreinfo=1 onlydriverpackages=1 ) | egrep '^([^ ]| *File:.*)' | sed -e s/File://`
    component() {
	local component i
	for i in $list; do
	    if echo $i | grep -q '\.'; then 
		if [ $1 == $i ]; then
		    echo $component
		    break
		fi
	    else component=$i
	    fi
	done
	echo lsbddk
    }

    #Set up temporary directory
    if [ -e tmp ]; then 
	rm -r tmp
    fi
    mkdir tmp
    cd tmp
                
    #Detect LSB version and architecture from filename
    lsbrelease=`echo "$file" | perl -e '<> =~ /lsb([0-9\.]+).(x86_64|i486|noarch).rpm$/; print $1'`
    arch=`echo "$file" | perl -e '<> =~ /(x86_64|i486|noarch).rpm$/; print $1'`
    echo "LSB Version:  $lsbrelease"
    echo "Architecture: $arch"

    echo "Converting package $shortfile to Debian format ..."
    fakeroot alien -ckg "$file" || exit 1
    d=`echo "$file" | perl -p -e 's/^.*?([^\/]*)-[a-zA-Z\d\.]+lsb[\d\.]+\.[^\.]+\.rpm/\1/i'`
    cd $d
    if [ "$arch" != "noarch" ]; then
	perl -p -i -e 's/^(\s*Depends:\s*).*$/\1lsb (>= '$lsbrelease')/' debian/control
    fi
    perl -p -i -e 's/(dh_(shlibdeps|installchangelogs|installdocs))/\#\1/' debian/rules

    case $arch in
	x86_64)
	    dpkg-buildpackage -aamd64 -rfakeroot -us -uc || exit
	    ;;
	i486)
	    dpkg-buildpackage -ai386 -rfakeroot -us -uc || exit
	    ;;
	noarch)
	    dpkg-buildpackage -rfakeroot -us -uc || exit
	    ;;
	*)
	    echo "Not an appropriate architecture!"
	    exit 1
	    ;;
    esac

    echo
    echo
    echo

    cd ..

    #Some stuff... it's Perl, it's dark, evil magic...
    for p in *.deb; do
	echo Moving package into repository ...
	arch=`echo "$p" | perl -e '<> =~ /_([^_]+).deb$/; print $1'`  # all i386 amd64
	component=`perl -e 'open F, "< '"$componentexceptions"'"; while ($l = <F>) {($re, $c) = split / /, $l; if ("'"$p"'" =~ /$re/) {print "$c"; last}} close F;'`
	if [ ! -n "$component" ]; then
	    component=`echo "$p" | perl -e '<> =~ /^([^_]+)_\d/; print $1' | perl -p -e 's/^openprinting-(ppds-|)//'`
	fi

	#If no architecture (_all.deb) then place file in all architecture directories
	if [ $arch = 'all' ]; then
	    arch='amd64 i386'
	fi
	
	# Place file in proper directory
	for a in $arch; do
	    # Update the component directory with new file, deleting all old
	    # Generate file mask to delete old files
	    match=`echo "$p" | perl -e '$q = <>; $q =~ /([a-zA-Z0-9\.-]+_)[a-zA-Z0-9\.-]+(_[a-zA-Z0-9\.-]+\.deb)$/; print "$1*$2";'`
	    # Create directory if not yet done
	    mkdir -p ../debian/dists/lsb$lsbrelease/$component/binary-$a/ || exit 1
	    # Remove old versions
	    rm -f ../debian/dists/lsb$lsbrelease/$component/binary-$a/$match
	    # Copy new version of file
	    cp "$p" ../debian/dists/lsb$lsbrelease/$component/binary-$a/ || exit 1
	done

    done
		
    #Clean up temp directory
    cd ..
    rm -r tmp
else
    # Re-index-only mode
    echo No package update, only re-indexing the repository ...
    echo
fi

echo Indexing Debian repository ...

# Remove old .db files, their format can change between apt versions
find debian -name "*.db" | xargs rm

# Generate configuration files
cat > debian/apt-ftparchive.conf <<EOF
Dir {
  ArchiveDir "$maindir/debian";
  CacheDir "$maindir/debian/cache";
};

EOF

for lsbrelease in 3.1 3.2; do
    components=`(cd debian/dists/lsb$lsbrelease/; ls -1d */.) | cut -d / -f 1`
    components=`echo $components`
    echo $components
    #perl -p -i -e 's/(Sections\s+\")[^\"]*(\";)/$1'"$components"'$2/' debian/apt-ftparchive.conf
    cat >> debian/apt-ftparchive.conf <<EOF
Tree "dists/lsb$lsbrelease" {
  Sections "$components";
  Architectures "i386 amd64";
};
EOF
    #perl -p -i -e 's/(::Components\s+\")[^\"]*(\";)/$1'"$components"'$2/' debian/apt-lsb3.2-release.conf
    cat > debian/apt-lsb$lsbrelease-release.conf <<EOF
APT::FTPArchive::Release::Origin \"$mainurl/debian/\";
APT::FTPArchive::Release::Label "printdriver";
APT::FTPArchive::Release::Suite "lsb$lsbrelease";
APT::FTPArchive::Release::Codename "lsb$lsbrelease";
APT::FTPArchive::Release::Architectures "i386 amd64";
APT::FTPArchive::Release::Components "$components";
APT::FTPArchive::Release::Description "Distribution-independent printer driver packages in Debian package format, for LSB-$lsbrelease-based distros";
EOF
done

# Do the actual indexing
apt-ftparchive generate debian/apt-ftparchive.conf || exit 1
for lsbrelease in 3.1 3.2; do
    apt-ftparchive -c debian/apt-lsb$lsbrelease-release.conf release $maindir/debian/dists/lsb$lsbrelease > $maindir/debian/dists/lsb$lsbrelease/Release || exit 1
done
echo Done.

echo 
exit 0