////////////////////////////////////////////////////////////////////////////////
//    Scorched3D (c) 2000-2011, 2026
//
//    This file is part of Scorched3D.
//
//    Scorched3D 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
//    (at your option) any later version.
//
//    Scorched3D 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 this program; if not, write to the Free Software Foundation, Inc.,
//    51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA.
////////////////////////////////////////////////////////////////////////////////

#include <weapons/WeaponInvokeWeapon.hpp>
#include <weapons/AccessoryStore.hpp>
#include <common/Defines.hpp>

std::set<Weapon *> WeaponInvokeWeapon::weaponStack_;

REGISTER_ACCESSORY_SOURCE(WeaponInvokeWeapon);

WeaponInvokeWeapon::WeaponInvokeWeapon() : invokeWeapon_( nullptr ) {}

WeaponInvokeWeapon::~WeaponInvokeWeapon() {}

bool WeaponInvokeWeapon::parseXML(AccessoryCreateContext &context, XMLNode *accessoryNode)
{
	if (!Weapon::parseXML(context, accessoryNode)) return false;

	std::string invoke;
	if (!accessoryNode->getNamedChild("invoke", invoke)) return false;
	Accessory *accessory = context.getAccessoryStore().
		findByPrimaryAccessoryName(invoke.c_str());
	if (!accessory)
	{
		return accessoryNode->returnError(
			S3D::formatStringBuffer("Failed to find accessory named %s",
				invoke.c_str()));
	}

	AccessoryPart *accessoryPart = accessory->getAction();
	if (!accessoryPart || accessoryPart->getType() != AccessoryPart::AccessoryWeapon)
	{
		return accessoryNode->returnError("Failed to find sub weapon, not a weapon");
	}
	invokeWeapon_ = (Weapon*) accessoryPart;

	return accessoryNode->failChildren();
}

void WeaponInvokeWeapon::fireWeapon(ScorchedContext &context,
	WeaponFireContext &weaponContext, FixedVector &position, FixedVector &velocity)
{
	if (weaponStack_.find(invokeWeapon_) != weaponStack_.end())
	{
		S3D::dialogExit("Scorched3D", S3D::formatStringBuffer(
			"WeaponInvokeWeapon recursive called for weapon %s",
			invokeWeapon_->getParent()->getName()));
	}
    
	weaponStack_.insert(invokeWeapon_);
	invokeWeapon_->fire(context, weaponContext, position, velocity);
	weaponStack_.erase(invokeWeapon_);
}
