#!/bin/sh
#----------------------------------------------------------------------------
# /var/install/bin/del-menu - delete menu
#
# Creation:     2001-12-09 ms
# Last Update:  $Id$
#
# Copyright (c) 2001-@@YEAR@@ the eisfair team, team(at)eisfair(dot)org
#
# Usage:
#
# old style version (for non XML-menus)
# -------------------------------------
#
# del-menu shell-script menu-file
#
#          shell-script  absolute filename of a shell-script
#
#          menu-file     absolute filename of menu-file
#
#                        The line containing
#                          shell-script
#                        is removed from the menu-file if the line exists
#
# new style version (for XML-menus)
# ---------------------------------
#
# del-menu [opt-parameter] menu-file sub-menu-file
# del-menu [opt-parameter] menu-file script-file
#
#      optional parameter:
#          --quiet        suppress all normal output
#
#          --package package
#                         use package="package" attribute to select correct line
#                         See description below!
#
#          menu-file      filename relativ to menupath /var/install/menu
#
#          sub-menu-file  filename relativ to menupath /var/install/menu
#
#                         The line containing
#                             <menu file="sub-menu-file">
#                         is removed from the menu-file if the line exists.
#
#          script-file    filename relativ to /var/install/bin or absolute path
#
#                         The line containing
#                             <script file="script-file">
#                         is removed from the menu-file if the line exists.
#
#          menu-file and sub-menu-file/script-file and comment have to be
#          the last parameters.
#
#     Additional description:
#     A menu file (example.menu) containing the following lines
#       <package mainpackage>
#       <menu                      file="sub.menu">Handling for mainpackage configuration</menu>
#       <menu package="subpackage" file="sub.menu">Handling for subpackage configuration</menu>
#     is a valid menu.
#
#     To identify the correct line that should be deleted
#     you have to use the --package package paramater.
#     The --package package paramater becomes mandatory in this case.
#
#       del-line example.menu sub.menu
#                will delete the first menu line
#       del-line --package subpackage example.menu sub.menu
#                will delete the second menu line
#
# 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 etc
. /var/install/include/eislib


SED='/usr/bin/sed'
GREP='/usr/bin/grep'

menu_path='/var/install/menu'

# ---------------------------------------------------------------------------
# work
# ---------------------------------------------------------------------------
work()
{
    if [ -f "${menu_path}/${menu_file}" ]
    then
        # new behavior XML-Menu

        # grep old lines
        old_line=$(${GREP} " file=\"${menu_cmd}\"" ${menu_path}/${menu_file})

        # extract correct lines if <menu and <script exist, in fact not possible
        old_line=$(echo "${old_line}" | ${GREP} -E "<(menu|script) ")

        if [ -n "${package_attr}" ]
        then
            # extract correct line using package attribut
            old_line=$(echo "${old_line}" | ${GREP} "${package_attr}")
        else
            # extract line without package attribut
            old_line=$(echo "${old_line}" | ${GREP} -v 'package=')
        fi

        # check if more than ONE line
        count=$(echo "${old_line}" | wc -l)
        if [ ${count:-0} -gt 1 ]
        then
            myecho --error "Error del-menu: duplicate lines / scrambled menu-file (${count}/1)"
            exit 1
        fi

        # escape slashes
        old_line=$(echo "${old_line}" | ${SED} 's|/|\\/|g')

        # check if line was found
        if [ -n "${old_line}" ]
        then
            # delete line from menu-file
            ${SED} -i "/^${old_line}\$/d" ${menu_path}/${menu_file}
        fi

        # remove by command
        #grep -vE "<(menu|script) file=\"$menu_cmd\">" $menu_path/$menu_file >/tmp/$menu_file.$$

        #cp /tmp/$menu_file.$$ $menu_path/$menu_file     # don't mv, keep permissions
        #rm -f /tmp/$menu_file.$$

    else
        # old behavior
        menu_item=${menu_file}
        menu_file=${menu_cmd}
        if [ -f ${menu_file} ]
        then

        # remove by path
        ${GREP} -v "^${menu_item} " ${menu_file} > ${menu_file}.$$

        cp ${menu_file}.$$ ${menu_file}      # don't mv, keep permissions
        rm -f ${menu_file}.$$
        else
            myecho --error "Error del-menu: menu-file ${menu_file} does not exist"
            exit 1
        fi
    fi
}

# ---------------------------------------------------------------------------
# myecho
# ---------------------------------------------------------------------------
myecho()
{
    if ! ${quiet:-false}
    then
        mecho ${1} "${2}"
    fi
}

# ---------------------------------------------------------------------------
# check numbers sof arguments
# ---------------------------------------------------------------------------
check_num_argv()
{
    local argv=${1}
    local max=${2}

    # check number of arguments
    if [ ${argv} -lt 2 ]
    then
        myecho --error "Error del-menu: wong number of arguments (${argv}/minimum 2)"
        exit 1
    elif [ ${argv} -gt ${max} ]
    then
        myecho --error "Error del-menu: wong number of arguments (${argv}/maximum ${max})"
        exit 1
    fi
}

# ---------------------------------------------------------------------------
# main
# ---------------------------------------------------------------------------
main()
{
    check_num_argv ${#} 5

    # check arguments
    while [ ${#} -gt 0 ]
    do
        case "${1}" in
        '--quiet')
            quiet=true
            shift
            ;;
        "--package")
            shift
            package="${1}"
            package_attr="package=\"${1}\" "
            shift
            ;;
       *)
            check_num_argv ${#} 2

            menu_file="${1}"
            menu_cmd="${2}"
            shift 2
            ;;
        esac
    done

    work
}

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

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