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

Revision 2, 198.4 kB (checked in by yumileroy, 17 years ago)

[svn] * Proper SVN structure

Original author: Neo2003
Date: 2008-10-02 16:23:55-05:00

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