src/game/ItemHandler.cpp

   1 /*
   2  * Copyright (C) 2005-2010 MaNGOS <http://getmangos.com/>
   3  *
   4  * This program is free software; you can redistribute it and/or modify
   5  * it under the terms of the GNU General Public License as published by
   6  * the Free Software Foundation; either version 2 of the License, or
   7  * (at your option) any later version.
   8  *
   9  * This program is distributed in the hope that it will be useful,
  10  * but WITHOUT ANY WARRANTY; without even the implied warranty of
  11  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  12  * GNU General Public License for more details.
  13  *
  14  * You should have received a copy of the GNU General Public License
  15  * along with this program; if not, write to the Free Software
  16  * Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307  USA
  17  */
  18
  19 #include "Common.h"
  20 #include "WorldPacket.h"
  21 #include "WorldSession.h"
  22 #include "Opcodes.h"
  23 #include "Log.h"
  24 #include "ObjectMgr.h"
  25 #include "Player.h"
  26 #include "Item.h"
  27 #include "UpdateData.h"
  28
  29 void WorldSession::HandleSplitItemOpcode( WorldPacket & recv_data )
  30 {
  31     //sLog.outDebug("WORLD: CMSG_SPLIT_ITEM");
  32     uint8 srcbag, srcslot, dstbag, dstslot;
  33     uint32 count;
  34
  35     recv_data >> srcbag >> srcslot >> dstbag >> dstslot >> count;
  36     //sLog.outDebug("STORAGE: receive srcbag = %u, srcslot = %u, dstbag = %u, dstslot = %u, count = %u", srcbag, srcslot, dstbag, dstslot, count);
  37
  38     uint16 src = ( (srcbag << 8) | srcslot );
  39     uint16 dst = ( (dstbag << 8) | dstslot );
  40
  41     if(src == dst)
  42         return;
  43
  44     if (count == 0)
  45         return;                                             //check count - if zero it's fake packet
  46
  47     if(!_player->IsValidPos(srcbag, srcslot, true))
  48     {
  49         _player->SendEquipError( EQUIP_ERR_ITEM_NOT_FOUND, NULL, NULL );
  50         return;
  51     }
  52
  53     if(!_player->IsValidPos(dstbag, dstslot, false))        // can be autostore pos
  54     {
  55         _player->SendEquipError( EQUIP_ERR_ITEM_DOESNT_GO_TO_SLOT, NULL, NULL );
  56         return;
  57     }
  58
  59     _player->SplitItem( src, dst, count );
  60 }
  61
  62 void WorldSession::HandleSwapInvItemOpcode( WorldPacket & recv_data )
  63 {
  64     //sLog.outDebug("WORLD: CMSG_SWAP_INV_ITEM");
  65     uint8 srcslot, dstslot;
  66
  67     recv_data >> dstslot >> srcslot;
  68     //sLog.outDebug("STORAGE: receive srcslot = %u, dstslot = %u", srcslot, dstslot);
  69
  70     // prevent attempt swap same item to current position generated by client at special cheating sequence
  71     if(srcslot == dstslot)
  72         return;
  73
  74     if(!_player->IsValidPos(INVENTORY_SLOT_BAG_0, srcslot, true))
  75     {
  76         _player->SendEquipError( EQUIP_ERR_ITEM_NOT_FOUND, NULL, NULL );
  77         return;
  78     }
  79
  80     if(!_player->IsValidPos(INVENTORY_SLOT_BAG_0, dstslot, true))
  81     {
  82         _player->SendEquipError( EQUIP_ERR_ITEM_DOESNT_GO_TO_SLOT, NULL, NULL );
  83         return;
  84     }
  85
  86     uint16 src = ( (INVENTORY_SLOT_BAG_0 << 8) | srcslot );
  87     uint16 dst = ( (INVENTORY_SLOT_BAG_0 << 8) | dstslot );
  88
  89     _player->SwapItem( src, dst );
  90 }
  91
  92 void WorldSession::HandleAutoEquipItemSlotOpcode( WorldPacket & recv_data )
  93 {
  94     uint64 itemguid;
  95     uint8 dstslot;
  96     recv_data >> itemguid >> dstslot;
  97
  98     // cheating attempt, client should never send opcode in that case
  99     if(!Player::IsEquipmentPos(INVENTORY_SLOT_BAG_0, dstslot))
 100         return;
 101
 102     Item* item = _player->GetItemByGuid(itemguid);
 103     uint16 dstpos = dstslot | (INVENTORY_SLOT_BAG_0 << 8);
 104
 105     if(!item || item->GetPos() == dstpos)
 106         return;
 107
 108     _player->SwapItem(item->GetPos(), dstpos);
 109 }
 110
 111 void WorldSession::HandleSwapItem( WorldPacket & recv_data )
 112 {
 113     //sLog.outDebug("WORLD: CMSG_SWAP_ITEM");
 114     uint8 dstbag, dstslot, srcbag, srcslot;
 115
 116     recv_data >> dstbag >> dstslot >> srcbag >> srcslot ;
 117     //sLog.outDebug("STORAGE: receive srcbag = %u, srcslot = %u, dstbag = %u, dstslot = %u", srcbag, srcslot, dstbag, dstslot);
 118
 119     uint16 src = ( (srcbag << 8) | srcslot );
 120     uint16 dst = ( (dstbag << 8) | dstslot );
 121
 122     // prevent attempt swap same item to current position generated by client at special cheating sequence
 123     if(src == dst)
 124         return;
 125
 126     if(!_player->IsValidPos(srcbag, srcslot, true))
 127     {
 128         _player->SendEquipError( EQUIP_ERR_ITEM_NOT_FOUND, NULL, NULL );
 129         return;
 130     }
 131
 132     if(!_player->IsValidPos(dstbag, dstslot, true))
 133     {
 134         _player->SendEquipError( EQUIP_ERR_ITEM_DOESNT_GO_TO_SLOT, NULL, NULL );
 135         return;
 136     }
 137
 138     _player->SwapItem( src, dst );
 139 }
 140
 141 void WorldSession::HandleAutoEquipItemOpcode( WorldPacket & recv_data )
 142 {
 143     //sLog.outDebug("WORLD: CMSG_AUTOEQUIP_ITEM");
 144     uint8 srcbag, srcslot;
 145
 146     recv_data >> srcbag >> srcslot;
 147     //sLog.outDebug("STORAGE: receive srcbag = %u, srcslot = %u", srcbag, srcslot);
 148
 149     Item *pSrcItem  = _player->GetItemByPos( srcbag, srcslot );
 150     if( !pSrcItem )
 151         return;                                             // only at cheat
 152
 153     if(pSrcItem->m_lootGenerated)                           // prevent swap looting item
 154     {
 155         //best error message found for attempting to swap while looting
 156         _player->SendEquipError( EQUIP_ERR_CANT_DO_RIGHT_NOW, pSrcItem, NULL );
 157         return;
 158     }
 159
 160     uint16 dest;
 161     uint8 msg = _player->CanEquipItem( NULL_SLOT, dest, pSrcItem, !pSrcItem->IsBag() );
 162     if( msg != EQUIP_ERR_OK )
 163     {
 164         _player->SendEquipError( msg, pSrcItem, NULL );
 165         return;
 166     }
 167
 168     uint16 src = pSrcItem->GetPos();
 169     if(dest == src)                                         // prevent equip in same slot, only at cheat
 170         return;
 171
 172     Item *pDstItem = _player->GetItemByPos( dest );
 173     if( !pDstItem )                                         // empty slot, simple case
 174     {
 175         _player->RemoveItem( srcbag, srcslot, true );
 176         _player->EquipItem( dest, pSrcItem, true );
 177         _player->AutoUnequipOffhandIfNeed();
 178     }
 179     else                                                    // have currently equipped item, not simple case
 180     {
 181         uint8 dstbag = pDstItem->GetBagSlot();
 182         uint8 dstslot = pDstItem->GetSlot();
 183
 184         msg = _player->CanUnequipItem( dest, !pSrcItem->IsBag() );
 185         if( msg != EQUIP_ERR_OK )
 186         {
 187             _player->SendEquipError( msg, pDstItem, NULL );
 188             return;
 189         }
 190
 191         // check dest->src move possibility
 192         ItemPosCountVec sSrc;
 193         uint16 eSrc = 0;
 194         if( _player->IsInventoryPos( src ) )
 195         {
 196             msg = _player->CanStoreItem( srcbag, srcslot, sSrc, pDstItem, true );
 197             if( msg != EQUIP_ERR_OK )
 198                 msg = _player->CanStoreItem( srcbag, NULL_SLOT, sSrc, pDstItem, true );
 199             if( msg != EQUIP_ERR_OK )
 200                 msg = _player->CanStoreItem( NULL_BAG, NULL_SLOT, sSrc, pDstItem, true );
 201         }
 202         else if( _player->IsBankPos( src ) )
 203         {
 204             msg = _player->CanBankItem( srcbag, srcslot, sSrc, pDstItem, true );
 205             if( msg != EQUIP_ERR_OK )
 206                 msg = _player->CanBankItem( srcbag, NULL_SLOT, sSrc, pDstItem, true );
 207             if( msg != EQUIP_ERR_OK )
 208                 msg = _player->CanBankItem( NULL_BAG, NULL_SLOT, sSrc, pDstItem, true );
 209         }
 210         else if( _player->IsEquipmentPos( src ) )
 211         {
 212             msg = _player->CanEquipItem( srcslot, eSrc, pDstItem, true);
 213             if( msg == EQUIP_ERR_OK )
 214                 msg = _player->CanUnequipItem( eSrc, true);
 215         }
 216
 217         if( msg != EQUIP_ERR_OK )
 218         {
 219             _player->SendEquipError( msg, pDstItem, pSrcItem );
 220             return;
 221         }
 222
 223         // now do moves, remove...
 224         _player->RemoveItem(dstbag, dstslot, false);
 225         _player->RemoveItem(srcbag, srcslot, false);
 226
 227         // add to dest
 228         _player->EquipItem(dest, pSrcItem, true);
 229
 230         // add to src
 231         if( _player->IsInventoryPos( src ) )
 232             _player->StoreItem(sSrc, pDstItem, true);
 233         else if( _player->IsBankPos( src ) )
 234             _player->BankItem(sSrc, pDstItem, true);
 235         else if( _player->IsEquipmentPos( src ) )
 236             _player->EquipItem(eSrc, pDstItem, true);
 237
 238         _player->AutoUnequipOffhandIfNeed();
 239     }
 240 }
 241
 242 void WorldSession::HandleDestroyItemOpcode( WorldPacket & recv_data )
 243 {
 244     //sLog.outDebug("WORLD: CMSG_DESTROYITEM");
 245     uint8 bag, slot, count, data1, data2, data3;
 246
 247     recv_data >> bag >> slot >> count >> data1 >> data2 >> data3;
 248     //sLog.outDebug("STORAGE: receive bag = %u, slot = %u, count = %u", bag, slot, count);
 249
 250     uint16 pos = (bag << 8) | slot;
 251
 252     // prevent drop unequipable items (in combat, for example) and non-empty bags
 253     if(_player->IsEquipmentPos(pos) || _player->IsBagPos(pos))
 254     {
 255         uint8 msg = _player->CanUnequipItem( pos, false );
 256         if( msg != EQUIP_ERR_OK )
 257         {
 258             _player->SendEquipError( msg, _player->GetItemByPos(pos), NULL );
 259             return;
 260         }
 261     }
 262
 263     Item *pItem  = _player->GetItemByPos( bag, slot );
 264     if(!pItem)
 265     {
 266         _player->SendEquipError( EQUIP_ERR_ITEM_NOT_FOUND, NULL, NULL );
 267         return;
 268     }
 269
 270     if(count)
 271     {
 272         uint32 i_count = count;
 273         _player->DestroyItemCount( pItem, i_count, true );
 274     }
 275     else
 276         _player->DestroyItem( bag, slot, true );
 277 }
 278
 279 // Only _static_ data send in this packet !!!
 280 void WorldSession::HandleItemQuerySingleOpcode( WorldPacket & recv_data )
 281 {
 282     //sLog.outDebug("WORLD: CMSG_ITEM_QUERY_SINGLE");
 283     uint32 item;
 284     recv_data >> item;
 285
 286     sLog.outDetail("STORAGE: Item Query = %u", item);
 287
 288     ItemPrototype const *pProto = ObjectMgr::GetItemPrototype( item );
 289     if( pProto )
 290     {
 291         std::string Name        = pProto->Name1;
 292         std::string Description = pProto->Description;
 293
 294         int loc_idx = GetSessionDbLocaleIndex();
 295         if ( loc_idx >= 0 )
 296         {
 297             ItemLocale const *il = sObjectMgr.GetItemLocale(pProto->ItemId);
 298             if (il)
 299             {
 300                 if (il->Name.size() > size_t(loc_idx) && !il->Name[loc_idx].empty())
 301                     Name = il->Name[loc_idx];
 302                 if (il->Description.size() > size_t(loc_idx) && !il->Description[loc_idx].empty())
 303                     Description = il->Description[loc_idx];
 304             }
 305         }
 306                                                             // guess size
 307         WorldPacket data( SMSG_ITEM_QUERY_SINGLE_RESPONSE, 600);
 308         data << pProto->ItemId;
 309         data << pProto->Class;
 310         data << pProto->SubClass;
 311         data << int32(pProto->Unk0);                        // new 2.0.3, not exist in wdb cache?
 312         data << Name;
 313         data << uint8(0x00);                                //pProto->Name2; // blizz not send name there, just uint8(0x00); <-- \0 = empty string = empty name...
 314         data << uint8(0x00);                                //pProto->Name3; // blizz not send name there, just uint8(0x00);
 315         data << uint8(0x00);                                //pProto->Name4; // blizz not send name there, just uint8(0x00);
 316         data << pProto->DisplayInfoID;
 317         data << pProto->Quality;
 318         data << pProto->Flags;
 319         data << pProto->Faction;                            // 3.2 faction?
 320         data << pProto->BuyPrice;
 321         data << pProto->SellPrice;
 322         data << pProto->InventoryType;
 323         data << pProto->AllowableClass;
 324         data << pProto->AllowableRace;
 325         data << pProto->ItemLevel;
 326         data << pProto->RequiredLevel;
 327         data << pProto->RequiredSkill;
 328         data << pProto->RequiredSkillRank;
 329         data << pProto->RequiredSpell;
 330         data << pProto->RequiredHonorRank;
 331         data << pProto->RequiredCityRank;
 332         data << pProto->RequiredReputationFaction;
 333         data << pProto->RequiredReputationRank;
 334         data << int32(pProto->MaxCount);
 335         data << int32(pProto->Stackable);
 336         data << pProto->ContainerSlots;
 337         data << pProto->StatsCount;                         // item stats count
 338         for(uint32 i = 0; i < pProto->StatsCount; ++i)
 339         {
 340             data << pProto->ItemStat[i].ItemStatType;
 341             data << pProto->ItemStat[i].ItemStatValue;
 342         }
 343         data << pProto->ScalingStatDistribution;            // scaling stats distribution
 344         data << pProto->ScalingStatValue;                   // some kind of flags used to determine stat values column
 345         for(int i = 0; i < MAX_ITEM_PROTO_DAMAGES; ++i)
 346         {
 347             data << pProto->Damage[i].DamageMin;
 348             data << pProto->Damage[i].DamageMax;
 349             data << pProto->Damage[i].DamageType;
 350         }
 351
 352         // resistances (7)
 353         data << pProto->Armor;
 354         data << pProto->HolyRes;
 355         data << pProto->FireRes;
 356         data << pProto->NatureRes;
 357         data << pProto->FrostRes;
 358         data << pProto->ShadowRes;
 359         data << pProto->ArcaneRes;
 360
 361         data << pProto->Delay;
 362         data << pProto->AmmoType;
 363         data << pProto->RangedModRange;
 364
 365         for(int s = 0; s < MAX_ITEM_PROTO_SPELLS; ++s)
 366         {
 367             // send DBC data for cooldowns in same way as it used in Spell::SendSpellCooldown
 368             // use `item_template` or if not set then only use spell cooldowns
 369             SpellEntry const* spell = sSpellStore.LookupEntry(pProto->Spells[s].SpellId);
 370             if(spell)
 371             {
 372                 bool db_data = pProto->Spells[s].SpellCooldown >= 0 || pProto->Spells[s].SpellCategoryCooldown >= 0;
 373
 374                 data << pProto->Spells[s].SpellId;
 375                 data << pProto->Spells[s].SpellTrigger;
 376                 data << uint32(-abs(pProto->Spells[s].SpellCharges));
 377
 378                 if(db_data)
 379                 {
 380                     data << uint32(pProto->Spells[s].SpellCooldown);
 381                     data << uint32(pProto->Spells[s].SpellCategory);
 382                     data << uint32(pProto->Spells[s].SpellCategoryCooldown);
 383                 }
 384                 else
 385                 {
 386                     data << uint32(spell->RecoveryTime);
 387                     data << uint32(spell->Category);
 388                     data << uint32(spell->CategoryRecoveryTime);
 389                 }
 390             }
 391             else
 392             {
 393                 data << uint32(0);
 394                 data << uint32(0);
 395                 data << uint32(0);
 396                 data << uint32(-1);
 397                 data << uint32(0);
 398                 data << uint32(-1);
 399             }
 400         }
 401         data << pProto->Bonding;
 402         data << Description;
 403         data << pProto->PageText;
 404         data << pProto->LanguageID;
 405         data << pProto->PageMaterial;
 406         data << pProto->StartQuest;
 407         data << pProto->LockID;
 408         data << int32(pProto->Material);
 409         data << pProto->Sheath;
 410         data << pProto->RandomProperty;
 411         data << pProto->RandomSuffix;
 412         data << pProto->Block;
 413         data << pProto->ItemSet;
 414         data << pProto->MaxDurability;
 415         data << pProto->Area;
 416         data << pProto->Map;                                // Added in 1.12.x & 2.0.1 client branch
 417         data << pProto->BagFamily;
 418         data << pProto->TotemCategory;
 419         for(int s = 0; s < MAX_ITEM_PROTO_SOCKETS; ++s)
 420         {
 421             data << pProto->Socket[s].Color;
 422             data << pProto->Socket[s].Content;
 423         }
 424         data << pProto->socketBonus;
 425         data << pProto->GemProperties;
 426         data << pProto->RequiredDisenchantSkill;
 427         data << pProto->ArmorDamageModifier;
 428         data << abs(pProto->Duration);                      // added in 2.4.2.8209, duration (seconds)
 429         data << pProto->ItemLimitCategory;                  // WotLK, ItemLimitCategory
 430         data << pProto->HolidayId;                          // Holiday.dbc?
 431         SendPacket( &data );
 432     }
 433     else
 434     {
 435         sLog.outDebug( "WORLD: CMSG_ITEM_QUERY_SINGLE - NO item INFO! (ENTRY: %u)", item );
 436         WorldPacket data( SMSG_ITEM_QUERY_SINGLE_RESPONSE, 4);
 437         data << uint32(item | 0x80000000);
 438         SendPacket( &data );
 439     }
 440 }
 441
 442 void WorldSession::HandleReadItem( WorldPacket & recv_data )
 443 {
 444     //sLog.outDebug( "WORLD: CMSG_READ_ITEM");
 445
 446     uint8 bag, slot;
 447     recv_data >> bag >> slot;
 448
 449     //sLog.outDetail("STORAGE: Read bag = %u, slot = %u", bag, slot);
 450     Item *pItem = _player->GetItemByPos( bag, slot );
 451
 452     if( pItem && pItem->GetProto()->PageText )
 453     {
 454         WorldPacket data;
 455
 456         uint8 msg = _player->CanUseItem( pItem );
 457         if( msg == EQUIP_ERR_OK )
 458         {
 459             data.Initialize (SMSG_READ_ITEM_OK, 8);
 460             sLog.outDetail("STORAGE: Item page sent");
 461         }
 462         else
 463         {
 464             data.Initialize( SMSG_READ_ITEM_FAILED, 8 );
 465             sLog.outDetail("STORAGE: Unable to read item");
 466             _player->SendEquipError( msg, pItem, NULL );
 467         }
 468         data << pItem->GetGUID();
 469         SendPacket(&data);
 470     }
 471     else
 472         _player->SendEquipError( EQUIP_ERR_ITEM_NOT_FOUND, NULL, NULL );
 473 }
 474
 475 void WorldSession::HandlePageQuerySkippedOpcode( WorldPacket & recv_data )
 476 {
 477     sLog.outDebug( "WORLD: Received CMSG_PAGE_TEXT_QUERY" );
 478
 479     uint32 itemid;
 480     uint64 guid;
 481
 482     recv_data >> itemid >> guid;
 483
 484     sLog.outDetail( "Packet Info: itemid: %u guidlow: %u guidentry: %u guidhigh: %u",
 485         itemid, GUID_LOPART(guid), GUID_ENPART(guid), GUID_HIPART(guid));
 486 }
 487
 488 void WorldSession::HandleSellItemOpcode( WorldPacket & recv_data )
 489 {
 490     sLog.outDebug(  "WORLD: Received CMSG_SELL_ITEM" );
 491     uint64 vendorguid, itemguid;
 492     uint32 count;
 493
 494     recv_data >> vendorguid >> itemguid >> count;
 495
 496     if(!itemguid)
 497         return;
 498
 499     Creature *pCreature = GetPlayer()->GetNPCIfCanInteractWith(vendorguid, UNIT_NPC_FLAG_VENDOR);
 500     if (!pCreature)
 501     {
 502         sLog.outDebug( "WORLD: HandleSellItemOpcode - Unit (GUID: %u) not found or you can't interact with him.", uint32(GUID_LOPART(vendorguid)) );
 503         _player->SendSellError( SELL_ERR_CANT_FIND_VENDOR, NULL, itemguid, 0);
 504         return;
 505     }
 506
 507     // remove fake death
 508     if(GetPlayer()->hasUnitState(UNIT_STAT_DIED))
 509         GetPlayer()->RemoveSpellsCausingAura(SPELL_AURA_FEIGN_DEATH);
 510
 511     Item *pItem = _player->GetItemByGuid( itemguid );
 512     if( pItem )
 513     {
 514         // prevent sell not owner item
 515         if(_player->GetGUID() != pItem->GetOwnerGUID())
 516         {
 517             _player->SendSellError( SELL_ERR_CANT_SELL_ITEM, pCreature, itemguid, 0);
 518             return;
 519         }
 520
 521         // prevent sell non empty bag by drag-and-drop at vendor's item list
 522         if(pItem->IsBag() && !((Bag*)pItem)->IsEmpty())
 523         {
 524             _player->SendSellError( SELL_ERR_CANT_SELL_ITEM, pCreature, itemguid, 0);
 525             return;
 526         }
 527
 528         // prevent sell currently looted item
 529         if(_player->GetLootGUID() == pItem->GetGUID())
 530         {
 531             _player->SendSellError( SELL_ERR_CANT_SELL_ITEM, pCreature, itemguid, 0);
 532             return;
 533         }
 534
 535         // special case at auto sell (sell all)
 536         if(count == 0)
 537         {
 538             count = pItem->GetCount();
 539         }
 540         else
 541         {
 542             // prevent sell more items that exist in stack (possible only not from client)
 543             if(count > pItem->GetCount())
 544             {
 545                 _player->SendSellError( SELL_ERR_CANT_SELL_ITEM, pCreature, itemguid, 0);
 546                 return;
 547             }
 548         }
 549
 550         ItemPrototype const *pProto = pItem->GetProto();
 551         if( pProto )
 552         {
 553             if( pProto->SellPrice > 0 )
 554             {
 555                 if(count < pItem->GetCount())               // need split items
 556                 {
 557                     Item *pNewItem = pItem->CloneItem( count, _player );
 558                     if (!pNewItem)
 559                     {
 560                         sLog.outError("WORLD: HandleSellItemOpcode - could not create clone of item %u; count = %u", pItem->GetEntry(), count );
 561                         _player->SendSellError( SELL_ERR_CANT_SELL_ITEM, pCreature, itemguid, 0);
 562                         return;
 563                     }
 564
 565                     pItem->SetCount( pItem->GetCount() - count );
 566                     _player->ItemRemovedQuestCheck( pItem->GetEntry(), count );
 567                     if( _player->IsInWorld() )
 568                         pItem->SendCreateUpdateToPlayer( _player );
 569                     pItem->SetState(ITEM_CHANGED, _player);
 570
 571                     _player->AddItemToBuyBackSlot( pNewItem );
 572                     if( _player->IsInWorld() )
 573                         pNewItem->SendCreateUpdateToPlayer( _player );
 574                 }
 575                 else
 576                 {
 577                     _player->ItemRemovedQuestCheck( pItem->GetEntry(), pItem->GetCount());
 578                     _player->RemoveItem( pItem->GetBagSlot(), pItem->GetSlot(), true);
 579                     pItem->RemoveFromUpdateQueueOf(_player);
 580                     _player->AddItemToBuyBackSlot( pItem );
 581                 }
 582
 583                 _player->ModifyMoney( pProto->SellPrice * count );
 584             }
 585             else
 586                 _player->SendSellError( SELL_ERR_CANT_SELL_ITEM, pCreature, itemguid, 0);
 587             return;
 588         }
 589     }
 590     _player->SendSellError( SELL_ERR_CANT_FIND_ITEM, pCreature, itemguid, 0);
 591     return;
 592 }
 593
 594 void WorldSession::HandleBuybackItem(WorldPacket & recv_data)
 595 {
 596     sLog.outDebug( "WORLD: Received CMSG_BUYBACK_ITEM" );
 597     uint64 vendorguid;
 598     uint32 slot;
 599
 600     recv_data >> vendorguid >> slot;
 601
 602     Creature *pCreature = GetPlayer()->GetNPCIfCanInteractWith(vendorguid, UNIT_NPC_FLAG_VENDOR);
 603     if (!pCreature)
 604     {
 605         sLog.outDebug( "WORLD: HandleBuybackItem - Unit (GUID: %u) not found or you can't interact with him.", uint32(GUID_LOPART(vendorguid)) );
 606         _player->SendSellError( SELL_ERR_CANT_FIND_VENDOR, NULL, 0, 0);
 607         return;
 608     }
 609
 610     // remove fake death
 611     if(GetPlayer()->hasUnitState(UNIT_STAT_DIED))
 612         GetPlayer()->RemoveSpellsCausingAura(SPELL_AURA_FEIGN_DEATH);
 613
 614     Item *pItem = _player->GetItemFromBuyBackSlot( slot );
 615     if( pItem )
 616     {
 617         uint32 price = _player->GetUInt32Value( PLAYER_FIELD_BUYBACK_PRICE_1 + slot - BUYBACK_SLOT_START );
 618         if( _player->GetMoney() < price )
 619         {
 620             _player->SendBuyError( BUY_ERR_NOT_ENOUGHT_MONEY, pCreature, pItem->GetEntry(), 0);
 621             return;
 622         }
 623
 624         ItemPosCountVec dest;
 625         uint8 msg = _player->CanStoreItem( NULL_BAG, NULL_SLOT, dest, pItem, false );
 626         if( msg == EQUIP_ERR_OK )
 627         {
 628             _player->ModifyMoney( -(int32)price );
 629             _player->RemoveItemFromBuyBackSlot( slot, false );
 630             _player->ItemAddedQuestCheck( pItem->GetEntry(), pItem->GetCount());
 631             _player->StoreItem( dest, pItem, true );
 632         }
 633         else
 634             _player->SendEquipError( msg, pItem, NULL );
 635         return;
 636     }
 637     else
 638         _player->SendBuyError( BUY_ERR_CANT_FIND_ITEM, pCreature, 0, 0);
 639 }
 640
 641 void WorldSession::HandleBuyItemInSlotOpcode( WorldPacket & recv_data )
 642 {
 643     sLog.outDebug( "WORLD: Received CMSG_BUY_ITEM_IN_SLOT" );
 644     uint64 vendorguid, bagguid;
 645     uint32 item, slot, count;
 646     uint8 bagslot;
 647
 648     recv_data >> vendorguid >> item  >> slot >> bagguid >> bagslot >> count;
 649
 650     uint8 bag = NULL_BAG;                                   // init for case invalid bagGUID
 651
 652     // find bag slot by bag guid
 653     if (bagguid == _player->GetGUID())
 654         bag = INVENTORY_SLOT_BAG_0;
 655     else
 656     {
 657         for (int i = INVENTORY_SLOT_BAG_START; i < INVENTORY_SLOT_BAG_END;++i)
 658         {
 659             if (Bag *pBag = (Bag*)_player->GetItemByPos(INVENTORY_SLOT_BAG_0,i))
 660             {
 661                 if (bagguid == pBag->GetGUID())
 662                 {
 663                     bag = i;
 664                     break;
 665                 }
 666             }
 667         }
 668     }
 669
 670     // bag not found, cheating?
 671     if (bag == NULL_BAG)
 672         return;
 673
 674     GetPlayer()->BuyItemFromVendor(vendorguid, item, count, bag, bagslot);
 675 }
 676
 677 void WorldSession::HandleBuyItemOpcode( WorldPacket & recv_data )
 678 {
 679     sLog.outDebug( "WORLD: Received CMSG_BUY_ITEM" );
 680     uint64 vendorguid;
 681     uint32 item, slot, count;
 682     uint8 unk1;
 683
 684     recv_data >> vendorguid >> item >> slot >> count >> unk1;
 685
 686     GetPlayer()->BuyItemFromVendor(vendorguid, item, count, NULL_BAG, NULL_SLOT);
 687 }
 688
 689 void WorldSession::HandleListInventoryOpcode( WorldPacket & recv_data )
 690 {
 691     uint64 guid;
 692
 693     recv_data >> guid;
 694
 695     if(!GetPlayer()->isAlive())
 696         return;
 697
 698     sLog.outDebug( "WORLD: Recvd CMSG_LIST_INVENTORY" );
 699
 700     SendListInventory( guid );
 701 }
 702
 703 void WorldSession::SendListInventory(uint64 vendorguid)
 704 {
 705     sLog.outDebug("WORLD: Sent SMSG_LIST_INVENTORY");
 706
 707     Creature *pCreature = GetPlayer()->GetNPCIfCanInteractWith(vendorguid, UNIT_NPC_FLAG_VENDOR);
 708
 709     if (!pCreature)
 710     {
 711         sLog.outDebug("WORLD: SendListInventory - Unit (GUID: %u) not found or you can't interact with him.", uint32(GUID_LOPART(vendorguid)));
 712         _player->SendSellError(SELL_ERR_CANT_FIND_VENDOR, NULL, 0, 0);
 713         return;
 714     }
 715
 716     // remove fake death
 717     if (GetPlayer()->hasUnitState(UNIT_STAT_DIED))
 718         GetPlayer()->RemoveSpellsCausingAura(SPELL_AURA_FEIGN_DEATH);
 719
 720     // Stop the npc if moving
 721     if (!pCreature->IsStopped())
 722         pCreature->StopMoving();
 723
 724     VendorItemData const* vItems = pCreature->GetVendorItems();
 725
 726     if (!vItems)
 727     {
 728         _player->SendSellError(SELL_ERR_CANT_FIND_VENDOR, NULL, 0, 0);
 729         return;
 730     }
 731
 732     uint8 numitems = vItems->GetItemCount();
 733     uint8 count = 0;
 734
 735     WorldPacket data( SMSG_LIST_INVENTORY, (8+1+numitems*8*4) );
 736     data << uint64(vendorguid);
 737     data << uint8(numitems);
 738
 739     float discountMod = _player->GetReputationPriceDiscount(pCreature);
 740
 741     for(int i = 0; i < numitems; ++i )
 742     {
 743         if(VendorItem const* crItem = vItems->GetItem(i))
 744         {
 745             if(ItemPrototype const *pProto = ObjectMgr::GetItemPrototype(crItem->item))
 746             {
 747                 if((pProto->AllowableClass & _player->getClassMask()) == 0 && pProto->Bonding == BIND_WHEN_PICKED_UP && !_player->isGameMaster())
 748                     continue;
 749
 750                 ++count;
 751
 752                 // reputation discount
 753                 uint32 price = uint32(floor(pProto->BuyPrice * discountMod));
 754
 755                 data << uint32(count);
 756                 data << uint32(crItem->item);
 757                 data << uint32(pProto->DisplayInfoID);
 758                 data << uint32(crItem->maxcount <= 0 ? 0xFFFFFFFF : pCreature->GetVendorItemCurrentCount(crItem));
 759                 data << uint32(price);
 760                 data << uint32(pProto->MaxDurability);
 761                 data << uint32(pProto->BuyCount);
 762                 data << uint32(crItem->ExtendedCost);
 763             }
 764         }
 765     }
 766
 767     if ( count == 0 || data.size() != 8 + 1 + size_t(count) * 8 * 4 )
 768         return;
 769
 770     data.put<uint8>(8, count);
 771     SendPacket( &data );
 772 }
 773
 774 void WorldSession::HandleAutoStoreBagItemOpcode( WorldPacket & recv_data )
 775 {
 776     //sLog.outDebug("WORLD: CMSG_AUTOSTORE_BAG_ITEM");
 777     uint8 srcbag, srcslot, dstbag;
 778
 779     recv_data >> srcbag >> srcslot >> dstbag;
 780     //sLog.outDebug("STORAGE: receive srcbag = %u, srcslot = %u, dstbag = %u", srcbag, srcslot, dstbag);
 781
 782     Item *pItem = _player->GetItemByPos( srcbag, srcslot );
 783     if( !pItem )
 784         return;
 785
 786     if(!_player->IsValidPos(dstbag, NULL_SLOT, false))      // can be autostore pos
 787     {
 788         _player->SendEquipError( EQUIP_ERR_ITEM_DOESNT_GO_TO_SLOT, NULL, NULL );
 789         return;
 790     }
 791
 792     uint16 src = pItem->GetPos();
 793
 794     // check unequip potability for equipped items and bank bags
 795     if(_player->IsEquipmentPos ( src ) || _player->IsBagPos ( src ))
 796     {
 797         uint8 msg = _player->CanUnequipItem( src, !_player->IsBagPos ( src ));
 798         if(msg != EQUIP_ERR_OK)
 799         {
 800             _player->SendEquipError( msg, pItem, NULL );
 801             return;
 802         }
 803     }
 804
 805     ItemPosCountVec dest;
 806     uint8 msg = _player->CanStoreItem( dstbag, NULL_SLOT, dest, pItem, false );
 807     if( msg != EQUIP_ERR_OK )
 808     {
 809         _player->SendEquipError( msg, pItem, NULL );
 810         return;
 811     }
 812
 813     // no-op: placed in same slot
 814     if(dest.size() == 1 && dest[0].pos == src)
 815     {
 816         // just remove gray item state
 817         _player->SendEquipError( EQUIP_ERR_NONE, pItem, NULL );
 818         return;
 819     }
 820
 821     _player->RemoveItem(srcbag, srcslot, true );
 822     _player->StoreItem( dest, pItem, true );
 823 }
 824
 825 void WorldSession::HandleBuyBankSlotOpcode(WorldPacket& recvPacket)
 826 {
 827     sLog.outDebug("WORLD: CMSG_BUY_BANK_SLOT");
 828
 829     uint64 guid;
 830     recvPacket >> guid;
 831
 832     // cheating protection
 833     /* not critical if "cheated", and check skip allow by slots in bank windows open by .bank command.
 834     Creature *pCreature = GetPlayer()->GetNPCIfCanInteractWith(guid, UNIT_NPC_FLAG_BANKER);
 835     if(!pCreature)
 836     {
 837         sLog.outDebug( "WORLD: HandleBuyBankSlotOpcode - Unit (GUID: %u) not found or you can't interact with him.", uint32(GUID_LOPART(guid)) );
 838         return;
 839     }
 840     */
 841
 842     uint32 slot = _player->GetBankBagSlotCount();
 843
 844     // next slot
 845     ++slot;
 846
 847     sLog.outDetail("PLAYER: Buy bank bag slot, slot number = %u", slot);
 848
 849     BankBagSlotPricesEntry const* slotEntry = sBankBagSlotPricesStore.LookupEntry(slot);
 850
 851     if(!slotEntry)
 852         return;
 853
 854     uint32 price = slotEntry->price;
 855
 856     if (_player->GetMoney() < price)
 857         return;
 858
 859     _player->SetBankBagSlotCount(slot);
 860     _player->ModifyMoney(-int32(price));
 861
 862     _player->GetAchievementMgr().UpdateAchievementCriteria(ACHIEVEMENT_CRITERIA_TYPE_BUY_BANK_SLOT);
 863 }
 864
 865 void WorldSession::HandleAutoBankItemOpcode(WorldPacket& recvPacket)
 866 {
 867     sLog.outDebug("WORLD: CMSG_AUTOBANK_ITEM");
 868     uint8 srcbag, srcslot;
 869
 870     recvPacket >> srcbag >> srcslot;
 871     sLog.outDebug("STORAGE: receive srcbag = %u, srcslot = %u", srcbag, srcslot);
 872
 873     Item *pItem = _player->GetItemByPos( srcbag, srcslot );
 874     if( !pItem )
 875         return;
 876
 877     ItemPosCountVec dest;
 878     uint8 msg = _player->CanBankItem( NULL_BAG, NULL_SLOT, dest, pItem, false );
 879     if( msg != EQUIP_ERR_OK )
 880     {
 881         _player->SendEquipError( msg, pItem, NULL );
 882         return;
 883     }
 884
 885     _player->RemoveItem(srcbag, srcslot, true);
 886     _player->BankItem( dest, pItem, true );
 887 }
 888
 889 void WorldSession::HandleAutoStoreBankItemOpcode(WorldPacket& recvPacket)
 890 {
 891     sLog.outDebug("WORLD: CMSG_AUTOSTORE_BANK_ITEM");
 892     uint8 srcbag, srcslot;
 893
 894     recvPacket >> srcbag >> srcslot;
 895     sLog.outDebug("STORAGE: receive srcbag = %u, srcslot = %u", srcbag, srcslot);
 896
 897     Item *pItem = _player->GetItemByPos( srcbag, srcslot );
 898     if( !pItem )
 899         return;
 900
 901     if(_player->IsBankPos(srcbag, srcslot))                 // moving from bank to inventory
 902     {
 903         ItemPosCountVec dest;
 904         uint8 msg = _player->CanStoreItem( NULL_BAG, NULL_SLOT, dest, pItem, false );
 905         if( msg != EQUIP_ERR_OK )
 906         {
 907             _player->SendEquipError( msg, pItem, NULL );
 908             return;
 909         }
 910
 911         _player->RemoveItem(srcbag, srcslot, true);
 912         _player->StoreItem( dest, pItem, true );
 913     }
 914     else                                                    // moving from inventory to bank
 915     {
 916         ItemPosCountVec dest;
 917         uint8 msg = _player->CanBankItem( NULL_BAG, NULL_SLOT, dest, pItem, false );
 918         if( msg != EQUIP_ERR_OK )
 919         {
 920             _player->SendEquipError( msg, pItem, NULL );
 921             return;
 922         }
 923
 924         _player->RemoveItem(srcbag, srcslot, true);
 925         _player->BankItem( dest, pItem, true );
 926     }
 927 }
 928
 929 void WorldSession::HandleSetAmmoOpcode(WorldPacket & recv_data)
 930 {
 931     if(!GetPlayer()->isAlive())
 932     {
 933         GetPlayer()->SendEquipError( EQUIP_ERR_YOU_ARE_DEAD, NULL, NULL );
 934         return;
 935     }
 936
 937     sLog.outDebug("WORLD: CMSG_SET_AMMO");
 938     uint32 item;
 939
 940     recv_data >> item;
 941
 942     if(!item)
 943         GetPlayer()->RemoveAmmo();
 944     else
 945         GetPlayer()->SetAmmo(item);
 946 }
 947
 948 void WorldSession::SendEnchantmentLog(uint64 Target, uint64 Caster,uint32 ItemID,uint32 SpellID)
 949 {
 950     WorldPacket data(SMSG_ENCHANTMENTLOG, (8+8+4+4+1));     // last check 2.0.10
 951     data << uint64(Target);
 952     data << uint64(Caster);
 953     data << uint32(ItemID);
 954     data << uint32(SpellID);
 955     data << uint8(0);
 956     SendPacket(&data);
 957 }
 958
 959 void WorldSession::SendItemEnchantTimeUpdate(uint64 Playerguid, uint64 Itemguid,uint32 slot,uint32 Duration)
 960 {
 961                                                             // last check 2.0.10
 962     WorldPacket data(SMSG_ITEM_ENCHANT_TIME_UPDATE, (8+4+4+8));
 963     data << uint64(Itemguid);
 964     data << uint32(slot);
 965     data << uint32(Duration);
 966     data << uint64(Playerguid);
 967     SendPacket(&data);
 968 }
 969
 970 void WorldSession::HandleItemNameQueryOpcode(WorldPacket & recv_data)
 971 {
 972     uint32 itemid;
 973     recv_data >> itemid;
 974     recv_data.read_skip<uint64>();                          // guid
 975
 976     sLog.outDebug("WORLD: CMSG_ITEM_NAME_QUERY %u", itemid);
 977     ItemPrototype const *pProto = ObjectMgr::GetItemPrototype( itemid );
 978     if( pProto )
 979     {
 980         std::string Name;
 981         Name = pProto->Name1;
 982
 983         int loc_idx = GetSessionDbLocaleIndex();
 984         if (loc_idx >= 0)
 985         {
 986             ItemLocale const *il = sObjectMgr.GetItemLocale(pProto->ItemId);
 987             if (il)
 988             {
 989                 if (il->Name.size() > size_t(loc_idx) && !il->Name[loc_idx].empty())
 990                     Name = il->Name[loc_idx];
 991             }
 992         }
 993                                                             // guess size
 994         WorldPacket data(SMSG_ITEM_NAME_QUERY_RESPONSE, (4+10));
 995         data << uint32(pProto->ItemId);
 996         data << Name;
 997         data << uint32(pProto->InventoryType);
 998         SendPacket(&data);
 999         return;
1000     }
1001     else
1002     {
1003         // listed in dbc or not expected to exist unknown item
1004         if(sItemStore.LookupEntry(itemid))
1005             sLog.outErrorDb("WORLD: CMSG_ITEM_NAME_QUERY for item %u failed (item listed in Item.dbc but not exist in DB)", itemid);
1006         else
1007             sLog.outError("WORLD: CMSG_ITEM_NAME_QUERY for item %u failed (unknown item, not listed in Item.dbc)", itemid);
1008     }
1009 }
1010
1011 void WorldSession::HandleWrapItemOpcode(WorldPacket& recv_data)
1012 {
1013     sLog.outDebug("Received opcode CMSG_WRAP_ITEM");
1014
1015     uint8 gift_bag, gift_slot, item_bag, item_slot;
1016     //recv_data.hexlike();
1017
1018     recv_data >> gift_bag >> gift_slot;                     // paper
1019     recv_data >> item_bag >> item_slot;                     // item
1020
1021     sLog.outDebug("WRAP: receive gift_bag = %u, gift_slot = %u, item_bag = %u, item_slot = %u", gift_bag, gift_slot, item_bag, item_slot);
1022
1023     Item *gift = _player->GetItemByPos( gift_bag, gift_slot );
1024     if(!gift)
1025     {
1026         _player->SendEquipError( EQUIP_ERR_ITEM_NOT_FOUND, gift, NULL );
1027         return;
1028     }
1029
1030     if(!gift->HasFlag(ITEM_FIELD_FLAGS, ITEM_FLAGS_WRAPPER))// cheating: non-wrapper wrapper
1031     {
1032         _player->SendEquipError( EQUIP_ERR_ITEM_NOT_FOUND, gift, NULL );
1033         return;
1034     }
1035
1036     Item *item = _player->GetItemByPos( item_bag, item_slot );
1037
1038     if( !item )
1039     {
1040         _player->SendEquipError( EQUIP_ERR_ITEM_NOT_FOUND, item, NULL );
1041         return;
1042     }
1043
1044     if(item == gift)                                        // not possible with packet from real client
1045     {
1046         _player->SendEquipError( EQUIP_ERR_WRAPPED_CANT_BE_WRAPPED, item, NULL );
1047         return;
1048     }
1049
1050     if(item->IsEquipped())
1051     {
1052         _player->SendEquipError( EQUIP_ERR_EQUIPPED_CANT_BE_WRAPPED, item, NULL );
1053         return;
1054     }
1055
1056     if(item->GetUInt64Value(ITEM_FIELD_GIFTCREATOR))        // HasFlag(ITEM_FIELD_FLAGS, ITEM_FLAGS_WRAPPED);
1057     {
1058         _player->SendEquipError( EQUIP_ERR_WRAPPED_CANT_BE_WRAPPED, item, NULL );
1059         return;
1060     }
1061
1062     if(item->IsBag())
1063     {
1064         _player->SendEquipError( EQUIP_ERR_BAGS_CANT_BE_WRAPPED, item, NULL );
1065         return;
1066     }
1067
1068     if(item->IsSoulBound())
1069     {
1070         _player->SendEquipError( EQUIP_ERR_BOUND_CANT_BE_WRAPPED, item, NULL );
1071         return;
1072     }
1073
1074     if(item->GetMaxStackCount() != 1)
1075     {
1076         _player->SendEquipError( EQUIP_ERR_STACKABLE_CANT_BE_WRAPPED, item, NULL );
1077         return;
1078     }
1079
1080     // maybe not correct check  (it is better than nothing)
1081     if(item->GetProto()->MaxCount > 0)
1082     {
1083         _player->SendEquipError( EQUIP_ERR_UNIQUE_CANT_BE_WRAPPED, item, NULL );
1084         return;
1085     }
1086
1087     CharacterDatabase.BeginTransaction();
1088     CharacterDatabase.PExecute("INSERT INTO character_gifts VALUES ('%u', '%u', '%u', '%u')", GUID_LOPART(item->GetOwnerGUID()), item->GetGUIDLow(), item->GetEntry(), item->GetUInt32Value(ITEM_FIELD_FLAGS));
1089     item->SetEntry(gift->GetEntry());
1090
1091     switch (item->GetEntry())
1092     {
1093         case 5042:  item->SetEntry( 5043); break;
1094         case 5048:  item->SetEntry( 5044); break;
1095         case 17303: item->SetEntry(17302); break;
1096         case 17304: item->SetEntry(17305); break;
1097         case 17307: item->SetEntry(17308); break;
1098         case 21830: item->SetEntry(21831); break;
1099     }
1100     item->SetUInt64Value(ITEM_FIELD_GIFTCREATOR, _player->GetGUID());
1101     item->SetUInt32Value(ITEM_FIELD_FLAGS, ITEM_FLAGS_WRAPPED);
1102     item->SetState(ITEM_CHANGED, _player);
1103
1104     if(item->GetState() == ITEM_NEW)                        // save new item, to have alway for `character_gifts` record in `item_instance`
1105     {
1106         // after save it will be impossible to remove the item from the queue
1107         item->RemoveFromUpdateQueueOf(_player);
1108         item->SaveToDB();                                   // item gave inventory record unchanged and can be save standalone
1109     }
1110     CharacterDatabase.CommitTransaction();
1111
1112     uint32 count = 1;
1113     _player->DestroyItemCount(gift, count, true);
1114 }
1115
1116 void WorldSession::HandleSocketOpcode(WorldPacket& recv_data)
1117 {
1118     sLog.outDebug("WORLD: CMSG_SOCKET_GEMS");
1119
1120     uint64 item_guid;
1121     uint64 gem_guids[MAX_GEM_SOCKETS];
1122
1123     recv_data >> item_guid;
1124     if(!item_guid)
1125         return;
1126
1127     for(int i = 0; i < MAX_GEM_SOCKETS; ++i)
1128         recv_data >> gem_guids[i];
1129
1130     //cheat -> tried to socket same gem multiple times
1131     if ((gem_guids[0] && (gem_guids[0] == gem_guids[1] || gem_guids[0] == gem_guids[2])) ||
1132         (gem_guids[1] && (gem_guids[1] == gem_guids[2])))
1133         return;
1134
1135     Item *itemTarget = _player->GetItemByGuid(item_guid);
1136     if(!itemTarget)                                         //missing item to socket
1137         return;
1138
1139     ItemPrototype const* itemProto = itemTarget->GetProto();
1140     if(!itemProto)
1141         return;
1142
1143     //this slot is excepted when applying / removing meta gem bonus
1144     uint8 slot = itemTarget->IsEquipped() ? itemTarget->GetSlot() : uint8(NULL_SLOT);
1145
1146     Item *Gems[MAX_GEM_SOCKETS];
1147     for(int i = 0; i < MAX_GEM_SOCKETS; ++i)
1148         Gems[i] = gem_guids[i] ? _player->GetItemByGuid(gem_guids[i]) : NULL;
1149
1150     GemPropertiesEntry const *GemProps[MAX_GEM_SOCKETS];
1151     for(int i = 0; i < MAX_GEM_SOCKETS; ++i)                //get geminfo from dbc storage
1152         GemProps[i] = (Gems[i]) ? sGemPropertiesStore.LookupEntry(Gems[i]->GetProto()->GemProperties) : NULL;
1153
1154     for(int i = 0; i < MAX_GEM_SOCKETS; ++i)                //check for hack maybe
1155     {
1156         if (!GemProps[i])
1157             continue;
1158
1159         // tried to put gem in socket where no socket exists (take care about prismatic sockets)
1160         if (!itemProto->Socket[i].Color)
1161         {
1162             // no prismatic socket
1163             if(!itemTarget->GetEnchantmentId(PRISMATIC_ENCHANTMENT_SLOT))
1164                 return;
1165
1166             // not first not-colored (not normally used) socket
1167             if(i != 0 && !itemProto->Socket[i - 1].Color && (i + 1 >= MAX_GEM_SOCKETS || itemProto->Socket[i + 1].Color))
1168                 return;
1169
1170             // ok, this is first not colored socket for item with prismatic socket
1171         }
1172
1173         // tried to put normal gem in meta socket
1174         if (itemProto->Socket[i].Color == SOCKET_COLOR_META && GemProps[i]->color != SOCKET_COLOR_META)
1175             return;
1176
1177         // tried to put meta gem in normal socket
1178         if (itemProto->Socket[i].Color != SOCKET_COLOR_META && GemProps[i]->color == SOCKET_COLOR_META)
1179             return;
1180     }
1181
1182     uint32 GemEnchants[MAX_GEM_SOCKETS];
1183     uint32 OldEnchants[MAX_GEM_SOCKETS];
1184     for(int i = 0; i < MAX_GEM_SOCKETS; ++i)                //get new and old enchantments
1185     {
1186         GemEnchants[i] = (GemProps[i]) ? GemProps[i]->spellitemenchantement : 0;
1187         OldEnchants[i] = itemTarget->GetEnchantmentId(EnchantmentSlot(SOCK_ENCHANTMENT_SLOT + i));
1188     }
1189
1190     // check unique-equipped conditions
1191     for(int i = 0; i < MAX_GEM_SOCKETS; ++i)
1192     {
1193         if(!Gems[i])
1194             continue;
1195
1196         // continue check for case when attempt add 2 similar unique equipped gems in one item.
1197         ItemPrototype const* iGemProto = Gems[i]->GetProto();
1198
1199         // unique item (for new and already placed bit removed enchantments
1200         if (iGemProto->Flags & ITEM_FLAGS_UNIQUE_EQUIPPED)
1201         {
1202             for (int j = 0; j < MAX_GEM_SOCKETS; ++j)
1203             {
1204                 if(i == j)                                  // skip self
1205                     continue;
1206
1207                 if (Gems[j])
1208                 {
1209                     if (iGemProto->ItemId == Gems[j]->GetEntry())
1210                     {
1211                         _player->SendEquipError( EQUIP_ERR_ITEM_UNIQUE_EQUIPPABLE_SOCKETED, itemTarget, NULL );
1212                         return;
1213                     }
1214                 }
1215                 else if(OldEnchants[j])
1216                 {
1217                     if(SpellItemEnchantmentEntry const* enchantEntry = sSpellItemEnchantmentStore.LookupEntry(OldEnchants[j]))
1218                     {
1219                         if (iGemProto->ItemId == enchantEntry->GemID)
1220                         {
1221                             _player->SendEquipError( EQUIP_ERR_ITEM_UNIQUE_EQUIPPABLE_SOCKETED, itemTarget, NULL );
1222                             return;
1223                         }
1224                     }
1225                 }
1226
1227             }
1228         }
1229
1230         // unique limit type item
1231         int32 limit_newcount = 0;
1232         if (iGemProto->ItemLimitCategory)
1233         {
1234             if(ItemLimitCategoryEntry const* limitEntry = sItemLimitCategoryStore.LookupEntry(iGemProto->ItemLimitCategory))
1235             {
1236                 for (int j = 0; j < MAX_GEM_SOCKETS; ++j)
1237                 {
1238                     if (Gems[j])
1239                     {
1240                         // destroyed gem
1241                         if (OldEnchants[j])
1242                         {
1243                             if(SpellItemEnchantmentEntry const* enchantEntry = sSpellItemEnchantmentStore.LookupEntry(OldEnchants[j]))
1244                                 if(ItemPrototype const* jProto = ObjectMgr::GetItemPrototype(enchantEntry->GemID))
1245                                     if (iGemProto->ItemLimitCategory == jProto->ItemLimitCategory)
1246                                         --limit_newcount;
1247                         }
1248
1249                         // new gem
1250                         if (iGemProto->ItemLimitCategory == Gems[j]->GetProto()->ItemLimitCategory)
1251                             ++limit_newcount;
1252                     }
1253                     // existed gem
1254                     else if(OldEnchants[j])
1255                     {
1256                         if(SpellItemEnchantmentEntry const* enchantEntry = sSpellItemEnchantmentStore.LookupEntry(OldEnchants[j]))
1257                             if(ItemPrototype const* jProto = ObjectMgr::GetItemPrototype(enchantEntry->GemID))
1258                                 if (iGemProto->ItemLimitCategory == jProto->ItemLimitCategory)
1259                                     ++limit_newcount;
1260                     }
1261                 }
1262
1263                 if(limit_newcount > 0 && uint32(limit_newcount) > limitEntry->maxCount)
1264                 {
1265                     _player->SendEquipError( EQUIP_ERR_ITEM_UNIQUE_EQUIPPABLE_SOCKETED, itemTarget, NULL );
1266                     return;
1267                 }
1268             }
1269         }
1270
1271         // for equipped item check all equipment for duplicate equipped gems
1272         if(itemTarget->IsEquipped())
1273         {
1274             if(uint8 res = _player->CanEquipUniqueItem(Gems[i], slot, limit_newcount >= 0 ? limit_newcount : 0))
1275             {
1276                 _player->SendEquipError( res, itemTarget, NULL );
1277                 return;
1278             }
1279         }
1280     }
1281
1282     bool SocketBonusActivated = itemTarget->GemsFitSockets();    //save state of socketbonus
1283     _player->ToggleMetaGemsActive(slot, false);             //turn off all metagems (except for the target item)
1284
1285     //if a meta gem is being equipped, all information has to be written to the item before testing if the conditions for the gem are met
1286
1287     //remove ALL enchants
1288     for(uint32 enchant_slot = SOCK_ENCHANTMENT_SLOT; enchant_slot < SOCK_ENCHANTMENT_SLOT + MAX_GEM_SOCKETS; ++enchant_slot)
1289         _player->ApplyEnchantment(itemTarget, EnchantmentSlot(enchant_slot), false);
1290
1291     for(int i = 0; i < MAX_GEM_SOCKETS; ++i)
1292     {
1293         if(GemEnchants[i])
1294         {
1295             itemTarget->SetEnchantment(EnchantmentSlot(SOCK_ENCHANTMENT_SLOT + i), GemEnchants[i], 0, 0);
1296             if(Item* guidItem = _player->GetItemByGuid(gem_guids[i]))
1297                 _player->DestroyItem(guidItem->GetBagSlot(), guidItem->GetSlot(), true );
1298         }
1299     }
1300
1301     for(uint32 enchant_slot = SOCK_ENCHANTMENT_SLOT; enchant_slot < SOCK_ENCHANTMENT_SLOT + MAX_GEM_SOCKETS; ++enchant_slot)
1302         _player->ApplyEnchantment(itemTarget, EnchantmentSlot(enchant_slot), true);
1303
1304     bool SocketBonusToBeActivated = itemTarget->GemsFitSockets();// current socketbonus state
1305     if(SocketBonusActivated != SocketBonusToBeActivated)    // if there was a change...
1306     {
1307         _player->ApplyEnchantment(itemTarget,BONUS_ENCHANTMENT_SLOT, false);
1308         itemTarget->SetEnchantment(BONUS_ENCHANTMENT_SLOT, (SocketBonusToBeActivated ? itemTarget->GetProto()->socketBonus : 0), 0, 0);
1309         _player->ApplyEnchantment(itemTarget, BONUS_ENCHANTMENT_SLOT, true);
1310         //it is not displayed, client has an inbuilt system to determine if the bonus is activated
1311     }
1312
1313     _player->ToggleMetaGemsActive(slot, true);              // turn on all metagems (except for target item)
1314 }
1315
1316 void WorldSession::HandleCancelTempEnchantmentOpcode(WorldPacket& recv_data)
1317 {
1318     sLog.outDebug("WORLD: CMSG_CANCEL_TEMP_ENCHANTMENT");
1319
1320     uint32 eslot;
1321
1322     recv_data >> eslot;
1323
1324     // apply only to equipped item
1325     if(!Player::IsEquipmentPos(INVENTORY_SLOT_BAG_0, eslot))
1326         return;
1327
1328     Item* item = GetPlayer()->GetItemByPos(INVENTORY_SLOT_BAG_0, eslot);
1329
1330     if(!item)
1331         return;
1332
1333     if(!item->GetEnchantmentId(TEMP_ENCHANTMENT_SLOT))
1334         return;
1335
1336     GetPlayer()->ApplyEnchantment(item, TEMP_ENCHANTMENT_SLOT, false);
1337     item->ClearEnchantment(TEMP_ENCHANTMENT_SLOT);
1338 }
1339
1340 void WorldSession::HandleItemRefundInfoRequest(WorldPacket& recv_data)
1341 {
1342     sLog.outDebug("WORLD: CMSG_ITEM_REFUND_INFO_REQUEST");
1343
1344     uint64 guid;
1345     recv_data >> guid;                                      // item guid
1346
1347     Item *item = _player->GetItemByGuid(guid);
1348
1349     if(!item)
1350     {
1351         sLog.outDebug("Item refund: item not found!");
1352         return;
1353     }
1354
1355     if(!item->HasFlag(ITEM_FIELD_FLAGS, ITEM_FLAGS_REFUNDABLE))
1356     {
1357         sLog.outDebug("Item refund: item not refundable!");
1358         return;
1359     }
1360
1361     // item refund system not implemented yet
1362 }