src/game/GameEventMgr.cpp

   1 /*
   2  * Copyright (C) 2005-2010 MaNGOS <http://getmangos.com/>
   3  *
   4  * This program is free software; you can redistribute it and/or modify
   5  * it under the terms of the GNU General Public License as published by
   6  * the Free Software Foundation; either version 2 of the License, or
   7  * (at your option) any later version.
   8  *
   9  * This program is distributed in the hope that it will be useful,
  10  * but WITHOUT ANY WARRANTY; without even the implied warranty of
  11  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  12  * GNU General Public License for more details.
  13  *
  14  * You should have received a copy of the GNU General Public License
  15  * along with this program; if not, write to the Free Software
  16  * Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307  USA
  17  */
  18
  19 #include "GameEventMgr.h"
  20 #include "World.h"
  21 #include "ObjectMgr.h"
  22 #include "ObjectDefines.h"
  23 #include "PoolManager.h"
  24 #include "ProgressBar.h"
  25 #include "Language.h"
  26 #include "Log.h"
  27 #include "MapManager.h"
  28 #include "Policies/SingletonImp.h"
  29
  30 INSTANTIATE_SINGLETON_1(GameEventMgr);
  31
  32 bool GameEventMgr::CheckOneGameEvent(uint16 entry) const
  33 {
  34     // Get the event information
  35     time_t currenttime = time(NULL);
  36     if( mGameEvent[entry].start < currenttime && currenttime < mGameEvent[entry].end &&
  37         ((currenttime - mGameEvent[entry].start) % (mGameEvent[entry].occurence * MINUTE)) < (mGameEvent[entry].length * MINUTE) )
  38         return true;
  39     else
  40         return false;
  41 }
  42
  43 uint32 GameEventMgr::NextCheck(uint16 entry) const
  44 {
  45     time_t currenttime = time(NULL);
  46
  47     // outdated event: we return max
  48     if (currenttime > mGameEvent[entry].end)
  49         return max_ge_check_delay;
  50
  51     // never started event, we return delay before start
  52     if (mGameEvent[entry].start > currenttime)
  53         return uint32(mGameEvent[entry].start - currenttime);
  54
  55     uint32 delay;
  56     // in event, we return the end of it
  57     if ((((currenttime - mGameEvent[entry].start) % (mGameEvent[entry].occurence * 60)) < (mGameEvent[entry].length * 60)))
  58         // we return the delay before it ends
  59         delay = (mGameEvent[entry].length * MINUTE) - ((currenttime - mGameEvent[entry].start) % (mGameEvent[entry].occurence * MINUTE));
  60     else                                                    // not in window, we return the delay before next start
  61         delay = (mGameEvent[entry].occurence * MINUTE) - ((currenttime - mGameEvent[entry].start) % (mGameEvent[entry].occurence * MINUTE));
  62     // In case the end is before next check
  63     if (mGameEvent[entry].end  < time_t(currenttime + delay))
  64         return uint32(mGameEvent[entry].end - currenttime);
  65     else
  66         return delay;
  67 }
  68
  69 void GameEventMgr::StartEvent( uint16 event_id, bool overwrite )
  70 {
  71     AddActiveEvent(event_id);
  72     ApplyNewEvent(event_id);
  73     if(overwrite)
  74     {
  75         mGameEvent[event_id].start = time(NULL);
  76         if(mGameEvent[event_id].end <= mGameEvent[event_id].start)
  77             mGameEvent[event_id].end = mGameEvent[event_id].start+mGameEvent[event_id].length;
  78     }
  79 }
  80
  81 void GameEventMgr::StopEvent( uint16 event_id, bool overwrite )
  82 {
  83     RemoveActiveEvent(event_id);
  84     UnApplyEvent(event_id);
  85     if(overwrite)
  86     {
  87         mGameEvent[event_id].start = time(NULL) - mGameEvent[event_id].length * MINUTE;
  88         if(mGameEvent[event_id].end <= mGameEvent[event_id].start)
  89             mGameEvent[event_id].end = mGameEvent[event_id].start+mGameEvent[event_id].length;
  90     }
  91 }
  92
  93 void GameEventMgr::LoadFromDB()
  94 {
  95     {
  96         QueryResult *result = WorldDatabase.Query("SELECT MAX(entry) FROM game_event");
  97         if( !result )
  98         {
  99             sLog.outString(">> Table game_event is empty.");
 100             sLog.outString();
 101             return;
 102         }
 103
 104         Field *fields = result->Fetch();
 105
 106         uint32 max_event_id = fields[0].GetUInt16();
 107         delete result;
 108
 109         mGameEvent.resize(max_event_id+1);
 110     }
 111
 112     QueryResult *result = WorldDatabase.Query("SELECT entry,UNIX_TIMESTAMP(start_time),UNIX_TIMESTAMP(end_time),occurence,length,holiday,description FROM game_event");
 113     if( !result )
 114     {
 115         mGameEvent.clear();
 116         sLog.outString(">> Table game_event is empty!");
 117         sLog.outString();
 118         return;
 119     }
 120
 121     uint32 count = 0;
 122
 123     {
 124         barGoLink bar( (int)result->GetRowCount() );
 125         do
 126         {
 127             ++count;
 128             Field *fields = result->Fetch();
 129
 130             bar.step();
 131
 132             uint16 event_id = fields[0].GetUInt16();
 133             if(event_id==0)
 134             {
 135                 sLog.outErrorDb("`game_event` game event id (%i) is reserved and can't be used.",event_id);
 136                 continue;
 137             }
 138
 139             GameEventData& pGameEvent = mGameEvent[event_id];
 140             uint64 starttime        = fields[1].GetUInt64();
 141             pGameEvent.start        = time_t(starttime);
 142             uint64 endtime          = fields[2].GetUInt64();
 143             pGameEvent.end          = time_t(endtime);
 144             pGameEvent.occurence    = fields[3].GetUInt32();
 145             pGameEvent.length       = fields[4].GetUInt32();
 146             pGameEvent.holiday_id   = fields[5].GetUInt32();
 147
 148
 149             if(pGameEvent.length==0)                            // length>0 is validity check
 150             {
 151                 sLog.outErrorDb("`game_event` game event id (%i) have length 0 and can't be used.",event_id);
 152                 continue;
 153             }
 154
 155             if(pGameEvent.holiday_id)
 156             {
 157                 if(!sHolidaysStore.LookupEntry(pGameEvent.holiday_id))
 158                 {
 159                     sLog.outErrorDb("`game_event` game event id (%i) have not existed holiday id %u.",event_id,pGameEvent.holiday_id);
 160                     pGameEvent.holiday_id = 0;
 161                 }
 162             }
 163
 164             pGameEvent.description  = fields[6].GetCppString();
 165
 166         } while( result->NextRow() );
 167         delete result;
 168
 169         sLog.outString();
 170         sLog.outString( ">> Loaded %u game events", count );
 171     }
 172
 173     mGameEventCreatureGuids.resize(mGameEvent.size()*2-1);
 174     //                                   1              2
 175     result = WorldDatabase.Query("SELECT creature.guid, game_event_creature.event "
 176         "FROM creature JOIN game_event_creature ON creature.guid = game_event_creature.guid");
 177
 178     count = 0;
 179     if( !result )
 180     {
 181         barGoLink bar(1);
 182         bar.step();
 183
 184         sLog.outString();
 185         sLog.outString(">> Loaded %u creatures in game events", count );
 186     }
 187     else
 188     {
 189
 190         barGoLink bar( (int)result->GetRowCount() );
 191         do
 192         {
 193             Field *fields = result->Fetch();
 194
 195             bar.step();
 196
 197             uint32 guid    = fields[0].GetUInt32();
 198             int16 event_id = fields[1].GetInt16();
 199
 200             int32 internal_event_id = mGameEvent.size() + event_id - 1;
 201
 202             if(internal_event_id < 0 || (size_t)internal_event_id >= mGameEventCreatureGuids.size())
 203             {
 204                 sLog.outErrorDb("`game_event_creature` game event id (%i) is out of range compared to max event id in `game_event`",event_id);
 205                 continue;
 206             }
 207
 208             ++count;
 209             GuidList& crelist = mGameEventCreatureGuids[internal_event_id];
 210             crelist.push_back(guid);
 211
 212         } while( result->NextRow() );
 213         delete result;
 214
 215         sLog.outString();
 216         sLog.outString( ">> Loaded %u creatures in game events", count );
 217     }
 218
 219     mGameEventGameobjectGuids.resize(mGameEvent.size()*2-1);
 220     //                                   1                2
 221     result = WorldDatabase.Query("SELECT gameobject.guid, game_event_gameobject.event "
 222         "FROM gameobject JOIN game_event_gameobject ON gameobject.guid=game_event_gameobject.guid");
 223
 224     count = 0;
 225     if( !result )
 226     {
 227         barGoLink bar(1);
 228         bar.step();
 229
 230         sLog.outString();
 231         sLog.outString(">> Loaded %u gameobjects in game events", count );
 232     }
 233     else
 234     {
 235
 236         barGoLink bar( (int)result->GetRowCount() );
 237         do
 238         {
 239             Field *fields = result->Fetch();
 240
 241             bar.step();
 242
 243             uint32 guid    = fields[0].GetUInt32();
 244             int16 event_id = fields[1].GetInt16();
 245
 246             int32 internal_event_id = mGameEvent.size() + event_id - 1;
 247
 248             if(internal_event_id < 0 || (size_t)internal_event_id >= mGameEventGameobjectGuids.size())
 249             {
 250                 sLog.outErrorDb("`game_event_gameobject` game event id (%i) is out of range compared to max event id in `game_event`",event_id);
 251                 continue;
 252             }
 253
 254             ++count;
 255             GuidList& golist = mGameEventGameobjectGuids[internal_event_id];
 256             golist.push_back(guid);
 257
 258         } while( result->NextRow() );
 259         delete result;
 260
 261         sLog.outString();
 262         sLog.outString( ">> Loaded %u gameobjects in game events", count );
 263     }
 264
 265     mGameEventModelEquip.resize(mGameEvent.size());
 266     //                                   0              1                             2
 267     result = WorldDatabase.Query("SELECT creature.guid, game_event_model_equip.event, game_event_model_equip.modelid,"
 268     //   3
 269         "game_event_model_equip.equipment_id "
 270         "FROM creature JOIN game_event_model_equip ON creature.guid=game_event_model_equip.guid");
 271
 272     count = 0;
 273     if( !result )
 274     {
 275         barGoLink bar(1);
 276         bar.step();
 277
 278         sLog.outString();
 279         sLog.outString(">> Loaded %u model/equipment changes in game events", count );
 280     }
 281     else
 282     {
 283
 284         barGoLink bar( (int)result->GetRowCount() );
 285         do
 286         {
 287             Field *fields = result->Fetch();
 288
 289             bar.step();
 290             uint32 guid     = fields[0].GetUInt32();
 291             uint16 event_id = fields[1].GetUInt16();
 292
 293             if(event_id >= mGameEventModelEquip.size())
 294             {
 295                 sLog.outErrorDb("`game_event_model_equip` game event id (%u) is out of range compared to max event id in `game_event`",event_id);
 296                 continue;
 297             }
 298
 299             ++count;
 300             ModelEquipList& equiplist = mGameEventModelEquip[event_id];
 301             ModelEquip newModelEquipSet;
 302             newModelEquipSet.modelid = fields[2].GetUInt32();
 303             newModelEquipSet.equipment_id = fields[3].GetUInt32();
 304             newModelEquipSet.equipement_id_prev = 0;
 305             newModelEquipSet.modelid_prev = 0;
 306
 307             if(newModelEquipSet.equipment_id > 0)
 308             {
 309                 if(!sObjectMgr.GetEquipmentInfo(newModelEquipSet.equipment_id))
 310                 {
 311                     sLog.outErrorDb("Table `game_event_model_equip` have creature (Guid: %u) with equipment_id %u not found in table `creature_equip_template`, set to no equipment.", guid, newModelEquipSet.equipment_id);
 312                     continue;
 313                 }
 314             }
 315
 316             equiplist.push_back(std::pair<uint32, ModelEquip>(guid, newModelEquipSet));
 317
 318         } while( result->NextRow() );
 319         delete result;
 320
 321         sLog.outString();
 322         sLog.outString( ">> Loaded %u model/equipment changes in game events", count );
 323     }
 324
 325     mGameEventQuests.resize(mGameEvent.size());
 326     //                                   0   1      2
 327     result = WorldDatabase.Query("SELECT id, quest, event FROM game_event_creature_quest");
 328
 329     count = 0;
 330     if( !result )
 331     {
 332         barGoLink bar(1);
 333         bar.step();
 334
 335         sLog.outString();
 336         sLog.outString(">> Loaded %u quests additions in game events", count );
 337     }
 338     else
 339     {
 340
 341         barGoLink bar( (int)result->GetRowCount() );
 342         do
 343         {
 344             Field *fields = result->Fetch();
 345
 346             bar.step();
 347             uint32 id       = fields[0].GetUInt32();
 348             uint32 quest    = fields[1].GetUInt32();
 349             uint16 event_id = fields[2].GetUInt16();
 350
 351             if(event_id >= mGameEventQuests.size())
 352             {
 353                 sLog.outErrorDb("`game_event_creature_quest` game event id (%u) is out of range compared to max event id in `game_event`",event_id);
 354                 continue;
 355             }
 356
 357             ++count;
 358             QuestRelList& questlist = mGameEventQuests[event_id];
 359             questlist.push_back(QuestRelation(id, quest));
 360
 361         } while( result->NextRow() );
 362         delete result;
 363
 364         sLog.outString();
 365         sLog.outString( ">> Loaded %u quests additions in game events", count );
 366     }
 367
 368     mGameEventPoolIds.resize(mGameEvent.size()*2-1);
 369     //                                   1                    2
 370     result = WorldDatabase.Query("SELECT pool_template.entry, game_event_pool.event "
 371         "FROM pool_template JOIN game_event_pool ON pool_template.entry = game_event_pool.pool_entry");
 372
 373     count = 0;
 374     if( !result )
 375     {
 376         barGoLink bar2(1);
 377         bar2.step();
 378
 379         sLog.outString();
 380         sLog.outString(">> Loaded %u pools in game events", count );
 381     }
 382     else
 383     {
 384
 385         barGoLink bar2( (int)result->GetRowCount() );
 386         do
 387         {
 388             Field *fields = result->Fetch();
 389
 390             bar2.step();
 391
 392             uint32 entry   = fields[0].GetUInt16();
 393             int16 event_id = fields[1].GetInt16();
 394
 395             int32 internal_event_id = mGameEvent.size() + event_id - 1;
 396
 397             if (internal_event_id < 0 || (size_t)internal_event_id >= mGameEventPoolIds.size())
 398             {
 399                 sLog.outErrorDb("`game_event_pool` game event id (%i) is out of range compared to max event id in `game_event`",event_id);
 400                 continue;
 401             }
 402
 403             if (!sPoolMgr.CheckPool(entry))
 404             {
 405                 sLog.outErrorDb("Pool Id (%u) has all creatures or gameobjects with explicit chance sum <>100 and no equal chance defined. The pool system cannot pick one to spawn.", entry);
 406                 continue;
 407             }
 408
 409             ++count;
 410             IdList& poollist = mGameEventPoolIds[internal_event_id];
 411             poollist.push_back(entry);
 412
 413         } while( result->NextRow() );
 414         sLog.outString();
 415         sLog.outString( ">> Loaded %u pools in game events", count );
 416         delete result;
 417     }
 418 }
 419
 420 uint32 GameEventMgr::Initialize()                           // return the next event delay in ms
 421 {
 422     m_ActiveEvents.clear();
 423     uint32 delay = Update();
 424     sLog.outBasic("Game Event system initialized." );
 425     m_IsGameEventsInit = true;
 426     return delay;
 427 }
 428
 429 uint32 GameEventMgr::Update()                               // return the next event delay in ms
 430 {
 431     uint32 nextEventDelay = max_ge_check_delay;             // 1 day
 432     uint32 calcDelay;
 433     for (uint16 itr = 1; itr < mGameEvent.size(); ++itr)
 434     {
 435         //sLog.outErrorDb("Checking event %u",itr);
 436         if (CheckOneGameEvent(itr))
 437         {
 438             //sLog.outDebug("GameEvent %u is active",itr->first);
 439             if (!IsActiveEvent(itr))
 440                 StartEvent(itr);
 441         }
 442         else
 443         {
 444             //sLog.outDebug("GameEvent %u is not active",itr->first);
 445             if (IsActiveEvent(itr))
 446                 StopEvent(itr);
 447             else
 448             {
 449                 if (!m_IsGameEventsInit)
 450                 {
 451                     int16 event_nid = (-1) * (itr);
 452                     // spawn all negative ones for this event
 453                     GameEventSpawn(event_nid);
 454
 455                     // disable any event specific quest (for cases where creature is spawned, but event not active).
 456                     UpdateEventQuests(itr, false);
 457                 }
 458             }
 459         }
 460         calcDelay = NextCheck(itr);
 461         if (calcDelay < nextEventDelay)
 462             nextEventDelay = calcDelay;
 463     }
 464     sLog.outBasic("Next game event check in %u seconds.", nextEventDelay + 1);
 465     return (nextEventDelay + 1) * IN_MILISECONDS;           // Add 1 second to be sure event has started/stopped at next call
 466 }
 467
 468 void GameEventMgr::UnApplyEvent(uint16 event_id)
 469 {
 470     sLog.outString("GameEvent %u \"%s\" removed.", event_id, mGameEvent[event_id].description.c_str());
 471     // un-spawn positive event tagged objects
 472     GameEventUnspawn(event_id);
 473     // spawn negative event tagget objects
 474     int16 event_nid = (-1) * event_id;
 475     GameEventSpawn(event_nid);
 476     // restore equipment or model
 477     ChangeEquipOrModel(event_id, false);
 478     // Remove quests that are events only to non event npc
 479     UpdateEventQuests(event_id, false);
 480 }
 481
 482 void GameEventMgr::ApplyNewEvent(uint16 event_id)
 483 {
 484     if (sWorld.getConfig(CONFIG_BOOL_EVENT_ANNOUNCE))
 485         sWorld.SendWorldText(LANG_EVENTMESSAGE, mGameEvent[event_id].description.c_str());
 486
 487     sLog.outString("GameEvent %u \"%s\" started.", event_id, mGameEvent[event_id].description.c_str());
 488     // spawn positive event tagget objects
 489     GameEventSpawn(event_id);
 490     // un-spawn negative event tagged objects
 491     int16 event_nid = (-1) * event_id;
 492     GameEventUnspawn(event_nid);
 493     // Change equipement or model
 494     ChangeEquipOrModel(event_id, true);
 495     // Add quests that are events only to non event npc
 496     UpdateEventQuests(event_id, true);
 497 }
 498
 499 void GameEventMgr::GameEventSpawn(int16 event_id)
 500 {
 501     int32 internal_event_id = mGameEvent.size() + event_id - 1;
 502
 503     if (internal_event_id < 0 || (size_t)internal_event_id >= mGameEventCreatureGuids.size())
 504     {
 505         sLog.outError("GameEventMgr::GameEventSpawn attempt access to out of range mGameEventCreatureGuids element %i (size: " SIZEFMTD ")",internal_event_id,mGameEventCreatureGuids.size());
 506         return;
 507     }
 508
 509     for (GuidList::iterator itr = mGameEventCreatureGuids[internal_event_id].begin();itr != mGameEventCreatureGuids[internal_event_id].end();++itr)
 510     {
 511         // Add to correct cell
 512         CreatureData const* data = sObjectMgr.GetCreatureData(*itr);
 513         if (data)
 514         {
 515             sObjectMgr.AddCreatureToGrid(*itr, data);
 516
 517             // Spawn if necessary (loaded grids only)
 518             Map* map = const_cast<Map*>(sMapMgr.CreateBaseMap(data->mapid));
 519             // We use spawn coords to spawn
 520             if(!map->Instanceable() && map->IsLoaded(data->posX,data->posY))
 521             {
 522                 Creature* pCreature = new Creature;
 523                 //sLog.outDebug("Spawning creature %u",*itr);
 524                 if (!pCreature->LoadFromDB(*itr, map))
 525                 {
 526                     delete pCreature;
 527                 }
 528                 else
 529                 {
 530                     map->Add(pCreature);
 531                 }
 532             }
 533         }
 534     }
 535
 536     if (internal_event_id < 0 || (size_t)internal_event_id >= mGameEventGameobjectGuids.size())
 537     {
 538         sLog.outError("GameEventMgr::GameEventSpawn attempt access to out of range mGameEventGameobjectGuids element %i (size: " SIZEFMTD ")",internal_event_id,mGameEventGameobjectGuids.size());
 539         return;
 540     }
 541
 542     for (GuidList::iterator itr = mGameEventGameobjectGuids[internal_event_id].begin();itr != mGameEventGameobjectGuids[internal_event_id].end();++itr)
 543     {
 544         // Add to correct cell
 545         GameObjectData const* data = sObjectMgr.GetGOData(*itr);
 546         if (data)
 547         {
 548             sObjectMgr.AddGameobjectToGrid(*itr, data);
 549             // Spawn if necessary (loaded grids only)
 550             // this base map checked as non-instanced and then only existed
 551             Map* map = const_cast<Map*>(sMapMgr.CreateBaseMap(data->mapid));
 552             // We use current coords to unspawn, not spawn coords since creature can have changed grid
 553             if(!map->Instanceable() && map->IsLoaded(data->posX, data->posY))
 554             {
 555                 GameObject* pGameobject = new GameObject;
 556                 //sLog.outDebug("Spawning gameobject %u", *itr);
 557                 if (!pGameobject->LoadFromDB(*itr, map))
 558                 {
 559                     delete pGameobject;
 560                 }
 561                 else
 562                 {
 563                     if(pGameobject->isSpawnedByDefault())
 564                         map->Add(pGameobject);
 565                 }
 566             }
 567         }
 568     }
 569
 570     if (internal_event_id < 0 || (size_t)internal_event_id >= mGameEventPoolIds.size())
 571     {
 572         sLog.outError("GameEventMgr::GameEventSpawn attempt access to out of range mGameEventPoolIds element %i (size: " SIZEFMTD ")",internal_event_id,mGameEventPoolIds.size());
 573         return;
 574     }
 575
 576     for (IdList::iterator itr = mGameEventPoolIds[internal_event_id].begin();itr != mGameEventPoolIds[internal_event_id].end();++itr)
 577         sPoolMgr.SpawnPool(*itr, true);
 578 }
 579
 580 void GameEventMgr::GameEventUnspawn(int16 event_id)
 581 {
 582     int32 internal_event_id = mGameEvent.size() + event_id - 1;
 583
 584     if (internal_event_id < 0 || (size_t)internal_event_id >= mGameEventCreatureGuids.size())
 585     {
 586         sLog.outError("GameEventMgr::GameEventUnspawn attempt access to out of range mGameEventCreatureGuids element %i (size: " SIZEFMTD ")",internal_event_id,mGameEventCreatureGuids.size());
 587         return;
 588     }
 589
 590     for (GuidList::iterator itr = mGameEventCreatureGuids[internal_event_id].begin();itr != mGameEventCreatureGuids[internal_event_id].end();++itr)
 591     {
 592         // Remove the creature from grid
 593         if( CreatureData const* data = sObjectMgr.GetCreatureData(*itr) )
 594         {
 595             sObjectMgr.RemoveCreatureFromGrid(*itr, data);
 596
 597             if( Creature* pCreature = ObjectAccessor::GetCreatureInWorld(MAKE_NEW_GUID(*itr, data->id, HIGHGUID_UNIT)) )
 598                 pCreature->AddObjectToRemoveList();
 599         }
 600     }
 601
 602     if (internal_event_id < 0 || (size_t)internal_event_id >= mGameEventGameobjectGuids.size())
 603     {
 604         sLog.outError("GameEventMgr::GameEventUnspawn attempt access to out of range mGameEventGameobjectGuids element %i (size: " SIZEFMTD ")",internal_event_id,mGameEventGameobjectGuids.size());
 605         return;
 606     }
 607
 608     for (GuidList::iterator itr = mGameEventGameobjectGuids[internal_event_id].begin();itr != mGameEventGameobjectGuids[internal_event_id].end();++itr)
 609     {
 610         // Remove the gameobject from grid
 611         if(GameObjectData const* data = sObjectMgr.GetGOData(*itr))
 612         {
 613             sObjectMgr.RemoveGameobjectFromGrid(*itr, data);
 614
 615             if( GameObject* pGameobject = ObjectAccessor::GetGameObjectInWorld(MAKE_NEW_GUID(*itr, data->id, HIGHGUID_GAMEOBJECT)) )
 616                 pGameobject->AddObjectToRemoveList();
 617         }
 618     }
 619     if (internal_event_id < 0 || (size_t)internal_event_id >= mGameEventPoolIds.size())
 620     {
 621         sLog.outError("GameEventMgr::GameEventUnspawn attempt access to out of range mGameEventPoolIds element %i (size: " SIZEFMTD ")",internal_event_id,mGameEventPoolIds.size());
 622         return;
 623     }
 624
 625     for (IdList::iterator itr = mGameEventPoolIds[internal_event_id].begin();itr != mGameEventPoolIds[internal_event_id].end();++itr)
 626     {
 627         sPoolMgr.DespawnPool(*itr);
 628     }
 629 }
 630
 631 void GameEventMgr::ChangeEquipOrModel(int16 event_id, bool activate)
 632 {
 633     for(ModelEquipList::iterator itr = mGameEventModelEquip[event_id].begin();itr != mGameEventModelEquip[event_id].end();++itr)
 634     {
 635         // Remove the creature from grid
 636         CreatureData const* data = sObjectMgr.GetCreatureData(itr->first);
 637         if(!data)
 638             continue;
 639
 640         // Update if spawned
 641         Creature* pCreature = ObjectAccessor::GetCreatureInWorld(MAKE_NEW_GUID(itr->first, data->id,HIGHGUID_UNIT));
 642         if (pCreature)
 643         {
 644             if (activate)
 645             {
 646                 itr->second.equipement_id_prev = pCreature->GetCurrentEquipmentId();
 647                 itr->second.modelid_prev = pCreature->GetDisplayId();
 648                 pCreature->LoadEquipment(itr->second.equipment_id, true);
 649                 if (itr->second.modelid >0 && itr->second.modelid_prev != itr->second.modelid)
 650                 {
 651                     CreatureModelInfo const *minfo = sObjectMgr.GetCreatureModelInfo(itr->second.modelid);
 652                     if (minfo)
 653                     {
 654                         pCreature->SetDisplayId(itr->second.modelid);
 655                         pCreature->SetNativeDisplayId(itr->second.modelid);
 656                         pCreature->SetFloatValue(UNIT_FIELD_BOUNDINGRADIUS,minfo->bounding_radius);
 657                         pCreature->SetFloatValue(UNIT_FIELD_COMBATREACH,minfo->combat_reach );
 658                     }
 659                 }
 660             }
 661             else
 662             {
 663                 pCreature->LoadEquipment(itr->second.equipement_id_prev, true);
 664                 if (itr->second.modelid_prev >0 && itr->second.modelid_prev != itr->second.modelid)
 665                 {
 666                     CreatureModelInfo const *minfo = sObjectMgr.GetCreatureModelInfo(itr->second.modelid_prev);
 667                     if (minfo)
 668                     {
 669                         pCreature->SetDisplayId(itr->second.modelid_prev);
 670                         pCreature->SetNativeDisplayId(itr->second.modelid_prev);
 671                         pCreature->SetFloatValue(UNIT_FIELD_BOUNDINGRADIUS,minfo->bounding_radius);
 672                         pCreature->SetFloatValue(UNIT_FIELD_COMBATREACH,minfo->combat_reach );
 673                     }
 674                 }
 675             }
 676         }
 677         else                                                // If not spawned
 678         {
 679             CreatureData const* data2 = sObjectMgr.GetCreatureData(itr->first);
 680             if (data2 && activate)
 681             {
 682                 CreatureInfo const *cinfo = ObjectMgr::GetCreatureTemplate(data2->id);
 683                 uint32 display_id = sObjectMgr.ChooseDisplayId(0,cinfo,data2);
 684                 CreatureModelInfo const *minfo = sObjectMgr.GetCreatureModelRandomGender(display_id);
 685                 if (minfo)
 686                     display_id = minfo->modelid;
 687
 688                 if (data2->equipmentId == 0)
 689                     itr->second.equipement_id_prev = cinfo->equipmentId;
 690                 else if (data2->equipmentId != -1)
 691                     itr->second.equipement_id_prev = data->equipmentId;
 692                 itr->second.modelid_prev = display_id;
 693             }
 694         }
 695         // now last step: put in data
 696                                                             // just to have write access to it
 697         CreatureData& data2 = sObjectMgr.NewOrExistCreatureData(itr->first);
 698         if (activate)
 699         {
 700             data2.displayid = itr->second.modelid;
 701             data2.equipmentId = itr->second.equipment_id;
 702         }
 703         else
 704         {
 705             data2.displayid = itr->second.modelid_prev;
 706             data2.equipmentId = itr->second.equipement_id_prev;
 707         }
 708     }
 709 }
 710
 711 void GameEventMgr::UpdateEventQuests(uint16 event_id, bool Activate)
 712 {
 713     QuestRelList::iterator itr;
 714     for (itr = mGameEventQuests[event_id].begin();itr != mGameEventQuests[event_id].end();++itr)
 715     {
 716         QuestRelations &CreatureQuestMap = sObjectMgr.mCreatureQuestRelations;
 717         if (Activate)                                       // Add the pair(id,quest) to the multimap
 718             CreatureQuestMap.insert(QuestRelations::value_type(itr->first, itr->second));
 719         else
 720         {                                                   // Remove the pair(id,quest) from the multimap
 721             QuestRelations::iterator qitr = CreatureQuestMap.find(itr->first);
 722             if (qitr == CreatureQuestMap.end())
 723                 continue;
 724             QuestRelations::iterator lastElement = CreatureQuestMap.upper_bound(itr->first);
 725             for ( ;qitr != lastElement;++qitr)
 726             {
 727                 if (qitr->second == itr->second)
 728                 {
 729                     CreatureQuestMap.erase(qitr);           // iterator is now no more valid
 730                     break;                                  // but we can exit loop since the element is found
 731                 }
 732             }
 733         }
 734     }
 735 }
 736
 737 GameEventMgr::GameEventMgr()
 738 {
 739     m_IsGameEventsInit = false;
 740 }
 741
 742 MANGOS_DLL_SPEC bool IsHolidayActive( HolidayIds id )
 743 {
 744     GameEventMgr::GameEventDataMap const& events = sGameEventMgr.GetEventMap();
 745     GameEventMgr::ActiveEvents const& ae = sGameEventMgr.GetActiveEventList();
 746
 747     for(GameEventMgr::ActiveEvents::const_iterator itr = ae.begin(); itr != ae.end(); ++itr)
 748         if (events[*itr].holiday_id == id)
 749             return true;
 750
 751     return false;
 752 }