polserver/pol-core/pol/eqpitem.cpp

/** @file
 *
 * @par History
 * - 2009/08/06 MuadDib:   Added gotten_by code for items.
 * - 2009/08/07 MuadDib:   Altered Layer code in equip_item() to use tile_layer prop instead.
 * Cleaner, less vars, less execution.
 */


#include <cstdio>

#include "../clib/clib_endian.h"
#include "../clib/logfacility.h"
#include "../clib/rawtypes.h"
#include "../plib/systemstate.h"
#include "item/item.h"
#include "layers.h"
#include "mobile/charactr.h"
#include "multi/multi.h"
#include "network/client.h"
#include "network/pktdef.h"
#include "network/pktin.h"
#include "realms/realm.h"
#include "reftypes.h"
#include "ufunc.h"

namespace Pol
{
namespace Core
{
void equip_item( Network::Client* client, PKTIN_13* msg )
{
  u32 serial = cfBEu32( msg->serial );
  u8 layer = msg->layer;
  u32 equip_on_serial = cfBEu32( msg->equipped_on );

  if ( ( layer > HIGHEST_LAYER ) || ( layer == 0 ) || client->chr->dead() )
  {
    send_item_move_failure( client, MOVE_ITEM_FAILURE_ILLEGAL_EQUIP );
    return;
  }

  Items::Item* item = client->chr->gotten_item();

  if ( item == nullptr )
  {
    if ( Plib::systemstate.config.show_warning_item )
    {
      POLLOG_ERROR.Format(
          "Character 0x{:X} tried to equip item 0x{:X}, which did not exist in gotten_items.\n" )
          << client->chr->serial << serial;
    }
    send_item_move_failure( client, MOVE_ITEM_FAILURE_ILLEGAL_EQUIP );  // 5
    return;
  }

  if ( item->serial != serial )
  {
    if ( Plib::systemstate.config.show_warning_item )
    {
      POLLOG_ERROR.Format(
          "Character 0x{:X} tried to equip item 0x{:X}, but had gotten item 0x{:X}\n" )
          << client->chr->serial << serial << item->serial;
    }
    send_item_move_failure( client, MOVE_ITEM_FAILURE_ILLEGAL_EQUIP );  // 5
    item->gotten_by( nullptr );
    return;
  }

  ItemRef itemref( item );

  item->layer = item->tile_layer;
  item->inuse( false );
  item->gotten_by( nullptr );
  client->chr->gotten_item( nullptr );

  Mobile::Character* equip_on = nullptr;
  if ( equip_on_serial == client->chr->serial )
  {
    equip_on = client->chr;
  }
  else
  {
    equip_on = find_character( equip_on_serial );
    if ( equip_on == nullptr || !client->chr->can_clothe( equip_on ) )
    {
      send_item_move_failure( client, MOVE_ITEM_FAILURE_ILLEGAL_EQUIP );

      undo_get_item( client->chr, item );
      return;
    }
  }

  if ( equip_on->layer_is_equipped( item->tile_layer ) )
  {
    // it appears the client already checks for this, so this code hasn't been exercised.
    // we'll assume client mouse holds on to object
    // 3D Client doesn't check for this!
    send_item_move_failure( client, MOVE_ITEM_FAILURE_ALREADY_WORN );

    undo_get_item( client->chr, item );  // added 11/01/03 for 3d client
    return;
  }

  if ( !equip_on->strong_enough_to_equip( item ) )
  {
    send_item_move_failure( client, MOVE_ITEM_FAILURE_ILLEGAL_EQUIP );
    // the client now puts the item back where it was before.

    // return the item to wherever it was. (?)
    undo_get_item( client->chr, item );
    if ( client->chr == equip_on )
    {
      send_sysmessage( client, "You are not strong enough to use that." );
    }
    else
    {
      send_sysmessage( client, "Insufficient strength to equip that." );
    }
    return;
  }

  if ( !equip_on->equippable( item ) || !item->check_equiptest_scripts( equip_on ) ||
       !item->check_equip_script( equip_on, false ) )
  {
    send_item_move_failure( client, MOVE_ITEM_FAILURE_ILLEGAL_EQUIP );
    if ( item->orphan() )
    {
      return;
    }
    undo_get_item( client->chr, item );
    return;
  }

  if ( item->orphan() )
  {
    return;
  }

  // Unregister the item if it is on a multi
  if ( item->container == nullptr && !item->has_gotten_by() )
  {
    Multi::UMulti* multi = item->realm->find_supporting_multi( item->x, item->y, item->z );

    if ( multi != nullptr )
      multi->unregister_object( item );
  }

  equip_on->equip( item );
  send_wornitem_to_inrange( equip_on, item );
}
}  // namespace Core
}  // namespace Pol