[Perl] Linux /opt/eqemu-perl checks when using release binaries (#4346)

This commit is contained in:
Chris Miles 2024-05-26 15:14:06 -05:00 committed by GitHub
parent 1310c5d528
commit d767217461
No known key found for this signature in database
GPG Key ID: B5690EEEBB952194

View File

@ -446,6 +446,21 @@ int main(int argc, char **argv)
auto perl_parser = new PerlembParser();
parse->RegisterQuestInterface(perl_parser, "pl");
#ifdef __linux__
std::string current_version = CURRENT_VERSION;
// running release binaries
if (!Strings::Contains(current_version, "-dev")) {
if (!fs::exists("/opt/eqemu-perl")) {
LogError("You are running release binaries without having the required eqemu version of perl compiled and installed on this system present at /opt/eqemu-perl");
LogError("If you are running an old Linux install, you need to install the required perl version from the eqemu-perl");
LogError("Instructions can be referenced at https://github.com/Akkadius/akk-stack/blob/master/containers/eqemu-server/Dockerfile#L92-L106");
LogError("Press any key to continue");
getchar();
}
return 0;
}
#endif
/* Load Perl Event Export Settings */
parse->LoadPerlEventExportSettings(parse->perl_event_export_settings);