From d908789dfaf9490d4b314325e4b55401d9be25df Mon Sep 17 00:00:00 2001
From: Quietust <quietust@gmail.com>
Date: Fri, 17 Feb 2012 16:20:17 -0600
Subject: [PATCH] Add useless dev plugin - set all "frozen liquid" tiles to be
 either Water or Magma

---
 plugins/devel/CMakeLists.txt |  1 +
 plugins/devel/frozen.cpp     | 99 ++++++++++++++++++++++++++++++++++++
 2 files changed, 100 insertions(+)
 create mode 100644 plugins/devel/frozen.cpp

diff --git a/plugins/devel/CMakeLists.txt b/plugins/devel/CMakeLists.txt
index 85a43b157..9c028692e 100644
--- a/plugins/devel/CMakeLists.txt
+++ b/plugins/devel/CMakeLists.txt
@@ -10,4 +10,5 @@ DFHACK_PLUGIN(memview memview.cpp)
 DFHACK_PLUGIN(catsplosion catsplosion.cpp)
 DFHACK_PLUGIN(buildprobe buildprobe.cpp)
 DFHACK_PLUGIN(tilesieve tilesieve.cpp)
+DFHACK_PLUGIN(frozen frozen.cpp)
 #DFHACK_PLUGIN(tiles tiles.cpp)
diff --git a/plugins/devel/frozen.cpp b/plugins/devel/frozen.cpp
new file mode 100644
index 000000000..60f1d19b9
--- /dev/null
+++ b/plugins/devel/frozen.cpp
@@ -0,0 +1,99 @@
+#include "Core.h"
+#include "Console.h"
+#include "Export.h"
+#include "PluginManager.h"
+
+#include "DataDefs.h"
+#include "modules/Maps.h"
+
+using std::vector;
+using std::string;
+using namespace DFHack;
+using namespace DFHack::Simple;
+using namespace df::enums;
+
+using df::global::world;
+
+int changeLiquid (df::tile_liquid type)
+{
+    int tiles = 0;
+    for (int i = 0; i < world->map.map_blocks.size(); i++)
+    {
+        df::map_block *block = world->map.map_blocks[i];
+        for (size_t j = 0; j < block->block_events.size(); j++)
+        {
+            df::block_square_event *evt = block->block_events[j];
+            if (evt->getType() != block_square_event_type::frozen_liquid)
+                continue;
+            df::block_square_event_frozen_liquidst *frozen = (df::block_square_event_frozen_liquidst *)evt;
+            for (int x = 0; x < 16; x++)
+            {
+                for (int y = 0; y < 16; y++)
+                {
+                    if ((frozen->tiles[x][y] != tiletype::Void) && (frozen->liquid_type[x][y] != type))
+                    {
+                        frozen->liquid_type[x][y] = type;
+                        tiles++;
+                    }
+                }
+            }
+        }
+    }
+    return tiles;
+}
+
+command_result df_frozenlava (Core * c, vector <string> & parameters)
+{
+    if (parameters.size())
+        return CR_WRONG_USAGE;
+
+    CoreSuspender suspend(c);
+
+    if (!Maps::IsValid())
+    {
+        c->con.printerr("Map is not available!\n");
+        return CR_FAILURE;
+    }
+    int tiles = changeLiquid(tile_liquid::Magma);
+
+    if (tiles)
+        c->con.print("Changed %i tiles of ice into frozen lava.\n", tiles);
+    return CR_OK;
+}
+
+command_result df_frozenwater (Core * c, vector <string> & parameters)
+{
+    if (parameters.size())
+        return CR_WRONG_USAGE;
+
+    CoreSuspender suspend(c);
+
+    if (!Maps::IsValid())
+    {
+        c->con.printerr("Map is not available!\n");
+        return CR_FAILURE;
+    }
+    int tiles = changeLiquid(tile_liquid::Water);
+
+    if (tiles)
+        c->con.print("Changed %i tiles of ice into frozen water.\n", tiles);
+    return CR_OK;
+}
+
+DFhackCExport const char * plugin_name ( void )
+{
+    return "frozen";
+}
+
+DFhackCExport command_result plugin_init ( Core * c, std::vector <PluginCommand> &commands)
+{
+    commands.clear();
+    commands.push_back(PluginCommand("frozenlava", "Changes all ice into frozen magma.", df_frozenlava));
+    commands.push_back(PluginCommand("frozenwater", "Changes all ice into frozen water.", df_frozenwater));
+    return CR_OK;
+}
+
+DFhackCExport command_result plugin_shutdown ( Core * c )
+{
+    return CR_OK;
+}