/*

 * 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 "gc/shared/oopStorage.inline.hpp"

#include "gc/shared/oopStorageParState.inline.hpp"

#include "gc/shared/weakProcessor.hpp"

#include "gc/shared/weakProcessorPhases.hpp"

#include "gc/shared/weakProcessorPhaseTimes.hpp"

#include "gc/shared/workgroup.hpp"

#include "utilities/debug.hpp"

class BoolObjectClosure;

class OopClosure;

template<typename IsAlive, typename KeepAlive>

void WeakProcessor::Task::work(uint worker_id,

                               IsAlive* is_alive,

                               KeepAlive* keep_alive) {

  assert(worker_id < _nworkers,

         "worker_id (%u) exceeds task's configured workers (%u)",

         worker_id, _nworkers);

  FOR_EACH_WEAK_PROCESSOR_PHASE(phase) {

    if (WeakProcessorPhases::is_serial(phase)) {

      uint serial_index = WeakProcessorPhases::serial_index(phase);

      if (_serial_phases_done.try_claim_task(serial_index)) {

        WeakProcessorPhaseTimeTracker pt(_phase_times, phase);

        WeakProcessorPhases::processor(phase)(is_alive, keep_alive);

      }

    } else {

      WeakProcessorPhaseTimeTracker pt(_phase_times, phase, worker_id);

      uint storage_index = WeakProcessorPhases::oop_storage_index(phase);

      _storage_states[storage_index].weak_oops_do(is_alive, keep_alive);

    }

  }

  _serial_phases_done.all_tasks_completed(_nworkers);

}

class WeakProcessor::GangTask : public AbstractGangTask {

  Task _task;

  BoolObjectClosure* _is_alive;

  OopClosure* _keep_alive;

  void (*_erased_do_work)(GangTask* task, uint worker_id);

  template<typename IsAlive, typename KeepAlive>

  static void erased_do_work(GangTask* task, uint worker_id) {

    task->_task.work(worker_id,

                     static_cast<IsAlive*>(task->_is_alive),

                     static_cast<KeepAlive*>(task->_keep_alive));

  }

public:

  template<typename IsAlive, typename KeepAlive>

  GangTask(const char* name,

           IsAlive* is_alive,

           KeepAlive* keep_alive,

           WeakProcessorPhaseTimes* phase_times,

           uint nworkers) :

    AbstractGangTask(name),

    _task(phase_times, nworkers),

    _is_alive(is_alive),

    _keep_alive(keep_alive),

    _erased_do_work(&erased_do_work<IsAlive, KeepAlive>)

  {}

  virtual void work(uint worker_id);

};

template<typename IsAlive, typename KeepAlive>

void WeakProcessor::weak_oops_do(WorkGang* workers,

                                 IsAlive* is_alive,

                                 KeepAlive* keep_alive,

                                 WeakProcessorPhaseTimes* phase_times) {

  WeakProcessorTimeTracker tt(phase_times);

  uint nworkers = ergo_workers(MIN2(workers->active_workers(),

                                    phase_times->max_threads()));

  GangTask task("Weak Processor", is_alive, keep_alive, phase_times, nworkers);

  workers->run_task(&task, nworkers);

}

template<typename IsAlive, typename KeepAlive>

void WeakProcessor::weak_oops_do(WorkGang* workers,

                                 IsAlive* is_alive,

                                 KeepAlive* keep_alive,

                                 uint indent_log) {

  uint nworkers = ergo_workers(workers->active_workers());

  WeakProcessorPhaseTimes pt(nworkers);

  weak_oops_do(workers, is_alive, keep_alive, &pt);

  pt.log_print_phases(indent_log);

}