#!/bin/bash

######################################################################

#

#   tcar_setSubModuleEnvironment.sh -- This function initiates

#   modules' sub-module environments inside the centos-art.sh script.

#

#   Written by: 

#   * Alain Reguera Delgado <al@centos.org.cu>, 2009-2013

#

# Copyright (C) 2013 The CentOS Project

#

# 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.

#

# This program is distributed in the hope that it will be useful, but

# WITHOUT ANY WARRANTY; without even the implied warranty of

# MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU

# General Public License for more details.

#

# You should have received a copy of the GNU General Public License

# along with this program; if not, write to the Free Software

# Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.

#

######################################################################

function tcar_setSubModuleEnvironment {

    # Define sub-module's name (SUBMODULE_NAME) using the first

    # argument in the command-line.

    local SUBMODULE_NAME=$(tcar_getRepoName "${1}" "-f" | cut -d '-' -f1)

    # Define regular expression to match available sub-modules.

    local SUBMODULE_NAME_LIST=$(ls ${SUBMODULE_BASEDIR} \

        | tr '\n' '|' | sed -r 's/\|$//' | tr '[[:upper:]]' '[[:lower:]]')

    # Check sub-module's name possible values.

    if [[ ! ${SUBMODULE_NAME} =~ "^(${SUBMODULE_NAME_LIST})$" ]];then

        tcar_printMessage "`eval_gettext "The sub-module (\\\$SUBMODULE_NAME) isn't supported yet."`" --as-error-line

    fi

    # Define sub-module's directory.

    local SUBMODULE_DIR=${SUBMODULE_BASEDIR}/$(tcar_getRepoName "${SUBMODULE_NAME}" "-d")

    # Define sub-module's related directories.

    local SUBMODULE_DIR_MODULES=${SUBMODULE_DIR}/Modules

    local SUBMODULE_DIR_MANUALS=${SUBMODULE_DIR}/Manuals

    local SUBMODULE_DIR_CONFIGS=${SUBMODULE_DIR}/Configs

    # Reset sub-module's current directory.

    local SUBMODULE_BASEDIR=${SUBMODULE_DIR_MODULES}

    # Define sub-module's initialization file.

    local SUBMODULE_INIT_FILE=${SUBMODULE_DIR}/${SUBMODULE_NAME}.sh

    # Check function script execution rights.

    tcar_checkFiles -ex ${SUBMODULE_INIT_FILE}

    # Remove the first argument passed to centos-art.sh command-line

    # in order to build optional arguments inside functionalities. We

    # start counting from second argument on, inclusively.

    shift 1

    # Verify the number of arguments passed to centos-art.sh script.

    # By default, to all sub-modules, when no argument is provided

    # after the sub-module name, use the current directory as default

    # directory to look for configuration files.

    if [[ $# -eq 0 ]];then

        set -- ${PWD}

    fi

    # Load sub-module-specific (function) scripts into current

    # execution environment.

    tcar_setModuleEnvironmentScripts "${SUBMODULE_DIR}" "${SUBMODULE_NAME}" "${SUBMODULE_INIT_FILE}"

    # Execute sub-module-specific initialization script.

    ${SUBMODULE_NAME} "${@}"

    # Unset the sub-module environment.

    tcar_unsetModuleEnvironment "${SUBMODULE_NAME}"

}