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

Revision 37, 197.9 kB (checked in by yumileroy, 17 years ago)

[svn] * svn:eol-style native set on all files that need it

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