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

Revision 53, 201.8 kB (checked in by yumileroy, 17 years ago)

[svn] Merge branch r50 with trunk.

Original author: megamage
Date: 2008-10-17 21:44:37-05:00

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