/*
* The Mana Server
* Copyright (C) 2004-2011 The Mana World Development Team
*
* This file is part of The Mana Server.
*
* The Mana Server 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; either version 2 of the License, or
* any later version.
*
* The Mana Server is distributed in the hope that it will be useful,
* but WITHOUT ANY WARRANTY; 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 The Mana Server. If not, see .
*/
#include "game-server/monster.h"
#include "common/configuration.h"
#include "common/resourcemanager.h"
#include "game-server/attributemanager.h"
#include "game-server/character.h"
#include "game-server/collisiondetection.h"
#include "game-server/item.h"
#include "game-server/map.h"
#include "game-server/mapcomposite.h"
#include "game-server/state.h"
#include "scripting/scriptmanager.h"
#include "utils/logger.h"
#include "utils/speedconv.h"
#include
MonsterClass::~MonsterClass()
{
for (std::vector::iterator it = mAttacks.begin(),
it_end = mAttacks.end(); it != it_end; ++it)
{
delete *it;
}
}
double MonsterClass::getVulnerability(Element element) const
{
Vulnerabilities::const_iterator it = mVulnerabilities.find(element);
if (it == mVulnerabilities.end())
return 1.0f;
return it->second;
}
Monster::Monster(MonsterClass *specy):
Being(OBJECT_MONSTER),
mSpecy(specy),
mOwner(NULL)
{
LOG_DEBUG("Monster spawned! (id: " << mSpecy->getId() << ").");
setWalkMask(Map::BLOCKMASK_WALL | Map::BLOCKMASK_CHARACTER);
setBlockType(BLOCKTYPE_MONSTER);
/*
* Initialise the attribute structures.
*/
const AttributeManager::AttributeScope &mobAttr =
attributeManager->getAttributeScope(MonsterScope);
for (AttributeManager::AttributeScope::const_iterator it = mobAttr.begin(),
it_end = mobAttr.end(); it != it_end; ++it)
{
mAttributes.insert(std::pair< unsigned, Attribute >
(it->first, Attribute(*it->second)));
}
/*
* Set the attributes to the values defined by the associated monster
* class with or without mutations as needed.
*/
int mutation = specy->getMutation();
for (AttributeMap::iterator it2 = mAttributes.begin(),
it2_end = mAttributes.end(); it2 != it2_end; ++it2)
{
double attr = 0.0f;
if (specy->hasAttribute(it2->first))
{
attr = specy->getAttribute(it2->first);
setAttribute(it2->first,
mutation ?
attr * (100 + (rand() % (mutation * 2)) - mutation) / 100.0 :
attr);
}
}
mDamageMutation = mutation ?
(100 + (rand() % (mutation * 2)) - mutation) / 100.0 : 1;
setSize(specy->getSize());
setGender(specy->getGender());
// Set positions relative to target from which the monster can attack
int dist = specy->getAttackDistance();
mAttackPositions.push_back(AttackPosition(dist, 0, LEFT));
mAttackPositions.push_back(AttackPosition(-dist, 0, RIGHT));
mAttackPositions.push_back(AttackPosition(0, -dist, DOWN));
mAttackPositions.push_back(AttackPosition(0, dist, UP));
// Take attacks from specy
std::vector &attacks = specy->getAttackInfos();
for (std::vector::iterator it = attacks.begin(),
it_end = attacks.end(); it != it_end; ++it)
{
addAttack(*it);
}
}
Monster::~Monster()
{
}
void Monster::update()
{
Being::update();
if (mKillStealProtectedTimeout.justFinished())
mOwner = NULL;
// If dead, remove it
if (mAction == DEAD)
{
if (mDecayTimeout.expired())
GameState::enqueueRemove(this);
return;
}
if (mSpecy->getUpdateCallback().isValid())
{
Script *script = ScriptManager::currentState();
script->prepare(mSpecy->getUpdateCallback());
script->push(this);
script->execute(getMap());
}
refreshTarget();
// Cancel the rest when we have a target
if (mTarget)
return;
// We have no target - let's wander around
if (mStrollTimeout.expired() && getPosition() == getDestination())
{
if (mKillStealProtectedTimeout.expired())
{
unsigned range = mSpecy->getStrollRange();
if (range)
{
Point randomPos(rand() % (range * 2 + 1)
- range + getPosition().x,
rand() % (range * 2 + 1)
- range + getPosition().y);
// Don't allow negative destinations, to avoid rounding
// problems when divided by tile size
if (randomPos.x >= 0 && randomPos.y >= 0)
setDestination(randomPos);
}
mStrollTimeout.set(10 + rand() % 10);
}
}
}
void Monster::refreshTarget()
{
// We are dead and sadly not possible to keep attacking :(
if (mAction == DEAD)
return;
// Check potential attack positions
int bestTargetPriority = 0;
Being *bestTarget = 0;
Point bestAttackPosition;
// reset Target. We will find a new one if possible
mTarget = 0;
// Iterate through objects nearby
int aroundArea = Configuration::getValue("game_visualRange", 448);
for (BeingIterator i(getMap()->getAroundBeingIterator(this, aroundArea));
i; ++i)
{
// We only want to attack player characters
if ((*i)->getType() != OBJECT_CHARACTER)
continue;
Being *target = static_cast(*i);
// Dead characters are ignored
if (target->getAction() == DEAD)
continue;
// Determine how much we hate the target
int targetPriority = 0;
std::map::iterator angerIterator = mAnger.find(target);
if (angerIterator != mAnger.end())
{
const AggressionInfo &aggressionInfo = angerIterator->second;
targetPriority = aggressionInfo.anger;
}
else if (mSpecy->isAggressive())
{
targetPriority = 1;
}
else
{
continue;
}
// Check all attack positions
for (std::list::iterator j = mAttackPositions.begin();
j != mAttackPositions.end(); j++)
{
Point attackPosition = target->getPosition();
attackPosition.x += j->x;
attackPosition.y += j->y;
int posPriority = calculatePositionPriority(attackPosition,
targetPriority);
if (posPriority > bestTargetPriority)
{
bestTargetPriority = posPriority;
bestTarget = target;
bestAttackPosition = attackPosition;
}
}
}
if (bestTarget)
{
mTarget = bestTarget;
if (bestAttackPosition == getPosition())
{
mAction = ATTACK;
updateDirection(getPosition(), mTarget->getPosition());
}
else
{
setDestination(bestAttackPosition);
}
}
}
void Monster::processAttack(Attack &attack)
{
if (!mTarget)
{
setAction(STAND);
return;
}
Damage dmg = attack.getAttackInfo()->getDamage();
dmg.skill = 0;
dmg.base *= mDamageMutation;
dmg.delta *= mDamageMutation;
int hit = performAttack(mTarget, attack.getAttackInfo()->getDamage());
const Script::Ref &scriptCallback =
attack.getAttackInfo()->getScriptCallback();
if (scriptCallback.isValid() && hit > -1)
{
Script *script = ScriptManager::currentState();
script->prepare(scriptCallback);
script->push(this);
script->push(mTarget);
script->push(hit);
script->execute(getMap());
}
}
int Monster::calculatePositionPriority(Point position, int targetPriority)
{
Point thisPos = getPosition();
unsigned range = mSpecy->getTrackRange();
Map *map = getMap()->getMap();
int tileWidth = map->getTileWidth();
int tileHeight = map->getTileHeight();
// Check if we already are on this position
if (thisPos.x / tileWidth == position.x / tileWidth &&
thisPos.y / tileHeight == position.y / tileHeight)
{
return targetPriority *= range;
}
Path path;
path = map->findPath(thisPos.x / tileWidth, thisPos.y / tileHeight,
position.x / tileWidth, position.y / tileHeight,
getWalkMask(),
range);
if (path.empty() || path.size() >= range)
{
return 0;
}
else
{
return targetPriority * (range - path.size());
}
}
void Monster::forgetTarget(Entity *entity)
{
Being *b = static_cast< Being * >(entity);
{
AggressionInfo &aggressionInfo = mAnger[b];
aggressionInfo.removedConnection.disconnect();
aggressionInfo.diedConnection.disconnect();
}
mAnger.erase(b);
if (b->getType() == OBJECT_CHARACTER)
{
Character *c = static_cast< Character * >(b);
mExpReceivers.erase(c);
mLegalExpReceivers.erase(c);
}
}
void Monster::changeAnger(Actor *target, int amount)
{
const EntityType type = target->getType();
if (type != OBJECT_MONSTER && type != OBJECT_CHARACTER)
return;
Being *being = static_cast< Being * >(target);
if (mAnger.find(being) != mAnger.end())
{
mAnger[being].anger += amount;
}
else
{
AggressionInfo &aggressionInfo = mAnger[being];
aggressionInfo.anger = amount;
// Forget target either when it's removed or died, whichever
// happens first.
aggressionInfo.removedConnection =
being->signal_removed.connect(sigc::mem_fun(this, &Monster::forgetTarget));
aggressionInfo.diedConnection =
being->signal_died.connect(sigc::mem_fun(this, &Monster::forgetTarget));
}
}
std::map Monster::getAngerList() const
{
std::map result;
std::map::const_iterator i, i_end;
for (i = mAnger.begin(), i_end = mAnger.end(); i != i_end; ++i)
{
const AggressionInfo &aggressionInfo = i->second;
result.insert(std::make_pair(i->first, aggressionInfo.anger));
}
return result;
}
int Monster::damage(Actor *source, const Damage &damage)
{
Damage newDamage = damage;
float factor = mSpecy->getVulnerability(newDamage.element);
newDamage.base = newDamage.base * factor;
newDamage.delta = newDamage.delta * factor;
int HPLoss = Being::damage(source, newDamage);
if (source)
changeAnger(source, HPLoss);
if (HPLoss && source && source->getType() == OBJECT_CHARACTER)
{
Character *s = static_cast< Character * >(source);
mExpReceivers[s].insert(damage.skill);
if (mKillStealProtectedTimeout.expired() || mOwner == s
|| mOwner->getParty() == s->getParty())
{
mOwner = s;
mLegalExpReceivers.insert(s);
mKillStealProtectedTimeout.set(KILLSTEAL_PROTECTION_TIME);
}
}
if (mSpecy->getDamageCallback().isValid())
{
Script *script = ScriptManager::currentState();
script->prepare(mSpecy->getDamageCallback());
script->push(this);
script->push(source);
script->push(HPLoss);
// TODO: add exact damage parameters as well
script->execute(getMap());
}
return HPLoss;
}
void Monster::died()
{
if (mAction == DEAD)
return;
Being::died();
mDecayTimeout.set(DECAY_TIME);
if (mExpReceivers.size() > 0)
{
// If the monster was killed by players, randomly drop items.
const unsigned size = mSpecy->mDrops.size();
for (unsigned i = 0; i < size; i++)
{
const int p = rand() / (RAND_MAX / 10000);
const MonsterDrop &drop = mSpecy->mDrops[i];
if (p <= drop.probability)
{
Actor *item = Item::create(getMap(),
getPosition(),
drop.item, 1);
GameState::enqueueInsert(item);
}
}
// Distribute exp reward.
std::map > ::iterator iChar;
std::set::iterator iSkill;
float expPerChar = (float)mSpecy->getExp() / mExpReceivers.size();
for (iChar = mExpReceivers.begin(); iChar != mExpReceivers.end();
iChar++)
{
Character *character = (*iChar).first;
const std::set &skillSet = (*iChar).second;
if (mLegalExpReceivers.find(character) == mLegalExpReceivers.end()
|| skillSet.empty())
continue;
int expPerSkill = int(expPerChar / skillSet.size());
for (iSkill = skillSet.begin(); iSkill != skillSet.end();
iSkill++)
{
character->receiveExperience(*iSkill, expPerSkill,
mSpecy->getOptimalLevel());
}
character->incrementKillCount(mSpecy->getId());
}
}
}