root/trunk/src/game/Spell.cpp @ 110

Revision 110, 193.0 kB (checked in by yumileroy, 17 years ago)

[svn] Add SpellExtraInfoMap?. Currently support:
Limited-number-of-players spell; shared damage spell; target-in-line cone spell (e.g. dark glare).
Change angle of cone spells from 120 degree to 60 degree.

Original author: megamage
Date: 2008-10-25 15:46:52-05:00

Line 
1/*
2 * Copyright (C) 2005-2008 MaNGOS <http://www.mangosproject.org/>
3 *
4 * Copyright (C) 2008 Trinity <http://www.trinitycore.org/>
5 *
6 * This program is free software; you can redistribute it and/or modify
7 * it under the terms of the GNU General Public License as published by
8 * the Free Software Foundation; either version 2 of the License, or
9 * (at your option) any later version.
10 *
11 * This program is distributed in the hope that it will be useful,
12 * but WITHOUT ANY WARRANTY; without even the implied warranty of
13 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
14 * GNU General Public License for more details.
15 *
16 * You should have received a copy of the GNU General Public License
17 * along with this program; if not, write to the Free Software
18 * Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA
19 */
20
21#include "Common.h"
22#include "Database/DatabaseEnv.h"
23#include "WorldPacket.h"
24#include "WorldSession.h"
25#include "GridNotifiers.h"
26#include "GridNotifiersImpl.h"
27#include "Opcodes.h"
28#include "Log.h"
29#include "UpdateMask.h"
30#include "World.h"
31#include "ObjectMgr.h"
32#include "SpellMgr.h"
33#include "Player.h"
34#include "Pet.h"
35#include "Unit.h"
36#include "Spell.h"
37#include "DynamicObject.h"
38#include "SpellAuras.h"
39#include "Group.h"
40#include "UpdateData.h"
41#include "MapManager.h"
42#include "ObjectAccessor.h"
43#include "CellImpl.h"
44#include "Policies/SingletonImp.h"
45#include "SharedDefines.h"
46#include "Tools.h"
47#include "LootMgr.h"
48#include "VMapFactory.h"
49#include "BattleGround.h"
50#include "Util.h"
51
52#define SPELL_CHANNEL_UPDATE_INTERVAL 1000
53
54extern pEffect SpellEffects[TOTAL_SPELL_EFFECTS];
55
56bool IsQuestTameSpell(uint32 spellId)
57{
58    SpellEntry const *spellproto = sSpellStore.LookupEntry(spellId);
59    if (!spellproto) return false;
60
61    return spellproto->Effect[0] == SPELL_EFFECT_THREAT
62        && spellproto->Effect[1] == SPELL_EFFECT_APPLY_AURA && spellproto->EffectApplyAuraName[1] == SPELL_AURA_DUMMY;
63}
64
65SpellCastTargets::SpellCastTargets()
66{
67    m_unitTarget = NULL;
68    m_itemTarget = NULL;
69    m_GOTarget   = NULL;
70
71    m_unitTargetGUID   = 0;
72    m_GOTargetGUID     = 0;
73    m_CorpseTargetGUID = 0;
74    m_itemTargetGUID   = 0;
75    m_itemTargetEntry  = 0;
76
77    m_srcX = m_srcY = m_srcZ = m_destX = m_destY = m_destZ = 0;
78    m_strTarget = "";
79    m_targetMask = 0;
80}
81
82SpellCastTargets::~SpellCastTargets()
83{
84}
85
86void SpellCastTargets::setUnitTarget(Unit *target)
87{
88    if (!target)
89        return;
90
91    m_destX = target->GetPositionX();
92    m_destY = target->GetPositionY();
93    m_destZ = target->GetPositionZ();
94    m_unitTarget = target;
95    m_unitTargetGUID = target->GetGUID();
96    m_targetMask |= TARGET_FLAG_UNIT;
97}
98
99void SpellCastTargets::setDestination(float x, float y, float z)
100{
101    m_destX = x;
102    m_destY = y;
103    m_destZ = z;
104    m_targetMask |= TARGET_FLAG_DEST_LOCATION;
105}
106
107void SpellCastTargets::setGOTarget(GameObject *target)
108{
109    m_GOTarget = target;
110    m_GOTargetGUID = target->GetGUID();
111    //    m_targetMask |= TARGET_FLAG_OBJECT;
112}
113
114void SpellCastTargets::setItemTarget(Item* item)
115{
116    if(!item)
117        return;
118
119    m_itemTarget = item;
120    m_itemTargetGUID = item->GetGUID();
121    m_itemTargetEntry = item->GetEntry();
122    m_targetMask |= TARGET_FLAG_ITEM;
123}
124
125void SpellCastTargets::setCorpseTarget(Corpse* corpse)
126{
127    m_CorpseTargetGUID = corpse->GetGUID();
128}
129
130void SpellCastTargets::Update(Unit* caster)
131{
132    m_GOTarget   = m_GOTargetGUID ? ObjectAccessor::GetGameObject(*caster,m_GOTargetGUID) : NULL;
133    m_unitTarget = m_unitTargetGUID ?
134        ( m_unitTargetGUID==caster->GetGUID() ? caster : ObjectAccessor::GetUnit(*caster, m_unitTargetGUID) ) :
135    NULL;
136
137    m_itemTarget = NULL;
138    if(caster->GetTypeId()==TYPEID_PLAYER)
139    {
140        if(m_targetMask & TARGET_FLAG_ITEM)
141            m_itemTarget = ((Player*)caster)->GetItemByGuid(m_itemTargetGUID);
142        else
143        {
144            Player* pTrader = ((Player*)caster)->GetTrader();
145            if(pTrader && m_itemTargetGUID < TRADE_SLOT_COUNT)
146                m_itemTarget = pTrader->GetItemByPos(pTrader->GetItemPosByTradeSlot(m_itemTargetGUID));
147        }
148        if(m_itemTarget)
149            m_itemTargetEntry = m_itemTarget->GetEntry();
150    }
151}
152
153bool SpellCastTargets::read ( WorldPacket * data, Unit *caster )
154{
155    if(data->rpos()+4 > data->size())
156        return false;
157
158    *data >> m_targetMask;
159
160    if(m_targetMask == TARGET_FLAG_SELF)
161    {
162        m_destX = caster->GetPositionX();
163        m_destY = caster->GetPositionY();
164        m_destZ = caster->GetPositionZ();
165        m_unitTarget = caster;
166        m_unitTargetGUID = caster->GetGUID();
167        return true;
168    }
169    // TARGET_FLAG_UNK2 is used for non-combat pets, maybe other?
170    if( m_targetMask & (TARGET_FLAG_UNIT|TARGET_FLAG_UNK2) )
171        if(!readGUID(*data, m_unitTargetGUID))
172            return false;
173
174    if( m_targetMask & ( TARGET_FLAG_OBJECT | TARGET_FLAG_OBJECT_UNK ))
175        if(!readGUID(*data, m_GOTargetGUID))
176            return false;
177
178    if(( m_targetMask & ( TARGET_FLAG_ITEM | TARGET_FLAG_TRADE_ITEM )) && caster->GetTypeId() == TYPEID_PLAYER)
179        if(!readGUID(*data, m_itemTargetGUID))
180            return false;
181
182    if( m_targetMask & TARGET_FLAG_SOURCE_LOCATION )
183    {
184        if(data->rpos()+4+4+4 > data->size())
185            return false;
186
187        *data >> m_srcX >> m_srcY >> m_srcZ;
188        if(!Trinity::IsValidMapCoord(m_srcX, m_srcY, m_srcZ))
189            return false;
190    }
191
192    if( m_targetMask & TARGET_FLAG_DEST_LOCATION )
193    {
194        if(data->rpos()+4+4+4 > data->size())
195            return false;
196
197        *data >> m_destX >> m_destY >> m_destZ;
198        if(!Trinity::IsValidMapCoord(m_destX, m_destY, m_destZ))
199            return false;
200    }
201
202    if( m_targetMask & TARGET_FLAG_STRING )
203    {
204        if(data->rpos()+1 > data->size())
205            return false;
206
207        *data >> m_strTarget;
208    }
209
210    if( m_targetMask & (TARGET_FLAG_CORPSE | TARGET_FLAG_PVP_CORPSE ) )
211        if(!readGUID(*data, m_CorpseTargetGUID))
212            return false;
213
214    // find real units/GOs
215    Update(caster);
216    return true;
217}
218
219void SpellCastTargets::write ( WorldPacket * data )
220{
221    *data << uint32(m_targetMask);
222
223    if( m_targetMask & ( TARGET_FLAG_UNIT | TARGET_FLAG_PVP_CORPSE | TARGET_FLAG_OBJECT | TARGET_FLAG_CORPSE | TARGET_FLAG_UNK2 ) )
224    {
225        if(m_targetMask & TARGET_FLAG_UNIT)
226        {
227            if(m_unitTarget)
228                data->append(m_unitTarget->GetPackGUID());
229            else
230                *data << uint8(0);
231        }
232        else if( m_targetMask & ( TARGET_FLAG_OBJECT | TARGET_FLAG_OBJECT_UNK ) )
233        {
234            if(m_GOTarget)
235                data->append(m_GOTarget->GetPackGUID());
236            else
237                *data << uint8(0);
238        }
239        else if( m_targetMask & ( TARGET_FLAG_CORPSE | TARGET_FLAG_PVP_CORPSE ) )
240            data->appendPackGUID(m_CorpseTargetGUID);
241        else
242            *data << uint8(0);
243    }
244
245    if( m_targetMask & ( TARGET_FLAG_ITEM | TARGET_FLAG_TRADE_ITEM ) )
246    {
247        if(m_itemTarget)
248            data->append(m_itemTarget->GetPackGUID());
249        else
250            *data << uint8(0);
251    }
252
253    if( m_targetMask & TARGET_FLAG_SOURCE_LOCATION )
254        *data << m_srcX << m_srcY << m_srcZ;
255
256    if( m_targetMask & TARGET_FLAG_DEST_LOCATION )
257        *data << m_destX << m_destY << m_destZ;
258
259    if( m_targetMask & TARGET_FLAG_STRING )
260        *data << m_strTarget;
261}
262
263Spell::Spell( Unit* Caster, SpellEntry const *info, bool triggered, uint64 originalCasterGUID, Spell** triggeringContainer )
264{
265    ASSERT( Caster != NULL && info != NULL );
266    ASSERT( info == sSpellStore.LookupEntry( info->Id ) && "`info` must be pointer to sSpellStore element");
267
268    m_spellInfo = info;
269    m_caster = Caster;
270    m_selfContainer = NULL;
271    m_triggeringContainer = triggeringContainer;
272    m_magnetPair.first = false;
273    m_magnetPair.second = NULL;
274    m_deletable = true;
275    m_delayAtDamageCount = 0;
276
277    m_applyMultiplierMask = 0;
278
279    // Get data for type of attack
280    switch (m_spellInfo->DmgClass)
281    {
282        case SPELL_DAMAGE_CLASS_MELEE:
283            if (m_spellInfo->AttributesEx3 & SPELL_ATTR_EX3_REQ_OFFHAND)
284                m_attackType = OFF_ATTACK;
285            else
286                m_attackType = BASE_ATTACK;
287            break;
288        case SPELL_DAMAGE_CLASS_RANGED:
289            m_attackType = RANGED_ATTACK;
290            break;
291        default:
292                                                            // Wands
293            if (m_spellInfo->AttributesEx3 & SPELL_ATTR_EX3_REQ_WAND)
294                m_attackType = RANGED_ATTACK;
295            else
296                m_attackType = BASE_ATTACK;
297            break;
298    }
299
300    m_spellSchoolMask = GetSpellSchoolMask(info);           // Can be override for some spell (wand shoot for example)
301
302    if(m_attackType == RANGED_ATTACK)
303    {
304        // wand case
305        if((m_caster->getClassMask() & CLASSMASK_WAND_USERS) != 0 && m_caster->GetTypeId()==TYPEID_PLAYER)
306        {
307            if(Item* pItem = ((Player*)m_caster)->GetWeaponForAttack(RANGED_ATTACK))
308                m_spellSchoolMask = SpellSchoolMask(1 << pItem->GetProto()->Damage->DamageType);
309        }
310    }
311
312    if(originalCasterGUID)
313        m_originalCasterGUID = originalCasterGUID;
314    else
315        m_originalCasterGUID = m_caster->GetGUID();
316
317    if(m_originalCasterGUID==m_caster->GetGUID())
318        m_originalCaster = m_caster;
319    else
320    {
321        m_originalCaster = ObjectAccessor::GetUnit(*m_caster,m_originalCasterGUID);
322        if(m_originalCaster && !m_originalCaster->IsInWorld()) m_originalCaster = NULL;
323    }
324
325    for(int i=0; i <3; ++i)
326        m_currentBasePoints[i] = m_spellInfo->EffectBasePoints[i];
327
328    m_spellState = SPELL_STATE_NULL;
329
330    m_castPositionX = m_castPositionY = m_castPositionZ = 0;
331    m_TriggerSpells.clear();
332    m_IsTriggeredSpell = triggered;
333    //m_AreaAura = false;
334    m_CastItem = NULL;
335
336    unitTarget = NULL;
337    itemTarget = NULL;
338    gameObjTarget = NULL;
339    focusObject = NULL;
340    m_cast_count = 0;
341    m_triggeredByAuraSpell  = NULL;
342
343    //Auto Shot & Shoot
344    if( m_spellInfo->AttributesEx2 == 0x000020 && !triggered )
345        m_autoRepeat = true;
346    else
347        m_autoRepeat = false;
348
349    m_powerCost = 0;                                        // setup to correct value in Spell::prepare, don't must be used before.
350    m_casttime = 0;                                         // setup to correct value in Spell::prepare, don't must be used before.
351    m_timer = 0;                                            // will set to castime in preper
352
353    m_needAliveTargetMask = 0;
354
355    // determine reflection
356    m_canReflect = false;
357
358    if(m_spellInfo->DmgClass == SPELL_DAMAGE_CLASS_MAGIC && (m_spellInfo->AttributesEx2 & 0x4)==0)
359    {
360        for(int j=0;j<3;j++)
361        {
362            if (m_spellInfo->Effect[j]==0)
363                continue;
364
365            if(!IsPositiveTarget(m_spellInfo->EffectImplicitTargetA[j],m_spellInfo->EffectImplicitTargetB[j]))
366                m_canReflect = true;
367            else
368                m_canReflect = (m_spellInfo->AttributesEx & (1<<7)) ? true : false;
369
370            if(m_canReflect)
371                continue;
372            else
373                break;
374        }
375    }
376
377    CleanupTargetList();
378}
379
380Spell::~Spell()
381{
382}
383
384void Spell::FillTargetMap()
385{
386    // TODO: ADD the correct target FILLS!!!!!!
387
388    for(uint32 i=0;i<3;i++)
389    {
390        // not call for empty effect.
391        // Also some spells use not used effect targets for store targets for dummy effect in triggered spells
392        if(m_spellInfo->Effect[i]==0)
393            continue;
394
395        // TODO: find a way so this is not needed?
396        // for area auras always add caster as target (needed for totems for example)
397        if(IsAreaAuraEffect(m_spellInfo->Effect[i]))
398            AddUnitTarget(m_caster, i);
399
400        std::list<Unit*> tmpUnitMap;
401
402        // Note: this hack with search required until GO casting not implemented
403        // environment damage spells already have around enemies targeting but this not help in case not existed GO casting support
404        // currently each enemy selected explicitly and self cast damage
405        if(m_spellInfo->EffectImplicitTargetA[i] == TARGET_ALL_AROUND_CASTER
406            && m_spellInfo->EffectImplicitTargetB[i]==TARGET_ALL_ENEMY_IN_AREA
407            && m_spellInfo->Effect[i]==SPELL_EFFECT_ENVIRONMENTAL_DAMAGE)
408        {
409            tmpUnitMap.push_back(m_targets.getUnitTarget());
410        }
411        else
412        {
413            SetTargetMap(i,m_spellInfo->EffectImplicitTargetA[i],tmpUnitMap);
414            SetTargetMap(i,m_spellInfo->EffectImplicitTargetB[i],tmpUnitMap);
415        }
416
417        if(tmpUnitMap.empty())
418        {
419            if( m_spellInfo->EffectImplicitTargetA[i]==TARGET_SCRIPT ||
420                m_spellInfo->EffectImplicitTargetB[i]==TARGET_SCRIPT ||
421                m_spellInfo->EffectImplicitTargetA[i]==TARGET_SCRIPT_COORDINATES ||
422                m_spellInfo->EffectImplicitTargetB[i]==TARGET_SCRIPT_COORDINATES )
423            {
424                if(!(m_targets.m_targetMask & TARGET_FLAG_DEST_LOCATION))
425                    continue;
426            }
427            // add here custom effects that need default target.
428            // FOR EVERY TARGET TYPE THERE IS A DIFFERENT FILL!!
429            switch(m_spellInfo->Effect[i])
430            {
431                case SPELL_EFFECT_DUMMY:
432                {
433                    switch(m_spellInfo->Id)
434                    {
435                        case 20577:                         // Cannibalize
436                        {
437                            // non-standard target selection
438                            SpellRangeEntry const* srange = sSpellRangeStore.LookupEntry(m_spellInfo->rangeIndex);
439                            float max_range = GetSpellMaxRange(srange);
440
441                            CellPair p(Trinity::ComputeCellPair(m_caster->GetPositionX(), m_caster->GetPositionY()));
442                            Cell cell(p);
443                            cell.data.Part.reserved = ALL_DISTRICT;
444                            cell.SetNoCreate();
445
446                            WorldObject* result = NULL;
447
448                            Trinity::CannibalizeObjectCheck u_check(m_caster, max_range);
449                            Trinity::WorldObjectSearcher<Trinity::CannibalizeObjectCheck > searcher(result, u_check);
450
451                            TypeContainerVisitor<Trinity::WorldObjectSearcher<Trinity::CannibalizeObjectCheck >, GridTypeMapContainer > grid_searcher(searcher);
452                            CellLock<GridReadGuard> cell_lock(cell, p);
453                            cell_lock->Visit(cell_lock, grid_searcher, *MapManager::Instance().GetMap(m_caster->GetMapId(), m_caster));
454
455                            if(!result)
456                            {
457                                TypeContainerVisitor<Trinity::WorldObjectSearcher<Trinity::CannibalizeObjectCheck >, WorldTypeMapContainer > world_searcher(searcher);
458                                cell_lock->Visit(cell_lock, world_searcher, *MapManager::Instance().GetMap(m_caster->GetMapId(), m_caster));
459                            }
460
461                            if(result)
462                            {
463                                switch(result->GetTypeId())
464                                {
465                                    case TYPEID_UNIT:
466                                    case TYPEID_PLAYER:
467                                        tmpUnitMap.push_back((Unit*)result);
468                                        break;
469                                    case TYPEID_CORPSE:
470                                        m_targets.setCorpseTarget((Corpse*)result);
471                                        if(Player* owner = ObjectAccessor::FindPlayer(((Corpse*)result)->GetOwnerGUID()))
472                                            tmpUnitMap.push_back(owner);
473                                        break;
474                                }
475                            }
476                            else
477                            {
478                                // clear cooldown at fail
479                                if(m_caster->GetTypeId()==TYPEID_PLAYER)
480                                {
481                                    ((Player*)m_caster)->RemoveSpellCooldown(m_spellInfo->Id);
482
483                                    WorldPacket data(SMSG_CLEAR_COOLDOWN, (4+8));
484                                    data << uint32(m_spellInfo->Id);
485                                    data << uint64(m_caster->GetGUID());
486                                    ((Player*)m_caster)->GetSession()->SendPacket(&data);
487                                }
488
489                                SendCastResult(SPELL_FAILED_NO_EDIBLE_CORPSES);
490                                finish(false);
491                            }
492                            break;
493                        }
494                        default:
495                            if(m_targets.getUnitTarget())
496                                tmpUnitMap.push_back(m_targets.getUnitTarget());
497                            break;
498                    }
499                    break;
500                }
501                case SPELL_EFFECT_RESURRECT:
502                case SPELL_EFFECT_PARRY:
503                case SPELL_EFFECT_BLOCK:
504                case SPELL_EFFECT_CREATE_ITEM:
505                case SPELL_EFFECT_TRIGGER_SPELL:
506                case SPELL_EFFECT_TRIGGER_MISSILE:
507                case SPELL_EFFECT_LEARN_SPELL:
508                case SPELL_EFFECT_SKILL_STEP:
509                case SPELL_EFFECT_PROFICIENCY:
510                case SPELL_EFFECT_SUMMON_POSSESSED:
511                case SPELL_EFFECT_SUMMON_OBJECT_WILD:
512                case SPELL_EFFECT_SELF_RESURRECT:
513                case SPELL_EFFECT_REPUTATION:
514                    if(m_targets.getUnitTarget())
515                        tmpUnitMap.push_back(m_targets.getUnitTarget());
516                    break;
517                case SPELL_EFFECT_SUMMON_PLAYER:
518                    if(m_caster->GetTypeId()==TYPEID_PLAYER && ((Player*)m_caster)->GetSelection())
519                    {
520                        Player* target = objmgr.GetPlayer(((Player*)m_caster)->GetSelection());
521                        if(target)
522                            tmpUnitMap.push_back(target);
523                    }
524                    break;
525                case SPELL_EFFECT_RESURRECT_NEW:
526                    if(m_targets.getUnitTarget())
527                        tmpUnitMap.push_back(m_targets.getUnitTarget());
528                    if(m_targets.getCorpseTargetGUID())
529                    {
530                        Corpse *corpse = ObjectAccessor::GetCorpse(*m_caster,m_targets.getCorpseTargetGUID());
531                        if(corpse)
532                        {
533                            Player* owner = ObjectAccessor::FindPlayer(corpse->GetOwnerGUID());
534                            if(owner)
535                                tmpUnitMap.push_back(owner);
536                        }
537                    }
538                    break;
539                case SPELL_EFFECT_SUMMON:
540                    if(m_spellInfo->EffectMiscValueB[i] == SUMMON_TYPE_POSESSED || m_spellInfo->EffectMiscValueB[i] == SUMMON_TYPE_POSESSED2)
541                    {
542                        if(m_targets.getUnitTarget())
543                            tmpUnitMap.push_back(m_targets.getUnitTarget());
544                    }
545                    else
546                        tmpUnitMap.push_back(m_caster);
547                    break;
548                case SPELL_EFFECT_SUMMON_CHANGE_ITEM:
549                case SPELL_EFFECT_SUMMON_WILD:
550                case SPELL_EFFECT_SUMMON_GUARDIAN:
551                case SPELL_EFFECT_TRANS_DOOR:
552                case SPELL_EFFECT_ADD_FARSIGHT:
553                case SPELL_EFFECT_STUCK:
554                case SPELL_EFFECT_DESTROY_ALL_TOTEMS:
555                case SPELL_EFFECT_SUMMON_DEMON:
556                case SPELL_EFFECT_SKILL:
557                    tmpUnitMap.push_back(m_caster);
558                    break;
559                case SPELL_EFFECT_LEARN_PET_SPELL:
560                    if(Pet* pet = m_caster->GetPet())
561                        tmpUnitMap.push_back(pet);
562                    break;
563                case SPELL_EFFECT_ENCHANT_ITEM:
564                case SPELL_EFFECT_ENCHANT_ITEM_TEMPORARY:
565                case SPELL_EFFECT_DISENCHANT:
566                case SPELL_EFFECT_FEED_PET:
567                case SPELL_EFFECT_PROSPECTING:
568                    if(m_targets.getItemTarget())
569                        AddItemTarget(m_targets.getItemTarget(), i);
570                    break;
571                case SPELL_EFFECT_APPLY_AURA:
572                    switch(m_spellInfo->EffectApplyAuraName[i])
573                    {
574                        case SPELL_AURA_ADD_FLAT_MODIFIER:  // some spell mods auras have 0 target modes instead expected TARGET_SELF(1) (and present for other ranks for same spell for example)
575                        case SPELL_AURA_ADD_PCT_MODIFIER:
576                            tmpUnitMap.push_back(m_caster);
577                            break;
578                        default:                            // apply to target in other case
579                            if(m_targets.getUnitTarget())
580                                tmpUnitMap.push_back(m_targets.getUnitTarget());
581                            break;
582                    }
583                    break;
584                case SPELL_EFFECT_APPLY_AREA_AURA_PARTY:
585                                                            // AreaAura
586                    if(m_spellInfo->Attributes == 0x9050000 || m_spellInfo->Attributes == 0x10000)
587                        SetTargetMap(i,TARGET_AREAEFFECT_PARTY,tmpUnitMap);
588                    break;
589                case SPELL_EFFECT_SKIN_PLAYER_CORPSE:
590                    if(m_targets.getUnitTarget())
591                    {
592                        tmpUnitMap.push_back(m_targets.getUnitTarget());
593                    }
594                    else if (m_targets.getCorpseTargetGUID())
595                    {
596                        Corpse *corpse = ObjectAccessor::GetCorpse(*m_caster,m_targets.getCorpseTargetGUID());
597                        if(corpse)
598                        {
599                            Player* owner = ObjectAccessor::FindPlayer(corpse->GetOwnerGUID());
600                            if(owner)
601                                tmpUnitMap.push_back(owner);
602                        }
603                    }
604                    break;
605                default:
606                    break;
607            }
608        }
609        if(IsChanneledSpell(m_spellInfo) && !tmpUnitMap.empty())
610            m_needAliveTargetMask  |= (1<<i);
611
612        if(m_caster->GetTypeId() == TYPEID_PLAYER)
613        {
614            Player *me = (Player*)m_caster;
615            for (std::list<Unit*>::const_iterator itr = tmpUnitMap.begin(); itr != tmpUnitMap.end(); itr++)
616            {
617                Unit *owner = (*itr)->GetOwner();
618                Unit *u = owner ? owner : (*itr);
619                if(u!=m_caster && u->IsPvP() && (!me->duel || me->duel->opponent != u))
620                {
621                    me->UpdatePvP(true);
622                    me->RemoveAurasWithInterruptFlags(AURA_INTERRUPT_FLAG_ENTER_PVP_COMBAT);
623                    break;
624                }
625            }
626        }
627
628        for (std::list<Unit*>::iterator itr = tmpUnitMap.begin() ; itr != tmpUnitMap.end();)
629        {
630            if(!CheckTarget(*itr, i, false ))
631            {
632                itr = tmpUnitMap.erase(itr);
633                continue;
634            }
635            else
636                ++itr;
637        }
638
639        for(std::list<Unit*>::iterator iunit= tmpUnitMap.begin();iunit != tmpUnitMap.end();++iunit)
640            AddUnitTarget((*iunit), i);
641    }
642}
643
644void Spell::CleanupTargetList()
645{
646    m_UniqueTargetInfo.clear();
647    m_UniqueGOTargetInfo.clear();
648    m_UniqueItemInfo.clear();
649    m_countOfHit = 0;
650    m_countOfMiss = 0;
651    m_delayMoment = 0;
652}
653
654void Spell::AddUnitTarget(Unit* pVictim, uint32 effIndex)
655{
656    if( m_spellInfo->Effect[effIndex]==0 )
657        return;
658
659    uint64 targetGUID = pVictim->GetGUID();
660
661    // Lookup target in already in list
662    for(std::list<TargetInfo>::iterator ihit= m_UniqueTargetInfo.begin();ihit != m_UniqueTargetInfo.end();++ihit)
663    {
664        if (targetGUID == ihit->targetGUID)                 // Found in list
665        {
666            ihit->effectMask |= 1<<effIndex;                // Add only effect mask
667            return;
668        }
669    }
670
671    // This is new target calculate data for him
672
673    // Get spell hit result on target
674    TargetInfo target;
675    target.targetGUID = targetGUID;                         // Store target GUID
676    target.effectMask = 1<<effIndex;                        // Store index of effect
677    target.processed  = false;                              // Effects not apply on target
678
679    // Calculate hit result
680    target.missCondition = m_caster->SpellHitResult(pVictim, m_spellInfo, m_canReflect);
681    if (target.missCondition == SPELL_MISS_NONE)
682        ++m_countOfHit;
683    else
684        ++m_countOfMiss;
685
686    // Spell have speed - need calculate incoming time
687    if (m_spellInfo->speed > 0.0f)
688    {
689        // calculate spell incoming interval
690        float dist = m_caster->GetDistance(pVictim->GetPositionX(), pVictim->GetPositionY(), pVictim->GetPositionZ());
691        if (dist < 5.0f) dist = 5.0f;
692        target.timeDelay = (uint64) floor(dist / m_spellInfo->speed * 1000.0f);
693
694        // Calculate minimum incoming time
695        if (m_delayMoment==0 || m_delayMoment>target.timeDelay)
696            m_delayMoment = target.timeDelay;
697    }
698    else
699        target.timeDelay = 0LL;
700
701    // If target reflect spell back to caster
702    if (target.missCondition==SPELL_MISS_REFLECT)
703    {
704        // Calculate reflected spell result on caster
705        target.reflectResult =  m_caster->SpellHitResult(m_caster, m_spellInfo, m_canReflect);
706
707        if (target.reflectResult == SPELL_MISS_REFLECT)     // Impossible reflect again, so simply deflect spell
708            target.reflectResult = SPELL_MISS_PARRY;
709
710        // Increase time interval for reflected spells by 1.5
711        target.timeDelay+=target.timeDelay>>1;
712    }
713    else
714        target.reflectResult = SPELL_MISS_NONE;
715
716    // Add target to list
717    m_UniqueTargetInfo.push_back(target);
718}
719
720void Spell::AddUnitTarget(uint64 unitGUID, uint32 effIndex)
721{
722    Unit* unit = m_caster->GetGUID()==unitGUID ? m_caster : ObjectAccessor::GetUnit(*m_caster, unitGUID);
723    if (unit)
724        AddUnitTarget(unit, effIndex);
725}
726
727void Spell::AddGOTarget(GameObject* pVictim, uint32 effIndex)
728{
729    if( m_spellInfo->Effect[effIndex]==0 )
730        return;
731
732    uint64 targetGUID = pVictim->GetGUID();
733
734    // Lookup target in already in list
735    for(std::list<GOTargetInfo>::iterator ihit= m_UniqueGOTargetInfo.begin();ihit != m_UniqueGOTargetInfo.end();++ihit)
736    {
737        if (targetGUID == ihit->targetGUID)                 // Found in list
738        {
739            ihit->effectMask |= 1<<effIndex;                // Add only effect mask
740            return;
741        }
742    }
743
744    // This is new target calculate data for him
745
746    GOTargetInfo target;
747    target.targetGUID = targetGUID;
748    target.effectMask = 1<<effIndex;
749    target.processed  = false;                              // Effects not apply on target
750
751    // Spell have speed - need calculate incoming time
752    if (m_spellInfo->speed > 0.0f)
753    {
754        // calculate spell incoming interval
755        float dist = m_caster->GetDistance(pVictim->GetPositionX(), pVictim->GetPositionY(), pVictim->GetPositionZ());
756        if (dist < 5.0f) dist = 5.0f;
757        target.timeDelay = (uint64) floor(dist / m_spellInfo->speed * 1000.0f);
758        if (m_delayMoment==0 || m_delayMoment>target.timeDelay)
759            m_delayMoment = target.timeDelay;
760    }
761    else
762        target.timeDelay = 0LL;
763
764    ++m_countOfHit;
765
766    // Add target to list
767    m_UniqueGOTargetInfo.push_back(target);
768}
769
770void Spell::AddGOTarget(uint64 goGUID, uint32 effIndex)
771{
772    GameObject* go = ObjectAccessor::GetGameObject(*m_caster, goGUID);
773    if (go)
774        AddGOTarget(go, effIndex);
775}
776
777void Spell::AddItemTarget(Item* pitem, uint32 effIndex)
778{
779    if( m_spellInfo->Effect[effIndex]==0 )
780        return;
781
782    // Lookup target in already in list
783    for(std::list<ItemTargetInfo>::iterator ihit= m_UniqueItemInfo.begin();ihit != m_UniqueItemInfo.end();++ihit)
784    {
785        if (pitem == ihit->item)                            // Found in list
786        {
787            ihit->effectMask |= 1<<effIndex;                // Add only effect mask
788            return;
789        }
790    }
791
792    // This is new target add data
793
794    ItemTargetInfo target;
795    target.item       = pitem;
796    target.effectMask = 1<<effIndex;
797    m_UniqueItemInfo.push_back(target);
798}
799
800void Spell::doTriggers(SpellMissInfo missInfo, uint32 damage, SpellSchoolMask damageSchoolMask, uint32 block, uint32 absorb, bool crit)
801{
802    // Do triggers depends from hit result (triggers on hit do in effects)
803    // Set aura states depends from hit result
804    if (missInfo!=SPELL_MISS_NONE)
805    {
806        // Miss/dodge/parry/block only for melee based spells
807        // Resist only for magic based spells
808        switch (missInfo)
809        {
810            case SPELL_MISS_MISS:
811                if(m_caster->GetTypeId()== TYPEID_PLAYER)
812                    ((Player*)m_caster)->UpdateWeaponSkill(BASE_ATTACK);
813
814                m_caster->CastMeleeProcDamageAndSpell(unitTarget, 0, damageSchoolMask, m_attackType, MELEE_HIT_MISS, m_spellInfo, m_IsTriggeredSpell);
815                break;
816            case SPELL_MISS_RESIST:
817                m_caster->ProcDamageAndSpell(unitTarget, PROC_FLAG_TARGET_RESISTS, PROC_FLAG_RESIST_SPELL, 0, damageSchoolMask, m_spellInfo, m_IsTriggeredSpell);
818                break;
819            case SPELL_MISS_DODGE:
820                if(unitTarget->GetTypeId() == TYPEID_PLAYER)
821                    ((Player*)unitTarget)->UpdateDefense();
822
823                // Overpower
824                if (m_caster->GetTypeId() == TYPEID_PLAYER && m_caster->getClass() == CLASS_WARRIOR)
825                {
826                    ((Player*) m_caster)->AddComboPoints(unitTarget, 1);
827                    m_caster->StartReactiveTimer( REACTIVE_OVERPOWER );
828                }
829
830                // Riposte
831                if (unitTarget->getClass() != CLASS_ROGUE)
832                {
833                    unitTarget->ModifyAuraState(AURA_STATE_DEFENSE, true);
834                    unitTarget->StartReactiveTimer( REACTIVE_DEFENSE );
835                }
836
837                m_caster->CastMeleeProcDamageAndSpell(unitTarget, 0, damageSchoolMask, m_attackType, MELEE_HIT_DODGE, m_spellInfo, m_IsTriggeredSpell);
838                break;
839            case SPELL_MISS_PARRY:
840                // Update victim defense ?
841                if(unitTarget->GetTypeId() == TYPEID_PLAYER)
842                    ((Player*)unitTarget)->UpdateDefense();
843                // Mongoose bite - set only Counterattack here
844                if (unitTarget->getClass() == CLASS_HUNTER)
845                {
846                    unitTarget->ModifyAuraState(AURA_STATE_HUNTER_PARRY,true);
847                    unitTarget->StartReactiveTimer( REACTIVE_HUNTER_PARRY );
848                }
849                else
850                {
851                    unitTarget->ModifyAuraState(AURA_STATE_DEFENSE, true);
852                    unitTarget->StartReactiveTimer( REACTIVE_DEFENSE );
853                }
854                m_caster->CastMeleeProcDamageAndSpell(unitTarget, 0, damageSchoolMask, m_attackType, MELEE_HIT_PARRY, m_spellInfo, m_IsTriggeredSpell);
855                break;
856            case SPELL_MISS_BLOCK:
857                unitTarget->ModifyAuraState(AURA_STATE_DEFENSE, true);
858                unitTarget->StartReactiveTimer( REACTIVE_DEFENSE );
859
860                m_caster->CastMeleeProcDamageAndSpell(unitTarget, 0, damageSchoolMask, m_attackType, MELEE_HIT_BLOCK, m_spellInfo, m_IsTriggeredSpell);
861                break;
862                // Trigger from this events not supported
863            case SPELL_MISS_EVADE:
864            case SPELL_MISS_IMMUNE:
865            case SPELL_MISS_IMMUNE2:
866            case SPELL_MISS_DEFLECT:
867            case SPELL_MISS_ABSORB:
868                // Trigger from reflects need do after get reflect result
869            case SPELL_MISS_REFLECT:
870                break;
871            default:
872                break;
873        }
874    }
875}
876
877void Spell::DoAllEffectOnTarget(TargetInfo *target)
878{
879    if (target->processed)                                  // Check target
880        return;
881    target->processed = true;                               // Target checked in apply effects procedure
882
883    // Get mask of effects for target
884    uint32 mask = target->effectMask;
885    if (mask == 0)                                          // No effects
886        return;
887
888    Unit* unit = m_caster->GetGUID()==target->targetGUID ? m_caster : ObjectAccessor::GetUnit(*m_caster,target->targetGUID);
889    if (!unit)
890        return;
891
892    SpellMissInfo missInfo = target->missCondition;
893    // Need init unitTarget by default unit (can changed in code on reflect)
894    // Or on missInfo!=SPELL_MISS_NONE unitTarget undefined (but need in trigger subsystem)
895    unitTarget = unit;
896
897    if (missInfo==SPELL_MISS_NONE)                          // In case spell hit target, do all effect on that target
898        DoSpellHitOnUnit(unit, mask);
899    else if (missInfo == SPELL_MISS_REFLECT)                // In case spell reflect from target, do all effect on caster (if hit)
900    {
901        if (target->reflectResult == SPELL_MISS_NONE)       // If reflected spell hit caster -> do all effect on him
902            DoSpellHitOnUnit(m_caster, mask);
903    }
904
905    // Do triggers only on miss/resist/parry/dodge
906    if (missInfo!=SPELL_MISS_NONE)
907        doTriggers(missInfo);
908
909    // Call scripted function for AI if this spell is casted upon a creature (except pets)
910    if(IS_CREATURE_GUID(target->targetGUID))
911    {
912        // cast at creature (or GO) quest objectives update at successful cast finished (+channel finished)
913        // ignore autorepeat/melee casts for speed (not exist quest for spells (hm... )
914        if( m_caster->GetTypeId() == TYPEID_PLAYER && !IsAutoRepeat() && !IsNextMeleeSwingSpell() && !IsChannelActive() )
915            ((Player*)m_caster)->CastedCreatureOrGO(unit->GetEntry(),unit->GetGUID(),m_spellInfo->Id);
916
917        if(((Creature*)unit)->AI())
918            ((Creature*)unit)->AI()->SpellHit(m_caster ,m_spellInfo);
919    }
920
921    if(m_caster->GetTypeId() == TYPEID_UNIT && ((Creature*)m_caster)->AI())
922        ((Creature*)m_caster)->AI()->SpellHitTarget(unit, m_spellInfo);
923}
924
925void Spell::DoSpellHitOnUnit(Unit *unit, const uint32 effectMask)
926{
927    if(!unit || !effectMask)
928        return;
929
930    // remove spell_magnet aura after first spell redirect and destroy target if its totem
931    if(m_magnetPair.first && m_magnetPair.second && m_magnetPair.second == unit)
932    {
933        if(unit->GetTypeId() == TYPEID_UNIT && ((Creature*)unit)->isTotem())
934            unit->DealDamage(unit,unit->GetHealth(), NULL, DIRECT_DAMAGE, SPELL_SCHOOL_MASK_NORMAL, NULL, false);
935        return;
936    }
937
938    // Recheck immune (only for delayed spells)
939    if( m_spellInfo->speed && (
940        unit->IsImmunedToDamage(GetSpellSchoolMask(m_spellInfo),true) ||
941        unit->IsImmunedToSpell(m_spellInfo,true) ))
942    {
943        m_caster->SendSpellMiss(unit, m_spellInfo->Id, SPELL_MISS_IMMUNE);
944        return;
945    }
946
947    if( m_caster != unit )
948    {
949        if( !m_caster->IsFriendlyTo(unit) )
950        {
951            // for delayed spells ignore not visible explicit target
952            if(m_spellInfo->speed > 0.0f && unit==m_targets.getUnitTarget() && !unit->isVisibleForOrDetect(m_caster,false))
953            {
954                m_caster->SendSpellMiss(unit, m_spellInfo->Id, SPELL_MISS_EVADE);
955                return;
956            }
957
958            // exclude Arcane Missiles Dummy Aura aura for now (attack on hit)
959            // TODO: find way to not need this?
960            if(!(m_spellInfo->SpellFamilyName == SPELLFAMILY_MAGE &&
961                m_spellInfo->SpellFamilyFlags & 0x800LL))
962            {
963                unit->RemoveSpellsCausingAura(SPELL_AURA_MOD_STEALTH);
964
965                if( !(m_spellInfo->AttributesEx3 & SPELL_ATTR_EX3_NO_INITIAL_AGGRO) )
966                {
967                    if(!unit->IsStandState() && !unit->hasUnitState(UNIT_STAT_STUNNED))
968                        unit->SetStandState(PLAYER_STATE_NONE);
969
970                    if(!unit->isInCombat() && unit->GetTypeId() != TYPEID_PLAYER && ((Creature*)unit)->AI())
971                        ((Creature*)unit)->AI()->AttackStart(m_caster);
972
973                    unit->SetInCombatWith(m_caster);
974                    m_caster->SetInCombatWith(unit);
975
976                    if(Player *attackedPlayer = unit->GetCharmerOrOwnerPlayerOrPlayerItself())
977                    {
978                        m_caster->SetContestedPvP(attackedPlayer);
979                    }
980                    unit->AddThreat(m_caster, 0.0f);
981                }
982            }
983        }
984        else
985        {
986            // for delayed spells ignore negative spells (after duel end) for friendly targets
987            if(m_spellInfo->speed > 0.0f && !IsPositiveSpell(m_spellInfo->Id))
988            {
989                m_caster->SendSpellMiss(unit, m_spellInfo->Id, SPELL_MISS_EVADE);
990                return;
991            }
992
993            // assisting case, healing and resurrection
994            if(unit->hasUnitState(UNIT_STAT_ATTACK_PLAYER))
995                m_caster->SetContestedPvP();
996            if( unit->isInCombat() && !(m_spellInfo->AttributesEx3 & SPELL_ATTR_EX3_NO_INITIAL_AGGRO) )
997            {
998                m_caster->SetInCombatState(unit->GetCombatTimer() > 0);
999                unit->getHostilRefManager().threatAssist(m_caster, 0.0f);
1000            }
1001        }
1002    }
1003
1004    // Get Data Needed for Diminishing Returns, some effects may have multiple auras, so this must be done on spell hit, not aura add
1005    m_diminishGroup = GetDiminishingReturnsGroupForSpell(m_spellInfo,m_triggeredByAuraSpell);
1006    m_diminishLevel = unit->GetDiminishing(m_diminishGroup);
1007    // Increase Diminishing on unit, current informations for actually casts will use values above
1008    if((GetDiminishingReturnsGroupType(m_diminishGroup) == DRTYPE_PLAYER && unit->GetTypeId() == TYPEID_PLAYER) || GetDiminishingReturnsGroupType(m_diminishGroup) == DRTYPE_ALL)
1009        unit->IncrDiminishing(m_diminishGroup);
1010
1011    for(uint32 effectNumber=0;effectNumber<3;effectNumber++)
1012    {
1013        if (effectMask & (1<<effectNumber))
1014        {
1015            HandleEffects(unit,NULL,NULL,effectNumber,m_damageMultipliers[effectNumber]);
1016            if ( m_applyMultiplierMask & (1 << effectNumber) )
1017            {
1018                // Get multiplier
1019                float multiplier = m_spellInfo->DmgMultiplier[effectNumber];
1020                // Apply multiplier mods
1021                if(Player* modOwner = m_originalCaster->GetSpellModOwner())
1022                    modOwner->ApplySpellMod(m_spellInfo->Id, SPELLMOD_EFFECT_PAST_FIRST, multiplier,this);
1023                m_damageMultipliers[effectNumber] *= multiplier;
1024            }
1025        }
1026    }
1027}
1028
1029void Spell::DoAllEffectOnTarget(GOTargetInfo *target)
1030{
1031    if (target->processed)                                  // Check target
1032        return;
1033    target->processed = true;                               // Target checked in apply effects procedure
1034
1035    uint32 effectMask = target->effectMask;
1036    if(!effectMask)
1037        return;
1038
1039    GameObject* go = ObjectAccessor::GetGameObject(*m_caster, target->targetGUID);
1040    if(!go)
1041        return;
1042
1043    for(uint32 effectNumber=0;effectNumber<3;effectNumber++)
1044        if (effectMask & (1<<effectNumber))
1045            HandleEffects(NULL,NULL,go,effectNumber);
1046
1047    // cast at creature (or GO) quest objectives update at successful cast finished (+channel finished)
1048    // ignore autorepeat/melee casts for speed (not exist quest for spells (hm... )
1049    if( m_caster->GetTypeId() == TYPEID_PLAYER && !IsAutoRepeat() && !IsNextMeleeSwingSpell() && !IsChannelActive() )
1050        ((Player*)m_caster)->CastedCreatureOrGO(go->GetEntry(),go->GetGUID(),m_spellInfo->Id);
1051}
1052
1053void Spell::DoAllEffectOnTarget(ItemTargetInfo *target)
1054{
1055    uint32 effectMask = target->effectMask;
1056    if(!target->item || !effectMask)
1057        return;
1058
1059    for(uint32 effectNumber=0;effectNumber<3;effectNumber++)
1060        if (effectMask & (1<<effectNumber))
1061            HandleEffects(NULL, target->item, NULL, effectNumber);
1062}
1063
1064bool Spell::IsAliveUnitPresentInTargetList()
1065{
1066    // Not need check return true
1067    if (m_needAliveTargetMask == 0)
1068        return true;
1069
1070    uint8 needAliveTargetMask = m_needAliveTargetMask;
1071
1072    for(std::list<TargetInfo>::iterator ihit= m_UniqueTargetInfo.begin();ihit != m_UniqueTargetInfo.end();++ihit)
1073    {
1074        if( ihit->missCondition == SPELL_MISS_NONE && (needAliveTargetMask & ihit->effectMask) )
1075        {
1076            Unit *unit = m_caster->GetGUID()==ihit->targetGUID ? m_caster : ObjectAccessor::GetUnit(*m_caster, ihit->targetGUID);
1077
1078            if (unit && unit->isAlive())
1079                needAliveTargetMask &= ~ihit->effectMask;   // remove from need alive mask effect that have alive target
1080        }
1081    }
1082
1083    // is all effects from m_needAliveTargetMask have alive targets
1084    return needAliveTargetMask==0;
1085}
1086
1087// Helper for Chain Healing
1088// Spell target first
1089// Raidmates then descending by injury suffered (MaxHealth - Health)
1090// Other players/mobs then descending by injury suffered (MaxHealth - Health)
1091struct ChainHealingOrder : public std::binary_function<const Unit*, const Unit*, bool>
1092{
1093    const Unit* MainTarget;
1094    ChainHealingOrder(Unit const* Target) : MainTarget(Target) {};
1095    // functor for operator ">"
1096    bool operator()(Unit const* _Left, Unit const* _Right) const
1097    {
1098        return (ChainHealingHash(_Left) < ChainHealingHash(_Right));
1099    }
1100    int32 ChainHealingHash(Unit const* Target) const
1101    {
1102        if (Target == MainTarget)
1103            return 0;
1104        else if (Target->GetTypeId() == TYPEID_PLAYER && MainTarget->GetTypeId() == TYPEID_PLAYER &&
1105            ((Player const*)Target)->IsInSameRaidWith((Player const*)MainTarget))
1106        {
1107            if (Target->GetHealth() == Target->GetMaxHealth())
1108                return 40000;
1109            else
1110                return 20000 - Target->GetMaxHealth() + Target->GetHealth();
1111        }
1112        else
1113            return 40000 - Target->GetMaxHealth() + Target->GetHealth();
1114    }
1115};
1116
1117class ChainHealingFullHealth: std::unary_function<const Unit*, bool>
1118{
1119    public:
1120        const Unit* MainTarget;
1121        ChainHealingFullHealth(const Unit* Target) : MainTarget(Target) {};
1122
1123        bool operator()(const Unit* Target)
1124        {
1125            return (Target != MainTarget && Target->GetHealth() == Target->GetMaxHealth());
1126        }
1127};
1128
1129// Helper for targets nearest to the spell target
1130// The spell target is always first unless there is a target at _completely_ the same position (unbelievable case)
1131struct TargetDistanceOrder : public std::binary_function<const Unit, const Unit, bool>
1132{
1133    const Unit* MainTarget;
1134    TargetDistanceOrder(const Unit* Target) : MainTarget(Target) {};
1135    // functor for operator ">"
1136    bool operator()(const Unit* _Left, const Unit* _Right) const
1137    {
1138        return (MainTarget->GetDistance(_Left) < MainTarget->GetDistance(_Right));
1139    }
1140};
1141
1142void Spell::SearchChainTarget(std::list<Unit*> &TagUnitMap, Unit* pUnitTarget, float max_range, uint32 unMaxTargets)
1143{
1144    if(!pUnitTarget)
1145        return;
1146
1147    //FIXME: This very like horrible hack and wrong for most spells
1148    if(m_spellInfo->DmgClass != SPELL_DAMAGE_CLASS_MELEE)
1149        max_range += unMaxTargets * CHAIN_SPELL_JUMP_RADIUS;
1150
1151    CellPair p(Trinity::ComputeCellPair(m_caster->GetPositionX(), m_caster->GetPositionY()));
1152    Cell cell(p);
1153    cell.data.Part.reserved = ALL_DISTRICT;
1154    cell.SetNoCreate();
1155
1156    std::list<Unit *> tempUnitMap;
1157
1158    {
1159        Trinity::AnyAoETargetUnitInObjectRangeCheck u_check(pUnitTarget, m_caster, max_range);
1160        Trinity::UnitListSearcher<Trinity::AnyAoETargetUnitInObjectRangeCheck> searcher(tempUnitMap, u_check);
1161
1162        TypeContainerVisitor<Trinity::UnitListSearcher<Trinity::AnyAoETargetUnitInObjectRangeCheck>, WorldTypeMapContainer > world_unit_searcher(searcher);
1163        TypeContainerVisitor<Trinity::UnitListSearcher<Trinity::AnyAoETargetUnitInObjectRangeCheck>, GridTypeMapContainer >  grid_unit_searcher(searcher);
1164
1165        CellLock<GridReadGuard> cell_lock(cell, p);
1166        cell_lock->Visit(cell_lock, world_unit_searcher, *MapManager::Instance().GetMap(m_caster->GetMapId(), m_caster));
1167        cell_lock->Visit(cell_lock, grid_unit_searcher, *MapManager::Instance().GetMap(m_caster->GetMapId(), m_caster));
1168    }
1169
1170    tempUnitMap.sort(TargetDistanceOrder(pUnitTarget));
1171
1172    if(tempUnitMap.empty())
1173        return;
1174
1175    uint32 t = unMaxTargets;
1176    if(pUnitTarget != m_caster)
1177    {
1178        if(*tempUnitMap.begin() == pUnitTarget)
1179            tempUnitMap.erase(tempUnitMap.begin());
1180        TagUnitMap.push_back(pUnitTarget);
1181        --t;
1182    }
1183    Unit *prev = pUnitTarget;
1184
1185    std::list<Unit*>::iterator next = tempUnitMap.begin();
1186
1187    while(t && next != tempUnitMap.end())
1188    {
1189        if(prev->GetDistance(*next) > CHAIN_SPELL_JUMP_RADIUS)
1190            break;
1191
1192        if(!prev->IsWithinLOSInMap(*next)
1193            || m_spellInfo->DmgClass==SPELL_DAMAGE_CLASS_MELEE && !m_caster->isInFront(*next, max_range))
1194        {
1195            ++next;
1196            continue;
1197        }
1198
1199        prev = *next;
1200        TagUnitMap.push_back(prev);
1201        tempUnitMap.erase(next);
1202        tempUnitMap.sort(TargetDistanceOrder(prev));
1203        next = tempUnitMap.begin();
1204        --t;
1205    }
1206}
1207
1208void Spell::SearchAreaTarget(std::list<Unit*> &TagUnitMap, float radius, const uint32 &type, SpellTargets TargetType, uint32 entry)
1209{
1210    if(type == PUSH_DEST_CENTER && !m_targets.m_destX && !m_targets.m_destY && !m_targets.m_destZ)
1211    {
1212        sLog.outError( "SPELL: cannot find destination for spell ID %u\n", m_spellInfo->Id );
1213        return;
1214    }
1215
1216    CellPair p(Trinity::ComputeCellPair(m_targets.m_destX, m_targets.m_destY));
1217    Cell cell(p);
1218    cell.data.Part.reserved = ALL_DISTRICT;
1219    cell.SetNoCreate();
1220    CellLock<GridReadGuard> cell_lock(cell, p);
1221
1222    Trinity::SpellNotifierCreatureAndPlayer notifier(*this, TagUnitMap, radius, type, TargetType, entry);
1223   
1224    if(TargetType != SPELL_TARGETS_ENTRY)
1225    {
1226        TypeContainerVisitor<Trinity::SpellNotifierCreatureAndPlayer, WorldTypeMapContainer > world_object_notifier(notifier);
1227        cell_lock->Visit(cell_lock, world_object_notifier, *MapManager::Instance().GetMap(m_caster->GetMapId(), m_caster));
1228    }
1229    if(!spellmgr.GetSpellExtraInfo(m_spellInfo->Id, SPELL_EXTRA_INFO_MAX_TARGETS))
1230    {
1231        TypeContainerVisitor<Trinity::SpellNotifierCreatureAndPlayer, GridTypeMapContainer >  grid_object_notifier(notifier);
1232        cell_lock->Visit(cell_lock, grid_object_notifier, *MapManager::Instance().GetMap(m_caster->GetMapId(), m_caster));
1233    }
1234}
1235
1236Unit* Spell::SearchNearbyTarget(float radius, SpellTargets TargetType, uint32 entry)
1237{
1238    CellPair p(Trinity::ComputeCellPair(m_caster->GetPositionX(), m_caster->GetPositionY()));
1239    Cell cell(p);
1240    cell.data.Part.reserved = ALL_DISTRICT;
1241    cell.SetNoCreate();
1242    CellLock<GridReadGuard> cell_lock(cell, p);
1243
1244    Unit* target = NULL;
1245    switch(TargetType)
1246    {
1247        case SPELL_TARGETS_ENTRY:
1248        {
1249            Creature* target = NULL;
1250            Trinity::NearestCreatureEntryWithLiveStateInObjectRangeCheck u_check(*m_caster, entry, true, radius);
1251            Trinity::CreatureLastSearcher<Trinity::NearestCreatureEntryWithLiveStateInObjectRangeCheck> searcher(target, u_check);
1252            TypeContainerVisitor<Trinity::CreatureLastSearcher<Trinity::NearestCreatureEntryWithLiveStateInObjectRangeCheck>, GridTypeMapContainer >  grid_unit_searcher(searcher);
1253            cell_lock->Visit(cell_lock, grid_unit_searcher, *MapManager::Instance().GetMap(m_caster->GetMapId(), m_caster));
1254            return target;
1255        }break;
1256        default:
1257        case SPELL_TARGETS_AOE_DAMAGE:
1258        {
1259            Trinity::AnyUnfriendlyUnitInObjectRangeCheck u_check(m_caster, m_caster, radius);
1260            Trinity::UnitLastSearcher<Trinity::AnyUnfriendlyUnitInObjectRangeCheck> searcher(target, u_check);
1261            TypeContainerVisitor<Trinity::UnitLastSearcher<Trinity::AnyUnfriendlyUnitInObjectRangeCheck>, WorldTypeMapContainer > world_unit_searcher(searcher);
1262            TypeContainerVisitor<Trinity::UnitLastSearcher<Trinity::AnyUnfriendlyUnitInObjectRangeCheck>, GridTypeMapContainer >  grid_unit_searcher(searcher);
1263            cell_lock->Visit(cell_lock, world_unit_searcher, *MapManager::Instance().GetMap(m_caster->GetMapId(), m_caster));
1264            cell_lock->Visit(cell_lock, grid_unit_searcher, *MapManager::Instance().GetMap(m_caster->GetMapId(), m_caster));
1265        }break;
1266        case SPELL_TARGETS_FRIENDLY:
1267        {
1268            Trinity::AnyFriendlyUnitInObjectRangeCheck u_check(m_caster, m_caster, radius);
1269            Trinity::UnitLastSearcher<Trinity::AnyFriendlyUnitInObjectRangeCheck> searcher(target, u_check);
1270            TypeContainerVisitor<Trinity::UnitLastSearcher<Trinity::AnyFriendlyUnitInObjectRangeCheck>, WorldTypeMapContainer > world_unit_searcher(searcher);
1271            TypeContainerVisitor<Trinity::UnitLastSearcher<Trinity::AnyFriendlyUnitInObjectRangeCheck>, GridTypeMapContainer >  grid_unit_searcher(searcher);
1272            cell_lock->Visit(cell_lock, world_unit_searcher, *MapManager::Instance().GetMap(m_caster->GetMapId(), m_caster));
1273            cell_lock->Visit(cell_lock, grid_unit_searcher, *MapManager::Instance().GetMap(m_caster->GetMapId(), m_caster));
1274        }break;
1275    }
1276    return target;
1277}
1278
1279void Spell::SetTargetMap(uint32 i,uint32 cur,std::list<Unit*> &TagUnitMap)
1280{
1281    float radius;
1282    if (m_spellInfo->EffectRadiusIndex[i])
1283        radius = GetSpellRadius(sSpellRadiusStore.LookupEntry(m_spellInfo->EffectRadiusIndex[i]));
1284    else
1285        radius = GetSpellMaxRange(sSpellRangeStore.LookupEntry(m_spellInfo->rangeIndex));
1286
1287    if(m_originalCaster)
1288        if(Player* modOwner = m_originalCaster->GetSpellModOwner())
1289            modOwner->ApplySpellMod(m_spellInfo->Id, SPELLMOD_RADIUS, radius,this);
1290
1291    uint32 EffectChainTarget = m_spellInfo->EffectChainTarget[i];
1292    if(m_originalCaster)
1293        if(Player* modOwner = m_originalCaster->GetSpellModOwner())
1294            modOwner->ApplySpellMod(m_spellInfo->Id, SPELLMOD_JUMP_TARGETS, EffectChainTarget, this);
1295
1296    uint32 unMaxTargets = m_spellInfo->MaxAffectedTargets;
1297    switch(cur)
1298    {
1299        // specific unit
1300        case TARGET_SELF:
1301        case TARGET_SELF_FISHING:
1302        {
1303            TagUnitMap.push_back(m_caster);
1304        }break;
1305        case TARGET_MASTER:
1306        {
1307            if(Unit* owner = m_caster->GetCharmerOrOwner())
1308                TagUnitMap.push_back(owner);
1309        }break;
1310        case TARGET_PET:
1311        {
1312            if(Pet* tmpUnit = m_caster->GetPet())
1313                TagUnitMap.push_back(tmpUnit);
1314        }break;
1315        case TARGET_NONCOMBAT_PET:
1316        {
1317            if(Unit* target = m_targets.getUnitTarget())
1318                if( target->GetTypeId() == TYPEID_UNIT && ((Creature*)target)->isPet() && ((Pet*)target)->getPetType() == MINI_PET)
1319                    TagUnitMap.push_back(target);
1320        }break;
1321        case TARGET_SINGLE_FRIEND: // ally
1322        case TARGET_SINGLE_FRIEND_2: // raid member
1323        case TARGET_DUELVSPLAYER: // all (SelectMagnetTarget()?)
1324        case TARGET_UNIT_SINGLE_UNKNOWN:
1325        {
1326            if(m_targets.getUnitTarget())
1327                TagUnitMap.push_back(m_targets.getUnitTarget());
1328        }break;
1329        case TARGET_CHAIN_DAMAGE:
1330        {
1331            if(Unit* pUnitTarget = SelectMagnetTarget())
1332            {
1333                if(EffectChainTarget <= 1)
1334                    TagUnitMap.push_back(pUnitTarget);
1335                else //TODO: chain target should also use magnet target
1336                    SearchChainTarget(TagUnitMap, pUnitTarget, radius, EffectChainTarget);
1337            }
1338        }break;
1339        case TARGET_GAMEOBJECT:
1340        {
1341            if(m_targets.getGOTarget())
1342                AddGOTarget(m_targets.getGOTarget(), i);
1343        }break;
1344        case TARGET_GAMEOBJECT_ITEM:
1345        {
1346            if(m_targets.getGOTargetGUID())
1347                AddGOTarget(m_targets.getGOTarget(), i);
1348            else if(m_targets.getItemTarget())
1349                AddItemTarget(m_targets.getItemTarget(), i);
1350        }break;
1351
1352        // reference dest
1353        case TARGET_EFFECT_SELECT:
1354            m_targets.m_targetMask |= TARGET_FLAG_DEST_LOCATION;
1355        case TARGET_ALL_AROUND_CASTER:
1356        {
1357            if(!unMaxTargets)
1358                unMaxTargets = spellmgr.GetSpellExtraInfo(m_spellInfo->Id, SPELL_EXTRA_INFO_MAX_TARGETS);
1359            m_caster->GetPosition(m_targets.m_destX, m_targets.m_destY, m_targets.m_destZ);
1360        }break;
1361        case TARGET_CURRENT_ENEMY_COORDINATES:
1362            m_targets.m_targetMask |= TARGET_FLAG_DEST_LOCATION;
1363        case TARGET_DUELVSPLAYER_COORDINATES: // no ground?
1364        {
1365            if(Unit* currentTarget = m_targets.getUnitTarget())
1366                currentTarget->GetPosition(m_targets.m_destX, m_targets.m_destY, m_targets.m_destZ);
1367        }break;
1368        case TARGET_DEST_TABLE_UNKNOWN2:
1369        case TARGET_TABLE_X_Y_Z_COORDINATES:
1370        {
1371            SpellTargetPosition const* st = spellmgr.GetSpellTargetPosition(m_spellInfo->Id);
1372            if(st)
1373            {
1374                if (st->target_mapId == m_caster->GetMapId())
1375                    m_targets.setDestination(st->target_X, st->target_Y, st->target_Z);
1376            }
1377            else
1378                sLog.outError( "SPELL: unknown target coordinates for spell ID %u\n", m_spellInfo->Id );
1379        }break;
1380
1381        // area targets
1382        case TARGET_ALL_ENEMY_IN_AREA_INSTANT:
1383        {
1384            if(m_spellInfo->Effect[i] == SPELL_EFFECT_PERSISTENT_AREA_AURA)
1385                break;
1386            m_targets.m_targetMask |= TARGET_FLAG_DEST_LOCATION;
1387        }
1388        case TARGET_ALL_ENEMY_IN_AREA:
1389        {
1390            SearchAreaTarget(TagUnitMap, radius, PUSH_DEST_CENTER, SPELL_TARGETS_AOE_DAMAGE);
1391        }break;
1392        case TARGET_ALL_FRIENDLY_UNITS_IN_AREA:
1393            m_targets.m_targetMask |= TARGET_FLAG_DEST_LOCATION;
1394        case TARGET_ALL_FRIENDLY_UNITS_AROUND_CASTER:
1395        {
1396            SearchAreaTarget(TagUnitMap, radius, PUSH_DEST_CENTER, SPELL_TARGETS_FRIENDLY);
1397        }break;
1398        case TARGET_AREAEFFECT_CUSTOM:
1399            m_targets.m_targetMask |= TARGET_FLAG_DEST_LOCATION;
1400        case TARGET_UNIT_AREA_ENTRY:
1401        {
1402            SpellScriptTarget::const_iterator lower = spellmgr.GetBeginSpellScriptTarget(m_spellInfo->Id);
1403            SpellScriptTarget::const_iterator upper = spellmgr.GetEndSpellScriptTarget(m_spellInfo->Id);
1404            if(lower==upper)
1405            {
1406                sLog.outErrorDb("Spell (ID: %u) has effect EffectImplicitTargetA/EffectImplicitTargetB = TARGET_SCRIPT, but does not have record in `spell_script_target`",m_spellInfo->Id);
1407                break;
1408            }
1409            // let it be done in one check?
1410            for(SpellScriptTarget::const_iterator i_spellST = lower; i_spellST != upper; ++i_spellST)
1411            {
1412                if(i_spellST->second.type != SPELL_TARGET_TYPE_CREATURE)
1413                {
1414                    sLog.outError( "SPELL: spell ID %u requires non-creature target\n", m_spellInfo->Id );
1415                    continue;
1416                }
1417                SearchAreaTarget(TagUnitMap, radius, PUSH_DEST_CENTER, SPELL_TARGETS_ENTRY, i_spellST->second.targetEntry);
1418            }
1419        }break;
1420        case TARGET_IN_FRONT_OF_CASTER:
1421        case TARGET_UNIT_CONE_ENEMY_UNKNOWN:
1422        {
1423            switch(spellmgr.GetSpellExtraInfo(m_spellInfo->Id, SPELL_EXTRA_INFO_CONE_TYPE))
1424            {
1425                default:
1426                case 0:
1427                    SearchAreaTarget(TagUnitMap, radius, PUSH_IN_FRONT, SPELL_TARGETS_AOE_DAMAGE);
1428                    break;
1429                case 1:
1430                    SearchAreaTarget(TagUnitMap, radius, PUSH_IN_BACK, SPELL_TARGETS_AOE_DAMAGE);
1431                    break;
1432                case 2:
1433                    SearchAreaTarget(TagUnitMap, radius, PUSH_IN_LINE, SPELL_TARGETS_AOE_DAMAGE);
1434                    break;
1435            }
1436        }break;
1437        case TARGET_UNIT_CONE_ALLY:
1438        {
1439            SearchAreaTarget(TagUnitMap, radius, PUSH_IN_FRONT, SPELL_TARGETS_FRIENDLY);
1440        }break;
1441
1442
1443        // nearby target
1444        case TARGET_UNIT_NEARBY_ALLY:
1445        {
1446            if(Unit* pUnitTarget = SearchNearbyTarget(radius, SPELL_TARGETS_FRIENDLY))
1447                TagUnitMap.push_back(pUnitTarget);
1448        }break;
1449        case TARGET_RANDOM_ENEMY_CHAIN_IN_AREA:
1450        {
1451            if(EffectChainTarget <= 1)
1452            {
1453                if(Unit* pUnitTarget = SearchNearbyTarget(radius, SPELL_TARGETS_AOE_DAMAGE))
1454                    TagUnitMap.push_back(pUnitTarget);
1455            }
1456            else
1457                SearchChainTarget(TagUnitMap, m_caster, radius, EffectChainTarget);
1458        }break;
1459        case TARGET_SCRIPT:
1460        case TARGET_SCRIPT_COORDINATES:
1461        {
1462            SpellScriptTarget::const_iterator lower = spellmgr.GetBeginSpellScriptTarget(m_spellInfo->Id);
1463            SpellScriptTarget::const_iterator upper = spellmgr.GetEndSpellScriptTarget(m_spellInfo->Id);
1464            if(lower==upper)
1465                sLog.outErrorDb("Spell (ID: %u) has effect EffectImplicitTargetA/EffectImplicitTargetB = TARGET_SCRIPT or TARGET_SCRIPT_COORDINATES, but does not have record in `spell_script_target`",m_spellInfo->Id);
1466
1467            SpellRangeEntry const* srange = sSpellRangeStore.LookupEntry(m_spellInfo->rangeIndex);
1468            float range = GetSpellMaxRange(srange);
1469
1470            Creature* creatureScriptTarget = NULL;
1471            GameObject* goScriptTarget = NULL;
1472
1473            for(SpellScriptTarget::const_iterator i_spellST = lower; i_spellST != upper; ++i_spellST)
1474            {
1475                switch(i_spellST->second.type)
1476                {
1477                case SPELL_TARGET_TYPE_GAMEOBJECT:
1478                    {
1479                        GameObject* p_GameObject = NULL;
1480
1481                        if(i_spellST->second.targetEntry)
1482                        {
1483                            CellPair p(Trinity::ComputeCellPair(m_caster->GetPositionX(), m_caster->GetPositionY()));
1484                            Cell cell(p);
1485                            cell.data.Part.reserved = ALL_DISTRICT;
1486
1487                            Trinity::NearestGameObjectEntryInObjectRangeCheck go_check(*m_caster,i_spellST->second.targetEntry,range);
1488                            Trinity::GameObjectLastSearcher<Trinity::NearestGameObjectEntryInObjectRangeCheck> checker(p_GameObject,go_check);
1489
1490                            TypeContainerVisitor<Trinity::GameObjectLastSearcher<Trinity::NearestGameObjectEntryInObjectRangeCheck>, GridTypeMapContainer > object_checker(checker);
1491                            CellLock<GridReadGuard> cell_lock(cell, p);
1492                            cell_lock->Visit(cell_lock, object_checker, *MapManager::Instance().GetMap(m_caster->GetMapId(), m_caster));
1493
1494                            if(p_GameObject)
1495                            {
1496                                // remember found target and range, next attempt will find more near target with another entry
1497                                creatureScriptTarget = NULL;
1498                                goScriptTarget = p_GameObject;
1499                                range = go_check.GetLastRange();
1500                            }
1501                        }
1502                        else if( focusObject )          //Focus Object
1503                        {
1504                            float frange = m_caster->GetDistance(focusObject);
1505                            if(range >= frange)
1506                            {
1507                                creatureScriptTarget = NULL;
1508                                goScriptTarget = focusObject;
1509                                range = frange;
1510                            }
1511                        }
1512                        break;
1513                    }
1514                case SPELL_TARGET_TYPE_CREATURE:
1515                case SPELL_TARGET_TYPE_DEAD:
1516                default:
1517                    {
1518                        Creature *p_Creature = NULL;
1519
1520                        CellPair p(Trinity::ComputeCellPair(m_caster->GetPositionX(), m_caster->GetPositionY()));
1521                        Cell cell(p);
1522                        cell.data.Part.reserved = ALL_DISTRICT;
1523                        cell.SetNoCreate();             // Really don't know what is that???
1524
1525                        Trinity::NearestCreatureEntryWithLiveStateInObjectRangeCheck u_check(*m_caster,i_spellST->second.targetEntry,i_spellST->second.type!=SPELL_TARGET_TYPE_DEAD,range);
1526                        Trinity::CreatureLastSearcher<Trinity::NearestCreatureEntryWithLiveStateInObjectRangeCheck> searcher(p_Creature, u_check);
1527
1528                        TypeContainerVisitor<Trinity::CreatureLastSearcher<Trinity::NearestCreatureEntryWithLiveStateInObjectRangeCheck>, GridTypeMapContainer >  grid_creature_searcher(searcher);
1529
1530                        CellLock<GridReadGuard> cell_lock(cell, p);
1531                        cell_lock->Visit(cell_lock, grid_creature_searcher, *MapManager::Instance().GetMap(m_caster->GetMapId(), m_caster));
1532
1533                        if(p_Creature )
1534                        {
1535                            creatureScriptTarget = p_Creature;
1536                            goScriptTarget = NULL;
1537                            range = u_check.GetLastRange();
1538                        }
1539                        break;
1540                    }
1541                }
1542            }
1543
1544            if(cur == TARGET_SCRIPT_COORDINATES)
1545            {
1546                if(creatureScriptTarget)
1547                    m_targets.setDestination(creatureScriptTarget->GetPositionX(),creatureScriptTarget->GetPositionY(),creatureScriptTarget->GetPositionZ());
1548                else if(goScriptTarget)
1549                    m_targets.setDestination(goScriptTarget->GetPositionX(),goScriptTarget->GetPositionY(),goScriptTarget->GetPositionZ());
1550            }
1551        }break;
1552
1553
1554        // dummy
1555        case TARGET_AREAEFFECT_CUSTOM_2:
1556        {
1557            TagUnitMap.push_back(m_caster);
1558            break;
1559        }
1560
1561        case TARGET_ALL_PARTY_AROUND_CASTER:
1562        case TARGET_ALL_PARTY_AROUND_CASTER_2:
1563        case TARGET_ALL_PARTY:
1564        {
1565            Player *pTarget = m_caster->GetCharmerOrOwnerPlayerOrPlayerItself();
1566            Group *pGroup = pTarget ? pTarget->GetGroup() : NULL;
1567
1568            if(pGroup)
1569            {
1570                uint8 subgroup = pTarget->GetSubGroup();
1571
1572                for(GroupReference *itr = pGroup->GetFirstMember(); itr != NULL; itr = itr->next())
1573                {
1574                    Player* Target = itr->getSource();
1575
1576                    // IsHostileTo check duel and controlled by enemy
1577                    if( Target && Target->GetSubGroup()==subgroup && !m_caster->IsHostileTo(Target) )
1578                    {
1579                        if( m_caster->IsWithinDistInMap(Target, radius) )
1580                            TagUnitMap.push_back(Target);
1581
1582                        if(Pet* pet = Target->GetPet())
1583                            if( m_caster->IsWithinDistInMap(pet, radius) )
1584                                TagUnitMap.push_back(pet);
1585                    }
1586                }
1587            }
1588            else
1589            {
1590                Unit* ownerOrSelf = pTarget ? pTarget : m_caster->GetCharmerOrOwnerOrSelf();
1591                if(ownerOrSelf==m_caster || m_caster->IsWithinDistInMap(ownerOrSelf, radius))
1592                    TagUnitMap.push_back(ownerOrSelf);
1593                if(Pet* pet = ownerOrSelf->GetPet())
1594                    if( m_caster->IsWithinDistInMap(pet, radius) )
1595                        TagUnitMap.push_back(pet);
1596            }
1597        }break;
1598        case TARGET_RANDOM_RAID_MEMBER:
1599        {
1600            if (m_caster->GetTypeId() == TYPEID_PLAYER)
1601                if(Player* target = ((Player*)m_caster)->GetNextRandomRaidMember(radius))
1602                    TagUnitMap.push_back(target);
1603        }break;
1604        // TARGET_SINGLE_PARTY means that the spells can only be casted on a party member and not on the caster (some sceals, fire shield from imp, etc..)
1605        case TARGET_SINGLE_PARTY:
1606        {
1607            Unit *target = m_targets.getUnitTarget();
1608            // Thoses spells apparently can't be casted on the caster.
1609            if( target && target != m_caster)
1610            {
1611                // Can only be casted on group's members or its pets
1612                Group  *pGroup = NULL;
1613
1614                Unit* owner = m_caster->GetCharmerOrOwner();
1615                Unit *targetOwner = target->GetCharmerOrOwner();
1616                if(owner)
1617                {
1618                    if(owner->GetTypeId() == TYPEID_PLAYER)
1619                    {
1620                        if( target == owner )
1621                        {
1622                            TagUnitMap.push_back(target);
1623                            break;
1624                        }
1625                        pGroup = ((Player*)owner)->GetGroup();
1626                    }
1627                }
1628                else if (m_caster->GetTypeId() == TYPEID_PLAYER)
1629                {
1630                    if( targetOwner == m_caster && target->GetTypeId()==TYPEID_UNIT && ((Creature*)target)->isPet())
1631                    {
1632                        TagUnitMap.push_back(target);
1633                        break;
1634                    }
1635                    pGroup = ((Player*)m_caster)->GetGroup();
1636                }
1637
1638                if(pGroup)
1639                {
1640                    // Our target can also be a player's pet who's grouped with us or our pet. But can't be controlled player
1641                    if(targetOwner)
1642                    {
1643                        if( targetOwner->GetTypeId() == TYPEID_PLAYER &&
1644                            target->GetTypeId()==TYPEID_UNIT && (((Creature*)target)->isPet()) &&
1645                            target->GetOwnerGUID()==targetOwner->GetGUID() &&
1646                            pGroup->IsMember(((Player*)targetOwner)->GetGUID()))
1647                        {
1648                            TagUnitMap.push_back(target);
1649                        }
1650                    }
1651                    // 1Our target can be a player who is on our group
1652                    else if (target->GetTypeId() == TYPEID_PLAYER && pGroup->IsMember(((Player*)target)->GetGUID()))
1653                    {
1654                        TagUnitMap.push_back(target);
1655                    }
1656                }
1657            }
1658        }break;
1659        case TARGET_ALL_ENEMY_IN_AREA_CHANNELED:
1660        {
1661            // targets the ground, not the units in the area
1662            if (m_spellInfo->Effect[i]!=SPELL_EFFECT_PERSISTENT_AREA_AURA)
1663            {
1664                CellPair p(Trinity::ComputeCellPair(m_caster->GetPositionX(), m_caster->GetPositionY()));
1665                Cell cell(p);
1666                cell.data.Part.reserved = ALL_DISTRICT;
1667                cell.SetNoCreate();
1668
1669                Trinity::SpellNotifierCreatureAndPlayer notifier(*this, TagUnitMap, radius, PUSH_DEST_CENTER,SPELL_TARGETS_AOE_DAMAGE);
1670
1671                TypeContainerVisitor<Trinity::SpellNotifierCreatureAndPlayer, WorldTypeMapContainer > world_object_notifier(notifier);
1672                TypeContainerVisitor<Trinity::SpellNotifierCreatureAndPlayer, GridTypeMapContainer >  grid_object_notifier(notifier);
1673
1674                CellLock<GridReadGuard> cell_lock(cell, p);
1675                cell_lock->Visit(cell_lock, world_object_notifier, *MapManager::Instance().GetMap(m_caster->GetMapId(), m_caster));
1676                cell_lock->Visit(cell_lock, grid_object_notifier, *MapManager::Instance().GetMap(m_caster->GetMapId(), m_caster));
1677            }
1678        }break;
1679        case TARGET_MINION:
1680        {
1681            if(m_spellInfo->Effect[i] != SPELL_EFFECT_DUEL)
1682                TagUnitMap.push_back(m_caster);
1683        }break;
1684        case TARGET_SINGLE_ENEMY:
1685        {
1686            Unit* pUnitTarget = SelectMagnetTarget();
1687            if(pUnitTarget)
1688                TagUnitMap.push_back(pUnitTarget);
1689        }break;
1690        case TARGET_AREAEFFECT_PARTY:
1691        {
1692            Unit* owner = m_caster->GetCharmerOrOwner();
1693            Player *pTarget = NULL;
1694
1695            if(owner)
1696            {
1697                TagUnitMap.push_back(m_caster);
1698                if(owner->GetTypeId() == TYPEID_PLAYER)
1699                    pTarget = (Player*)owner;
1700            }
1701            else if (m_caster->GetTypeId() == TYPEID_PLAYER)
1702            {
1703                if(Unit* target = m_targets.getUnitTarget())
1704                {
1705                    if( target->GetTypeId() != TYPEID_PLAYER)
1706                    {
1707                        if(((Creature*)target)->isPet())
1708                        {
1709                            Unit *targetOwner = target->GetOwner();
1710                            if(targetOwner->GetTypeId() == TYPEID_PLAYER)
1711                                pTarget = (Player*)targetOwner;
1712                        }
1713                    }
1714                    else
1715                        pTarget = (Player*)target;
1716                }
1717            }
1718
1719            Group* pGroup = pTarget ? pTarget->GetGroup() : NULL;
1720
1721            if(pGroup)
1722            {
1723                uint8 subgroup = pTarget->GetSubGroup();
1724
1725                for(GroupReference *itr = pGroup->GetFirstMember(); itr != NULL; itr = itr->next())
1726                {
1727                    Player* Target = itr->getSource();
1728
1729                    // IsHostileTo check duel and controlled by enemy
1730                    if(Target && Target->GetSubGroup()==subgroup && !m_caster->IsHostileTo(Target))
1731                    {
1732                        if( pTarget->IsWithinDistInMap(Target, radius) )
1733                            TagUnitMap.push_back(Target);
1734
1735                        if(Pet* pet = Target->GetPet())
1736                            if( pTarget->IsWithinDistInMap(pet, radius) )
1737                                TagUnitMap.push_back(pet);
1738                    }
1739                }
1740            }
1741            else if (owner)
1742            {
1743                if(m_caster->IsWithinDistInMap(owner, radius))
1744                    TagUnitMap.push_back(owner);
1745            }
1746            else if(pTarget)
1747            {
1748                TagUnitMap.push_back(pTarget);
1749
1750                if(Pet* pet = pTarget->GetPet())
1751                    if( m_caster->IsWithinDistInMap(pet, radius) )
1752                        TagUnitMap.push_back(pet);
1753            }
1754
1755        }break;
1756        case TARGET_CHAIN_HEAL:
1757        {
1758            Unit* pUnitTarget = m_targets.getUnitTarget();
1759            if(!pUnitTarget)
1760                break;
1761
1762            if (EffectChainTarget <= 1)
1763                TagUnitMap.push_back(pUnitTarget);
1764            else
1765            {
1766                unMaxTargets = EffectChainTarget;
1767                float max_range = radius + unMaxTargets * CHAIN_SPELL_JUMP_RADIUS;
1768
1769                std::list<Unit *> tempUnitMap;
1770
1771                {
1772                    CellPair p(Trinity::ComputeCellPair(m_caster->GetPositionX(), m_caster->GetPositionY()));
1773                    Cell cell(p);
1774                    cell.data.Part.reserved = ALL_DISTRICT;
1775                    cell.SetNoCreate();
1776
1777                    Trinity::SpellNotifierCreatureAndPlayer notifier(*this, tempUnitMap, max_range, PUSH_SELF_CENTER, SPELL_TARGETS_FRIENDLY);
1778
1779                    TypeContainerVisitor<Trinity::SpellNotifierCreatureAndPlayer, WorldTypeMapContainer > world_object_notifier(notifier);
1780                    TypeContainerVisitor<Trinity::SpellNotifierCreatureAndPlayer, GridTypeMapContainer >  grid_object_notifier(notifier);
1781
1782                    CellLock<GridReadGuard> cell_lock(cell, p);
1783                    cell_lock->Visit(cell_lock, world_object_notifier, *MapManager::Instance().GetMap(m_caster->GetMapId(), m_caster));
1784                    cell_lock->Visit(cell_lock, grid_object_notifier, *MapManager::Instance().GetMap(m_caster->GetMapId(), m_caster));
1785
1786                }
1787
1788                if(m_caster != pUnitTarget && std::find(tempUnitMap.begin(),tempUnitMap.end(),m_caster) == tempUnitMap.end() )
1789                    tempUnitMap.push_front(m_caster);
1790
1791                tempUnitMap.sort(TargetDistanceOrder(pUnitTarget));
1792
1793                if(tempUnitMap.empty())
1794                    break;
1795
1796                if(*tempUnitMap.begin() == pUnitTarget)
1797                    tempUnitMap.erase(tempUnitMap.begin());
1798
1799                TagUnitMap.push_back(pUnitTarget);
1800                uint32 t = unMaxTargets - 1;
1801                Unit *prev = pUnitTarget;
1802                std::list<Unit*>::iterator next = tempUnitMap.begin();
1803
1804                while(t && next != tempUnitMap.end() )
1805                {
1806                    if(prev->GetDistance(*next) > CHAIN_SPELL_JUMP_RADIUS)
1807                        break;
1808
1809                    if(!prev->IsWithinLOSInMap(*next))
1810                    {
1811                        ++next;
1812                        continue;
1813                    }
1814
1815                    if((*next)->GetHealth() == (*next)->GetMaxHealth())
1816                    {
1817                        next = tempUnitMap.erase(next);
1818                        continue;
1819                    }
1820
1821                    prev = *next;
1822                    TagUnitMap.push_back(prev);
1823                    tempUnitMap.erase(next);
1824                    tempUnitMap.sort(TargetDistanceOrder(prev));
1825                    next = tempUnitMap.begin();
1826
1827                    --t;
1828                }
1829            }
1830        }break;
1831        case TARGET_AREAEFFECT_PARTY_AND_CLASS:
1832        {
1833            Player* targetPlayer = m_targets.getUnitTarget() && m_targets.getUnitTarget()->GetTypeId() == TYPEID_PLAYER
1834                ? (Player*)m_targets.getUnitTarget() : NULL;
1835
1836            Group* pGroup = targetPlayer ? targetPlayer->GetGroup() : NULL;
1837            if(pGroup)
1838            {
1839                for(GroupReference *itr = pGroup->GetFirstMember(); itr != NULL; itr = itr->next())
1840                {
1841                    Player* Target = itr->getSource();
1842
1843                    // IsHostileTo check duel and controlled by enemy
1844                    if( Target && targetPlayer->IsWithinDistInMap(Target, radius) &&
1845                        targetPlayer->getClass() == Target->getClass() &&
1846                        !m_caster->IsHostileTo(Target) )
1847                    {
1848                        TagUnitMap.push_back(Target);
1849                    }
1850                }
1851            }
1852            else if(m_targets.getUnitTarget())
1853                TagUnitMap.push_back(m_targets.getUnitTarget());
1854            break;
1855        }
1856
1857        // destination around caster
1858        case TARGET_DEST_CASTER_FRONT_LEFT:
1859        case TARGET_DEST_CASTER_BACK_LEFT:
1860        case TARGET_DEST_CASTER_BACK_RIGHT:
1861        case TARGET_DEST_CASTER_FRONT_RIGHT:
1862        case TARGET_DEST_CASTER_FRONT:
1863        case TARGET_DEST_CASTER_BACK:
1864        case TARGET_DEST_CASTER_RIGHT:
1865        case TARGET_DEST_CASTER_LEFT:
1866        case TARGET_DEST_CASTER_RANDOM:
1867        case TARGET_DEST_CASTER_RADIUS:
1868        {
1869            float x, y, z, angle, dist;
1870
1871            if (m_spellInfo->EffectRadiusIndex[i])
1872                dist = GetSpellRadius(sSpellRadiusStore.LookupEntry(m_spellInfo->EffectRadiusIndex[i]));
1873            else
1874                dist = 3.0f;//do we need this?
1875            if (cur == TARGET_DEST_CASTER_RANDOM)
1876                dist *= rand_norm(); // This case we need to consider caster size
1877            else
1878                dist -= m_caster->GetObjectSize(); // Size is calculated in GetNearPoint(), but we do not need it
1879            //need a new function to remove this repeated work
1880
1881            switch(cur)
1882            {
1883                case TARGET_DEST_CASTER_FRONT_LEFT: angle = -M_PI/4;    break;
1884                case TARGET_DEST_CASTER_BACK_LEFT:  angle = -3*M_PI/4;  break;
1885                case TARGET_DEST_CASTER_BACK_RIGHT: angle = 3*M_PI/4;   break;
1886                case TARGET_DEST_CASTER_FRONT_RIGHT:angle = M_PI/4;     break;
1887                case TARGET_DEST_CASTER_FRONT:      angle = 0.0f;       break;
1888                case TARGET_DEST_CASTER_BACK:       angle = M_PI;       break;
1889                case TARGET_DEST_CASTER_RIGHT:      angle = M_PI/2;     break;
1890                case TARGET_DEST_CASTER_LEFT:       angle = -M_PI/2;    break;
1891                default:                            angle = rand_norm()*2*M_PI; break;
1892            }
1893
1894            m_caster->GetClosePoint(x, y, z, 0, dist, angle);
1895            m_targets.setDestination(x, y, z); // do not know if has ground visual
1896        }break;
1897
1898        // destination around target
1899        case TARGET_DEST_TARGET_FRONT:
1900        case TARGET_DEST_TARGET_BACK:
1901        case TARGET_DEST_TARGET_RIGHT:
1902        case TARGET_DEST_TARGET_LEFT:
1903        case TARGET_DEST_TARGET_RANDOM:
1904        case TARGET_DEST_TARGET_RADIUS:
1905        {
1906            Unit *target = m_targets.getUnitTarget();
1907            if(!target)
1908            {
1909                sLog.outError("SPELL: no unit target for spell ID %u\n", m_spellInfo->Id);
1910                break;
1911            }
1912
1913            float x, y, z, angle, dist;
1914
1915            if (m_spellInfo->EffectRadiusIndex[i])
1916                dist = GetSpellRadius(sSpellRadiusStore.LookupEntry(m_spellInfo->EffectRadiusIndex[i]));
1917            else
1918                dist = 3.0f;//do we need this?
1919            if (cur == TARGET_DEST_TARGET_RANDOM)
1920                dist *= rand_norm(); // This case we need to consider caster size
1921            else
1922                dist -= target->GetObjectSize(); // Size is calculated in GetNearPoint(), but we do not need it
1923            //need a new function to remove this repeated work
1924
1925            switch(cur)
1926            {
1927                case TARGET_DEST_TARGET_FRONT:      angle = 0.0f;       break;
1928                case TARGET_DEST_TARGET_BACK:       angle = M_PI;       break;
1929                case TARGET_DEST_TARGET_RIGHT:      angle = M_PI/2;     break;
1930                case TARGET_DEST_TARGET_LEFT:       angle = -M_PI/2;    break;
1931                default:                            angle = rand_norm()*2*M_PI; break;
1932            }
1933
1934            target->GetClosePoint(x, y, z, 0, dist, angle);
1935            m_targets.setDestination(x, y, z); // do not know if has ground visual
1936        }break;
1937
1938        // destination around destination
1939        case TARGET_DEST_DEST_RANDOM:
1940        {
1941            if(!(m_targets.m_targetMask & TARGET_FLAG_DEST_LOCATION))
1942            {
1943                sLog.outError("SPELL: no destination for spell ID %u\n", m_spellInfo->Id);
1944                break;
1945            }
1946            float x, y, z, dist, px, py, pz;
1947            dist = GetSpellRadius(sSpellRadiusStore.LookupEntry(m_spellInfo->EffectRadiusIndex[i]));
1948            x = m_targets.m_destX;
1949            y = m_targets.m_destY;
1950            z = m_targets.m_destZ;
1951            m_caster->GetRandomPoint(x, y, z, dist, px, py, pz);
1952            m_targets.setDestination(px, py, pz);
1953        }break;
1954        case TARGET_SELF2:
1955            break;
1956        default:
1957            break;
1958    }
1959
1960    if (unMaxTargets && TagUnitMap.size() > unMaxTargets)
1961    {
1962        // make sure one unit is always removed per iteration
1963        uint32 removed_utarget = 0;
1964        for (std::list<Unit*>::iterator itr = TagUnitMap.begin(), next; itr != TagUnitMap.end(); itr = next)
1965        {
1966            next = itr;
1967            ++next;
1968            if (!*itr) continue;
1969            if ((*itr) == m_targets.getUnitTarget())
1970            {
1971                TagUnitMap.erase(itr);
1972                removed_utarget = 1;
1973                //        break;
1974            }
1975        }
1976        // remove random units from the map
1977        while (TagUnitMap.size() > unMaxTargets - removed_utarget)
1978        {
1979            uint32 poz = urand(0, TagUnitMap.size()-1);
1980            for (std::list<Unit*>::iterator itr = TagUnitMap.begin(); itr != TagUnitMap.end(); ++itr, --poz)
1981            {
1982                if (!*itr) continue;
1983                if (!poz)
1984                {
1985                    TagUnitMap.erase(itr);
1986                    break;
1987                }
1988            }
1989        }
1990        // the player's target will always be added to the map
1991        if (removed_utarget && m_targets.getUnitTarget())
1992            TagUnitMap.push_back(m_targets.getUnitTarget());
1993    }
1994}
1995
1996void Spell::prepare(SpellCastTargets * targets, Aura* triggeredByAura)
1997{
1998    m_targets = *targets;
1999
2000    m_spellState = SPELL_STATE_PREPARING;
2001
2002    m_caster->GetPosition(m_castPositionX, m_castPositionY, m_castPositionZ);
2003    m_castOrientation = m_caster->GetOrientation();
2004
2005    if(triggeredByAura)
2006        m_triggeredByAuraSpell  = triggeredByAura->GetSpellProto();
2007
2008    // create and add update event for this spell
2009    SpellEvent* Event = new SpellEvent(this);
2010    m_caster->m_Events.AddEvent(Event, m_caster->m_Events.CalculateTime(1));
2011
2012    //Prevent casting at cast another spell (ServerSide check)
2013    if(m_caster->IsNonMeleeSpellCasted(false, true) && m_cast_count)
2014    {
2015        SendCastResult(SPELL_FAILED_SPELL_IN_PROGRESS);
2016        finish(false);
2017        return;
2018    }
2019
2020    if(m_caster->GetTypeId() == TYPEID_PLAYER || (m_caster->GetTypeId() == TYPEID_UNIT && ((Creature*)m_caster)->isPet()))
2021    {
2022        if(objmgr.IsPlayerSpellDisabled(m_spellInfo->Id))
2023        {
2024            SendCastResult(SPELL_FAILED_SPELL_UNAVAILABLE);
2025            finish(false);
2026            return;
2027        }
2028    }
2029    else
2030    {
2031        if(objmgr.IsCreatureSpellDisabled(m_spellInfo->Id))
2032        {
2033            finish(false);
2034            return;
2035        }
2036    }
2037
2038    // Fill cost data
2039    m_powerCost = CalculatePowerCost();
2040
2041    uint8 result = CanCast(true);
2042    if(result != 0 && !IsAutoRepeat())                      //always cast autorepeat dummy for triggering
2043    {
2044        if(triggeredByAura)
2045        {
2046            SendChannelUpdate(0);
2047            triggeredByAura->SetAuraDuration(0);
2048        }
2049        SendCastResult(result);
2050        finish(false);
2051        return;
2052    }
2053
2054    // calculate cast time (calculated after first CanCast check to prevent charge counting for first CanCast fail)
2055    m_casttime = GetSpellCastTime(m_spellInfo, this);
2056
2057    // set timer base at cast time
2058    ReSetTimer();
2059
2060    // stealth must be removed at cast starting (at show channel bar)
2061    // skip triggered spell (item equip spell casting and other not explicit character casts/item uses)
2062    if ( !m_IsTriggeredSpell && isSpellBreakStealth(m_spellInfo) )
2063    {
2064        m_caster->RemoveSpellsCausingAura(SPELL_AURA_MOD_STEALTH);
2065        m_caster->RemoveSpellsCausingAura(SPELL_AURA_FEIGN_DEATH);
2066    }
2067
2068    if(m_IsTriggeredSpell)
2069        cast(true);
2070    else
2071    {
2072        m_caster->SetCurrentCastedSpell( this );
2073        m_selfContainer = &(m_caster->m_currentSpells[GetCurrentContainer()]);
2074        SendSpellStart();
2075    }
2076}
2077
2078void Spell::cancel()
2079{
2080    if(m_spellState == SPELL_STATE_FINISHED)
2081        return;
2082
2083    m_autoRepeat = false;
2084    switch (m_spellState)
2085    {
2086        case SPELL_STATE_PREPARING:
2087        case SPELL_STATE_DELAYED:
2088        {
2089            SendInterrupted(0);
2090            SendCastResult(SPELL_FAILED_INTERRUPTED);
2091        } break;
2092
2093        case SPELL_STATE_CASTING:
2094        {
2095            for(std::list<TargetInfo>::iterator ihit= m_UniqueTargetInfo.begin();ihit != m_UniqueTargetInfo.end();++ihit)
2096            {
2097                if( ihit->missCondition == SPELL_MISS_NONE )
2098                {
2099                    Unit* unit = m_caster->GetGUID()==(*ihit).targetGUID ? m_caster : ObjectAccessor::GetUnit(*m_caster, ihit->targetGUID);
2100                    if( unit && unit->isAlive() )
2101                        unit->RemoveAurasDueToSpell(m_spellInfo->Id);
2102                }
2103            }
2104
2105            m_caster->RemoveAurasDueToSpell(m_spellInfo->Id);
2106            SendChannelUpdate(0);
2107            SendInterrupted(0);
2108            SendCastResult(SPELL_FAILED_INTERRUPTED);
2109        } break;
2110
2111        default:
2112        {
2113        } break;
2114    }
2115
2116    finish(false);
2117    m_caster->RemoveDynObject(m_spellInfo->Id);
2118    m_caster->RemoveGameObject(m_spellInfo->Id,true);
2119}
2120
2121void Spell::cast(bool skipCheck)
2122{
2123    uint8 castResult = 0;
2124
2125    // update pointers base at GUIDs to prevent access to non-existed already object
2126    UpdatePointers();
2127
2128    // cancel at lost main target unit
2129    if(!m_targets.getUnitTarget() && m_targets.getUnitTargetGUID() && m_targets.getUnitTargetGUID() != m_caster->GetGUID())
2130    {
2131        cancel();
2132        return;
2133    }
2134
2135    if(m_caster->GetTypeId() != TYPEID_PLAYER && m_targets.getUnitTarget() && m_targets.getUnitTarget() != m_caster)
2136        m_caster->SetInFront(m_targets.getUnitTarget());
2137
2138    castResult = CheckPower();
2139    if(castResult != 0)
2140    {
2141        SendCastResult(castResult);
2142        finish(false);
2143        return;
2144    }
2145
2146    // triggered cast called from Spell::prepare where it was already checked
2147    if(!skipCheck)
2148    {
2149        castResult = CanCast(false);
2150        if(castResult != 0)
2151        {
2152            SendCastResult(castResult);
2153            finish(false);
2154            return;
2155        }
2156    }
2157
2158    FillTargetMap();
2159
2160    // who did this hack?
2161    // Conflagrate - consumes immolate
2162    if ((m_spellInfo->TargetAuraState == AURA_STATE_IMMOLATE) && m_targets.getUnitTarget())
2163    {
2164        // for caster applied auras only
2165        Unit::AuraList const &mPeriodic = m_targets.getUnitTarget()->GetAurasByType(SPELL_AURA_PERIODIC_DAMAGE);
2166        for(Unit::AuraList::const_iterator i = mPeriodic.begin(); i != mPeriodic.end(); ++i)
2167        {
2168            if( (*i)->GetSpellProto()->SpellFamilyName == SPELLFAMILY_WARLOCK && ((*i)->GetSpellProto()->SpellFamilyFlags & 4) &&
2169                (*i)->GetCasterGUID()==m_caster->GetGUID() )
2170            {
2171                m_targets.getUnitTarget()->RemoveAura((*i)->GetId(), (*i)->GetEffIndex());
2172                break;
2173            }
2174        }
2175    }
2176
2177    // traded items have trade slot instead of guid in m_itemTargetGUID
2178    // set to real guid to be sent later to the client
2179    m_targets.updateTradeSlotItem();
2180
2181    // CAST SPELL
2182    SendSpellCooldown();
2183
2184    TakePower();
2185    TakeReagents();                                         // we must remove reagents before HandleEffects to allow place crafted item in same slot
2186
2187    if(m_spellState == SPELL_STATE_FINISHED)                // stop cast if spell marked as finish somewhere in Take*/FillTargetMap
2188        return;
2189
2190    SendCastResult(castResult);
2191    SendSpellGo();                                          // we must send smsg_spell_go packet before m_castItem delete in TakeCastItem()...
2192
2193    // Pass cast spell event to handler (not send triggered by aura spells)
2194    if (m_spellInfo->DmgClass != SPELL_DAMAGE_CLASS_MELEE && m_spellInfo->DmgClass != SPELL_DAMAGE_CLASS_RANGED && !m_triggeredByAuraSpell)
2195    {
2196        m_caster->ProcDamageAndSpell(m_targets.getUnitTarget(), PROC_FLAG_CAST_SPELL, PROC_FLAG_NONE, 0, SPELL_SCHOOL_MASK_NONE, m_spellInfo, m_IsTriggeredSpell);
2197
2198        // update pointers base at GUIDs to prevent access to non-existed already object
2199        UpdatePointers();                                   // pointers can be invalidate at triggered spell casting
2200    }
2201
2202    // Okay, everything is prepared. Now we need to distinguish between immediate and evented delayed spells
2203    if (m_spellInfo->speed > 0.0f)
2204    {
2205
2206        // Remove used for cast item if need (it can be already NULL after TakeReagents call
2207        // in case delayed spell remove item at cast delay start
2208        TakeCastItem();
2209
2210        // Okay, maps created, now prepare flags
2211        m_immediateHandled = false;
2212        m_spellState = SPELL_STATE_DELAYED;
2213        SetDelayStart(0);
2214    }
2215    else
2216    {
2217        // Immediate spell, no big deal
2218        handle_immediate();
2219    }
2220}
2221
2222void Spell::handle_immediate()
2223{
2224    // start channeling if applicable
2225    if(IsChanneledSpell(m_spellInfo))
2226    {
2227        m_spellState = SPELL_STATE_CASTING;
2228        SendChannelStart(GetSpellDuration(m_spellInfo));
2229    }
2230
2231    // process immediate effects (items, ground, etc.) also initialize some variables
2232    _handle_immediate_phase();
2233
2234    for(std::list<TargetInfo>::iterator ihit= m_UniqueTargetInfo.begin();ihit != m_UniqueTargetInfo.end();++ihit)
2235        DoAllEffectOnTarget(&(*ihit));
2236
2237    for(std::list<GOTargetInfo>::iterator ihit= m_UniqueGOTargetInfo.begin();ihit != m_UniqueGOTargetInfo.end();++ihit)
2238        DoAllEffectOnTarget(&(*ihit));
2239
2240    // spell is finished, perform some last features of the spell here
2241    _handle_finish_phase();
2242
2243    // Remove used for cast item if need (it can be already NULL after TakeReagents call
2244    TakeCastItem();
2245
2246    if(m_spellState != SPELL_STATE_CASTING)
2247        finish(true);                                       // successfully finish spell cast (not last in case autorepeat or channel spell)
2248}
2249
2250uint64 Spell::handle_delayed(uint64 t_offset)
2251{
2252    uint64 next_time = 0;
2253
2254    if (!m_immediateHandled)
2255    {
2256        _handle_immediate_phase();
2257        m_immediateHandled = true;
2258    }
2259
2260    // now recheck units targeting correctness (need before any effects apply to prevent adding immunity at first effect not allow apply second spell effect and similar cases)
2261    for(std::list<TargetInfo>::iterator ihit= m_UniqueTargetInfo.begin(); ihit != m_UniqueTargetInfo.end();++ihit)
2262    {
2263        if (ihit->processed == false)
2264        {
2265            if ( ihit->timeDelay <= t_offset )
2266                DoAllEffectOnTarget(&(*ihit));
2267            else if( next_time == 0 || ihit->timeDelay < next_time )
2268                next_time = ihit->timeDelay;
2269        }
2270    }
2271
2272    // now recheck gameobject targeting correctness
2273    for(std::list<GOTargetInfo>::iterator ighit= m_UniqueGOTargetInfo.begin(); ighit != m_UniqueGOTargetInfo.end();++ighit)
2274    {
2275        if (ighit->processed == false)
2276        {
2277            if ( ighit->timeDelay <= t_offset )
2278                DoAllEffectOnTarget(&(*ighit));
2279            else if( next_time == 0 || ighit->timeDelay < next_time )
2280                next_time = ighit->timeDelay;
2281        }
2282    }
2283    // All targets passed - need finish phase
2284    if (next_time == 0)
2285    {
2286        // spell is finished, perform some last features of the spell here
2287        _handle_finish_phase();
2288
2289        finish(true);                                       // successfully finish spell cast
2290
2291        // return zero, spell is finished now
2292        return 0;
2293    }
2294    else
2295    {
2296        // spell is unfinished, return next execution time
2297        return next_time;
2298    }
2299}
2300
2301void Spell::_handle_immediate_phase()
2302{
2303    // handle some immediate features of the spell here
2304    HandleThreatSpells(m_spellInfo->Id);
2305
2306    m_needSpellLog = IsNeedSendToClient();
2307    for(uint32 j = 0;j<3;j++)
2308    {
2309        if(m_spellInfo->Effect[j]==0)
2310            continue;
2311
2312        // apply Send Event effect to ground in case empty target lists
2313        if( m_spellInfo->Effect[j] == SPELL_EFFECT_SEND_EVENT && !HaveTargetsForEffect(j) )
2314        {
2315            HandleEffects(NULL,NULL,NULL, j);
2316            continue;
2317        }
2318
2319        // Don't do spell log, if is school damage spell
2320        if(m_spellInfo->Effect[j] == SPELL_EFFECT_SCHOOL_DAMAGE || m_spellInfo->Effect[j] == 0)
2321            m_needSpellLog = false;
2322
2323        uint32 EffectChainTarget = m_spellInfo->EffectChainTarget[j];
2324        if(m_originalCaster)
2325            if(Player* modOwner = m_originalCaster->GetSpellModOwner())
2326                modOwner->ApplySpellMod(m_spellInfo->Id, SPELLMOD_JUMP_TARGETS, EffectChainTarget, this);
2327
2328        // initialize multipliers
2329        m_damageMultipliers[j] = 1.0f;
2330        if( (m_spellInfo->EffectImplicitTargetA[j] == TARGET_CHAIN_DAMAGE || m_spellInfo->EffectImplicitTargetA[j] == TARGET_CHAIN_HEAL) &&
2331            (EffectChainTarget > 1) )
2332            m_applyMultiplierMask |= 1 << j;
2333    }
2334
2335    // initialize Diminishing Returns Data
2336    m_diminishLevel = DIMINISHING_LEVEL_1;
2337    m_diminishGroup = DIMINISHING_NONE;
2338
2339    // process items
2340    for(std::list<ItemTargetInfo>::iterator ihit= m_UniqueItemInfo.begin();ihit != m_UniqueItemInfo.end();++ihit)
2341        DoAllEffectOnTarget(&(*ihit));
2342
2343    // process ground
2344    for(uint32 j = 0;j<3;j++)
2345    {
2346        // persistent area auras target only the ground
2347        if(m_spellInfo->Effect[j] == SPELL_EFFECT_PERSISTENT_AREA_AURA)
2348            HandleEffects(NULL,NULL,NULL, j);
2349    }
2350}
2351
2352void Spell::_handle_finish_phase()
2353{
2354    // spell log
2355    if(m_needSpellLog)
2356        SendLogExecute();
2357}
2358
2359void Spell::SendSpellCooldown()
2360{
2361    if(m_caster->GetTypeId() != TYPEID_PLAYER)
2362        return;
2363
2364    Player* _player = (Player*)m_caster;
2365    // Add cooldown for max (disable spell)
2366    // Cooldown started on SendCooldownEvent call
2367    if (m_spellInfo->Attributes & SPELL_ATTR_DISABLED_WHILE_ACTIVE)
2368    {
2369        _player->AddSpellCooldown(m_spellInfo->Id, 0, time(NULL) - 1);
2370        return;
2371    }
2372
2373    // init cooldown values
2374    uint32 cat   = 0;
2375    int32 rec    = -1;
2376    int32 catrec = -1;
2377
2378    // some special item spells without correct cooldown in SpellInfo
2379    // cooldown information stored in item prototype
2380    // This used in same way in WorldSession::HandleItemQuerySingleOpcode data sending to client.
2381
2382    if(m_CastItem)
2383    {
2384        ItemPrototype const* proto = m_CastItem->GetProto();
2385        if(proto)
2386        {
2387            for(int idx = 0; idx < 5; ++idx)
2388            {
2389                if(proto->Spells[idx].SpellId == m_spellInfo->Id)
2390                {
2391                    cat    = proto->Spells[idx].SpellCategory;
2392                    rec    = proto->Spells[idx].SpellCooldown;
2393                    catrec = proto->Spells[idx].SpellCategoryCooldown;
2394                    break;
2395                }
2396            }
2397        }
2398    }
2399
2400    // if no cooldown found above then base at DBC data
2401    if(rec < 0 && catrec < 0)
2402    {
2403        cat = m_spellInfo->Category;
2404        rec = m_spellInfo->RecoveryTime;
2405        catrec = m_spellInfo->CategoryRecoveryTime;
2406    }
2407
2408    // shoot spells used equipped item cooldown values already assigned in GetAttackTime(RANGED_ATTACK)
2409    // prevent 0 cooldowns set by another way
2410    if (rec <= 0 && catrec <= 0 && (cat == 76 || cat == 351))
2411        rec = _player->GetAttackTime(RANGED_ATTACK);
2412
2413    // Now we have cooldown data (if found any), time to apply mods
2414    if(rec > 0)
2415        _player->ApplySpellMod(m_spellInfo->Id, SPELLMOD_COOLDOWN, rec, this);
2416
2417    if(catrec > 0)
2418        _player->ApplySpellMod(m_spellInfo->Id, SPELLMOD_COOLDOWN, catrec, this);
2419
2420    // replace negative cooldowns by 0
2421    if (rec < 0) rec = 0;
2422    if (catrec < 0) catrec = 0;
2423
2424    // no cooldown after applying spell mods
2425    if( rec == 0 && catrec == 0)
2426        return;
2427
2428    time_t curTime = time(NULL);
2429
2430    time_t catrecTime = catrec ? curTime+catrec/1000 : 0;   // in secs
2431    time_t recTime    = rec ? curTime+rec/1000 : catrecTime;// in secs
2432
2433    // self spell cooldown
2434    if(recTime > 0)
2435        _player->AddSpellCooldown(m_spellInfo->Id, m_CastItem ? m_CastItem->GetEntry() : 0, recTime);
2436
2437    // category spells
2438    if (catrec > 0)
2439    {
2440        SpellCategoryStore::const_iterator i_scstore = sSpellCategoryStore.find(cat);
2441        if(i_scstore != sSpellCategoryStore.end())
2442        {
2443            for(SpellCategorySet::const_iterator i_scset = i_scstore->second.begin(); i_scset != i_scstore->second.end(); ++i_scset)
2444            {
2445                if(*i_scset == m_spellInfo->Id)             // skip main spell, already handled above
2446                    continue;
2447
2448                _player->AddSpellCooldown(m_spellInfo->Id, m_CastItem ? m_CastItem->GetEntry() : 0, catrecTime);
2449            }
2450        }
2451    }
2452}
2453
2454void Spell::update(uint32 difftime)
2455{
2456    // update pointers based at it's GUIDs
2457    UpdatePointers();
2458
2459    if(m_targets.getUnitTargetGUID() && !m_targets.getUnitTarget())
2460    {
2461        cancel();
2462        return;
2463    }
2464
2465    // check if the player caster has moved before the spell finished
2466    if ((m_caster->GetTypeId() == TYPEID_PLAYER && m_timer != 0) &&
2467        (m_castPositionX != m_caster->GetPositionX() || m_castPositionY != m_caster->GetPositionY() || m_castPositionZ != m_caster->GetPositionZ()) &&
2468        (m_spellInfo->Effect[0] != SPELL_EFFECT_STUCK || !m_caster->HasUnitMovementFlag(MOVEMENTFLAG_FALLING)))
2469    {
2470        // always cancel for channeled spells
2471        if( m_spellState == SPELL_STATE_CASTING )
2472            cancel();
2473        // don't cancel for melee, autorepeat, triggered and instant spells
2474        else if(!IsNextMeleeSwingSpell() && !IsAutoRepeat() && !m_IsTriggeredSpell && (m_spellInfo->InterruptFlags & SPELL_INTERRUPT_FLAG_MOVEMENT))
2475            cancel();
2476    }
2477
2478    switch(m_spellState)
2479    {
2480        case SPELL_STATE_PREPARING:
2481        {
2482            if(m_timer)
2483            {
2484                if(difftime >= m_timer)
2485                    m_timer = 0;
2486                else
2487                    m_timer -= difftime;
2488            }
2489
2490            if(m_timer == 0 && !IsNextMeleeSwingSpell() && !IsAutoRepeat())
2491                cast();
2492        } break;
2493        case SPELL_STATE_CASTING:
2494        {
2495            if(m_timer > 0)
2496            {
2497                if( m_caster->GetTypeId() == TYPEID_PLAYER )
2498                {
2499                    // check if player has jumped before the channeling finished
2500                    if(m_caster->HasUnitMovementFlag(MOVEMENTFLAG_JUMPING))
2501                        cancel();
2502
2503                    // check for incapacitating player states
2504                    if( m_caster->hasUnitState(UNIT_STAT_STUNNED | UNIT_STAT_CONFUSED))
2505                        cancel();
2506
2507                    // check if player has turned if flag is set
2508                    if( m_spellInfo->ChannelInterruptFlags & CHANNEL_FLAG_TURNING && m_castOrientation != m_caster->GetOrientation() )
2509                        cancel();
2510                }
2511
2512                // check if there are alive targets left
2513                if (!IsAliveUnitPresentInTargetList())
2514                {
2515                    SendChannelUpdate(0);
2516                    finish();
2517                }
2518
2519                if(difftime >= m_timer)
2520                    m_timer = 0;
2521                else
2522                    m_timer -= difftime;
2523            }
2524
2525            if(m_timer == 0)
2526            {
2527                SendChannelUpdate(0);
2528
2529                // channeled spell processed independently for quest targeting
2530                // cast at creature (or GO) quest objectives update at successful cast channel finished
2531                // ignore autorepeat/melee casts for speed (not exist quest for spells (hm... )
2532                if( m_caster->GetTypeId() == TYPEID_PLAYER && !IsAutoRepeat() && !IsNextMeleeSwingSpell() )
2533                {
2534                    for(std::list<TargetInfo>::iterator ihit= m_UniqueTargetInfo.begin();ihit != m_UniqueTargetInfo.end();++ihit)
2535                    {
2536                        TargetInfo* target = &*ihit;
2537                        if(!IS_CREATURE_GUID(target->targetGUID))
2538                            continue;
2539
2540                        Unit* unit = m_caster->GetGUID()==target->targetGUID ? m_caster : ObjectAccessor::GetUnit(*m_caster,target->targetGUID);
2541                        if (unit==NULL)
2542                            continue;
2543
2544                        ((Player*)m_caster)->CastedCreatureOrGO(unit->GetEntry(),unit->GetGUID(),m_spellInfo->Id);
2545                    }
2546
2547                    for(std::list<GOTargetInfo>::iterator ihit= m_UniqueGOTargetInfo.begin();ihit != m_UniqueGOTargetInfo.end();++ihit)
2548                    {
2549                        GOTargetInfo* target = &*ihit;
2550
2551                        GameObject* go = ObjectAccessor::GetGameObject(*m_caster, target->targetGUID);
2552                        if(!go)
2553                            continue;
2554
2555                        ((Player*)m_caster)->CastedCreatureOrGO(go->GetEntry(),go->GetGUID(),m_spellInfo->Id);
2556                    }
2557                }
2558
2559                finish();
2560            }
2561        } break;
2562        default:
2563        {
2564        }break;
2565    }
2566}
2567
2568void Spell::finish(bool ok)
2569{
2570    if(!m_caster)
2571        return;
2572
2573    if(m_spellState == SPELL_STATE_FINISHED)
2574        return;
2575
2576    m_spellState = SPELL_STATE_FINISHED;
2577
2578    //remove spell mods
2579    if (m_caster->GetTypeId() == TYPEID_PLAYER)
2580        ((Player*)m_caster)->RemoveSpellMods(this);
2581
2582    // other code related only to successfully finished spells
2583    if(!ok)
2584        return;
2585
2586    //handle SPELL_AURA_ADD_TARGET_TRIGGER auras
2587    Unit::AuraList const& targetTriggers = m_caster->GetAurasByType(SPELL_AURA_ADD_TARGET_TRIGGER);
2588    for(Unit::AuraList::const_iterator i = targetTriggers.begin(); i != targetTriggers.end(); ++i)
2589    {
2590        SpellEntry const *auraSpellInfo = (*i)->GetSpellProto();
2591        uint32 auraSpellIdx = (*i)->GetEffIndex();
2592        if (IsAffectedBy(auraSpellInfo, auraSpellIdx))
2593        {
2594            for(std::list<TargetInfo>::iterator ihit= m_UniqueTargetInfo.begin();ihit != m_UniqueTargetInfo.end();++ihit)
2595                if( ihit->effectMask & (1<<auraSpellIdx) )
2596            {
2597                // check m_caster->GetGUID() let load auras at login and speedup most often case
2598                Unit *unit = m_caster->GetGUID()== ihit->targetGUID ? m_caster : ObjectAccessor::GetUnit(*m_caster, ihit->targetGUID);
2599                if (unit && unit->isAlive())
2600                {
2601                    // Calculate chance at that moment (can be depend for example from combo points)
2602                    int32 chance = m_caster->CalculateSpellDamage(auraSpellInfo, auraSpellIdx, (*i)->GetBasePoints(),unit);
2603
2604                    if(roll_chance_i(chance))
2605                        m_caster->CastSpell(unit, auraSpellInfo->EffectTriggerSpell[auraSpellIdx], true, NULL, (*i));
2606                }
2607            }
2608        }
2609    }
2610
2611    if (IsMeleeAttackResetSpell())
2612    {
2613        m_caster->resetAttackTimer(BASE_ATTACK);
2614        if(m_caster->haveOffhandWeapon())
2615            m_caster->resetAttackTimer(OFF_ATTACK);
2616    }
2617
2618    /*if (IsRangedAttackResetSpell())
2619        m_caster->resetAttackTimer(RANGED_ATTACK);*/
2620
2621    // Clear combo at finish state
2622    if(m_caster->GetTypeId() == TYPEID_PLAYER && NeedsComboPoints(m_spellInfo))
2623        ((Player*)m_caster)->ClearComboPoints();
2624
2625    // call triggered spell only at successful cast (after clear combo points -> for add some if need)
2626    if(!m_TriggerSpells.empty())
2627        TriggerSpell();
2628
2629    // Stop Attack for some spells
2630    if( m_spellInfo->Attributes & SPELL_ATTR_STOP_ATTACK_TARGET )
2631        m_caster->AttackStop();
2632}
2633
2634void Spell::SendCastResult(uint8 result)
2635{
2636    if (m_caster->GetTypeId() != TYPEID_PLAYER)
2637        return;
2638
2639    if(((Player*)m_caster)->GetSession()->PlayerLoading())  // don't send cast results at loading time
2640        return;
2641
2642    if(result != 0)
2643    {
2644        WorldPacket data(SMSG_CAST_FAILED, (4+1+1));
2645        data << uint32(m_spellInfo->Id);
2646        data << uint8(result);                              // problem
2647        data << uint8(m_cast_count);                        // single cast or multi 2.3 (0/1)
2648        switch (result)
2649        {
2650            case SPELL_FAILED_REQUIRES_SPELL_FOCUS:
2651                data << uint32(m_spellInfo->RequiresSpellFocus);
2652                break;
2653            case SPELL_FAILED_REQUIRES_AREA:
2654                // hardcode areas limitation case
2655                if( m_spellInfo->Id==41618 || m_spellInfo->Id==41620 )
2656                    data << uint32(3842);
2657                else if( m_spellInfo->Id==41617 || m_spellInfo->Id==41619 )
2658                    data << uint32(3905);
2659                // normal case
2660                else
2661                    data << uint32(m_spellInfo->AreaId);
2662                break;
2663            case SPELL_FAILED_TOTEMS:
2664                if(m_spellInfo->Totem[0])
2665                    data << uint32(m_spellInfo->Totem[0]);
2666                if(m_spellInfo->Totem[1])
2667                    data << uint32(m_spellInfo->Totem[1]);
2668                break;
2669            case SPELL_FAILED_TOTEM_CATEGORY:
2670                if(m_spellInfo->TotemCategory[0])
2671                    data << uint32(m_spellInfo->TotemCategory[0]);
2672                if(m_spellInfo->TotemCategory[1])
2673                    data << uint32(m_spellInfo->TotemCategory[1]);
2674                break;
2675            case SPELL_FAILED_EQUIPPED_ITEM_CLASS:
2676                data << uint32(m_spellInfo->EquippedItemClass);
2677                data << uint32(m_spellInfo->EquippedItemSubClassMask);
2678                data << uint32(m_spellInfo->EquippedItemInventoryTypeMask);
2679                break;
2680        }
2681        ((Player*)m_caster)->GetSession()->SendPacket(&data);
2682    }
2683    else
2684    {
2685        WorldPacket data(SMSG_CLEAR_EXTRA_AURA_INFO, (8+4));
2686        data.append(m_caster->GetPackGUID());
2687        data << uint32(m_spellInfo->Id);
2688        ((Player*)m_caster)->GetSession()->SendPacket(&data);
2689    }
2690}
2691
2692void Spell::SendSpellStart()
2693{
2694    if(!IsNeedSendToClient())
2695        return;
2696
2697    sLog.outDebug("Sending SMSG_SPELL_START id=%u",m_spellInfo->Id);
2698
2699    uint16 castFlags = CAST_FLAG_UNKNOWN1;
2700    if(IsRangedSpell())
2701        castFlags |= CAST_FLAG_AMMO;
2702
2703    Unit * target;
2704    if(!m_targets.getUnitTarget())
2705        target = m_caster;
2706    else
2707        target = m_targets.getUnitTarget();
2708
2709    WorldPacket data(SMSG_SPELL_START, (8+8+4+4+2));
2710    if(m_CastItem)
2711        data.append(m_CastItem->GetPackGUID());
2712    else
2713        data.append(m_caster->GetPackGUID());
2714
2715    data.append(m_caster->GetPackGUID());
2716    data << uint32(m_spellInfo->Id);
2717    data << uint8(m_cast_count);                            // single cast or multi 2.3 (0/1)
2718    data << uint16(castFlags);
2719    data << uint32(m_timer);
2720
2721    m_targets.write(&data);
2722
2723    if( castFlags & CAST_FLAG_AMMO )
2724        WriteAmmoToPacket(&data);
2725
2726    m_caster->SendMessageToSet(&data, true);
2727}
2728
2729void Spell::SendSpellGo()
2730{
2731    // not send invisible spell casting
2732    if(!IsNeedSendToClient())
2733        return;
2734
2735    sLog.outDebug("Sending SMSG_SPELL_GO id=%u",m_spellInfo->Id);
2736
2737    Unit * target;
2738    if(!m_targets.getUnitTarget())
2739        target = m_caster;
2740    else
2741        target = m_targets.getUnitTarget();
2742
2743    uint16 castFlags = CAST_FLAG_UNKNOWN3;
2744    if(IsRangedSpell())
2745        castFlags |= CAST_FLAG_AMMO;
2746
2747    WorldPacket data(SMSG_SPELL_GO, 50);                    // guess size
2748    if(m_CastItem)
2749        data.append(m_CastItem->GetPackGUID());
2750    else
2751        data.append(m_caster->GetPackGUID());
2752
2753    data.append(m_caster->GetPackGUID());
2754    data << uint32(m_spellInfo->Id);
2755    data << uint16(castFlags);
2756    data << uint32(getMSTime());                            // timestamp
2757
2758    WriteSpellGoTargets(&data);
2759
2760    m_targets.write(&data);
2761
2762    if( castFlags & CAST_FLAG_AMMO )
2763        WriteAmmoToPacket(&data);
2764
2765    m_caster->SendMessageToSet(&data, true);
2766}
2767
2768void Spell::WriteAmmoToPacket( WorldPacket * data )
2769{
2770    uint32 ammoInventoryType = 0;
2771    uint32 ammoDisplayID = 0;
2772
2773    if (m_caster->GetTypeId() == TYPEID_PLAYER)
2774    {
2775        Item *pItem = ((Player*)m_caster)->GetWeaponForAttack( RANGED_ATTACK );
2776        if(pItem)
2777        {
2778            ammoInventoryType = pItem->GetProto()->InventoryType;
2779            if( ammoInventoryType == INVTYPE_THROWN )
2780                ammoDisplayID = pItem->GetProto()->DisplayInfoID;
2781            else
2782            {
2783                uint32 ammoID = ((Player*)m_caster)->GetUInt32Value(PLAYER_AMMO_ID);
2784                if(ammoID)
2785                {
2786                    ItemPrototype const *pProto = objmgr.GetItemPrototype( ammoID );
2787                    if(pProto)
2788                    {
2789                        ammoDisplayID = pProto->DisplayInfoID;
2790                        ammoInventoryType = pProto->InventoryType;
2791                    }
2792                }
2793                else if(m_caster->GetDummyAura(46699))      // Requires No Ammo
2794                {
2795                    ammoDisplayID = 5996;                   // normal arrow
2796                    ammoInventoryType = INVTYPE_AMMO;
2797                }
2798            }
2799        }
2800    }
2801    // TODO: implement selection ammo data based at ranged weapon stored in equipmodel/equipinfo/equipslot fields
2802
2803    *data << uint32(ammoDisplayID);
2804    *data << uint32(ammoInventoryType);
2805}
2806
2807void Spell::WriteSpellGoTargets( WorldPacket * data )
2808{
2809    *data << (uint8)m_countOfHit;
2810    for(std::list<TargetInfo>::iterator ihit= m_UniqueTargetInfo.begin();ihit != m_UniqueTargetInfo.end();++ihit)
2811        if ((*ihit).missCondition == SPELL_MISS_NONE)       // Add only hits
2812            *data << uint64(ihit->targetGUID);
2813
2814    for(std::list<GOTargetInfo>::iterator ighit= m_UniqueGOTargetInfo.begin();ighit != m_UniqueGOTargetInfo.end();++ighit)
2815        *data << uint64(ighit->targetGUID);                 // Always hits
2816
2817    *data << (uint8)m_countOfMiss;
2818    for(std::list<TargetInfo>::iterator ihit= m_UniqueTargetInfo.begin();ihit != m_UniqueTargetInfo.end();++ihit)
2819    {
2820        if( ihit->missCondition != SPELL_MISS_NONE )        // Add only miss
2821        {
2822            *data << uint64(ihit->targetGUID);
2823            *data << uint8(ihit->missCondition);
2824            if( ihit->missCondition == SPELL_MISS_REFLECT )
2825                *data << uint8(ihit->reflectResult);
2826        }
2827    }
2828}
2829
2830void Spell::SendLogExecute()
2831{
2832    Unit *target = m_targets.getUnitTarget() ? m_targets.getUnitTarget() : m_caster;
2833
2834    WorldPacket data(SMSG_SPELLLOGEXECUTE, (8+4+4+4+4+8));
2835
2836    if(m_caster->GetTypeId() == TYPEID_PLAYER)
2837        data.append(m_caster->GetPackGUID());
2838    else
2839        data.append(target->GetPackGUID());
2840
2841    data << uint32(m_spellInfo->Id);
2842    uint32 count1 = 1;
2843    data << uint32(count1);                                 // count1 (effect count?)
2844    for(uint32 i = 0; i < count1; ++i)
2845    {
2846        data << uint32(m_spellInfo->Effect[0]);             // spell effect?
2847        uint32 count2 = 1;
2848        data << uint32(count2);                             // count2 (target count?)
2849        for(uint32 j = 0; j < count2; ++j)
2850        {
2851            switch(m_spellInfo->Effect[0])
2852            {
2853                case SPELL_EFFECT_POWER_DRAIN:
2854                    if(Unit *unit = m_targets.getUnitTarget())
2855                        data.append(unit->GetPackGUID());
2856                    else
2857                        data << uint8(0);
2858                    data << uint32(0);
2859                    data << uint32(0);
2860                    data << float(0);
2861                    break;
2862                case SPELL_EFFECT_ADD_EXTRA_ATTACKS:
2863                    if(Unit *unit = m_targets.getUnitTarget())
2864                        data.append(unit->GetPackGUID());
2865                    else
2866                        data << uint8(0);
2867                    data << uint32(0);                      // count?
2868                    break;
2869                case SPELL_EFFECT_INTERRUPT_CAST:
2870                    if(Unit *unit = m_targets.getUnitTarget())
2871                        data.append(unit->GetPackGUID());
2872                    else
2873                        data << uint8(0);
2874                    data << uint32(0);                      // spellid
2875                    break;
2876                case SPELL_EFFECT_DURABILITY_DAMAGE:
2877                    if(Unit *unit = m_targets.getUnitTarget())
2878                        data.append(unit->GetPackGUID());
2879                    else
2880                        data << uint8(0);
2881                    data << uint32(0);
2882                    data << uint32(0);
2883                    break;
2884                case SPELL_EFFECT_OPEN_LOCK:
2885                case SPELL_EFFECT_OPEN_LOCK_ITEM:
2886                    if(Item *item = m_targets.getItemTarget())
2887                        data.append(item->GetPackGUID());
2888                    else
2889                        data << uint8(0);
2890                    break;
2891                case SPELL_EFFECT_CREATE_ITEM:
2892                    data << uint32(m_spellInfo->EffectItemType[0]);
2893                    break;
2894                case SPELL_EFFECT_SUMMON:
2895                case SPELL_EFFECT_SUMMON_WILD:
2896                case SPELL_EFFECT_SUMMON_GUARDIAN:
2897                case SPELL_EFFECT_TRANS_DOOR:
2898                case SPELL_EFFECT_SUMMON_PET:
2899                case SPELL_EFFECT_SUMMON_POSSESSED:
2900                case SPELL_EFFECT_SUMMON_TOTEM:
2901                case SPELL_EFFECT_SUMMON_OBJECT_WILD:
2902                case SPELL_EFFECT_CREATE_HOUSE:
2903                case SPELL_EFFECT_DUEL:
2904                case SPELL_EFFECT_SUMMON_TOTEM_SLOT1:
2905                case SPELL_EFFECT_SUMMON_TOTEM_SLOT2:
2906                case SPELL_EFFECT_SUMMON_TOTEM_SLOT3:
2907                case SPELL_EFFECT_SUMMON_TOTEM_SLOT4:
2908                case SPELL_EFFECT_SUMMON_PHANTASM:
2909                case SPELL_EFFECT_SUMMON_CRITTER:
2910                case SPELL_EFFECT_SUMMON_OBJECT_SLOT1:
2911                case SPELL_EFFECT_SUMMON_OBJECT_SLOT2:
2912                case SPELL_EFFECT_SUMMON_OBJECT_SLOT3:
2913                case SPELL_EFFECT_SUMMON_OBJECT_SLOT4:
2914                case SPELL_EFFECT_SUMMON_DEMON:
2915                case SPELL_EFFECT_150:
2916                    if(Unit *unit = m_targets.getUnitTarget())
2917                        data.append(unit->GetPackGUID());
2918                    else if(m_targets.getItemTargetGUID())
2919                        data.appendPackGUID(m_targets.getItemTargetGUID());
2920                    else if(GameObject *go = m_targets.getGOTarget())
2921                        data.append(go->GetPackGUID());
2922                    else
2923                        data << uint8(0);                   // guid
2924                    break;
2925                case SPELL_EFFECT_FEED_PET:
2926                    data << uint32(m_targets.getItemTargetEntry());
2927                    break;
2928                case SPELL_EFFECT_DISMISS_PET:
2929                    if(Unit *unit = m_targets.getUnitTarget())
2930                        data.append(unit->GetPackGUID());
2931                    else
2932                        data << uint8(0);
2933                    break;
2934                default:
2935                    return;
2936            }
2937        }
2938    }
2939
2940    m_caster->SendMessageToSet(&data, true);
2941}
2942
2943void Spell::SendInterrupted(uint8 result)
2944{
2945    WorldPacket data(SMSG_SPELL_FAILURE, (8+4+1));
2946    data.append(m_caster->GetPackGUID());
2947    data << m_spellInfo->Id;
2948    data << result;
2949    m_caster->SendMessageToSet(&data, true);
2950
2951    data.Initialize(SMSG_SPELL_FAILED_OTHER, (8+4));
2952    data.append(m_caster->GetPackGUID());
2953    data << m_spellInfo->Id;
2954    m_caster->SendMessageToSet(&data, true);
2955}
2956
2957void Spell::SendChannelUpdate(uint32 time)
2958{
2959    if(time == 0)
2960    {
2961        m_caster->SetUInt64Value(UNIT_FIELD_CHANNEL_OBJECT,0);
2962        m_caster->SetUInt32Value(UNIT_CHANNEL_SPELL,0);
2963    }
2964
2965    if (m_caster->GetTypeId() != TYPEID_PLAYER)
2966        return;
2967
2968    WorldPacket data( MSG_CHANNEL_UPDATE, 8+4 );
2969    data.append(m_caster->GetPackGUID());
2970    data << time;
2971
2972    ((Player*)m_caster)->GetSession()->SendPacket( &data );
2973}
2974
2975void Spell::SendChannelStart(uint32 duration)
2976{
2977    WorldObject* target = NULL;
2978
2979    // select first not rsusted target from target list for _0_ effect
2980    if(!m_UniqueTargetInfo.empty())
2981    {
2982        for(std::list<TargetInfo>::iterator itr= m_UniqueTargetInfo.begin();itr != m_UniqueTargetInfo.end();++itr)
2983        {
2984            if( (itr->effectMask & (1<<0)) && itr->reflectResult==SPELL_MISS_NONE && itr->targetGUID != m_caster->GetGUID())
2985            {
2986                target = ObjectAccessor::GetUnit(*m_caster, itr->targetGUID);
2987                break;
2988            }
2989        }
2990    }
2991    else if(!m_UniqueGOTargetInfo.empty())
2992    {
2993        for(std::list<GOTargetInfo>::iterator itr= m_UniqueGOTargetInfo.begin();itr != m_UniqueGOTargetInfo.end();++itr)
2994        {
2995            if(itr->effectMask & (1<<0) )
2996            {
2997                target = ObjectAccessor::GetGameObject(*m_caster, itr->targetGUID);
2998                break;
2999            }
3000        }
3001    }
3002
3003    if (m_caster->GetTypeId() == TYPEID_PLAYER)
3004    {
3005        WorldPacket data( MSG_CHANNEL_START, (8+4+4) );
3006        data.append(m_caster->GetPackGUID());
3007        data << m_spellInfo->Id;
3008        data << duration;
3009
3010        ((Player*)m_caster)->GetSession()->SendPacket( &data );
3011    }
3012
3013    m_timer = duration;
3014    if(target)
3015        m_caster->SetUInt64Value(UNIT_FIELD_CHANNEL_OBJECT, target->GetGUID());
3016    m_caster->SetUInt32Value(UNIT_CHANNEL_SPELL, m_spellInfo->Id);
3017}
3018
3019void Spell::SendResurrectRequest(Player* target)
3020{
3021    WorldPacket data(SMSG_RESURRECT_REQUEST, (8+4+2+4));
3022    data << m_caster->GetGUID();
3023    data << uint32(1) << uint16(0) << uint32(1);
3024
3025    target->GetSession()->SendPacket(&data);
3026}
3027
3028void Spell::SendPlaySpellVisual(uint32 SpellID)
3029{
3030    if (m_caster->GetTypeId() != TYPEID_PLAYER)
3031        return;
3032
3033    WorldPacket data(SMSG_PLAY_SPELL_VISUAL, 12);
3034    data << m_caster->GetGUID();
3035    data << SpellID;
3036    ((Player*)m_caster)->GetSession()->SendPacket(&data);
3037}
3038
3039void Spell::TakeCastItem()
3040{
3041    if(!m_CastItem || m_caster->GetTypeId() != TYPEID_PLAYER)
3042        return;
3043
3044    // not remove cast item at triggered spell (equipping, weapon damage, etc)
3045    if(m_IsTriggeredSpell)
3046        return;
3047
3048    ItemPrototype const *proto = m_CastItem->GetProto();
3049
3050    if(!proto)
3051    {
3052        // This code is to avoid a crash
3053        // I'm not sure, if this is really an error, but I guess every item needs a prototype
3054        sLog.outError("Cast item has no item prototype highId=%d, lowId=%d",m_CastItem->GetGUIDHigh(), m_CastItem->GetGUIDLow());
3055        return;
3056    }
3057
3058    bool expendable = false;
3059    bool withoutCharges = false;
3060
3061    for (int i = 0; i<5; i++)
3062    {
3063        if (proto->Spells[i].SpellId)
3064        {
3065            // item has limited charges
3066            if (proto->Spells[i].SpellCharges)
3067            {
3068                if (proto->Spells[i].SpellCharges < 0)
3069                    expendable = true;
3070
3071                int32 charges = m_CastItem->GetSpellCharges(i);
3072
3073                // item has charges left
3074                if (charges)
3075                {
3076                    (charges > 0) ? --charges : ++charges;  // abs(charges) less at 1 after use
3077                    if (proto->Stackable < 2)
3078                        m_CastItem->SetSpellCharges(i, charges);
3079                    m_CastItem->SetState(ITEM_CHANGED, (Player*)m_caster);
3080                }
3081
3082                // all charges used
3083                withoutCharges = (charges == 0);
3084            }
3085        }
3086    }
3087
3088    if (expendable && withoutCharges)
3089    {
3090        uint32 count = 1;
3091        ((Player*)m_caster)->DestroyItemCount(m_CastItem, count, true);
3092
3093        // prevent crash at access to deleted m_targets.getItemTarget
3094        if(m_CastItem==m_targets.getItemTarget())
3095            m_targets.setItemTarget(NULL);
3096
3097        m_CastItem = NULL;
3098    }
3099}
3100
3101void Spell::TakePower()
3102{
3103    if(m_CastItem || m_triggeredByAuraSpell)
3104        return;
3105
3106    // health as power used
3107    if(m_spellInfo->powerType == POWER_HEALTH)
3108    {
3109        m_caster->ModifyHealth( -(int32)m_powerCost );
3110        return;
3111    }
3112
3113    if(m_spellInfo->powerType >= MAX_POWERS)
3114    {
3115        sLog.outError("Spell::TakePower: Unknown power type '%d'", m_spellInfo->powerType);
3116        return;
3117    }
3118
3119    Powers powerType = Powers(m_spellInfo->powerType);
3120
3121    m_caster->ModifyPower(powerType, -(int32)m_powerCost);
3122
3123    // Set the five second timer
3124    if (powerType == POWER_MANA && m_powerCost > 0)
3125        m_caster->SetLastManaUse(getMSTime());
3126}
3127
3128void Spell::TakeReagents()
3129{
3130    if(m_IsTriggeredSpell)                                  // reagents used in triggered spell removed by original spell or don't must be removed.
3131        return;
3132
3133    if (m_caster->GetTypeId() != TYPEID_PLAYER)
3134        return;
3135
3136    if (m_spellInfo->AttributesEx5 & SPELL_ATTR_EX5_NO_REAGENT_WHILE_PREP &&
3137        m_caster->HasFlag(UNIT_FIELD_FLAGS, UNIT_FLAG_PREPARATION))
3138        return;
3139
3140    Player* p_caster = (Player*)m_caster;
3141
3142    for(uint32 x=0;x<8;x++)
3143    {
3144        if(m_spellInfo->Reagent[x] <= 0)
3145            continue;
3146
3147        uint32 itemid = m_spellInfo->Reagent[x];
3148        uint32 itemcount = m_spellInfo->ReagentCount[x];
3149
3150        // if CastItem is also spell reagent
3151        if (m_CastItem)
3152        {
3153            ItemPrototype const *proto = m_CastItem->GetProto();
3154            if( proto && proto->ItemId == itemid )
3155            {
3156                for(int s=0;s<5;s++)
3157                {
3158                    // CastItem will be used up and does not count as reagent
3159                    int32 charges = m_CastItem->GetSpellCharges(s);
3160                    if (proto->Spells[s].SpellCharges < 0 && abs(charges) < 2)
3161                    {
3162                        ++itemcount;
3163                        break;
3164                    }
3165                }
3166
3167                m_CastItem = NULL;
3168            }
3169        }
3170
3171        // if getItemTarget is also spell reagent
3172        if (m_targets.getItemTargetEntry()==itemid)
3173            m_targets.setItemTarget(NULL);
3174
3175        p_caster->DestroyItemCount(itemid, itemcount, true);
3176    }
3177}
3178
3179void Spell::HandleThreatSpells(uint32 spellId)
3180{
3181    if(!m_targets.getUnitTarget() || !spellId)
3182        return;
3183
3184    if(!m_targets.getUnitTarget()->CanHaveThreatList())
3185        return;
3186
3187    SpellThreatEntry const *threatSpell = sSpellThreatStore.LookupEntry<SpellThreatEntry>(spellId);
3188    if(!threatSpell)
3189        return;
3190
3191    m_targets.getUnitTarget()->AddThreat(m_caster, float(threatSpell->threat));
3192
3193    DEBUG_LOG("Spell %u, rank %u, added an additional %i threat", spellId, spellmgr.GetSpellRank(spellId), threatSpell->threat);
3194}
3195
3196void Spell::HandleEffects(Unit *pUnitTarget,Item *pItemTarget,GameObject *pGOTarget,uint32 i, float DamageMultiplier)
3197{
3198    unitTarget = pUnitTarget;
3199    itemTarget = pItemTarget;
3200    gameObjTarget = pGOTarget;
3201
3202    uint8 eff = m_spellInfo->Effect[i];
3203    uint32 mechanic = m_spellInfo->EffectMechanic[i];
3204
3205    damage = int32(CalculateDamage((uint8)i,unitTarget)*DamageMultiplier);
3206
3207    sLog.outDebug( "Spell: Effect : %u", eff);
3208
3209    //Simply return. Do not display "immune" in red text on client
3210    if(unitTarget && unitTarget->IsImmunedToSpellEffect(eff, mechanic))
3211        return;
3212
3213    if(eff<TOTAL_SPELL_EFFECTS)
3214    {
3215        //sLog.outDebug( "WORLD: Spell FX %d < TOTAL_SPELL_EFFECTS ", eff);
3216        (*this.*SpellEffects[eff])(i);
3217    }
3218    /*
3219    else
3220    {
3221        sLog.outDebug( "WORLD: Spell FX %d > TOTAL_SPELL_EFFECTS ", eff);
3222        if (m_CastItem)
3223            EffectEnchantItemTmp(i);
3224        else
3225        {
3226            sLog.outError("SPELL: unknown effect %u spell id %u\n",
3227                eff, m_spellInfo->Id);
3228        }
3229    }
3230    */
3231}
3232
3233void Spell::TriggerSpell()
3234{
3235    for(TriggerSpells::iterator si=m_TriggerSpells.begin(); si!=m_TriggerSpells.end(); ++si)
3236    {
3237        Spell* spell = new Spell(m_caster, (*si), true, m_originalCasterGUID, this->m_selfContainer);
3238        spell->prepare(&m_targets);                         // use original spell original targets
3239    }
3240}
3241
3242uint8 Spell::CanCast(bool strict)
3243{
3244    // check cooldowns to prevent cheating
3245    if(m_caster->GetTypeId()==TYPEID_PLAYER && ((Player*)m_caster)->HasSpellCooldown(m_spellInfo->Id))
3246    {
3247        if(m_triggeredByAuraSpell)
3248            return SPELL_FAILED_DONT_REPORT;
3249        else
3250            return SPELL_FAILED_NOT_READY;
3251    }
3252
3253    // only allow triggered spells if at an ended battleground
3254    if( !m_IsTriggeredSpell && m_caster->GetTypeId() == TYPEID_PLAYER)
3255        if(BattleGround * bg = ((Player*)m_caster)->GetBattleGround())
3256            if(bg->GetStatus() == STATUS_WAIT_LEAVE)
3257                return SPELL_FAILED_DONT_REPORT;
3258
3259    // only check at first call, Stealth auras are already removed at second call
3260    // for now, ignore triggered spells
3261    if( strict && !m_IsTriggeredSpell)
3262    {
3263        // Cannot be used in this stance/form
3264        if(uint8 shapeError = GetErrorAtShapeshiftedCast(m_spellInfo, m_caster->m_form))
3265            return shapeError;
3266
3267        if ((m_spellInfo->Attributes & SPELL_ATTR_ONLY_STEALTHED) && !(m_caster->HasStealthAura()))
3268            return SPELL_FAILED_ONLY_STEALTHED;
3269    }
3270
3271    // caster state requirements
3272    if(m_spellInfo->CasterAuraState && !m_caster->HasAuraState(AuraState(m_spellInfo->CasterAuraState)))
3273        return SPELL_FAILED_CASTER_AURASTATE;
3274    if(m_spellInfo->CasterAuraStateNot && m_caster->HasAuraState(AuraState(m_spellInfo->CasterAuraStateNot)))
3275        return SPELL_FAILED_CASTER_AURASTATE;
3276
3277    // cancel autorepeat spells if cast start when moving
3278    // (not wand currently autorepeat cast delayed to moving stop anyway in spell update code)
3279    if( m_caster->GetTypeId()==TYPEID_PLAYER && ((Player*)m_caster)->isMoving() )
3280    {
3281        // skip stuck spell to allow use it in falling case and apply spell limitations at movement
3282        if( (!m_caster->HasUnitMovementFlag(MOVEMENTFLAG_FALLING) || m_spellInfo->Effect[0] != SPELL_EFFECT_STUCK) &&
3283            (IsAutoRepeat() || (m_spellInfo->AuraInterruptFlags & AURA_INTERRUPT_FLAG_NOT_SEATED) != 0) )
3284            return SPELL_FAILED_MOVING;
3285    }
3286
3287    Unit *target = m_targets.getUnitTarget();
3288
3289    if(target)
3290    {
3291        // target state requirements (not allowed state), apply to self also
3292        if(m_spellInfo->TargetAuraStateNot && target->HasAuraState(AuraState(m_spellInfo->TargetAuraStateNot)))
3293            return SPELL_FAILED_TARGET_AURASTATE;
3294
3295
3296        if(target != m_caster)
3297        {
3298            // target state requirements (apply to non-self only), to allow cast affects to self like Dirty Deeds
3299            if(m_spellInfo->TargetAuraState && !target->HasAuraState(AuraState(m_spellInfo->TargetAuraState)))
3300                return SPELL_FAILED_TARGET_AURASTATE;
3301
3302            // Not allow casting on flying player
3303            if (target->isInFlight())
3304                return SPELL_FAILED_BAD_TARGETS;
3305
3306            if(VMAP::VMapFactory::checkSpellForLoS(m_spellInfo->Id) && !m_caster->IsWithinLOSInMap(target))
3307                return SPELL_FAILED_LINE_OF_SIGHT;
3308
3309            // auto selection spell rank implemented in WorldSession::HandleCastSpellOpcode
3310            // this case can be triggered if rank not found (too low-level target for first rank)
3311            if(m_caster->GetTypeId() == TYPEID_PLAYER && !IsPassiveSpell(m_spellInfo->Id) && !m_CastItem)
3312            {
3313                for(int i=0;i<3;i++)
3314                {
3315                    if(IsPositiveEffect(m_spellInfo->Id, i) && m_spellInfo->Effect[i] == SPELL_EFFECT_APPLY_AURA)
3316                        if(target->getLevel() + 10 < m_spellInfo->spellLevel)
3317                            return SPELL_FAILED_LOWLEVEL;
3318                }
3319            }
3320        }
3321
3322        // check pet presents
3323        for(int j=0;j<3;j++)
3324        {
3325            if(m_spellInfo->EffectImplicitTargetA[j] == TARGET_PET)
3326            {
3327                target = m_caster->GetPet();
3328                if(!target)
3329                {
3330                    if(m_triggeredByAuraSpell)              // not report pet not existence for triggered spells
3331                        return SPELL_FAILED_DONT_REPORT;
3332                    else
3333                        return SPELL_FAILED_NO_PET;
3334                }
3335                break;
3336            }
3337        }
3338
3339        //check creature type
3340        //ignore self casts (including area casts when caster selected as target)
3341        if(target != m_caster)
3342        {
3343            if(!CheckTargetCreatureType(target))
3344            {
3345                if(target->GetTypeId()==TYPEID_PLAYER)
3346                    return SPELL_FAILED_TARGET_IS_PLAYER;
3347                else
3348                    return SPELL_FAILED_BAD_TARGETS;
3349            }
3350        }
3351
3352        // TODO: this check can be applied and for player to prevent cheating when IsPositiveSpell will return always correct result.
3353        // check target for pet/charmed casts (not self targeted), self targeted cast used for area effects and etc
3354        if(m_caster != target && m_caster->GetTypeId()==TYPEID_UNIT && m_caster->GetCharmerOrOwnerGUID())
3355        {
3356            // check correctness positive/negative cast target (pet cast real check and cheating check)
3357            if(IsPositiveSpell(m_spellInfo->Id))
3358            {
3359                if(m_caster->IsHostileTo(target))
3360                    return SPELL_FAILED_BAD_TARGETS;
3361            }
3362            else
3363            {
3364                if(m_caster->IsFriendlyTo(target))
3365                    return SPELL_FAILED_BAD_TARGETS;
3366            }
3367        }
3368
3369        if(IsPositiveSpell(m_spellInfo->Id))
3370        {
3371            if(target->IsImmunedToSpell(m_spellInfo,false))
3372                return SPELL_FAILED_TARGET_AURASTATE;
3373        }
3374
3375        //Must be behind the target.
3376        if( m_spellInfo->AttributesEx2 == 0x100000 && (m_spellInfo->AttributesEx & 0x200) == 0x200 && target->HasInArc(M_PI, m_caster) )
3377        {
3378            SendInterrupted(2);
3379            return SPELL_FAILED_NOT_BEHIND;
3380        }
3381
3382        //Target must be facing you.
3383        if((m_spellInfo->Attributes == 0x150010) && !target->HasInArc(M_PI, m_caster) )
3384        {
3385            SendInterrupted(2);
3386            return SPELL_FAILED_NOT_INFRONT;
3387        }
3388
3389        // check if target is in combat
3390        if (target != m_caster && (m_spellInfo->AttributesEx & SPELL_ATTR_EX_NOT_IN_COMBAT_TARGET) && target->isInCombat())
3391        {
3392            return SPELL_FAILED_TARGET_AFFECTING_COMBAT;
3393        }
3394    }
3395    // Spell casted only on battleground
3396    if((m_spellInfo->AttributesEx3 & SPELL_ATTR_EX3_BATTLEGROUND) &&  m_caster->GetTypeId()==TYPEID_PLAYER)
3397        if(!((Player*)m_caster)->InBattleGround())
3398            return SPELL_FAILED_ONLY_BATTLEGROUNDS;
3399
3400    // do not allow spells to be cast in arenas
3401    // - with greater than 15 min CD without SPELL_ATTR_EX4_USABLE_IN_ARENA flag
3402    // - with SPELL_ATTR_EX4_NOT_USABLE_IN_ARENA flag
3403    if( (m_spellInfo->AttributesEx4 & SPELL_ATTR_EX4_NOT_USABLE_IN_ARENA) ||
3404        GetSpellRecoveryTime(m_spellInfo) > 15 * MINUTE * 1000 && !(m_spellInfo->AttributesEx4 & SPELL_ATTR_EX4_USABLE_IN_ARENA) )
3405        if(MapEntry const* mapEntry = sMapStore.LookupEntry(m_caster->GetMapId()))
3406            if(mapEntry->IsBattleArena())
3407                return SPELL_FAILED_NOT_IN_ARENA;
3408
3409    // zone check
3410    if(!IsSpellAllowedInLocation(m_spellInfo,m_caster->GetMapId(),m_caster->GetZoneId(),m_caster->GetAreaId()))
3411        return SPELL_FAILED_REQUIRES_AREA;
3412
3413    // not let players cast spells at mount (and let do it to creatures)
3414    if( m_caster->IsMounted() && m_caster->GetTypeId()==TYPEID_PLAYER && !m_IsTriggeredSpell &&
3415        !IsPassiveSpell(m_spellInfo->Id) && !(m_spellInfo->Attributes & SPELL_ATTR_CASTABLE_WHILE_MOUNTED) )
3416    {
3417        if(m_caster->isInFlight())
3418            return SPELL_FAILED_NOT_FLYING;
3419        else
3420            return SPELL_FAILED_NOT_MOUNTED;
3421    }
3422
3423    // always (except passive spells) check items (focus object can be required for any type casts)
3424    if(!IsPassiveSpell(m_spellInfo->Id))
3425        if(uint8 castResult = CheckItems())
3426            return castResult;
3427
3428    if(uint8 castResult = CheckRange(strict))
3429        return castResult;
3430
3431    {
3432        if(uint8 castResult = CheckPower())
3433            return castResult;
3434    }
3435
3436    if(!m_triggeredByAuraSpell)                             // triggered spell not affected by stun/etc
3437        if(uint8 castResult = CheckCasterAuras())
3438            return castResult;
3439
3440    for (int i = 0; i < 3; i++)
3441    {
3442        // for effects of spells that have only one target
3443        switch(m_spellInfo->Effect[i])
3444        {
3445            case SPELL_EFFECT_DUMMY:
3446            {
3447                if(m_spellInfo->SpellIconID == 1648)        // Execute
3448                {
3449                    if(!m_targets.getUnitTarget() || m_targets.getUnitTarget()->GetHealth() > m_targets.getUnitTarget()->GetMaxHealth()*0.2)
3450                        return SPELL_FAILED_BAD_TARGETS;
3451                }
3452                else if (m_spellInfo->Id == 51582)          // Rocket Boots Engaged
3453                {
3454                    if(m_caster->IsInWater())
3455                        return SPELL_FAILED_ONLY_ABOVEWATER;
3456                }
3457                else if(m_spellInfo->SpellIconID==156)      // Holy Shock
3458                {
3459                    // spell different for friends and enemies
3460                    // hart version required facing
3461                    if(m_targets.getUnitTarget() && !m_caster->IsFriendlyTo(m_targets.getUnitTarget()) && !m_caster->HasInArc( M_PI, target ))
3462                        return SPELL_FAILED_UNIT_NOT_INFRONT;
3463                }
3464                break;
3465            }
3466            case SPELL_EFFECT_SCHOOL_DAMAGE:
3467            {
3468                // Hammer of Wrath
3469                if(m_spellInfo->SpellVisual == 7250)
3470                {
3471                    if (!m_targets.getUnitTarget())
3472                        return SPELL_FAILED_BAD_IMPLICIT_TARGETS;
3473
3474                    if(m_targets.getUnitTarget()->GetHealth() > m_targets.getUnitTarget()->GetMaxHealth()*0.2)
3475                        return SPELL_FAILED_BAD_TARGETS;
3476                }
3477                break;
3478            }
3479            case SPELL_EFFECT_TAMECREATURE:
3480            {
3481                if (!m_targets.getUnitTarget() || m_targets.getUnitTarget()->GetTypeId() == TYPEID_PLAYER)
3482                    return SPELL_FAILED_BAD_IMPLICIT_TARGETS;
3483
3484                if (m_targets.getUnitTarget()->getLevel() > m_caster->getLevel())
3485                    return SPELL_FAILED_HIGHLEVEL;
3486
3487                CreatureInfo const *cinfo = ((Creature*)m_targets.getUnitTarget())->GetCreatureInfo();
3488                if( cinfo->type != CREATURE_TYPE_BEAST )
3489                    return SPELL_FAILED_BAD_TARGETS;
3490
3491                // use SMSG_PET_TAME_FAILURE?
3492                if( !(cinfo->flag1 & 1) || !(cinfo->family) )
3493                    return SPELL_FAILED_BAD_TARGETS;
3494
3495                if(m_caster->GetPetGUID())
3496                    return SPELL_FAILED_ALREADY_HAVE_SUMMON;
3497
3498                if(m_caster->GetCharmGUID())
3499                    return SPELL_FAILED_ALREADY_HAVE_CHARM;
3500
3501                break;
3502            }
3503            case SPELL_EFFECT_LEARN_SPELL:
3504            {
3505                if(m_spellInfo->EffectImplicitTargetA[i] != TARGET_PET)
3506                    break;
3507
3508                Pet* pet = m_caster->GetPet();
3509
3510                if(!pet)
3511                    return SPELL_FAILED_NO_PET;
3512
3513                SpellEntry const *learn_spellproto = sSpellStore.LookupEntry(m_spellInfo->EffectTriggerSpell[i]);
3514
3515                if(!learn_spellproto)
3516                    return SPELL_FAILED_NOT_KNOWN;
3517
3518                if(!pet->CanTakeMoreActiveSpells(learn_spellproto->Id))
3519                    return SPELL_FAILED_TOO_MANY_SKILLS;
3520
3521                if(m_spellInfo->spellLevel > pet->getLevel())
3522                    return SPELL_FAILED_LOWLEVEL;
3523
3524                if(!pet->HasTPForSpell(learn_spellproto->Id))
3525                    return SPELL_FAILED_TRAINING_POINTS;
3526
3527                break;
3528            }
3529            case SPELL_EFFECT_LEARN_PET_SPELL:
3530            {
3531                Pet* pet = m_caster->GetPet();
3532
3533                if(!pet)
3534                    return SPELL_FAILED_NO_PET;
3535
3536                SpellEntry const *learn_spellproto = sSpellStore.LookupEntry(m_spellInfo->EffectTriggerSpell[i]);
3537
3538                if(!learn_spellproto)
3539                    return SPELL_FAILED_NOT_KNOWN;
3540
3541                if(!pet->CanTakeMoreActiveSpells(learn_spellproto->Id))
3542                    return SPELL_FAILED_TOO_MANY_SKILLS;
3543
3544                if(m_spellInfo->spellLevel > pet->getLevel())
3545                    return SPELL_FAILED_LOWLEVEL;
3546
3547                if(!pet->HasTPForSpell(learn_spellproto->Id))
3548                    return SPELL_FAILED_TRAINING_POINTS;
3549
3550                break;
3551            }
3552            case SPELL_EFFECT_FEED_PET:
3553            {
3554                if (m_caster->GetTypeId() != TYPEID_PLAYER || !m_targets.getItemTarget() )
3555                    return SPELL_FAILED_BAD_TARGETS;
3556
3557                Pet* pet = m_caster->GetPet();
3558
3559                if(!pet)
3560                    return SPELL_FAILED_NO_PET;
3561
3562                if(!pet->HaveInDiet(m_targets.getItemTarget()->GetProto()))
3563                    return SPELL_FAILED_WRONG_PET_FOOD;
3564
3565                if(!pet->GetCurrentFoodBenefitLevel(m_targets.getItemTarget()->GetProto()->ItemLevel))
3566                    return SPELL_FAILED_FOOD_LOWLEVEL;
3567
3568                if(m_caster->isInCombat() || pet->isInCombat())
3569                    return SPELL_FAILED_AFFECTING_COMBAT;
3570
3571                break;
3572            }
3573            case SPELL_EFFECT_POWER_BURN:
3574            case SPELL_EFFECT_POWER_DRAIN:
3575            {
3576                // Can be area effect, Check only for players and not check if target - caster (spell can have multiply drain/burn effects)
3577                if(m_caster->GetTypeId() == TYPEID_PLAYER)
3578                    if(Unit* target = m_targets.getUnitTarget())
3579                        if(target!=m_caster && target->getPowerType()!=m_spellInfo->EffectMiscValue[i])
3580                            return SPELL_FAILED_BAD_TARGETS;
3581                break;
3582            }
3583            case SPELL_EFFECT_CHARGE:
3584            {
3585                if (m_caster->hasUnitState(UNIT_STAT_ROOT))
3586                    return SPELL_FAILED_ROOTED;
3587
3588                break;
3589            }
3590            case SPELL_EFFECT_SKINNING:
3591            {
3592                if (m_caster->GetTypeId() != TYPEID_PLAYER || !m_targets.getUnitTarget() || m_targets.getUnitTarget()->GetTypeId() != TYPEID_UNIT)
3593                    return SPELL_FAILED_BAD_TARGETS;
3594
3595                if( !(m_targets.getUnitTarget()->GetUInt32Value(UNIT_FIELD_FLAGS) & UNIT_FLAG_SKINNABLE) )
3596                    return SPELL_FAILED_TARGET_UNSKINNABLE;
3597
3598                Creature* creature = (Creature*)m_targets.getUnitTarget();
3599                if ( creature->GetCreatureType() != CREATURE_TYPE_CRITTER && ( !creature->lootForBody || !creature->loot.empty() ) )
3600                {
3601                    return SPELL_FAILED_TARGET_NOT_LOOTED;
3602                }
3603
3604                uint32 skill;
3605                if(creature->GetCreatureInfo()->flag1 & 256)
3606                    skill = SKILL_HERBALISM;                // special case
3607                else if(creature->GetCreatureInfo()->flag1 & 512)
3608                    skill = SKILL_MINING;                   // special case
3609                else
3610                    skill = SKILL_SKINNING;                 // normal case
3611
3612                int32 skillValue = ((Player*)m_caster)->GetSkillValue(skill);
3613                int32 TargetLevel = m_targets.getUnitTarget()->getLevel();
3614                int32 ReqValue = (skillValue < 100 ? (TargetLevel-10)*10 : TargetLevel*5);
3615                if (ReqValue > skillValue)
3616                    return SPELL_FAILED_LOW_CASTLEVEL;
3617
3618                // chance for fail at orange skinning attempt
3619                if( (m_selfContainer && (*m_selfContainer) == this) &&
3620                    skillValue < sWorld.GetConfigMaxSkillValue() &&
3621                    (ReqValue < 0 ? 0 : ReqValue) > irand(skillValue-25, skillValue+37) )
3622                    return SPELL_FAILED_TRY_AGAIN;
3623
3624                break;
3625            }
3626            case SPELL_EFFECT_OPEN_LOCK_ITEM:
3627            case SPELL_EFFECT_OPEN_LOCK:
3628            {
3629                if( m_spellInfo->EffectImplicitTargetA[i] != TARGET_GAMEOBJECT &&
3630                    m_spellInfo->EffectImplicitTargetA[i] != TARGET_GAMEOBJECT_ITEM )
3631                    break;
3632
3633                if( m_caster->GetTypeId() != TYPEID_PLAYER  // only players can open locks, gather etc.
3634                    // we need a go target in case of TARGET_GAMEOBJECT
3635                    || m_spellInfo->EffectImplicitTargetA[i] == TARGET_GAMEOBJECT && !m_targets.getGOTarget()
3636                    // we need a go target, or an openable item target in case of TARGET_GAMEOBJECT_ITEM
3637                    || m_spellInfo->EffectImplicitTargetA[i] == TARGET_GAMEOBJECT_ITEM && !m_targets.getGOTarget() &&
3638                    (!m_targets.getItemTarget() || !m_targets.getItemTarget()->GetProto()->LockID || m_targets.getItemTarget()->GetOwner() != m_caster ) )
3639                    return SPELL_FAILED_BAD_TARGETS;
3640
3641                // In BattleGround players can use only flags and banners
3642                if( ((Player*)m_caster)->InBattleGround() &&
3643                    !((Player*)m_caster)->isAllowUseBattleGroundObject() )
3644                    return SPELL_FAILED_TRY_AGAIN;
3645
3646                // get the lock entry
3647                LockEntry const *lockInfo = NULL;
3648                if (GameObject* go=m_targets.getGOTarget())
3649                    lockInfo = sLockStore.LookupEntry(go->GetLockId());
3650                else if(Item* itm=m_targets.getItemTarget())
3651                    lockInfo = sLockStore.LookupEntry(itm->GetProto()->LockID);
3652
3653                // check lock compatibility
3654                if (lockInfo)
3655                {
3656                    // check for lock - key pair (checked by client also, just prevent cheating
3657                    bool ok_key = false;
3658                    for(int it = 0; it < 5; ++it)
3659                    {
3660                        switch(lockInfo->keytype[it])
3661                        {
3662                            case LOCK_KEY_NONE:
3663                                break;
3664                            case LOCK_KEY_ITEM:
3665                            {
3666                                if(lockInfo->key[it])
3667                                {
3668                                    if(m_CastItem && m_CastItem->GetEntry()==lockInfo->key[it])
3669                                        ok_key =true;
3670                                    break;
3671                                }
3672                            }
3673                            case LOCK_KEY_SKILL:
3674                            {
3675                                if(uint32(m_spellInfo->EffectMiscValue[i])!=lockInfo->key[it])
3676                                    break;
3677
3678                                switch(lockInfo->key[it])
3679                                {
3680                                    case LOCKTYPE_HERBALISM:
3681                                        if(((Player*)m_caster)->HasSkill(SKILL_HERBALISM))
3682                                            ok_key =true;
3683                                        break;
3684                                    case LOCKTYPE_MINING:
3685                                        if(((Player*)m_caster)->HasSkill(SKILL_MINING))
3686                                            ok_key =true;
3687                                        break;
3688                                    default:
3689                                        ok_key =true;
3690                                        break;
3691                                }
3692                            }
3693                        }
3694                        if(ok_key)
3695                            break;
3696                    }
3697
3698                    if(!ok_key)
3699                        return SPELL_FAILED_BAD_TARGETS;
3700                }
3701
3702                // chance for fail at orange mining/herb/LockPicking gathering attempt
3703                if (!m_selfContainer || ((*m_selfContainer) != this))
3704                    break;
3705
3706                // get the skill value of the player
3707                int32 SkillValue = 0;
3708                bool canFailAtMax = true;
3709                if (m_spellInfo->EffectMiscValue[i] == LOCKTYPE_HERBALISM)
3710                {
3711                    SkillValue = ((Player*)m_caster)->GetSkillValue(SKILL_HERBALISM);
3712                    canFailAtMax = false;
3713                }
3714                else if (m_spellInfo->EffectMiscValue[i] == LOCKTYPE_MINING)
3715                {
3716                    SkillValue = ((Player*)m_caster)->GetSkillValue(SKILL_MINING);
3717                    canFailAtMax = false;
3718                }
3719                else if (m_spellInfo->EffectMiscValue[i] == LOCKTYPE_PICKLOCK)
3720                    SkillValue = ((Player*)m_caster)->GetSkillValue(SKILL_LOCKPICKING);
3721
3722                // castitem check: rogue using skeleton keys. the skill values should not be added in this case.
3723                if(m_CastItem)
3724                    SkillValue = 0;
3725
3726                // add the damage modifier from the spell casted (cheat lock / skeleton key etc.) (use m_currentBasePoints, CalculateDamage returns wrong value)
3727                SkillValue += m_currentBasePoints[i]+1;
3728
3729                // get the required lock value
3730                int32 ReqValue=0;
3731                if (lockInfo)
3732                {
3733                    // check for lock - key pair
3734                    bool ok = false;
3735                    for(int it = 0; it < 5; ++it)
3736                    {
3737                        if(lockInfo->keytype[it]==LOCK_KEY_ITEM && lockInfo->key[it] && m_CastItem && m_CastItem->GetEntry()==lockInfo->key[it])
3738                        {
3739                            // if so, we're good to go
3740                            ok = true;
3741                            break;
3742                        }
3743                    }
3744                    if(ok)
3745                        break;
3746
3747                    if (m_spellInfo->EffectMiscValue[i] == LOCKTYPE_PICKLOCK)
3748                        ReqValue = lockInfo->requiredlockskill;
3749                    else
3750                        ReqValue = lockInfo->requiredminingskill;
3751                }
3752
3753                // skill doesn't meet the required value
3754                if (ReqValue > SkillValue)
3755                    return SPELL_FAILED_LOW_CASTLEVEL;
3756
3757                // chance for failure in orange gather / lockpick (gathering skill can't fail at maxskill)
3758                if((canFailAtMax || SkillValue < sWorld.GetConfigMaxSkillValue()) && ReqValue > irand(SkillValue-25, SkillValue+37))
3759                    return SPELL_FAILED_TRY_AGAIN;
3760
3761                break;
3762            }
3763            case SPELL_EFFECT_SUMMON_DEAD_PET:
3764            {
3765                Creature *pet = m_caster->GetPet();
3766                if(!pet)
3767                    return SPELL_FAILED_NO_PET;
3768
3769                if(pet->isAlive())
3770                    return SPELL_FAILED_ALREADY_HAVE_SUMMON;
3771
3772                break;
3773            }
3774            // This is generic summon effect now and don't make this check for summon types similar
3775            // SPELL_EFFECT_SUMMON_CRITTER, SPELL_EFFECT_SUMMON_WILD or SPELL_EFFECT_SUMMON_GUARDIAN.
3776            // These won't show up in m_caster->GetPetGUID()
3777            case SPELL_EFFECT_SUMMON:
3778            {
3779                switch(m_spellInfo->EffectMiscValueB[i])
3780                {
3781                    case SUMMON_TYPE_POSESSED:
3782                    case SUMMON_TYPE_POSESSED2:
3783                    case SUMMON_TYPE_DEMON:
3784                    case SUMMON_TYPE_SUMMON:
3785                    {
3786                        if(m_caster->GetPetGUID())
3787                            return SPELL_FAILED_ALREADY_HAVE_SUMMON;
3788
3789                        if(m_caster->GetCharmGUID())
3790                            return SPELL_FAILED_ALREADY_HAVE_CHARM;
3791                        break;
3792                    }
3793                }
3794                break;
3795            }
3796            // Don't make this check for SPELL_EFFECT_SUMMON_CRITTER, SPELL_EFFECT_SUMMON_WILD or SPELL_EFFECT_SUMMON_GUARDIAN.
3797            // These won't show up in m_caster->GetPetGUID()
3798            case SPELL_EFFECT_SUMMON_POSSESSED:
3799            case SPELL_EFFECT_SUMMON_PHANTASM:
3800            case SPELL_EFFECT_SUMMON_DEMON:
3801            {
3802                if(m_caster->GetPetGUID())
3803                    return SPELL_FAILED_ALREADY_HAVE_SUMMON;
3804
3805                if(m_caster->GetCharmGUID())
3806                    return SPELL_FAILED_ALREADY_HAVE_CHARM;
3807
3808                break;
3809            }
3810            case SPELL_EFFECT_SUMMON_PET:
3811            {
3812                if(m_caster->GetPetGUID())                  //let warlock do a replacement summon
3813                {
3814
3815                    Pet* pet = ((Player*)m_caster)->GetPet();
3816
3817                    if (m_caster->GetTypeId()==TYPEID_PLAYER && m_caster->getClass()==CLASS_WARLOCK)
3818                    {
3819                        if (strict)                         //starting cast, trigger pet stun (cast by pet so it doesn't attack player)
3820                            pet->CastSpell(pet, 32752, true, NULL, NULL, pet->GetGUID());
3821                    }
3822                    else
3823                        return SPELL_FAILED_ALREADY_HAVE_SUMMON;
3824                }
3825
3826                if(m_caster->GetCharmGUID())
3827                    return SPELL_FAILED_ALREADY_HAVE_CHARM;
3828
3829                break;
3830            }
3831            case SPELL_EFFECT_SUMMON_PLAYER:
3832            {
3833                if(m_caster->GetTypeId()!=TYPEID_PLAYER)
3834                    return SPELL_FAILED_BAD_TARGETS;
3835                if(!((Player*)m_caster)->GetSelection())
3836                    return SPELL_FAILED_BAD_TARGETS;
3837
3838                Player* target = objmgr.GetPlayer(((Player*)m_caster)->GetSelection());
3839                if( !target || ((Player*)m_caster)==target || !target->IsInSameRaidWith((Player*)m_caster) )
3840                    return SPELL_FAILED_BAD_TARGETS;
3841
3842                // check if our map is dungeon
3843                if( sMapStore.LookupEntry(m_caster->GetMapId())->IsDungeon() )
3844                {
3845                    InstanceTemplate const* instance = ObjectMgr::GetInstanceTemplate(m_caster->GetMapId());
3846                    if(!instance)
3847                        return SPELL_FAILED_TARGET_NOT_IN_INSTANCE;
3848                    if ( instance->levelMin > target->getLevel() )
3849                        return SPELL_FAILED_LOWLEVEL;
3850                    if ( instance->levelMax && instance->levelMax < target->getLevel() )
3851                        return SPELL_FAILED_HIGHLEVEL;
3852                }
3853                break;
3854            }
3855            case SPELL_EFFECT_LEAP:
3856            case SPELL_EFFECT_TELEPORT_UNITS_FACE_CASTER:
3857            {
3858                float dis = GetSpellRadius(sSpellRadiusStore.LookupEntry(m_spellInfo->EffectRadiusIndex[i]));
3859                float fx = m_caster->GetPositionX() + dis * cos(m_caster->GetOrientation());
3860                float fy = m_caster->GetPositionY() + dis * sin(m_caster->GetOrientation());
3861                // teleport a bit above terrain level to avoid falling below it
3862                float fz = MapManager::Instance().GetBaseMap(m_caster->GetMapId())->GetHeight(fx,fy,m_caster->GetPositionZ(),true);
3863                if(fz <= INVALID_HEIGHT)                    // note: this also will prevent use effect in instances without vmaps height enabled
3864                    return SPELL_FAILED_TRY_AGAIN;
3865
3866                float caster_pos_z = m_caster->GetPositionZ();
3867                // Control the caster to not climb or drop when +-fz > 8
3868                if(!(fz<=caster_pos_z+8 && fz>=caster_pos_z-8))
3869                    return SPELL_FAILED_TRY_AGAIN;
3870
3871                // not allow use this effect at battleground until battleground start
3872                if(m_caster->GetTypeId()==TYPEID_PLAYER)
3873                    if(BattleGround const *bg = ((Player*)m_caster)->GetBattleGround())
3874                        if(bg->GetStatus() != STATUS_IN_PROGRESS)
3875                            return SPELL_FAILED_TRY_AGAIN;
3876                break;
3877            }
3878            case SPELL_EFFECT_STEAL_BENEFICIAL_BUFF:
3879            {
3880                if (m_targets.getUnitTarget()==m_caster)
3881                    return SPELL_FAILED_BAD_TARGETS;
3882                break;
3883            }
3884            default:break;
3885        }
3886    }
3887
3888    for (int i = 0; i < 3; i++)
3889    {
3890        switch(m_spellInfo->EffectApplyAuraName[i])
3891        {
3892            case SPELL_AURA_MOD_POSSESS:
3893            case SPELL_AURA_MOD_CHARM:
3894            {
3895                if(m_caster->GetPetGUID())
3896                    return SPELL_FAILED_ALREADY_HAVE_SUMMON;
3897
3898                if(m_caster->GetCharmGUID())
3899                    return SPELL_FAILED_ALREADY_HAVE_CHARM;
3900
3901                if(m_caster->GetCharmerGUID())
3902                    return SPELL_FAILED_CHARMED;
3903
3904                if(!m_targets.getUnitTarget())
3905                    return SPELL_FAILED_BAD_IMPLICIT_TARGETS;
3906
3907                if(m_targets.getUnitTarget()->GetCharmerGUID())
3908                    return SPELL_FAILED_CHARMED;
3909
3910                if(int32(m_targets.getUnitTarget()->getLevel()) > CalculateDamage(i,m_targets.getUnitTarget()))
3911                    return SPELL_FAILED_HIGHLEVEL;
3912            };break;
3913            case SPELL_AURA_MOUNTED:
3914            {
3915                if (m_caster->IsInWater())
3916                    return SPELL_FAILED_ONLY_ABOVEWATER;
3917
3918                if (m_caster->GetTypeId()==TYPEID_PLAYER && ((Player*)m_caster)->GetTransport())
3919                    return SPELL_FAILED_NO_MOUNTS_ALLOWED;
3920
3921                // Ignore map check if spell have AreaId. AreaId already checked and this prevent special mount spells
3922                if (m_caster->GetTypeId()==TYPEID_PLAYER && !sMapStore.LookupEntry(m_caster->GetMapId())->IsMountAllowed() && !m_IsTriggeredSpell && !m_spellInfo->AreaId)
3923                    return SPELL_FAILED_NO_MOUNTS_ALLOWED;
3924
3925                if (m_caster->GetAreaId()==35)
3926                    return SPELL_FAILED_NO_MOUNTS_ALLOWED;
3927
3928                ShapeshiftForm form = m_caster->m_form;
3929                if( form == FORM_CAT          || form == FORM_TREE      || form == FORM_TRAVEL   ||
3930                    form == FORM_AQUA         || form == FORM_BEAR      || form == FORM_DIREBEAR ||
3931                    form == FORM_CREATUREBEAR || form == FORM_GHOSTWOLF || form == FORM_FLIGHT   ||
3932                    form == FORM_FLIGHT_EPIC  || form == FORM_MOONKIN )
3933                    return SPELL_FAILED_NOT_SHAPESHIFT;
3934
3935                break;
3936            }
3937            case SPELL_AURA_RANGED_ATTACK_POWER_ATTACKER_BONUS:
3938            {
3939                if(!m_targets.getUnitTarget())
3940                    return SPELL_FAILED_BAD_IMPLICIT_TARGETS;
3941
3942                // can be casted at non-friendly unit or own pet/charm
3943                if(m_caster->IsFriendlyTo(m_targets.getUnitTarget()))
3944                    return SPELL_FAILED_TARGET_FRIENDLY;
3945            };break;
3946            case SPELL_AURA_MOD_INCREASE_FLIGHT_SPEED:
3947            case SPELL_AURA_FLY:
3948            {
3949                // not allow cast fly spells at old maps by players (all spells is self target)
3950                if(m_caster->GetTypeId()==TYPEID_PLAYER)
3951                {
3952                    if( !((Player*)m_caster)->isGameMaster() &&
3953                        GetVirtualMapForMapAndZone(m_caster->GetMapId(),m_caster->GetZoneId()) != 530)
3954                        return SPELL_FAILED_NOT_HERE;
3955                }
3956            };break;
3957            case SPELL_AURA_PERIODIC_MANA_LEECH:
3958            {
3959                if (!m_targets.getUnitTarget())
3960                    return SPELL_FAILED_BAD_IMPLICIT_TARGETS;
3961
3962                if (m_caster->GetTypeId()!=TYPEID_PLAYER || m_CastItem)
3963                    break;
3964
3965                if(m_targets.getUnitTarget()->getPowerType()!=POWER_MANA)
3966                    return SPELL_FAILED_BAD_TARGETS;
3967                break;
3968            }
3969            default:break;
3970        }
3971    }
3972
3973    // all ok
3974    return 0;
3975}
3976
3977int16 Spell::PetCanCast(Unit* target)
3978{
3979    if(!m_caster->isAlive())
3980        return SPELL_FAILED_CASTER_DEAD;
3981
3982    if(m_caster->IsNonMeleeSpellCasted(false))              //prevent spellcast interuption by another spellcast
3983        return SPELL_FAILED_SPELL_IN_PROGRESS;
3984    if(m_caster->isInCombat() && IsNonCombatSpell(m_spellInfo))
3985        return SPELL_FAILED_AFFECTING_COMBAT;
3986
3987    if(m_caster->GetTypeId()==TYPEID_UNIT && (((Creature*)m_caster)->isPet() || m_caster->isCharmed()))
3988    {
3989                                                            //dead owner (pets still alive when owners ressed?)
3990        if(m_caster->GetCharmerOrOwner() && !m_caster->GetCharmerOrOwner()->isAlive())
3991            return SPELL_FAILED_CASTER_DEAD;
3992
3993        if(!target && m_targets.getUnitTarget())
3994            target = m_targets.getUnitTarget();
3995
3996        bool need = false;
3997        for(uint32 i = 0;i<3;i++)
3998        {
3999            if(m_spellInfo->EffectImplicitTargetA[i] == TARGET_CHAIN_DAMAGE || m_spellInfo->EffectImplicitTargetA[i] == TARGET_SINGLE_FRIEND || m_spellInfo->EffectImplicitTargetA[i] == TARGET_DUELVSPLAYER || m_spellInfo->EffectImplicitTargetA[i] == TARGET_SINGLE_PARTY || m_spellInfo->EffectImplicitTargetA[i] == TARGET_CURRENT_ENEMY_COORDINATES)
4000            {
4001                need = true;
4002                if(!target)
4003                    return SPELL_FAILED_BAD_IMPLICIT_TARGETS;
4004                break;
4005            }
4006        }
4007        if(need)
4008            m_targets.setUnitTarget(target);
4009
4010        Unit* _target = m_targets.getUnitTarget();
4011
4012        if(_target)                                         //for target dead/target not valid
4013        {
4014            if(!_target->isAlive())
4015                return SPELL_FAILED_BAD_TARGETS;
4016
4017            if(IsPositiveSpell(m_spellInfo->Id))
4018            {
4019                if(m_caster->IsHostileTo(_target))
4020                    return SPELL_FAILED_BAD_TARGETS;
4021            }
4022            else
4023            {
4024                bool duelvsplayertar = false;
4025                for(int j=0;j<3;j++)
4026                {
4027                                                            //TARGET_DUELVSPLAYER is positive AND negative
4028                    duelvsplayertar |= (m_spellInfo->EffectImplicitTargetA[j] == TARGET_DUELVSPLAYER);
4029                }
4030                if(m_caster->IsFriendlyTo(target) && !duelvsplayertar)
4031                {
4032                    return SPELL_FAILED_BAD_TARGETS;
4033                }
4034            }
4035        }
4036                                                            //cooldown
4037        if(((Creature*)m_caster)->HasSpellCooldown(m_spellInfo->Id))
4038            return SPELL_FAILED_NOT_READY;
4039    }
4040
4041    uint16 result = CanCast(true);
4042    if(result != 0)
4043        return result;
4044    else
4045        return -1;                                          //this allows to check spell fail 0, in combat
4046}
4047
4048uint8 Spell::CheckCasterAuras() const
4049{
4050    // Flag drop spells totally immuned to caster auras
4051    // FIXME: find more nice check for all totally immuned spells
4052    // AttributesEx3 & 0x10000000?
4053    if(m_spellInfo->Id==23336 || m_spellInfo->Id==23334 || m_spellInfo->Id==34991)
4054        return 0;
4055
4056    uint8 school_immune = 0;
4057    uint32 mechanic_immune = 0;
4058    uint32 dispel_immune = 0;
4059
4060    //Check if the spell grants school or mechanic immunity.
4061    //We use bitmasks so the loop is done only once and not on every aura check below.
4062    if ( m_spellInfo->AttributesEx & SPELL_ATTR_EX_DISPEL_AURAS_ON_IMMUNITY )
4063    {
4064        for(int i = 0;i < 3; i ++)
4065        {
4066            if(m_spellInfo->EffectApplyAuraName[i] == SPELL_AURA_SCHOOL_IMMUNITY)
4067                school_immune |= uint32(m_spellInfo->EffectMiscValue[i]);
4068            else if(m_spellInfo->EffectApplyAuraName[i] == SPELL_AURA_MECHANIC_IMMUNITY)
4069                mechanic_immune |= 1 << uint32(m_spellInfo->EffectMiscValue[i]);
4070            else if(m_spellInfo->EffectApplyAuraName[i] == SPELL_AURA_DISPEL_IMMUNITY)
4071                dispel_immune |= GetDispellMask(DispelType(m_spellInfo->EffectMiscValue[i]));
4072        }
4073        //immune movement impairement and loss of control
4074        if(m_spellInfo->Id==(uint32)42292)
4075            mechanic_immune = IMMUNE_TO_MOVEMENT_IMPAIRMENT_AND_LOSS_CONTROL_MASK;
4076    }
4077
4078    //Check whether the cast should be prevented by any state you might have.
4079    uint8 prevented_reason = 0;
4080    // Have to check if there is a stun aura. Otherwise will have problems with ghost aura apply while logging out
4081    if(!(m_spellInfo->AttributesEx5 & SPELL_ATTR_EX5_USABLE_WHILE_STUNNED) && m_caster->HasAuraType(SPELL_AURA_MOD_STUN))
4082        prevented_reason = SPELL_FAILED_STUNNED;
4083    else if(m_caster->HasFlag(UNIT_FIELD_FLAGS, UNIT_FLAG_CONFUSED) && !(m_spellInfo->AttributesEx5 & SPELL_ATTR_EX5_USABLE_WHILE_CONFUSED))
4084        prevented_reason = SPELL_FAILED_CONFUSED;
4085    else if(m_caster->HasFlag(UNIT_FIELD_FLAGS, UNIT_FLAG_FLEEING) && !(m_spellInfo->AttributesEx5 & SPELL_ATTR_EX5_USABLE_WHILE_FEARED))
4086        prevented_reason = SPELL_FAILED_FLEEING;
4087    else if(m_caster->HasFlag(UNIT_FIELD_FLAGS, UNIT_FLAG_SILENCED) && m_spellInfo->PreventionType==SPELL_PREVENTION_TYPE_SILENCE)
4088        prevented_reason = SPELL_FAILED_SILENCED;
4089    else if(m_caster->HasFlag(UNIT_FIELD_FLAGS, UNIT_FLAG_PACIFIED) && m_spellInfo->PreventionType==SPELL_PREVENTION_TYPE_PACIFY)
4090        prevented_reason = SPELL_FAILED_PACIFIED;
4091
4092    // Attr must make flag drop spell totally immuned from all effects
4093    if(prevented_reason)
4094    {
4095        if(school_immune || mechanic_immune || dispel_immune)
4096        {
4097            //Checking auras is needed now, because you are prevented by some state but the spell grants immunity.
4098            Unit::AuraMap const& auras = m_caster->GetAuras();
4099            for(Unit::AuraMap::const_iterator itr = auras.begin(); itr != auras.end(); itr++)
4100            {
4101                if(itr->second)
4102                {
4103                    if( GetSpellMechanicMask(itr->second->GetSpellProto(), itr->second->GetEffIndex()) & mechanic_immune )
4104                        continue;
4105                    if( GetSpellSchoolMask(itr->second->GetSpellProto()) & school_immune )
4106                        continue;
4107                    if( (1<<(itr->second->GetSpellProto()->Dispel)) & dispel_immune)
4108                        continue;
4109
4110                    //Make a second check for spell failed so the right SPELL_FAILED message is returned.
4111                    //That is needed when your casting is prevented by multiple states and you are only immune to some of them.
4112                    switch(itr->second->GetModifier()->m_auraname)
4113                    {
4114                        case SPELL_AURA_MOD_STUN:
4115                            if (!(m_spellInfo->AttributesEx5 & SPELL_ATTR_EX5_USABLE_WHILE_STUNNED))
4116                                return SPELL_FAILED_STUNNED;
4117                            break;
4118                        case SPELL_AURA_MOD_CONFUSE:
4119                            if (!(m_spellInfo->AttributesEx5 & SPELL_ATTR_EX5_USABLE_WHILE_CONFUSED))
4120                                return SPELL_FAILED_CONFUSED;
4121                            break;
4122                        case SPELL_AURA_MOD_FEAR:
4123                            if (!(m_spellInfo->AttributesEx5 & SPELL_ATTR_EX5_USABLE_WHILE_FEARED))
4124                                return SPELL_FAILED_FLEEING;
4125                            break;
4126                        case SPELL_AURA_MOD_SILENCE:
4127                        case SPELL_AURA_MOD_PACIFY:
4128                        case SPELL_AURA_MOD_PACIFY_SILENCE:
4129                            if( m_spellInfo->PreventionType==SPELL_PREVENTION_TYPE_PACIFY)
4130                                return SPELL_FAILED_PACIFIED;
4131                            else if ( m_spellInfo->PreventionType==SPELL_PREVENTION_TYPE_SILENCE)
4132                                return SPELL_FAILED_SILENCED;
4133                            break;
4134                    }
4135                }
4136            }
4137        }
4138        //You are prevented from casting and the spell casted does not grant immunity. Return a failed error.
4139        else
4140            return prevented_reason;
4141    }
4142    return 0;                                               // all ok
4143}
4144
4145bool Spell::CanAutoCast(Unit* target)
4146{
4147    uint64 targetguid = target->GetGUID();
4148
4149    for(uint32 j = 0;j<3;j++)
4150    {
4151        if(m_spellInfo->Effect[j] == SPELL_EFFECT_APPLY_AURA)
4152        {
4153            if( m_spellInfo->StackAmount <= 1)
4154            {
4155                if( target->HasAura(m_spellInfo->Id, j) )
4156                    return false;
4157            }
4158            else
4159            {
4160                if( target->GetAuras().count(Unit::spellEffectPair(m_spellInfo->Id, j)) >= m_spellInfo->StackAmount)
4161                    return false;
4162            }
4163        }
4164        else if ( IsAreaAuraEffect( m_spellInfo->Effect[j] ))
4165        {
4166                if( target->HasAura(m_spellInfo->Id, j) )
4167                    return false;
4168        }
4169    }
4170
4171    int16 result = PetCanCast(target);
4172
4173    if(result == -1 || result == SPELL_FAILED_UNIT_NOT_INFRONT)
4174    {
4175        FillTargetMap();
4176        //check if among target units, our WANTED target is as well (->only self cast spells return false)
4177        for(std::list<TargetInfo>::iterator ihit= m_UniqueTargetInfo.begin();ihit != m_UniqueTargetInfo.end();++ihit)
4178            if( ihit->targetGUID == targetguid )
4179                return true;
4180    }
4181    return false;                                           //target invalid
4182}
4183
4184uint8 Spell::CheckRange(bool strict)
4185{
4186    float range_mod;
4187
4188    // self cast doesn't need range checking -- also for Starshards fix
4189    if (m_spellInfo->rangeIndex == 1) return 0;
4190
4191    if (strict)                                             //add radius of caster
4192        range_mod = 1.25;
4193    else                                                    //add radius of caster and ~5 yds "give"
4194        range_mod = 6.25;
4195
4196    SpellRangeEntry const* srange = sSpellRangeStore.LookupEntry(m_spellInfo->rangeIndex);
4197    float max_range = GetSpellMaxRange(srange) + range_mod;
4198    float min_range = GetSpellMinRange(srange);
4199
4200    if(Player* modOwner = m_caster->GetSpellModOwner())
4201        modOwner->ApplySpellMod(m_spellInfo->Id, SPELLMOD_RANGE, max_range, this);
4202
4203    Unit *target = m_targets.getUnitTarget();
4204
4205    if(target && target != m_caster)
4206    {
4207        // distance from target center in checks
4208        if(!m_caster->IsWithinCombatDist(target, max_range))
4209            return SPELL_FAILED_OUT_OF_RANGE;               //0x5A;
4210        if(min_range && m_caster->IsWithinCombatDist(target, min_range)) // skip this check if min_range = 0
4211            return SPELL_FAILED_TOO_CLOSE;
4212        if( m_caster->GetTypeId() == TYPEID_PLAYER &&
4213            (m_spellInfo->FacingCasterFlags & SPELL_FACING_FLAG_INFRONT) && !m_caster->HasInArc( M_PI, target ) )
4214            return SPELL_FAILED_UNIT_NOT_INFRONT;
4215    }
4216
4217    if(m_targets.m_targetMask == TARGET_FLAG_DEST_LOCATION && m_targets.m_destX != 0 && m_targets.m_destY != 0 && m_targets.m_destZ != 0)
4218    {
4219        float dist = m_caster->GetDistance(m_targets.m_destX, m_targets.m_destY, m_targets.m_destZ);
4220        if(dist > max_range)
4221            return SPELL_FAILED_OUT_OF_RANGE;
4222        if(dist < min_range)
4223            return SPELL_FAILED_TOO_CLOSE;
4224    }
4225
4226    return 0;                                               // ok
4227}
4228
4229int32 Spell::CalculatePowerCost()
4230{
4231    // item cast not used power
4232    if(m_CastItem)
4233        return 0;
4234
4235    // Spell drain all exist power on cast (Only paladin lay of Hands)
4236    if (m_spellInfo->AttributesEx & SPELL_ATTR_EX_DRAIN_ALL_POWER)
4237    {
4238        // If power type - health drain all
4239        if (m_spellInfo->powerType == POWER_HEALTH)
4240            return m_caster->GetHealth();
4241        // Else drain all power
4242        if (m_spellInfo->powerType < MAX_POWERS)
4243            return m_caster->GetPower(Powers(m_spellInfo->powerType));
4244        sLog.outError("Spell::CalculateManaCost: Unknown power type '%d' in spell %d", m_spellInfo->powerType, m_spellInfo->Id);
4245        return 0;
4246    }
4247
4248    // Base powerCost
4249    int32 powerCost = m_spellInfo->manaCost;
4250    // PCT cost from total amount
4251    if (m_spellInfo->ManaCostPercentage)
4252    {
4253        switch (m_spellInfo->powerType)
4254        {
4255            // health as power used
4256            case POWER_HEALTH:
4257                powerCost += m_spellInfo->ManaCostPercentage * m_caster->GetCreateHealth() / 100;
4258                break;
4259            case POWER_MANA:
4260                powerCost += m_spellInfo->ManaCostPercentage * m_caster->GetCreateMana() / 100;
4261                break;
4262            case POWER_RAGE:
4263            case POWER_FOCUS:
4264            case POWER_ENERGY:
4265            case POWER_HAPPINESS:
4266                //            case POWER_RUNES:
4267                powerCost += m_spellInfo->ManaCostPercentage * m_caster->GetMaxPower(Powers(m_spellInfo->powerType)) / 100;
4268                break;
4269            default:
4270                sLog.outError("Spell::CalculateManaCost: Unknown power type '%d' in spell %d", m_spellInfo->powerType, m_spellInfo->Id);
4271                return 0;
4272        }
4273    }
4274    SpellSchools school = GetFirstSchoolInMask(m_spellSchoolMask);
4275    // Flat mod from caster auras by spell school
4276    powerCost += m_caster->GetInt32Value(UNIT_FIELD_POWER_COST_MODIFIER + school);
4277    // Shiv - costs 20 + weaponSpeed*10 energy (apply only to non-triggered spell with energy cost)
4278    if ( m_spellInfo->AttributesEx4 & SPELL_ATTR_EX4_SPELL_VS_EXTEND_COST )
4279        powerCost += m_caster->GetAttackTime(OFF_ATTACK)/100;
4280    // Apply cost mod by spell
4281    if(Player* modOwner = m_caster->GetSpellModOwner())
4282        modOwner->ApplySpellMod(m_spellInfo->Id, SPELLMOD_COST, powerCost, this);
4283
4284    if(m_spellInfo->Attributes & SPELL_ATTR_LEVEL_DAMAGE_CALCULATION)
4285        powerCost = int32(powerCost/ (1.117f* m_spellInfo->spellLevel / m_caster->getLevel() -0.1327f));
4286
4287    // PCT mod from user auras by school
4288    powerCost = int32(powerCost * (1.0f+m_caster->GetFloatValue(UNIT_FIELD_POWER_COST_MULTIPLIER+school)));
4289    if (powerCost < 0)
4290        powerCost = 0;
4291    return powerCost;
4292}
4293
4294uint8 Spell::CheckPower()
4295{
4296    // item cast not used power
4297    if(m_CastItem)
4298        return 0;
4299
4300    // health as power used - need check health amount
4301    if(m_spellInfo->powerType == POWER_HEALTH)
4302    {
4303        if(m_caster->GetHealth() <= m_powerCost)
4304            return SPELL_FAILED_CASTER_AURASTATE;
4305        return 0;
4306    }
4307    // Check valid power type
4308    if( m_spellInfo->powerType >= MAX_POWERS )
4309    {
4310        sLog.outError("Spell::CheckMana: Unknown power type '%d'", m_spellInfo->powerType);
4311        return SPELL_FAILED_UNKNOWN;
4312    }
4313    // Check power amount
4314    Powers powerType = Powers(m_spellInfo->powerType);
4315    if(m_caster->GetPower(powerType) < m_powerCost)
4316        return SPELL_FAILED_NO_POWER;
4317    else
4318        return 0;
4319}
4320
4321uint8 Spell::CheckItems()
4322{
4323    if (m_caster->GetTypeId() != TYPEID_PLAYER)
4324        return 0;
4325
4326    uint32 itemid, itemcount;
4327    Player* p_caster = (Player*)m_caster;
4328
4329    if(m_CastItem)
4330    {
4331        itemid = m_CastItem->GetEntry();
4332        if( !p_caster->HasItemCount(itemid,1) )
4333            return SPELL_FAILED_ITEM_NOT_READY;
4334        else
4335        {
4336            ItemPrototype const *proto = m_CastItem->GetProto();
4337            if(!proto)
4338                return SPELL_FAILED_ITEM_NOT_READY;
4339
4340            for (int i = 0; i<5; i++)
4341            {
4342                if (proto->Spells[i].SpellCharges)
4343                {
4344                    if(m_CastItem->GetSpellCharges(i)==0)
4345                        return SPELL_FAILED_NO_CHARGES_REMAIN;
4346                }
4347            }
4348
4349            uint32 ItemClass = proto->Class;
4350            if (ItemClass == ITEM_CLASS_CONSUMABLE && m_targets.getUnitTarget())
4351            {
4352                for (int i = 0; i < 3; i++)
4353                {
4354                    // skip check, pet not required like checks, and for TARGET_PET m_targets.getUnitTarget() is not the real target but the caster
4355                    if (m_spellInfo->EffectImplicitTargetA[i] == TARGET_PET)
4356                        continue;
4357
4358                    if (m_spellInfo->Effect[i] == SPELL_EFFECT_HEAL)
4359                        if (m_targets.getUnitTarget()->GetHealth() == m_targets.getUnitTarget()->GetMaxHealth())
4360                            return (uint8)SPELL_FAILED_ALREADY_AT_FULL_HEALTH;
4361
4362                    // Mana Potion, Rage Potion, Thistle Tea(Rogue), ...
4363                    if (m_spellInfo->Effect[i] == SPELL_EFFECT_ENERGIZE)
4364                    {
4365                        if(m_spellInfo->EffectMiscValue[i] < 0 || m_spellInfo->EffectMiscValue[i] >= MAX_POWERS)
4366                            return (uint8)SPELL_FAILED_ALREADY_AT_FULL_POWER;
4367
4368                        Powers power = Powers(m_spellInfo->EffectMiscValue[i]);
4369
4370                        if (m_targets.getUnitTarget()->GetPower(power) == m_targets.getUnitTarget()->GetMaxPower(power))
4371                            return (uint8)SPELL_FAILED_ALREADY_AT_FULL_POWER;
4372                    }
4373                }
4374            }
4375        }
4376    }
4377
4378    if(m_targets.getItemTargetGUID())
4379    {
4380        if(m_caster->GetTypeId() != TYPEID_PLAYER)
4381            return SPELL_FAILED_BAD_TARGETS;
4382
4383        if(!m_targets.getItemTarget())
4384            return SPELL_FAILED_ITEM_GONE;
4385
4386        if(!m_targets.getItemTarget()->IsFitToSpellRequirements(m_spellInfo))
4387            return SPELL_FAILED_EQUIPPED_ITEM_CLASS;
4388    }
4389    // if not item target then required item must be equipped
4390    else
4391    {
4392        if(m_caster->GetTypeId() == TYPEID_PLAYER && !((Player*)m_caster)->HasItemFitToSpellReqirements(m_spellInfo))
4393            return SPELL_FAILED_EQUIPPED_ITEM_CLASS;
4394    }
4395
4396    if(m_spellInfo->RequiresSpellFocus)
4397    {
4398        CellPair p(Trinity::ComputeCellPair(m_caster->GetPositionX(), m_caster->GetPositionY()));
4399        Cell cell(p);
4400        cell.data.Part.reserved = ALL_DISTRICT;
4401
4402        GameObject* ok = NULL;
4403        Trinity::GameObjectFocusCheck go_check(m_caster,m_spellInfo->RequiresSpellFocus);
4404        Trinity::GameObjectSearcher<Trinity::GameObjectFocusCheck> checker(ok,go_check);
4405
4406        TypeContainerVisitor<Trinity::GameObjectSearcher<Trinity::GameObjectFocusCheck>, GridTypeMapContainer > object_checker(checker);
4407        CellLock<GridReadGuard> cell_lock(cell, p);
4408        cell_lock->Visit(cell_lock, object_checker, *MapManager::Instance().GetMap(m_caster->GetMapId(), m_caster));
4409
4410        if(!ok)
4411            return (uint8)SPELL_FAILED_REQUIRES_SPELL_FOCUS;
4412
4413        focusObject = ok;                                   // game object found in range
4414    }
4415
4416    if (!(m_spellInfo->AttributesEx5 & SPELL_ATTR_EX5_NO_REAGENT_WHILE_PREP &&
4417        m_caster->HasFlag(UNIT_FIELD_FLAGS, UNIT_FLAG_PREPARATION)))
4418    {
4419        for(uint32 i=0;i<8;i++)
4420        {
4421            if(m_spellInfo->Reagent[i] <= 0)
4422                continue;
4423
4424            itemid    = m_spellInfo->Reagent[i];
4425            itemcount = m_spellInfo->ReagentCount[i];
4426
4427            // if CastItem is also spell reagent
4428            if( m_CastItem && m_CastItem->GetEntry() == itemid )
4429            {
4430                ItemPrototype const *proto = m_CastItem->GetProto();
4431                if(!proto)
4432                    return SPELL_FAILED_ITEM_NOT_READY;
4433                for(int s=0;s<5;s++)
4434                {
4435                    // CastItem will be used up and does not count as reagent
4436                    int32 charges = m_CastItem->GetSpellCharges(s);
4437                    if (proto->Spells[s].SpellCharges < 0 && abs(charges) < 2)
4438                    {
4439                        ++itemcount;
4440                        break;
4441                    }
4442                }
4443            }
4444            if( !p_caster->HasItemCount(itemid,itemcount) )
4445                return (uint8)SPELL_FAILED_ITEM_NOT_READY;      //0x54
4446        }
4447    }
4448
4449    uint32 totems = 2;
4450    for(int i=0;i<2;++i)
4451    {
4452        if(m_spellInfo->Totem[i] != 0)
4453        {
4454            if( p_caster->HasItemCount(m_spellInfo->Totem[i],1) )
4455            {
4456                totems -= 1;
4457                continue;
4458            }
4459        }else
4460        totems -= 1;
4461    }
4462    if(totems != 0)
4463        return (uint8)SPELL_FAILED_TOTEMS;                  //0x7C
4464
4465    //Check items for TotemCategory
4466    uint32 TotemCategory = 2;
4467    for(int i=0;i<2;++i)
4468    {
4469        if(m_spellInfo->TotemCategory[i] != 0)
4470        {
4471            if( p_caster->HasItemTotemCategory(m_spellInfo->TotemCategory[i]) )
4472            {
4473                TotemCategory -= 1;
4474                continue;
4475            }
4476        }
4477        else
4478            TotemCategory -= 1;
4479    }
4480    if(TotemCategory != 0)
4481        return (uint8)SPELL_FAILED_TOTEM_CATEGORY;          //0x7B
4482
4483    for(int i = 0; i < 3; i++)
4484    {
4485        switch (m_spellInfo->Effect[i])
4486        {
4487            case SPELL_EFFECT_CREATE_ITEM:
4488            {
4489                if (!m_IsTriggeredSpell && m_spellInfo->EffectItemType[i])
4490                {
4491                    ItemPosCountVec dest;
4492                    uint8 msg = p_caster->CanStoreNewItem(NULL_BAG, NULL_SLOT, dest, m_spellInfo->EffectItemType[i], 1 );
4493                    if (msg != EQUIP_ERR_OK )
4494                    {
4495                        p_caster->SendEquipError( msg, NULL, NULL );
4496                        return SPELL_FAILED_DONT_REPORT;
4497                    }
4498                }
4499                break;
4500            }
4501            case SPELL_EFFECT_ENCHANT_ITEM:
4502            {
4503                Item* targetItem = m_targets.getItemTarget();
4504                if(!targetItem)
4505                    return SPELL_FAILED_ITEM_NOT_FOUND;
4506
4507                if( targetItem->GetProto()->ItemLevel < m_spellInfo->baseLevel )
4508                    return SPELL_FAILED_LOWLEVEL;
4509                // Not allow enchant in trade slot for some enchant type
4510                if( targetItem->GetOwner() != m_caster )
4511                {
4512                    uint32 enchant_id = m_spellInfo->EffectMiscValue[i];
4513                    SpellItemEnchantmentEntry const *pEnchant = sSpellItemEnchantmentStore.LookupEntry(enchant_id);
4514                    if(!pEnchant)
4515                        return SPELL_FAILED_ERROR;
4516                    if (pEnchant->slot & ENCHANTMENT_CAN_SOULBOUND)
4517                        return SPELL_FAILED_NOT_TRADEABLE;
4518                }
4519                break;
4520            }
4521            case SPELL_EFFECT_ENCHANT_ITEM_TEMPORARY:
4522            {
4523                Item *item = m_targets.getItemTarget();
4524                if(!item)
4525                    return SPELL_FAILED_ITEM_NOT_FOUND;
4526                // Not allow enchant in trade slot for some enchant type
4527                if( item->GetOwner() != m_caster )
4528                {
4529                    uint32 enchant_id = m_spellInfo->EffectMiscValue[i];
4530                    SpellItemEnchantmentEntry const *pEnchant = sSpellItemEnchantmentStore.LookupEntry(enchant_id);
4531                    if(!pEnchant)
4532                        return SPELL_FAILED_ERROR;
4533                    if (pEnchant->slot & ENCHANTMENT_CAN_SOULBOUND)
4534                        return SPELL_FAILED_NOT_TRADEABLE;
4535                }
4536                break;
4537            }
4538            case SPELL_EFFECT_ENCHANT_HELD_ITEM:
4539                // check item existence in effect code (not output errors at offhand hold item effect to main hand for example
4540                break;
4541            case SPELL_EFFECT_DISENCHANT:
4542            {
4543                if(!m_targets.getItemTarget())
4544                    return SPELL_FAILED_CANT_BE_DISENCHANTED;
4545
4546                // prevent disenchanting in trade slot
4547                if( m_targets.getItemTarget()->GetOwnerGUID() != m_caster->GetGUID() )
4548                    return SPELL_FAILED_CANT_BE_DISENCHANTED;
4549
4550                ItemPrototype const* itemProto = m_targets.getItemTarget()->GetProto();
4551                if(!itemProto)
4552                    return SPELL_FAILED_CANT_BE_DISENCHANTED;
4553
4554                uint32 item_quality = itemProto->Quality;
4555                // 2.0.x addon: Check player enchanting level agains the item desenchanting requirements
4556                uint32 item_disenchantskilllevel = itemProto->RequiredDisenchantSkill;
4557                if (item_disenchantskilllevel == uint32(-1))
4558                    return SPELL_FAILED_CANT_BE_DISENCHANTED;
4559                if (item_disenchantskilllevel > p_caster->GetSkillValue(SKILL_ENCHANTING))
4560                    return SPELL_FAILED_LOW_CASTLEVEL;
4561                if(item_quality > 4 || item_quality < 2)
4562                    return SPELL_FAILED_CANT_BE_DISENCHANTED;
4563                if(itemProto->Class != ITEM_CLASS_WEAPON && itemProto->Class != ITEM_CLASS_ARMOR)
4564                    return SPELL_FAILED_CANT_BE_DISENCHANTED;
4565                if (!itemProto->DisenchantID)
4566                    return SPELL_FAILED_CANT_BE_DISENCHANTED;
4567                break;
4568            }
4569            case SPELL_EFFECT_PROSPECTING:
4570            {
4571                if(!m_targets.getItemTarget())
4572                    return SPELL_FAILED_CANT_BE_PROSPECTED;
4573                //ensure item is a prospectable ore
4574                if(!(m_targets.getItemTarget()->GetProto()->BagFamily & BAG_FAMILY_MASK_MINING_SUPP) || m_targets.getItemTarget()->GetProto()->Class != ITEM_CLASS_TRADE_GOODS)
4575                    return SPELL_FAILED_CANT_BE_PROSPECTED;
4576                //prevent prospecting in trade slot
4577                if( m_targets.getItemTarget()->GetOwnerGUID() != m_caster->GetGUID() )
4578                    return SPELL_FAILED_CANT_BE_PROSPECTED;
4579                //Check for enough skill in jewelcrafting
4580                uint32 item_prospectingskilllevel = m_targets.getItemTarget()->GetProto()->RequiredSkillRank;
4581                if(item_prospectingskilllevel >p_caster->GetSkillValue(SKILL_JEWELCRAFTING))
4582                    return SPELL_FAILED_LOW_CASTLEVEL;
4583                //make sure the player has the required ores in inventory
4584                if(m_targets.getItemTarget()->GetCount() < 5)
4585                    return SPELL_FAILED_PROSPECT_NEED_MORE;
4586
4587                if(!LootTemplates_Prospecting.HaveLootFor(m_targets.getItemTargetEntry()))
4588                    return SPELL_FAILED_CANT_BE_PROSPECTED;
4589
4590                break;
4591            }
4592            case SPELL_EFFECT_WEAPON_DAMAGE:
4593            case SPELL_EFFECT_WEAPON_DAMAGE_NOSCHOOL:
4594            {
4595                if(m_caster->GetTypeId() != TYPEID_PLAYER) return SPELL_FAILED_TARGET_NOT_PLAYER;
4596                if( m_attackType != RANGED_ATTACK )
4597                    break;
4598                Item *pItem = ((Player*)m_caster)->GetWeaponForAttack(m_attackType);
4599                if(!pItem || pItem->IsBroken())
4600                    return SPELL_FAILED_EQUIPPED_ITEM;
4601
4602                switch(pItem->GetProto()->SubClass)
4603                {
4604                    case ITEM_SUBCLASS_WEAPON_THROWN:
4605                    {
4606                        uint32 ammo = pItem->GetEntry();
4607                        if( !((Player*)m_caster)->HasItemCount( ammo, 1 ) )
4608                            return SPELL_FAILED_NO_AMMO;
4609                    };  break;
4610                    case ITEM_SUBCLASS_WEAPON_GUN:
4611                    case ITEM_SUBCLASS_WEAPON_BOW:
4612                    case ITEM_SUBCLASS_WEAPON_CROSSBOW:
4613                    {
4614                        uint32 ammo = ((Player*)m_caster)->GetUInt32Value(PLAYER_AMMO_ID);
4615                        if(!ammo)
4616                        {
4617                            // Requires No Ammo
4618                            if(m_caster->GetDummyAura(46699))
4619                                break;                      // skip other checks
4620
4621                            return SPELL_FAILED_NO_AMMO;
4622                        }
4623
4624                        ItemPrototype const *ammoProto = objmgr.GetItemPrototype( ammo );
4625                        if(!ammoProto)
4626                            return SPELL_FAILED_NO_AMMO;
4627
4628                        if(ammoProto->Class != ITEM_CLASS_PROJECTILE)
4629                            return SPELL_FAILED_NO_AMMO;
4630
4631                        // check ammo ws. weapon compatibility
4632                        switch(pItem->GetProto()->SubClass)
4633                        {
4634                            case ITEM_SUBCLASS_WEAPON_BOW:
4635                            case ITEM_SUBCLASS_WEAPON_CROSSBOW:
4636                                if(ammoProto->SubClass!=ITEM_SUBCLASS_ARROW)
4637                                    return SPELL_FAILED_NO_AMMO;
4638                                break;
4639                            case ITEM_SUBCLASS_WEAPON_GUN:
4640                                if(ammoProto->SubClass!=ITEM_SUBCLASS_BULLET)
4641                                    return SPELL_FAILED_NO_AMMO;
4642                                break;
4643                            default:
4644                                return SPELL_FAILED_NO_AMMO;
4645                        }
4646
4647                        if( !((Player*)m_caster)->HasItemCount( ammo, 1 ) )
4648                            return SPELL_FAILED_NO_AMMO;
4649                    };  break;
4650                    case ITEM_SUBCLASS_WEAPON_WAND:
4651                    default:
4652                        break;
4653                }
4654                break;
4655            }
4656            default:break;
4657        }
4658    }
4659
4660    return uint8(0);
4661}
4662
4663void Spell::Delayed()
4664{
4665    if(!m_caster || m_caster->GetTypeId() != TYPEID_PLAYER)
4666        return;
4667
4668    if (m_spellState == SPELL_STATE_DELAYED)
4669        return;                                             // spell is active and can't be time-backed
4670
4671    // spells not loosing casting time ( slam, dynamites, bombs.. )
4672    if(!(m_spellInfo->InterruptFlags & SPELL_INTERRUPT_FLAG_DAMAGE))
4673        return;
4674
4675    //check resist chance
4676    int32 resistChance = 100;                               //must be initialized to 100 for percent modifiers
4677    ((Player*)m_caster)->ApplySpellMod(m_spellInfo->Id,SPELLMOD_NOT_LOSE_CASTING_TIME,resistChance, this);
4678    resistChance += m_caster->GetTotalAuraModifier(SPELL_AURA_RESIST_PUSHBACK) - 100;
4679    if (roll_chance_i(resistChance))
4680        return;
4681
4682    int32 delaytime = GetNextDelayAtDamageMsTime();
4683
4684    if(int32(m_timer) + delaytime > m_casttime)
4685    {
4686        delaytime = m_casttime - m_timer;
4687        m_timer = m_casttime;
4688    }
4689    else
4690        m_timer += delaytime;
4691
4692    sLog.outDetail("Spell %u partially interrupted for (%d) ms at damage",m_spellInfo->Id,delaytime);
4693
4694    WorldPacket data(SMSG_SPELL_DELAYED, 8+4);
4695    data.append(m_caster->GetPackGUID());
4696    data << uint32(delaytime);
4697
4698    m_caster->SendMessageToSet(&data,true);
4699}
4700
4701void Spell::DelayedChannel()
4702{
4703    if(!m_caster || m_caster->GetTypeId() != TYPEID_PLAYER || getState() != SPELL_STATE_CASTING)
4704        return;
4705
4706    //check resist chance
4707    int32 resistChance = 100;                               //must be initialized to 100 for percent modifiers
4708    ((Player*)m_caster)->ApplySpellMod(m_spellInfo->Id,SPELLMOD_NOT_LOSE_CASTING_TIME,resistChance, this);
4709    resistChance += m_caster->GetTotalAuraModifier(SPELL_AURA_RESIST_PUSHBACK) - 100;
4710    if (roll_chance_i(resistChance))
4711        return;
4712
4713    int32 delaytime = GetNextDelayAtDamageMsTime();
4714
4715    if(int32(m_timer) < delaytime)
4716    {
4717        delaytime = m_timer;
4718        m_timer = 0;
4719    }
4720    else
4721        m_timer -= delaytime;
4722
4723    sLog.outDebug("Spell %u partially interrupted for %i ms, new duration: %u ms", m_spellInfo->Id, delaytime, m_timer);
4724
4725    for(std::list<TargetInfo>::iterator ihit= m_UniqueTargetInfo.begin();ihit != m_UniqueTargetInfo.end();++ihit)
4726    {
4727        if ((*ihit).missCondition == SPELL_MISS_NONE)
4728        {
4729            Unit* unit = m_caster->GetGUID()==ihit->targetGUID ? m_caster : ObjectAccessor::GetUnit(*m_caster, ihit->targetGUID);
4730            if (unit)
4731            {
4732                for (int j=0;j<3;j++)
4733                    if( ihit->effectMask & (1<<j) )
4734                        unit->DelayAura(m_spellInfo->Id, j, delaytime);
4735            }
4736
4737        }
4738    }
4739
4740    for(int j = 0; j < 3; j++)
4741    {
4742        // partially interrupt persistent area auras
4743        DynamicObject* dynObj = m_caster->GetDynObject(m_spellInfo->Id, j);
4744        if(dynObj)
4745            dynObj->Delay(delaytime);
4746    }
4747
4748    SendChannelUpdate(m_timer);
4749}
4750
4751void Spell::UpdatePointers()
4752{
4753    if(m_originalCasterGUID==m_caster->GetGUID())
4754        m_originalCaster = m_caster;
4755    else
4756    {
4757        m_originalCaster = ObjectAccessor::GetUnit(*m_caster,m_originalCasterGUID);
4758        if(m_originalCaster && !m_originalCaster->IsInWorld()) m_originalCaster = NULL;
4759    }
4760
4761    m_targets.Update(m_caster);
4762}
4763
4764bool Spell::IsAffectedBy(SpellEntry const *spellInfo, uint32 effectId)
4765{
4766    return spellmgr.IsAffectedBySpell(m_spellInfo,spellInfo->Id,effectId,spellInfo->EffectItemType[effectId]);
4767}
4768
4769bool Spell::CheckTargetCreatureType(Unit* target) const
4770{
4771    uint32 spellCreatureTargetMask = m_spellInfo->TargetCreatureType;
4772
4773    // Curse of Doom : not find another way to fix spell target check :/
4774    if(m_spellInfo->SpellFamilyName==SPELLFAMILY_WARLOCK && m_spellInfo->SpellFamilyFlags == 0x0200000000LL)
4775    {
4776        // not allow cast at player
4777        if(target->GetTypeId()==TYPEID_PLAYER)
4778            return false;
4779
4780        spellCreatureTargetMask = 0x7FF;
4781    }
4782
4783    // Dismiss Pet and Taming Lesson skipped
4784    if(m_spellInfo->Id == 2641 || m_spellInfo->Id == 23356)
4785        spellCreatureTargetMask =  0;
4786
4787    if (spellCreatureTargetMask)
4788    {
4789        uint32 TargetCreatureType = target->GetCreatureTypeMask();
4790
4791        return !TargetCreatureType || (spellCreatureTargetMask & TargetCreatureType);
4792    }
4793    return true;
4794}
4795
4796CurrentSpellTypes Spell::GetCurrentContainer()
4797{
4798    if (IsNextMeleeSwingSpell())
4799        return(CURRENT_MELEE_SPELL);
4800    else if (IsAutoRepeat())
4801        return(CURRENT_AUTOREPEAT_SPELL);
4802    else if (IsChanneledSpell(m_spellInfo))
4803        return(CURRENT_CHANNELED_SPELL);
4804    else
4805        return(CURRENT_GENERIC_SPELL);
4806}
4807
4808bool Spell::CheckTarget( Unit* target, uint32 eff, bool hitPhase )
4809{
4810    // Check targets for creature type mask and remove not appropriate (skip explicit self target case, maybe need other explicit targets)
4811    if(m_spellInfo->EffectImplicitTargetA[eff]!=TARGET_SELF && !m_magnetPair.first)
4812    {
4813        if (!CheckTargetCreatureType(target))
4814            return false;
4815    }
4816
4817    // Check targets for not_selectable unit flag and remove
4818    // A player can cast spells on his pet (or other controlled unit) though in any state
4819    if (target != m_caster && target->GetCharmerOrOwnerGUID() != m_caster->GetGUID())
4820    {
4821        // any unattackable target skipped
4822        if (target->HasFlag(UNIT_FIELD_FLAGS, UNIT_FLAG_NON_ATTACKABLE))
4823            return false;
4824
4825        // unselectable targets skipped in all cases except TARGET_SCRIPT targeting
4826        // in case TARGET_SCRIPT target selected by server always and can't be cheated
4827        if( target->HasFlag(UNIT_FIELD_FLAGS, UNIT_FLAG_NOT_SELECTABLE) &&
4828            m_spellInfo->EffectImplicitTargetA[eff] != TARGET_SCRIPT &&
4829            m_spellInfo->EffectImplicitTargetB[eff] != TARGET_SCRIPT )
4830            return false;
4831    }
4832
4833    //Check player targets and remove if in GM mode or GM invisibility (for not self casting case)
4834    if( target != m_caster && target->GetTypeId()==TYPEID_PLAYER)
4835    {
4836        if(((Player*)target)->GetVisibility()==VISIBILITY_OFF)
4837            return false;
4838
4839        if(((Player*)target)->isGameMaster() && !IsPositiveSpell(m_spellInfo->Id))
4840            return false;
4841    }
4842
4843    //Check targets for LOS visibility (except spells without range limitations )
4844    switch(m_spellInfo->Effect[eff])
4845    {
4846        case SPELL_EFFECT_SUMMON_PLAYER:                    // from anywhere
4847            break;
4848        case SPELL_EFFECT_DUMMY:
4849            if(m_spellInfo->Id!=20577)                      // Cannibalize
4850                break;
4851            //fall through
4852        case SPELL_EFFECT_RESURRECT_NEW:
4853            // player far away, maybe his corpse near?
4854            if(target!=m_caster && !target->IsWithinLOSInMap(m_caster))
4855            {
4856                if(!m_targets.getCorpseTargetGUID())
4857                    return false;
4858
4859                Corpse *corpse = ObjectAccessor::GetCorpse(*m_caster,m_targets.getCorpseTargetGUID());
4860                if(!corpse)
4861                    return false;
4862
4863                if(target->GetGUID()!=corpse->GetOwnerGUID())
4864                    return false;
4865
4866                if(!corpse->IsWithinLOSInMap(m_caster))
4867                    return false;
4868            }
4869
4870            // all ok by some way or another, skip normal check
4871            break;
4872        default:                                            // normal case
4873            if(target!=m_caster && !target->IsWithinLOSInMap(m_caster))
4874                return false;
4875            break;
4876    }
4877
4878    return true;
4879}
4880
4881Unit* Spell::SelectMagnetTarget()
4882{
4883    Unit* target = m_targets.getUnitTarget();
4884
4885    if(target && target->HasAuraType(SPELL_AURA_SPELL_MAGNET) && !(m_spellInfo->Attributes & 0x10))
4886    {
4887        Unit::AuraList const& magnetAuras = target->GetAurasByType(SPELL_AURA_SPELL_MAGNET);
4888        for(Unit::AuraList::const_iterator itr = magnetAuras.begin(); itr != magnetAuras.end(); ++itr)
4889        {
4890            if(Unit* magnet = (*itr)->GetCaster())
4891            {
4892                if((*itr)->m_procCharges>0 && magnet->IsWithinLOSInMap(m_caster))
4893                {
4894                    (*itr)->SetAuraProcCharges((*itr)->m_procCharges-1);
4895                    m_magnetPair.first = true;
4896                    m_magnetPair.second = magnet;
4897
4898                    target = magnet;
4899                    m_targets.setUnitTarget(target);
4900                    break;
4901                }
4902            }
4903        }
4904    }
4905
4906    return target;
4907}
4908
4909bool Spell::IsNeedSendToClient() const
4910{
4911    return m_spellInfo->SpellVisual!=0 || IsChanneledSpell(m_spellInfo) ||
4912        m_spellInfo->speed > 0.0f || !m_triggeredByAuraSpell && !m_IsTriggeredSpell;
4913}
4914
4915bool Spell::HaveTargetsForEffect( uint8 effect ) const
4916{
4917    for(std::list<TargetInfo>::const_iterator itr= m_UniqueTargetInfo.begin();itr != m_UniqueTargetInfo.end();++itr)
4918        if(itr->effectMask & (1<<effect))
4919            return true;
4920
4921    for(std::list<GOTargetInfo>::const_iterator itr= m_UniqueGOTargetInfo.begin();itr != m_UniqueGOTargetInfo.end();++itr)
4922        if(itr->effectMask & (1<<effect))
4923            return true;
4924
4925    for(std::list<ItemTargetInfo>::const_iterator itr= m_UniqueItemInfo.begin();itr != m_UniqueItemInfo.end();++itr)
4926        if(itr->effectMask & (1<<effect))
4927            return true;
4928
4929    return false;
4930}
4931
4932SpellEvent::SpellEvent(Spell* spell) : BasicEvent()
4933{
4934    m_Spell = spell;
4935}
4936
4937SpellEvent::~SpellEvent()
4938{
4939    if (m_Spell->getState() != SPELL_STATE_FINISHED)
4940        m_Spell->cancel();
4941
4942    if (m_Spell->IsDeletable())
4943    {
4944        delete m_Spell;
4945    }
4946    else
4947    {
4948        sLog.outError("~SpellEvent: %s %u tried to delete non-deletable spell %u. Was not deleted, causes memory leak.",
4949            (m_Spell->GetCaster()->GetTypeId()==TYPEID_PLAYER?"Player":"Creature"), m_Spell->GetCaster()->GetGUIDLow(),m_Spell->m_spellInfo->Id);
4950    }
4951}
4952
4953bool SpellEvent::Execute(uint64 e_time, uint32 p_time)
4954{
4955    // update spell if it is not finished
4956    if (m_Spell->getState() != SPELL_STATE_FINISHED)
4957        m_Spell->update(p_time);
4958
4959    // check spell state to process
4960    switch (m_Spell->getState())
4961    {
4962        case SPELL_STATE_FINISHED:
4963        {
4964            // spell was finished, check deletable state
4965            if (m_Spell->IsDeletable())
4966            {
4967                // check, if we do have unfinished triggered spells
4968
4969                return(true);                               // spell is deletable, finish event
4970            }
4971            // event will be re-added automatically at the end of routine)
4972        } break;
4973
4974        case SPELL_STATE_CASTING:
4975        {
4976            // this spell is in channeled state, process it on the next update
4977            // event will be re-added automatically at the end of routine)
4978        } break;
4979
4980        case SPELL_STATE_DELAYED:
4981        {
4982            // first, check, if we have just started
4983            if (m_Spell->GetDelayStart() != 0)
4984            {
4985                // no, we aren't, do the typical update
4986                // check, if we have channeled spell on our hands
4987                if (IsChanneledSpell(m_Spell->m_spellInfo))
4988                {
4989                    // evented channeled spell is processed separately, casted once after delay, and not destroyed till finish
4990                    // check, if we have casting anything else except this channeled spell and autorepeat
4991                    if (m_Spell->GetCaster()->IsNonMeleeSpellCasted(false, true, true))
4992                    {
4993                        // another non-melee non-delayed spell is casted now, abort
4994                        m_Spell->cancel();
4995                    }
4996                    else
4997                    {
4998                        // do the action (pass spell to channeling state)
4999                        m_Spell->handle_immediate();
5000                    }
5001                    // event will be re-added automatically at the end of routine)
5002                }
5003                else
5004                {
5005                    // run the spell handler and think about what we can do next
5006                    uint64 t_offset = e_time - m_Spell->GetDelayStart();
5007                    uint64 n_offset = m_Spell->handle_delayed(t_offset);
5008                    if (n_offset)
5009                    {
5010                        // re-add us to the queue
5011                        m_Spell->GetCaster()->m_Events.AddEvent(this, m_Spell->GetDelayStart() + n_offset, false);
5012                        return(false);                      // event not complete
5013                    }
5014                    // event complete
5015                    // finish update event will be re-added automatically at the end of routine)
5016                }
5017            }
5018            else
5019            {
5020                // delaying had just started, record the moment
5021                m_Spell->SetDelayStart(e_time);
5022                // re-plan the event for the delay moment
5023                m_Spell->GetCaster()->m_Events.AddEvent(this, e_time + m_Spell->GetDelayMoment(), false);
5024                return(false);                              // event not complete
5025            }
5026        } break;
5027
5028        default:
5029        {
5030            // all other states
5031            // event will be re-added automatically at the end of routine)
5032        } break;
5033    }
5034
5035    // spell processing not complete, plan event on the next update interval
5036    m_Spell->GetCaster()->m_Events.AddEvent(this, e_time + 1, false);
5037    return(false);                                          // event not complete
5038}
5039
5040void SpellEvent::Abort(uint64 /*e_time*/)
5041{
5042    // oops, the spell we try to do is aborted
5043    if (m_Spell->getState() != SPELL_STATE_FINISHED)
5044        m_Spell->cancel();
5045}
Note: See TracBrowser for help on using the browser.