/*
 * Copyright (c) 2019, SAP SE. All rights reserved.
 * Copyright (c) 2019, 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 "memory/metaspace/blockListArray.inline.hpp"
#include "memory/metaspace/leftOverBins.inline.hpp"
#include "utilities/globalDefinitions.hpp"
#include "utilities/ostream.hpp"


namespace metaspace {



#ifdef ASSERT
void LeftOverManager::verify() const {
  _very_small_bins.verify();

  if (_large_block_reserve != NULL) {
    assert(_current != NULL, "Sanity");
  }

  assert( (_current == NULL && _current_size == 0) ||
          (_current != NULL && _current_size > 0), "Sanity");

  for (block_t* b = _large_block_reserve; b != NULL; b = b->next) {
    assert(b->size > 0 && b->size <= 4 * M, "Weird block size");
  }

}
#endif

void LeftOverManager::large_block_statistics(block_stats_t* stats) const {
  for (block_t* b = _large_block_reserve; b != NULL; b = b->next) {
    stats->num_blocks ++;
    stats->word_size += b->size;
  }
}

void LeftOverManager::statistics(block_stats_t* stats) const {
  stats->num_blocks = 0;
  stats->word_size = 0;
  _very_small_bins.statistics(stats);
  if (_current != NULL) {
    stats->num_blocks ++;
    stats->word_size += _current_size;
    large_block_statistics(stats);
  } else {
    assert(_large_block_reserve == NULL, "Sanity");
  }
}

void LeftOverManager::print(outputStream* st, bool detailed) const {

  block_stats_t s;

  if (_current != NULL) {
    st->print("current: " SIZE_FORMAT " words; ", _current_size);
  }

  s.num_blocks = 0; s.word_size = 0;
  large_block_statistics(&s);
  st->print("large blocks: %d blocks, " SIZE_FORMAT " words", s.num_blocks, s.word_size);
  if (detailed) {
    st->print(" (");
    for (block_t* b = _large_block_reserve; b != NULL; b = b->next) {
      st->print(SIZE_FORMAT "%s", b->size, b->next != NULL ? ", " : "");
    }
    st->print(")");
  }
  st->print("; ");

  s.num_blocks = 0; s.word_size = 0;
  _very_small_bins.statistics(&s);
  st->print("small blocks: %d blocks, " SIZE_FORMAT " words", s.num_blocks, s.word_size);
  if (detailed) {
    st->print(" (");
    _very_small_bins.print(st);
    st->print(")");
  }
  st->print("; ");
}

} // namespace metaspace