/* EQEMu: Everquest Server Emulator Copyright (C) 2001-2002 EQEMu Development Team (http://eqemu.org) This program is free software; you can redistribute it and/or modify it under the terms of the GNU General Public License as published by the Free Software Foundation; version 2 of the License. This program is distributed in the hope that it will be useful, but WITHOUT ANY WARRANTY except by those people which sell it, which are required to give you total support for your newly bought product; without even the implied warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU General Public License for more details. You should have received a copy of the GNU General Public License along with this program; if not, write to the Free Software Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA */ #include "client.h" #include "entity.h" #include "groups.h" #include "mob.h" #include "raids.h" #include "../common/data_verification.h" #include "hate_list.h" #include "quest_parser_collection.h" #include "zone.h" #include "water_map.h" #include extern Zone *zone; HateList::HateList() { hate_owner = nullptr; } HateList::~HateList() { } void HateList::WipeHateList(bool npc_only) { auto iterator = list.begin(); while (iterator != list.end()) { Mob *m = (*iterator)->entity_on_hatelist; if ( m && ( m->IsOfClientBotMerc() || (m->IsPet() && m->GetOwner() && m->GetOwner()->IsOfClientBotMerc()) ) && npc_only ) { iterator++; } else { if (m) { if (parse->HasQuestSub(hate_owner->GetNPCTypeID(), EVENT_HATE_LIST)) { parse->EventNPC(EVENT_HATE_LIST, hate_owner->CastToNPC(), m, "0", 0); } if (m->IsClient()) { m->CastToClient()->DecrementAggroCount(); m->CastToClient()->RemoveXTarget(hate_owner, true); } delete (*iterator); iterator = list.erase(iterator); } } } } bool HateList::IsEntOnHateList(Mob* m) { return m ? Find(m) != nullptr : false; } struct_HateList* HateList::Find(Mob* m) { if (!m || list.empty()) { return nullptr; } for (auto e : list) { if (e->entity_on_hatelist && e->entity_on_hatelist == m) { return e; } } return nullptr; } void HateList::SetHateAmountOnEnt(Mob* other, int64 in_hate, uint64 in_damage) { struct_HateList *entity = Find(other); if (entity) { if (in_damage > 0) entity->hatelist_damage = in_damage; if (in_hate > 0) entity->stored_hate_amount = in_hate; entity->last_modified = Timer::GetCurrentTime(); } } Mob* HateList::GetDamageTopOnHateList(Mob* hater) { Mob* c = nullptr; Mob* m = nullptr; Group* g = nullptr; Raid* r = nullptr; uint64 damage = 0; for (const auto& e : list) { c = e->entity_on_hatelist; if (!c) { continue; } g = nullptr; r = nullptr; if (c->IsBot()) { r = entity_list.GetRaidByBot(c->CastToBot()); } else if (c->IsClient()) { r = entity_list.GetRaidByClient(c->CastToClient()); } g = entity_list.GetGroupByMob(c); if (r) { if (r->GetTotalRaidDamage(hater) >= damage) { m = c; damage = r->GetTotalRaidDamage(hater); } } else if (g) { if (g->GetTotalGroupDamage(hater) >= damage) { m = c; damage = g->GetTotalGroupDamage(hater); } } else if (static_cast(e->hatelist_damage) >= damage) { m = c; damage = static_cast(e->hatelist_damage); } } return m; } Mob* HateList::GetClosestEntOnHateList(Mob *hater, bool skip_mezzed, EntityFilterType filter_type) { Mob* close_entity = nullptr; float close_distance = 99999.9f; float this_distance; for (const auto& e : list) { if (!e->entity_on_hatelist) { continue; } if (skip_mezzed && e->entity_on_hatelist->IsMezzed()) { continue; } switch (filter_type) { case EntityFilterType::Bots: if (!e->entity_on_hatelist->IsBot()) { continue; } break; case EntityFilterType::Clients: if (!e->entity_on_hatelist->IsClient()) { continue; } break; case EntityFilterType::NPCs: if (!e->entity_on_hatelist->IsNPC()) { continue; } break; case EntityFilterType::All: default: break; } this_distance = DistanceSquaredNoZ(e->entity_on_hatelist->GetPosition(), hater->GetPosition()); if (this_distance <= close_distance) { close_distance = this_distance; close_entity = e->entity_on_hatelist; } } if ( (!close_entity && hater->IsNPC()) || (close_entity && close_entity->DivineAura()) ) { close_entity = hater->CastToNPC()->GetHateTop(); } return close_entity; } void HateList::AddEntToHateList(Mob *in_entity, int64 in_hate, int64 in_damage, bool in_is_entity_frenzied, bool iAddIfNotExist) { if (!in_entity) { return; } if (in_entity->IsCorpse()) { return; } if (in_entity->IsClient() && in_entity->CastToClient()->IsDead()) { return; } struct_HateList *entity = Find(in_entity); if (entity) { entity->hatelist_damage += (in_damage >= 0) ? in_damage : 0; entity->stored_hate_amount += in_hate; entity->is_entity_frenzy = in_is_entity_frenzied; entity->last_modified = Timer::GetCurrentTime(); LogHate( "AddEntToHateList in_entity [{}] ({}) in_hate [{}] in_damage [{}] stored_hate_amount [{}] hatelist_damage [{}]", in_entity->GetCleanName(), in_entity->GetID(), in_hate, in_damage, entity->stored_hate_amount, entity->hatelist_damage ); } else if (iAddIfNotExist) { entity = new struct_HateList; entity->entity_on_hatelist = in_entity; entity->hatelist_damage = (in_damage >= 0) ? in_damage : 0; entity->stored_hate_amount = in_hate; entity->is_entity_frenzy = in_is_entity_frenzied; entity->oor_count = 0; entity->last_modified = Timer::GetCurrentTime(); list.push_back(entity); if (parse->HasQuestSub(hate_owner->GetNPCTypeID(), EVENT_HATE_LIST)) { parse->EventNPC(EVENT_HATE_LIST, hate_owner->CastToNPC(), in_entity, "1", 0); } if (in_entity->IsClient()) { in_entity->CastToClient()->IncrementAggroCount(hate_owner->CastToNPC()->IsRaidTarget()); } } } bool HateList::RemoveEntFromHateList(Mob *in_entity) { if (!in_entity) { return false; } bool is_found = false; auto iterator = list.begin(); while (iterator != list.end()) { if ((*iterator)->entity_on_hatelist == in_entity) { is_found = true; if (in_entity && in_entity->IsClient()) { in_entity->CastToClient()->DecrementAggroCount(); } delete (*iterator); iterator = list.erase(iterator); if (in_entity) { if (parse->HasQuestSub(hate_owner->GetNPCTypeID(), EVENT_HATE_LIST)) { parse->EventNPC(EVENT_HATE_LIST, hate_owner->CastToNPC(), in_entity, "0", 0); } } } else { ++iterator; } } return is_found; } // so if faction_id and faction_value are set, we do RewardFaction, otherwise old stuff void HateList::DoFactionHits(int64 npc_faction_level_id, int32 faction_id, int32 faction_value) { if (npc_faction_level_id <= 0 && faction_id <= 0 && faction_value == 0) return; auto iterator = list.begin(); while (iterator != list.end()) { Client *client; if ((*iterator)->entity_on_hatelist && (*iterator)->entity_on_hatelist->IsClient()) client = (*iterator)->entity_on_hatelist->CastToClient(); else client = nullptr; if (client) { if (faction_id != 0 && faction_value != 0) { client->RewardFaction(faction_id, faction_value); } else { client->SetFactionLevel(client->CharacterID(), npc_faction_level_id, client->GetBaseClass(), client->GetBaseRace(), client->GetDeity()); } } ++iterator; } } int HateList::GetSummonedPetCountOnHateList() { //Function to get number of 'Summoned' pets on a targets hate list to allow calculations for certian spell effects. //Unclear from description that pets are required to be 'summoned body type'. Will not require at this time. int pet_count = 0; auto iterator = list.begin(); while (iterator != list.end()) { if ((*iterator)->entity_on_hatelist != nullptr && (*iterator)->entity_on_hatelist->IsNPC() && ((*iterator)->entity_on_hatelist->CastToNPC()->IsPet() || ((*iterator)->entity_on_hatelist->CastToNPC()->GetSwarmOwner() > 0))) { ++pet_count; } ++iterator; } return pet_count; } int HateList::GetHateRatio(Mob *top, Mob *other) { auto other_entry = Find(other); if (!other_entry || other_entry->stored_hate_amount < 1) return 0; auto top_entry = Find(top); if (!top_entry || top_entry->stored_hate_amount < 1) return 999; // shouldn't happen if you call it right :P return EQ::Clamp(static_cast((other_entry->stored_hate_amount * 100) / top_entry->stored_hate_amount), 1, 999); } // skip is used to ignore a certain mob on the list // Currently used for getting 2nd on list for aggro meter Mob *HateList::GetMobWithMostHateOnList( Mob *center, Mob *skip, bool skip_mezzed, EntityFilterType filter_type ) { if (!zone->IsLoaded()) { // hack fix for zone shutdown crashes on some servers return nullptr; } Mob *top_hate = nullptr; int64 hate = -1; if (!center) { return nullptr; } if (RuleB(Aggro, SmartAggroList)) { Mob *top_client_type_in_range = nullptr; int64 hate_client_type_in_range = -1; int skipped_count = 0; auto iterator = list.begin(); while (iterator != list.end()) { struct_HateList *cur = (*iterator); int16 aggro_mod = 0; if (!cur) { ++iterator; continue; } Mob *m = cur->entity_on_hatelist; if (!m) { ++iterator; continue; } if (m == skip) { ++iterator; continue; } if (skip_mezzed && m->IsMezzed()) { ++iterator; continue; } if ( (filter_type == EntityFilterType::Bots && !m->IsBot()) || (filter_type == EntityFilterType::Clients && !m->IsClient()) || (filter_type == EntityFilterType::NPCs && !m->IsNPC()) ) { ++iterator; continue; } if (m->Sanctuary()) { if (hate == -1) { top_hate = m; hate = 1; } ++iterator; continue; } if (m->DivineAura() || m->IsMezzed() || m->IsFeared()) { if (hate == -1) { top_hate = m; hate = 0; } ++iterator; continue; } int64 current_hate = cur->stored_hate_amount; if (m->IsOfClientBot()) { if (m->IsClient() && m->CastToClient()->IsSitting()) { aggro_mod += RuleI(Aggro, SittingAggroMod); } if (center) { if (center->GetTarget() == m) { aggro_mod += RuleI(Aggro, CurrentTargetAggroMod); } if (RuleI(Aggro, MeleeRangeAggroMod) != 0) { if (center->CombatRange(m)) { aggro_mod += RuleI(Aggro, MeleeRangeAggroMod); if (current_hate > hate_client_type_in_range || cur->is_entity_frenzy) { hate_client_type_in_range = current_hate; top_client_type_in_range = m; } } } } } else { if (center) { if (center->GetTarget() == m) { aggro_mod += RuleI(Aggro, CurrentTargetAggroMod); } if (RuleI(Aggro, MeleeRangeAggroMod) != 0) { if (center->CombatRange(m)) { aggro_mod += RuleI(Aggro, MeleeRangeAggroMod); } } } } if (m->GetMaxHP() != 0 && ((m->GetHP() * 100 / m->GetMaxHP()) < 20)) { aggro_mod += RuleI(Aggro, CriticallyWoundedAggroMod); } if (aggro_mod) { current_hate += (current_hate * aggro_mod / 100); } if (current_hate > hate || cur->is_entity_frenzy) { hate = current_hate; top_hate = m; } ++iterator; } if (top_client_type_in_range && top_hate) { bool is_top_client_type = top_hate->IsClient(); if (!is_top_client_type) { if (top_hate->IsBot()) { is_top_client_type = true; top_client_type_in_range = top_hate; } } if (!is_top_client_type) { if (top_hate->IsMerc()) { is_top_client_type = true; top_client_type_in_range = top_hate; } } if (!is_top_client_type) { if (top_hate->GetSpecialAbility(SpecialAbility::AllowedToTank)) { is_top_client_type = true; top_client_type_in_range = top_hate; } } if (!is_top_client_type) { return top_client_type_in_range ? top_client_type_in_range : nullptr; } return top_hate ? top_hate : nullptr; } else { if (!top_hate && skipped_count > 0) { return center->GetTarget() ? center->GetTarget() : nullptr; } return top_hate ? top_hate : nullptr; } } else { auto iterator = list.begin(); int skipped_count = 0; while (iterator != list.end()) { struct_HateList *cur = (*iterator); if (cur) { Mob *m = cur->entity_on_hatelist; if (!m) { ++iterator; continue; } if (m == skip) { ++iterator; continue; } if (skip_mezzed && m->IsMezzed()) { ++iterator; continue; } if ((cur->stored_hate_amount > hate) || cur->is_entity_frenzy) { top_hate = m; hate = cur->stored_hate_amount; } } ++iterator; } if (!top_hate && skipped_count > 0) { return center->GetTarget() ? center->GetTarget() : nullptr; } return top_hate ? top_hate : nullptr; } return nullptr; } Mob *HateList::GetMobWithMostHateOnList(bool skip_mezzed){ Mob* top = nullptr; int64 hate = -1; auto iterator = list.begin(); while (iterator != list.end()) { struct_HateList *cur = (*iterator); if (cur) { LogHateDetail( "Looping GetMobWithMostHateOnList1 [{}] cur [{}] hate [{}] calc [{}]", cur->entity_on_hatelist->GetMobDescription(), cur->stored_hate_amount, hate, (cur->stored_hate_amount > hate) ); if (cur->entity_on_hatelist != nullptr && (cur->stored_hate_amount > hate)) { LogHateDetail( "Looping GetMobWithMostHateOnList2 [{}]", cur->entity_on_hatelist->GetMobDescription() ); if (!skip_mezzed || !cur->entity_on_hatelist->IsMezzed()) { top = cur->entity_on_hatelist; hate = cur->stored_hate_amount; } } } ++iterator; } return top; } Mob *HateList::GetRandomMobOnHateList(EntityFilterType filter_type) { const auto &l = GetFilteredHateList(filter_type); int count = l.size(); if (count <= 0) { // If we don't have any entries it'll crash getting a random 0, -1 position. return nullptr; } if (count == 1) { // No need to do all that extra work if we only have one hate entry auto c = *l.begin(); if (c) { Mob *m = c->entity_on_hatelist; if (!m) { return nullptr; } return m; } return nullptr; } auto r = l.begin(); int random_index = rand() % count; std::advance(r, random_index); auto e = *r; Mob *m = e->entity_on_hatelist; if (m) { return m; } return nullptr; } Mob *HateList::GetEscapingMobOnHateList(Mob *center, float range, bool first) { // function is still in design stage if (!center) return nullptr; Mob *escaping_mob = nullptr; float mob_distance = 0.0f; for (auto iter : list) { if (!iter->entity_on_hatelist) continue; if (!iter->entity_on_hatelist->IsFeared()) continue; if (iter->entity_on_hatelist->IsRooted()) continue; if (iter->entity_on_hatelist->IsMezzed()) continue; if (iter->entity_on_hatelist->IsStunned()) continue; float distance_test = DistanceSquared(center->GetPosition(), iter->entity_on_hatelist->GetPosition()); if (range > 0.0f && distance_test > range) continue; if (first) return iter->entity_on_hatelist; if (distance_test > mob_distance) { escaping_mob = iter->entity_on_hatelist; mob_distance = distance_test; } } return escaping_mob; } int64 HateList::GetEntHateAmount(Mob *in_entity, bool damage) { struct_HateList *entity; entity = Find(in_entity); if (entity && damage) return entity->hatelist_damage; else if (entity) return entity->stored_hate_amount; else return 0; } bool HateList::IsHateListEmpty() { return list.empty(); } uint32 HateList::GetHateListCount(HateListCountType count_type) { if (count_type == HateListCountType::All) { return list.size(); } uint32 count = 0; for (const auto& e : list) { Mob* m = e->entity_on_hatelist; if ( m && ( (count_type == HateListCountType::Bot && m->IsBot()) || (count_type == HateListCountType::Client && m->IsClient()) || (count_type == HateListCountType::NPC && m->IsNPC()) ) ) { count++; } } return count; } void HateList::PrintHateListToClient(Client *c) { if (list.size()) { c->Message( Chat::White, fmt::format( "Displaying hate list for {}.", c->GetTargetDescription(hate_owner) ).c_str() ); auto entity_number = 1; for (const auto& hate_entity : list) { if (hate_entity->entity_on_hatelist) { c->Message( Chat::White, fmt::format( "Hate Entity {} | Name: {} ({}) Damage: {} Hate: {}", entity_number, hate_entity->entity_on_hatelist->GetName(), hate_entity->entity_on_hatelist->GetID(), hate_entity->hatelist_damage, hate_entity->stored_hate_amount ).c_str() ); } else { c->Message( Chat::White, fmt::format( "Hate Entity {} | Damage: {} Hate: {}", entity_number, hate_entity->hatelist_damage, hate_entity->stored_hate_amount ).c_str() ); } entity_number++; } } else { c->Message( Chat::White, fmt::format( "{} has nothing on its hatelist.", c->GetTargetDescription(hate_owner) ).c_str() ); } } int HateList::AreaRampage(Mob *caster, Mob *target, int count, ExtraAttackOptions *opts) { if (!target || !caster) { return 0; } // tank will be hit ONLY if they are the only target on the hate list // if there is anyone else on the hate list, the tank will not be hit, even if those others aren't hit either if (list.size() == 1) { caster->ProcessAttackRounds(target, opts); return 1; } int hit_count = 0; // This should prevent crashes if something dies (or mainly more than 1 thing goes away) // This is a temp solution until the hate lists can be rewritten to not have that issue std::vector id_list; for (auto &h : list) { if (h->entity_on_hatelist && h->entity_on_hatelist != caster && h->entity_on_hatelist != target && caster->CombatRange(h->entity_on_hatelist, 1.0, true, opts)) { id_list.push_back(h->entity_on_hatelist->GetID()); } if (count != -1 && id_list.size() > count) { break; } } for (auto &id : id_list) { auto mob = entity_list.GetMobID(id); if (mob) { ++hit_count; caster->ProcessAttackRounds(mob, opts); } } return hit_count; } void HateList::SpellCast(Mob *caster, uint32 spell_id, float range, Mob* ae_center) { if (!caster) return; Mob* center = caster; if (ae_center) center = ae_center; //this is slower than just iterating through the list but avoids //crashes when people kick the bucket in the middle of this call //that invalidates our iterator but there's no way to know sadly //So keep a list of entity ids and look up after std::list id_list; range = range * range; float min_range2 = spells[spell_id].min_range * spells[spell_id].min_range; float dist_targ = 0; auto iterator = list.begin(); while (iterator != list.end()) { struct_HateList *h = (*iterator); if (range > 0) { dist_targ = DistanceSquared(center->GetPosition(), h->entity_on_hatelist->GetPosition()); if (dist_targ <= range && dist_targ >= min_range2) { id_list.push_back(h->entity_on_hatelist->GetID()); h->entity_on_hatelist->CalcSpellPowerDistanceMod(spell_id, dist_targ); } } else { id_list.push_back(h->entity_on_hatelist->GetID()); h->entity_on_hatelist->CalcSpellPowerDistanceMod(spell_id, 0, caster); } ++iterator; } auto iter = id_list.begin(); while (iter != id_list.end()) { Mob *cur = entity_list.GetMobID((*iter)); if (cur) { caster->SpellOnTarget(spell_id, cur); } iter++; } } void HateList::RemoveStaleEntries(int time_ms, float dist) { auto it = list.begin(); auto cur_time = Timer::GetCurrentTime(); auto dist2 = dist * dist; while (it != list.end()) { auto m = (*it)->entity_on_hatelist; if (m) { bool remove = false; if (cur_time - (*it)->last_modified > time_ms) { remove = true; } if (!remove && DistanceSquaredNoZ(hate_owner->GetPosition(), m->GetPosition()) > dist2) { (*it)->oor_count++; if ((*it)->oor_count == 2) { remove = true; } } else if ((*it)->oor_count != 0) { (*it)->oor_count = 0; } if (remove) { if (parse->HasQuestSub(hate_owner->GetNPCTypeID(), EVENT_HATE_LIST)) { parse->EventNPC(EVENT_HATE_LIST, hate_owner->CastToNPC(), m, "0", 0); } if (m->IsClient()) { m->CastToClient()->DecrementAggroCount(); m->CastToClient()->RemoveXTarget(hate_owner, true); } delete (*it); it = list.erase(it); continue; } } ++it; } } void HateList::DamageHateList(int64 damage, uint32 distance, EntityFilterType filter_type, bool is_percentage) { if (damage <= 0) { return; } const auto& l = GetFilteredHateList(filter_type, distance); for (const auto& h : l) { auto e = h->entity_on_hatelist; if (is_percentage) { const auto damage_percentage = EQ::Clamp(damage, static_cast(1), static_cast(100)); const auto total_damage = (e->GetMaxHP() / 100) * damage_percentage; e->Damage(hate_owner, total_damage, SPELL_UNKNOWN, EQ::skills::SkillEagleStrike); } else { e->Damage(hate_owner, damage, SPELL_UNKNOWN, EQ::skills::SkillEagleStrike); } } } std::list HateList::GetFilteredHateList(EntityFilterType filter_type, uint32 distance) { std::list l; const auto squared_distance = (distance * distance); for (auto h : list) { auto e = h->entity_on_hatelist; if (!e) { continue; } if ( distance && DistanceSquaredNoZ( hate_owner->GetPosition(), e->GetPosition() ) > squared_distance ) { continue; } if ( (filter_type == EntityFilterType::Bots && !e->IsBot()) || (filter_type == EntityFilterType::Clients && !e->IsClient()) || (filter_type == EntityFilterType::NPCs && !e->IsNPC()) ) { continue; } l.push_back(h); } return l; }