#!/bin/bash

# -------------------------------------------------------------------------- #
# Copyright 2002-2015, OpenNebula Project (OpenNebula.org), C12G Labs        #
#                                                                            #
# 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.                                             #
#--------------------------------------------------------------------------- #

source $(dirname $0)/xenrc
source $(dirname $0)/../../scripts_common.sh

function error_exit() {
    exit_code=$1
    message=$2
    if [ "x$exit_code" != "x0" ]; then
        error_message $message
        exit $exit_code
    fi
}

domain=$1
id=$2
host=$3

mkdir -p `dirname $domain`
cat > $domain

output=`$XM_CREATE $domain`

error_exit $? "Unable to create domain"

domain_name=`grep -e '^name =' < $domain | cut -d= -f2 | tr -d ' ' | tr -d "\'" | cut -d' ' -f1`

out=`grep -e '^\#O CPU_CREDITS =' < $domain`

if [ "x$?" = "x0" ]; then
    credits=`echo $out | cut -d= -f2 | tr -d ' '`

    log_debug "Credits set to $credits"

    $XM_CREDITS -d $domain_name -w $credits

    if [ "x$?" != "x0" ]; then
        log_error "Unable to set VM credits"
    fi
fi

echo $domain_name

