#

# Copyright (c) 2016, 2017, 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.  Oracle designates this

# particular file as subject to the "Classpath" exception as provided

# by Oracle in the LICENSE file that accompanied this code.

#

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

#

default: all

include $(SPEC)

include MakeBase.gmk

include FindTests.gmk

# We will always run multiple tests serially

.NOTPARALLEL:

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

# Parse global control variables

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

ifneq ($(TEST_VM_OPTS), )

  ifneq ($(TEST_OPTS), )

    TEST_OPTS := $(TEST_OPTS);VM_OPTIONS=$(TEST_VM_OPTS)

  else

    TEST_OPTS := VM_OPTIONS=$(TEST_VM_OPTS)

  endif

endif

$(eval $(call ParseKeywordVariable, TEST_OPTS, \

    SINGLE_KEYWORDS := JOBS TIMEOUT_FACTOR, \

    STRING_KEYWORDS := VM_OPTIONS JAVA_OPTIONS, \

))

# Helper function to propagate TEST_OPTS values.

#

# Note: No spaces are allowed around the arguments.

# Arg $1 The variable in TEST_OPTS to propagate

# Arg $2 The control variable to propagate it to

define SetTestOpt

  ifneq ($$(TEST_OPTS_$1), )

    $2_$1 := $$(TEST_OPTS_$1)

  endif

endef

# Setup _NT_SYMBOL_PATH on Windows

ifeq ($(OPENJDK_TARGET_OS), windows)

  ifndef _NT_SYMBOL_PATH

    # Can't use PathList here as it adds quotes around the value.

    _NT_SYMBOL_PATH := \

        $(subst $(SPACE),;, $(foreach p, $(sort $(dir $(wildcard \

        $(addprefix $(SYMBOLS_IMAGE_DIR)/bin/, *.pdb */*.pdb)))), $(call FixPath, $p)))

    export _NT_SYMBOL_PATH

    $(info _NT_SYMBOL_PATH $(_NT_SYMBOL_PATH))

  endif

endif

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

# Hook to include the corresponding custom file, if present.

$(eval $(call IncludeCustomExtension, RunTests.gmk))

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

TEST_RESULTS_DIR := $(OUTPUTDIR)/test-results

TEST_SUPPORT_DIR := $(OUTPUTDIR)/test-support

TEST_SUMMARY := $(TEST_RESULTS_DIR)/test-summary.txt

TEST_LAST_IDS := $(TEST_SUPPORT_DIR)/test-last-ids.txt

ifeq ($(CUSTOM_ROOT), )

  JTREG_TOPDIR := $(TOPDIR)

else

  JTREG_TOPDIR := $(CUSTOM_ROOT)

endif

JTREG_FAILURE_HANDLER_DIR := $(TEST_IMAGE_DIR)/failure_handler

JTREG_FAILURE_HANDLER := $(JTREG_FAILURE_HANDLER_DIR)/jtregFailureHandler.jar

ifneq ($(wildcard $(JTREG_FAILURE_HANDLER)), )

  JTREG_FAILURE_HANDLER_OPTIONS := \

      -timeoutHandlerDir:$(JTREG_FAILURE_HANDLER) \

      -observerDir:$(JTREG_FAILURE_HANDLER) \

      -timeoutHandler:jdk.test.failurehandler.jtreg.GatherProcessInfoTimeoutHandler \

      -observer:jdk.test.failurehandler.jtreg.GatherDiagnosticInfoObserver \

      -timeoutHandlerTimeout:0

endif

GTEST_LAUNCHER_DIRS := $(patsubst %/gtestLauncher, %, $(wildcard $(TEST_IMAGE_DIR)/hotspot/gtest/*/gtestLauncher))

GTEST_VARIANTS := $(strip $(patsubst $(TEST_IMAGE_DIR)/hotspot/gtest/%, %, $(GTEST_LAUNCHER_DIRS)))

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

# Setup global test running parameters

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

# Each factor variable comes in 3 variants. The first one is reserved for users

# to use on command line. The other two are for predifined configurations in JDL

# and for machine specific configurations respectively.

TEST_JOBS_FACTOR ?= 1

TEST_JOBS_FACTOR_JDL ?= 1

TEST_JOBS_FACTOR_MACHINE ?= 1

ifeq ($(TEST_JOBS), 0)

  # Concurrency based on min(cores / 2, 12) * TEST_JOBS_FACTOR

  TEST_JOBS := $(shell $(AWK) \

    'BEGIN { \

      c = $(NUM_CORES) / 2; \

      if (c > 12) c = 12; \

      c = c * $(TEST_JOBS_FACTOR); \

      c = c * $(TEST_JOBS_FACTOR_JDL); \

      c = c * $(TEST_JOBS_FACTOR_MACHINE); \

      if (c < 1) c = 1; \

      printf "%.0f", c; \

    }')

endif

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

# Parse control variables

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

ifneq ($(TEST_OPTS), )

  # Inform the user

  $(info Running tests using TEST_OPTS control variable '$(TEST_OPTS)')

endif

$(eval $(call SetTestOpt,VM_OPTIONS,JTREG))

$(eval $(call SetTestOpt,JAVA_OPTIONS,JTREG))

$(eval $(call SetTestOpt,VM_OPTIONS,GTEST))

$(eval $(call SetTestOpt,JAVA_OPTIONS,GTEST))

$(eval $(call SetTestOpt,JOBS,JTREG))

$(eval $(call SetTestOpt,TIMEOUT_FACTOR,JTREG))

$(eval $(call ParseKeywordVariable, JTREG, \

    SINGLE_KEYWORDS := JOBS TIMEOUT_FACTOR TEST_MODE ASSERT VERBOSE RETAIN MAX_MEM \

        EXTRA_PROBLEM_LISTS KEYWORDS, \

    STRING_KEYWORDS := OPTIONS JAVA_OPTIONS VM_OPTIONS, \

))

ifneq ($(JTREG), )

  # Inform the user

  $(info Running tests using JTREG control variable '$(JTREG)')

endif

$(eval $(call ParseKeywordVariable, GTEST, \

    SINGLE_KEYWORDS := REPEAT, \

    STRING_KEYWORDS := OPTIONS VM_OPTIONS JAVA_OPTIONS, \

))

ifneq ($(GTEST), )

  # Inform the user

  $(info Running tests using GTEST control variable '$(GTEST)')

endif

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

# Component-specific Jtreg settings

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

hotspot_JTREG_MAX_MEM := 0

hotspot_JTREG_ASSERT := false

hotspot_JTREG_NATIVEPATH := $(TEST_IMAGE_DIR)/hotspot/jtreg/native

jdk_JTREG_NATIVEPATH := $(TEST_IMAGE_DIR)/jdk/jtreg/native

jdk_JTREG_PROBLEM_LIST += $(TOPDIR)/test/jdk/ProblemList.txt

jaxp_JTREG_PROBLEM_LIST += $(TOPDIR)/test/jaxp/ProblemList.txt

langtools_JTREG_PROBLEM_LIST += $(TOPDIR)/test/langtools/ProblemList.txt

nashorn_JTREG_PROBLEM_LIST += $(TOPDIR)/test/nashorn/ProblemList.txt

hotspot_JTREG_PROBLEM_LIST += $(TOPDIR)/test/hotspot/jtreg/ProblemList.txt

langtools_JTREG_MAX_MEM := 768m

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

# Parse test selection

#

# The user has given a test selection in the TEST variable. We must parse it

# and determine what that means in terms of actual calls to the test framework.

#

# The parse functions take as argument a test specification as given by the

# user, and returns a fully qualified test descriptor if it was a match, or

# nothing if not. A single test specification can result in multiple test

# descriptors being returned. A valid test descriptor must always be accepted

# and returned identically.

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

# Helper function to determine if a test specification is a Gtest test

#

# It is a Gtest test if it is either "gtest", or "gtest:" followed by an optional

# test filter string, and an optional "/<variant>" to select a specific JVM

# variant. If no variant is specified, all found variants are tested.

define ParseGtestTestSelection

  $(if $(filter gtest%, $1), \

    $(if $(filter gtest, $1), \

      $(addprefix gtest:all/, $(GTEST_VARIANTS)) \

    , \

      $(if $(strip $(or $(filter gtest/%, $1) $(filter gtest:/%, $1))), \

        $(patsubst gtest:/%, gtest:all/%, $(patsubst gtest/%, gtest:/%, $1)) \

      , \

        $(if $(filter gtest:%, $1), \

          $(if $(findstring /, $1), \

            $1 \

          , \

            $(addprefix $1/, $(GTEST_VARIANTS)) \

          ) \

        ) \

      ) \

    ) \

  )

endef

# Helper function that removes the TOPDIR part

CleanupJtregPath = \

  $(strip $(patsubst %/, %, $(subst $(JTREG_TOPDIR)/,, $1)))

# Take a partial Jtreg root path and return a full, absolute path to that Jtreg

# root. Also support having "hotspot" as an alias for "hotspot/jtreg".

ExpandJtregRoot = \

  $(call CleanupJtregPath, $(wildcard \

    $(if $(filter /%, $1), \

      $(if $(wildcard $(strip $1)/TEST.ROOT), \

        $1 \

      ) \

    , \

      $(filter $(addprefix %, $1), $(JTREG_TESTROOTS) $(addsuffix /, $(JTREG_TESTROOTS))) \

      $(filter $(addprefix %, $(strip $1)/jtreg), $(JTREG_TESTROOTS) $(addsuffix /, $(JTREG_TESTROOTS))) \

    ) \

  ))

# Take a partial Jtreg test path and return a full, absolute path to that Jtreg

# test. Also support having "hotspot" as an alias for "hotspot/jtreg".

ExpandJtregPath = \

  $(if $(call ExpandJtregRoot, $1), \

    $(call ExpandJtregRoot, $1) \

  , \

    $(call CleanupJtregPath, $(wildcard \

      $(if $(filter /%, $1), \

        $1 \

      , \

        $(addsuffix /$(strip $1), $(JTREG_TESTROOTS) $(TEST_BASEDIRS)) \

        $(addsuffix $(strip $(patsubst hotspot/%, /hotspot/jtreg/%, $1)), $(JTREG_TESTROOTS) $(TEST_BASEDIRS)) \

      ) \

    )) \

  )

# Helper function to determine if a test specification is a Jtreg test

#

# It is a Jtreg test if it optionally begins with jtreg:, and then is either

# an unspecified group name (possibly prefixed by :), or a group in a

# specified test root, or a path to a test or test directory,

# either absolute or relative to any of the TEST_BASEDIRS or test roots.

define ParseJtregTestSelection

  $(eval TEST_NAME := $(strip $(patsubst jtreg:%, %, $1))) \

  $(if $(or $(findstring :, $(TEST_NAME)), $(findstring /, $(TEST_NAME))), , \

    $(eval TEST_NAME := :$(TEST_NAME)) \

  ) \

  $(if $(findstring :, $(TEST_NAME)), \

    $(if $(filter :%, $(TEST_NAME)), \

      $(eval TEST_GROUP := $(patsubst :%, %, $(TEST_NAME))) \

      $(eval TEST_ROOTS := $(foreach test_root, $(JTREG_TESTROOTS), \

          $(call CleanupJtregPath, $(test_root)))) \

    , \

      $(eval TEST_PATH := $(word 1, $(subst :, $(SPACE), $(TEST_NAME)))) \

      $(eval TEST_GROUP := $(word 2, $(subst :, $(SPACE), $(TEST_NAME)))) \

      $(eval TEST_ROOTS := $(call ExpandJtregRoot, $(TEST_PATH))) \

    ) \

    $(foreach test_root, $(TEST_ROOTS), \

      $(if $(filter /%, $(test_root)), \

        jtreg:$(test_root):$(TEST_GROUP) \

      , \

        $(if $(filter $(TEST_GROUP), $($(JTREG_TOPDIR)/$(test_root)_JTREG_TEST_GROUPS)), \

          jtreg:$(test_root):$(TEST_GROUP) \

        ) \

      ) \

    ) \

  , \

    $(eval TEST_PATHS := $(call ExpandJtregPath, $(TEST_NAME))) \

    $(foreach test_path, $(TEST_PATHS), \

      jtreg:$(test_path) \

    ) \

  )

endef

# Helper function to determine if a test specification is a special test

#

# It is a special test if it is "special:" followed by a test name.

define ParseSpecialTestSelection

  $(if $(filter special:%, $1), \

    $1 \

  )

endef

ifeq ($(TEST), )

  $(info No test selection given in TEST!)

  $(info Please use e.g. 'run-test TEST=tier1' or 'run-test-tier1')

  $(info See doc/testing.[md|html] for help)

  $(error Cannot continue)

endif

# Now intelligently convert the test selection given by the user in TEST

# into a list of fully qualified test descriptors of the tests to run.

TESTS_TO_RUN :=

$(foreach test, $(TEST), \

  $(eval PARSED_TESTS := $(call ParseCustomTestSelection, $(test))) \

  $(if $(strip $(PARSED_TESTS)), , \

    $(eval PARSED_TESTS += $(call ParseGtestTestSelection, $(test))) \

  ) \

  $(if $(strip $(PARSED_TESTS)), , \

    $(eval PARSED_TESTS += $(call ParseJtregTestSelection, $(test))) \

  ) \

  $(if $(strip $(PARSED_TESTS)), , \

    $(eval PARSED_TESTS += $(call ParseSpecialTestSelection, $(test))) \

  ) \

  $(if $(strip $(PARSED_TESTS)), , \

    $(eval UNKNOWN_TEST := $(test)) \

  ) \

  $(eval TESTS_TO_RUN += $(PARSED_TESTS)) \

)

ifneq ($(UNKNOWN_TEST), )

  $(info Unknown test selection: '$(UNKNOWN_TEST)')

  $(info See doc/testing.[md|html] for help)

  $(error Cannot continue)

endif

TESTS_TO_RUN := $(strip $(TESTS_TO_RUN))

# Present the result of our parsing to the user

$(info Test selection '$(TEST)', will run:)

$(foreach test, $(TESTS_TO_RUN), $(info * $(test)))

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

# Functions for setting up rules for running the selected tests

#

# The SetupRun*Test functions all have the same interface:

#

# Parameter 1 is the name of the rule. This is the test id, based on the test

# descriptor, and this is also used as variable prefix, and the targets

# generated are listed in a variable by that name.

#

# Remaining parameters are named arguments. Currently this is only:

#   TEST -- The properly formatted fully qualified test descriptor

#

# After the rule named by the test id has been executed, the following

# variables will be available:

# testid_TOTAL - the total number of tests run

# testid_PASSED - the number of successful tests

# testid_FAILED - the number of failed tests

# testid_ERROR - the number of tests was neither successful or failed

#

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

### Rules for Gtest

SetupRunGtestTest = $(NamedParamsMacroTemplate)

define SetupRunGtestTestBody

  $1_TEST_RESULTS_DIR := $$(TEST_RESULTS_DIR)/$1

  $1_TEST_SUPPORT_DIR := $$(TEST_SUPPORT_DIR)/$1

  $1_EXITCODE := $$($1_TEST_RESULTS_DIR)/exitcode.txt

  $1_VARIANT :=  $$(lastword $$(subst /, , $$($1_TEST)))

  ifeq ($$(filter $$($1_VARIANT), $$(GTEST_VARIANTS)), )

    $$(error Invalid gtest variant '$$($1_VARIANT)'. Valid variants: $$(GTEST_VARIANTS))

  endif

  $1_TEST_NAME := $$(strip $$(patsubst %/$$($1_VARIANT), %, \

      $$(patsubst gtest:%, %, $$($1_TEST))))

  ifneq ($$($1_TEST_NAME), all)

    $1_GTEST_FILTER := --gtest_filter=$$($1_TEST_NAME)*

  endif

  ifneq ($$(GTEST_REPEAT), )

    $1_GTEST_REPEAT :=--gtest_repeat=$$(GTEST_REPEAT)

  endif

  run-test-$1: $(TEST_PREREQS)

	$$(call LogWarn)

	$$(call LogWarn, Running test '$$($1_TEST)')

	$$(call MakeDir, $$($1_TEST_RESULTS_DIR) $$($1_TEST_SUPPORT_DIR))

	$$(call ExecuteWithLog, $$($1_TEST_SUPPORT_DIR)/gtest, \

	    $$(FIXPATH) $$(TEST_IMAGE_DIR)/hotspot/gtest/$$($1_VARIANT)/gtestLauncher \

	        -jdk $(JDK_IMAGE_DIR) $$($1_GTEST_FILTER) \

	        --gtest_output=xml:$$($1_TEST_RESULTS_DIR)/gtest.xml \

	        $$($1_GTEST_REPEAT) $$(GTEST_OPTIONS) $$(GTEST_VM_OPTIONS) \

	        $$($1_GTEST_JAVA_OPTIONS) \

	        > >($(TEE) $$($1_TEST_RESULTS_DIR)/gtest.txt) \

	    && $$(ECHO) $$$$? > $$($1_EXITCODE) \

	    || $$(ECHO) $$$$? > $$($1_EXITCODE) \

	)

  $1_RESULT_FILE := $$($1_TEST_RESULTS_DIR)/gtest.txt

  parse-test-$1: run-test-$1

	$$(call LogWarn, Finished running test '$$($1_TEST)')

	$$(call LogWarn, Test report is stored in $$(strip \

	    $$(subst $$(TOPDIR)/, , $$($1_TEST_RESULTS_DIR))))

	$$(if $$(wildcard $$($1_RESULT_FILE)), \

	  $$(eval $1_TOTAL := $$(shell $$(AWK) '/==========.* tests? from .* \

	      test cases? ran/ { print $$$$2 }' $$($1_RESULT_FILE))) \

	  $$(if $$($1_TOTAL), , $$(eval $1_TOTAL := 0)) \

	  $$(eval $1_PASSED := $$(shell $$(AWK) '/\[  PASSED  \] .* tests?./ \

	      { print $$$$4 }' $$($1_RESULT_FILE))) \

	  $$(if $$($1_PASSED), , $$(eval $1_PASSED := 0)) \

	  $$(eval $1_FAILED := $$(shell $$(AWK) '/\[  FAILED  \] .* tests?, \

	      listed below/ { print $$$$4 }' $$($1_RESULT_FILE))) \

	  $$(if $$($1_FAILED), , $$(eval $1_FAILED := 0)) \

	  $$(eval $1_ERROR := $$(shell \

	      $$(EXPR) $$($1_TOTAL) - $$($1_PASSED) - $$($1_FAILED))) \

	, \

	  $$(eval $1_PASSED := 0) \

	  $$(eval $1_FAILED := 0) \

	  $$(eval $1_ERROR := 1) \

	  $$(eval $1_TOTAL := 1) \

	)

  $1: run-test-$1 parse-test-$1

  TARGETS += $1

endef

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

### Rules for Jtreg

# Helper function for SetupRunJtregTest. Set a JTREG_* variable from, in order:

# 1) Specified by user on command line

# 2) Component-specific default

# 3) Generic default

#

# Note: No spaces are allowed around the arguments.

# Arg $1 The test ID (i.e. $1 in SetupRunJtregTest)

# Arg $2 Base variable, e.g. JTREG_JOBS

# Arg $3 The default value (optional)

define SetJtregValue

  ifneq ($$($2), )

    $1_$2 := $$($2)

  else

    ifneq ($$($$($1_COMPONENT)_$2), )

      $1_$2 := $$($$($1_COMPONENT)_$2)

    else

      ifneq ($3, )

        $1_$2 := $3

      endif

    endif

  endif

endef

SetupRunJtregTest = $(NamedParamsMacroTemplate)

define SetupRunJtregTestBody

  $1_TEST_RESULTS_DIR := $$(TEST_RESULTS_DIR)/$1

  $1_TEST_SUPPORT_DIR := $$(TEST_SUPPORT_DIR)/$1

  $1_EXITCODE := $$($1_TEST_RESULTS_DIR)/exitcode.txt

  $1_TEST_NAME := $$(strip $$(patsubst jtreg:%, %, $$($1_TEST)))

  $1_TEST_ROOT := \

      $$(strip $$(foreach root, $$(JTREG_TESTROOTS), \

        $$(if $$(filter $$(root)%, $$(JTREG_TOPDIR)/$$($1_TEST_NAME)), $$(root)) \

      ))

  $1_COMPONENT := $$(lastword $$(subst /, $$(SPACE), $$($1_TEST_ROOT)))

  # This will work only as long as just hotspot has the additional "jtreg" directory

  ifeq ($$($1_COMPONENT), jtreg)

    $1_COMPONENT := hotspot

  endif

  ifeq ($$(JT_HOME), )

    $$(info Error: jtreg framework is not found.)

    $$(info Please run configure using --with-jtreg.)

    $$(error Cannot continue)

  endif

  # Unfortunately, we need different defaults for some JTREG values,

  # depending on what component we're running.

  # Convert JTREG_foo into $1_JTREG_foo with a suitable value.

  $$(eval $$(call SetJtregValue,$1,JTREG_TEST_MODE,agentvm))

  $$(eval $$(call SetJtregValue,$1,JTREG_ASSERT,true))

  $$(eval $$(call SetJtregValue,$1,JTREG_MAX_MEM,512m))

  $$(eval $$(call SetJtregValue,$1,JTREG_NATIVEPATH))

  $$(eval $$(call SetJtregValue,$1,JTREG_BASIC_OPTIONS))

  $$(eval $$(call SetJtregValue,$1,JTREG_PROBLEM_LIST))

  # Only the problem list for the current test root should be used.

  $1_JTREG_PROBLEM_LIST := $$(filter $$($1_TEST_ROOT)%, $$($1_JTREG_PROBLEM_LIST))

  ifneq ($(TEST_JOBS), 0)

    $$(eval $$(call SetJtregValue,$1,JTREG_JOBS,$$(TEST_JOBS)))

  else

    $$(eval $$(call SetJtregValue,$1,JTREG_JOBS,$$(JOBS)))

  endif