#!/bin/bash

# -------------------------------------------------------------------------- #
# Copyright 2002-2013, OpenNebula Project Leads (OpenNebula.org)             #
#                                                                            #
# Licensed under the Apache License, Version 2.0 (the "License"); you may    #
# not use this file except in compliance with the License. You may obtain    #
# a copy of the License at                                                   #
#                                                                            #
# http://www.apache.org/licenses/LICENSE-2.0                                 #
#                                                                            #
# Unless required by applicable law or agreed to in writing, software        #
# distributed under the License is distributed on an "AS IS" BASIS,          #
# WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied.   #
# See the License for the specific language governing permissions and        #
# limitations under the License.                                             #
#--------------------------------------------------------------------------- #

# ln fe:SOURCE host:remote_system_ds/disk.i vmid dsid
#   - fe is the front-end hostname
#   - SOURCE is the path of the disk image in the form DS_BASE_PATH/disk
#   - host is the target host to deploy the VM
#   - remote_system_ds is the path for the system datastore in the host
#   - vmid is the id of the VM
#   - dsid is the target datastore (0 is the system datastore)

SRC=$1
DST=$2

VMID=$3
DSID=$4

if [ -z "${ONE_LOCATION}" ]; then
    TMCOMMON=/var/lib/one/remotes/tm/tm_common.sh
else
    TMCOMMON=$ONE_LOCATION/var/remotes/tm/tm_common.sh
fi

. $TMCOMMON

#-------------------------------------------------------------------------------
# Retrieve needed information, set dst path and dir
#-------------------------------------------------------------------------------
DST_PATH=`arg_path $DST`
DST_HOST=`arg_host $DST`
DST_DIR=`dirname $DST_PATH`

SRC_ARG_PATH=`arg_path $SRC`

DST_DS_PATH="$(dirname $(dirname $(dirname $DST_PATH)))"
SRC_DS_PATH="$(dirname $(dirname $SRC_ARG_PATH))"

SRC_PATH="${DST_DS_PATH}${SRC_ARG_PATH##$SRC_DS_PATH}"

USE_SSH=$(get_tm_use_ssh $DSID)

#-------------------------------------------------------------------------------
# Link (ln) SRC into DST
#-------------------------------------------------------------------------------

if [ "$USE_SSH" == "yes" ]; then

    # Let's check if it is a CDROM
    DISK_ID=$(echo "$DST_PATH" | $AWK -F. '{print $NF}')
    XPATH="${DRIVER_PATH}/../../datastore/xpath.rb --stdin"
    DRIVER_PATH=$(dirname $0)

    unset i XPATH_ELEMENTS
     
    while IFS= read -r -d '' element; do
        XPATH_ELEMENTS[i++]="$element"
    done < <(onevm show -x $VMID| $XPATH \
                        /VM/TEMPLATE/DISK[DISK_ID=$DISK_ID]/TYPE )

    DISK_TYPE="${XPATH_ELEMENTS[0]}"

    if [ "$DISK_TYPE" != "CDROM"]; then
        ssh_make_path $DST_HOST $DST_PATH

        log "Link all files in $SRC_PATH to $DST_PATH"

LINK_SCRIPT=$(cat <<EOF
for file in \$(find $SRC_PATH -type f); do
    (cd $DST_PATH ; ln -sf \$file)
done
EOF
)
        ssh_exec_and_log $DST_HOST "$LINK_SCRIPT" \
              "Could not link dir files from $SRC_PATH to $DST_PATH"
    else
        # Just need to create the /<vid> folder, not the disk.<n> as well
        ssh_make_path $DST_HOST $(dirname $DST_PATH)

        log "Link CD-ROM from $SRC_PATH to $DST_PATH"

LINK_SCRIPT=$(cat <<EOF
ln -s $SRC_PATH $DST_PATH.iso
EOF
)
        ssh_exec_and_log $DST_HOST "$LINK_SCRIPT" \
              "Could not link CDROM ISO file from $SRC_PATH to system $DST_PATH"
    fi
else
    log "Cannot link files without SSH enabled on the ESX hosts, calling clone"
    exec $(dirname $0)/clone $*
fi

exit 0
