cp_team.c

Go to the documentation of this file.

/*
Copyright (C) 2002-2010 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.m

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 "../client.h" /* cls */
#include "../cl_team.h"
#include "cp_campaign.h"
#include "cp_team.h"

static item_t CP_AddWeaponAmmo (equipDef_t * ed, item_t item)
{
    int i;
    objDef_t *type = item.t;

    assert(ed->numItems[type->idx] > 0);
    ed->numItems[type->idx]--;

    if (type->weapons[0]) {
        /* The given item is ammo or self-contained weapon (i.e. It has firedefinitions. */
        if (type->oneshot) {
            /* "Recharge" the oneshot weapon. */
            item.a = type->ammo;
            item.m = item.t; /* Just in case this hasn't been done yet. */
            Com_DPrintf(DEBUG_CLIENT, "CL_AddWeaponAmmo: oneshot weapon '%s'.\n", type->id);
            return item;
        } else {
            /* No change, nothing needs to be done to this item. */
            return item;
        }
    } else if (!type->reload) {
        /* The given item is a weapon but no ammo is needed,
         * so fire definitions are in t (the weapon). Setting equal. */
        item.m = item.t;
        return item;
    } else if (item.a) {
        assert(item.m);
        /* The item is a weapon and it was reloaded one time. */
        if (item.a == type->ammo) {
            /* Fully loaded, no need to reload, but mark the ammo as used. */
            if (ed->numItems[item.m->idx] > 0) {
                ed->numItems[item.m->idx]--;
                return item;
            } else {
                /* Your clip has been sold; give it back. */
                item.a = NONE_AMMO;
                return item;
            }
        }
    }

    /* Check for complete clips of the same kind */
    if (item.m && ed->numItems[item.m->idx] > 0) {
        ed->numItems[item.m->idx]--;
        item.a = type->ammo;
        return item;
    }

    /* Search for any complete clips. */
    for (i = 0; i < csi.numODs; i++) {
        objDef_t *od = INVSH_GetItemByIDX(i);
        if (INVSH_LoadableInWeapon(od, type)) {
            if (ed->numItems[i] > 0) {
                ed->numItems[i]--;
                item.a = type->ammo;
                item.m = od;
                return item;
            }
        }
    }

    /* Failed to find a complete clip - see if there's any loose ammo
     * of the same kind; if so, gather it all in this weapon. */
    if (item.m && ed->numItemsLoose[item.m->idx] > 0) {
        item.a = ed->numItemsLoose[item.m->idx];
        ed->numItemsLoose[item.m->idx] = 0;
        return item;
    }

    /* See if there's any loose ammo */
    item.a = NONE_AMMO;
    for (i = 0; i < csi.numODs; i++) {
        objDef_t *od = INVSH_GetItemByIDX(i);
        if (INVSH_LoadableInWeapon(od, type) && ed->numItemsLoose[i] > item.a) {
            if (item.a > 0) {
                /* We previously found some ammo, but we've now found other
                 * loose ammo of a different (but appropriate) type with
                 * more bullets.  Put the previously found ammo back, so
                 * we'll take the new type. */
                assert(item.m);
                ed->numItemsLoose[item.m->idx] = item.a;
                /* We don't have to accumulate loose ammo into clips
                 * because we did it previously and we create no new ammo */
            }
            /* Found some loose ammo to load the weapon with */
            item.a = ed->numItemsLoose[i];
            ed->numItemsLoose[i] = 0;
            item.m = od;
        }
    }
    return item;
}

void CL_CleanupAircraftCrew (aircraft_t *aircraft, equipDef_t * ed)
{
    containerIndex_t container;
    linkedList_t* l;

    assert(aircraft);

    Com_DPrintf(DEBUG_CLIENT, "CL_CleanupAircraftCrew:aircraft idx: %i, team size: %i\n",
        aircraft->idx, AIR_GetTeamSize(aircraft));

    /* Auto-assign weapons to UGVs/Robots if they have no weapon yet. */
    for (l = aircraft->acTeam; l != NULL; l = l->next) {
        employee_t *employee = (employee_t *)l->data;
        character_t *chr = &employee->chr;

        /* This is an UGV */
        if (employee->ugv) {
            /* Check if there is a weapon and add it if there isn't. */
            if (!RIGHT(chr) || !RIGHT(chr)->item.t)
                cls.i.EquipActorRobot(&cls.i, &chr->i, INVSH_GetItemByID(employee->ugv->weapon));
        }
    }

    for (container = 0; container < csi.numIDs; container++) {
        for (l = aircraft->acTeam; l != NULL; l = l->next) {
            employee_t *employee = (employee_t *)l->data;
            invList_t *ic, *next;
            character_t *chr = &employee->chr;
#if 0
            /* ignore items linked from any temp container */
            if (INVDEF(container)->temp)
                continue;
#endif
            for (ic = CONTAINER(chr, container); ic; ic = next) {
                next = ic->next;
                if (ed->numItems[ic->item.t->idx] > 0) {
                    ic->item = CP_AddWeaponAmmo(ed, ic->item);
                } else {
                    /* Drop ammo used for reloading and sold carried weapons. */
                    if (!cls.i.RemoveFromInventory(&cls.i, &chr->i, INVDEF(container), ic))
                        Com_Error(ERR_DROP, "Could not remove item from inventory");
                }
            }
        }
    }
}

void CL_CleanTempInventory (base_t* base)
{
    int i, k;

    for (i = 0; i < MAX_EMPLOYEES; i++)
        for (k = 0; k < csi.numIDs; k++)
            if (INVDEF(k)->temp) {
                /* idFloor and idEquip are temp */
                ccs.employees[EMPL_SOLDIER][i].chr.i.c[k] = NULL;
                ccs.employees[EMPL_ROBOT][i].chr.i.c[k] = NULL;
            }

    if (!base)
        return;

    cls.i.DestroyInventory(&cls.i, &base->bEquipment);
}

int CL_UpdateActorAircraftVar (aircraft_t *aircraft, employeeType_t employeeType)
{
    int i;
    size_t size;
    linkedList_t* l;
    int numOnAircraft;

    assert(aircraft);

    numOnAircraft = AIR_GetTeamSize(aircraft);
    Cvar_Set("mn_hired", va(_("%i of %i"), numOnAircraft, aircraft->maxTeamSize));
    Cvar_Set("mn_hirable_count", va("%i", aircraft->maxTeamSize - numOnAircraft));
    Cvar_Set("mn_hired_count", va("%i", numOnAircraft));
    Cvar_Set("mn_pilotassigned", va("%i", aircraft->pilot != NULL));

    if (aircraft->pilot) {
        Cvar_Set("mn_pilot_name", aircraft->pilot->chr.name);
        Cvar_Set("mn_pilot_body", CHRSH_CharGetBody(&aircraft->pilot->chr));
        Cvar_Set("mn_pilot_head", CHRSH_CharGetHead(&aircraft->pilot->chr));
        Cvar_Set("mn_pilot_skin", va("%i", aircraft->pilot->chr.skin));
    } else {
        Cvar_Set("mn_pilot_name", "");
        Cvar_Set("mn_pilot_body", "");
        Cvar_Set("mn_pilot_head", "");
        Cvar_Set("mn_pilot_skin", "");
    }

    size = lengthof(chrDisplayList.chr);

    /* update chrDisplayList list (this is the one that is currently displayed) */
    chrDisplayList.num = 0;
    for (l = aircraft->acTeam; l != NULL; l = l->next) {
        employee_t *empl = (employee_t *)l->data;
        if (empl->type != employeeType)
            continue;

        assert(chrDisplayList.num < size);
        chrDisplayList.chr[chrDisplayList.num] = &empl->chr;

        /* Sanity check(s) */
        if (!chrDisplayList.chr[chrDisplayList.num])
            Com_Error(ERR_DROP, "CL_UpdateActorAircraftVar: Could not get employee character with idx: %i", chrDisplayList.num);
        Com_DPrintf(DEBUG_CLIENT, "add %s to chrDisplayList (pos: %i)\n", chrDisplayList.chr[chrDisplayList.num]->name, chrDisplayList.num);
        Cvar_Set(va("mn_name%i", chrDisplayList.num), chrDisplayList.chr[chrDisplayList.num]->name);

        /* Update number of displayed team-members. */
        chrDisplayList.num++;
    }

    for (i = chrDisplayList.num; i < size; i++)
        chrDisplayList.chr[i] = NULL;   /* Just in case */

    return chrDisplayList.num;
}