inventory.cpp

Go to the documentation of this file.

/*
Copyright (C) 2002-2023 UFO: Alien Invasion.

This program is free software; you can redistribute it and/or
modify it under the terms of the GNU General Public License
as published by the Free Software Foundation; either version 2
of the License, or (at your option) any later version.

This program 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 for more details.

You should have received a copy of the GNU General Public License
along with this program; if not, write to the Free Software
Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA  02111-1307, USA.

*/

#include "inventory.h"

InventoryInterface::InventoryInterface () :
    import(nullptr), _invList(nullptr), csi(nullptr), invName(nullptr)
{
}

void InventoryInterface::removeInvList (Item* invList)
{
    Com_DPrintf(DEBUG_SHARED, "removeInvList: remove one slot (%s)\n", invName);

    /* first entry */
    if (this->_invList == invList) {
        Item* ic = this->_invList;
        this->_invList = ic->getNext();
        free(ic);
    } else {
        Item* ic = this->_invList;
        Item* prev = nullptr;
        while (ic) {
            if (ic == invList) {
                if (prev)
                    prev->setNext(ic->getNext());
                free(ic);
                break;
            }
            prev = ic;
            ic = ic->getNext();
        }
    }
}

Item* InventoryInterface::addInvList (Inventory* const inv, const invDef_t* container)
{
    Item* newEntry = static_cast<Item*>(alloc(sizeof(Item)));
    newEntry->setNext(nullptr); /* not really needed - but for better readability */

    Com_DPrintf(DEBUG_SHARED, "AddInvList: add one slot (%s)\n", invName);

    Item* firstEntry = inv->getContainer2(container->id);
    if (!firstEntry) {
        /* create the list */
        inv->setContainer(container->id, newEntry);
    } else {
        /* read up to the end of the list */
        Item* list = firstEntry;
        while (list->getNext())
            list = list->getNext();
        /* append our new item as the last in the list */
        list->setNext(newEntry);
    }

    return newEntry;
}

Item* InventoryInterface::addToInventory (Inventory* const inv, const Item* const item, const invDef_t* container, int x, int y, int amount)
{
    if (!item->def())
        return nullptr;

    if (amount <= 0)
        return nullptr;

    assert(inv);
    assert(container);

    if (container->single && inv->getContainer2(container->id))
        return nullptr;

    Item* ic;
    /* CID_EQUIP and CID_FLOOR */
    if (container->temp) {
        for (ic = inv->getContainer2(container->id); ic; ic = ic->getNext())
            if (ic->isSameAs(item)) {
                ic->addAmount(amount);
                Com_DPrintf(DEBUG_SHARED, "addToInventory: Amount of '%s': %i (%s)\n",
                    ic->def()->name, ic->getAmount(), invName);
                return ic;
            }
    }

    if (x < 0 || y < 0 || x >= SHAPE_BIG_MAX_WIDTH || y >= SHAPE_BIG_MAX_HEIGHT) {
        /* No (sane) position in container given as parameter - find free space on our own. */
        inv->findSpace(container, item, &x, &y, nullptr);
        if (x == NONE)
            return nullptr;
    }

    const int checkedTo = inv->canHoldItem(container, item->def(), x, y, nullptr);
    assert(checkedTo);

    /* not found - add a new one */
    ic = addInvList(inv, container);

    /* Set the data in the new entry to the data we got via function-parameters.*/
    *ic = *item;
    ic->setNext(nullptr);
    ic->setAmount(amount);

    /* don't reset an already applied rotation */
    if (checkedTo == INV_FITS_ONLY_ROTATED)
        ic->rotated = true;
    ic->setX(x);
    ic->setY(y);

    return ic;
}

bool InventoryInterface::removeFromInventory (Inventory* const inv, const invDef_t* container, Item* fItem)
{
    assert(inv);
    assert(container);
    assert(fItem);

    Item* ic = inv->getContainer2(container->id);
    if (!ic)
        return false;

    if (container->single || ic == fItem) {
        this->cacheItem = *ic;
        /* temp container like CID_EQUIP and CID_FLOOR */
        if (container->temp && ic->getAmount() > 1) {
            ic->addAmount(-1);
            Com_DPrintf(DEBUG_SHARED, "removeFromInventory: Amount of '%s': %i (%s)\n",
                ic->def()->name, ic->getAmount(), invName);
            return true;
        }

        if (container->single && ic->getNext())
            Com_Printf("removeFromInventory: Error: single container %s has many items. (%s)\n", container->name, invName);

        /* An item in other containers than CID_FLOOR or CID_EQUIP should
         * always have an amount value of 1.
         * The other container types do not support stacking.*/
        assert(ic->getAmount() == 1);

        inv->setContainer(container->id, ic->getNext());

        /* updated invUnused to be able to reuse this space later again */
        removeInvList(ic);

        return true;
    }

    for (Item* previous = inv->getContainer2(container->id); ic; ic = ic->getNext()) {
        if (ic != fItem) {
            previous = ic;
            continue;
        }

        this->cacheItem = *ic;
        /* temp container like CID_EQUIP and CID_FLOOR */
        if (ic->getAmount() > 1 && container->temp) {
            ic->addAmount(-1);
            Com_DPrintf(DEBUG_SHARED, "removeFromInventory: Amount of '%s': %i (%s)\n",
                ic->def()->name, ic->getAmount(), invName);
            return true;
        }

        if (ic == inv->getContainer2(container->id))
            inv->setContainer(container->id, inv->getContainer2(container->id)->getNext());
        else
            previous->setNext(ic->getNext());

        removeInvList(ic);

        return true;
    }
    return false;
}

inventory_action_t InventoryInterface::moveInInventory (Inventory* const inv, const invDef_t* from, Item* fItem, const invDef_t* to, int tx, int ty, int* TU, Item**  uponItem)
{
    assert(to);
    assert(from);

    if (uponItem)
        *uponItem = nullptr;

    if (from == to && fItem->getX() == tx && fItem->getY() == ty)
        return IA_NONE;

    int time = from->out + to->in;
    if (from == to) {
        if (from->isFloorDef())
            time = 0;
        else
            time /= 2;
    }

    if (TU && *TU < time)
        return IA_NOTIME;

    assert(inv);

    int checkedTo = INV_DOES_NOT_FIT;
    /* Special case for moving an item within the same container. */
    if (from == to) {
        /* Do nothing if we move inside a scroll container. */
        if (from->scroll)
            return IA_NONE;

        const Container& cont = inv->getContainer(from->id);
        Item* item = nullptr;
        while ((item = cont.getNextItem(item))) {
            if (item != fItem)
                continue;

            if (item->getAmount() <= 1)
                continue;
            checkedTo = inv->canHoldItem(to, item->def(), tx, ty, fItem);
            if (!(checkedTo & INV_FITS))
                return IA_NONE;

            item->setX(tx);
            item->setY(ty);
            if (uponItem)
                *uponItem = item;
            return IA_MOVE;
        }
    }

    /* If weapon is twohanded and is moved from hand to hand do nothing. */
    /* Twohanded weapon are only in CID_RIGHT. */
    if (fItem->def()->fireTwoHanded && to->isLeftDef() && from->isRightDef()) {
        return IA_NONE;
    }

    /* If non-armour moved to an armour slot then abort.
     * Same for non extension items when moved to an extension slot. */
    if ((to->armour && !fItem->isArmour())
     || (to->implant && !fItem->def()->implant)
     || (to->headgear && !fItem->def()->headgear)) {
        return IA_NONE;
    }

    /* Check if the target is a blocked inv-armour and source!=dest. */
    if (to->single)
        checkedTo = inv->canHoldItem(to, fItem->def(), 0, 0, fItem);
    else {
        if (tx == NONE || ty == NONE)
            inv->findSpace(to, fItem, &tx, &ty, fItem);
        /* still no valid location found */
        if (tx == NONE || ty == NONE)
            return IA_NONE;

        checkedTo = inv->canHoldItem(to, fItem->def(), tx, ty, fItem);
    }

    Item* ic;
    bool alreadyRemovedSource = false;
    if (to->armour && from != to && !checkedTo) {
        /* Store x/y origin coordinates of removed (source) item.
         * When we re-add it we can use this. */
        const int cacheFromX = fItem->getX();
        const int cacheFromY = fItem->getY();

        /* Check if destination/blocking item is the same as source/from item.
         * In that case the move is not needed -> abort. */
        Item* icTo = inv->getItemAtPos(to, tx, ty);
        if (fItem->def() == icTo->def())
            return IA_NONE;

        /* Actually remove the ammo from the 'from' container. */
        if (!removeFromInventory(inv, from, fItem))
            return IA_NONE;
        else
            /* Removal successful - store this info. */
            alreadyRemovedSource = true;

        Item cacheItem2 = this->cacheItem; /* Save/cache (source) item. The cacheItem is modified in MoveInInventory. */

        /* Move the destination item to the source. */
        moveInInventory(inv, to, icTo, from, cacheFromX, cacheFromY, TU, uponItem);

        /* Reset the cached item (source) (It'll be move to container emptied by destination item later.) */
        this->cacheItem = cacheItem2;
        checkedTo = inv->canHoldItem(to, this->cacheItem.def(), 0, 0, fItem);
    } else if (!checkedTo) {
        /* Get the target-invlist (e.g. a weapon). We don't need to check for
         * scroll because checkedTo is always true here. */
        ic = inv->getItemAtPos(to, tx, ty);

        if (ic && !to->isEquipDef() && fItem->def()->isLoadableInWeapon(ic->def())) {
            /* A target-item was found and the dragged item (implicitly ammo)
             * can be loaded in it (implicitly weapon). */
            if (ic->getAmmoLeft() >= ic->def()->ammo && ic->ammoDef() == fItem->def()) {
                /* Weapon already fully loaded with the same ammunition -> abort */
                return IA_NORELOAD;
            }
            time += ic->def()->getReloadTime();
            if (!TU || *TU >= time) {
                if (TU)
                    *TU -= time;
                if (ic->getAmmoLeft() >= ic->def()->ammo) {
                    /* exchange ammo */
                    const Item item(ic->ammoDef());
                    /* Put current ammo in place of the new ammo unless floor - there can be more than 1 item */
                    const int cacheFromX = from->isFloorDef() ? NONE : fItem->getX();
                    const int cacheFromY = from->isFloorDef() ? NONE : fItem->getY();

                    /* Actually remove the ammo from the 'from' container. */
                    if (!removeFromInventory(inv, from, fItem))
                        return IA_NONE;

                    /* Add the currently used ammo in place of the new ammo in the "from" container. */
                    if (addToInventory(inv, &item, from, cacheFromX, cacheFromY, 1) == nullptr)
                        Sys_Error("Could not reload the weapon - add to inventory failed (%s)", invName);

                    ic->setAmmoDef(this->cacheItem.def());
                    if (uponItem)
                        *uponItem = ic;
                    return IA_RELOAD_SWAP;
                } else {
                    /* Actually remove the ammo from the 'from' container. */
                    if (!removeFromInventory(inv, from, fItem))
                        return IA_NONE;

                    ic->setAmmoDef(this->cacheItem.def());
                    /* loose ammo of type ic->m saved on server side */
                    ic->setAmmoLeft(ic->def()->ammo);
                    if (uponItem)
                        *uponItem = ic;
                    return IA_RELOAD;
                }
            }
            /* Not enough time -> abort. */
            return IA_NOTIME;
        }

        /* temp container like CID_EQUIP and CID_FLOOR */
        if (ic && to->temp) {
            /* We are moving to a blocked location container but it's the base-equipment floor or a battlescape floor.
             * We add the item anyway but it'll not be displayed (yet)
             * This is then used in addToInventory below.*/
            inv->findSpace(to, fItem, &tx, &ty, fItem);
            if (tx == NONE || ty == NONE) {
                Com_DPrintf(DEBUG_SHARED, "MoveInInventory - item will be added non-visible (%s)\n", invName);
            }
        } else {
            /* Impossible move -> abort. */
            return IA_NONE;
        }
    }

    /* twohanded exception - only CID_RIGHT is allowed for fireTwoHanded weapons */
    if (fItem->def()->fireTwoHanded && to->isLeftDef())
        to = &this->csi->ids[CID_RIGHT];

    switch (checkedTo) {
    case INV_DOES_NOT_FIT:
        /* Impossible move - should be handled above, but add an abort just in case */
        Com_Printf("MoveInInventory: Item doesn't fit into container.");
        return IA_NONE;
    case INV_FITS:
        /* Remove rotated tag */
        fItem->rotated = false;
        break;
    case INV_FITS_ONLY_ROTATED:
        /* Set rotated tag */
        fItem->rotated = true;
        break;
    case INV_FITS_BOTH:
        /* Leave rotated tag as-is */
        break;
    }

    /* Actually remove the item from the 'from' container (if it wasn't already removed). */
    if (!alreadyRemovedSource)
        if (!removeFromInventory(inv, from, fItem))
            return IA_NONE;

    /* successful */
    if (TU)
        *TU -= time;

    assert(this->cacheItem.def());
    ic = addToInventory(inv, &this->cacheItem, to, tx, ty, 1);

    /* return data */
    if (uponItem) {
        assert(ic);
        *uponItem = ic;
    }

    if (to->isArmourDef()) {
        assert(this->cacheItem.isArmour());
        return IA_ARMOUR;
    }

    return IA_MOVE;
}

bool InventoryInterface::tryAddToInventory (Inventory* const inv, const Item* const item, const invDef_t* container)
{
    int x, y;

    inv->findSpace(container, item, &x, &y, nullptr);

    if (x == NONE) {
        assert(y == NONE);
        return false;
    } else {
        const int checkedTo = inv->canHoldItem(container, item->def(), x, y, nullptr);
        if (!checkedTo)
            return false;

        const bool rotated = checkedTo == INV_FITS_ONLY_ROTATED;
        Item itemRotation = *item;
        itemRotation.rotated = rotated;

        return addToInventory(inv, &itemRotation, container, x, y, 1) != nullptr;
    }
}

void InventoryInterface::emptyContainer (Inventory* const inv, const containerIndex_t containerId)
{
    Item* ic = inv->getContainer2(containerId);

    while (ic) {
        Item* old = ic;
        ic = ic->getNext();
        removeInvList(old);
    }

    inv->resetContainer(containerId);
}

void InventoryInterface::destroyInventory (Inventory* const inv)
{
    if (!inv)
        return;

    const Container* cont = nullptr;
    while ((cont = inv->getNextCont(cont))) {
        emptyContainer(inv, cont->id);
    }

    inv->init();
}

float InventoryInterface::GetInventoryState (const Inventory* inventory, int& slowestFd)
{
    slowestFd = 0;
    const Container* cont = nullptr;
    while ((cont = inventory->getNextCont(cont))) {
        for (Item* ic = cont->_invList, *next; ic; ic = next) {
            next = ic->getNext();
            const fireDef_t* fireDef = ic->getSlowestFireDef();
            if (slowestFd == 0 || (fireDef && fireDef->time > slowestFd))
                    slowestFd = fireDef->time;
        }
    }
    return inventory->getWeight();
}

#define WEAPONLESS_BONUS    0.4     /* if you got neither primary nor secondary weapon, this is the chance to retry to get one (before trying to get grenades or blades) */

int InventoryInterface::PackAmmoAndWeapon (character_t* const chr, const objDef_t* weapon, int missedPrimary, const equipDef_t* ed, int maxWeight)
{
    assert(!weapon->isArmour());
    Item item(weapon);
    const objDef_t* ammo = nullptr;

    if (weapon->oneshot) {
        /* The weapon provides its own ammo (i.e. it is charged or loaded in the base.) */
        item.setAmmoLeft(weapon->ammo);
        item.setAmmoDef(weapon);
        Com_DPrintf(DEBUG_SHARED, "PackAmmoAndWeapon: oneshot weapon '%s' in equipment '%s' (%s).\n",
                weapon->id, ed->id, invName);
    } else if (!weapon->isReloadable()) {
        item.setAmmoDef(weapon);    /* no ammo needed, so fire definitions are in item */
    } else {
        /* find some suitable ammo for the weapon (we will have at least one if there are ammos for this
         * weapon in equipment definition) */
        int totalAvailableAmmo = 0;
        for (int i = 0; i < csi->numODs; i++) {
            const objDef_t* obj = INVSH_GetItemByIDX(i);
            if (ed->numItems[i] && obj->isLoadableInWeapon(weapon)) {
                totalAvailableAmmo++;
            }
        }
        if (totalAvailableAmmo) {
            int randNumber = rand() % totalAvailableAmmo;
            for (int i = 0; i < csi->numODs; i++) {
                const objDef_t* obj = INVSH_GetItemByIDX(i);
                if (ed->numItems[i] && obj->isLoadableInWeapon(weapon)) {
                    randNumber--;
                    if (randNumber < 0) {
                        ammo = obj;
                        break;
                    }
                }
            }
        }

        if (!ammo) {
            Com_DPrintf(DEBUG_SHARED, "PackAmmoAndWeapon: no ammo for sidearm or primary weapon '%s' in equipment '%s' (%s).\n",
                    weapon->id, ed->id, invName);
            return 0;
        }
        /* load ammo */
        item.setAmmoLeft(weapon->ammo);
        item.setAmmoDef(ammo);
    }

    if (!item.ammoDef()) {
        Com_Printf("PackAmmoAndWeapon: no ammo for sidearm or primary weapon '%s' in equipment '%s' (%s).\n",
                weapon->id, ed->id, invName);
        return 0;
    }

    Inventory* const inv = &chr->inv;
    const int speed = chr->score.skills[ABILITY_SPEED];
    int tuNeed = 0;
    float weight = GetInventoryState(inv, tuNeed) + item.getWeight();
    int maxTU = GET_TU(speed, GET_ENCUMBRANCE_PENALTY(weight, chr->score.skills[ABILITY_POWER]));
    if (weight > maxWeight * WEIGHT_FACTOR || tuNeed > maxTU) {
        Com_DPrintf(DEBUG_SHARED, "PackAmmoAndWeapon: weapon too heavy: '%s' in equipment '%s' (%s).\n",
                weapon->id, ed->id, invName);
        return 0;
    }

    /* are we going to allow trying the left hand? */
    const bool allowLeft = !(inv->getContainer2(CID_RIGHT) && inv->getContainer2(CID_RIGHT)->def()->fireTwoHanded);
    int ammoMult = 1;
    /* now try to pack the weapon */
    bool packed = tryAddToInventory(inv, &item, &csi->ids[CID_RIGHT]);
    if (packed)
        ammoMult = 3;
    if (!packed && allowLeft)
        packed = tryAddToInventory(inv, &item, &csi->ids[CID_LEFT]);
    if (!packed)
        packed = tryAddToInventory(inv, &item, &csi->ids[CID_BELT]);
    if (!packed)
        packed = tryAddToInventory(inv, &item, &csi->ids[CID_HOLSTER]);
    if (!packed)
        packed = tryAddToInventory(inv, &item, &csi->ids[CID_BACKPACK]);
    if (!packed)
        return 0;

    /* pack some more ammo in the backpack */
    if (ammo) {
        int numpacked = 0;

        /* how many clips? */
        int num = (1 + ed->numItems[ammo->idx])
            * (float) (1.0f + missedPrimary / 100.0);

        /* pack some ammo */
        while (num--) {
            weight = GetInventoryState(inv, tuNeed) + item.getWeight();
            maxTU = GET_TU(speed, GET_ENCUMBRANCE_PENALTY(weight, chr->score.skills[ABILITY_POWER]));

            Item mun(ammo);
            /* ammo to backpack; belt is for knives and grenades */
            if (weight <= maxWeight * WEIGHT_FACTOR && tuNeed <= maxTU)
                    numpacked += tryAddToInventory(inv, &mun, &csi->ids[CID_BACKPACK]);
            /* no problem if no space left; one ammo already loaded */
            if (numpacked > ammoMult || numpacked * weapon->ammo > 11)
                break;
        }
    }

    return true;
}


void InventoryInterface::EquipActorMelee (Inventory* const inv, const teamDef_t* td)
{
    assert(td->onlyWeapon);

    /* Get weapon def */
    const objDef_t* obj = td->onlyWeapon;

    /* Prepare item. This kind of item has no ammo, fire definitions are in item.t. */
    Item item(obj);
    item.setAmmoDef(item.def());
    item.setAmmoLeft(NONE_AMMO);
    /* Every melee actor weapon definition is firetwohanded, add to right hand. */
    if (!obj->fireTwoHanded)
        Sys_Error("INVSH_EquipActorMelee: melee weapon %s for team %s is not firetwohanded! (%s)",
                obj->id, td->id, invName);
    tryAddToInventory(inv, &item, &this->csi->ids[CID_RIGHT]);
}

void InventoryInterface::EquipActorRobot (Inventory* const inv, const objDef_t* weapon)
{
    assert(weapon);

    /* Prepare weapon in item. */
    Item item(weapon);
    item.setAmmoLeft(weapon->ammo);

    /* Get ammo for item/weapon. */
    assert(weapon->numAmmos > 0);   /* There _has_ to be at least one ammo-type. */
    assert(weapon->ammos[0]);
    item.setAmmoDef(weapon->ammos[0]);

    tryAddToInventory(inv, &item, &this->csi->ids[CID_RIGHT]);
}

typedef enum {
    WEAPON_PARTICLE_OR_NORMAL = 0,  
    WEAPON_OTHER = 1,               
    WEAPON_NO_PRIMARY = 2           
} equipPrimaryWeaponType_t;

void InventoryInterface::EquipActorNormal (character_t* const chr, const equipDef_t* ed, int maxWeight)
{
    const teamDef_t* td = chr->teamDef;
    const int numEquip = lengthof(ed->numItems);
    int repeat = 0;

    if (td->weapons) {
        int missedPrimary = 0; 
        const objDef_t* primaryWeapon = nullptr;
        /* Primary weapons */
        const int maxWeaponIdx = std::min(this->csi->numODs - 1, numEquip - 1);
        int randNumber = rand() % 100;
        for (int i = 0; i < maxWeaponIdx; i++) {
            const objDef_t* obj = INVSH_GetItemByIDX(i);
            if (ed->numItems[i] && obj->weapon && obj->fireTwoHanded && obj->isPrimary) {
                randNumber -= ed->numItems[i];
                missedPrimary += ed->numItems[i];
                if (!primaryWeapon && randNumber < 0)
                    primaryWeapon = obj;
            }
        }
        /* See if a weapon has been selected. */
        equipPrimaryWeaponType_t primary = WEAPON_NO_PRIMARY;
        int hasWeapon = 0;
        if (primaryWeapon) {
            hasWeapon += PackAmmoAndWeapon(chr, primaryWeapon, 0, ed, maxWeight);
            if (hasWeapon) {
                int ammo;

                /* Find the first possible ammo to check damage type. */
                for (ammo = 0; ammo < this->csi->numODs; ammo++)
                    if (ed->numItems[ammo] && this->csi->ods[ammo].isLoadableInWeapon(primaryWeapon))
                        break;
                if (ammo < this->csi->numODs) {
                    if (/* To avoid two particle weapons. */
                        !(this->csi->ods[ammo].dmgtype == this->csi->damParticle)
                        /* To avoid SMG + Assault Rifle */
                        && !(this->csi->ods[ammo].dmgtype == this->csi->damNormal)) {
                        primary = WEAPON_OTHER;
                    } else {
                        primary = WEAPON_PARTICLE_OR_NORMAL;
                    }
                }
                /* reset missedPrimary: we got a primary weapon */
                missedPrimary = 0;
            } else {
                Com_DPrintf(DEBUG_SHARED, "INVSH_EquipActor: primary weapon '%s' couldn't be equipped in equipment '%s' (%s).\n",
                        primaryWeapon->id, ed->id, invName);
                repeat = WEAPONLESS_BONUS > frand();
            }
        }

        /* Sidearms (secondary weapons with reload). */
        do {
            int randNumber = rand() % 100;
            const objDef_t* secondaryWeapon = nullptr;
            for (int i = 0; i < this->csi->numODs; i++) {
                const objDef_t* obj = INVSH_GetItemByIDX(i);
                if (ed->numItems[i] && obj->weapon && obj->isReloadable() && !obj->deplete && obj->isSecondary) {
                    randNumber -= ed->numItems[i] / (primary == WEAPON_PARTICLE_OR_NORMAL ? 2 : 1);
                    if (randNumber < 0) {
                        secondaryWeapon = obj;
                        break;
                    }
                }
            }

            if (secondaryWeapon) {
                hasWeapon += PackAmmoAndWeapon(chr, secondaryWeapon, missedPrimary, ed, maxWeight);
            }
        } while (!hasWeapon && repeat--);

        /* Misc items and secondary weapons without reload. */
        if (!hasWeapon)
            repeat = WEAPONLESS_BONUS > frand();
        else
            repeat = 0;
        /* Misc object probability can be bigger than 100 -- you're sure to
         * have one misc if it fits your backpack */
        int sum = 0;
        for (int i = 0; i < this->csi->numODs; i++) {
            const objDef_t* obj = INVSH_GetItemByIDX(i);
            if (ed->numItems[i] && ((obj->weapon && obj->isSecondary
             && (!obj->isReloadable() || obj->deplete)) || obj->isMisc)) {
                /* if ed->num[i] is greater than 100, the first number is the number of items you'll get:
                 * don't take it into account for probability
                 * Make sure that the probability is at least one if an item can be selected */
                sum += ed->numItems[i] ? std::max(ed->numItems[i] % 100, 1) : 0;
            }
        }
        if (sum) {
            do {
                int randNumber = rand() % sum;
                const objDef_t* secondaryWeapon = nullptr;
                for (int i = 0; i < this->csi->numODs; i++) {
                    const objDef_t* obj = INVSH_GetItemByIDX(i);
                    if (ed->numItems[i] && ((obj->weapon && obj->isSecondary
                     && (!obj->isReloadable() || obj->deplete)) || obj->isMisc)) {
                        randNumber -= ed->numItems[i] ? std::max(ed->numItems[i] % 100, 1) : 0;
                        if (randNumber < 0) {
                            secondaryWeapon = obj;
                            break;
                        }
                    }
                }

                if (secondaryWeapon) {
                    int num = ed->numItems[secondaryWeapon->idx] / 100 + (ed->numItems[secondaryWeapon->idx] % 100 >= 100 * frand());
                    while (num--) {
                        hasWeapon += PackAmmoAndWeapon(chr, secondaryWeapon, 0, ed, maxWeight);
                    }
                }
            } while (repeat--); /* Gives more if no serious weapons. */
        }

        /* If no weapon at all, bad guys will always find a blade to wield. */
        if (!hasWeapon) {
            int maxPrice = 0;
            const objDef_t* blade = nullptr;
            Com_DPrintf(DEBUG_SHARED, "INVSH_EquipActor: no weapon picked in equipment '%s', defaulting to the most expensive secondary weapon without reload. (%s)\n",
                    ed->id, invName);
            for (int i = 0; i < this->csi->numODs; i++) {
                const objDef_t* obj = INVSH_GetItemByIDX(i);
                if (ed->numItems[i] && obj->weapon && obj->isSecondary && !obj->isReloadable()) {
                    if (obj->price > maxPrice) {
                        maxPrice = obj->price;
                        blade = obj;
                    }
                }
            }
            if (maxPrice)
                hasWeapon += PackAmmoAndWeapon(chr, blade, 0, ed, maxWeight);
        }
        /* If still no weapon, something is broken, or no blades in equipment. */
        if (!hasWeapon)
            Com_DPrintf(DEBUG_SHARED, "INVSH_EquipActor: cannot add any weapon; no secondary weapon without reload detected for equipment '%s' (%s).\n",
                    ed->id, invName);

        /* Armour; especially for those without primary weapons. */
        repeat = (float) missedPrimary > frand() * 100.0;
    } else {
        return;
    }

    Inventory* const inv = &chr->inv;
    const int speed = chr->score.skills[ABILITY_SPEED];
    if (td->armour) {
        do {
            int randNumber = rand() % 100;
            for (int i = 0; i < this->csi->numODs; i++) {
                const objDef_t* armour = INVSH_GetItemByIDX(i);
                if (ed->numItems[i] && armour->isArmour()) {
                    randNumber -= ed->numItems[i];
                    if (randNumber < 0) {
                        const Item item(armour);
                        int tuNeed = 0;
                        const int weight = GetInventoryState(inv, tuNeed) + item.getWeight();
                        const int maxTU = GET_TU(speed, GET_ENCUMBRANCE_PENALTY(weight, chr->score.skills[ABILITY_POWER]));
                        if (weight > maxWeight * WEIGHT_FACTOR || tuNeed > maxTU)
                            continue;
                        if (tryAddToInventory(inv, &item, &this->csi->ids[CID_ARMOUR])) {
                            repeat = 0;
                            break;
                        }
                    }
                }
            }
        } while (repeat-- > 0);
    } else {
        Com_DPrintf(DEBUG_SHARED, "INVSH_EquipActor: teamdef '%s' may not carry armour (%s)\n",
                td->name, invName);
    }

    {
        int randNumber = rand() % 10;
        for (int i = 0; i < this->csi->numODs; i++) {
            if (ed->numItems[i]) {
                const objDef_t* miscItem = INVSH_GetItemByIDX(i);
                if (miscItem->isMisc && !miscItem->weapon) {
                    randNumber -= ed->numItems[i];
                    if (randNumber < 0) {
                        const bool oneShot = miscItem->oneshot;
                        const Item item(miscItem, oneShot ? miscItem : nullptr, oneShot ? miscItem->ammo : NONE_AMMO);
                        containerIndex_t container;
                        int tuNeed;
                        const fireDef_t* itemFd = item.getSlowestFireDef();
                        const float weight = GetInventoryState(inv, tuNeed) + item.getWeight();
                        const int maxTU = GET_TU(speed, GET_ENCUMBRANCE_PENALTY(weight, chr->score.skills[ABILITY_POWER]));

                        if (miscItem->headgear)
                            container = CID_HEADGEAR;
                        else if (miscItem->implant)
                            container = CID_IMPLANT;
                        else
                            container = CID_BACKPACK;
                        if (weight > maxWeight * WEIGHT_FACTOR || tuNeed > maxTU || (itemFd && itemFd->time > maxTU))
                            continue;
                        tryAddToInventory(inv, &item, &this->csi->ids[container]);
                    }
                }
            }
        }
    }
}

void InventoryInterface::EquipActor (character_t* const chr, const equipDef_t* ed, const objDef_t* weapon, int maxWeight)
{
    if (chr->teamDef->robot && weapon) {
        if (weapon->numAmmos > 0)
            EquipActorRobot(&chr->inv, weapon);
        else if (weapon->fireTwoHanded)
            EquipActorMelee(&chr->inv, chr->teamDef);
        else
            Com_Printf("EquipActor: weapon %s has no ammo assigned and must not be fired two handed\n", weapon->id);
    } else if (chr->teamDef->weapons && ed) {
        EquipActorNormal(chr, ed, maxWeight);
    } else {
        Com_Printf("EquipActor: actor with no equipment\n");
    }
}
int InventoryInterface::GetUsedSlots ()
{
    int i = 0;
    const Item* slot = _invList;
    while (slot) {
        slot = slot->getNext();
        i++;
    }
    Com_DPrintf(DEBUG_SHARED, "Used inventory slots %i (%s)\n", i, invName);
    return i;
}

void InventoryInterface::initInventory (const char* name, const csi_t* csi, const inventoryImport_t* import)
{
    const Item item;

    this->import = import;
    this->invName = name;
    this->cacheItem = item;
    this->csi = csi;
    this->_invList = nullptr;
}

void InventoryInterface::destroyInventoryInterface (void)
{
    if (this->import == nullptr)
        return;
    this->import->FreeAll();
    initInventory(nullptr, nullptr, nullptr);
}