Moved Stars45 to StarsEx

1 files changed, 373 insertions, 0 deletions

diff --git a/StarsEx/ModConfig.cpp b/StarsEx/ModConfig.cpp
new file mode 100644
index 0000000..3cc433e
--- /dev/null
+++ b/StarsEx/ModConfig.cpp
@@ -0,0 +1,373 @@
+/*  Starshatter: The Open Source Project
+    Copyright (c) 2021-2022, Starshatter: The Open Source Project Contributors
+    Copyright (c) 2011-2012, Starshatter OpenSource Distribution Contributors
+    Copyright (c) 1997-2006, Destroyer Studios LLC.
+
+    AUTHOR:       John DiCamillo
+
+
+    OVERVIEW
+    ========
+    Mod file deployment configuration and manager
+*/
+
+
+#include "ModConfig.h"
+#include "ModInfo.h"
+#include "Campaign.h"
+#include "ShipDesign.h"
+#include "WeaponDesign.h"
+#include "Starshatter.h"
+#include "ParseUtil.h"
+#include "DataLoader.h"
+#include "ContentBundle.h"
+
+// +-------------------------------------------------------------------+
+
+static ModConfig* mod_config = 0;
+
+// +-------------------------------------------------------------------+
+
+ModConfig::ModConfig()
+{
+    mod_config = this;
+
+    Load();
+    FindMods();
+    Deploy();
+}
+
+ModConfig::~ModConfig()
+{
+    if (mod_config == this)
+    mod_config = 0;
+
+    Undeploy();
+
+    enabled.destroy();
+    disabled.destroy();
+    mods.destroy();
+}
+
+// +-------------------------------------------------------------------+
+
+void
+ModConfig::Initialize()
+{
+    mod_config = new ModConfig;
+}
+
+void
+ModConfig::Close()
+{
+    delete mod_config;
+    mod_config = 0;
+}
+
+// +-------------------------------------------------------------------+
+
+ModConfig*
+ModConfig::GetInstance()
+{
+    return mod_config;
+}
+
+// +-------------------------------------------------------------------+
+
+void
+ModConfig::Load()
+{
+    // read the config file:
+    BYTE*       block    = 0;
+    int         blocklen = 0;
+
+    char        filename[64];
+    strcpy_s(filename, "mod.cfg");
+
+    FILE* f;
+    ::fopen_s(&f, filename, "rb");
+
+    if (f) {
+        ::fseek(f, 0, SEEK_END);
+        blocklen = ftell(f);
+        ::fseek(f, 0, SEEK_SET);
+
+        block = new BYTE[blocklen+1];
+        block[blocklen] = 0;
+
+        ::fread(block, blocklen, 1, f);
+        ::fclose(f);
+    }
+
+    if (blocklen == 0)
+    return;
+
+    Parser parser(new BlockReader((const char*) block, blocklen));
+    Term*  term = parser.ParseTerm();
+
+    if (!term) {
+        Print("ERROR: could not parse '%s'.\n", filename);
+        return;
+    }
+    else {
+        TermText* file_type = term->isText();
+        if (!file_type || file_type->value() != "MOD_CONFIG") {
+            Print("WARNING: invalid '%s' file. No mods deployed\n", filename);
+            return;
+        }
+    }
+
+    enabled.destroy();
+
+    do {
+        delete term;
+
+        term = parser.ParseTerm();
+
+        if (term) {
+            TermDef* def = term->isDef();
+            if (def) {
+                Text name;
+                GetDefText(name, def, filename);
+                enabled.append(new Text(name));
+            }
+        }
+    }
+    while (term);
+
+    delete [] block;
+}
+
+void
+ModConfig::Save()
+{
+    FILE* f;
+    fopen_s(&f, "mod.cfg", "wb");
+    if (f) {
+        fprintf(f, "MOD_CONFIG\n\n");
+
+        ListIter<Text> iter = enabled;
+        while (++iter) {
+            Text* name = iter.value();
+            fprintf(f, "mod: \"%s\"\n", name->data());
+        }
+
+        fclose(f);
+    }
+}
+
+void
+ModConfig::FindMods()
+{
+    disabled.destroy();
+
+    DataLoader* loader = DataLoader::GetLoader();
+
+    if (loader) {
+        loader->UseFileSystem(true);
+        loader->ListFiles("*.dat", disabled, true);
+        loader->UseFileSystem(Starshatter::UseFileSystem());
+
+        ListIter<Text> iter = disabled;
+        while (++iter) {
+            Text* name = iter.value();
+            name->setSensitive(false);
+
+            if (*name == "shatter.dat"      ||
+                    *name == "beta.dat"         ||
+                    *name == "start.dat"        ||
+                    *name == "irunin.dat"       ||
+                    *name == "vox.dat"          ||
+                    name->contains("uninstall") ||
+                    enabled.contains(name))
+            delete iter.removeItem();
+        }
+    }
+}
+
+// +-------------------------------------------------------------------+
+
+ModInfo*
+ModConfig::GetModInfo(const char* filename)
+{
+    for (int i = 0; i < mods.size(); i++) {
+        ModInfo* mod_info = mods[i];
+
+        if (mod_info->Filename() == filename && mod_info->IsEnabled())
+        return mod_info;
+    }
+
+    return NULL;
+}
+
+// +-------------------------------------------------------------------+
+
+bool
+ModConfig::IsDeployed(const char* name)
+{
+    for (int i = 0; i < mods.size(); i++) {
+        ModInfo* mod_info = mods[i];
+
+        if (mod_info->Name() == name && mod_info->IsEnabled())
+        return true;
+    }
+
+    return false;
+}
+
+// +-------------------------------------------------------------------+
+
+void
+ModConfig::Deploy()
+{
+    Save();
+
+    if (enabled.size() < 1)
+    return;
+
+    Print("\nDEPLOYING MODS\n--------------\n");
+
+    int i = 1;
+    ListIter<Text> iter = enabled;
+    while (++iter) {
+        Text* name = iter.value();
+
+        if (IsDeployed(name->data())) {
+            Print("  %d. %s is already deployed (skipping)\n", i++, name->data());
+            continue;
+        }
+
+        Print("  %d. %s\n", i++, name->data());
+
+        ModInfo* mod_info = new ModInfo;
+
+        if (mod_info->Load(name->data()) && mod_info->Enable()) {
+            mods.append(mod_info);
+        }
+        else {
+            Print("     Could not deploy '%s' - disabling\n", name->data());
+
+            delete mod_info;
+            iter.removeItem();
+            disabled.append(name);
+        }
+    }
+
+    Print("\n");
+    ContentBundle::GetInstance()->UseLocale(nullptr);
+}
+
+void
+ModConfig::Undeploy()
+{
+    Print("UNDEPLOYING MODS\n");
+    mods.destroy();
+
+    ShipDesign::ClearModCatalog();
+    WeaponDesign::ClearModCatalog();
+}
+
+void
+ModConfig::Redeploy()
+{
+    Undeploy();
+    Deploy();
+
+    Campaign::Close();
+    Campaign::Initialize();
+    Campaign::SelectCampaign("Single Missions");
+}
+
+// +-------------------------------------------------------------------+
+
+void
+ModConfig::EnableMod(const char* name)
+{
+    if (!name || !*name)
+    return;
+
+    Text* mod_name;
+
+    ListIter<Text> iter = disabled;
+    while (++iter) {
+        Text* t = iter.value();
+
+        if (*t == name) {
+            mod_name = t;
+            iter.removeItem();
+            break;
+        }
+    }
+
+    if (mod_name) {
+        enabled.append(mod_name);
+
+        if (!IsDeployed(*mod_name)) {
+            ModInfo* mod_info = new ModInfo;
+
+            if (mod_info->Load(*mod_name) && mod_info->Enable()) {
+                mods.append(mod_info);
+            }
+        }
+    }
+}
+
+void
+ModConfig::DisableMod(const char* name)
+{
+    if (!name || !*name)
+    return;
+
+    Text* mod_name;
+
+    ListIter<Text> iter = enabled;
+    while (++iter) {
+        Text* t = iter.value();
+
+        if (*t == name) {
+            mod_name = t;
+            iter.removeItem();
+            break;
+        }
+    }
+
+    if (mod_name) {
+        disabled.append(mod_name);
+
+        ListIter<ModInfo> iter = mods;
+        while (++iter) {
+            ModInfo* mod_info = iter.value();
+            if (mod_info->Name() == *mod_name) {
+                delete iter.removeItem();
+                break;
+            }
+        }
+    }
+}
+
+// +-------------------------------------------------------------------+
+
+void
+ModConfig::IncreaseModPriority(int mod_index)
+{
+    if (mod_index > 0 && mod_index < enabled.size()) {
+        Text* mod1 = enabled.at(mod_index-1);
+        Text* mod2 = enabled.at(mod_index);
+
+        enabled.at(mod_index-1) = mod2;
+        enabled.at(mod_index)   = mod1;
+    }
+}
+
+void
+ModConfig::DecreaseModPriority(int mod_index)
+{
+    if (mod_index >= 0 && mod_index < enabled.size()-1) {
+        Text* mod1 = enabled.at(mod_index);
+        Text* mod2 = enabled.at(mod_index+1);
+
+        enabled.at(mod_index)   = mod2;
+        enabled.at(mod_index+1) = mod1;
+    }
+}
+