From ce03c65515786c7f3c019314fe44019258236a94 Mon Sep 17 00:00:00 2001
From: dshaligram <dshaligram@c06c8d41-db1a-0410-9941-cceddc491573>
Date: Tue, 1 Apr 2008 16:07:23 +0000
Subject: Slime:6 teleport control is enabled even if you kill the royal jelly
 off-level (sorear). TC is also enabled when banishing the royal jelly, which
 is a bit cheesy...

git-svn-id: https://crawl-ref.svn.sourceforge.net/svnroot/crawl-ref/trunk@4026 c06c8d41-db1a-0410-9941-cceddc491573
---
 crawl-ref/source/files.cc | 114 +++++++++++++++++++++++++++++-----------------
 1 file changed, 73 insertions(+), 41 deletions(-)

(limited to 'crawl-ref/source/files.cc')

diff --git a/crawl-ref/source/files.cc b/crawl-ref/source/files.cc
index d6de3741da..c60c60b706 100644
--- a/crawl-ref/source/files.cc
+++ b/crawl-ref/source/files.cc
@@ -1475,62 +1475,94 @@ void restore_game(void)
     }
 }
 
-bool apply_to_all_dungeons(bool (*applicator)())
+static void _restore_level(const level_id &original)
 {
-    const branch_type original_branch = you.where_are_you;
-    const int original_level = you.your_level;
-    const level_area_type original_type = you.level_type;
+    // Reload the original level.
+    you.where_are_you = original.branch;
+    you.your_level = original.absdepth();
+    you.level_type = original.level_type;
+    
+    load( DNGN_STONE_STAIRS_DOWN_I, LOAD_VISITOR,
+          you.level_type, you.your_level, you.where_are_you );
+}
 
-    branch_type last_visited_branch = original_branch;
-    int last_visited_level = original_level;
-    const coord_def old_pos(you.pos());
+// Given a level in the dungeon (i.e. level_type == LEVEL_DUNGEON),
+// returns true if the level has been created already in this game.
+// Asserts if the level_type is not LEVEL_DUNGEON.
+bool is_existing_level(const level_id &level)
+{
+    ASSERT(level.level_type == LEVEL_DUNGEON);
+    return (tmp_file_pairs[level.absdepth()][level.branch]);
+}
+
+// Applies an operation (applicator) after switching to the specified level.
+// If preserve_current is true, will reload the original level after
+// modifying the target level.
+//
+// If the target level has not already been visited by the player, this
+// function will assert.
+//
+bool apply_to_level(const level_id &level, bool preserve_current,
+                    bool (*applicator)())
+{
+    ASSERT(is_existing_level(level));
+    
+    const level_id original = level_id::current();
+    if (level != original)
+    {
+        you.where_are_you = level.branch;
+        you.your_level = level.absdepth();
+        you.level_type = level.level_type;
+    
+        // Load the dungeon level...
+        load( DNGN_STONE_STAIRS_DOWN_I, LOAD_VISITOR,
+              LEVEL_DUNGEON, original.absdepth(),
+              original.branch );
+    }
+
+    // Apply the change.
+    const bool result = applicator();
+
+    if (level != original)
+    {
+        // And save it back.
+        save_level(you.your_level, you.level_type, you.where_are_you);
+    
+        if (preserve_current)
+            _restore_level(original);
+    }
+
+    return (result);
+}
+
+bool apply_to_all_dungeons(bool (*applicator)())
+{
+    const level_id original = level_id::current();
 
     // Apply to current level, then save it out.
     bool success = applicator();
-    save_level(original_level, original_type, original_branch);
-
-    you.level_type = LEVEL_DUNGEON;
+    save_level(original.absdepth(), original.level_type, original.branch);
 
     for ( int i = 0; i < MAX_LEVELS; ++i )
     {
         for ( int j = 0; j < NUM_BRANCHES; ++j )
         {
-            if ( tmp_file_pairs[i][j] )
-            {
-                you.your_level = i;
-                you.where_are_you = static_cast<branch_type>(j);
+            const branch_type br = static_cast<branch_type>(j);
+            const level_id thislevel(br, subdungeon_depth(br, i));
 
-                // Don't apply to the original level - already done up top.
-                if ( original_type == you.level_type &&
-                     original_level == you.your_level &&
-                     original_branch == you.where_are_you )
-                    continue;
-
-                // Load the dungeon level...
-                load( DNGN_STONE_STAIRS_DOWN_I, LOAD_VISITOR,
-                      LEVEL_DUNGEON, last_visited_level,
-                      last_visited_branch );
-
-                // Modify it...
-                if ( applicator() )
-                    success = true;
-
-                // And save it back.
-                save_level(you.your_level, LEVEL_DUNGEON, you.where_are_you);
+            if (!is_existing_level(thislevel))
+                continue;
+            
+            // Don't apply to the original level - already done up top.
+            if (original == thislevel)
+                continue;
 
-                last_visited_branch = you.where_are_you;
-                last_visited_level = you.your_level;
-            }
+            if (apply_to_level(thislevel, false, applicator))
+                success = true;
         }
     }
 
-    // Reload the original level.
-    you.where_are_you = original_branch;
-    you.your_level = original_level;
-    you.level_type = original_type;
-
-    load( DNGN_STONE_STAIRS_DOWN_I, LOAD_VISITOR,
-          original_type, original_level, original_branch );
+    _restore_level(original);
 
     return success;
 }
-- 
cgit v1.2.3-54-g00ecf