SpellProcess.cpp 94 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163164165166167168169170171172173174175176177178179180181182183184185186187188189190191192193194195196197198199200201202203204205206207208209210211212213214215216217218219220221222223224225226227228229230231232233234235236237238239240241242243244245246247248249250251252253254255256257258259260261262263264265266267268269270271272273274275276277278279280281282283284285286287288289290291292293294295296297298299300301302303304305306307308309310311312313314315316317318319320321322323324325326327328329330331332333334335336337338339340341342343344345346347348349350351352353354355356357358359360361362363364365366367368369370371372373374375376377378379380381382383384385386387388389390391392393394395396397398399400401402403404405406407408409410411412413414415416417418419420421422423424425426427428429430431432433434435436437438439440441442443444445446447448449450451452453454455456457458459460461462463464465466467468469470471472473474475476477478479480481482483484485486487488489490491492493494495496497498499500501502503504505506507508509510511512513514515516517518519520521522523524525526527528529530531532533534535536537538539540541542543544545546547548549550551552553554555556557558559560561562563564565566567568569570571572573574575576577578579580581582583584585586587588589590591592593594595596597598599600601602603604605606607608609610611612613614615616617618619620621622623624625626627628629630631632633634635636637638639640641642643644645646647648649650651652653654655656657658659660661662663664665666667668669670671672673674675676677678679680681682683684685686687688689690691692693694695696697698699700701702703704705706707708709710711712713714715716717718719720721722723724725726727728729730731732733734735736737738739740741742743744745746747748749750751752753754755756757758759760761762763764765766767768769770771772773774775776777778779780781782783784785786787788789790791792793794795796797798799800801802803804805806807808809810811812813814815816817818819820821822823824825826827828829830831832833834835836837838839840841842843844845846847848849850851852853854855856857858859860861862863864865866867868869870871872873874875876877878879880881882883884885886887888889890891892893894895896897898899900901902903904905906907908909910911912913914915916917918919920921922923924925926927928929930931932933934935936937938939940941942943944945946947948949950951952953954955956957958959960961962963964965966967968969970971972973974975976977978979980981982983984985986987988989990991992993994995996997998999100010011002100310041005100610071008100910101011101210131014101510161017101810191020102110221023102410251026102710281029103010311032103310341035103610371038103910401041104210431044104510461047104810491050105110521053105410551056105710581059106010611062106310641065106610671068106910701071107210731074107510761077107810791080108110821083108410851086108710881089109010911092109310941095109610971098109911001101110211031104110511061107110811091110111111121113111411151116111711181119112011211122112311241125112611271128112911301131113211331134113511361137113811391140114111421143114411451146114711481149115011511152115311541155115611571158115911601161116211631164116511661167116811691170117111721173117411751176117711781179118011811182118311841185118611871188118911901191119211931194119511961197119811991200120112021203120412051206120712081209121012111212121312141215121612171218121912201221122212231224122512261227122812291230123112321233123412351236123712381239124012411242124312441245124612471248124912501251125212531254125512561257125812591260126112621263126412651266126712681269127012711272127312741275127612771278127912801281128212831284128512861287128812891290129112921293129412951296129712981299130013011302130313041305130613071308130913101311131213131314131513161317131813191320132113221323132413251326132713281329133013311332133313341335133613371338133913401341134213431344134513461347134813491350135113521353135413551356135713581359136013611362136313641365136613671368136913701371137213731374137513761377137813791380138113821383138413851386138713881389139013911392139313941395139613971398139914001401140214031404140514061407140814091410141114121413141414151416141714181419142014211422142314241425142614271428142914301431143214331434143514361437143814391440144114421443144414451446144714481449145014511452145314541455145614571458145914601461146214631464146514661467146814691470147114721473147414751476147714781479148014811482148314841485148614871488148914901491149214931494149514961497149814991500150115021503150415051506150715081509151015111512151315141515151615171518151915201521152215231524152515261527152815291530153115321533153415351536153715381539154015411542154315441545154615471548154915501551155215531554155515561557155815591560156115621563156415651566156715681569157015711572157315741575157615771578157915801581158215831584158515861587158815891590159115921593159415951596159715981599160016011602160316041605160616071608160916101611161216131614161516161617161816191620162116221623162416251626162716281629163016311632163316341635163616371638163916401641164216431644164516461647164816491650165116521653165416551656165716581659166016611662166316641665166616671668166916701671167216731674167516761677167816791680168116821683168416851686168716881689169016911692169316941695169616971698169917001701170217031704170517061707170817091710171117121713171417151716171717181719172017211722172317241725172617271728172917301731173217331734173517361737173817391740174117421743174417451746174717481749175017511752175317541755175617571758175917601761176217631764176517661767176817691770177117721773177417751776177717781779178017811782178317841785178617871788178917901791179217931794179517961797179817991800180118021803180418051806180718081809181018111812181318141815181618171818181918201821182218231824182518261827182818291830183118321833183418351836183718381839184018411842184318441845184618471848184918501851185218531854185518561857185818591860186118621863186418651866186718681869187018711872187318741875187618771878187918801881188218831884188518861887188818891890189118921893189418951896189718981899190019011902190319041905190619071908190919101911191219131914191519161917191819191920192119221923192419251926192719281929193019311932193319341935193619371938193919401941194219431944194519461947194819491950195119521953195419551956195719581959196019611962196319641965196619671968196919701971197219731974197519761977197819791980198119821983198419851986198719881989199019911992199319941995199619971998199920002001200220032004200520062007200820092010201120122013201420152016201720182019202020212022202320242025202620272028202920302031203220332034203520362037203820392040204120422043204420452046204720482049205020512052205320542055205620572058205920602061206220632064206520662067206820692070207120722073207420752076207720782079208020812082208320842085208620872088208920902091209220932094209520962097209820992100210121022103210421052106210721082109211021112112211321142115211621172118211921202121212221232124212521262127212821292130213121322133213421352136213721382139214021412142214321442145214621472148214921502151215221532154215521562157215821592160216121622163216421652166216721682169217021712172217321742175217621772178217921802181218221832184218521862187218821892190219121922193219421952196219721982199220022012202220322042205220622072208220922102211221222132214221522162217221822192220222122222223222422252226222722282229223022312232223322342235223622372238223922402241224222432244224522462247224822492250225122522253225422552256225722582259226022612262226322642265226622672268226922702271227222732274227522762277227822792280228122822283228422852286228722882289229022912292229322942295229622972298229923002301230223032304230523062307230823092310231123122313231423152316231723182319232023212322232323242325232623272328232923302331233223332334233523362337233823392340234123422343234423452346234723482349235023512352235323542355235623572358235923602361236223632364236523662367236823692370237123722373237423752376237723782379238023812382238323842385238623872388238923902391239223932394239523962397239823992400240124022403240424052406240724082409241024112412241324142415241624172418241924202421242224232424242524262427242824292430243124322433243424352436243724382439244024412442244324442445244624472448244924502451245224532454245524562457245824592460246124622463246424652466246724682469247024712472247324742475247624772478247924802481248224832484248524862487248824892490249124922493249424952496249724982499250025012502250325042505250625072508250925102511251225132514251525162517251825192520252125222523252425252526252725282529253025312532253325342535253625372538253925402541254225432544254525462547254825492550255125522553255425552556255725582559256025612562256325642565256625672568256925702571257225732574257525762577257825792580258125822583258425852586258725882589259025912592259325942595259625972598259926002601260226032604260526062607260826092610261126122613261426152616261726182619262026212622262326242625262626272628262926302631263226332634263526362637263826392640264126422643264426452646264726482649265026512652265326542655265626572658265926602661266226632664266526662667266826692670267126722673267426752676267726782679268026812682268326842685268626872688268926902691
  1. /*
  2. EQ2Emulator: Everquest II Server Emulator
  3. Copyright (C) 2007 EQ2EMulator Development Team (http://www.eq2emulator.net)
  4. This file is part of EQ2Emulator.
  5. EQ2Emulator is free software: you can redistribute it and/or modify
  6. it under the terms of the GNU General Public License as published by
  7. the Free Software Foundation, either version 3 of the License, or
  8. (at your option) any later version.
  9. EQ2Emulator is distributed in the hope that it will be useful,
  10. but WITHOUT ANY WARRANTY; without even the implied warranty of
  11. MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
  12. GNU General Public License for more details.
  13. You should have received a copy of the GNU General Public License
  14. along with EQ2Emulator. If not, see <http://www.gnu.org/licenses/>.
  15. */
  16. #include "SpellProcess.h"
  17. #include "../common/Log.h"
  18. #include "Tradeskills/Tradeskills.h"
  19. #include "ClientPacketFunctions.h"
  20. #include "Rules/Rules.h"
  21. extern MasterSpellList master_spell_list;
  22. extern MasterSkillList master_skill_list;
  23. extern ConfigReader configReader;
  24. extern LuaInterface* lua_interface;
  25. extern Commands commands;
  26. extern World world;
  27. extern RuleManager rule_manager;
  28. SpellProcess::SpellProcess(){
  29. last_checked_time = 0;
  30. MSpellProcess.SetName("SpellProcess::MSpellProcess");
  31. MRemoveTargetList.SetName("SpellProcess::MRemoveTargetList");
  32. MSoloHO.SetName("SpellProcess::m_soloHO");
  33. MGroupHO.SetName("SpellProcess:m_groupHO");
  34. MSpellCancelList.SetName("SpellProcess::SpellCancelList");
  35. }
  36. SpellProcess::~SpellProcess(){
  37. RemoveAllSpells();
  38. }
  39. void SpellProcess::RemoveAllSpells(){
  40. MSpellProcess.lock();
  41. ClearSpellScriptTimerList();
  42. MutexList<LuaSpell*>::iterator active_spells_itr = active_spells.begin();
  43. while(active_spells_itr.Next()){
  44. DeleteCasterSpell(active_spells_itr->value);
  45. }
  46. active_spells_itr = active_spells.begin();
  47. while(active_spells_itr.Next()){
  48. active_spells.Remove(active_spells_itr->value, true);
  49. }
  50. active_spells.clear();
  51. InterruptStruct* interrupt = 0;
  52. MutexList<InterruptStruct*>::iterator interrupt_list_itr = interrupt_list.begin();
  53. while(interrupt_list_itr.Next()){
  54. interrupt = interrupt_list_itr->value;
  55. CheckInterrupt(interrupt);
  56. interrupt_list.Remove(interrupt_list_itr->value, true);
  57. }
  58. interrupt_list.clear();
  59. MutexList<CastTimer*>::iterator cast_timers_itr = cast_timers.begin();
  60. while(cast_timers_itr.Next()){
  61. safe_delete(cast_timers_itr->value->timer);
  62. safe_delete(cast_timers_itr->value->spell);
  63. cast_timers.Remove(cast_timers_itr->value, true);
  64. }
  65. cast_timers.clear();
  66. MutexList<RecastTimer*>::iterator recast_timers_itr = recast_timers.begin();
  67. while(recast_timers_itr.Next()){
  68. recast_timers.Remove(recast_timers_itr->value, true);
  69. }
  70. MRemoveTargetList.writelock(__FUNCTION__, __LINE__);
  71. remove_target_list.clear();
  72. MRemoveTargetList.releasewritelock(__FUNCTION__, __LINE__);
  73. map<Client*, HeroicOP*>::iterator solo_ho_itr;
  74. MSoloHO.writelock(__FUNCTION__, __LINE__);
  75. for (solo_ho_itr = m_soloHO.begin(); solo_ho_itr != m_soloHO.end(); solo_ho_itr++)
  76. safe_delete(solo_ho_itr->second);
  77. m_soloHO.clear();
  78. MSoloHO.releasewritelock(__FUNCTION__, __LINE__);
  79. map<int32, HeroicOP*>::iterator group_ho_itr;
  80. MGroupHO.writelock(__FUNCTION__, __LINE__);
  81. for (group_ho_itr = m_groupHO.begin(); group_ho_itr != m_groupHO.end(); group_ho_itr++)
  82. safe_delete(group_ho_itr->second);
  83. m_groupHO.clear();
  84. MGroupHO.releasewritelock(__FUNCTION__, __LINE__);
  85. recast_timers.clear();
  86. spell_que.clear();
  87. MSpellCancelList.writelock(__FUNCTION__, __LINE__);
  88. SpellCancelList.clear();
  89. MSpellCancelList.releasewritelock(__FUNCTION__, __LINE__);
  90. MSpellProcess.unlock();
  91. }
  92. void SpellProcess::Process(){
  93. if(last_checked_time > Timer::GetCurrentTime2())
  94. return;
  95. last_checked_time = Timer::GetCurrentTime2() + 50;
  96. MSpellProcess.lock();
  97. CheckSpellScriptTimers();
  98. if(active_spells.size(true) > 0){
  99. LuaSpell* spell = 0;
  100. MutexList<LuaSpell*>::iterator itr = active_spells.begin();
  101. map<LuaSpell*, vector<Spawn*> >::iterator remove_itr;
  102. vector<Spawn*>::iterator target_itr;
  103. vector<Spawn*>::iterator remove_target_itr;
  104. while(itr.Next()){
  105. spell = itr->value;
  106. if (!spell->spell->GetSpellData()->duration_until_cancel && spell->timer.Check()){
  107. spell->num_calls++;
  108. // ProcessSpell(spell, flase) will atempt to call the tick() function in the lua script
  109. // if there is no tick function it will return false, this will cause the server to crash in the event
  110. // of a spell that has a duration but is not a "until canceled" spell or a spell with a tick (tradeskill buffs)
  111. // to counter this check to see if the spell has a call_frequency > 0 before we call ProcessSpell()
  112. if (spell->spell->GetSpellData()->call_frequency > 0 && !ProcessSpell(spell, false))
  113. active_spells.Remove(spell, true, 2000);
  114. else if (((spell->timer.GetDuration() * spell->num_calls) >= spell->spell->GetSpellData()->duration1 * 100) ||
  115. (spell->restored && (spell->timer.GetSetAtTrigger() * spell->num_calls) >= spell->spell->GetSpellData()->duration1 * 100))
  116. DeleteCasterSpell(spell, "expired");
  117. }
  118. else
  119. CheckRemoveTargetFromSpell(spell);
  120. }
  121. }
  122. if (SpellCancelList.size() > 0){
  123. std::vector<LuaSpell*> tmpList;
  124. MSpellCancelList.writelock(__FUNCTION__, __LINE__);
  125. vector<LuaSpell*>::iterator itr = SpellCancelList.begin();
  126. while (itr != SpellCancelList.end()){
  127. tmpList.push_back(*itr);
  128. itr++;
  129. }
  130. SpellCancelList.clear();
  131. MSpellCancelList.releasewritelock(__FUNCTION__, __LINE__);
  132. itr = tmpList.begin();
  133. while (itr != tmpList.end()) {
  134. DeleteCasterSpell(*itr, "canceled");
  135. itr++;
  136. }
  137. }
  138. if(interrupt_list.size(true) > 0){
  139. InterruptStruct* interrupt = 0;
  140. MutexList<InterruptStruct*>::iterator itr = interrupt_list.begin();
  141. while(itr.Next()){
  142. interrupt = itr->value;
  143. CheckInterrupt(interrupt);
  144. safe_delete(interrupt);
  145. }
  146. interrupt_list.clear();
  147. }
  148. if(cast_timers.size(true) > 0){
  149. CastTimer* cast_timer = 0;
  150. MutexList<CastTimer*>::iterator itr = cast_timers.begin();
  151. while (itr.Next()) {
  152. cast_timer = itr->value;
  153. if (cast_timer) {
  154. if (cast_timer->timer->Check(false)) {
  155. if (cast_timer->spell) {
  156. Client* client = cast_timer->zone->GetClientBySpawn(cast_timer->spell->caster);
  157. if (client) {
  158. PacketStruct* packet = configReader.getStruct("WS_FinishCastSpell", client->GetVersion());
  159. if (packet) {
  160. packet->setMediumStringByName("spell_name", cast_timer->spell->spell->GetSpellData()->name.data.c_str());
  161. client->QueuePacket(packet->serialize());
  162. safe_delete(packet);
  163. }
  164. }
  165. if (cast_timer->spell && cast_timer->spell->caster)
  166. cast_timer->spell->caster->IsCasting(false);
  167. cast_timer->delete_timer = true;
  168. CastProcessedSpell(cast_timer->spell, false, cast_timer->in_heroic_opp);
  169. }
  170. else if (cast_timer->entity_command) {
  171. if (cast_timer->timer->Check(false)) {
  172. cast_timer->delete_timer = true;
  173. Spawn* target = cast_timer->zone->GetSpawnByID(cast_timer->target_id);
  174. CastProcessedEntityCommand(cast_timer->entity_command, cast_timer->caster, target, cast_timer->in_heroic_opp);
  175. }
  176. }
  177. }
  178. if (cast_timer->delete_timer) {
  179. safe_delete(cast_timer->timer);
  180. cast_timers.Remove(cast_timer, true);
  181. }
  182. }
  183. }
  184. }
  185. if (recast_timers.size(true) > 0) {
  186. RecastTimer* recast_timer = 0;
  187. MutexList<RecastTimer*>::iterator itr = recast_timers.begin();
  188. vector<Spell*>::iterator remove_recast_itr;
  189. while(itr.Next()){
  190. recast_timer = itr->value;
  191. if(recast_timer->timer->Check(false)){
  192. UnlockSpell(recast_timer->client, recast_timer->spell);
  193. safe_delete(recast_timer->timer);
  194. recast_timers.Remove(recast_timer, true);
  195. }
  196. }
  197. }
  198. if(spell_que.size(true) > 0){
  199. MutexMap<Entity*, Spell*>::iterator itr = spell_que.begin();
  200. while(itr.Next()){
  201. if(itr->first->IsCasting() == false && IsReady(itr->second, itr->first)){
  202. RemoveSpellFromQueue(itr->second, itr->first);
  203. ProcessSpell(itr->first->GetZone(), itr->second, itr->first, itr->first->GetTarget());
  204. }
  205. }
  206. }
  207. // Check solo HO timers
  208. MSoloHO.writelock(__FUNCTION__, __LINE__);
  209. if (m_soloHO.size() > 0) {
  210. map<Client*, HeroicOP*>::iterator itr = m_soloHO.begin();
  211. while (itr != m_soloHO.end()) {
  212. if (itr->second->GetWheel() && Timer::GetCurrentTime2() >= (itr->second->GetStartTime() + (itr->second->GetTotalTime() * 1000))) {
  213. itr->second->SetComplete(1);
  214. ClientPacketFunctions::SendHeroicOPUpdate(itr->first, itr->second);
  215. safe_delete(itr->second);
  216. itr = m_soloHO.erase(itr);
  217. continue;
  218. }
  219. else
  220. itr++;
  221. }
  222. }
  223. MSoloHO.releasewritelock(__FUNCTION__, __LINE__);
  224. // Check group HO timers
  225. MGroupHO.writelock(__FUNCTION__, __LINE__);
  226. if (m_groupHO.size() > 0) {
  227. map<int32, HeroicOP*>::iterator itr = m_groupHO.begin();
  228. while (itr != m_groupHO.end()) {
  229. if (itr->second->GetWheel() && Timer::GetCurrentTime2() >= (itr->second->GetStartTime() + (itr->second->GetTotalTime() * 1000))) {
  230. itr->second->SetComplete(1);
  231. world.GetGroupManager()->GroupLock(__FUNCTION__, __LINE__);
  232. deque<GroupMemberInfo*>::iterator itr2;
  233. PlayerGroup* group = world.GetGroupManager()->GetGroup(itr->first);
  234. if (group)
  235. {
  236. group->MGroupMembers.readlock(__FUNCTION__, __LINE__);
  237. deque<GroupMemberInfo*>* members = group->GetMembers();
  238. for (itr2 = members->begin(); itr2 != members->end(); itr2++) {
  239. if ((*itr2)->client)
  240. ClientPacketFunctions::SendHeroicOPUpdate((*itr2)->client, itr->second);
  241. }
  242. group->MGroupMembers.releasereadlock(__FUNCTION__, __LINE__);
  243. }
  244. world.GetGroupManager()->ReleaseGroupLock(__FUNCTION__, __LINE__);
  245. safe_delete(itr->second);
  246. itr = m_groupHO.erase(itr);
  247. continue;
  248. }
  249. else
  250. itr++;
  251. }
  252. }
  253. MGroupHO.releasewritelock(__FUNCTION__, __LINE__);
  254. MSpellProcess.unlock();
  255. }
  256. bool SpellProcess::IsReady(Spell* spell, Entity* caster){
  257. if(caster->IsCasting())
  258. return false;
  259. bool ret = true;
  260. RecastTimer* recast_timer = 0;
  261. MutexList<RecastTimer*>::iterator itr = recast_timers.begin();
  262. while(itr.Next()){
  263. recast_timer = itr->value;
  264. if(recast_timer->spell == spell && recast_timer->caster == caster){
  265. ret = false;
  266. break;
  267. }
  268. }
  269. return ret;
  270. }
  271. void SpellProcess::CheckRecast(Spell* spell, Entity* caster, float timer_override, bool check_linked_timers) {
  272. if(spell && caster && spell->GetSpellData()->recast > 0){
  273. RecastTimer* timer = new RecastTimer;
  274. timer->caster = caster;
  275. if(caster->IsPlayer())
  276. timer->client = caster->GetZone()->GetClientBySpawn(caster);
  277. else
  278. timer->client = 0;
  279. timer->spell = spell;
  280. if(timer_override == 0)
  281. timer->timer = new Timer((int32)(spell->GetSpellData()->recast*1000));
  282. else
  283. timer->timer = new Timer((int32)(timer_override*1000));
  284. recast_timers.Add(timer);
  285. if(caster->IsPlayer()){
  286. if(timer_override == 0)
  287. ((Player*)caster)->LockSpell(spell, (int16)(spell->GetSpellData()->recast * 10));
  288. else
  289. ((Player*)caster)->LockSpell(spell, timer_override * 10);
  290. if (check_linked_timers && spell->GetSpellData()->linked_timer > 0) {
  291. vector<Spell*> linkedSpells = ((Player*)caster)->GetSpellBookSpellsByTimer(spell->GetSpellData()->linked_timer);
  292. for (int8 i = 0; i < linkedSpells.size(); i++) {
  293. Spell* spell2 = linkedSpells.at(i);
  294. if (spell2)
  295. CheckRecast(spell2, caster, timer_override, false);
  296. }
  297. }
  298. }
  299. }
  300. }
  301. void SpellProcess::CheckInterrupt(InterruptStruct* interrupt){
  302. if(!interrupt || !interrupt->interrupted || !interrupt->interrupted->IsEntity())
  303. return;
  304. Entity* entity = (Entity*)interrupt->interrupted;
  305. Client* client = entity->GetZone()->GetClientBySpawn(entity);
  306. if(client)
  307. SendFinishedCast(GetLuaSpell(entity), client);
  308. RemoveSpellTimersFromSpawn(entity, false);
  309. entity->IsCasting(false);
  310. entity->GetZone()->SendInterruptPacket(entity, interrupt->spell);
  311. if(interrupt->error_code > 0)
  312. entity->GetZone()->SendSpellFailedPacket(client, interrupt->error_code);
  313. if(entity->IsPlayer())
  314. {
  315. ((Player*)entity)->UnlockSpell(interrupt->spell->spell);
  316. SendSpellBookUpdate(((Player*)entity)->GetClient());
  317. }
  318. }
  319. bool SpellProcess::DeleteCasterSpell(Spawn* caster, Spell* spell, string reason){
  320. bool ret = false;
  321. // need to use size(true) to get pending updates to the list as well
  322. if (caster && spell && active_spells.size() > 0) {
  323. LuaSpell* lua_spell = 0;
  324. MutexList<LuaSpell*>::iterator itr = active_spells.begin();
  325. while (itr.Next()){
  326. lua_spell = itr->value;
  327. if (lua_spell->spell == spell && lua_spell->caster == caster) {
  328. ret = DeleteCasterSpell(lua_spell, reason);
  329. break;
  330. }
  331. }
  332. }
  333. return ret;
  334. }
  335. bool SpellProcess::DeleteCasterSpell(LuaSpell* spell, string reason, bool removing_all_spells){
  336. bool ret = false;
  337. Spawn* target = 0;
  338. if(spell) {
  339. if (active_spells.count(spell) > 0)
  340. active_spells.Remove(spell);
  341. if (spell->caster) {
  342. if (spell->spell->GetSpellData()->cast_type == SPELL_CAST_TYPE_TOGGLE){
  343. int8 actual_concentration = spell->spell->GetSpellData()->req_concentration;
  344. if (actual_concentration > 0)
  345. {
  346. int8 curConcentration = spell->caster->GetInfoStruct()->get_cur_concentration();
  347. if(curConcentration >= actual_concentration)
  348. {
  349. spell->caster->GetInfoStruct()->set_cur_concentration(curConcentration - actual_concentration);
  350. if (spell->caster->IsPlayer())
  351. spell->caster->GetZone()->TriggerCharSheetTimer();
  352. }
  353. }
  354. CheckRecast(spell->spell, spell->caster);
  355. if (spell->caster && spell->caster->IsPlayer())
  356. SendSpellBookUpdate(spell->caster->GetZone()->GetClientBySpawn(spell->caster));
  357. }
  358. if(spell->caster->IsPlayer())
  359. ((Player*)spell->caster)->UnlockSpell(spell->spell);
  360. spell->caster->RemoveProc(0, spell);
  361. spell->caster->RemoveMaintainedSpell(spell);
  362. CheckRemoveTargetFromSpell(spell, false);
  363. ZoneServer* zone = spell->caster->GetZone();
  364. spell->MSpellTargets.readlock(__FUNCTION__, __LINE__);
  365. for (int32 i = 0; i < spell->targets.size(); i++) {
  366. target = zone->GetSpawnByID(spell->targets.at(i));
  367. if(target && target->IsEntity()){
  368. ((Entity*)target)->RemoveSpellEffect(spell);
  369. if(spell->spell->GetSpellData()->det_type > 0 && (spell->spell->GetSpellDuration() > 0 || spell->spell->GetSpellData()->duration_until_cancel))
  370. ((Entity*)target)->RemoveDetrimentalSpell(spell);
  371. }
  372. else{
  373. spell->caster->RemoveSpellEffect(spell);
  374. if(spell->spell->GetSpellData()->det_type > 0 && (spell->spell->GetSpellDuration() > 0 || spell->spell->GetSpellData()->duration_until_cancel))
  375. spell->caster->RemoveDetrimentalSpell(spell);
  376. }
  377. if(target && target->IsPlayer() && spell->spell->GetSpellData()->fade_message.length() > 0){
  378. Client* client = target->GetZone()->GetClientBySpawn(target);
  379. if(client){
  380. bool send_to_sender = true;
  381. string fade_message = spell->spell->GetSpellData()->fade_message;
  382. if(fade_message.find("%t") != string::npos)
  383. fade_message.replace(fade_message.find("%t"), 2, target->GetName());
  384. client->Message(CHANNEL_SPELLS_OTHER, fade_message.c_str());
  385. }
  386. }
  387. if (target && target->IsPlayer() && spell->spell->GetSpellData()->fade_message.length() > 0) {
  388. Client* client = target->GetZone()->GetClientBySpawn(target);
  389. if (client) {
  390. bool send_to_sender = true;
  391. string fade_message_others = spell->spell->GetSpellData()->fade_message_others;
  392. if (fade_message_others.find("%t") != string::npos)
  393. fade_message_others.replace(fade_message_others.find("%t"), 2, target->GetName());
  394. if (fade_message_others.find("%c") != string::npos)
  395. fade_message_others.replace(fade_message_others.find("%c"), 2, spell->caster->GetName());
  396. if (fade_message_others.find("%T") != string::npos) {
  397. fade_message_others.replace(fade_message_others.find("%T"), 2, target->GetName());
  398. send_to_sender = false;
  399. }
  400. if (fade_message_others.find("%C") != string::npos) {
  401. fade_message_others.replace(fade_message_others.find("%C"), 2, spell->caster->GetName());
  402. send_to_sender = false;
  403. }
  404. spell->caster->GetZone()->SimpleMessage(CHANNEL_SPELLS_OTHER, fade_message_others.c_str(), target, 50, send_to_sender);
  405. }
  406. }
  407. }
  408. spell->MSpellTargets.releasereadlock(__FUNCTION__, __LINE__);
  409. ret = true;
  410. }
  411. if(lua_interface)
  412. lua_interface->RemoveSpell(spell, true, SpellScriptTimersHasSpell(spell), reason, removing_all_spells);
  413. }
  414. return ret;
  415. }
  416. bool SpellProcess::ProcessSpell(LuaSpell* spell, bool first_cast, const char* function, SpellScriptTimer* timer) {
  417. bool ret = false;
  418. if(!spell->state)
  419. {
  420. LogWrite(SPELL__ERROR, 0, "Spell", "Error: State is NULL! SpellProcess::ProcessSpell for Spell '%s'", (spell->spell != nullptr) ? spell->spell->GetName() : "Unknown");
  421. }
  422. else if(lua_interface && !spell->interrupted){
  423. std::string functionCall = lua_interface->AddSpawnPointers(spell, first_cast, false, function, timer);
  424. vector<LUAData*>* data = spell->spell->GetLUAData();
  425. for(int32 i=0;i<data->size();i++){
  426. switch(data->at(i)->type){
  427. case 0:{
  428. lua_interface->SetSInt32Value(spell->state, data->at(i)->int_value);
  429. break;
  430. }
  431. case 1:{
  432. lua_interface->SetFloatValue(spell->state, data->at(i)->float_value);
  433. break;
  434. }
  435. case 2:{
  436. lua_interface->SetBooleanValue(spell->state, data->at(i)->bool_value);
  437. break;
  438. }
  439. case 3:{
  440. lua_interface->SetStringValue(spell->state, data->at(i)->string_value.c_str());
  441. break;
  442. }
  443. default:{
  444. LogWrite(SPELL__ERROR, 0, "Spell", "Error: Unknown LUA Type '%i' in SpellProcess::ProcessSpell for Spell '%s'", (int)data->at(i)->type, spell->spell->GetName());
  445. return false;
  446. }
  447. }
  448. }
  449. ret = lua_interface->CallSpellProcess(spell, 2 + data->size(), functionCall);
  450. }
  451. return ret;
  452. }
  453. bool SpellProcess::CastPassives(Spell* spell, Entity* caster, bool remove) {
  454. CastInstant(spell, caster, caster, remove, true);
  455. return true;
  456. }
  457. bool SpellProcess::CastInstant(Spell* spell, Entity* caster, Entity* target, bool remove, bool passive) {
  458. LuaSpell* lua_spell = 0;
  459. if(lua_interface)
  460. lua_spell = lua_interface->GetSpell(spell->GetSpellData()->lua_script.c_str());
  461. if(!lua_spell)
  462. {
  463. string lua_script = spell->GetSpellData()->lua_script;
  464. lua_script.append(".lua");
  465. lua_spell = 0;
  466. if(lua_interface)
  467. lua_spell = lua_interface->GetSpell(lua_script.c_str());
  468. if(!lua_spell) {
  469. LogWrite(SPELL__ERROR, 0, "Spell", "Failed to get a LuaSpell for %s (%u)", spell->GetName(), spell->GetSpellID());
  470. return false;
  471. }
  472. else
  473. spell->GetSpellData()->lua_script = lua_script;
  474. }
  475. lua_spell->caster = caster;
  476. lua_spell->spell = spell;
  477. lua_spell->initial_target = target->GetID();
  478. GetSpellTargets(lua_spell);
  479. if (!lua_spell->spell->IsCopiedSpell())
  480. {
  481. lua_getglobal(lua_spell->state, "customspell");
  482. if (lua_isfunction(lua_spell->state, lua_gettop(lua_spell->state))) {
  483. lua_pop(lua_spell->state, 1);
  484. Spell* tmpSpell = lua_spell->spell;
  485. lua_spell->spell = new Spell(lua_spell->spell);
  486. lua_interface->AddCustomSpell(lua_spell);
  487. lua_interface->AddSpawnPointers(lua_spell, false, false, "customspell",0,true);
  488. if (lua_pcall(lua_spell->state, 3, 3, 0) != 0) {
  489. lua_interface->RemoveCustomSpell(lua_spell->spell->GetSpellID());
  490. lua_interface->ResetFunctionStack(lua_spell->state);
  491. safe_delete(lua_spell->spell);
  492. lua_spell->spell = tmpSpell;
  493. }
  494. else
  495. lua_interface->ResetFunctionStack(lua_spell->state);
  496. }
  497. else
  498. lua_interface->ResetFunctionStack(lua_spell->state);
  499. }
  500. caster->GetZone()->SendCastSpellPacket(lua_spell, caster);
  501. if (!remove)
  502. return CastProcessedSpell(lua_spell, passive);
  503. lua_interface->RemoveSpell(lua_spell, true, SpellScriptTimersHasSpell(lua_spell));
  504. return true;
  505. }
  506. void SpellProcess::SendStartCast(LuaSpell* spell, Client* client){
  507. if(client){
  508. PacketStruct* packet = configReader.getStruct("WS_StartCastSpell", client->GetVersion());
  509. if(packet){
  510. packet->setDataByName("cast_time", spell->spell->GetSpellData()->cast_time*.01);
  511. packet->setMediumStringByName("spell_name", spell->spell->GetSpellData()->name.data.c_str());
  512. EQ2Packet* outapp = packet->serialize();
  513. //DumpPacket(outapp);
  514. client->QueuePacket(outapp);
  515. safe_delete(packet);
  516. }
  517. }
  518. }
  519. void SpellProcess::SendFinishedCast(LuaSpell* spell, Client* client){
  520. if(client && spell && spell->spell){
  521. if (spell->spell->GetSpellData()->cast_type == SPELL_CAST_TYPE_TOGGLE)
  522. UnlockAllSpells(client, spell->spell);
  523. else
  524. UnlockAllSpells(client);
  525. if(spell->resisted && spell->spell->GetSpellData()->recast > 0)
  526. CheckRecast(spell->spell, client->GetPlayer(), 0.5); // half sec recast on resisted spells
  527. else if (!spell->interrupted && spell->spell->GetSpellData()->cast_type != SPELL_CAST_TYPE_TOGGLE)
  528. CheckRecast(spell->spell, client->GetPlayer());
  529. else if(spell->caster && spell->caster->IsPlayer())
  530. {
  531. ((Player*)spell->caster)->LockSpell(spell->spell, (int16)(spell->spell->GetSpellData()->recast * 10));
  532. }
  533. PacketStruct* packet = configReader.getStruct("WS_FinishCastSpell", client->GetVersion());
  534. if(packet){
  535. packet->setMediumStringByName("spell_name", spell->spell->GetSpellData()->name.data.c_str());
  536. client->QueuePacket(packet->serialize());
  537. safe_delete(packet);
  538. }
  539. SendSpellBookUpdate(client);
  540. }
  541. if (spell) {
  542. if (!spell->interrupted) {
  543. TakePower(spell);
  544. TakeHP(spell);
  545. TakeSavagery(spell);
  546. AddDissonance(spell);
  547. AddConcentration(spell);
  548. if (client && spell->spell && !spell->spell->GetSpellData()->friendly_spell)
  549. client->GetPlayer()->InCombat(true);
  550. if(client && spell->caster)
  551. client->CheckPlayerQuestsSpellUpdate(spell->spell);
  552. }
  553. }
  554. }
  555. void SpellProcess::LockAllSpells(Client* client){
  556. if(client){
  557. client->GetPlayer()->LockAllSpells();
  558. SendSpellBookUpdate(client);
  559. }
  560. }
  561. void SpellProcess::UnlockAllSpells(Client* client, Spell* exception){
  562. if(client)
  563. client->GetPlayer()->UnlockAllSpells(false, exception);
  564. }
  565. void SpellProcess::UnlockSpell(Client* client, Spell* spell){
  566. if(client && client->GetPlayer() && spell) {
  567. client->GetPlayer()->UnlockSpell(spell);
  568. SendSpellBookUpdate(client);
  569. }
  570. }
  571. bool SpellProcess::CheckPower(LuaSpell* spell){
  572. int16 req = 0;
  573. if(spell->caster){
  574. req = spell->spell->GetPowerRequired(spell->caster);
  575. if(spell->caster->GetPower() >= req)
  576. return true;
  577. }
  578. return false;
  579. }
  580. bool SpellProcess::TakePower(LuaSpell* spell, int32 custom_power_req){
  581. int16 req = 0;
  582. if(spell->caster){
  583. if(custom_power_req)
  584. req = custom_power_req;
  585. else
  586. req = spell->spell->GetPowerRequired(spell->caster);
  587. if(spell->caster->GetPower() >= req){
  588. spell->caster->SetPower(spell->caster->GetPower() - req);
  589. if(spell->caster->IsPlayer())
  590. spell->caster->GetZone()->TriggerCharSheetTimer();
  591. return true;
  592. }
  593. }
  594. return false;
  595. }
  596. bool SpellProcess::CheckHP(LuaSpell* spell) {
  597. int16 req = 0;
  598. if(spell->caster){
  599. req = spell->spell->GetHPRequired(spell->caster);
  600. if(spell->caster->GetHP() >= req)
  601. return true;
  602. }
  603. return false;
  604. }
  605. bool SpellProcess::TakeHP(LuaSpell* spell, int32 custom_hp_req) {
  606. int16 req = 0;
  607. if(spell->caster){
  608. if(custom_hp_req)
  609. req = custom_hp_req;
  610. else
  611. req = spell->spell->GetHPRequired(spell->caster);
  612. if(spell->caster->GetHP() >= req){
  613. spell->caster->SetHP(spell->caster->GetHP() - req);
  614. if(spell->caster->IsPlayer())
  615. spell->caster->GetZone()->TriggerCharSheetTimer();
  616. return true;
  617. }
  618. }
  619. return false;
  620. }
  621. bool SpellProcess::CheckConcentration(LuaSpell* spell) {
  622. if (spell && spell->caster) {
  623. int8 req = spell->spell->GetSpellData()->req_concentration;
  624. int8 current_avail = 5 - spell->caster->GetConcentrationCurrent();
  625. if (current_avail >= req)
  626. return true;
  627. }
  628. return false;
  629. }
  630. bool SpellProcess::AddConcentration(LuaSpell* spell) {
  631. if (spell && spell->caster) {
  632. int8 req = spell->spell->GetSpellData()->req_concentration;
  633. int8 curConcentration = spell->caster->GetInfoStruct()->get_cur_concentration();
  634. int8 current_avail = 5 - curConcentration;
  635. if (current_avail >= req) {
  636. spell->caster->GetInfoStruct()->set_cur_concentration(curConcentration + req);
  637. if (spell->caster->IsPlayer())
  638. spell->caster->GetZone()->TriggerCharSheetTimer();
  639. LogWrite(SPELL__DEBUG, 0, "Spell", "Concentration is now %u on %s", spell->caster->GetInfoStruct()->get_cur_concentration(), spell->caster->GetName());
  640. return true;
  641. }
  642. }
  643. return false;
  644. }
  645. bool SpellProcess::CheckSavagery(LuaSpell* spell) {
  646. if (spell && spell->caster) {
  647. int16 req = spell->spell->GetSavageryRequired(spell->caster);
  648. if(spell->caster->GetSavagery() >= req)
  649. return true;
  650. }
  651. return false;
  652. }
  653. bool SpellProcess::TakeSavagery(LuaSpell* spell) {
  654. int16 req = 0;
  655. if(spell && spell->caster && spell->caster->IsPlayer()){
  656. req = spell->spell->GetSavageryRequired(spell->caster);
  657. if(spell->caster->GetSavagery() >= req){
  658. spell->caster->SetSavagery(spell->caster->GetSavagery() - req);
  659. if(spell->caster->IsPlayer())
  660. spell->caster->GetZone()->TriggerCharSheetTimer();
  661. return true;
  662. }
  663. }
  664. return false;
  665. }
  666. bool SpellProcess::CheckDissonance(LuaSpell* spell) {
  667. if (spell && spell->caster) {
  668. int16 req = spell->spell->GetDissonanceRequired(spell->caster);
  669. if(spell->caster->GetDissonance() <= req)
  670. return true;
  671. }
  672. return false;
  673. }
  674. bool SpellProcess::AddDissonance(LuaSpell* spell) {
  675. int16 req = 0;
  676. if(spell && spell->caster && spell->caster->IsPlayer()){
  677. req = spell->spell->GetDissonanceRequired(spell->caster);
  678. if(spell->caster->GetDissonance() >= req){
  679. spell->caster->SetDissonance(spell->caster->GetDissonance() - req);
  680. if(spell->caster->IsPlayer())
  681. spell->caster->GetZone()->TriggerCharSheetTimer();
  682. return true;
  683. }
  684. }
  685. return false;
  686. }
  687. void SpellProcess::AddSpellToQueue(Spell* spell, Entity* caster){
  688. if(caster && caster->IsPlayer() && spell){
  689. spell_que.Put(caster, spell);
  690. ((Player*)caster)->QueueSpell(spell);
  691. Client* client = caster->GetZone()->GetClientBySpawn(caster);
  692. if(client)
  693. SendSpellBookUpdate(client);
  694. }
  695. }
  696. void SpellProcess::RemoveSpellFromQueue(Spell* spell, Entity* caster){
  697. if(caster && caster->IsPlayer() && spell){
  698. spell_que.erase(caster);
  699. ((Player*)caster)->UnQueueSpell(spell);
  700. Client* client = caster->GetZone()->GetClientBySpawn(caster);
  701. if(client)
  702. SendSpellBookUpdate(client);
  703. }
  704. }
  705. void SpellProcess::RemoveSpellFromQueue(Entity* caster, bool hostile_only) {
  706. if (caster && spell_que.count(caster) > 0) {
  707. Spell* spell = spell_que.Get(caster);
  708. if (spell) {
  709. bool remove = true;
  710. if (hostile_only && spell->GetSpellData()->target_type != SPELL_TARGET_ENEMY)
  711. remove = false;
  712. if (remove) {
  713. spell_que.erase(caster);
  714. ((Player*)caster)->UnQueueSpell(spell);
  715. Client* client = caster->GetZone()->GetClientBySpawn(caster);
  716. if (client)
  717. SendSpellBookUpdate(client);
  718. }
  719. }
  720. }
  721. }
  722. void SpellProcess::CheckSpellQueue(Entity* caster){
  723. if(caster && caster->IsPlayer()){
  724. if(spell_que.count(caster) > 0)
  725. RemoveSpellFromQueue(spell_que.Get(caster), caster);
  726. }
  727. }
  728. void SpellProcess::CheckSpellQueue(Spell* spell, Entity* caster){
  729. if(caster->IsPlayer()){
  730. bool add = true;
  731. bool remove = false;
  732. if(spell_que.count(caster) > 0){
  733. remove = true;
  734. if(spell_que.Get(caster) == spell)
  735. add = false;
  736. }
  737. if(remove)
  738. RemoveSpellFromQueue(spell, caster);
  739. if(add)
  740. AddSpellToQueue(spell, caster);
  741. }
  742. }
  743. void SpellProcess::SendSpellBookUpdate(Client* client){
  744. if(client){
  745. EQ2Packet* app = client->GetPlayer()->GetSpellBookUpdatePacket(client->GetVersion());
  746. if(app)
  747. client->QueuePacket(app);
  748. }
  749. }
  750. LuaSpell* SpellProcess::GetLuaSpell(Entity* caster){
  751. LuaSpell* spell = 0;
  752. if(caster && cast_timers.size() > 0){
  753. CastTimer* cast_timer = 0;
  754. MutexList<CastTimer*>::iterator itr = cast_timers.begin();
  755. while(itr.Next()){
  756. cast_timer = itr->value;
  757. if(cast_timer && cast_timer->spell && cast_timer->spell->caster == caster){
  758. spell = cast_timer->spell;
  759. break;
  760. }
  761. }
  762. }
  763. return spell;
  764. }
  765. Spell* SpellProcess::GetSpell(Entity* caster){
  766. Spell* spell = 0;
  767. if(cast_timers.size() > 0){
  768. CastTimer* cast_timer = 0;
  769. MutexList<CastTimer*>::iterator itr = cast_timers.begin();
  770. while(itr.Next()){
  771. cast_timer = itr->value;
  772. if(cast_timer && cast_timer->spell && cast_timer->spell->caster == caster){
  773. spell = cast_timer->spell->spell;
  774. break;
  775. }
  776. }
  777. }
  778. return spell;
  779. }
  780. Spawn* SpellProcess::GetSpellTarget(Entity* caster){
  781. Spawn* target = 0;
  782. if(cast_timers.size() > 0){
  783. CastTimer* cast_timer = 0;
  784. MutexList<CastTimer*>::iterator itr = cast_timers.begin();
  785. while(itr.Next()){
  786. cast_timer = itr->value;
  787. if(cast_timer && cast_timer->spell->caster == caster){
  788. target = caster->GetZone()->GetSpawnByID(cast_timer->spell->initial_target);
  789. break;
  790. }
  791. }
  792. }
  793. return target;
  794. }
  795. void SpellProcess::ProcessSpell(ZoneServer* zone, Spell* spell, Entity* caster, Spawn* target, bool lock, bool harvest_spell, LuaSpell* customSpell, int16 custom_cast_time, bool in_heroic_opp)
  796. {
  797. if((customSpell != 0 || spell != 0) && caster)
  798. {
  799. Client* client = 0;
  800. //int16 version = 0;
  801. LuaSpell* lua_spell = 0;
  802. if (customSpell)
  803. {
  804. lua_spell = customSpell;
  805. spell = lua_spell->spell;
  806. }
  807. else if(lua_interface)
  808. lua_spell = lua_interface->GetSpell(spell->GetSpellData()->lua_script.c_str());
  809. // this will only hit if customSpell is null and we go through the lua_interface
  810. if(!lua_spell)
  811. {
  812. string lua_script = spell->GetSpellData()->lua_script;
  813. lua_script.append(".lua");
  814. if(lua_interface)
  815. lua_spell = lua_interface->GetSpell(lua_script.c_str());
  816. if(!lua_spell)
  817. return;
  818. else
  819. spell->GetSpellData()->lua_script = lua_script;
  820. }
  821. if (!target)
  822. target = caster;
  823. int8 target_type = spell->GetSpellData()->target_type;
  824. lua_spell->caster = caster;
  825. lua_spell->spell = spell;
  826. int32 target_id = target->GetID();
  827. lua_spell->initial_target = target_id;
  828. if (!harvest_spell)
  829. GetSpellTargets(lua_spell);
  830. else{
  831. lua_spell->MSpellTargets.writelock(__FUNCTION__, __LINE__);
  832. lua_spell->targets.push_back(target_id);
  833. lua_spell->MSpellTargets.releasewritelock(__FUNCTION__, __LINE__);
  834. }
  835. if (target_id == lua_spell->initial_target)
  836. {
  837. LogWrite(SPELL__DEBUG, 1, "Spell", "%s is casting %s on %s.", caster->GetName(), spell->GetName(), ( target ) ? target->GetName() : "No Target" );
  838. }
  839. else
  840. {
  841. LogWrite(SPELL__DEBUG, 1, "Spell", "%s: Casting on %s through %s as target.", spell->GetName(), caster->GetZone()->GetSpawnByID(lua_spell->initial_target)->GetName(), target->GetName());
  842. }
  843. target = lua_spell->caster->GetZone()->GetSpawnByID(lua_spell->initial_target);
  844. if(caster->IsPlayer() && zone)
  845. {
  846. client = zone->GetClientBySpawn(caster);
  847. //version = client->GetVersion();
  848. }
  849. if (!customSpell && !lua_spell->spell->IsCopiedSpell())
  850. {
  851. lua_getglobal(lua_spell->state, "customspell");
  852. if (lua_isfunction(lua_spell->state, lua_gettop(lua_spell->state))) {
  853. lua_pop(lua_spell->state, 1);
  854. Spell* tmpSpell = lua_spell->spell;
  855. lua_spell->spell = new Spell(lua_spell->spell);
  856. lua_interface->AddCustomSpell(lua_spell);
  857. lua_interface->AddSpawnPointers(lua_spell, false, false, "customspell", 0, true);
  858. if (lua_pcall(lua_spell->state, 3, 3, 0) != 0) {
  859. lua_interface->RemoveCustomSpell(lua_spell->spell->GetSpellID());
  860. lua_interface->ResetFunctionStack(lua_spell->state);
  861. safe_delete(lua_spell->spell);
  862. lua_spell->spell = tmpSpell;
  863. }
  864. else
  865. lua_interface->ResetFunctionStack(lua_spell->state);
  866. }
  867. else
  868. lua_interface->ResetFunctionStack(lua_spell->state);
  869. }
  870. //If this spell is the toggle cast type and is being toggled off, do this now
  871. if (spell->GetSpellData()->cast_type == SPELL_CAST_TYPE_TOGGLE)
  872. {
  873. bool ret_val = DeleteCasterSpell(caster, spell, "purged");
  874. if (ret_val)
  875. {
  876. lua_spell->caster->GetZone()->GetSpellProcess()->RemoveSpellScriptTimerBySpell(lua_spell);
  877. DeleteSpell(lua_spell);
  878. return;
  879. }
  880. }
  881. // If a player is casting the spell AND spell is a tradeskill spell
  882. if (client && spell->GetSpellData()->spell_book_type == SPELL_BOOK_TYPE_TRADESKILL)
  883. {
  884. // If the player is currently crafting
  885. if (client->IsCrafting())
  886. {
  887. Tradeskill* tradeskill = 0;
  888. zone->GetTradeskillMgr()->ReadLock(__FUNCTION__, __LINE__);
  889. tradeskill = zone->GetTradeskillMgr()->GetTradeskill(client);
  890. // Can not cast a crafting spell that doesn't match the current crafting technique
  891. if (spell->GetSpellData()->mastery_skill != tradeskill->recipe->GetTechnique())
  892. {
  893. // send a message to the client, used chat_relationship to match other tradeskill messages, not sure if it is accurate though
  894. client->Message(CHANNEL_COLOR_CHAT_RELATIONSHIP, "You are not using %s on this recipe.", master_skill_list.GetSkill(spell->GetSpellData()->mastery_skill)->name.data.c_str());
  895. // Write a spell debug message on why we couldn't cast
  896. LogWrite(SPELL__DEBUG, 1, "Spell", "%s could not cast tradeskill spell (%s), skills did not match. spell mastery skill = %u, tradeskill technique = %u", caster->GetName(), spell->GetName(), spell->GetSpellData()->mastery_skill, tradeskill->recipe->GetTechnique());
  897. // make sure to release the lock before we return out
  898. zone->GetTradeskillMgr()->ReleaseReadLock(__FUNCTION__, __LINE__);
  899. lua_spell->caster->GetZone()->GetSpellProcess()->RemoveSpellScriptTimerBySpell(lua_spell);
  900. DeleteSpell(lua_spell);
  901. return;
  902. }
  903. // need to make sure the lock is released if the if passed
  904. zone->GetTradeskillMgr()->ReleaseReadLock(__FUNCTION__, __LINE__);
  905. }
  906. else // If the player is not currently crafting
  907. {
  908. LogWrite(SPELL__DEBUG, 1, "Spell", "%s cannot cast a tradeskill spell (%s) while not crafting.", caster->GetName(), spell->GetName());
  909. zone->SendSpellFailedPacket(client, SPELL_ERROR_ONLY_WHEN_CRAFTING);
  910. lua_spell->caster->GetZone()->GetSpellProcess()->RemoveSpellScriptTimerBySpell(lua_spell);
  911. DeleteSpell(lua_spell);
  912. return;
  913. }
  914. }
  915. if (caster != target && target != NULL && !caster->CheckLoS(target))
  916. {
  917. LogWrite(SPELL__DEBUG, 1, "Spell", "%s cannot see target %s.", caster->GetName(), target->GetName());
  918. zone->SendSpellFailedPacket(client, SPELL_ERROR_CANT_SEE_TARGET);
  919. lua_spell->caster->GetZone()->GetSpellProcess()->RemoveSpellScriptTimerBySpell(lua_spell);
  920. DeleteSpell(lua_spell);
  921. return;
  922. }
  923. int8 spell_type = lua_spell->spell->GetSpellData()->spell_type;
  924. LuaSpell* conflictSpell = caster->HasLinkedTimerID(lua_spell, target, (spell_type == SPELL_TYPE_DD || spell_type == SPELL_TYPE_DOT));
  925. if(conflictSpell)
  926. {
  927. if(conflictSpell->spell->GetSpellData()->min_class_skill_req > 0 && lua_spell->spell->GetSpellData()->min_class_skill_req > 0)
  928. {
  929. if(conflictSpell->spell->GetSpellData()->min_class_skill_req <= lua_spell->spell->GetSpellData()->min_class_skill_req)
  930. {
  931. if(spell->GetSpellData()->friendly_spell)
  932. {
  933. ZoneServer* zone = caster->GetZone();
  934. Spawn* tmpTarget = zone->GetSpawnByID(conflictSpell->initial_target);
  935. if(tmpTarget && tmpTarget->IsEntity())
  936. {
  937. zone->RemoveTargetFromSpell(conflictSpell, tmpTarget);
  938. CheckRemoveTargetFromSpell(conflictSpell);
  939. ((Entity*)tmpTarget)->RemoveSpellEffect(conflictSpell);
  940. if(client)
  941. UnlockSpell(client, conflictSpell->spell);
  942. }
  943. return;
  944. }
  945. else if(lua_spell->spell->GetSpellData()->spell_type == SPELL_TYPE_DEBUFF)
  946. {
  947. SpellCannotStack(zone, client, lua_spell->caster, lua_spell, conflictSpell);
  948. return;
  949. }
  950. }
  951. else
  952. {
  953. SpellCannotStack(zone, client, lua_spell->caster, lua_spell, conflictSpell);
  954. return;
  955. }
  956. }
  957. }
  958. if ((caster->IsMezzed() && !spell->CastWhileMezzed()) || (caster->IsStunned() && !spell->CastWhileStunned()))
  959. {
  960. LogWrite(SPELL__DEBUG, 1, "Spell", "%s cannot cast (mezzed or stunned).", caster->GetName());
  961. zone->SendSpellFailedPacket(client, SPELL_ERROR_CANNOT_CAST_STUNNED);
  962. lua_spell->caster->GetZone()->GetSpellProcess()->RemoveSpellScriptTimerBySpell(lua_spell);
  963. DeleteSpell(lua_spell);
  964. return;
  965. }
  966. if (caster->IsStifled() && !spell->CastWhileStifled())
  967. {
  968. LogWrite(SPELL__DEBUG, 1, "Spell", "%s cannot cast (stifled).", caster->GetName());
  969. zone->SendSpellFailedPacket(client, SPELL_ERROR_CANNOT_CAST_STIFFLED);
  970. lua_spell->caster->GetZone()->GetSpellProcess()->RemoveSpellScriptTimerBySpell(lua_spell);
  971. DeleteSpell(lua_spell);
  972. return;
  973. }
  974. if (caster->IsFeared() && !spell->CastWhileFeared())
  975. {
  976. LogWrite(SPELL__DEBUG, 1, "Spell", "%s cannot cast (feared).", caster->GetName());
  977. zone->SendSpellFailedPacket(client, SPELL_ERROR_CANNOT_CAST_FEARED);
  978. lua_spell->caster->GetZone()->GetSpellProcess()->RemoveSpellScriptTimerBySpell(lua_spell);
  979. DeleteSpell(lua_spell);
  980. return;
  981. }
  982. if(caster->IsPlayer() && !IsReady(spell, caster))
  983. {
  984. LogWrite(SPELL__DEBUG, 1, "Spell", "Queuing spell for %s.", caster->GetName());
  985. CheckSpellQueue(spell, caster);
  986. lua_spell->caster->GetZone()->GetSpellProcess()->RemoveSpellScriptTimerBySpell(lua_spell);
  987. DeleteSpell(lua_spell);
  988. return;
  989. }
  990. if (target_type != SPELL_TARGET_SELF && target_type != SPELL_TARGET_GROUP_AE && target_type != SPELL_TARGET_NONE && spell->GetSpellData()->max_aoe_targets == 0)
  991. {
  992. LogWrite(SPELL__DEBUG, 1, "Spell", "%s: Not Self, Not Group AE, Not None, Max Targets = 0", spell->GetName());
  993. if (!target)
  994. {
  995. LogWrite(SPELL__DEBUG, 1, "Spell", "%s: No target.", spell->GetName());
  996. zone->SendSpellFailedPacket(client, SPELL_ERROR_NO_ELIGIBLE_TARGET);
  997. lua_spell->caster->GetZone()->GetSpellProcess()->RemoveSpellScriptTimerBySpell(lua_spell);
  998. DeleteSpell(lua_spell);
  999. return;
  1000. }
  1001. float tmpRange = spell->GetSpellData()->range;
  1002. if (client && target != caster && !spell->GetSpellData()->range)
  1003. {
  1004. bool match = false;
  1005. int tmpTier = 0;
  1006. Spell* tmpSpell = 0;
  1007. for (tmpTier = 0; tmpTier < spell->GetSpellTier(); tmpTier++)
  1008. {
  1009. tmpSpell = master_spell_list.GetSpell(spell->GetSpellData()->id, tmpTier);
  1010. if (tmpSpell && tmpSpell->GetSpellData()->range)
  1011. {
  1012. match = true;
  1013. break;
  1014. }
  1015. }
  1016. if (tmpSpell)
  1017. tmpRange = tmpSpell->GetSpellData()->range;
  1018. if (!match)
  1019. tmpTier = -1;
  1020. char msg[512];
  1021. snprintf(msg, 512, "SpellCasted without proper spell range set %s ID %i Tier %i Range obtained from tier %i range %f", spell->GetName(), spell->GetSpellID(), spell->GetSpellTier(), tmpTier, tmpRange);
  1022. if (!world.CheckTempBugCRC(msg))
  1023. commands.Command_ReportBug(client, new Seperator(msg));
  1024. }
  1025. if(caster->GetDistance(target) > tmpRange)
  1026. {
  1027. LogWrite(SPELL__DEBUG, 1, "Spell", "%s: Too far.", spell->GetName());
  1028. zone->SendSpellFailedPacket(client, SPELL_ERROR_TOO_FAR_AWAY);
  1029. lua_spell->caster->GetZone()->GetSpellProcess()->RemoveSpellScriptTimerBySpell(lua_spell);
  1030. DeleteSpell(lua_spell);
  1031. return;
  1032. }
  1033. if (caster->GetDistance(target) < spell->GetSpellData()->min_range)
  1034. {
  1035. LogWrite(SPELL__DEBUG, 1, "Spell", "%s: Too close.", spell->GetName());
  1036. zone->SendSpellFailedPacket(client, SPELL_ERROR_TOO_CLOSE);
  1037. lua_spell->caster->GetZone()->GetSpellProcess()->RemoveSpellScriptTimerBySpell(lua_spell);
  1038. DeleteSpell(lua_spell);
  1039. return;
  1040. }
  1041. }
  1042. if(target_type == SPELL_TARGET_SELF && spell->GetSpellData()->max_aoe_targets == 0)
  1043. {
  1044. if (harvest_spell)
  1045. {
  1046. LogWrite(SPELL__DEBUG, 1, "Spell", "%s: Harvest, Target Self, Max Targets = 0", spell->GetName());
  1047. if (!target || !target->IsGroundSpawn())
  1048. {
  1049. LogWrite(SPELL__DEBUG, 1, "Spell", "%s: No target or not groundspawn.", spell->GetName());
  1050. zone->SendSpellFailedPacket(client, SPELL_ERROR_NO_ELIGIBLE_TARGET);
  1051. lua_spell->caster->GetZone()->GetSpellProcess()->RemoveSpellScriptTimerBySpell(lua_spell);
  1052. DeleteSpell(lua_spell);
  1053. return;
  1054. }
  1055. }
  1056. else
  1057. {
  1058. LogWrite(SPELL__DEBUG, 1, "Spell", "%s: Target '%s' is Caster '%s'.", spell->GetName(), ( target ) ? target->GetName() : "None", caster->GetName());
  1059. target = caster;
  1060. }
  1061. }
  1062. // Is enemy spell AND direct-damage (no AE)
  1063. if (target_type == SPELL_TARGET_ENEMY && spell->GetSpellData()->max_aoe_targets == 0)
  1064. {
  1065. LogWrite(SPELL__DEBUG, 1, "Spell", "%s: Target Enemy (%s) and Max AE Targets = 0.", spell->GetName(), target->GetName());
  1066. if (spell->GetSpellData()->friendly_spell && target->IsPlayer() )
  1067. {
  1068. LogWrite(SPELL__DEBUG, 1, "Spell", "%s: Is Friendly, Target is Player (%s).", spell->GetName(), target->GetName());
  1069. if (!target->IsEntity())
  1070. {
  1071. LogWrite(SPELL__DEBUG, 1, "Spell", "%s: No target.", spell->GetName());
  1072. zone->SendSpellFailedPacket(client, SPELL_ERROR_NO_ELIGIBLE_TARGET);
  1073. lua_spell->caster->GetZone()->GetSpellProcess()->RemoveSpellScriptTimerBySpell(lua_spell);
  1074. DeleteSpell(lua_spell);
  1075. return;
  1076. }
  1077. /*if (target->appearance.attackable) {
  1078. zone->SendSpellFailedPacket(client, SPELL_ERROR_NOT_A_FRIEND);
  1079. return;
  1080. }*/
  1081. }
  1082. else if (spell->GetSpellData()->friendly_spell && target->IsNPC() && target->appearance.attackable)
  1083. {
  1084. LogWrite(SPELL__DEBUG, 1, "Spell", "%s: Is Not Friendly (friendly and NPC)", spell->GetName());
  1085. if (target->IsPet())
  1086. {
  1087. if (((NPC*)target)->GetOwner()->IsNPC())
  1088. {
  1089. zone->SendSpellFailedPacket(client, SPELL_ERROR_NOT_A_FRIEND);
  1090. lua_spell->caster->GetZone()->GetSpellProcess()->RemoveSpellScriptTimerBySpell(lua_spell);
  1091. DeleteSpell(lua_spell);
  1092. return;
  1093. }
  1094. }
  1095. else if (target->IsBot() && (caster->IsPlayer() || caster->IsBot())) {
  1096. // Needed so bots or player can cast friendly spells on bots
  1097. }
  1098. else
  1099. {
  1100. zone->SendSpellFailedPacket(client, SPELL_ERROR_NOT_A_FRIEND);
  1101. lua_spell->caster->GetZone()->GetSpellProcess()->RemoveSpellScriptTimerBySpell(lua_spell);
  1102. DeleteSpell(lua_spell);
  1103. return;
  1104. }
  1105. }
  1106. else if (spell->GetSpellData()->friendly_spell && target->IsNPC() && caster->IsNPC()) {
  1107. // TODO: faction checks? some other checks to prevent an npc casting a friendly spell on another npc
  1108. LogWrite(SPELL__DEBUG, 1, "Spell", "%s: NPC Cast", spell->GetName());
  1109. }
  1110. else
  1111. {
  1112. LogWrite(SPELL__DEBUG, 1, "Spell", "%s: Is Not Friendly (catch all)", spell->GetName());
  1113. if (!target->IsEntity())
  1114. {
  1115. LogWrite(SPELL__DEBUG, 1, "Spell", "%s: No target.", spell->GetName());
  1116. zone->SendSpellFailedPacket(client, SPELL_ERROR_NO_ELIGIBLE_TARGET);
  1117. lua_spell->caster->GetZone()->GetSpellProcess()->RemoveSpellScriptTimerBySpell(lua_spell);
  1118. DeleteSpell(lua_spell);
  1119. return;
  1120. }
  1121. if (caster == target || (!target->IsPlayer() && !target->appearance.attackable))
  1122. {
  1123. LogWrite(SPELL__DEBUG, 1, "Spell", "%s: Not an Enemy (Target: %s).", spell->GetName(), target->GetName());
  1124. zone->SendSpellFailedPacket(client, SPELL_ERROR_NOT_AN_ENEMY);
  1125. lua_spell->caster->GetZone()->GetSpellProcess()->RemoveSpellScriptTimerBySpell(lua_spell);
  1126. DeleteSpell(lua_spell);
  1127. return;
  1128. }
  1129. if (!target->Alive())
  1130. {
  1131. LogWrite(SPELL__DEBUG, 1, "Spell", "%s: Target is not alive (Target: %s).", spell->GetName(), target->GetName());
  1132. zone->SendSpellFailedPacket(client, SPELL_ERROR_NOT_ALIVE);
  1133. lua_spell->caster->GetZone()->GetSpellProcess()->RemoveSpellScriptTimerBySpell(lua_spell);
  1134. DeleteSpell(lua_spell);
  1135. return;
  1136. }
  1137. if (target->GetInvulnerable())
  1138. {
  1139. LogWrite(SPELL__DEBUG, 1, "Spell", "%s: Target is invulnerable (Target: %s).", spell->GetName(), target->GetName());
  1140. zone->SendSpellFailedPacket(client, SPELL_ERROR_TARGET_INVULNERABLE);
  1141. lua_spell->caster->GetZone()->GetSpellProcess()->RemoveSpellScriptTimerBySpell(lua_spell);
  1142. DeleteSpell(lua_spell);
  1143. return;
  1144. }
  1145. if ((target->IsPlayer() || target->IsBot()) && (caster->IsPlayer() || caster->IsBot()))
  1146. {
  1147. bool attackAllowed = (Entity*)caster->AttackAllowed((Entity*)target, 0);
  1148. if (!attackAllowed)
  1149. {
  1150. LogWrite(SPELL__DEBUG, 1, "Spell", "%s: Target (%s) is player and not attackable.", spell->GetName(), target->GetName());
  1151. zone->SendSpellFailedPacket(client, SPELL_ERROR_NOT_AN_ENEMY);
  1152. lua_spell->caster->GetZone()->GetSpellProcess()->RemoveSpellScriptTimerBySpell(lua_spell);
  1153. DeleteSpell(lua_spell);
  1154. return;
  1155. }
  1156. }
  1157. if (target->IsPet() && ((NPC*)target)->GetOwner() && ((NPC*)target)->GetOwner() == caster) {
  1158. LogWrite(SPELL__DEBUG, 1, "Spell", "%s: Target (%s) is casters pet and not attackable by caster.", spell->GetName(), target->GetName());
  1159. zone->SendSpellFailedPacket(client, SPELL_ERROR_NOT_AN_ENEMY);
  1160. lua_spell->caster->GetZone()->GetSpellProcess()->RemoveSpellScriptTimerBySpell(lua_spell);
  1161. DeleteSpell(lua_spell);
  1162. return;
  1163. }
  1164. }
  1165. }
  1166. if (lua_spell->targets.size() == 0 && spell->GetSpellData()->max_aoe_targets == 0)
  1167. {
  1168. LogWrite(SPELL__ERROR, 0, "Spell", "SpellProcess::ProcessSpell Unable to find any spell targets for spell '%s'.", spell->GetName());
  1169. lua_spell->caster->GetZone()->GetSpellProcess()->RemoveSpellScriptTimerBySpell(lua_spell);
  1170. DeleteSpell(lua_spell);
  1171. return;
  1172. }
  1173. if(target_type == SPELL_TARGET_ENEMY_CORPSE || target_type == SPELL_TARGET_GROUP_CORPSE)
  1174. {
  1175. if(target->Alive())
  1176. {
  1177. zone->SendSpellFailedPacket(client, SPELL_ERROR_NOT_DEAD);
  1178. lua_spell->caster->GetZone()->GetSpellProcess()->RemoveSpellScriptTimerBySpell(lua_spell);
  1179. DeleteSpell(lua_spell);
  1180. return;
  1181. }
  1182. if(target->IsPlayer() && zone->GetClientBySpawn(target)->GetCurrentRez()->active){
  1183. zone->SendSpellFailedPacket(client, SPELL_ERROR_ALREADY_CAST);
  1184. lua_spell->caster->GetZone()->GetSpellProcess()->RemoveSpellScriptTimerBySpell(lua_spell);
  1185. DeleteSpell(lua_spell);
  1186. return;
  1187. }
  1188. }
  1189. if(!CheckPower(lua_spell))
  1190. {
  1191. zone->SendSpellFailedPacket(client, SPELL_ERROR_NOT_ENOUGH_POWER);
  1192. lua_spell->caster->GetZone()->GetSpellProcess()->RemoveSpellScriptTimerBySpell(lua_spell);
  1193. DeleteSpell(lua_spell);
  1194. return;
  1195. }
  1196. if (!CheckHP(lua_spell))
  1197. {
  1198. zone->SendSpellFailedPacket(client, SPELL_ERROR_NOT_ENOUGH_HEALTH);
  1199. lua_spell->caster->GetZone()->GetSpellProcess()->RemoveSpellScriptTimerBySpell(lua_spell);
  1200. DeleteSpell(lua_spell);
  1201. return;
  1202. }
  1203. if (!CheckSavagery(lua_spell))
  1204. {
  1205. zone->SendSpellFailedPacket(client, SPELL_ERROR_NOT_ENOUGH_SAVAGERY);
  1206. lua_spell->caster->GetZone()->GetSpellProcess()->RemoveSpellScriptTimerBySpell(lua_spell);
  1207. DeleteSpell(lua_spell);
  1208. return;
  1209. }
  1210. if (!CheckDissonance(lua_spell))
  1211. {
  1212. zone->SendSpellFailedPacket(client, SPELL_ERROR_NOT_ENOUGH_DISSONANCE);
  1213. lua_spell->caster->GetZone()->GetSpellProcess()->RemoveSpellScriptTimerBySpell(lua_spell);
  1214. DeleteSpell(lua_spell);
  1215. return;
  1216. }
  1217. if (!CheckConcentration(lua_spell))
  1218. {
  1219. zone->SendSpellFailedPacket(client, SPELL_ERROR_NOT_ENOUGH_CONC);
  1220. lua_spell->caster->GetZone()->GetSpellProcess()->RemoveSpellScriptTimerBySpell(lua_spell);
  1221. DeleteSpell(lua_spell);
  1222. return;
  1223. }
  1224. // Precast in lua
  1225. if (lua_interface) {
  1226. bool result = false;
  1227. lua_interface->AddSpawnPointers(lua_spell, false, true);
  1228. if (lua_pcall(lua_spell->state, 2, 2, 0) == 0) {
  1229. result = lua_interface->GetBooleanValue(lua_spell->state, 1);
  1230. int8 error = lua_interface->GetInt8Value(lua_spell->state, 2) == 0 ? SPELL_ERROR_CANNOT_PREPARE : lua_interface->GetInt8Value(lua_spell->state, 2);
  1231. lua_interface->ResetFunctionStack(lua_spell->state);
  1232. if (!result) {
  1233. zone->SendSpellFailedPacket(client, error);
  1234. lua_spell->caster->GetZone()->GetSpellProcess()->RemoveSpellScriptTimerBySpell(lua_spell);
  1235. DeleteSpell(lua_spell);
  1236. return;
  1237. }
  1238. }
  1239. else {
  1240. LogWrite(SPELL__DEBUG, 1, "Spell", "No precast function found for %s", lua_spell->spell->GetName());
  1241. lua_interface->ResetFunctionStack(lua_spell->state);
  1242. }
  1243. }
  1244. else
  1245. LogWrite(SPELL__DEBUG, 1, "Spell", "Unable to do precast check as there was no lua_interface");
  1246. if (custom_cast_time > 0)
  1247. spell->GetSpellData()->cast_time = custom_cast_time;
  1248. //Apply casting speed mod
  1249. spell->ModifyCastTime(caster);
  1250. //cancel stealth effects on cast
  1251. if(caster->IsStealthed() || caster->IsInvis())
  1252. caster->CancelAllStealth();
  1253. if(caster && caster->IsEntity() && caster->CheckFizzleSpell(lua_spell))
  1254. {
  1255. caster->GetZone()->SendCastSpellPacket(0, target ? target : caster, caster);
  1256. caster->GetZone()->SendInterruptPacket(caster, lua_spell, true);
  1257. caster->IsCasting(false);
  1258. if(caster->IsPlayer())
  1259. {
  1260. ((Player*)caster)->UnlockSpell(spell);
  1261. SendSpellBookUpdate(((Player*)caster)->GetClient());
  1262. }
  1263. // fizzle takes half
  1264. int16 power_req = spell->GetPowerRequired(caster) / 2;
  1265. TakePower(lua_spell, power_req);
  1266. int16 hp_req = spell->GetHPRequired(caster) / 2;
  1267. TakeHP(lua_spell, hp_req);
  1268. lua_spell->caster->GetZone()->GetSpellProcess()->RemoveSpellScriptTimerBySpell(lua_spell);
  1269. DeleteSpell(lua_spell);
  1270. return;
  1271. }
  1272. SendStartCast(lua_spell, client);
  1273. LockAllSpells(client);
  1274. if(spell->GetSpellData()->cast_time > 0)
  1275. {
  1276. CastTimer* cast_timer = new CastTimer;
  1277. cast_timer->entity_command = 0;
  1278. cast_timer->target_id = target ? target->GetID() : 0;
  1279. cast_timer->spell = lua_spell;
  1280. cast_timer->spell->caster = caster;
  1281. cast_timer->delete_timer = false;
  1282. cast_timer->timer = new Timer(spell->GetSpellData()->cast_time * 10);
  1283. cast_timer->zone = zone;
  1284. cast_timer->in_heroic_opp = in_heroic_opp;
  1285. cast_timers.Add(cast_timer);
  1286. if(caster)
  1287. caster->IsCasting(true);
  1288. }
  1289. else
  1290. {
  1291. if(!CastProcessedSpell(lua_spell, false, in_heroic_opp))
  1292. {
  1293. lua_spell->caster->GetZone()->GetSpellProcess()->RemoveSpellScriptTimerBySpell(lua_spell);
  1294. DeleteSpell(lua_spell);
  1295. return;
  1296. }
  1297. }
  1298. if(caster)
  1299. caster->GetZone()->SendCastSpellPacket(lua_spell, caster);
  1300. }
  1301. }
  1302. void SpellProcess::ProcessEntityCommand(ZoneServer* zone, EntityCommand* entity_command, Entity* caster, Spawn* target, bool lock, bool in_heroic_opp) {
  1303. if (zone && entity_command && caster && target && !target->IsPlayer()) {
  1304. Client* client = zone->GetClientBySpawn(caster);
  1305. if (caster->GetDistance(target) > entity_command->distance) {
  1306. zone->SendSpellFailedPacket(client, SPELL_ERROR_TOO_FAR_AWAY);
  1307. return;
  1308. }
  1309. if (entity_command->cast_time > 0) {
  1310. PacketStruct* packet = configReader.getStruct("WS_StartCastSpell", client->GetVersion());
  1311. if (packet) {
  1312. LockAllSpells(client);
  1313. packet->setDataByName("cast_time", entity_command->cast_time * 0.01);
  1314. packet->setMediumStringByName("spell_name", entity_command->name.c_str());
  1315. EQ2Packet* outapp = packet->serialize();
  1316. client->QueuePacket(outapp);
  1317. safe_delete(packet);
  1318. CastTimer* cast_timer = new CastTimer;
  1319. cast_timer->caster = client;
  1320. cast_timer->target_id = target ? target->GetID() : 0;
  1321. cast_timer->entity_command = entity_command;
  1322. cast_timer->spell = 0;
  1323. cast_timer->delete_timer = false;
  1324. cast_timer->timer = new Timer(entity_command->cast_time * 10);
  1325. cast_timer->zone = zone;
  1326. cast_timer->in_heroic_opp = in_heroic_opp;
  1327. cast_timers.Add(cast_timer);
  1328. caster->IsCasting(true);
  1329. }
  1330. }
  1331. else if (!CastProcessedEntityCommand(entity_command, client, target, in_heroic_opp))
  1332. return;
  1333. if (entity_command && entity_command->spell_visual > 0)
  1334. caster->GetZone()->SendCastEntityCommandPacket(entity_command, caster->GetID(), target->GetID());
  1335. }
  1336. }
  1337. bool SpellProcess::CastProcessedSpell(LuaSpell* spell, bool passive, bool in_heroic_opp){
  1338. if(!spell || !spell->caster || !spell->spell || spell->interrupted)
  1339. return false;
  1340. Client* client = 0;
  1341. if(spell->caster && spell->caster->IsPlayer())
  1342. client = spell->caster->GetZone()->GetClientBySpawn(spell->caster);
  1343. if (spell->spell->GetSpellData()->max_aoe_targets > 0 && spell->targets.size() == 0) {
  1344. GetSpellTargetsTrueAOE(spell);
  1345. if (spell->targets.size() == 0) {
  1346. if(client)
  1347. {
  1348. client->GetPlayer()->UnlockAllSpells(true);
  1349. SendSpellBookUpdate(client);
  1350. }
  1351. spell->caster->GetZone()->SendSpellFailedPacket(client, SPELL_ERROR_NO_TARGETS_IN_RANGE);
  1352. return false;
  1353. }
  1354. }
  1355. if(client && client->GetCurrentZone() &&
  1356. !spell->spell->GetSpellData()->friendly_spell)
  1357. {
  1358. ZoneServer* zone = client->GetCurrentZone();
  1359. Spawn* tmpTarget = zone->GetSpawnByID(spell->initial_target);
  1360. int8 spell_type = spell->spell->GetSpellData()->spell_type;
  1361. LuaSpell* conflictSpell = spell->caster->HasLinkedTimerID(spell, tmpTarget, (spell_type == SPELL_TYPE_DD || spell_type == SPELL_TYPE_DOT));
  1362. if(conflictSpell && tmpTarget && tmpTarget->IsEntity())
  1363. {
  1364. ((Entity*)tmpTarget)->RemoveSpellEffect(conflictSpell);
  1365. zone->RemoveTargetFromSpell(conflictSpell, tmpTarget);
  1366. }
  1367. }
  1368. MutexList<LuaSpell*>::iterator itr = active_spells.begin();
  1369. bool processedSpell = false;
  1370. LuaSpell* replace_spell = 0;
  1371. // Check to see if we already casted this spell and it is in the active_spells list
  1372. /*while (itr.Next()) {
  1373. LuaSpell* luaspell = itr.value;
  1374. // Check to see if this is the same spell by comparing caster, spell id, and spell tier
  1375. if (luaspell->caster == spell->caster && luaspell->spell->GetSpellID() == spell->spell->GetSpellID() && luaspell->spell->GetSpellTier() == spell->spell->GetSpellTier() && luaspell->targets.size() == spell->targets.size()) {
  1376. vector<Spawn*>::iterator itr;
  1377. vector<Spawn*>::iterator itr2;
  1378. bool all_match = true;
  1379. // compare the target vector to make sure this is the same spell
  1380. for (itr = luaspell->targets.begin(); itr != luaspell->targets.end(); itr++) {
  1381. bool match = false;
  1382. for (itr2 = spell->targets.begin(); itr2 != spell->targets.end(); itr2++) {
  1383. if ((*itr) == (*itr2)) {
  1384. match = true;
  1385. break;
  1386. }
  1387. }
  1388. if (!match) {
  1389. all_match = false;
  1390. break;
  1391. }
  1392. }
  1393. if (all_match) {
  1394. // set a pointer to replace the spell in the active spell list so we don't have to run this loop again
  1395. replace_spell = luaspell;
  1396. // if friendly skip the calling of the lua function as they have already been called for the previous version of this spell
  1397. if (spell->spell->GetSpellData()->friendly_spell == 1)
  1398. processedSpell = true;
  1399. break;
  1400. }
  1401. }
  1402. }*/
  1403. if (!processedSpell)
  1404. processedSpell = ProcessSpell(spell);
  1405. // Quick hack to prevent a crash on spells that zones the caster (Gate)
  1406. if (!spell->caster)
  1407. return true;
  1408. Skill* skill = spell->caster->GetSkillByID(spell->spell->GetSpellData()->mastery_skill, false);
  1409. // trigger potential skill increase if we succeed in casting a mastery skill and it still has room to grow (against this spell)
  1410. if(skill && skill->current_val < spell->spell->GetSpellData()->min_class_skill_req)
  1411. spell->caster->GetSkillByID(spell->spell->GetSpellData()->mastery_skill, true);
  1412. ZoneServer* zone = spell->caster->GetZone();
  1413. Spawn* target = 0;
  1414. if(processedSpell){
  1415. for (int32 i = 0; i < spell->targets.size(); i++) {
  1416. target = zone->GetSpawnByID(spell->targets[i]);
  1417. if (!target)
  1418. continue;
  1419. if (client && client->IsZoning())
  1420. continue;
  1421. // TODO: Establish actual hate per spell
  1422. if (!spell->spell->GetSpellData()->friendly_spell && target->IsNPC())
  1423. ((NPC*)target)->AddHate((Entity*)spell->caster, 50);
  1424. if(spell->spell->GetSpellData()->success_message.length() > 0){
  1425. if(client){
  1426. string success_message = spell->spell->GetSpellData()->success_message;
  1427. if(success_message.find("%t") != string::npos)
  1428. success_message.replace(success_message.find("%t"), 2, spell->caster->GetName());
  1429. client->Message(CHANNEL_SPELLS, success_message.c_str());
  1430. }
  1431. }
  1432. if(spell->spell->GetSpellData()->effect_message.length() > 0){
  1433. string effect_message = spell->spell->GetSpellData()->effect_message;
  1434. bool send_to_sender = true;
  1435. if(effect_message.find("%t") != string::npos)
  1436. effect_message.replace(effect_message.find("%t"), 2, target->GetName());
  1437. if (effect_message.find("%c") != string::npos)
  1438. effect_message.replace(effect_message.find("%c"), 2, spell->caster->GetName());
  1439. if (effect_message.find("%T") != string::npos) {
  1440. effect_message.replace(effect_message.find("%T"), 2, target->GetName());
  1441. send_to_sender = false;
  1442. }
  1443. if (effect_message.find("%C") != string::npos) {
  1444. effect_message.replace(effect_message.find("%C"), 2, spell->caster->GetName());
  1445. send_to_sender = false;
  1446. }
  1447. spell->caster->GetZone()->SimpleMessage(CHANNEL_SPELLS_OTHER, effect_message.c_str(), target, 50, send_to_sender);
  1448. }
  1449. target->GetZone()->CallSpawnScript(target, SPAWN_SCRIPT_CASTED_ON, spell->caster, spell->spell->GetName());
  1450. }
  1451. }
  1452. else{
  1453. if (!passive)
  1454. SendFinishedCast(spell, client);
  1455. return false;
  1456. }
  1457. if(!spell->resisted && (spell->spell->GetSpellDuration() > 0 || spell->spell->GetSpellData()->duration_until_cancel)) {
  1458. for (int32 i = 0; i < spell->targets.size(); i++) {
  1459. //LogWrite(SPELL__ERROR, 0, "Spell", "No precast function found for %s", ((Entity*)target)->GetName());
  1460. target = zone->GetSpawnByID(spell->targets.at(i));
  1461. if (!target && spell->targets.at(i) == spell->caster->GetID()) {
  1462. target = spell->caster;
  1463. }
  1464. if (!target) {
  1465. client->SimpleMessage(CHANNEL_COLOR_YELLOW, "Zone has not finished loading process yet. Try again later.");
  1466. continue;
  1467. }
  1468. if (i == 0 && !spell->spell->GetSpellData()->not_maintained) {
  1469. spell->caster->AddMaintainedSpell(spell);
  1470. //((Entity*)target)->AddMaintainedSpell(spell);
  1471. LogWrite(SPELL__DEBUG, 0, "Spell", "AddMaintained on %s", ((Entity*)target)->GetName());
  1472. }
  1473. SpellEffects* effect = ((Entity*)target)->GetSpellEffect(spell->spell->GetSpellID());
  1474. if (effect && effect->tier > spell->spell->GetSpellTier()) {
  1475. if(client) {
  1476. spell->caster->GetZone()->SendSpellFailedPacket(client, SPELL_ERROR_TAKE_EFFECT_MOREPOWERFUL);
  1477. client->SimpleMessage(CHANNEL_COLOR_YELLOW, "The spell did not take hold as the target already has a better spell of this type.");
  1478. }
  1479. }
  1480. else{
  1481. ((Entity*)target)->AddSpellEffect(spell);
  1482. if(spell->spell->GetSpellData()->det_type > 0)
  1483. ((Entity*)target)->AddDetrimentalSpell(spell);
  1484. }
  1485. }
  1486. if (replace_spell) {
  1487. active_spells.Remove(replace_spell);
  1488. active_spells.Add(spell);
  1489. }
  1490. else {
  1491. active_spells.Add(spell);
  1492. }
  1493. if (spell->num_triggers > 0)
  1494. ClientPacketFunctions::SendMaintainedExamineUpdate(client, spell->slot_pos, spell->num_triggers, 0);
  1495. if (spell->damage_remaining > 0)
  1496. ClientPacketFunctions::SendMaintainedExamineUpdate(client, spell->slot_pos, spell->damage_remaining, 1);
  1497. spell->caster->GetZone()->TriggerCharSheetTimer();
  1498. }
  1499. spell->num_calls = 1;
  1500. if(!spell->resisted && spell->spell->GetSpellData()->duration1 > 0){
  1501. spell->timer.Start();
  1502. if(spell->spell->GetSpellData()->call_frequency > 0)
  1503. spell->timer.SetTimer(spell->spell->GetSpellData()->call_frequency*100);
  1504. else
  1505. spell->timer.SetTimer(spell->spell->GetSpellData()->duration1*100);
  1506. if (active_spells.count(spell) > 0) {
  1507. active_spells.Add(spell);
  1508. }
  1509. }
  1510. // if the caster is a player and the spell is a tradeskill spell check for a tradeskill event
  1511. if (client && spell->spell->GetSpellData()->spell_book_type == SPELL_BOOK_TYPE_TRADESKILL)
  1512. client->GetCurrentZone()->GetTradeskillMgr()->CheckTradeskillEvent(client, spell->spell->GetSpellData()->icon);
  1513. if (spell->spell->GetSpellData()->friendly_spell && zone->GetSpawnByID(spell->initial_target))
  1514. spell->caster->CheckProcs(PROC_TYPE_BENEFICIAL, zone->GetSpawnByID(spell->initial_target));
  1515. // Check HO's
  1516. if (client && !in_heroic_opp) {
  1517. HeroicOP* ho = nullptr;
  1518. Spell* ho_spell = nullptr;
  1519. int32 ho_target = 0;
  1520. MSoloHO.writelock(__FUNCTION__, __LINE__);
  1521. MGroupHO.writelock(__FUNCTION__, __LINE__);
  1522. map<Client*, HeroicOP*>::iterator soloItr = m_soloHO.find(client);
  1523. if (soloItr != m_soloHO.end()) {
  1524. ho = soloItr->second;
  1525. bool match = false;
  1526. LogWrite(SPELL__ERROR, 0, "HO", "target = %u", ho->GetTarget());
  1527. spell->MSpellTargets.readlock(__FUNCTION__, __LINE__);
  1528. for (int8 i = 0; i < spell->targets.size(); i++) {
  1529. LogWrite(SPELL__ERROR, 0, "HO", "%u", spell->targets.at(i));
  1530. if (spell->targets.at(i) == ho->GetTarget()) {
  1531. match = true;
  1532. LogWrite(SPELL__ERROR, 0, "HO", "match found");
  1533. break;
  1534. }
  1535. }
  1536. spell->MSpellTargets.releasereadlock(__FUNCTION__, __LINE__);
  1537. if(match && !spell->spell)
  1538. LogWrite(SPELL__ERROR, 0, "HO", "%s: spell->spell is nullptr", client->GetPlayer()->GetName());
  1539. else if (match && spell->spell && ho->UpdateHeroicOP(spell->spell->GetSpellIconHeroicOp())) {
  1540. ClientPacketFunctions::SendHeroicOPUpdate(client, ho);
  1541. if (ho->GetComplete() > 0) {
  1542. if(!ho->GetWheel())
  1543. LogWrite(SPELL__ERROR, 0, "HO", "%s: Wheel is inactive (nullptr) cannot check for invalid spell", client->GetPlayer()->GetName());
  1544. else
  1545. {
  1546. ho_spell = master_spell_list.GetSpell(ho->GetWheel()->spell_id, 1);
  1547. ho_target = ho->GetTarget();
  1548. if (!ho_spell)
  1549. LogWrite(SPELL__ERROR, 0, "HO", "%s: Invalid spell for a HO, spell id = %u", client->GetPlayer()->GetName(), ho->GetWheel()->spell_id);
  1550. safe_delete(ho);
  1551. m_soloHO.erase(soloItr);
  1552. }
  1553. }
  1554. }
  1555. }
  1556. else if (client->GetPlayer()->GetGroupMemberInfo()) {
  1557. map<int32, HeroicOP*>::iterator groupItr = m_groupHO.find(client->GetPlayer()->GetGroupMemberInfo()->group_id);
  1558. if (groupItr != m_groupHO.end()) {
  1559. ho = groupItr->second;
  1560. int32 group_id = client->GetPlayer()->GetGroupMemberInfo()->group_id;
  1561. spell->MSpellTargets.readlock(__FUNCTION__, __LINE__);
  1562. if (spell->targets.at(0) == ho->GetTarget() && ho->UpdateHeroicOP(spell->spell->GetSpellIconHeroicOp())) {
  1563. spell->MSpellTargets.releasereadlock(__FUNCTION__, __LINE__);
  1564. world.GetGroupManager()->GroupLock(__FUNCTION__, __LINE__);
  1565. deque<GroupMemberInfo*>::iterator itr;
  1566. PlayerGroup* group = world.GetGroupManager()->GetGroup(group_id);
  1567. if (group)
  1568. {
  1569. group->MGroupMembers.readlock(__FUNCTION__, __LINE__);
  1570. deque<GroupMemberInfo*>* members = group->GetMembers();
  1571. for (itr = members->begin(); itr != members->end(); itr++) {
  1572. if ((*itr)->client)
  1573. ClientPacketFunctions::SendHeroicOPUpdate((*itr)->client, ho);
  1574. }
  1575. group->MGroupMembers.releasereadlock(__FUNCTION__, __LINE__);
  1576. }
  1577. world.GetGroupManager()->ReleaseGroupLock(__FUNCTION__, __LINE__);
  1578. if (ho->GetComplete() > 0) {
  1579. ho_spell = master_spell_list.GetSpell(ho->GetWheel()->spell_id, 1);
  1580. ho_target = ho->GetTarget();
  1581. if (!ho_spell)
  1582. LogWrite(SPELL__ERROR, 0, "HO", "Invalid spell for a HO, spell id = %u", ho->GetWheel()->spell_id);
  1583. safe_delete(ho);
  1584. m_groupHO.erase(groupItr);
  1585. }
  1586. }
  1587. else
  1588. spell->MSpellTargets.releasereadlock(__FUNCTION__, __LINE__);
  1589. }
  1590. }
  1591. MGroupHO.releasewritelock(__FUNCTION__, __LINE__);
  1592. MSoloHO.releasewritelock(__FUNCTION__, __LINE__);
  1593. if (ho_spell && ho_target != 0)
  1594. client->GetCurrentZone()->ProcessSpell(ho_spell, client->GetPlayer(), spell->caster->GetZone()->GetSpawnByID(ho_target));
  1595. }
  1596. if (spell->spell->GetSpellData()->friendly_spell == 1 && spell->initial_target)
  1597. spell->caster->CheckProcs(PROC_TYPE_BENEFICIAL, spell->caster->GetZone()->GetSpawnByID(spell->initial_target));
  1598. if (!passive)
  1599. SendFinishedCast(spell, client);
  1600. return true;
  1601. }
  1602. bool SpellProcess::CastProcessedEntityCommand(EntityCommand* entity_command, Client* client, Spawn* target, bool in_heroic_opp) {
  1603. bool ret = false;
  1604. if (entity_command && client) {
  1605. UnlockAllSpells(client);
  1606. client->GetPlayer()->IsCasting(false);
  1607. if (entity_command->cast_time == 0) {
  1608. client->GetPlayer()->GetZone()->CallSpawnScript(target, SPAWN_SCRIPT_CASTED_ON, client->GetPlayer(), entity_command->command.c_str());
  1609. ret = true;
  1610. }
  1611. if (!ret) {
  1612. PacketStruct* packet = configReader.getStruct("WS_FinishCastSpell", client->GetVersion());
  1613. if (packet) {
  1614. packet->setMediumStringByName("spell_name", entity_command->name.c_str());
  1615. client->QueuePacket(packet->serialize());
  1616. safe_delete(packet);
  1617. SendSpellBookUpdate(client);
  1618. client->GetPlayer()->GetZone()->CallSpawnScript(target, SPAWN_SCRIPT_CASTED_ON, client->GetPlayer(), entity_command->command.c_str());
  1619. ret = true;
  1620. }
  1621. }
  1622. if (ret) {
  1623. EQ2_16BitString command;
  1624. command.data = entity_command->command;
  1625. command.size = entity_command->command.length();
  1626. int32 handler = commands.GetCommandHandler(command.data.c_str());
  1627. if (handler != 0xFFFFFFFF && handler < 999)
  1628. commands.Process(handler, &command, client, target);
  1629. }
  1630. }
  1631. return ret;
  1632. }
  1633. void SpellProcess::Interrupted(Entity* caster, Spawn* interruptor, int16 error_code, bool cancel, bool from_movement)
  1634. {
  1635. if(caster)
  1636. {
  1637. LogWrite(SPELL__DEBUG, 0, "Spell", "'%s' is Interrupting spell of '%s'...", interruptor ? interruptor->GetName() : "unknown", caster->GetName());
  1638. LuaSpell* spell = GetLuaSpell(caster);
  1639. if (spell && ((from_movement && !spell->spell->GetSpellData()->cast_while_moving) || (!from_movement && spell->spell->GetSpellData()->interruptable) ||
  1640. cancel))
  1641. {
  1642. Spawn* target = GetSpellTarget(caster);
  1643. InterruptStruct* interrupt = new InterruptStruct;
  1644. interrupt->interrupted = caster;
  1645. interrupt->spell = spell;
  1646. interrupt->target = target;
  1647. interrupt->error_code = error_code;
  1648. spell->interrupted = true;
  1649. interrupt_list.Add(interrupt);
  1650. Client* client = 0;
  1651. if(interruptor && interruptor->IsPlayer())
  1652. {
  1653. client = interruptor->GetZone()->GetClientBySpawn(interruptor);
  1654. client->Message(CHANNEL_SPELLS_OTHER, "You interrupt %s's ability to cast!", interruptor->GetName());
  1655. }
  1656. }
  1657. }
  1658. }
  1659. void SpellProcess::RemoveSpellTimersFromSpawn(Spawn* spawn, bool remove_all, bool delete_recast, bool call_expire_function){
  1660. int32 i = 0;
  1661. if(cast_timers.size() > 0){
  1662. CastTimer* cast_timer = 0;
  1663. MutexList<CastTimer*>::iterator itr = cast_timers.begin();
  1664. while(itr.Next()){
  1665. cast_timer = itr->value;
  1666. if(cast_timer && cast_timer->spell && cast_timer->spell->caster == spawn){
  1667. cast_timer->spell->caster = 0;
  1668. cast_timer->delete_timer = true;
  1669. }
  1670. }
  1671. }
  1672. if(remove_all){
  1673. LuaSpell* spell = 0;
  1674. MutexList<LuaSpell*>::iterator itr = active_spells.begin();
  1675. while(itr.Next()){
  1676. spell = itr->value;
  1677. if (!spell)
  1678. continue;
  1679. if (spell->spell->GetSpellData()->persist_though_death)
  1680. continue;
  1681. if(spell->caster == spawn && call_expire_function){
  1682. DeleteCasterSpell(spell, "expired", remove_all);
  1683. continue;
  1684. }
  1685. spell->MSpellTargets.readlock(__FUNCTION__, __LINE__);
  1686. for (i = 0; i < spell->targets.size(); i++){
  1687. if (spawn->GetID() == spell->targets.at(i)){
  1688. if (spawn->IsEntity())
  1689. ((Entity*)spawn)->RemoveSpellEffect(spell);
  1690. RemoveTargetFromSpell(spell, spawn);
  1691. break;
  1692. }
  1693. }
  1694. spell->MSpellTargets.releasereadlock(__FUNCTION__, __LINE__);
  1695. }
  1696. if(recast_timers.size() > 0 && delete_recast){
  1697. RecastTimer* recast_timer = 0;
  1698. MutexList<RecastTimer*>::iterator itr = recast_timers.begin();
  1699. while(itr.Next()){
  1700. recast_timer = itr->value;
  1701. if(recast_timer && recast_timer->caster == spawn){
  1702. safe_delete(recast_timer->timer);
  1703. recast_timers.Remove(recast_timer, true);
  1704. }
  1705. }
  1706. }
  1707. if(spell_que.size() > 0 && spawn->IsEntity()){
  1708. spell_que.erase((Entity*)spawn);
  1709. }
  1710. if(interrupt_list.size() > 0){
  1711. InterruptStruct* interrupt = 0;
  1712. MutexList<InterruptStruct*>::iterator itr = interrupt_list.begin();
  1713. while(itr.Next()){
  1714. interrupt = itr->value;
  1715. if(interrupt && interrupt->interrupted == spawn){
  1716. interrupt_list.Remove(interrupt);
  1717. }
  1718. }
  1719. }
  1720. }
  1721. }
  1722. void SpellProcess::GetSpellTargets(LuaSpell* luaspell)
  1723. {
  1724. if (luaspell && luaspell->spell && luaspell->caster && luaspell->spell->GetSpellData()->max_aoe_targets == 0)
  1725. {
  1726. int8 target_type = luaspell->spell->GetSpellData()->target_type;
  1727. Spawn* caster = luaspell->caster;
  1728. Spawn* target = caster->GetZone()->GetSpawnByID(luaspell->initial_target);
  1729. SpellData* data = luaspell->spell->GetSpellData();
  1730. bool implied = false;
  1731. Spawn* secondary_target = nullptr;
  1732. //implied target check -- only use this for players
  1733. if (target && (target_type == SPELL_TARGET_ENEMY || target_type == SPELL_TARGET_ENEMY_CORPSE || target_type == SPELL_TARGET_GROUP_CORPSE || target_type == SPELL_TARGET_OTHER_GROUP_AE))
  1734. {
  1735. if (caster->IsPlayer() && target->HasTarget())
  1736. {
  1737. secondary_target = target->GetTarget();
  1738. if (secondary_target) {
  1739. // check if spell is friendly
  1740. if (data->friendly_spell) {
  1741. //if target is NPC (and not a bot) on friendly spell, check to see if target is friendly
  1742. if (target->IsNPC() && !target->IsBot()) {
  1743. if (!target->IsPet() || (target->IsPet() && ((NPC*)target)->GetOwner()->IsNPC())) {
  1744. if (secondary_target->IsPlayer()) {
  1745. implied = true;
  1746. }
  1747. else if (secondary_target->IsPet() && ((NPC*)secondary_target)->GetOwner()->IsPlayer())
  1748. implied = true;
  1749. }
  1750. }
  1751. } // if spell is not friendly
  1752. else { // check if there is an implied target for this non-friendly spell
  1753. if (target->IsPlayer() || (target->IsPet() && ((NPC*)target)->GetOwner()->IsPlayer())) {
  1754. if (secondary_target->IsNPC()) {
  1755. if (!secondary_target->IsPet() || (secondary_target->IsPet() && ((NPC*)secondary_target)->GetOwner()->IsNPC())) {
  1756. implied = true;
  1757. }
  1758. }
  1759. else if (target->IsPlayer() && ((Entity*)caster)->AttackAllowed((Entity*)target))
  1760. {
  1761. secondary_target = target;
  1762. implied = true;
  1763. luaspell->initial_target = target->GetID();
  1764. luaspell->targets.push_back(target->GetID());
  1765. GetPlayerGroupTargets((Player*)target, caster, luaspell);
  1766. }
  1767. else if (target->IsPlayer() && ((Entity*)caster)->AttackAllowed((Entity*)secondary_target))
  1768. {
  1769. implied = true;
  1770. luaspell->initial_target = secondary_target->GetID();
  1771. luaspell->targets.push_back(secondary_target->GetID());
  1772. GetPlayerGroupTargets((Player*)secondary_target, caster, luaspell);
  1773. }
  1774. }
  1775. } // end friendly spell check
  1776. }
  1777. }
  1778. else if (caster->IsPlayer()) {
  1779. if (data->friendly_spell) {
  1780. if (target->IsNPC() && !target->IsBot()) {
  1781. if (!target->IsPet() || (target->IsPet() && ((NPC*)target)->GetOwner()->IsNPC())) {
  1782. target = caster;
  1783. luaspell->initial_target = caster->GetID();
  1784. }
  1785. }
  1786. }
  1787. else
  1788. {
  1789. if (target->IsPlayer() && ((Entity*)caster)->AttackAllowed((Entity*)target)) {
  1790. luaspell->initial_target = target->GetID();
  1791. luaspell->targets.push_back(target->GetID());
  1792. }
  1793. }
  1794. }
  1795. }
  1796. else if (target_type == SPELL_TARGET_GROUP_AE || target_type == SPELL_TARGET_RAID_AE) {
  1797. // player handling
  1798. if (target)
  1799. {
  1800. if (data->icon_backdrop == 316) // using TARGET backdrop icon
  1801. {
  1802. // PLAYER LOGIC:
  1803. if ((target->IsPlayer() && luaspell->caster->IsPlayer() && target != luaspell->caster && ((Player*)target)->GetGroupMemberInfo() != NULL && ((Player*)luaspell->caster)->GetGroupMemberInfo() != NULL
  1804. && ((Player*)target)->GetGroupMemberInfo()->group_id == ((Player*)luaspell->caster)->GetGroupMemberInfo()->group_id))
  1805. {
  1806. GetPlayerGroupTargets((Player*)target, caster, luaspell, true, false);
  1807. }//TODO: NEED RAID SUPPORT
  1808. // NPC LOGIC:
  1809. else if (target->group_id > 0 && target->group_id == luaspell->caster->group_id)
  1810. {
  1811. }
  1812. else
  1813. {
  1814. // add self
  1815. target = NULL;
  1816. luaspell->targets.push_back(caster->GetID());
  1817. luaspell->initial_target = 0;
  1818. }
  1819. }
  1820. else // default self cast for group/raid AE
  1821. {
  1822. target = caster;
  1823. luaspell->initial_target = caster->GetID();
  1824. }
  1825. // spell target versus self cast
  1826. }
  1827. else if (data->icon_backdrop != 316) // default self cast for group/raid AE and not using TARGET backdrop icon
  1828. {
  1829. target = caster;
  1830. luaspell->initial_target = caster->GetID();
  1831. }
  1832. }
  1833. else if (target_type == SPELL_TARGET_SELF){
  1834. target = caster;
  1835. luaspell->initial_target = caster->GetID();
  1836. }
  1837. //if using implied target, target = the implied target
  1838. if (implied)
  1839. {
  1840. target = secondary_target;
  1841. luaspell->initial_target = secondary_target->GetID();
  1842. }
  1843. luaspell->MSpellTargets.writelock(__FUNCTION__, __LINE__);
  1844. // Group AE type NOTE: Add support for RAID AE to affect raid members once raids have been completed
  1845. if (target_type == SPELL_TARGET_GROUP_AE || target_type == SPELL_TARGET_RAID_AE)
  1846. {
  1847. if (data->icon_backdrop == 316) // single target in a group/raid
  1848. {
  1849. if (target)
  1850. luaspell->targets.push_back(target->GetID());
  1851. }
  1852. // is friendly
  1853. else if (data->friendly_spell)
  1854. {
  1855. // caster is an Entity
  1856. if (luaspell->caster->IsEntity())
  1857. {
  1858. // entity caster is in a player group
  1859. if (((Entity*)caster)->GetGroupMemberInfo())
  1860. {
  1861. world.GetGroupManager()->GroupLock(__FUNCTION__, __LINE__);
  1862. // get group members
  1863. PlayerGroup* group = world.GetGroupManager()->GetGroup(((Entity*)caster)->GetGroupMemberInfo()->group_id);
  1864. if (group)
  1865. {
  1866. group->MGroupMembers.readlock(__FUNCTION__, __LINE__);
  1867. deque<GroupMemberInfo*>* members = group->GetMembers();
  1868. deque<GroupMemberInfo*>::iterator itr;
  1869. // iterate through list of group members
  1870. for (itr = members->begin(); itr != members->end(); itr++)
  1871. {
  1872. // get group member player info
  1873. Entity* group_member = (*itr)->member;
  1874. // if the group member is in the casters zone, and is alive
  1875. if (group_member->GetZone() == luaspell->caster->GetZone() && group_member->Alive()) {
  1876. luaspell->targets.push_back(group_member->GetID());
  1877. if (group_member->HasPet()) {
  1878. Entity* pet = group_member->GetPet();
  1879. if (!pet)
  1880. pet = group_member->GetCharmedPet();
  1881. if (pet)
  1882. luaspell->targets.push_back(pet->GetID());
  1883. }
  1884. }
  1885. }
  1886. group->MGroupMembers.releasereadlock(__FUNCTION__, __LINE__);
  1887. }
  1888. world.GetGroupManager()->ReleaseGroupLock(__FUNCTION__, __LINE__);
  1889. }
  1890. else
  1891. luaspell->targets.push_back(caster->GetID()); // else caster is not in a group, thus alone
  1892. }
  1893. else if (caster->IsNPC()) // caster is NOT a player
  1894. {
  1895. // caster is NPC and in a spawn group with other NPCs
  1896. vector<Spawn*>* group = ((NPC*)caster)->GetSpawnGroup();
  1897. if (group)
  1898. {
  1899. vector<Spawn*>::iterator itr;
  1900. for (itr = group->begin(); itr != group->end(); itr++)
  1901. {
  1902. Spawn* group_member = *itr;
  1903. if (group_member->IsNPC() && group_member->Alive()){
  1904. luaspell->targets.push_back(group_member->GetID());
  1905. if (((Entity*)group_member)->HasPet()){
  1906. Entity* pet = ((Entity*)group_member)->GetPet();
  1907. if (pet)
  1908. luaspell->targets.push_back(pet->GetID());
  1909. pet = ((Entity*)group_member)->GetCharmedPet();
  1910. if (pet)
  1911. luaspell->targets.push_back(pet->GetID());
  1912. }
  1913. }
  1914. }
  1915. }
  1916. else
  1917. luaspell->targets.push_back(caster->GetID());
  1918. safe_delete(group);
  1919. } // end is player
  1920. } // end is friendly
  1921. } // end is Group AE
  1922. else if (target_type == SPELL_TARGET_SELF && caster)
  1923. luaspell->targets.push_back(caster->GetID()); // if spell is SELF, return caster
  1924. else if (target_type == SPELL_TARGET_CASTER_PET && caster && caster->IsEntity() && ((Entity*)caster)->HasPet()) {
  1925. if (((Entity*)caster)->GetPet())
  1926. luaspell->targets.push_back(((Entity*)caster)->GetPet()->GetID());
  1927. if (((Entity*)caster)->GetCharmedPet())
  1928. luaspell->targets.push_back(((Entity*)caster)->GetCharmedPet()->GetID());
  1929. }
  1930. else if (target_type == SPELL_TARGET_ENEMY && target && target->Alive()) // if target is enemy, and is alive
  1931. {
  1932. // if friendly spell
  1933. if (data->friendly_spell > 0)
  1934. {
  1935. // if caster is a player
  1936. if (caster->IsPlayer())
  1937. {
  1938. // if spell can affect raid, only group members or is a group spell
  1939. if (data->can_effect_raid > 0 || data->affect_only_group_members > 0 || data->group_spell > 0)
  1940. {
  1941. // if caster is in a group, and target is a player and targeted player is a group member
  1942. if (((Player*)caster)->GetGroupMemberInfo() && (target->IsPlayer() || target->IsBot()) && ((Player*)caster)->IsGroupMember((Entity*)target))
  1943. luaspell->targets.push_back(target->GetID()); // return the target
  1944. else
  1945. luaspell->targets.push_back(caster->GetID()); // else return the caster
  1946. }
  1947. else if (target->IsPlayer() || target->IsBot()) // else it is not raid, group only or group spell
  1948. luaspell->targets.push_back(target->GetID()); // return target for single spell
  1949. else
  1950. luaspell->targets.push_back(caster->GetID()); // and if no target, cast on self
  1951. }
  1952. else if (caster->IsNPC()) // caster is an NPC
  1953. {
  1954. // if NPC's spell can affect raid, only group members or is a group spell
  1955. if (data->can_effect_raid > 0 || data->affect_only_group_members > 0 || data->group_spell > 0)
  1956. {
  1957. if (caster->IsBot() && (target->IsBot() || target->IsPlayer())) {
  1958. GroupMemberInfo* gmi = ((Entity*)caster)->GetGroupMemberInfo();
  1959. if (gmi && target->IsEntity() && world.GetGroupManager()->IsInGroup(gmi->group_id, (Entity*)target)) {
  1960. luaspell->targets.push_back(target->GetID()); // return the target
  1961. }
  1962. else
  1963. luaspell->targets.push_back(caster->GetID()); // else return the caster
  1964. }
  1965. // if NPC caster is in a group, and target is a player and targeted player is a group member
  1966. else if (((NPC*)caster)->HasSpawnGroup() && target->IsNPC() && ((NPC*)caster)->IsInSpawnGroup((NPC*)target))
  1967. luaspell->targets.push_back(target->GetID()); // return the target
  1968. else
  1969. luaspell->targets.push_back(caster->GetID()); // else return the caster
  1970. }
  1971. else if (target->IsNPC())
  1972. luaspell->targets.push_back(target->GetID()); // return target for single spell
  1973. else {
  1974. if (caster->IsBot() && (target->IsBot() || target->IsPlayer()))
  1975. luaspell->targets.push_back(target->GetID());
  1976. else
  1977. luaspell->targets.push_back(caster->GetID()); // and if no target, cast on self
  1978. }
  1979. } // end is player
  1980. } // end is friendly
  1981. else if (target && (data->group_spell > 0 || data->icon_backdrop == 312)) // is not friendly, but is a group spell, icon_backdrop 312 is green (encounter AE)
  1982. {
  1983. // target is non-player
  1984. if (target->IsNPC())
  1985. {
  1986. // Check to see if the npc is a spawn group by getting the group and checikng if valid
  1987. vector<Spawn*>* group = ((NPC*)target)->GetSpawnGroup();
  1988. if (group)
  1989. {
  1990. vector<Spawn*>::iterator itr;
  1991. // iterate through spawn group members
  1992. for (itr = group->begin(); itr != group->end(); itr++)
  1993. {
  1994. Spawn* group_member = *itr;
  1995. // if NPC group member is (still) an NPC (wtf?) and is alive, send the NPC group member back as a successful target of non-friendly spell
  1996. if (group_member->IsNPC() && group_member->Alive() && !((Entity*)group_member)->IsAOEImmune() && (!((Entity*)group_member)->IsMezzed() || group_member == target))
  1997. luaspell->targets.push_back(group_member->GetID());
  1998. // note: this should generate some hate towards the caster
  1999. }
  2000. } // end is spawngroup
  2001. else
  2002. luaspell->targets.push_back(target->GetID()); // return single target NPC for non-friendly spell
  2003. safe_delete(group);
  2004. } // end is NPC
  2005. else if (target->IsPlayer() && caster->IsNPC()) // the NPC is casting on a player
  2006. {
  2007. // player is in a group
  2008. if (((Player*)target)->GetGroupMemberInfo())
  2009. {
  2010. world.GetGroupManager()->GroupLock(__FUNCTION__, __LINE__);
  2011. deque<GroupMemberInfo*>::iterator itr;
  2012. PlayerGroup* group = world.GetGroupManager()->GetGroup(((Player*)target)->GetGroupMemberInfo()->group_id);
  2013. if (group)
  2014. {
  2015. group->MGroupMembers.readlock(__FUNCTION__, __LINE__);
  2016. deque<GroupMemberInfo*>* members = group->GetMembers();
  2017. // iterate through players group members
  2018. for (itr = members->begin(); itr != members->end(); itr++)
  2019. {
  2020. Entity* group_member = (*itr)->member;
  2021. // if the group member is in the same zone as caster, and group member is alive, and group member is within distance
  2022. if (group_member->GetZone() == caster->GetZone() && group_member->Alive() && caster->GetDistance(group_member) <= data->range
  2023. && (group_member == target || !group_member->IsAOEImmune()))
  2024. luaspell->targets.push_back(group_member->GetID()); // add as target
  2025. }
  2026. group->MGroupMembers.releasereadlock(__FUNCTION__, __LINE__);
  2027. }
  2028. world.GetGroupManager()->ReleaseGroupLock(__FUNCTION__, __LINE__);
  2029. }
  2030. else
  2031. luaspell->targets.push_back(target->GetID()); // player not in group
  2032. } // end is caster player or npc
  2033. }
  2034. else if (target)
  2035. luaspell->targets.push_back(target->GetID()); // is not friendly nor a group spell
  2036. }
  2037. //Rez spells
  2038. else if(target && target_type == SPELL_TARGET_ENEMY_CORPSE){
  2039. //is friendly
  2040. if(data->friendly_spell){
  2041. //target is player
  2042. if(target->IsPlayer()){
  2043. luaspell->targets.push_back(target->GetID());
  2044. }
  2045. }
  2046. }
  2047. else if(target_type == SPELL_TARGET_GROUP_CORPSE){
  2048. //is friendly
  2049. if(data->friendly_spell){
  2050. //target is player
  2051. if(target && target->IsPlayer()){
  2052. //if target has group
  2053. if(((Player*)target)->GetGroupMemberInfo()) {
  2054. world.GetGroupManager()->GroupLock(__FUNCTION__, __LINE__);
  2055. deque<GroupMemberInfo*>::iterator itr;
  2056. PlayerGroup* group = world.GetGroupManager()->GetGroup(((Player*)target)->GetGroupMemberInfo()->group_id);
  2057. if (group)
  2058. {
  2059. group->MGroupMembers.readlock(__FUNCTION__, __LINE__);
  2060. deque<GroupMemberInfo*>* members = group->GetMembers();
  2061. Entity* group_member = 0;
  2062. for (itr = members->begin(); itr != members->end(); itr++) {
  2063. group_member = (*itr)->member;
  2064. //Check if group member is in the same zone in range of the spell and dead
  2065. if (group_member->GetZone() == target->GetZone() && !group_member->Alive() && target->GetDistance(group_member) <= data->radius) {
  2066. luaspell->targets.push_back(group_member->GetID());
  2067. }
  2068. }
  2069. group->MGroupMembers.releasereadlock(__FUNCTION__, __LINE__);
  2070. }
  2071. world.GetGroupManager()->ReleaseGroupLock(__FUNCTION__, __LINE__);
  2072. }
  2073. else
  2074. luaspell->targets.push_back(target->GetID());
  2075. }
  2076. }
  2077. }
  2078. luaspell->MSpellTargets.releasewritelock(__FUNCTION__, __LINE__);
  2079. }
  2080. if (luaspell && luaspell->targets.size() > 20)
  2081. LogWrite(SPELL__WARNING, 0, "Spell", "Warning in %s: Size of targets array is %u", __FUNCTION__, luaspell->targets.size());
  2082. }
  2083. void SpellProcess::GetPlayerGroupTargets(Player* target, Spawn* caster, LuaSpell* luaspell, bool bypassSpellChecks, bool bypassRangeChecks)
  2084. {
  2085. if (bypassSpellChecks || luaspell->spell->GetSpellData()->group_spell > 0 || luaspell->spell->GetSpellData()->icon_backdrop == 312)
  2086. {
  2087. if (((Player*)target)->GetGroupMemberInfo())
  2088. {
  2089. PlayerGroup* group = world.GetGroupManager()->GetGroup(((Player*)target)->GetGroupMemberInfo()->group_id);
  2090. if (group)
  2091. {
  2092. group->MGroupMembers.readlock(__FUNCTION__, __LINE__);
  2093. deque<GroupMemberInfo*>* members = group->GetMembers();
  2094. deque<GroupMemberInfo*>::iterator itr;
  2095. GroupMemberInfo* info = 0;
  2096. for (itr = members->begin(); itr != members->end(); itr++) {
  2097. info = *itr;
  2098. if (info == ((Player*)target)->GetGroupMemberInfo())
  2099. continue;
  2100. else if (info && info->client &&
  2101. info->client->GetPlayer()->GetZone() == ((Player*)target)->GetZone() && info->client->GetPlayer()->Alive()
  2102. && (bypassRangeChecks || caster->GetDistance((Entity*)info->client->GetPlayer()) <= luaspell->spell->GetSpellData()->range))
  2103. {
  2104. luaspell->targets.push_back(info->client->GetPlayer()->GetID());
  2105. }
  2106. }
  2107. group->MGroupMembers.releasereadlock(__FUNCTION__, __LINE__);
  2108. }
  2109. }
  2110. }
  2111. }
  2112. void SpellProcess::GetSpellTargetsTrueAOE(LuaSpell* luaspell) {
  2113. if (luaspell && luaspell->caster && luaspell->spell && luaspell->spell->GetSpellData()->max_aoe_targets > 0) {
  2114. if (luaspell->caster->HasTarget() && luaspell->caster->GetTarget() != luaspell->caster){
  2115. //Check if the caster has an implied target
  2116. if (luaspell->caster->GetDistance(luaspell->caster->GetTarget()) <= luaspell->spell->GetSpellData()->radius)
  2117. luaspell->initial_target = luaspell->caster->GetTarget()->GetID();
  2118. }
  2119. int32 ignore_target = 0;
  2120. vector<Spawn*> spawns = luaspell->caster->GetZone()->GetAttackableSpawnsByDistance(luaspell->caster, luaspell->spell->GetSpellData()->radius);
  2121. luaspell->MSpellTargets.writelock(__FUNCTION__, __LINE__);
  2122. for (int8 i = 0; i < spawns.size(); i++) {
  2123. Spawn* spawn = spawns.at(i);
  2124. if (i == 0){
  2125. if (luaspell->initial_target && luaspell->caster->GetID() != luaspell->initial_target){
  2126. //this is the "Direct" target and aoe can't be avoided
  2127. luaspell->targets.push_back(luaspell->initial_target);
  2128. ignore_target = luaspell->initial_target;
  2129. }
  2130. if (luaspell->targets.size() >= luaspell->spell->GetSpellData()->max_aoe_targets)
  2131. break;
  2132. }
  2133. //If we have already added this spawn, check the next spawn in the list
  2134. if (spawn && spawn->GetID() == ignore_target){
  2135. i++;
  2136. if (i < spawns.size())
  2137. spawn = spawns.at(i);
  2138. else
  2139. break;
  2140. }
  2141. if (spawn){
  2142. //If this spawn is immune to aoe, continue
  2143. if (((Entity*)spawn)->IsAOEImmune() || ((Entity*)spawn)->IsMezzed())
  2144. continue;
  2145. luaspell->targets.push_back(spawn->GetID());
  2146. }
  2147. if (luaspell->targets.size() >= luaspell->spell->GetSpellData()->max_aoe_targets)
  2148. break;
  2149. }
  2150. luaspell->MSpellTargets.releasewritelock(__FUNCTION__, __LINE__);
  2151. }
  2152. if (luaspell->targets.size() > 20)
  2153. LogWrite(SPELL__DEBUG, 0, "Spell", "Warning in SpellProcess::GetSpellTargetsTrueAOE Size of targets array is %u", luaspell->targets.size());
  2154. }
  2155. void SpellProcess::AddSpellScriptTimer(SpellScriptTimer* timer) {
  2156. MSpellScriptTimers.writelock(__FUNCTION__, __LINE__);
  2157. m_spellScriptList.push_back(timer);
  2158. MSpellScriptTimers.releasewritelock(__FUNCTION__, __LINE__);
  2159. }
  2160. void SpellProcess::RemoveSpellScriptTimer(SpellScriptTimer* timer, bool locked) {
  2161. if (m_spellScriptList.size() == 0)
  2162. return;
  2163. vector<SpellScriptTimer*>::iterator itr;
  2164. if(!locked)
  2165. MSpellScriptTimers.writelock(__FUNCTION__, __LINE__);
  2166. for (itr = m_spellScriptList.begin(); itr != m_spellScriptList.end(); itr++) {
  2167. if ((*itr) == timer) {
  2168. SpellScriptTimer* timer = *itr;
  2169. if ((*itr) && (*itr)->deleteWhenDone && lua_interface) {
  2170. lua_interface->AddPendingSpellDelete(timer->spell);
  2171. }
  2172. m_spellScriptList.erase(itr);
  2173. safe_delete(timer);
  2174. break;
  2175. }
  2176. }
  2177. if(!locked)
  2178. MSpellScriptTimers.releasewritelock(__FUNCTION__, __LINE__);
  2179. }
  2180. void SpellProcess::RemoveSpellScriptTimerBySpell(LuaSpell* spell, bool clearPendingDeletes) {
  2181. vector<SpellScriptTimer*>::iterator itr;
  2182. MSpellScriptTimers.writelock(__FUNCTION__, __LINE__);
  2183. if (lua_interface && clearPendingDeletes)
  2184. lua_interface->DeletePendingSpell(spell);
  2185. if (m_spellScriptList.size() == 0)
  2186. {
  2187. MSpellScriptTimers.releasewritelock(__FUNCTION__, __LINE__);
  2188. return;
  2189. }
  2190. for (itr = m_spellScriptList.begin(); itr != m_spellScriptList.end(); ) {
  2191. if ((*itr)->spell == spell)
  2192. {
  2193. vector<SpellScriptTimer*>::iterator cur = itr;
  2194. SpellScriptTimer* timer = *itr;
  2195. m_spellScriptList.erase(cur);
  2196. safe_delete(timer);
  2197. break;
  2198. }
  2199. else
  2200. itr++;
  2201. }
  2202. MSpellScriptTimers.releasewritelock(__FUNCTION__, __LINE__);
  2203. }
  2204. void SpellProcess::CheckSpellScriptTimers() {
  2205. vector<SpellScriptTimer*>::iterator itr;
  2206. vector<SpellScriptTimer*> temp_list;
  2207. MSpellScriptTimers.writelock(__FUNCTION__, __LINE__);
  2208. for (itr = m_spellScriptList.begin(); itr != m_spellScriptList.end(); itr++) {
  2209. if (Timer::GetCurrentTime2() >= (*itr)->time) {
  2210. temp_list.push_back((*itr));
  2211. ProcessSpell((*itr)->spell, false, (*itr)->customFunction.c_str(), (*itr));
  2212. }
  2213. }
  2214. for (itr = temp_list.begin(); itr != temp_list.end(); itr++) {
  2215. RemoveSpellScriptTimer(*itr, true);
  2216. }
  2217. MSpellScriptTimers.releasewritelock(__FUNCTION__, __LINE__);
  2218. }
  2219. bool SpellProcess::SpellScriptTimersHasSpell(LuaSpell* spell) {
  2220. bool ret = false;
  2221. vector<SpellScriptTimer*>::iterator itr;
  2222. MSpellScriptTimers.readlock(__FUNCTION__, __LINE__);
  2223. for (itr = m_spellScriptList.begin(); itr != m_spellScriptList.end(); itr++) {
  2224. SpellScriptTimer* timer = *itr;
  2225. if (timer && timer->spell == spell) {
  2226. ret = true;
  2227. break;
  2228. }
  2229. }
  2230. MSpellScriptTimers.releasereadlock(__FUNCTION__, __LINE__);
  2231. return ret;
  2232. }
  2233. std::string SpellProcess::SpellScriptTimerCustomFunction(LuaSpell* spell) {
  2234. bool ret = false;
  2235. std::string val = string("");
  2236. vector<SpellScriptTimer*>::iterator itr;
  2237. MSpellScriptTimers.readlock(__FUNCTION__, __LINE__);
  2238. for (itr = m_spellScriptList.begin(); itr != m_spellScriptList.end(); itr++) {
  2239. SpellScriptTimer* timer = *itr;
  2240. if (timer && timer->spell == spell) {
  2241. val = string(timer->customFunction);
  2242. break;
  2243. }
  2244. }
  2245. MSpellScriptTimers.releasereadlock(__FUNCTION__, __LINE__);
  2246. return val;
  2247. }
  2248. void SpellProcess::ClearSpellScriptTimerList() {
  2249. vector<SpellScriptTimer*>::iterator itr;
  2250. MSpellScriptTimers.writelock(__FUNCTION__, __LINE__);
  2251. for(itr = m_spellScriptList.begin(); itr != m_spellScriptList.end(); itr++) {
  2252. if ((*itr) && (*itr)->deleteWhenDone && lua_interface)
  2253. lua_interface->AddPendingSpellDelete((*itr)->spell);
  2254. safe_delete((*itr));
  2255. }
  2256. m_spellScriptList.clear();
  2257. MSpellScriptTimers.releasewritelock(__FUNCTION__, __LINE__);
  2258. }
  2259. void SpellProcess::RemoveTargetFromSpell(LuaSpell* spell, Spawn* target){
  2260. if (!spell || !target)
  2261. return;
  2262. MRemoveTargetList.writelock(__FUNCTION__, __LINE__);
  2263. if (!remove_target_list[spell])
  2264. remove_target_list[spell] = new vector<int32>;
  2265. remove_target_list[spell]->push_back(target->GetID());
  2266. MRemoveTargetList.releasewritelock(__FUNCTION__, __LINE__);
  2267. }
  2268. void SpellProcess::CheckRemoveTargetFromSpell(LuaSpell* spell, bool allow_delete){
  2269. if (!spell)
  2270. return;
  2271. if (remove_target_list.size() > 0){
  2272. map<LuaSpell*, vector<int32>*>::iterator remove_itr;
  2273. vector<int32>::iterator remove_target_itr;
  2274. vector<int32>::iterator target_itr;
  2275. vector<int32>* targets;
  2276. vector<int32>* remove_targets = 0;
  2277. Spawn* remove_spawn = 0;
  2278. bool should_delete = false;
  2279. MRemoveTargetList.writelock(__FUNCTION__, __LINE__);
  2280. for (remove_itr = remove_target_list.begin(); remove_itr != remove_target_list.end(); remove_itr++){
  2281. if (remove_itr->first == spell){
  2282. targets = &spell->targets;
  2283. remove_targets = remove_itr->second;
  2284. if (remove_targets && targets){
  2285. for (remove_target_itr = remove_targets->begin(); remove_target_itr != remove_targets->end(); remove_target_itr++){
  2286. remove_spawn = spell->caster->GetZone()->GetSpawnByID((*remove_target_itr));
  2287. if (remove_spawn) {
  2288. spell->MSpellTargets.writelock(__FUNCTION__, __LINE__);
  2289. for (target_itr = targets->begin(); target_itr != targets->end(); target_itr++) {
  2290. ((Entity*)remove_spawn)->RemoveProc(0, spell);
  2291. ((Entity*)remove_spawn)->RemoveMaintainedSpell(spell);
  2292. if (remove_spawn->GetID() == (*target_itr)) {
  2293. targets->erase(target_itr);
  2294. if (remove_spawn->IsEntity())
  2295. ((Entity*)remove_spawn)->RemoveEffectsFromLuaSpell(spell);
  2296. break;
  2297. }
  2298. }
  2299. spell->MSpellTargets.releasewritelock(__FUNCTION__, __LINE__);
  2300. if (targets->size() == 0 && allow_delete) {
  2301. should_delete = true;
  2302. break;
  2303. }
  2304. }
  2305. }
  2306. }
  2307. break;
  2308. }
  2309. }
  2310. remove_target_list.erase(spell);
  2311. if (remove_targets)
  2312. remove_targets->clear();
  2313. safe_delete(remove_targets);
  2314. MRemoveTargetList.releasewritelock(__FUNCTION__, __LINE__);
  2315. if (should_delete)
  2316. DeleteCasterSpell(spell, "purged");
  2317. }
  2318. }
  2319. bool SpellProcess::AddHO(Client* client, HeroicOP* ho) {
  2320. bool ret = true;
  2321. if (client && ho) {
  2322. MSoloHO.writelock(__FUNCTION__, __LINE__);
  2323. if (m_soloHO.count(client) > 0) {
  2324. if (m_soloHO[client]->GetWheel()) {
  2325. ret = false;
  2326. }
  2327. else {
  2328. safe_delete(m_soloHO[client]);
  2329. m_soloHO[client] = ho;
  2330. }
  2331. }
  2332. else
  2333. m_soloHO[client] = ho;
  2334. MSoloHO.releasewritelock(__FUNCTION__, __LINE__);
  2335. }
  2336. return ret;
  2337. }
  2338. bool SpellProcess::AddHO(int32 group_id, HeroicOP* ho) {
  2339. bool ret = true;
  2340. if (group_id > 0 && ho) {
  2341. MGroupHO.writelock(__FUNCTION__, __LINE__);
  2342. if (m_groupHO.count(group_id) > 0) {
  2343. if (m_groupHO[group_id]->GetWheel()) {
  2344. ret = false;
  2345. }
  2346. else {
  2347. safe_delete(m_groupHO[group_id]);
  2348. m_groupHO[group_id] = ho;
  2349. }
  2350. }
  2351. else
  2352. m_groupHO[group_id] = ho;
  2353. MGroupHO.releasewritelock(__FUNCTION__, __LINE__);
  2354. }
  2355. return ret;
  2356. }
  2357. void SpellProcess::KillHOBySpawnID(int32 spawn_id) {
  2358. // Check solo HO's
  2359. MSoloHO.writelock(__FUNCTION__, __LINE__);
  2360. map<Client*, HeroicOP*>::iterator itr = m_soloHO.begin();
  2361. map<Client*, HeroicOP*>::iterator delete_itr;
  2362. while (itr != m_soloHO.end()) {
  2363. if (itr->second->GetTarget() == spawn_id) {
  2364. itr->second->SetComplete(1);
  2365. ClientPacketFunctions::SendHeroicOPUpdate(itr->first, itr->second);
  2366. delete_itr = itr;
  2367. safe_delete(itr->second);
  2368. itr++;
  2369. m_soloHO.erase(delete_itr);
  2370. }
  2371. else
  2372. itr++;
  2373. }
  2374. MSoloHO.releasewritelock(__FUNCTION__, __LINE__);
  2375. // Check Group HO's
  2376. MGroupHO.writelock(__FUNCTION__, __LINE__);
  2377. map<int32, HeroicOP*>::iterator itr2 = m_groupHO.begin();
  2378. map<int32, HeroicOP*>::iterator delete_itr2;
  2379. while (itr2 != m_groupHO.end()) {
  2380. if (itr2->second->GetTarget() == spawn_id) {
  2381. itr2->second->SetComplete(1);
  2382. world.GetGroupManager()->GroupLock(__FUNCTION__ , __LINE__);
  2383. deque<GroupMemberInfo*>::iterator itr3;
  2384. PlayerGroup* group = world.GetGroupManager()->GetGroup(itr2->first);
  2385. if (group)
  2386. {
  2387. group->MGroupMembers.readlock(__FUNCTION__, __LINE__);
  2388. deque<GroupMemberInfo*>* members = group->GetMembers();
  2389. for (itr3 = members->begin(); itr3 != members->end(); itr3++) {
  2390. if ((*itr3)->client)
  2391. ClientPacketFunctions::SendHeroicOPUpdate((*itr3)->client, itr2->second);
  2392. }
  2393. group->MGroupMembers.releasereadlock(__FUNCTION__, __LINE__);
  2394. }
  2395. world.GetGroupManager()->ReleaseGroupLock(__FUNCTION__, __LINE__);
  2396. delete_itr2 = itr2;
  2397. safe_delete(itr2->second);
  2398. itr2++;
  2399. m_groupHO.erase(delete_itr2);
  2400. }
  2401. else
  2402. itr2++;
  2403. }
  2404. MGroupHO.releasewritelock(__FUNCTION__, __LINE__);
  2405. }
  2406. void SpellProcess::AddSpellCancel(LuaSpell* spell){
  2407. MSpellCancelList.writelock(__FUNCTION__, __LINE__);
  2408. SpellCancelList.push_back(spell);
  2409. MSpellCancelList.releasewritelock(__FUNCTION__, __LINE__);
  2410. }
  2411. void SpellProcess::DeleteSpell(LuaSpell* spell)
  2412. {
  2413. RemoveSpellFromQueue(spell->spell, spell->caster);
  2414. if (spell->spell->IsCopiedSpell())
  2415. {
  2416. lua_interface->RemoveCustomSpell(spell->spell->GetSpellID());
  2417. safe_delete(spell->spell);
  2418. }
  2419. safe_delete(spell);
  2420. }
  2421. void SpellProcess::SpellCannotStack(ZoneServer* zone, Client* client, Entity* caster, LuaSpell* lua_spell, LuaSpell* conflictSpell)
  2422. {
  2423. LogWrite(SPELL__DEBUG, 1, "Spell", "%s cannot stack spell %s, conflicts with %s.", caster->GetName(), lua_spell->spell->GetName(), conflictSpell->spell->GetName());
  2424. zone->SendSpellFailedPacket(client, SPELL_ERROR_TAKE_EFFECT_MOREPOWERFUL);
  2425. lua_spell->caster->GetZone()->GetSpellProcess()->RemoveSpellScriptTimerBySpell(lua_spell);
  2426. DeleteSpell(lua_spell);
  2427. }
  2428. void SpellProcess::AddActiveSpell(LuaSpell* spell)
  2429. {
  2430. if(!active_spells.count(spell))
  2431. active_spells.Add(spell);
  2432. }