/*

 * Copyright (c) 2005, 2010, 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 "classfile/resolutionErrors.hpp"

#include "memory/resourceArea.hpp"

#include "oops/oop.inline.hpp"

#include "runtime/handles.inline.hpp"

#include "runtime/safepoint.hpp"

#include "utilities/hashtable.inline.hpp"

// add new entry to the table

void ResolutionErrorTable::add_entry(int index, unsigned int hash,

                                     constantPoolHandle pool, int cp_index, symbolHandle error)

{

  assert_locked_or_safepoint(SystemDictionary_lock);

  assert(!pool.is_null() && !error.is_null(), "adding NULL obj");

  ResolutionErrorEntry* entry = new_entry(hash, pool(), cp_index, error());

  add_entry(index, entry);

}

// find entry in the table

ResolutionErrorEntry* ResolutionErrorTable::find_entry(int index, unsigned int hash,

                                                       constantPoolHandle pool, int cp_index)

{

  assert_locked_or_safepoint(SystemDictionary_lock);

  for (ResolutionErrorEntry *error_probe = bucket(index);

                         error_probe != NULL;

                         error_probe = error_probe->next()) {

  if (error_probe->hash() == hash && error_probe->pool() == pool()) {

      return error_probe;;

    }

  }

  return NULL;

}

// create new error entry

ResolutionErrorEntry* ResolutionErrorTable::new_entry(int hash, constantPoolOop pool,

                                                      int cp_index, symbolOop error)

{

  ResolutionErrorEntry* entry = (ResolutionErrorEntry*)Hashtable::new_entry(hash, pool);

  entry->set_cp_index(cp_index);

  entry->set_error(error);

  return entry;

}

// create resolution error table

ResolutionErrorTable::ResolutionErrorTable(int table_size)

    : Hashtable(table_size, sizeof(ResolutionErrorEntry)) {

}

// GC support

void ResolutionErrorTable::oops_do(OopClosure* f) {

  for (int i = 0; i < table_size(); i++) {

    for (ResolutionErrorEntry* probe = bucket(i);

                           probe != NULL;

                           probe = probe->next()) {

      assert(probe->pool() != (constantPoolOop)NULL, "resolution error table is corrupt");

      assert(probe->error() != (symbolOop)NULL, "resolution error table is corrupt");

      probe->oops_do(f);

    }

  }

}

// GC support

void ResolutionErrorEntry::oops_do(OopClosure* blk) {

  blk->do_oop((oop*)pool_addr());

  blk->do_oop((oop*)error_addr());

}

// We must keep the symbolOop used in the error alive. The constantPoolOop will

// decide when the entry can be purged.

void ResolutionErrorTable::always_strong_classes_do(OopClosure* blk) {

  for (int i = 0; i < table_size(); i++) {

    for (ResolutionErrorEntry* probe = bucket(i);

                           probe != NULL;

                           probe = probe->next()) {

      assert(probe->error() != (symbolOop)NULL, "resolution error table is corrupt");

      blk->do_oop((oop*)probe->error_addr());

    }

  }

}

// Remove unloaded entries from the table

void ResolutionErrorTable::purge_resolution_errors(BoolObjectClosure* is_alive) {

  assert(SafepointSynchronize::is_at_safepoint(), "must be at safepoint");

  for (int i = 0; i < table_size(); i++) {

    for (ResolutionErrorEntry** p = bucket_addr(i); *p != NULL; ) {

      ResolutionErrorEntry* entry = *p;

      assert(entry->pool() != (constantPoolOop)NULL, "resolution error table is corrupt");

      constantPoolOop pool = entry->pool();

      if (is_alive->do_object_b(pool)) {

        p = entry->next_addr();

      } else {

        *p = entry->next();

        free_entry(entry);

      }

    }

  }

}