#!/bin/bash
#
# Copyright (c) 2010, 2013, Oracle and/or its affiliates. All rights reserved.
# DO NOT ALTER OR REMOVE COPYRIGHT NOTICES OR THIS FILE HEADER.
# 
# This code is free software; you can redistribute it and/or modify it
# under the terms of the GNU General Public License version 2 only, as
# published by the Free Software Foundation.
# 
# This code 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
# version 2 for more details (a copy is included in the LICENSE file that
# accompanied this code).
# 
# You should have received a copy of the GNU General Public License version
# 2 along with this work; if not, write to the Free Software Foundation,
# Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301 USA.
# 
# Please contact Oracle, 500 Oracle Parkway, Redwood Shores, CA 94065 USA
# or visit www.oracle.com if you need additional information or have any
# questions.
#

#best pass rate at test 262 known
TEST262_PASS_AT_LEAST=435

RUN_TEST="true"
RUN_TEST262="true"
RUN_NODE="true"
KEEP_OUTPUT="true"
CLEAN_AND_BUILD_NASHORN="true"

#the stable node version to sync against
NODE_LAST_STABLE=v0.6.18

#parse args
for arg in $*
do
    if [ $arg = "--no-test" ]; then
	RUN_TEST="false"
	echo "**** WARNING - you have disabled 'ant test', which is a minimum checkin requirement..."
    elif [ $arg = "--no-262" ]; then
	RUN_TEST262="false"
    elif [ $arg = "--no-node" ]; then
	RUN_NODE="false"
    elif [ $arg = "--no-build" ]; then
	CLEAN_AND_BUILD_NASHORN="false"
    elif [ $arg = "--no-logs" ]; then
	KEEP_OUTPUT="false"
    fi
done

function lastpart() {        
    arr=$(echo $1 | tr "/" "\n")
    for x in $arr
    do
	_last=$x
    done
    echo $_last
}

function check_installed() {
    which $1 >/dev/null
    if [ $? -ne 0 ]; then
	echo "Error $1 not installed: $?"
	exit 2
    fi
}

check_installed hg
check_installed git
check_installed mv
check_installed git

PWD=$(pwd);

while [ -z $NASHORN_ROOT ]
do
    if [ -e $PWD/.hg ]; then
	NASHORN_ROOT=${PWD}
	break
    fi
    PWD=$(dirname ${PWD})
done

echo "Nashorn root detected at ${NASHORN_ROOT}"

COMMON_ROOT=$(dirname $NASHORN_ROOT)
echo "Common root is ${COMMON_ROOT}"

echo "Running checkintest..."

ABSOLUTE_NASHORN_HOME=$COMMON_ROOT/$(lastpart $NASHORN_ROOT)

if [ $CLEAN_AND_BUILD_NASHORN != "false" ]; then
    echo "Cleaning and building nashorn at $ABSOLUTE_NASHORN_HOME/nashorn..."
    $(cd $ABSOLUTE_NASHORN_HOME/nashorn; ant clean >/dev/null 2>/dev/null)
    $(cd $ABSOLUTE_NASHORN_HOME/nashorn; ant jar >/dev/null 2>/dev/null)
    echo "Done."
fi

function failure_check() {
    while read line
    do
	LINE=$(echo $line | grep "Tests run")    
	if [ "${LINE}" != "" ]; then
	    RESULT=$(echo $line | grep "Failures: 0" | grep "Errors: 0")
	    if [ "${RESULT}" == "" ]; then
		TESTNAME=$2
		echo "There were errors in ${TESTNAME} : ${LINE}"
		exit 1
	    fi
	fi
    done < $1
}

function test() {
    TEST_OUTPUT=$ABSOLUTE_NASHORN_HOME/$(mktemp tmp.XXXXX)
    echo "Running 'ant test' on nashorn from ${ABSOLUTE_NASHORN_HOME}/nashorn..."
    $(cd $ABSOLUTE_NASHORN_HOME/nashorn; ant test >$TEST_OUTPUT)
    echo "Done."

    failure_check $TEST_OUTPUT

    echo "**** SUCCESS: 'ant test' successful"

    if [ $KEEP_OUTPUT == "true" ]; then
	cp $TEST_OUTPUT ./checkintest.test.log
	rm -fr $TEST_OUTPUT
    fi
}

if [ $RUN_TEST != "false" ]; then
    test;
fi

function test262() {

    echo "Running 'ant test262parallel' on nashorn from ${ABSOLUTE_NASHORN_HOME}/nashorn..."
    TEST262_OUTPUT=$ABSOLUTE_NASHORN_HOME/$(mktemp tmp.XXXXX)

    echo "Looking for ${ABSOLUTE_NASHORN_HOME}/test/test262..."

    if [ ! -e $ABSOLUTE_NASHORN_HOME/nashorn/test/test262 ]; then
	echo "test262 is missing... looking in $COMMON_ROOT..."
	if [ ! -e $COMMON_ROOT/test262 ]; then
	    echo "... not there either... cloning from repo..."
	    hg clone http://hg.ecmascript.org/tests/test262 $COMMON_ROOT/test262 >/dev/null 2>/dev/null
	    echo "Done."
	fi
	echo "Adding soft link ${COMMON_ROOT}/test262 -> ${ABSOLUTE_NASHORN_HOME}/test/test262..."
	ln -s $COMMON_ROOT/test262 $ABSOLUTE_NASHORN_HOME/nashorn/test/test262
	echo "Done."
    fi

    echo "Ensuring test262 is up to date..."
    $(cd $ABSOLUTE_NASHORN_HOME/nashorn/test/test262; hg pull -u >/dev/null 2>/dev/null)
    echo "Done."

    echo "Running test262..."
    $(cd $ABSOLUTE_NASHORN_HOME/nashorn; ant test262parallel > $TEST262_OUTPUT)
    
    FAILED=$(cat $TEST262_OUTPUT|grep "Tests run:"| cut -d ' ' -f 15 |tr -cd '"[[:digit:]]')
    if [ $FAILED -gt $TEST262_PASS_AT_LEAST ]; then 
	echo "FAILURE: There are ${FAILED} failures in test262 and can be no more than ${TEST262_PASS_AT_LEAST}"
	cp $TEST262_OUTPUT ./checkintest.test262.log
	echo "See ./checkintest.test262.log"
	echo "Terminating due to error"
	exit 1
    elif [ $FAILED -lt $TEST262_PASS_AT_LEAST ]; then
	echo "There seem to have been fixes to 262. ${FAILED} < ${TEST262_PASS_AT_LEAST}. Please update limit in bin/checkintest.sh"
    fi
    
    echo "**** SUCCESS: Test262 passed with no more than ${TEST262_PASS_AT_LEAST} failures."

    if [ $KEEP_OUTPUT == "true" ]; then
	cp $TEST262_OUTPUT ./checkintest.test262.log
	rm -fr $TEST262_OUTPUT
    fi    
}

if [ $RUN_TEST262 != "false" ]; then
    test262;    
fi;

function testnode() {
    TESTNODEJAR_OUTPUT=$ABSOLUTE_NASHORN_HOME/$(mktemp tmp.XXXXX)
   
    echo "Running node tests..."
#replace node jar properties nashorn with this nashorn
    
    NODEJAR_PROPERTIES=~/nodejar.properties
    
    NODE_HOME=$(cat $NODEJAR_PROPERTIES | grep ^node.home | cut -f2 -d=)    
    NASHORN_HOME=$(cat $NODEJAR_PROPERTIES | grep ^nashorn.home | cut -f2 -d=)
    
    ABSOLUTE_NODE_HOME=$COMMON_ROOT/$(lastpart $NODE_HOME)    
    
    echo "Writing nodejar.properties..."

    cat > $NODEJAR_PROPERTIES << EOF
node.home=../node
nashorn.home=../$(lastpart $NASHORN_ROOT)
EOF
    echo "Done."
    echo "Checking node home ${ABSOLUTE_NODE_HOME}..."

    if [ ! -e $ABSOLUTE_NODE_HOME ]; then
	echo "Node base dir not found. Cloning node..."    
	$(cd $COMMON_ROOT; git clone https://github.com/joyent/node.git $(lastpart $NODE_HOME) >/dev/null 2>/dev/null)
	echo "Done."
	echo "Updating to last stable version ${NODE_LAST_STABLE}..."
	$(cd $ABSOLUTE_NODE_HOME; git checkout $NODE_LAST_STABLE >/dev/null 2>/dev/null)
	echo "Done."
	echo "Running configure..."
	$(cd $ABSOLUTE_NODE_HOME; ./configure >/dev/null 2>/dev/null)
	echo "Done."
    fi
    
    echo "Ensuring node is built..."
#make sure node is built
    $(cd $ABSOLUTE_NODE_HOME; make >/dev/null 2>/dev/null)
    echo "Done."

    NODEJAR_HOME=$COMMON_ROOT/nodejar

    if [ ! -e $NODEJAR_HOME ]; then
	echo "No node jar home found. cloning from depot..."
	$(cd $COMMON_ROOT; hg clone https://hg.kenai.com/hg/nodejs~source nodejar >/dev/null 2>/dev/null) 
	$(cd $COMMON_ROOT/nodejar; ant >/dev/null)
	echo "Done."
	echo "Copying node files..."
	$(cd $COMMON_ROOT/nodejar; ant copy-node-files >/dev/null 2>/dev/null)
	echo "Patching node files..."
	$(cd $COMMON_ROOT/nodejar; ant patch-node-files >/dev/null 2>/dev/null)
	echo "Done."
    fi
    
    echo "Ensuring node.jar is up to date from source depot..."
    $(cd $COMMON_ROOT/nodejar; hg pull -u >/dev/null 2>/dev/null)
    echo "Done."

    echo "Installing nashorn..."
    $(cd $COMMON_ROOT/nodejar; ant >/dev/null)
    echo "Done."

    echo "Running node.jar test..."
    $(cd $COMMON_ROOT/nodejar; mvn clean verify >$TESTNODEJAR_OUTPUT)
    echo "Done."

    failure_check $TESTNODEJAR_OUTPUT
    
    echo "**** SUCCESS: Node test successful."

    if [ $KEEP_OUTPUT == "true" ]; then
	rm -fr $TESTNODEJAR_OUTPUT
	cp $TESTNODEJAR_OUTPUT ./checkintest.nodejar.log
    fi
}

if [ $RUN_NODE != "false" ]; then
    testnode;
fi;

echo "Finished"