/*

 * Copyright (c) 2015, 2018, 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 "code/codeCache.hpp"

#include "code/relocInfo.hpp"

#include "code/relocInfo_ext.hpp"

#include "gc/shared/cardTable.hpp"

#include "gc/shared/cardTableModRefBS.hpp"

#include "gc/shared/collectedHeap.hpp"

#include "memory/universe.hpp"

#include "runtime/os.hpp"

#include "utilities/debug.hpp"

#ifdef COMPILER1

#include "c1/c1_globals.hpp"

#endif

address symbolic_Relocation::symbolic_value(symbolic_Relocation::symbolic_reference t) {

  if (Universe::heap() == NULL) {

    // the symbolic values are not needed so early

    // (and most of them lead to errors if asked too early)

    return NULL;

  }

  switch(t) {

  case symbolic_Relocation::polling_page_reference: {

    return os::get_polling_page();

  }

  case symbolic_Relocation::eden_top_reference: {

    if (!Universe::heap()->supports_inline_contig_alloc()) {

      return NULL;

    }

    return (address)Universe::heap()->top_addr();

  }

  case symbolic_Relocation::heap_end_reference: {

    if (!Universe::heap()->supports_inline_contig_alloc()) {

      return NULL;

    }

    return (address)Universe::heap()->end_addr();

  }

  case symbolic_Relocation::card_table_reference: {

    BarrierSet* bs = Universe::heap()->barrier_set();

    CardTableModRefBS* ctbs = barrier_set_cast<CardTableModRefBS>(bs);

    CardTable* ct = ctbs->card_table();

    return (address)ct->byte_map_base();

  }

  case symbolic_Relocation::mark_bits_reference: {

    return (address)Universe::verify_mark_bits();

  }

  case symbolic_Relocation::mark_mask_reference: {

    return (address)Universe::verify_mark_mask();

  }

  case symbolic_Relocation::oop_bits_reference: {

    return (address)Universe::verify_oop_bits();

  }

  case symbolic_Relocation::oop_mask_reference: {

    return (address)Universe::verify_oop_mask();

  }

  case symbolic_Relocation::debug_string_reference: {

    return (address)"<Lost debug string>";

  }

  default: {

    // missing declaration

    ShouldNotReachHere();

    return NULL;

  }

  }

}