/*

 * Copyright (c) 1998, 2016, 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.

 *

 */

#include "precompiled.hpp"

#include "logging/log.hpp"

#include "logging/logStream.hpp"

#include "memory/universe.hpp"

#include "oops/oop.inline.hpp"

#include "runtime/arguments.hpp"

#include "runtime/vm_version.hpp"

const char* Abstract_VM_Version::_s_vm_release = Abstract_VM_Version::vm_release();

const char* Abstract_VM_Version::_s_internal_vm_info_string = Abstract_VM_Version::internal_vm_info_string();

uint64_t Abstract_VM_Version::_features = 0;

const char* Abstract_VM_Version::_features_string = "";

bool Abstract_VM_Version::_supports_cx8 = false;

bool Abstract_VM_Version::_supports_atomic_getset4 = false;

bool Abstract_VM_Version::_supports_atomic_getset8 = false;

bool Abstract_VM_Version::_supports_atomic_getadd4 = false;

bool Abstract_VM_Version::_supports_atomic_getadd8 = false;

unsigned int Abstract_VM_Version::_logical_processors_per_package = 1U;

unsigned int Abstract_VM_Version::_L1_data_cache_line_size = 0;

#ifndef HOTSPOT_VERSION_STRING

  #error HOTSPOT_VERSION_STRING must be defined

#endif

#ifndef VERSION_MAJOR

  #error VERSION_MAJOR must be defined

#endif

#ifndef VERSION_MINOR

  #error VERSION_MINOR must be defined

#endif

#ifndef VERSION_SECURITY

  #error VERSION_SECURITY must be defined

#endif

#ifndef VERSION_PATCH

  #error VERSION_PATCH must be defined

#endif

#ifndef VERSION_BUILD

  #error VERSION_BUILD must be defined

#endif

#ifndef VERSION_STRING

  #error VERSION_STRING must be defined

#endif

#ifndef DEBUG_LEVEL

  #error DEBUG_LEVEL must be defined

#endif

#define VM_RELEASE HOTSPOT_VERSION_STRING

// HOTSPOT_VERSION_STRING equals the JDK VERSION_STRING (unless overridden

// in a standalone build).

int Abstract_VM_Version::_vm_major_version = VERSION_MAJOR;

int Abstract_VM_Version::_vm_minor_version = VERSION_MINOR;

int Abstract_VM_Version::_vm_security_version = VERSION_SECURITY;

int Abstract_VM_Version::_vm_patch_version = VERSION_PATCH;

int Abstract_VM_Version::_vm_build_number = VERSION_BUILD;

unsigned int Abstract_VM_Version::_parallel_worker_threads = 0;

bool Abstract_VM_Version::_parallel_worker_threads_initialized = false;

#if defined(_LP64)

  #define VMLP "64-Bit "

#else

  #define VMLP ""

#endif

#ifndef VMTYPE

  #ifdef TIERED

    #define VMTYPE "Server"

  #else // TIERED

  #ifdef ZERO

  #ifdef SHARK

    #define VMTYPE "Shark"

  #else // SHARK

    #define VMTYPE "Zero"

  #endif // SHARK

  #else // ZERO

     #define VMTYPE COMPILER1_PRESENT("Client")   \

                    COMPILER2_PRESENT("Server")

  #endif // ZERO

  #endif // TIERED

#endif

#ifndef HOTSPOT_VM_DISTRO

  #error HOTSPOT_VM_DISTRO must be defined

#endif

#define VMNAME HOTSPOT_VM_DISTRO " " VMLP VMTYPE " VM"

const char* Abstract_VM_Version::vm_name() {

  return VMNAME;

}

const char* Abstract_VM_Version::vm_vendor() {

#ifdef VENDOR

  return XSTR(VENDOR);

#else

  return "Oracle Corporation";

#endif

}

const char* Abstract_VM_Version::vm_info_string() {

  switch (Arguments::mode()) {

    case Arguments::_int:

      return UseSharedSpaces ? "interpreted mode, sharing" : "interpreted mode";

    case Arguments::_mixed:

      if (UseSharedSpaces) {

        if (UseAOT) {

          return "mixed mode, aot, sharing";

#ifdef TIERED

        } else if(is_client_compilation_mode_vm()) {

          return "mixed mode, emulated-client, sharing";

#endif

        } else {

          return "mixed mode, sharing";

         }

      } else {

        if (UseAOT) {

          return "mixed mode, aot";

#ifdef TIERED

        } else if(is_client_compilation_mode_vm()) {

          return "mixed mode, emulated-client";

#endif

        } else {

          return "mixed mode";

        }

      }

    case Arguments::_comp:

#ifdef TIERED

      if (is_client_compilation_mode_vm()) {

         return UseSharedSpaces ? "compiled mode, emulated-client, sharing" : "compiled mode, emulated-client";

      }

#endif

      return UseSharedSpaces ? "compiled mode, sharing"    : "compiled mode";

  };

  ShouldNotReachHere();

  return "";

}

// NOTE: do *not* use stringStream. this function is called by

//       fatal error handler. if the crash is in native thread,

//       stringStream cannot get resource allocated and will SEGV.

const char* Abstract_VM_Version::vm_release() {

  return VM_RELEASE;

}

// NOTE: do *not* use stringStream. this function is called by

//       fatal error handlers. if the crash is in native thread,

//       stringStream cannot get resource allocated and will SEGV.

const char* Abstract_VM_Version::jre_release_version() {

  return VERSION_STRING;

}

#define OS       LINUX_ONLY("linux")             \

                 WINDOWS_ONLY("windows")         \

                 SOLARIS_ONLY("solaris")         \

                 AIX_ONLY("aix")                 \

                 BSD_ONLY("bsd")

#ifndef CPU

#ifdef ZERO

#define CPU      ZERO_LIBARCH

#elif defined(PPC64)

#if defined(VM_LITTLE_ENDIAN)

#define CPU      "ppc64le"

#else

#define CPU      "ppc64"

#endif // PPC64

#else

#define CPU      AARCH64_ONLY("aarch64")         \

                 AMD64_ONLY("amd64")             \

                 IA32_ONLY("x86")                \

                 IA64_ONLY("ia64")               \

                 S390_ONLY("s390")               \

                 SPARC_ONLY("sparc")

#endif // !ZERO

#endif // !CPU

const char *Abstract_VM_Version::vm_platform_string() {

  return OS "-" CPU;

}

const char* Abstract_VM_Version::internal_vm_info_string() {

  #ifndef HOTSPOT_BUILD_USER

    #define HOTSPOT_BUILD_USER unknown

  #endif

  #ifndef HOTSPOT_BUILD_COMPILER

    #ifdef _MSC_VER

      #if _MSC_VER == 1600

        #define HOTSPOT_BUILD_COMPILER "MS VC++ 10.0 (VS2010)"

      #elif _MSC_VER == 1700

        #define HOTSPOT_BUILD_COMPILER "MS VC++ 11.0 (VS2012)"

      #elif _MSC_VER == 1800

        #define HOTSPOT_BUILD_COMPILER "MS VC++ 12.0 (VS2013)"

      #else

        #define HOTSPOT_BUILD_COMPILER "unknown MS VC++:" XSTR(_MSC_VER)

      #endif

    #elif defined(__SUNPRO_CC)

      #if   __SUNPRO_CC == 0x420

        #define HOTSPOT_BUILD_COMPILER "Workshop 4.2"

      #elif __SUNPRO_CC == 0x500

        #define HOTSPOT_BUILD_COMPILER "Workshop 5.0 compat=" XSTR(__SUNPRO_CC_COMPAT)

      #elif __SUNPRO_CC == 0x520

        #define HOTSPOT_BUILD_COMPILER "Workshop 5.2 compat=" XSTR(__SUNPRO_CC_COMPAT)

      #elif __SUNPRO_CC == 0x580

        #define HOTSPOT_BUILD_COMPILER "Workshop 5.8"

      #elif __SUNPRO_CC == 0x590

        #define HOTSPOT_BUILD_COMPILER "Workshop 5.9"

      #elif __SUNPRO_CC == 0x5100

        #define HOTSPOT_BUILD_COMPILER "Sun Studio 12u1"

      #elif __SUNPRO_CC == 0x5120

        #define HOTSPOT_BUILD_COMPILER "Sun Studio 12u3"

      #elif __SUNPRO_CC == 0x5130

        #define HOTSPOT_BUILD_COMPILER "Sun Studio 12u4"

      #else

        #define HOTSPOT_BUILD_COMPILER "unknown Workshop:" XSTR(__SUNPRO_CC)

      #endif

    #elif defined(__GNUC__)

        #define HOTSPOT_BUILD_COMPILER "gcc " __VERSION__

    #elif defined(__IBMCPP__)

        #define HOTSPOT_BUILD_COMPILER "xlC " XSTR(__IBMCPP__)

    #else

      #define HOTSPOT_BUILD_COMPILER "unknown compiler"

    #endif

  #endif

  #ifndef FLOAT_ARCH

    #if defined(__SOFTFP__)

      #define FLOAT_ARCH_STR "-sflt"

    #else

      #define FLOAT_ARCH_STR ""

    #endif

  #else

    #define FLOAT_ARCH_STR XSTR(FLOAT_ARCH)

  #endif

  #define INTERNAL_VERSION_SUFFIX VM_RELEASE ")" \

         " for " OS "-" CPU FLOAT_ARCH_STR \

         " JRE (" VERSION_STRING "), built on " __DATE__ " " __TIME__ \

         " by " XSTR(HOTSPOT_BUILD_USER) " with " HOTSPOT_BUILD_COMPILER

  return strcmp(DEBUG_LEVEL, "release") == 0

      ? VMNAME " (" INTERNAL_VERSION_SUFFIX

      : VMNAME " (" DEBUG_LEVEL " " INTERNAL_VERSION_SUFFIX;

}

const char *Abstract_VM_Version::vm_build_user() {

  return HOTSPOT_BUILD_USER;

}

const char *Abstract_VM_Version::jdk_debug_level() {

  return DEBUG_LEVEL;

}

const char *Abstract_VM_Version::printable_jdk_debug_level() {

  // Debug level is not printed for "release" builds

  return strcmp(DEBUG_LEVEL, "release") == 0 ? "" : DEBUG_LEVEL " ";

}

unsigned int Abstract_VM_Version::jvm_version() {

  return ((Abstract_VM_Version::vm_major_version() & 0xFF) << 24) |

         ((Abstract_VM_Version::vm_minor_version() & 0xFF) << 16) |

         ((Abstract_VM_Version::vm_security_version() & 0xFF) << 8) |

         (Abstract_VM_Version::vm_build_number() & 0xFF);

}

void VM_Version_init() {

  VM_Version::initialize();

  if (log_is_enabled(Info, os, cpu)) {

    char buf[1024];

    ResourceMark rm;

    LogStream ls(Log(os, cpu)::info());

    os::print_cpu_info(&ls, buf, sizeof(buf));

  }

}

unsigned int Abstract_VM_Version::nof_parallel_worker_threads(

                                                      unsigned int num,

                                                      unsigned int den,

                                                      unsigned int switch_pt) {

  if (FLAG_IS_DEFAULT(ParallelGCThreads)) {

    assert(ParallelGCThreads == 0, "Default ParallelGCThreads is not 0");

    unsigned int threads;

    // For very large machines, there are diminishing returns

    // for large numbers of worker threads.  Instead of

    // hogging the whole system, use a fraction of the workers for every

    // processor after the first 8.  For example, on a 72 cpu machine

    // and a chosen fraction of 5/8

    // use 8 + (72 - 8) * (5/8) == 48 worker threads.

    unsigned int ncpus = (unsigned int) os::initial_active_processor_count();

    threads = (ncpus <= switch_pt) ?

             ncpus :

             (switch_pt + ((ncpus - switch_pt) * num) / den);

#ifndef _LP64

    // On 32-bit binaries the virtual address space available to the JVM

    // is usually limited to 2-3 GB (depends on the platform).

    // Do not use up address space with too many threads (stacks and per-thread

    // data). Note that x86 apps running on Win64 have 2 stacks per thread.

    // GC may more generally scale down threads by max heap size (etc), but the

    // consequences of over-provisioning threads are higher on 32-bit JVMS,

    // so add hard limit here:

    threads = MIN2(threads, (2*switch_pt));

#endif

    return threads;

  } else {

    return ParallelGCThreads;

  }

}

unsigned int Abstract_VM_Version::calc_parallel_worker_threads() {

  return nof_parallel_worker_threads(5, 8, 8);

}

// Does not set the _initialized flag since it is

// a global flag.

unsigned int Abstract_VM_Version::parallel_worker_threads() {

  if (!_parallel_worker_threads_initialized) {

    if (FLAG_IS_DEFAULT(ParallelGCThreads)) {

      _parallel_worker_threads = VM_Version::calc_parallel_worker_threads();

    } else {

      _parallel_worker_threads = ParallelGCThreads;

    }

    _parallel_worker_threads_initialized = true;

  }

  return _parallel_worker_threads;

}