pa/eqemu-server
2
0
Fork 0
mirror of https://github.com/EQEmu/Server.git synced 2026-05-17 15:38:27 +00:00
Code Issues Actions Packages Projects Releases Wiki Activity

[Quest API] Add get_data_remaining(bucket_name) to Perl/Lua. (#1421)

Browse Source 
- Add quest::get_data_remaining(bucket_name) to Perl.
- Add eq.get_data_remaining(bucket_name) to Lua.
This commit is contained in:
Alex
2021-06-17 12:39:16 -04:00
committed by GitHub
parent 68fe95786e
commit 40db13d33e
2 changed files with 21 additions and 0 deletions
Download Patch File Download Diff File Expand all files Collapse all files
zone/embparser_api.cpp
+16
View File
@@ -6824,6 +6824,21 @@ XS(XS__rename) {
XSRETURN_EMPTY;
}
XS(XS__get_data_remaining);
XS(XS__get_data_remaining) {
dXSARGS;
if (items != 1)
Perl_croak(aTHX_ "Usage: quest::get_data_remaining(string bucket_name)");
dXSTARG;
std::string bucket_name = (std::string) SvPV_nolen(ST(0));
sv_setpv(TARG, DataBucket::GetDataRemaining(bucket_name).c_str());
XSprePUSH;
PUSHTARG;
XSRETURN(1);
}
/*
This is the callback perl will look for to setup the
quest package's XSUBs
@@ -6878,6 +6893,7 @@ EXTERN_C XS(boot_quest) {
newXS(strcpy(buf, "get_rule"), XS__get_rule, file);
newXS(strcpy(buf, "get_data"), XS__get_data, file);
newXS(strcpy(buf, "get_data_expires"), XS__get_data_expires, file);
newXS(strcpy(buf, "get_data_remaining"), XS__get_data_remaining, file);
newXS(strcpy(buf, "set_data"), XS__set_data, file);
newXS(strcpy(buf, "delete_data"), XS__delete_data, file);
newXS(strcpy(buf, "IsBeneficialSpell"), XS__IsBeneficialSpell, file);