From 03ca345b37250692112a8dff8e1113410665343a Mon Sep 17 00:00:00 2001
From: Alex <kinglykrab@gmail.com>
Date: Mon, 6 Apr 2020 01:07:59 -0400
Subject: [PATCH] Add getcurrencyitemid(currency_id) to Perl/Lua.

---
 zone/embparser_api.cpp | 18 ++++++++++++++++++
 zone/lua_general.cpp   |  5 +++++
 zone/questmgr.cpp      | 13 +++++++++++++
 zone/questmgr.h        |  1 +
 4 files changed, 37 insertions(+)

diff --git a/zone/embparser_api.cpp b/zone/embparser_api.cpp
index dfb23ddc8..0bde28561 100644
--- a/zone/embparser_api.cpp
+++ b/zone/embparser_api.cpp
@@ -3265,6 +3265,23 @@ XS(XS__getcharidbyname) {
 	XSRETURN(1);
 }
 
+XS(XS__getcurrencyitemid);
+XS(XS__getcurrencyitemid) {
+	dXSARGS;
+	if (items != 1)
+		Perl_croak(aTHX_ "Usage: quest::getcurrencyitemid(int currency_id)");
+	dXSTARG;
+
+	int RETVAL;
+	int currency_id = (int) SvUV(ST(0));
+
+	RETVAL = quest_manager.getcurrencyitemid(currency_id);
+
+	XSprePUSH;
+	PUSHi((IV)RETVAL);
+	XSRETURN(1);
+}
+
 XS(XS__getguildnamebyid);
 XS(XS__getguildnamebyid) {
 	dXSARGS;
@@ -4112,6 +4129,7 @@ EXTERN_C XS(boot_quest) {
 	newXS(strcpy(buf, "getItemName"), XS_qc_getItemName, file);
 	newXS(strcpy(buf, "get_spawn_condition"), XS__get_spawn_condition, file);
 	newXS(strcpy(buf, "getcharnamebyid"), XS__getcharnamebyid, file);
+	newXS(strcpy(buf, "getcurrencyitemid"), XS__getcurrencyitemid, file);
 	newXS(strcpy(buf, "getguildnamebyid"), XS__getguildnamebyid, file);
 	newXS(strcpy(buf, "getguildidbycharid"), XS__getguildidbycharid, file);
 	newXS(strcpy(buf, "getgroupidbycharid"), XS__getgroupidbycharid, file);
diff --git a/zone/lua_general.cpp b/zone/lua_general.cpp
index 848348fbf..cc320ab63 100644
--- a/zone/lua_general.cpp
+++ b/zone/lua_general.cpp
@@ -878,6 +878,10 @@ uint32 lua_get_char_id_by_name(const char* name) {
 	return quest_manager.getcharidbyname(name);
 }
 
+int lua_get_currency_item_id(int currency_id) {
+	return quest_manager.getcurrencyitemid(currency_id);
+}
+
 const char *lua_get_guild_name_by_id(uint32 guild_id) {
 	return quest_manager.getguildnamebyid(guild_id);
 }
@@ -1773,6 +1777,7 @@ luabind::scope lua_register_general() {
 		luabind::def("delete_data", (bool(*)(std::string))&lua_delete_data),
 		luabind::def("get_char_name_by_id", &lua_get_char_name_by_id),
 		luabind::def("get_char_id_by_name", (uint32(*)(const char*))&lua_get_char_id_by_name),
+		luabind::def("get_currency_item_id", &lua_get_currency_item_id),
 		luabind::def("get_guild_name_by_id", &lua_get_guild_name_by_id),
 		luabind::def("get_guild_id_by_char_id", &lua_get_guild_id_by_char_id),
 		luabind::def("get_group_id_by_char_id", &lua_get_group_id_by_char_id),
diff --git a/zone/questmgr.cpp b/zone/questmgr.cpp
index 0a61361c6..7560678e1 100644
--- a/zone/questmgr.cpp
+++ b/zone/questmgr.cpp
@@ -2939,6 +2939,19 @@ uint32 QuestManager::getcharidbyname(const char* name) {
 	return database.GetCharacterID(name);
 }
 
+int QuestManager::getcurrencyitemid(int currency_id) {
+	if (currency_id > 0) {
+		auto iter = zone->AlternateCurrencies.begin();
+		while (iter != zone->AlternateCurrencies.end()) {
+			if (currency_id == (*iter).id) {
+				return (*iter).item_id;
+			}
+			++iter;
+		}
+	}
+	return 0;
+}
+
 const char* QuestManager::getguildnamebyid(int guild_id) {
 	if (guild_id > 0)
 		return guild_mgr.GetGuildName(guild_id);
diff --git a/zone/questmgr.h b/zone/questmgr.h
index a3c7eab3d..a4743b2ad 100644
--- a/zone/questmgr.h
+++ b/zone/questmgr.h
@@ -257,6 +257,7 @@ public:
 	std::string saylink(char *saylink_text, bool silent, const char *link_name);
 	const char* getcharnamebyid(uint32 char_id);
 	uint32 getcharidbyname(const char* name);
+	int getcurrencyitemid(int currency_id);
 	const char* getguildnamebyid(int guild_id);
 	int getguildidbycharid(uint32 char_id);
 	int getgroupidbycharid(uint32 char_id);