/*

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

 *

 */

#ifndef SHARE_VM_RUNTIME_ARGUMENTS_HPP

#define SHARE_VM_RUNTIME_ARGUMENTS_HPP

#include "logging/logLevel.hpp"

#include "logging/logTag.hpp"

#include "runtime/java.hpp"

#include "runtime/os.hpp"

#include "runtime/perfData.hpp"

#include "utilities/debug.hpp"

#include "utilities/top.hpp"

// Arguments parses the command line and recognizes options

// Invocation API hook typedefs (these should really be defined in jni.hpp)

extern "C" {

  typedef void (JNICALL *abort_hook_t)(void);

  typedef void (JNICALL *exit_hook_t)(jint code);

  typedef jint (JNICALL *vfprintf_hook_t)(FILE *fp, const char *format, va_list args)  ATTRIBUTE_PRINTF(2, 0);

}

// Forward declarations

class ArgumentBootClassPath;

// PathString is used as the underlying value container for a

// SystemProperty and for the string that represents the system

// boot class path, Arguments::_system_boot_class_path.

class PathString : public CHeapObj<mtInternal> {

 protected:

  char*           _value;

 public:

  char* value() const                       { return _value; }

  bool set_value(const char *value) {

    if (_value != NULL) {

      FreeHeap(_value);

    }

    _value = AllocateHeap(strlen(value)+1, mtInternal);

    assert(_value != NULL, "Unable to allocate space for new path value");

    if (_value != NULL) {

      strcpy(_value, value);

    } else {

      // not able to allocate

      return false;

    }

    return true;

  }

  void append_value(const char *value) {

    char *sp;

    size_t len = 0;

    if (value != NULL) {

      len = strlen(value);

      if (_value != NULL) {

        len += strlen(_value);

      }

      sp = AllocateHeap(len+2, mtInternal);

      assert(sp != NULL, "Unable to allocate space for new append path value");

      if (sp != NULL) {

        if (_value != NULL) {

          strcpy(sp, _value);

          strcat(sp, os::path_separator());

          strcat(sp, value);

          FreeHeap(_value);

        } else {

          strcpy(sp, value);

        }

        _value = sp;

      }

    }

  }

  // Constructor

  PathString(const char* value) {

    if (value == NULL) {

      _value = NULL;

    } else {

      _value = AllocateHeap(strlen(value)+1, mtInternal);

      strcpy(_value, value);

    }

  }

};

// Element describing System and User (-Dkey=value flags) defined property.

//

// An internal SystemProperty is one that has been removed in

// jdk.internal.VM.saveAndRemoveProperties, like jdk.boot.class.path.append.

//

class SystemProperty : public PathString {

 private:

  char*           _key;

  SystemProperty* _next;

  bool            _internal;

  bool            _writeable;

  bool writeable()   { return _writeable; }

 public:

  // Accessors

  char* value() const                 { return PathString::value(); }

  const char* key() const             { return _key; }

  bool internal() const               { return _internal; }

  SystemProperty* next() const        { return _next; }

  void set_next(SystemProperty* next) { _next = next; }

  // A system property should only have its value set

  // via an external interface if it is a writeable property.

  // The internal, non-writeable property jdk.boot.class.path.append

  // is the only exception to this rule.  It can be set externally

  // via -Xbootclasspath/a or JVMTI OnLoad phase call to AddToBootstrapClassLoaderSearch.

  // In those cases for jdk.boot.class.path.append, the base class

  // set_value and append_value methods are called directly.

  bool set_writeable_value(const char *value) {

    if (writeable()) {

      return set_value(value);

    }

    return false;

  }

  // Constructor

  SystemProperty(const char* key, const char* value, bool writeable, bool internal = false) : PathString(value) {

    if (key == NULL) {

      _key = NULL;

    } else {

      _key = AllocateHeap(strlen(key)+1, mtInternal);

      strcpy(_key, key);

    }

    _next = NULL;

    _internal = internal;

    _writeable = writeable;

  }

};

// For use by -agentlib, -agentpath and -Xrun

class AgentLibrary : public CHeapObj<mtInternal> {

  friend class AgentLibraryList;

public:

  // Is this library valid or not. Don't rely on os_lib == NULL as statically

  // linked lib could have handle of RTLD_DEFAULT which == 0 on some platforms

  enum AgentState {

    agent_invalid = 0,

    agent_valid   = 1

  };

 private:

  char*           _name;

  char*           _options;

  void*           _os_lib;

  bool            _is_absolute_path;

  bool            _is_static_lib;

  AgentState      _state;

  AgentLibrary*   _next;

 public:

  // Accessors

  const char* name() const                  { return _name; }

  char* options() const                     { return _options; }

  bool is_absolute_path() const             { return _is_absolute_path; }

  void* os_lib() const                      { return _os_lib; }

  void set_os_lib(void* os_lib)             { _os_lib = os_lib; }

  AgentLibrary* next() const                { return _next; }

  bool is_static_lib() const                { return _is_static_lib; }

  void set_static_lib(bool is_static_lib)   { _is_static_lib = is_static_lib; }

  bool valid()                              { return (_state == agent_valid); }

  void set_valid()                          { _state = agent_valid; }

  void set_invalid()                        { _state = agent_invalid; }

  // Constructor

  AgentLibrary(const char* name, const char* options, bool is_absolute_path, void* os_lib) {

    _name = AllocateHeap(strlen(name)+1, mtInternal);

    strcpy(_name, name);

    if (options == NULL) {

      _options = NULL;

    } else {

      _options = AllocateHeap(strlen(options)+1, mtInternal);

      strcpy(_options, options);

    }

    _is_absolute_path = is_absolute_path;

    _os_lib = os_lib;

    _next = NULL;

    _state = agent_invalid;

    _is_static_lib = false;

  }

};

// maintain an order of entry list of AgentLibrary

class AgentLibraryList VALUE_OBJ_CLASS_SPEC {

 private:

  AgentLibrary*   _first;

  AgentLibrary*   _last;

 public:

  bool is_empty() const                     { return _first == NULL; }

  AgentLibrary* first() const               { return _first; }

  // add to the end of the list

  void add(AgentLibrary* lib) {

    if (is_empty()) {

      _first = _last = lib;

    } else {

      _last->_next = lib;

      _last = lib;

    }

    lib->_next = NULL;

  }

  // search for and remove a library known to be in the list

  void remove(AgentLibrary* lib) {

    AgentLibrary* curr;

    AgentLibrary* prev = NULL;

    for (curr = first(); curr != NULL; prev = curr, curr = curr->next()) {

      if (curr == lib) {

        break;

      }

    }

    assert(curr != NULL, "always should be found");

    if (curr != NULL) {

      // it was found, by-pass this library

      if (prev == NULL) {

        _first = curr->_next;

      } else {

        prev->_next = curr->_next;

      }

      if (curr == _last) {

        _last = prev;

      }

      curr->_next = NULL;

    }

  }

  AgentLibraryList() {

    _first = NULL;

    _last = NULL;

  }

};

// Helper class for controlling the lifetime of JavaVMInitArgs objects.

class ScopedVMInitArgs;

// Most logging functions require 5 tags. Some of them may be _NO_TAG.

typedef struct {

  const char* alias_name;

  LogLevelType level;

  bool exactMatch;

  LogTagType tag0;

  LogTagType tag1;

  LogTagType tag2;

  LogTagType tag3;

  LogTagType tag4;

  LogTagType tag5;

} AliasedLoggingFlag;

class Arguments : AllStatic {

  friend class VMStructs;

  friend class JvmtiExport;

  friend class CodeCacheExtensions;

 public:

  // Operation modi

  enum Mode {

    _int,       // corresponds to -Xint

    _mixed,     // corresponds to -Xmixed

    _comp       // corresponds to -Xcomp

  };

  enum ArgsRange {

    arg_unreadable = -3,

    arg_too_small  = -2,

    arg_too_big    = -1,

    arg_in_range   = 0

  };

 private:

  // a pointer to the flags file name if it is specified

  static char*  _jvm_flags_file;

  // an array containing all flags specified in the .hotspotrc file

  static char** _jvm_flags_array;

  static int    _num_jvm_flags;

  // an array containing all jvm arguments specified in the command line

  static char** _jvm_args_array;

  static int    _num_jvm_args;

  // string containing all java command (class/jarfile name and app args)

  static char* _java_command;

  // Property list

  static SystemProperty* _system_properties;

  // Quick accessor to System properties in the list:

  static SystemProperty *_sun_boot_library_path;

  static SystemProperty *_java_library_path;

  static SystemProperty *_java_home;

  static SystemProperty *_java_class_path;

  static SystemProperty *_jdk_boot_class_path_append;

  // The constructed value of the system class path after

  // argument processing and JVMTI OnLoad additions via

  // calls to AddToBootstrapClassLoaderSearch.  This is the

  // final form before ClassLoader::setup_bootstrap_search().

  static PathString *_system_boot_class_path;

  // temporary: to emit warning if the default ext dirs are not empty.

  // remove this variable when the warning is no longer needed.

  static char* _ext_dirs;

  // java.vendor.url.bug, bug reporting URL for fatal errors.

  static const char* _java_vendor_url_bug;

  // sun.java.launcher, private property to provide information about

  // java launcher

  static const char* _sun_java_launcher;

  // sun.java.launcher.pid, private property

  static int    _sun_java_launcher_pid;

  // was this VM created via the -XXaltjvm=<path> option

  static bool   _sun_java_launcher_is_altjvm;

  // Option flags

  static bool   _has_profile;

  static const char*  _gc_log_filename;

  // Value of the conservative maximum heap alignment needed

  static size_t  _conservative_max_heap_alignment;

  static uintx  _min_heap_size;

  // -Xrun arguments

  static AgentLibraryList _libraryList;

  static void add_init_library(const char* name, char* options)

    { _libraryList.add(new AgentLibrary(name, options, false, NULL)); }

  // -agentlib and -agentpath arguments

  static AgentLibraryList _agentList;

  static void add_init_agent(const char* name, char* options, bool absolute_path)

    { _agentList.add(new AgentLibrary(name, options, absolute_path, NULL)); }

  // Late-binding agents not started via arguments

  static void add_loaded_agent(AgentLibrary *agentLib)

    { _agentList.add(agentLib); }

  static void add_loaded_agent(const char* name, char* options, bool absolute_path, void* os_lib)

    { _agentList.add(new AgentLibrary(name, options, absolute_path, os_lib)); }

  // Operation modi

  static Mode _mode;

  static void set_mode_flags(Mode mode);

  static bool _java_compiler;

  static void set_java_compiler(bool arg) { _java_compiler = arg; }

  static bool java_compiler()   { return _java_compiler; }

  // Capture the index location of -Xbootclasspath\a within sysclasspath.

  // Used when setting up the bootstrap search path in order to

  // mark the boot loader's append path observability boundary.

  static int _bootclassloader_append_index;

  // -Xpatch flag

  static char** _patch_dirs;

  static int _patch_dirs_count;

  static void set_patch_dirs(char** dirs) { _patch_dirs = dirs; }

  static void set_patch_dirs_count(int count) { _patch_dirs_count = count; }

  // -Xdebug flag

  static bool _xdebug_mode;

  static void set_xdebug_mode(bool arg) { _xdebug_mode = arg; }

  static bool xdebug_mode()             { return _xdebug_mode; }

  // Used to save default settings

  static bool _AlwaysCompileLoopMethods;

  static bool _UseOnStackReplacement;

  static bool _BackgroundCompilation;

  static bool _ClipInlining;

  static bool _CIDynamicCompilePriority;

  static intx _Tier3InvokeNotifyFreqLog;

  static intx _Tier4InvocationThreshold;

  // Tiered

  static void set_tiered_flags();

  // CMS/ParNew garbage collectors

  static void set_parnew_gc_flags();

  static void set_cms_and_parnew_gc_flags();

  // UseParallel[Old]GC

  static void set_parallel_gc_flags();

  // Garbage-First (UseG1GC)

  static void set_g1_gc_flags();

  // GC ergonomics

  static void set_conservative_max_heap_alignment();

  static void set_use_compressed_oops();

  static void set_use_compressed_klass_ptrs();

  static void select_gc();

  static void set_ergonomics_flags();

  static void set_shared_spaces_flags();

  // limits the given memory size by the maximum amount of memory this process is

  // currently allowed to allocate or reserve.

  static julong limit_by_allocatable_memory(julong size);

  // Setup heap size

  static void set_heap_size();

  // Based on automatic selection criteria, should the

  // low pause collector be used.

  static bool should_auto_select_low_pause_collector();

  // Bytecode rewriting

  static void set_bytecode_flags();

  // Invocation API hooks

  static abort_hook_t     _abort_hook;

  static exit_hook_t      _exit_hook;

  static vfprintf_hook_t  _vfprintf_hook;

  // System properties

  static bool add_property(const char* prop);

  // Miscellaneous system property setter

  static bool append_to_addmods_property(const char* module_name);

  // Aggressive optimization flags.

  static jint set_aggressive_opts_flags();

  static jint set_aggressive_heap_flags();

  // Argument parsing

  static void do_pd_flag_adjustments();

  static bool parse_argument(const char* arg, Flag::Flags origin);

  static bool process_argument(const char* arg, jboolean ignore_unrecognized, Flag::Flags origin);

  static void process_java_launcher_argument(const char*, void*);

  static void process_java_compiler_argument(const char* arg);

  static jint parse_options_environment_variable(const char* name, ScopedVMInitArgs* vm_args);

  static jint parse_java_tool_options_environment_variable(ScopedVMInitArgs* vm_args);

  static jint parse_java_options_environment_variable(ScopedVMInitArgs* vm_args);

  static jint parse_vm_options_file(const char* file_name, ScopedVMInitArgs* vm_args);

  static jint parse_options_buffer(const char* name, char* buffer, const size_t buf_len, ScopedVMInitArgs* vm_args);

  static jint insert_vm_options_file(const JavaVMInitArgs* args,

                                     const char* vm_options_file,

                                     const int vm_options_file_pos,

                                     ScopedVMInitArgs* vm_options_file_args,

                                     ScopedVMInitArgs* args_out);

  static bool args_contains_vm_options_file_arg(const JavaVMInitArgs* args);

  static jint expand_vm_options_as_needed(const JavaVMInitArgs* args_in,

                                          ScopedVMInitArgs* mod_args,

                                          JavaVMInitArgs** args_out);

  static jint match_special_option_and_act(const JavaVMInitArgs* args,

                                           ScopedVMInitArgs* args_out);

  static bool handle_deprecated_print_gc_flags();

  static jint parse_vm_init_args(const JavaVMInitArgs *java_tool_options_args,

                                 const JavaVMInitArgs *java_options_args,

                                 const JavaVMInitArgs *cmd_line_args);

  static jint parse_each_vm_init_arg(const JavaVMInitArgs* args, ArgumentBootClassPath* bcp_p, bool* bcp_assembly_required_p, Flag::Flags origin);

  static jint finalize_vm_init_args(ArgumentBootClassPath* bcp_p, bool bcp_assembly_required);

  static bool is_bad_option(const JavaVMOption* option, jboolean ignore, const char* option_type);

  static bool is_bad_option(const JavaVMOption* option, jboolean ignore) {

    return is_bad_option(option, ignore, NULL);

  }

  static void describe_range_error(ArgsRange errcode);

  static ArgsRange check_memory_size(julong size, julong min_size);

  static ArgsRange parse_memory_size(const char* s, julong* long_arg,

                                     julong min_size);

  // Parse a string for a unsigned integer.  Returns true if value

  // is an unsigned integer greater than or equal to the minimum

  // parameter passed and returns the value in uintx_arg.  Returns

  // false otherwise, with uintx_arg undefined.

  static bool parse_uintx(const char* value, uintx* uintx_arg,

                          uintx min_size);

  // methods to build strings from individual args

  static void build_jvm_args(const char* arg);

  static void build_jvm_flags(const char* arg);

  static void add_string(char*** bldarray, int* count, const char* arg);

  static const char* build_resource_string(char** args, int count);

  static bool methodExists(

    char* className, char* methodName,

    int classesNum, char** classes, bool* allMethods,

    int methodsNum, char** methods, bool* allClasses

  );

  static void parseOnlyLine(

    const char* line,

    short* classesNum, short* classesMax, char*** classes, bool** allMethods,

    short* methodsNum, short* methodsMax, char*** methods, bool** allClasses

  );

  // Returns true if the flag is obsolete (and not yet expired).