/*
 * Copyright (c) 2018, Oracle and/or its affiliates. All rights reserved.
 * Copyright (c) 2018, SAP SE.
 *
 * 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 "memory/resourceArea.hpp"
#include "services/stathist.hpp"
#include "services/stathistDCmd.hpp"
#include "utilities/ostream.hpp"
#include "utilities/globalDefinitions.hpp"

namespace StatisticsHistory {

StatHistDCmd::StatHistDCmd(outputStream* output, bool heap)
  : DCmdWithParser(output, heap),
    _scale("scale", "Memory usage in which to scale. Valid values are: k, m, g (fixed scale) "
           "or \"dynamic\" for a dynamically chosen scale.",
           "STRING", false, "dynamic"),
    _cvs("cvs", "CVS format.", "BOOLEAN", false, "false"),
    _no_legend("no-legend", "Omit legend.", "BOOLEAN", false, "false")
#ifdef ASSERT
    , _raw("raw", "Print raw values (debug only).", "BOOLEAN", false, "false")
#endif
{
  _dcmdparser.add_dcmd_option(&_scale);
  _dcmdparser.add_dcmd_option(&_no_legend);
  DEBUG_ONLY(_dcmdparser.add_dcmd_option(&_raw);)
  _dcmdparser.add_dcmd_option(&_cvs);
}

int StatHistDCmd::num_arguments() {
  ResourceMark rm;
  StatHistDCmd* dcmd = new StatHistDCmd(NULL, false);
  if (dcmd != NULL) {
    DCmdMark mark(dcmd);
    return dcmd->_dcmdparser.num_arguments();
  } else {
    return 0;
  }
}

static bool scale_from_name(const char* scale, size_t* out) {
  if (strcasecmp(scale, "dynamic") == 0) {
    *out = 0;
  } else if (strcasecmp(scale, "kb") == 0 || strcasecmp(scale, "k") == 0) {
    *out = K;
  } else if (strcasecmp(scale, "mb") == 0 || strcasecmp(scale, "m") == 0) {
    *out = M;
  } else if (strcasecmp(scale, "gb") == 0 || strcasecmp(scale, "g") == 0) {
    *out = G;
  } else {
    return false; // Invalid value
  }
  return true;
}

void StatHistDCmd::execute(DCmdSource source, TRAPS) {
  print_info_t pi;
  if (!scale_from_name(_scale.value(), &(pi.scale))) {
    output()->print_cr("Invalid scale: \"%s\".", _scale.value());
    return;
  }
  DEBUG_ONLY(pi.raw = _raw.value();)
  pi.cvs = _cvs.value();
  pi.no_legend = _no_legend.value();
  pi.avoid_sampling = false;

  StatisticsHistory::print_report(output(), &pi);
}

}; // namespace StatisticsHistory