#! /bin/sh
#----------------------------------------------------------------------------
# del-package - delete package
#
# Creation:     2001-12-09  ms
# Last Update:  $Id$
#
# Copyright (c) 2001-2002 Michell Schimanski, m.schimanski@tu-bs.de
# Copyright (c) 2003-@@YEAR@@ the eisfair team, team(at)eisfair(dot)org
#
# This program is free software; you can redistribute it and/or modify
# it under the terms of the GNU General Public License as published by
# the Free Software Foundation; either version 2 of the License, or
# (at your option) any later version.
#----------------------------------------------------------------------------

# include eislib
. /var/install/include/eislib

# include packagelib
. /var/install/include/packagelib

# ---------------------------------------------------------------------------
# usage
# ---------------------------------------------------------------------------
usage ()
{
cat <<EOF

 Usage:
 ${0}
            -p         package name
            --update   (optional, with update)
EOF
}

# ---------------------------------------------------------------------------
# parse package file and import result
# ---------------------------------------------------------------------------
import_package_info()
{
    # parse old info file
    _parse_outfile=`/bin/mktemp -t parse.XXXXXXXXXX`
    parse_infofile -i "${packagename}" -v "DP" -o ${_parse_outfile}
    . ${_parse_outfile}
    rm -f ${_parse_outfile}
}

# ---------------------------------------------------------------------------
# log result of uninstall routine
# ---------------------------------------------------------------------------
log_result()
{
    /usr/bin/logger -t "${m_logger}" -p "local5.info" \
        "package ${packagename} (${DP_PACKAGE_VERSION}|${DP_PACKAGE_DATE}) ${1}"
}

# ---------------------------------------------------------------------------
# unintall package using package file list
# ---------------------------------------------------------------------------
uninstall_by_package_script()
{
    # modify file permissions
    chmod 0750 /var/install/deinstall/${packagename}

    # convert the file to unix :-(
    /usr/local/bin/dtou /var/install/deinstall/${packagename}

    # import information from package file for logging
    import_package_info

    # execute deinstallation and verify result
    /var/install/deinstall/${packagename} ${update}
    rtc=${?}

    if [ ${rtc} -eq 0 ]
    then
        # make sure uninstall script is removed too
        rm -f /var/install/packages/${packagename}

        # log result and exit with success code 0
        log_result "without error"
        return 0
    else
        # log result and exit with error code 1
        log_result "with error(s) (${rtc}/0)"
        return 1
    fi
}

# ---------------------------------------------------------------------------
# unintall package using file list information
# ---------------------------------------------------------------------------
uninstall_by_filelist()
{
    filelist=/etc/filelist.d/${packagename}-files.txt

    # import information from package file for logging
    import_package_info

    # process file list info and remove files
    while read id perm user group packname file
    do
        case ${id} in
        b|u|s)
            # remove program files
            if [ "${file}" != "tmp/install.sh" \
              -a "${file}" != "tmp/preinstall.sh" ]
            then
                rm -f /${file}
            fi
            ;;
        f)
            # remove directories
            rmdir --ignore-fail-on-non-empty /${file} 2>/dev/null
            ;;
        esac
    done < ${filelist}

    # make sure the file list is removed too
    rm -f ${filelist}

    # log result and exit with success code 0
    # this procedure will never fail.. hopefully ;-)
    log_result "without error"
    return 0
}


deinstall_package()
{
    packagename=${1}

    # check if update is possible
    if [ -f /var/install/deinstall/${packagename}  \
      -o -f /etc/filelist.d/${packagename}-files.txt ]
    then
        # execute deinstallation
        if [ -f /var/install/deinstall/${packagename} ]
        then
            if uninstall_by_package_script
            then
                rtc=0
            fi
        else
            uninstall_by_filelist
            rtc=0
        fi

        # show result on screen
        if [ ${rtc:-1} -eq 0 ]
        then
            if ! ${m_update}
            then
                # don't show remove message when processing update
                echo "Package ${packagename} removed."
            fi
        else
            mecho --warn "Package ${packagename} NOT removed."
        fi
    else
        # missing either file list or deinstall script
        if ! ${m_update}
        then
            echo "Unable to deinstall package ${packagename}!"
        fi
    fi

    return ${rtc:-1}
}


# ---------------------------------------------------------------------------
# main
# ---------------------------------------------------------------------------
main()
{
    if [ ${#} -eq 0 ]
    then
        usage
        exit 1
    fi

    # parse command line arguments
    update=''
    m_update=false
    m_logger='eis-deinstall'
    while [ ${#} -gt 0 ]
    do
        case "${1}" in
            -h|--help)
                usage
                exit 1
            ;;
            --update|update)
                update="${1}"
                m_update=true
                m_logger='eis-update'
                shift
            ;;
            -p)
                package="${2}"
                shift; shift
            ;;
            *)
                package="${1}"
                shift
            ;;
        esac
    done

    # first check if package realy exists. If not, we are done
    if [ ! -f /var/install/packages/${package} ]
    then
        # package does not exist
        exit 0
    fi

    # uninstallation is done in several steps, since some library
    # packages come with -dev and -dev-static counterparts that
    # also have to be removed (in case this is not a deinstallation
    # during an update procedure)

    # step 1: uninstall the given package
    if ! deinstall_package ${package}
    then
        exit 1
    fi

    # step 2: if we are uninstalling a library, remove -dev package too
    if [ ${m_update} = "false" -a -f /var/install/packages/${package}-dev ]
    then
        if ! deinstall_package ${package}-dev
        then
            exit 1
        fi
    fi

    # step 3: if we are uninstalling a library, remove -dev package too
    if [ ${m_update} = "false" -a -f /var/install/packages/${package}-dev-static ]
    then
        if ! deinstall_package ${package}-dev-static
        then
            exit 1
        fi
    fi

    # step 4: if we only uninstall a lib-dev package, the lib-dev-static
    # package must be uninstalled to
    if [ ${m_update} = "false" -a -f /var/install/packages/${package}-static ]
    then
        if ! deinstall_package ${package}-static
        then
            exit 1
        fi
    fi

    exit 0
}

# ---------------------------------------------------------------------------
# call function main
# ---------------------------------------------------------------------------
main "${@}"

# ---------------------------------------------------------------------------
# end
# ---------------------------------------------------------------------------