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

Revision 44, 198.0 kB (checked in by yumileroy, 17 years ago)

[svn] * Merge Temp dev SVN with Assembla.
* Changes include:

  • Implementation of w12x's Outdoor PvP and Game Event Systems.
  • Temporary removal of IRC Chat Bot (until infinite loop when disabled is fixed).
  • All mangos -> trinity (to convert your mangos_string table, please run mangos_string_to_trinity_string.sql).
  • Improved Config cleanup.
  • And many more changes.

Original author: Seline
Date: 2008-10-14 11:57:03-05:00

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