src/game/NPCHandler.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 "Language.h"
  21 #include "Database/DatabaseEnv.h"
  22 #include "WorldPacket.h"
  23 #include "WorldSession.h"
  24 #include "Opcodes.h"
  25 #include "Log.h"
  26 #include "ObjectMgr.h"
  27 #include "SpellMgr.h"
  28 #include "Player.h"
  29 #include "GossipDef.h"
  30 #include "UpdateMask.h"
  31 #include "ScriptCalls.h"
  32 #include "ObjectAccessor.h"
  33 #include "Creature.h"
  34 #include "Pet.h"
  35 #include "Guild.h"
  36
  37 void WorldSession::HandleTabardVendorActivateOpcode( WorldPacket & recv_data )
  38 {
  39     uint64 guid;
  40     recv_data >> guid;
  41
  42     Creature *unit = GetPlayer()->GetNPCIfCanInteractWith(guid,UNIT_NPC_FLAG_TABARDDESIGNER);
  43     if (!unit)
  44     {
  45         sLog.outDebug( "WORLD: HandleTabardVendorActivateOpcode - Unit (GUID: %u) not found or you can't interact with him.", uint32(GUID_LOPART(guid)) );
  46         return;
  47     }
  48
  49     // remove fake death
  50     if(GetPlayer()->hasUnitState(UNIT_STAT_DIED))
  51         GetPlayer()->RemoveSpellsCausingAura(SPELL_AURA_FEIGN_DEATH);
  52
  53     SendTabardVendorActivate(guid);
  54 }
  55
  56 void WorldSession::SendTabardVendorActivate( uint64 guid )
  57 {
  58     WorldPacket data( MSG_TABARDVENDOR_ACTIVATE, 8 );
  59     data << guid;
  60     SendPacket( &data );
  61 }
  62
  63 void WorldSession::HandleBankerActivateOpcode( WorldPacket & recv_data )
  64 {
  65     uint64 guid;
  66
  67     sLog.outDebug(  "WORLD: Received CMSG_BANKER_ACTIVATE" );
  68
  69     recv_data >> guid;
  70
  71     Creature *unit = GetPlayer()->GetNPCIfCanInteractWith(guid,UNIT_NPC_FLAG_BANKER);
  72     if (!unit)
  73     {
  74         sLog.outDebug( "WORLD: HandleBankerActivateOpcode - Unit (GUID: %u) not found or you can't interact with him.", uint32(GUID_LOPART(guid)) );
  75         return;
  76     }
  77
  78     // remove fake death
  79     if(GetPlayer()->hasUnitState(UNIT_STAT_DIED))
  80         GetPlayer()->RemoveSpellsCausingAura(SPELL_AURA_FEIGN_DEATH);
  81
  82     SendShowBank(guid);
  83 }
  84
  85 void WorldSession::SendShowBank( uint64 guid )
  86 {
  87     WorldPacket data( SMSG_SHOW_BANK, 8 );
  88     data << guid;
  89     SendPacket( &data );
  90 }
  91
  92 void WorldSession::HandleTrainerListOpcode( WorldPacket & recv_data )
  93 {
  94     uint64 guid;
  95
  96     recv_data >> guid;
  97     SendTrainerList( guid );
  98 }
  99
 100 void WorldSession::SendTrainerList( uint64 guid )
 101 {
 102     std::string str = GetMangosString(LANG_NPC_TAINER_HELLO);
 103     SendTrainerList( guid, str );
 104 }
 105
 106 void WorldSession::SendTrainerList( uint64 guid, const std::string& strTitle )
 107 {
 108     sLog.outDebug( "WORLD: SendTrainerList" );
 109
 110     Creature *unit = GetPlayer()->GetNPCIfCanInteractWith(guid,UNIT_NPC_FLAG_TRAINER);
 111     if (!unit)
 112     {
 113         sLog.outDebug( "WORLD: SendTrainerList - Unit (GUID: %u) not found or you can't interact with him.", uint32(GUID_LOPART(guid)) );
 114         return;
 115     }
 116
 117     // remove fake death
 118     if(GetPlayer()->hasUnitState(UNIT_STAT_DIED))
 119         GetPlayer()->RemoveSpellsCausingAura(SPELL_AURA_FEIGN_DEATH);
 120
 121     // trainer list loaded at check;
 122     if(!unit->isCanTrainingOf(_player,true))
 123         return;
 124
 125     CreatureInfo const *ci = unit->GetCreatureInfo();
 126
 127     if (!ci)
 128     {
 129         sLog.outDebug( "WORLD: SendTrainerList - (GUID: %u) NO CREATUREINFO!",GUID_LOPART(guid) );
 130         return;
 131     }
 132
 133     TrainerSpellData const* trainer_spells = unit->GetTrainerSpells();
 134     if(!trainer_spells)
 135     {
 136         sLog.outDebug( "WORLD: SendTrainerList - Training spells not found for creature (GUID: %u Entry: %u)",
 137             GUID_LOPART(guid), unit->GetEntry());
 138         return;
 139     }
 140
 141     WorldPacket data( SMSG_TRAINER_LIST, 8+4+4+trainer_spells->spellList.size()*38 + strTitle.size()+1);
 142     data << guid;
 143     data << uint32(trainer_spells->trainerType);
 144
 145     size_t count_pos = data.wpos();
 146     data << uint32(trainer_spells->spellList.size());
 147
 148     // reputation discount
 149     float fDiscountMod = _player->GetReputationPriceDiscount(unit);
 150     bool can_learn_primary_prof = GetPlayer()->GetFreePrimaryProfessionPoints() > 0;
 151
 152     uint32 count = 0;
 153     for(TrainerSpellMap::const_iterator itr = trainer_spells->spellList.begin(); itr != trainer_spells->spellList.end(); ++itr)
 154     {
 155         TrainerSpell const* tSpell = &itr->second;
 156
 157         if(!_player->IsSpellFitByClassAndRace(tSpell->learnedSpell))
 158             continue;
 159
 160         bool primary_prof_first_rank = sSpellMgr.IsPrimaryProfessionFirstRankSpell(tSpell->learnedSpell);
 161         SpellChainNode const* chain_node = sSpellMgr.GetSpellChainNode(tSpell->learnedSpell);
 162         TrainerSpellState state = _player->GetTrainerSpellState(tSpell);
 163
 164         data << uint32(tSpell->spell);                      // learned spell (or cast-spell in profession case)
 165         data << uint8(state==TRAINER_SPELL_GREEN_DISABLED ? TRAINER_SPELL_GREEN : state);
 166         data << uint32(floor(tSpell->spellCost * fDiscountMod));
 167
 168         data << uint32(primary_prof_first_rank && can_learn_primary_prof ? 1 : 0);
 169                                                             // primary prof. learn confirmation dialog
 170         data << uint32(primary_prof_first_rank ? 1 : 0);    // must be equal prev. field to have learn button in enabled state
 171         data << uint8(tSpell->reqLevel);
 172         data << uint32(tSpell->reqSkill);
 173         data << uint32(tSpell->reqSkillValue);
 174         data << uint32(!tSpell->IsCastable() && chain_node ? (chain_node->prev ? chain_node->prev : chain_node->req) : 0);
 175         data << uint32(!tSpell->IsCastable() && chain_node && chain_node->prev ? chain_node->req : 0);
 176         data << uint32(0);
 177
 178         ++count;
 179     }
 180
 181     data << strTitle;
 182
 183     data.put<uint32>(count_pos,count);
 184     SendPacket( &data );
 185 }
 186
 187 void WorldSession::HandleTrainerBuySpellOpcode( WorldPacket & recv_data )
 188 {
 189     uint64 guid;
 190     uint32 spellId = 0;
 191
 192     recv_data >> guid >> spellId;
 193     sLog.outDebug( "WORLD: Received CMSG_TRAINER_BUY_SPELL NpcGUID=%u, learn spell id is: %u",uint32(GUID_LOPART(guid)), spellId );
 194
 195     Creature *unit = GetPlayer()->GetNPCIfCanInteractWith(guid, UNIT_NPC_FLAG_TRAINER);
 196     if (!unit)
 197     {
 198         sLog.outDebug( "WORLD: HandleTrainerBuySpellOpcode - Unit (GUID: %u) not found or you can't interact with him.", uint32(GUID_LOPART(guid)) );
 199         return;
 200     }
 201
 202     // remove fake death
 203     if(GetPlayer()->hasUnitState(UNIT_STAT_DIED))
 204         GetPlayer()->RemoveSpellsCausingAura(SPELL_AURA_FEIGN_DEATH);
 205
 206     if(!unit->isCanTrainingOf(_player,true))
 207         return;
 208
 209     // check present spell in trainer spell list
 210     TrainerSpellData const* trainer_spells = unit->GetTrainerSpells();
 211     if(!trainer_spells)
 212         return;
 213
 214     // not found, cheat?
 215     TrainerSpell const* trainer_spell = trainer_spells->Find(spellId);
 216     if(!trainer_spell)
 217         return;
 218
 219     // can't be learn, cheat? Or double learn with lags...
 220     if(_player->GetTrainerSpellState(trainer_spell) != TRAINER_SPELL_GREEN)
 221         return;
 222
 223     // apply reputation discount
 224     uint32 nSpellCost = uint32(floor(trainer_spell->spellCost * _player->GetReputationPriceDiscount(unit)));
 225
 226     // check money requirement
 227     if(_player->GetMoney() < nSpellCost )
 228         return;
 229
 230     _player->ModifyMoney( -int32(nSpellCost) );
 231
 232     WorldPacket data(SMSG_PLAY_SPELL_VISUAL, 12);           // visual effect on trainer
 233     data << uint64(guid) << uint32(0xB3);
 234     SendPacket(&data);
 235
 236     data.Initialize(SMSG_PLAY_SPELL_IMPACT, 12);            // visual effect on player
 237     data << uint64(_player->GetGUID()) << uint32(0x016A);
 238     SendPacket(&data);
 239
 240     // learn explicitly or cast explicitly
 241     if(trainer_spell->IsCastable ())
 242         //FIXME: prof. spell entry in trainer list not marked gray until list re-open.
 243         _player->CastSpell(_player,trainer_spell->spell,true);
 244     else
 245         _player->learnSpell(spellId,false);
 246
 247     data.Initialize(SMSG_TRAINER_BUY_SUCCEEDED, 12);
 248     data << uint64(guid) << uint32(trainer_spell->spell);
 249     SendPacket(&data);
 250 }
 251
 252 void WorldSession::HandleGossipHelloOpcode(WorldPacket & recv_data)
 253 {
 254     sLog.outDebug("WORLD: Received CMSG_GOSSIP_HELLO");
 255
 256     uint64 guid;
 257     recv_data >> guid;
 258
 259     Creature *pCreature = GetPlayer()->GetNPCIfCanInteractWith(guid, UNIT_NPC_FLAG_NONE);
 260
 261     if (!pCreature)
 262     {
 263         sLog.outDebug("WORLD: HandleGossipHelloOpcode - Unit (GUID: %u) not found or you can't interact with him.", uint32(GUID_LOPART(guid)));
 264         return;
 265     }
 266
 267     // remove fake death
 268     if (GetPlayer()->hasUnitState(UNIT_STAT_DIED))
 269         GetPlayer()->RemoveSpellsCausingAura(SPELL_AURA_FEIGN_DEATH);
 270
 271     if (!pCreature->IsStopped())
 272         pCreature->StopMoving();
 273
 274     if (pCreature->isSpiritGuide())
 275         pCreature->SendAreaSpiritHealerQueryOpcode(_player);
 276
 277     if (!Script->GossipHello(_player, pCreature))
 278     {
 279         _player->TalkedToCreature(pCreature->GetEntry(), pCreature->GetGUID());
 280         _player->PrepareGossipMenu(pCreature, pCreature->GetCreatureInfo()->GossipMenuId);
 281         _player->SendPreparedGossip(pCreature);
 282     }
 283 }
 284
 285 void WorldSession::HandleGossipSelectOptionOpcode( WorldPacket & recv_data )
 286 {
 287     sLog.outDebug("WORLD: CMSG_GOSSIP_SELECT_OPTION");
 288
 289     uint32 gossipListId;
 290     uint32 menuId;
 291     uint64 guid;
 292     std::string code = "";
 293
 294     recv_data >> guid >> menuId >> gossipListId;
 295
 296     if (_player->PlayerTalkClass->GossipOptionCoded(gossipListId))
 297     {
 298         sLog.outBasic("reading string");
 299         recv_data >> code;
 300         sLog.outBasic("string read: %s", code.c_str());
 301     }
 302
 303     // remove fake death
 304     if (GetPlayer()->hasUnitState(UNIT_STAT_DIED))
 305         GetPlayer()->RemoveSpellsCausingAura(SPELL_AURA_FEIGN_DEATH);
 306
 307     // TODO: determine if scriptCall is needed for GO and also if scriptCall can be same as current, with modified argument WorldObject*
 308
 309     // can vehicle have gossip? If so, need check for this also.
 310     if (IS_CREATURE_OR_PET_GUID(guid))
 311     {
 312         Creature *pCreature = GetPlayer()->GetNPCIfCanInteractWith(guid, UNIT_NPC_FLAG_NONE);
 313
 314         if (!pCreature)
 315         {
 316             sLog.outDebug("WORLD: HandleGossipSelectOptionOpcode - Creature (GUID: %u) not found or you can't interact with it.", uint32(GUID_LOPART(guid)));
 317             return;
 318         }
 319
 320         if (!code.empty())
 321         {
 322             if (!Script->GossipSelectWithCode(_player, pCreature, _player->PlayerTalkClass->GossipOptionSender(gossipListId), _player->PlayerTalkClass->GossipOptionAction(gossipListId), code.c_str()))
 323                 _player->OnGossipSelect(pCreature, gossipListId, menuId);
 324         }
 325         else
 326         {
 327             if (!Script->GossipSelect(_player, pCreature, _player->PlayerTalkClass->GossipOptionSender(gossipListId), _player->PlayerTalkClass->GossipOptionAction(gossipListId)))
 328                 _player->OnGossipSelect(pCreature, gossipListId, menuId);
 329         }
 330     }
 331     else if (IS_GAMEOBJECT_GUID(guid))
 332     {
 333         GameObject *pGo = GetPlayer()->GetGameObjectIfCanInteractWith(guid);
 334
 335         if (!pGo)
 336         {
 337             sLog.outDebug("WORLD: HandleGossipSelectOptionOpcode - GameObject (GUID: %u) not found or you can't interact with it.", uint32(GUID_LOPART(guid)));
 338             return;
 339         }
 340
 341         _player->OnGossipSelect(pGo, gossipListId, menuId);
 342     }
 343 }
 344
 345 void WorldSession::HandleSpiritHealerActivateOpcode( WorldPacket & recv_data )
 346 {
 347     sLog.outDebug("WORLD: CMSG_SPIRIT_HEALER_ACTIVATE");
 348
 349     uint64 guid;
 350
 351     recv_data >> guid;
 352
 353     Creature *unit = GetPlayer()->GetNPCIfCanInteractWith(guid, UNIT_NPC_FLAG_SPIRITHEALER);
 354     if (!unit)
 355     {
 356         sLog.outDebug( "WORLD: HandleSpiritHealerActivateOpcode - Unit (GUID: %u) not found or you can't interact with him.", uint32(GUID_LOPART(guid)) );
 357         return;
 358     }
 359
 360     // remove fake death
 361     if(GetPlayer()->hasUnitState(UNIT_STAT_DIED))
 362         GetPlayer()->RemoveSpellsCausingAura(SPELL_AURA_FEIGN_DEATH);
 363
 364     SendSpiritResurrect();
 365 }
 366
 367 void WorldSession::SendSpiritResurrect()
 368 {
 369     _player->ResurrectPlayer(0.5f, true);
 370
 371     _player->DurabilityLossAll(0.25f,true);
 372
 373     // get corpse nearest graveyard
 374     WorldSafeLocsEntry const *corpseGrave = NULL;
 375     Corpse *corpse = _player->GetCorpse();
 376     if(corpse)
 377         corpseGrave = sObjectMgr.GetClosestGraveYard(
 378             corpse->GetPositionX(), corpse->GetPositionY(), corpse->GetPositionZ(), corpse->GetMapId(), _player->GetTeam() );
 379
 380     // now can spawn bones
 381     _player->SpawnCorpseBones();
 382
 383     // teleport to nearest from corpse graveyard, if different from nearest to player ghost
 384     if(corpseGrave)
 385     {
 386         WorldSafeLocsEntry const *ghostGrave = sObjectMgr.GetClosestGraveYard(
 387             _player->GetPositionX(), _player->GetPositionY(), _player->GetPositionZ(), _player->GetMapId(), _player->GetTeam() );
 388
 389         if(corpseGrave != ghostGrave)
 390             _player->TeleportTo(corpseGrave->map_id, corpseGrave->x, corpseGrave->y, corpseGrave->z, _player->GetOrientation());
 391         // or update at original position
 392         else
 393             _player->UpdateVisibilityForPlayer();
 394     }
 395     // or update at original position
 396     else
 397         _player->UpdateVisibilityForPlayer();
 398 }
 399
 400 void WorldSession::HandleBinderActivateOpcode( WorldPacket & recv_data )
 401 {
 402     uint64 npcGUID;
 403     recv_data >> npcGUID;
 404
 405     if(!GetPlayer()->IsInWorld() || !GetPlayer()->isAlive())
 406         return;
 407
 408     Creature *unit = GetPlayer()->GetNPCIfCanInteractWith(npcGUID,UNIT_NPC_FLAG_INNKEEPER);
 409     if (!unit)
 410     {
 411         sLog.outDebug( "WORLD: HandleBinderActivateOpcode - Unit (GUID: %u) not found or you can't interact with him.", uint32(GUID_LOPART(npcGUID)) );
 412         return;
 413     }
 414
 415     // remove fake death
 416     if(GetPlayer()->hasUnitState(UNIT_STAT_DIED))
 417         GetPlayer()->RemoveSpellsCausingAura(SPELL_AURA_FEIGN_DEATH);
 418
 419     SendBindPoint(unit);
 420 }
 421
 422 void WorldSession::SendBindPoint(Creature *npc)
 423 {
 424     // prevent set homebind to instances in any case
 425     if(GetPlayer()->GetMap()->Instanceable())
 426         return;
 427
 428     uint32 bindspell = 3286;
 429     uint32 zone_id = _player->GetZoneId();
 430
 431     _player->SetHomebindToCurrentPos();
 432
 433     // send spell for bind 3286 bind magic
 434     npc->CastSpell(_player, bindspell, true);
 435
 436     WorldPacket data( SMSG_TRAINER_BUY_SUCCEEDED, (8+4));
 437     data << npc->GetGUID();
 438     data << bindspell;
 439     SendPacket( &data );
 440
 441     // binding
 442     data.Initialize( SMSG_BINDPOINTUPDATE, (4+4+4+4+4) );
 443     data << float(_player->GetPositionX());
 444     data << float(_player->GetPositionY());
 445     data << float(_player->GetPositionZ());
 446     data << uint32(_player->GetMapId());
 447     data << uint32(zone_id);
 448     SendPacket( &data );
 449
 450     DEBUG_LOG("New Home Position X is %f",_player->GetPositionX());
 451     DEBUG_LOG("New Home Position Y is %f",_player->GetPositionY());
 452     DEBUG_LOG("New Home Position Z is %f",_player->GetPositionZ());
 453     DEBUG_LOG("New Home MapId is %u",_player->GetMapId());
 454     DEBUG_LOG("New Home ZoneId is %u",zone_id);
 455
 456     // zone update
 457     data.Initialize( SMSG_PLAYERBOUND, 8+4 );
 458     data << uint64(_player->GetGUID());
 459     data << uint32(zone_id);
 460     SendPacket( &data );
 461
 462     _player->PlayerTalkClass->CloseGossip();
 463 }
 464
 465 void WorldSession::HandleListStabledPetsOpcode( WorldPacket & recv_data )
 466 {
 467     sLog.outDebug("WORLD: Recv MSG_LIST_STABLED_PETS");
 468     uint64 npcGUID;
 469
 470     recv_data >> npcGUID;
 471
 472     Creature *unit = GetPlayer()->GetNPCIfCanInteractWith(npcGUID, UNIT_NPC_FLAG_STABLEMASTER);
 473     if (!unit)
 474     {
 475         sLog.outDebug( "WORLD: HandleListStabledPetsOpcode - Unit (GUID: %u) not found or you can't interact with him.", uint32(GUID_LOPART(npcGUID)) );
 476         return;
 477     }
 478
 479     // remove fake death
 480     if(GetPlayer()->hasUnitState(UNIT_STAT_DIED))
 481         GetPlayer()->RemoveSpellsCausingAura(SPELL_AURA_FEIGN_DEATH);
 482
 483     SendStablePet(npcGUID);
 484 }
 485
 486 void WorldSession::SendStablePet(uint64 guid )
 487 {
 488     sLog.outDebug("WORLD: Recv MSG_LIST_STABLED_PETS Send.");
 489
 490     WorldPacket data(MSG_LIST_STABLED_PETS, 200);           // guess size
 491     data << uint64 ( guid );
 492
 493     Pet *pet = _player->GetPet();
 494
 495     size_t wpos = data.wpos();
 496     data << uint8(0);                                       // place holder for slot show number
 497
 498     data << uint8(GetPlayer()->m_stableSlots);
 499
 500     uint8 num = 0;                                          // counter for place holder
 501
 502     // not let move dead pet in slot
 503     if(pet && pet->isAlive() && pet->getPetType()==HUNTER_PET)
 504     {
 505         data << uint32(pet->GetCharmInfo()->GetPetNumber());
 506         data << uint32(pet->GetEntry());
 507         data << uint32(pet->getLevel());
 508         data << pet->GetName();                             // petname
 509         data << uint8(1);                                   // 1 = current, 2/3 = in stable (any from 4,5,... create problems with proper show)
 510         ++num;
 511     }
 512
 513     //                                                     0      1   2      3      4
 514     QueryResult* result = CharacterDatabase.PQuery("SELECT owner, id, entry, level, name FROM character_pet WHERE owner = '%u' AND slot >= '%u' AND slot <= '%u' ORDER BY slot",
 515         _player->GetGUIDLow(),PET_SAVE_FIRST_STABLE_SLOT,PET_SAVE_LAST_STABLE_SLOT);
 516
 517     if(result)
 518     {
 519         do
 520         {
 521             Field *fields = result->Fetch();
 522
 523             data << uint32(fields[1].GetUInt32());          // petnumber
 524             data << uint32(fields[2].GetUInt32());          // creature entry
 525             data << uint32(fields[3].GetUInt32());          // level
 526             data << fields[4].GetString();                  // name
 527             data << uint8(2);                               // 1 = current, 2/3 = in stable (any from 4,5,... create problems with proper show)
 528
 529             ++num;
 530         }while( result->NextRow() );
 531
 532         delete result;
 533     }
 534
 535     data.put<uint8>(wpos, num);                             // set real data to placeholder
 536     SendPacket(&data);
 537 }
 538
 539 void WorldSession::HandleStablePet( WorldPacket & recv_data )
 540 {
 541     sLog.outDebug("WORLD: Recv CMSG_STABLE_PET");
 542     uint64 npcGUID;
 543
 544     recv_data >> npcGUID;
 545
 546     if(!GetPlayer()->isAlive())
 547         return;
 548
 549     Creature *unit = GetPlayer()->GetNPCIfCanInteractWith(npcGUID, UNIT_NPC_FLAG_STABLEMASTER);
 550     if (!unit)
 551     {
 552         sLog.outDebug( "WORLD: HandleStablePet - Unit (GUID: %u) not found or you can't interact with him.", uint32(GUID_LOPART(npcGUID)) );
 553         return;
 554     }
 555
 556     // remove fake death
 557     if(GetPlayer()->hasUnitState(UNIT_STAT_DIED))
 558         GetPlayer()->RemoveSpellsCausingAura(SPELL_AURA_FEIGN_DEATH);
 559
 560     Pet *pet = _player->GetPet();
 561
 562     // can't place in stable dead pet
 563     if(!pet||!pet->isAlive()||pet->getPetType()!=HUNTER_PET)
 564     {
 565         WorldPacket data(SMSG_STABLE_RESULT, 1);
 566         data << uint8(0x06);
 567         SendPacket(&data);
 568         return;
 569     }
 570
 571     uint32 free_slot = 1;
 572
 573     QueryResult *result = CharacterDatabase.PQuery("SELECT owner,slot,id FROM character_pet WHERE owner = '%u'  AND slot >= '%u' AND slot <= '%u' ORDER BY slot ",
 574         _player->GetGUIDLow(),PET_SAVE_FIRST_STABLE_SLOT,PET_SAVE_LAST_STABLE_SLOT);
 575     if(result)
 576     {
 577         do
 578         {
 579             Field *fields = result->Fetch();
 580
 581             uint32 slot = fields[1].GetUInt32();
 582
 583             // slots ordered in query, and if not equal then free
 584             if(slot!=free_slot)
 585                 break;
 586
 587             // this slot not free, skip
 588             ++free_slot;
 589         }while( result->NextRow() );
 590
 591         delete result;
 592     }
 593
 594     WorldPacket data(SMSG_STABLE_RESULT, 1);
 595     if( free_slot > 0 && free_slot <= GetPlayer()->m_stableSlots)
 596     {
 597         _player->RemovePet(pet,PetSaveMode(free_slot));
 598         data << uint8(0x08);
 599     }
 600     else
 601         data << uint8(0x06);
 602
 603     SendPacket(&data);
 604 }
 605
 606 void WorldSession::HandleUnstablePet( WorldPacket & recv_data )
 607 {
 608     sLog.outDebug("WORLD: Recv CMSG_UNSTABLE_PET.");
 609     uint64 npcGUID;
 610     uint32 petnumber;
 611
 612     recv_data >> npcGUID >> petnumber;
 613
 614     Creature *unit = GetPlayer()->GetNPCIfCanInteractWith(npcGUID, UNIT_NPC_FLAG_STABLEMASTER);
 615     if (!unit)
 616     {
 617         sLog.outDebug( "WORLD: HandleUnstablePet - Unit (GUID: %u) not found or you can't interact with him.", uint32(GUID_LOPART(npcGUID)) );
 618         return;
 619     }
 620
 621     // remove fake death
 622     if(GetPlayer()->hasUnitState(UNIT_STAT_DIED))
 623         GetPlayer()->RemoveSpellsCausingAura(SPELL_AURA_FEIGN_DEATH);
 624
 625     uint32 creature_id = 0;
 626
 627     {
 628         QueryResult *result = CharacterDatabase.PQuery("SELECT entry FROM character_pet WHERE owner = '%u' AND id = '%u' AND slot >='%u' AND slot <= '%u'",
 629             _player->GetGUIDLow(),petnumber,PET_SAVE_FIRST_STABLE_SLOT,PET_SAVE_LAST_STABLE_SLOT);
 630         if(result)
 631         {
 632             Field *fields = result->Fetch();
 633             creature_id = fields[0].GetUInt32();
 634             delete result;
 635         }
 636     }
 637
 638     if(!creature_id)
 639     {
 640         WorldPacket data(SMSG_STABLE_RESULT, 1);
 641         data << uint8(0x06);
 642         SendPacket(&data);
 643         return;
 644     }
 645
 646     CreatureInfo const* creatureInfo = ObjectMgr::GetCreatureTemplate(creature_id);
 647     if(!creatureInfo || !creatureInfo->isTameable(_player->CanTameExoticPets()))
 648     {
 649         WorldPacket data(SMSG_STABLE_RESULT, 1);
 650         data << uint8(0x06);
 651         SendPacket(&data);
 652         return;
 653     }
 654
 655     Pet* pet = _player->GetPet();
 656     if(pet && pet->isAlive())
 657     {
 658         WorldPacket data(SMSG_STABLE_RESULT, 1);
 659         data << uint8(0x06);
 660         SendPacket(&data);
 661         return;
 662     }
 663
 664     // delete dead pet
 665     if(pet)
 666         _player->RemovePet(pet,PET_SAVE_AS_DELETED);
 667
 668     Pet *newpet = new Pet(HUNTER_PET);
 669     if(!newpet->LoadPetFromDB(_player,creature_id,petnumber))
 670     {
 671         delete newpet;
 672         newpet = NULL;
 673         WorldPacket data(SMSG_STABLE_RESULT, 1);
 674         data << uint8(0x06);
 675         SendPacket(&data);
 676         return;
 677     }
 678
 679     WorldPacket data(SMSG_STABLE_RESULT, 1);
 680     data << uint8(0x09);
 681     SendPacket(&data);
 682 }
 683
 684 void WorldSession::HandleBuyStableSlot( WorldPacket & recv_data )
 685 {
 686     sLog.outDebug("WORLD: Recv CMSG_BUY_STABLE_SLOT.");
 687     uint64 npcGUID;
 688
 689     recv_data >> npcGUID;
 690
 691     Creature *unit = GetPlayer()->GetNPCIfCanInteractWith(npcGUID, UNIT_NPC_FLAG_STABLEMASTER);
 692     if (!unit)
 693     {
 694         sLog.outDebug( "WORLD: HandleBuyStableSlot - Unit (GUID: %u) not found or you can't interact with him.", uint32(GUID_LOPART(npcGUID)) );
 695         return;
 696     }
 697
 698     // remove fake death
 699     if(GetPlayer()->hasUnitState(UNIT_STAT_DIED))
 700         GetPlayer()->RemoveSpellsCausingAura(SPELL_AURA_FEIGN_DEATH);
 701
 702     WorldPacket data(SMSG_STABLE_RESULT, 200);
 703
 704     if(GetPlayer()->m_stableSlots < MAX_PET_STABLES)
 705     {
 706         StableSlotPricesEntry const *SlotPrice = sStableSlotPricesStore.LookupEntry(GetPlayer()->m_stableSlots+1);
 707         if(_player->GetMoney() >= SlotPrice->Price)
 708         {
 709             ++GetPlayer()->m_stableSlots;
 710             _player->ModifyMoney(-int32(SlotPrice->Price));
 711             data << uint8(0x0A);                            // success buy
 712         }
 713         else
 714             data << uint8(0x06);
 715     }
 716     else
 717         data << uint8(0x06);
 718
 719     SendPacket(&data);
 720 }
 721
 722 void WorldSession::HandleStableRevivePet( WorldPacket &/* recv_data */)
 723 {
 724     sLog.outDebug("HandleStableRevivePet: Not implemented");
 725 }
 726
 727 void WorldSession::HandleStableSwapPet( WorldPacket & recv_data )
 728 {
 729     sLog.outDebug("WORLD: Recv CMSG_STABLE_SWAP_PET.");
 730     uint64 npcGUID;
 731     uint32 pet_number;
 732
 733     recv_data >> npcGUID >> pet_number;
 734
 735     Creature *unit = GetPlayer()->GetNPCIfCanInteractWith(npcGUID, UNIT_NPC_FLAG_STABLEMASTER);
 736     if (!unit)
 737     {
 738         sLog.outDebug( "WORLD: HandleStableSwapPet - Unit (GUID: %u) not found or you can't interact with him.", uint32(GUID_LOPART(npcGUID)) );
 739         return;
 740     }
 741
 742     // remove fake death
 743     if(GetPlayer()->hasUnitState(UNIT_STAT_DIED))
 744         GetPlayer()->RemoveSpellsCausingAura(SPELL_AURA_FEIGN_DEATH);
 745
 746     WorldPacket data(SMSG_STABLE_RESULT, 200);              // guess size
 747
 748     Pet* pet = _player->GetPet();
 749
 750     if(!pet || pet->getPetType()!=HUNTER_PET)
 751         return;
 752
 753     // find swapped pet slot in stable
 754     QueryResult *result = CharacterDatabase.PQuery("SELECT slot,entry FROM character_pet WHERE owner = '%u' AND id = '%u'",
 755         _player->GetGUIDLow(),pet_number);
 756     if(!result)
 757         return;
 758
 759     Field *fields = result->Fetch();
 760
 761     uint32 slot        = fields[0].GetUInt32();
 762     uint32 creature_id = fields[1].GetUInt32();
 763     delete result;
 764
 765     if(!creature_id)
 766     {
 767         WorldPacket data(SMSG_STABLE_RESULT, 1);
 768         data << uint8(0x06);
 769         SendPacket(&data);
 770         return;
 771     }
 772
 773     CreatureInfo const* creatureInfo = ObjectMgr::GetCreatureTemplate(creature_id);
 774     if(!creatureInfo || !creatureInfo->isTameable(_player->CanTameExoticPets()))
 775     {
 776         WorldPacket data(SMSG_STABLE_RESULT, 1);
 777         data << uint8(0x06);
 778         SendPacket(&data);
 779         return;
 780     }
 781
 782     // move alive pet to slot or delete dead pet
 783     _player->RemovePet(pet,pet->isAlive() ? PetSaveMode(slot) : PET_SAVE_AS_DELETED);
 784
 785     // summon unstabled pet
 786     Pet *newpet = new Pet;
 787     if(!newpet->LoadPetFromDB(_player,creature_id,pet_number))
 788     {
 789         delete newpet;
 790         data << uint8(0x06);
 791     }
 792     else
 793         data << uint8(0x09);
 794
 795     SendPacket(&data);
 796 }
 797
 798 void WorldSession::HandleRepairItemOpcode( WorldPacket & recv_data )
 799 {
 800     sLog.outDebug("WORLD: CMSG_REPAIR_ITEM");
 801
 802     uint64 npcGUID, itemGUID;
 803     uint8 guildBank;                                        // new in 2.3.2, bool that means from guild bank money
 804
 805     recv_data >> npcGUID >> itemGUID >> guildBank;
 806
 807     Creature *unit = GetPlayer()->GetNPCIfCanInteractWith(npcGUID, UNIT_NPC_FLAG_REPAIR);
 808     if (!unit)
 809     {
 810         sLog.outDebug( "WORLD: HandleRepairItemOpcode - Unit (GUID: %u) not found or you can't interact with him.", uint32(GUID_LOPART(npcGUID)) );
 811         return;
 812     }
 813
 814     // remove fake death
 815     if(GetPlayer()->hasUnitState(UNIT_STAT_DIED))
 816         GetPlayer()->RemoveSpellsCausingAura(SPELL_AURA_FEIGN_DEATH);
 817
 818     // reputation discount
 819     float discountMod = _player->GetReputationPriceDiscount(unit);
 820
 821     uint32 TotalCost = 0;
 822     if (itemGUID)
 823     {
 824         sLog.outDebug("ITEM: Repair item, itemGUID = %u, npcGUID = %u", GUID_LOPART(itemGUID), GUID_LOPART(npcGUID));
 825
 826         Item* item = _player->GetItemByGuid(itemGUID);
 827
 828         if(item)
 829             TotalCost= _player->DurabilityRepair(item->GetPos(),true,discountMod,guildBank>0?true:false);
 830     }
 831     else
 832     {
 833         sLog.outDebug("ITEM: Repair all items, npcGUID = %u", GUID_LOPART(npcGUID));
 834
 835         TotalCost = _player->DurabilityRepairAll(true,discountMod,guildBank>0?true:false);
 836     }
 837     if (guildBank)
 838     {
 839         uint32 GuildId = _player->GetGuildId();
 840         if (!GuildId)
 841             return;
 842         Guild *pGuild = sObjectMgr.GetGuildById(GuildId);
 843         if (!pGuild)
 844             return;
 845         pGuild->LogBankEvent(GUILD_BANK_LOG_REPAIR_MONEY, 0, _player->GetGUIDLow(), TotalCost);
 846         pGuild->SendMoneyInfo(this, _player->GetGUIDLow());
 847     }
 848 }