mirror of
https://github.com/EQEmu/Server.git
synced 2025-12-11 21:01:29 +00:00
304 lines
11 KiB
C++
304 lines
11 KiB
C++
#ifdef LUA_EQEMU
|
|
|
|
#include "lua.hpp"
|
|
#include <luabind/luabind.hpp>
|
|
#include <luabind/object.hpp>
|
|
|
|
#include <sstream>
|
|
#include <list>
|
|
#include <map>
|
|
|
|
#include "lua_parser.h"
|
|
#include "lua_item.h"
|
|
#include "lua_iteminst.h"
|
|
#include "lua_mob.h"
|
|
#include "QuestParserCollection.h"
|
|
#include "questmgr.h"
|
|
|
|
struct Events { };
|
|
|
|
struct lua_registered_event {
|
|
std::string encounter_name;
|
|
luabind::object lua_reference;
|
|
QuestEventID event_id;
|
|
};
|
|
|
|
extern std::map<std::string, std::list<lua_registered_event>> lua_encounter_events_registered;
|
|
|
|
void load_encounter(std::string name) {
|
|
parse->EventEncounter(EVENT_ENCOUNTER_LOAD, name, 0);
|
|
}
|
|
|
|
void unload_encounter(std::string name) {
|
|
parse->EventEncounter(EVENT_ENCOUNTER_UNLOAD, name, 0);
|
|
}
|
|
|
|
void register_event(std::string package_name, std::string name, int evt, luabind::object func) {
|
|
lua_registered_event e;
|
|
e.encounter_name = name;
|
|
e.lua_reference = func;
|
|
e.event_id = static_cast<QuestEventID>(evt);
|
|
|
|
auto liter = lua_encounter_events_registered.find(package_name);
|
|
if(liter == lua_encounter_events_registered.end()) {
|
|
std::list<lua_registered_event> elist;
|
|
elist.push_back(e);
|
|
lua_encounter_events_registered[package_name] = elist;
|
|
} else {
|
|
std::list<lua_registered_event> elist = liter->second;
|
|
auto iter = elist.begin();
|
|
while(iter != elist.end()) {
|
|
if(iter->event_id == evt && iter->encounter_name.compare(name) == 0) {
|
|
//already registered this event for this encounter
|
|
return;
|
|
}
|
|
++iter;
|
|
}
|
|
|
|
elist.push_back(e);
|
|
lua_encounter_events_registered[package_name] = elist;
|
|
}
|
|
}
|
|
|
|
void unregister_event(std::string package_name, std::string name, int evt) {
|
|
auto liter = lua_encounter_events_registered.find(package_name);
|
|
if(liter != lua_encounter_events_registered.end()) {
|
|
std::list<lua_registered_event> elist = liter->second;
|
|
auto iter = elist.begin();
|
|
while(iter != elist.end()) {
|
|
if(iter->event_id == evt && iter->encounter_name.compare(name) == 0) {
|
|
iter = elist.erase(iter);
|
|
}
|
|
}
|
|
lua_encounter_events_registered[package_name] = elist;
|
|
}
|
|
}
|
|
|
|
void register_npc_event(std::string name, int evt, int npc_id, luabind::object func) {
|
|
if(luabind::type(func) == LUA_TFUNCTION) {
|
|
std::stringstream package_name;
|
|
package_name << "npc_" << npc_id;
|
|
|
|
register_event(package_name.str(), name, evt, func);
|
|
}
|
|
}
|
|
|
|
void unregister_npc_event(std::string name, int evt, int npc_id) {
|
|
std::stringstream package_name;
|
|
package_name << "npc_" << npc_id;
|
|
|
|
unregister_event(package_name.str(), name, evt);
|
|
}
|
|
|
|
void register_player_event(std::string name, int evt, luabind::object func) {
|
|
if(luabind::type(func) == LUA_TFUNCTION) {
|
|
register_event("player", name, evt, func);
|
|
}
|
|
}
|
|
|
|
void unregister_player_event(std::string name, int evt) {
|
|
unregister_event("player", name, evt);
|
|
}
|
|
|
|
void register_item_event(std::string name, int evt, Lua_Item item, luabind::object func) {
|
|
const Item_Struct *itm = item;
|
|
if(!itm) {
|
|
return;
|
|
}
|
|
|
|
std::stringstream package_name;
|
|
package_name << "item_";
|
|
|
|
std::stringstream item_name;
|
|
if(EVENT_SCALE_CALC == evt || EVENT_ITEM_ENTER_ZONE == evt)
|
|
{
|
|
item_name << itm->CharmFile;
|
|
}
|
|
else if(EVENT_ITEM_CLICK == evt || EVENT_ITEM_CLICK_CAST == evt)
|
|
{
|
|
item_name << "script_";
|
|
item_name << itm->ScriptFileID;
|
|
}
|
|
else
|
|
{
|
|
item_name << "item_";
|
|
item_name << itm->ID;
|
|
}
|
|
|
|
package_name << item_name;
|
|
|
|
if(luabind::type(func) == LUA_TFUNCTION) {
|
|
register_event(package_name.str(), name, evt, func);
|
|
}
|
|
}
|
|
|
|
void unregister_item_event(std::string name, int evt, Lua_Item item) {
|
|
const Item_Struct *itm = item;
|
|
if(!itm) {
|
|
return;
|
|
}
|
|
|
|
std::stringstream package_name;
|
|
package_name << "item_";
|
|
|
|
std::stringstream item_name;
|
|
if(EVENT_SCALE_CALC == evt || EVENT_ITEM_ENTER_ZONE == evt)
|
|
{
|
|
item_name << itm->CharmFile;
|
|
}
|
|
else if(EVENT_ITEM_CLICK == evt || EVENT_ITEM_CLICK_CAST == evt)
|
|
{
|
|
item_name << "script_";
|
|
item_name << itm->ScriptFileID;
|
|
}
|
|
else
|
|
{
|
|
item_name << "item_";
|
|
item_name << itm->ID;
|
|
}
|
|
|
|
package_name << item_name;
|
|
unregister_event(package_name.str(), name, evt);
|
|
}
|
|
|
|
void register_spell_event(std::string name, int evt, int spell_id, luabind::object func) {
|
|
if(luabind::type(func) == LUA_TFUNCTION) {
|
|
std::stringstream package_name;
|
|
package_name << "spell_" << spell_id;
|
|
|
|
register_event(package_name.str(), name, evt, func);
|
|
}
|
|
}
|
|
|
|
void unregister_spell_event(std::string name, int evt, int spell_id) {
|
|
std::stringstream package_name;
|
|
package_name << "spell_" << spell_id;
|
|
|
|
unregister_event(package_name.str(), name, evt);
|
|
}
|
|
|
|
void lua_say(const char *str) {
|
|
quest_manager.say(str);
|
|
}
|
|
|
|
void lua_say(const char *str, int language) {
|
|
quest_manager.say(str, language);
|
|
}
|
|
|
|
void lua_me(const char *str) {
|
|
quest_manager.me(str);
|
|
}
|
|
|
|
void lua_summon_item(uint32 itemid, int charges = 0) {
|
|
quest_manager.summonitem(itemid, charges);
|
|
}
|
|
|
|
Lua_Mob lua_spawn2(int npc_type, int grid, int unused, double x, double y, double z, double heading) {
|
|
return Lua_Mob(quest_manager.spawn2(npc_type, grid, unused,
|
|
static_cast<float>(x), static_cast<float>(y), static_cast<float>(z), static_cast<float>(heading)));
|
|
}
|
|
|
|
Lua_Mob lua_unique_spawn(int npc_type, int grid, int unused, double x, double y, double z, double heading = 0.0) {
|
|
return Lua_Mob(quest_manager.unique_spawn(npc_type, grid, unused,
|
|
static_cast<float>(x), static_cast<float>(y), static_cast<float>(z), static_cast<float>(heading)));
|
|
}
|
|
|
|
Lua_Mob lua_spawn_from_spawn2(uint32 spawn2_id) {
|
|
return Lua_Mob(quest_manager.spawn_from_spawn2(spawn2_id));
|
|
}
|
|
|
|
luabind::scope lua_register_general() {
|
|
return luabind::namespace_("eq")
|
|
[
|
|
luabind::def("load_encounter", &load_encounter),
|
|
luabind::def("unload_encounter", &unload_encounter),
|
|
luabind::def("register_npc_event", ®ister_npc_event),
|
|
luabind::def("unregister_npc_event", &unregister_npc_event),
|
|
luabind::def("register_player_event", ®ister_player_event),
|
|
luabind::def("unregister_player_event", &unregister_player_event),
|
|
luabind::def("register_item_event", ®ister_item_event),
|
|
luabind::def("unregister_item_event", &unregister_item_event),
|
|
luabind::def("register_spell_event", ®ister_spell_event),
|
|
luabind::def("unregister_spell_event", &unregister_spell_event),
|
|
luabind::def("say", (void(*)(const char*))&lua_say),
|
|
luabind::def("say", (void(*)(const char*, int))&lua_say),
|
|
luabind::def("me", (void(*)(const char*))&lua_me),
|
|
luabind::def("summon_item", (void(*)(uint32))&lua_summon_item),
|
|
luabind::def("summon_item", (void(*)(uint32,int))&lua_summon_item),
|
|
luabind::def("spawn2", (Lua_Mob(*)(int,int,int,double,double,double,double))&lua_spawn2),
|
|
luabind::def("unique_spawn", (Lua_Mob(*)(int,int,int,double,double,double))&lua_unique_spawn),
|
|
luabind::def("unique_spawn", (Lua_Mob(*)(int,int,int,double,double,double,double))&lua_unique_spawn),
|
|
luabind::def("spawn_from_spawn2", (Lua_Mob(*)(uint32))&lua_spawn_from_spawn2)
|
|
];
|
|
}
|
|
|
|
luabind::scope lua_register_events() {
|
|
return luabind::class_<Events>("Event")
|
|
.enum_("constants")
|
|
[
|
|
luabind::value("say", static_cast<int>(EVENT_SAY)),
|
|
luabind::value("trade", static_cast<int>(EVENT_TRADE)),
|
|
luabind::value("death", static_cast<int>(EVENT_DEATH)),
|
|
luabind::value("spawn", static_cast<int>(EVENT_SPAWN)),
|
|
luabind::value("attack", static_cast<int>(EVENT_ATTACK)),
|
|
luabind::value("combat", static_cast<int>(EVENT_COMBAT)),
|
|
luabind::value("aggro", static_cast<int>(EVENT_AGGRO)),
|
|
luabind::value("slay", static_cast<int>(EVENT_SLAY)),
|
|
luabind::value("npc_slay", static_cast<int>(EVENT_NPC_SLAY)),
|
|
luabind::value("waypoint_arrive", static_cast<int>(EVENT_WAYPOINT_ARRIVE)),
|
|
luabind::value("waypoint_depart", static_cast<int>(EVENT_WAYPOINT_DEPART)),
|
|
luabind::value("timer", static_cast<int>(EVENT_TIMER)),
|
|
luabind::value("signal", static_cast<int>(EVENT_SIGNAL)),
|
|
luabind::value("hp", static_cast<int>(EVENT_HP)),
|
|
luabind::value("enter", static_cast<int>(EVENT_ENTER)),
|
|
luabind::value("exit", static_cast<int>(EVENT_EXIT)),
|
|
luabind::value("enter_zone", static_cast<int>(EVENT_ENTER_ZONE)),
|
|
luabind::value("click_door", static_cast<int>(EVENT_CLICK_DOOR)),
|
|
luabind::value("loot", static_cast<int>(EVENT_LOOT)),
|
|
luabind::value("zone", static_cast<int>(EVENT_ZONE)),
|
|
luabind::value("level_up", static_cast<int>(EVENT_LEVEL_UP)),
|
|
luabind::value("killed_merit ", static_cast<int>(EVENT_KILLED_MERIT )),
|
|
luabind::value("cast_on", static_cast<int>(EVENT_CAST_ON)),
|
|
luabind::value("task_accepted", static_cast<int>(EVENT_TASK_ACCEPTED)),
|
|
luabind::value("task_stage_complete", static_cast<int>(EVENT_TASK_STAGE_COMPLETE)),
|
|
luabind::value("task_update", static_cast<int>(EVENT_TASK_UPDATE)),
|
|
luabind::value("task_complete", static_cast<int>(EVENT_TASK_COMPLETE)),
|
|
luabind::value("task_fail", static_cast<int>(EVENT_TASK_FAIL)),
|
|
luabind::value("aggro_say", static_cast<int>(EVENT_AGGRO_SAY)),
|
|
luabind::value("player_pickup", static_cast<int>(EVENT_PLAYER_PICKUP)),
|
|
luabind::value("popup_response", static_cast<int>(EVENT_POPUP_RESPONSE)),
|
|
luabind::value("proximity_say", static_cast<int>(EVENT_PROXIMITY_SAY)),
|
|
luabind::value("cast", static_cast<int>(EVENT_CAST)),
|
|
luabind::value("scale_calc", static_cast<int>(EVENT_SCALE_CALC)),
|
|
luabind::value("item_enter_zone", static_cast<int>(EVENT_ITEM_ENTER_ZONE)),
|
|
luabind::value("target_change", static_cast<int>(EVENT_TARGET_CHANGE)),
|
|
luabind::value("hate_list", static_cast<int>(EVENT_HATE_LIST)),
|
|
luabind::value("spell_effect_client", static_cast<int>(EVENT_SPELL_EFFECT_CLIENT)),
|
|
luabind::value("spell_effect_npc", static_cast<int>(EVENT_SPELL_EFFECT_NPC)),
|
|
luabind::value("spell_effect_buff_tic_client", static_cast<int>(EVENT_SPELL_EFFECT_BUFF_TIC_CLIENT)),
|
|
luabind::value("spell_effect_buff_tic_npc", static_cast<int>(EVENT_SPELL_EFFECT_BUFF_TIC_NPC)),
|
|
luabind::value("spell_effect_translocate_complete", static_cast<int>(EVENT_SPELL_EFFECT_TRANSLOCATE_COMPLETE)),
|
|
luabind::value("combine_success ", static_cast<int>(EVENT_COMBINE_SUCCESS )),
|
|
luabind::value("combine_failure ", static_cast<int>(EVENT_COMBINE_FAILURE )),
|
|
luabind::value("item_click", static_cast<int>(EVENT_ITEM_CLICK)),
|
|
luabind::value("item_click_cast", static_cast<int>(EVENT_ITEM_CLICK_CAST)),
|
|
luabind::value("group_change", static_cast<int>(EVENT_GROUP_CHANGE)),
|
|
luabind::value("forage_success", static_cast<int>(EVENT_FORAGE_SUCCESS)),
|
|
luabind::value("forage_failure", static_cast<int>(EVENT_FORAGE_FAILURE)),
|
|
luabind::value("fish_start", static_cast<int>(EVENT_FISH_START)),
|
|
luabind::value("fish_success", static_cast<int>(EVENT_FISH_SUCCESS)),
|
|
luabind::value("fish_failure", static_cast<int>(EVENT_FISH_FAILURE)),
|
|
luabind::value("click_object", static_cast<int>(EVENT_CLICK_OBJECT)),
|
|
luabind::value("discover_item", static_cast<int>(EVENT_DISCOVER_ITEM)),
|
|
luabind::value("disconnect", static_cast<int>(EVENT_DISCONNECT)),
|
|
luabind::value("connect", static_cast<int>(EVENT_CONNECT)),
|
|
luabind::value("item_tick", static_cast<int>(EVENT_ITEM_TICK)),
|
|
luabind::value("duel_win", static_cast<int>(EVENT_DUEL_WIN)),
|
|
luabind::value("duel_lose", static_cast<int>(EVENT_DUEL_LOSE)),
|
|
luabind::value("encounter_load", static_cast<int>(EVENT_ENCOUNTER_LOAD)),
|
|
luabind::value("encounter_unload", static_cast<int>(EVENT_ENCOUNTER_UNLOAD))
|
|
];
|
|
}
|
|
|
|
#endif
|