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

Revision 102, 202.4 kB (checked in by yumileroy, 17 years ago)

[svn] Fixed copyright notices to comply with GPL.

Original author: w12x
Date: 2008-10-23 03:29:52-05:00

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