#include "active_item_cache.h"

#include "debug.h"
#include "item.h"

#include <algorithm>

void active_item_cache::remove( std::list<item>::iterator it, point location )
{
    const auto predicate = [&]( const item_reference & active_item ) {
        return location == active_item.location && active_item.item_iterator == it;
    };
    // The iterator is expected to be in this list, as it was added that way in `add`.
    // But the processing_speed may have changed, so if it's not in the expected container,
    // remove it from all containers to ensure no stale iterator remains.
    auto &expected = active_items[it->processing_speed()];
    const auto iter = std::find_if( expected.begin(), expected.end(), predicate );
    if( iter != expected.end() ) {
        expected.erase( iter );
    } else {
        for( auto &e : active_items ) {
            e.second.remove_if( predicate );
        }
    }
    if( active_item_set.erase( &*it ) == 0 ) {
        // map erase returns number of elements erased
        debugmsg( "The item isn't there!" );
    }
}

void active_item_cache::add( std::list<item>::iterator it, point location )
{
    if( has( it, location ) ) {
        return;
    }
    active_items[it->processing_speed()].push_back( item_reference{ location, it, &*it } );
    active_item_set[ &*it ] = false;
}

bool active_item_cache::has( std::list<item>::iterator it, point ) const
{
    return active_item_set.find( &*it ) != active_item_set.end();
}

bool active_item_cache::has( item_reference const &itm ) const
{
    const auto found = active_item_set.find( itm.item_id );
    return found != active_item_set.end() && found->second;
}

bool active_item_cache::empty() const
{
    return active_items.empty();
}

// get() only returns the first size() / processing_speed() elements of each list, rounded up.
// It relies on the processing logic to remove and reinsert the items to they
// move to the back of their respective lists (or to new lists).
// Otherwise only the first n items will ever be processed.
std::list<item_reference> active_item_cache::get()
{
    std::list<item_reference> items_to_process;
    for( auto &tuple : active_items ) {
        // Rely on iteration logic to make sure the number is sane.
        int num_to_process = tuple.second.size() / tuple.first;
        for( auto &an_iter : tuple.second ) {
            active_item_set[an_iter.item_id] = true;
            items_to_process.push_back( an_iter );
            if( --num_to_process < 0 ) {
                break;
            }
        }
    }
    return items_to_process;
}

void active_item_cache::subtract_locations( const point &delta )
{
    for( auto &pair : active_items ) {
        for( item_reference &ir : pair.second ) {
            ir.location -= delta;
        }
    }
}

