friend.cpp

Go to the documentation of this file.

/*
 * Crossfire -- cooperative multi-player graphical RPG and adventure game
 *
 * Copyright (c) 1999-2022 the Crossfire Development Team
 *
 * Crossfire is free software and comes with ABSOLUTELY NO WARRANTY. You are
 * welcome to redistribute it under certain conditions. For details, please
 * see COPYING and LICENSE.
 *
 * The authors can be reached via e-mail at <crossfire@metalforge.org>.
 */

#include "global.h"

#include <stdlib.h>

static std::vector<std::pair<object *, tag_t>> friends;

void add_friendly_object(object *op) {
    /* Add some error checking.  This shouldn't happen, but the friendly
     * object list usually isn't very long, and remove_friendly_object
     * won't remove it either.  Plus, it is easier to put a breakpoint in
     * the debugger here and see where the problem is happening.
     */
    if (is_friendly(op)) {
        LOG(llevError, "add_friendly_object: Trying to add object already on list (%s)\n", op->name);
        return;
    }

    friends.push_back(std::make_pair(op, op->count));
}

void remove_friendly_object(object *op) {
    CLEAR_FLAG(op, FLAG_FRIENDLY);
    auto find = std::find_if(friends.begin(), friends.end(), [&] (auto item) { return item.first == op; });
    if (find != friends.end()) {
        if ((*find).second != op->count) {
            LOG(llevError, "remove_friendly_object, tags do no match, %s, %u != %u\n",
                op->name ? op->name : "none", op->count, (*find).second);
        }
        friends.erase(find);
    }
}

void dump_friendly_objects(void) {
    std::for_each(friends.begin(), friends.end(), [] (const auto item) {
        LOG(llevError, "%s (%u)\n", item.first->name, item.second);
    });
}

void clean_friendly_list(void) {
    int count = 0;

    auto item = friends.begin();
    while (item != friends.end()) {
        if (QUERY_FLAG((*item).first, FLAG_FREED)
        || !QUERY_FLAG((*item).first, FLAG_FRIENDLY)
        || ((*item).first->count != (*item).second)) {
            ++count;
            item = friends.erase(item);
        } else {
            ++item;
        }
    }

    friends.shrink_to_fit();
    if (count)
        LOG(llevDebug, "clean_friendly_list: Removed %d bogus links\n", count);
}

int is_friendly(const object *op) {
    return std::find_if(friends.begin(), friends.end(), [&] (auto item) { return item.first == op; }) != friends.end();
}

objectlink *get_friends_of(const object *owner) {
    objectlink *list = NULL;
    std::for_each(friends.begin(), friends.end(), [&] (auto item) {
        if (owner == NULL || object_get_owner(item.first) == owner) {
            objectlink *add = get_objectlink();
            add->id = item.second;
            add->ob = item.first;
            add->next = list;
            list = add;
        }
    });
    return list;
}

void clear_friendly_list(void) {
    friends.clear();
}

object *get_next_friend(object *current) {
    if (friends.empty()) {
        return nullptr;
    }
    if (current == nullptr) {
        return friends.begin()->first;
    };
    auto pos = std::find_if(friends.begin(), friends.end(), [&] (const auto item) { return item.first == current; });
    if (pos == friends.end()) {
        return nullptr;
    }
    pos++;
    return pos == friends.end() ? nullptr : (*pos).first;
}