From 3a66c6673e15456195cd7fbc9c1c05570fde420c Mon Sep 17 00:00:00 2001
From: Hourier <hourier@users.sourceforge.jp>
Date: Sun, 8 Mar 2020 10:22:50 +0900
Subject: [PATCH] [Refactor] #40030 Moved *_door() from monster-process.c to
 monster-move.c/h

---
 src/monster-process.c      | 228 ---------------------------------------------
 src/monster/monster-move.c | 226 ++++++++++++++++++++++++++++++++++++++++++++
 src/monster/monster-move.h |   3 +
 3 files changed, 229 insertions(+), 228 deletions(-)

diff --git a/src/monster-process.c b/src/monster-process.c
index 40b6f00ac..7d4c36292 100644
--- a/src/monster-process.c
+++ b/src/monster-process.c
@@ -69,11 +69,6 @@ void process_special(player_type *target_ptr, MONSTER_IDX m_idx);
 void process_speak_sound(player_type *target_ptr, MONSTER_IDX m_idx, POSITION oy, POSITION ox, bool aware);
 bool cast_spell(player_type *target_ptr, MONSTER_IDX m_idx, bool aware);
 
-bool process_wall(player_type *target_ptr, turn_flags *turn_flags_ptr, monster_type *m_ptr, POSITION ny, POSITION nx, bool can_cross);
-bool process_door(player_type *target_ptr, turn_flags *turn_flags_ptr, monster_type *m_ptr, POSITION ny, POSITION nx);
-bool bash_normal_door(player_type *target_ptr, turn_flags *turn_flags_ptr, monster_type *m_ptr, POSITION ny, POSITION nx);
-void bash_glass_door(player_type *target_ptr, turn_flags *turn_flags_ptr, monster_type *m_ptr, feature_type *f_ptr, bool may_bash);
-
 bool process_monster_movement(player_type *target_ptr, turn_flags *turn_flags_ptr, MONSTER_IDX m_idx, DIRECTION *mm, POSITION oy, POSITION ox, int *count);
 bool process_post_dig_wall(player_type *target_ptr, turn_flags *turn_flags_ptr, monster_type *m_ptr, POSITION ny, POSITION nx);
 bool update_riding_monster(player_type *target_ptr, turn_flags *turn_flags_ptr, MONSTER_IDX m_idx, POSITION oy, POSITION ox, POSITION ny, POSITION nx);
@@ -936,14 +931,6 @@ static bool get_moves(player_type *target_ptr, MONSTER_IDX m_idx, DIRECTION *mm)
 }
 
 
-static bool check_hp_for_feat_destruction(feature_type *f_ptr, monster_type *m_ptr)
-{
-	return !have_flag(f_ptr->flags, FF_GLASS) ||
-		(r_info[m_ptr->r_idx].flags2 & RF2_STUPID) ||
-		(m_ptr->hp >= MAX(m_ptr->maxhp / 3, 200));
-}
-
-
 /*!
  * @brief モンスター単体の1ターン行動処理メインルーチン /
  * Process a monster
@@ -1695,221 +1682,6 @@ bool process_monster_movement(player_type *target_ptr, turn_flags *turn_flags_pt
 
 
 /*!
- * @brief モンスターによる壁の透過・破壊を行う
- * @param target_ptr プレーヤーへの参照ポインタ
- * @param m_ptr モンスターへの参照ポインタ
- * @param ny モンスターのY座標
- * @param nx モンスターのX座標
- * @param can_cross モンスターが地形を踏破できるならばTRUE
- * @return 透過も破壊もしなかった場合はFALSE、それ以外はTRUE
- */
-bool process_wall(player_type *target_ptr, turn_flags *turn_flags_ptr, monster_type *m_ptr, POSITION ny, POSITION nx, bool can_cross)
-{
-	monster_race *r_ptr = &r_info[m_ptr->r_idx];
-	grid_type *g_ptr;
-	g_ptr = &target_ptr->current_floor_ptr->grid_array[ny][nx];
-	feature_type *f_ptr;
-	f_ptr = &f_info[g_ptr->feat];
-	if (player_bold(target_ptr, ny, nx))
-	{
-		turn_flags_ptr->do_move = TRUE;
-		return TRUE;
-	}
-
-	if (g_ptr->m_idx > 0)
-	{
-		turn_flags_ptr->do_move = TRUE;
-		return TRUE;
-	}
-
-	if (((r_ptr->flags2 & RF2_KILL_WALL) != 0) &&
-		(can_cross ? !have_flag(f_ptr->flags, FF_LOS) : !turn_flags_ptr->is_riding_mon) &&
-		have_flag(f_ptr->flags, FF_HURT_DISI) && !have_flag(f_ptr->flags, FF_PERMANENT) &&
-		check_hp_for_feat_destruction(f_ptr, m_ptr))
-	{
-		turn_flags_ptr->do_move = TRUE;
-		if (!can_cross) turn_flags_ptr->must_alter_to_move = TRUE;
-
-		turn_flags_ptr->did_kill_wall = TRUE;
-		return TRUE;
-	}
-
-	if (!can_cross) return FALSE;
-
-	turn_flags_ptr->do_move = TRUE;
-	if (((r_ptr->flags2 & RF2_PASS_WALL) != 0) && (!turn_flags_ptr->is_riding_mon || target_ptr->pass_wall) &&
-		have_flag(f_ptr->flags, FF_CAN_PASS))
-	{
-		turn_flags_ptr->did_pass_wall = TRUE;
-	}
-
-	return TRUE;
-}
-
-
-/*!
- * @brief モンスターによるドアの開放・破壊を行う
- * @param target_ptr プレーヤーへの参照ポインタ
- * @param turn_flags_ptr ターン経過処理フラグへの参照ポインタ
- * @param m_ptr モンスターへの参照ポインタ
- * @param ny モンスターのY座標
- * @param nx モンスターのX座標
- * @return モンスターが死亡した場合のみFALSE
- */
-bool process_door(player_type *target_ptr, turn_flags *turn_flags_ptr, monster_type *m_ptr, POSITION ny, POSITION nx)
-{
-	monster_race *r_ptr = &r_info[m_ptr->r_idx];
-	grid_type *g_ptr;
-	g_ptr = &target_ptr->current_floor_ptr->grid_array[ny][nx];
-	if (!is_closed_door(target_ptr, g_ptr->feat)) return TRUE;
-
-	feature_type *f_ptr;
-	f_ptr = &f_info[g_ptr->feat];
-	bool may_bash = bash_normal_door(target_ptr, turn_flags_ptr, m_ptr, ny, nx);
-	bash_glass_door(target_ptr, turn_flags_ptr, m_ptr, f_ptr, may_bash);
-
-	if (!turn_flags_ptr->did_open_door && !turn_flags_ptr->did_bash_door) return TRUE;
-
-	if (turn_flags_ptr->did_bash_door &&
-		((randint0(100) < 50) || (feat_state(target_ptr, g_ptr->feat, FF_OPEN) == g_ptr->feat) || have_flag(f_ptr->flags, FF_GLASS)))
-	{
-		cave_alter_feat(target_ptr, ny, nx, FF_BASH);
-		if (!monster_is_valid(m_ptr))
-		{
-			target_ptr->update |= (PU_FLOW);
-			target_ptr->window |= (PW_OVERHEAD | PW_DUNGEON);
-			if (is_original_ap_and_seen(target_ptr, m_ptr)) r_ptr->r_flags2 |= (RF2_BASH_DOOR);
-
-			return FALSE;
-		}
-	}
-	else
-	{
-		cave_alter_feat(target_ptr, ny, nx, FF_OPEN);
-	}
-
-	f_ptr = &f_info[g_ptr->feat];
-	turn_flags_ptr->do_view = TRUE;
-	return TRUE;
-}
-
-
-/*!
- * @brief モンスターが普通のドアを開ける処理
- * @param target_ptr プレーヤーへの参照ポインタ
- * @param turn_flags_ptr ターン経過処理フラグへの参照ポインタ
- * @param m_ptr モンスターへの参照ポインタ
- * @param ny モンスターのY座標
- * @param nx モンスターのX座標
- * @return ここではドアを開けず、ガラスのドアを開ける可能性があるならTRUE
- */
-bool bash_normal_door(player_type *target_ptr, turn_flags *turn_flags_ptr, monster_type *m_ptr, POSITION ny, POSITION nx)
-{
-	monster_race *r_ptr = &r_info[m_ptr->r_idx];
-	grid_type *g_ptr;
-	g_ptr = &target_ptr->current_floor_ptr->grid_array[ny][nx];
-	feature_type *f_ptr;
-	f_ptr = &f_info[g_ptr->feat];
-	turn_flags_ptr->do_move = FALSE;
-	if (((r_ptr->flags2 & RF2_OPEN_DOOR) == 0) || !have_flag(f_ptr->flags, FF_OPEN) ||
-		(is_pet(m_ptr) && ((target_ptr->pet_extra_flags & PF_OPEN_DOORS) == 0)))
-		return TRUE;
-
-	if (f_ptr->power == 0)
-	{
-		turn_flags_ptr->did_open_door = TRUE;
-		turn_flags_ptr->do_turn = TRUE;
-		return FALSE;
-	}
-
-	if (randint0(m_ptr->hp / 10) > f_ptr->power)
-	{
-		cave_alter_feat(target_ptr, ny, nx, FF_DISARM);
-		turn_flags_ptr->do_turn = TRUE;
-		return FALSE;
-	}
-
-	return TRUE;
-}
-
-
-/*!
- * @brief モンスターがガラスのドアを開ける処理
- * @param target_ptr プレーヤーへの参照ポインタ
- * @param turn_flags_ptr ターン経過処理フラグへの参照ポインタ
- * @param m_ptr モンスターへの参照ポインタ
- * @param g_ptr グリッドへの参照ポインタ
- * @param f_ptr 地形への参照ポインタ
- * @return なし
- */
-void bash_glass_door(player_type *target_ptr, turn_flags *turn_flags_ptr, monster_type *m_ptr, feature_type *f_ptr, bool may_bash)
-{
-	monster_race *r_ptr = &r_info[m_ptr->r_idx];
-	if (!may_bash || ((r_ptr->flags2 & RF2_BASH_DOOR) == 0) || !have_flag(f_ptr->flags, FF_BASH) ||
-		(is_pet(m_ptr) && ((target_ptr->pet_extra_flags & PF_OPEN_DOORS) == 0)))
-		return;
-
-	if (!check_hp_for_feat_destruction(f_ptr, m_ptr) || (randint0(m_ptr->hp / 10) <= f_ptr->power))
-		return;
-
-	if (have_flag(f_ptr->flags, FF_GLASS))
-		msg_print(_("ガラスが砕ける音がした！", "You hear glass breaking!"));
-	else
-		msg_print(_("ドアを叩き開ける音がした！", "You hear a door burst open!"));
-
-	if (disturb_minor) disturb(target_ptr, FALSE, FALSE);
-
-	turn_flags_ptr->did_bash_door = TRUE;
-	turn_flags_ptr->do_move = TRUE;
-	turn_flags_ptr->must_alter_to_move = TRUE;
-}
-
-
-/*!
- * @brief モンスターが壁を掘った後続処理を実行する
- * @param target_ptr プレーヤーへの参照ポインタ
- * @turn_flags_ptr ターン経過処理フラグへの参照ポインタ
- * @param m_ptr モンスターへの参照ポインタ
- * @param ny モンスターのY座標
- * @param nx モンスターのX座標
- * @return モンスターが死亡した場合のみFALSE
- */
-bool process_post_dig_wall(player_type *target_ptr, turn_flags *turn_flags_ptr, monster_type *m_ptr, POSITION ny, POSITION nx)
-{
-	monster_race *r_ptr = &r_info[m_ptr->r_idx];
-	grid_type *g_ptr;
-	g_ptr = &target_ptr->current_floor_ptr->grid_array[ny][nx];
-	feature_type *f_ptr;
-	f_ptr = &f_info[g_ptr->feat];
-	if (!turn_flags_ptr->did_kill_wall || !turn_flags_ptr->do_move) return TRUE;
-
-	if (one_in_(GRINDNOISE))
-	{
-		if (have_flag(f_ptr->flags, FF_GLASS))
-			msg_print(_("何かの砕ける音が聞こえる。", "There is a crashing sound."));
-		else
-			msg_print(_("ギシギシいう音が聞こえる。", "There is a grinding sound."));
-	}
-
-	cave_alter_feat(target_ptr, ny, nx, FF_HURT_DISI);
-
-	if (!monster_is_valid(m_ptr))
-	{
-		target_ptr->update |= (PU_FLOW);
-		target_ptr->window |= (PW_OVERHEAD | PW_DUNGEON);
-		if (is_original_ap_and_seen(target_ptr, m_ptr)) r_ptr->r_flags2 |= (RF2_KILL_WALL);
-
-		return FALSE;
-	}
-
-	f_ptr = &f_info[g_ptr->feat];
-	turn_flags_ptr->do_view = TRUE;
-	turn_flags_ptr->do_turn = TRUE;
-	return TRUE;
-}
-
-
-/*!
  * @brief 騎乗中のモンスター情報を更新する
  * @param target_ptr プレーヤーへの参照ポインタ
  * @param turn_flags_ptr ターン経過処理フラグへの参照ポインタ
diff --git a/src/monster/monster-move.c b/src/monster/monster-move.c
index 29328065c..7ac699150 100644
--- a/src/monster/monster-move.c
+++ b/src/monster/monster-move.c
@@ -5,6 +5,232 @@
  */
 
 #include "monster/monster-move.h"
+#include "cmd/cmd-pet.h"
+#include "monster-status.h"
+#include "player-move.h"
+
+static bool check_hp_for_feat_destruction(feature_type *f_ptr, monster_type *m_ptr)
+{
+	return !have_flag(f_ptr->flags, FF_GLASS) ||
+		(r_info[m_ptr->r_idx].flags2 & RF2_STUPID) ||
+		(m_ptr->hp >= MAX(m_ptr->maxhp / 3, 200));
+}
+
+
+/*!
+  * @brief モンスターによる壁の透過・破壊を行う
+  * @param target_ptr プレーヤーへの参照ポインタ
+  * @param m_ptr モンスターへの参照ポインタ
+  * @param ny モンスターのY座標
+  * @param nx モンスターのX座標
+  * @param can_cross モンスターが地形を踏破できるならばTRUE
+  * @return 透過も破壊もしなかった場合はFALSE、それ以外はTRUE
+  */
+bool process_wall(player_type *target_ptr, turn_flags *turn_flags_ptr, monster_type *m_ptr, POSITION ny, POSITION nx, bool can_cross)
+{
+	monster_race *r_ptr = &r_info[m_ptr->r_idx];
+	grid_type *g_ptr;
+	g_ptr = &target_ptr->current_floor_ptr->grid_array[ny][nx];
+	feature_type *f_ptr;
+	f_ptr = &f_info[g_ptr->feat];
+	if (player_bold(target_ptr, ny, nx))
+	{
+		turn_flags_ptr->do_move = TRUE;
+		return TRUE;
+	}
+
+	if (g_ptr->m_idx > 0)
+	{
+		turn_flags_ptr->do_move = TRUE;
+		return TRUE;
+	}
+
+	if (((r_ptr->flags2 & RF2_KILL_WALL) != 0) &&
+		(can_cross ? !have_flag(f_ptr->flags, FF_LOS) : !turn_flags_ptr->is_riding_mon) &&
+		have_flag(f_ptr->flags, FF_HURT_DISI) && !have_flag(f_ptr->flags, FF_PERMANENT) &&
+		check_hp_for_feat_destruction(f_ptr, m_ptr))
+	{
+		turn_flags_ptr->do_move = TRUE;
+		if (!can_cross) turn_flags_ptr->must_alter_to_move = TRUE;
+
+		turn_flags_ptr->did_kill_wall = TRUE;
+		return TRUE;
+	}
+
+	if (!can_cross) return FALSE;
+
+	turn_flags_ptr->do_move = TRUE;
+	if (((r_ptr->flags2 & RF2_PASS_WALL) != 0) && (!turn_flags_ptr->is_riding_mon || target_ptr->pass_wall) &&
+		have_flag(f_ptr->flags, FF_CAN_PASS))
+	{
+		turn_flags_ptr->did_pass_wall = TRUE;
+	}
+
+	return TRUE;
+}
+
+
+/*!
+ * @brief モンスターが普通のドアを開ける処理
+ * @param target_ptr プレーヤーへの参照ポインタ
+ * @param turn_flags_ptr ターン経過処理フラグへの参照ポインタ
+ * @param m_ptr モンスターへの参照ポインタ
+ * @param ny モンスターのY座標
+ * @param nx モンスターのX座標
+ * @return ここではドアを開けず、ガラスのドアを開ける可能性があるならTRUE
+ */
+static bool bash_normal_door(player_type *target_ptr, turn_flags *turn_flags_ptr, monster_type *m_ptr, POSITION ny, POSITION nx)
+{
+	monster_race *r_ptr = &r_info[m_ptr->r_idx];
+	grid_type *g_ptr;
+	g_ptr = &target_ptr->current_floor_ptr->grid_array[ny][nx];
+	feature_type *f_ptr;
+	f_ptr = &f_info[g_ptr->feat];
+	turn_flags_ptr->do_move = FALSE;
+	if (((r_ptr->flags2 & RF2_OPEN_DOOR) == 0) || !have_flag(f_ptr->flags, FF_OPEN) ||
+		(is_pet(m_ptr) && ((target_ptr->pet_extra_flags & PF_OPEN_DOORS) == 0)))
+		return TRUE;
+
+	if (f_ptr->power == 0)
+	{
+		turn_flags_ptr->did_open_door = TRUE;
+		turn_flags_ptr->do_turn = TRUE;
+		return FALSE;
+	}
+
+	if (randint0(m_ptr->hp / 10) > f_ptr->power)
+	{
+		cave_alter_feat(target_ptr, ny, nx, FF_DISARM);
+		turn_flags_ptr->do_turn = TRUE;
+		return FALSE;
+	}
+
+	return TRUE;
+}
+
+
+/*!
+ * @brief モンスターがガラスのドアを開ける処理
+ * @param target_ptr プレーヤーへの参照ポインタ
+ * @param turn_flags_ptr ターン経過処理フラグへの参照ポインタ
+ * @param m_ptr モンスターへの参照ポインタ
+ * @param g_ptr グリッドへの参照ポインタ
+ * @param f_ptr 地形への参照ポインタ
+ * @return なし
+ */
+static void bash_glass_door(player_type *target_ptr, turn_flags *turn_flags_ptr, monster_type *m_ptr, feature_type *f_ptr, bool may_bash)
+{
+	monster_race *r_ptr = &r_info[m_ptr->r_idx];
+	if (!may_bash || ((r_ptr->flags2 & RF2_BASH_DOOR) == 0) || !have_flag(f_ptr->flags, FF_BASH) ||
+		(is_pet(m_ptr) && ((target_ptr->pet_extra_flags & PF_OPEN_DOORS) == 0)))
+		return;
+
+	if (!check_hp_for_feat_destruction(f_ptr, m_ptr) || (randint0(m_ptr->hp / 10) <= f_ptr->power))
+		return;
+
+	if (have_flag(f_ptr->flags, FF_GLASS))
+		msg_print(_("ガラスが砕ける音がした！", "You hear glass breaking!"));
+	else
+		msg_print(_("ドアを叩き開ける音がした！", "You hear a door burst open!"));
+
+	if (disturb_minor) disturb(target_ptr, FALSE, FALSE);
+
+	turn_flags_ptr->did_bash_door = TRUE;
+	turn_flags_ptr->do_move = TRUE;
+	turn_flags_ptr->must_alter_to_move = TRUE;
+}
+
+
+/*!
+ * @brief モンスターによるドアの開放・破壊を行う
+ * @param target_ptr プレーヤーへの参照ポインタ
+ * @param turn_flags_ptr ターン経過処理フラグへの参照ポインタ
+ * @param m_ptr モンスターへの参照ポインタ
+ * @param ny モンスターのY座標
+ * @param nx モンスターのX座標
+ * @return モンスターが死亡した場合のみFALSE
+ */
+bool process_door(player_type *target_ptr, turn_flags *turn_flags_ptr, monster_type *m_ptr, POSITION ny, POSITION nx)
+{
+	monster_race *r_ptr = &r_info[m_ptr->r_idx];
+	grid_type *g_ptr;
+	g_ptr = &target_ptr->current_floor_ptr->grid_array[ny][nx];
+	if (!is_closed_door(target_ptr, g_ptr->feat)) return TRUE;
+
+	feature_type *f_ptr;
+	f_ptr = &f_info[g_ptr->feat];
+	bool may_bash = bash_normal_door(target_ptr, turn_flags_ptr, m_ptr, ny, nx);
+	bash_glass_door(target_ptr, turn_flags_ptr, m_ptr, f_ptr, may_bash);
+
+	if (!turn_flags_ptr->did_open_door && !turn_flags_ptr->did_bash_door) return TRUE;
+
+	if (turn_flags_ptr->did_bash_door &&
+		((randint0(100) < 50) || (feat_state(target_ptr, g_ptr->feat, FF_OPEN) == g_ptr->feat) || have_flag(f_ptr->flags, FF_GLASS)))
+	{
+		cave_alter_feat(target_ptr, ny, nx, FF_BASH);
+		if (!monster_is_valid(m_ptr))
+		{
+			target_ptr->update |= (PU_FLOW);
+			target_ptr->window |= (PW_OVERHEAD | PW_DUNGEON);
+			if (is_original_ap_and_seen(target_ptr, m_ptr)) r_ptr->r_flags2 |= (RF2_BASH_DOOR);
+
+			return FALSE;
+		}
+	}
+	else
+	{
+		cave_alter_feat(target_ptr, ny, nx, FF_OPEN);
+	}
+
+	f_ptr = &f_info[g_ptr->feat];
+	turn_flags_ptr->do_view = TRUE;
+	return TRUE;
+}
+
+
+/*!
+ * @brief モンスターが壁を掘った後続処理を実行する
+ * @param target_ptr プレーヤーへの参照ポインタ
+ * @turn_flags_ptr ターン経過処理フラグへの参照ポインタ
+ * @param m_ptr モンスターへの参照ポインタ
+ * @param ny モンスターのY座標
+ * @param nx モンスターのX座標
+ * @return モンスターが死亡した場合のみFALSE
+ */
+bool process_post_dig_wall(player_type *target_ptr, turn_flags *turn_flags_ptr, monster_type *m_ptr, POSITION ny, POSITION nx)
+{
+	monster_race *r_ptr = &r_info[m_ptr->r_idx];
+	grid_type *g_ptr;
+	g_ptr = &target_ptr->current_floor_ptr->grid_array[ny][nx];
+	feature_type *f_ptr;
+	f_ptr = &f_info[g_ptr->feat];
+	if (!turn_flags_ptr->did_kill_wall || !turn_flags_ptr->do_move) return TRUE;
+
+	if (one_in_(GRINDNOISE))
+	{
+		if (have_flag(f_ptr->flags, FF_GLASS))
+			msg_print(_("何かの砕ける音が聞こえる。", "There is a crashing sound."));
+		else
+			msg_print(_("ギシギシいう音が聞こえる。", "There is a grinding sound."));
+	}
+
+	cave_alter_feat(target_ptr, ny, nx, FF_HURT_DISI);
+
+	if (!monster_is_valid(m_ptr))
+	{
+		target_ptr->update |= (PU_FLOW);
+		target_ptr->window |= (PW_OVERHEAD | PW_DUNGEON);
+		if (is_original_ap_and_seen(target_ptr, m_ptr)) r_ptr->r_flags2 |= (RF2_KILL_WALL);
+
+		return FALSE;
+	}
+
+	f_ptr = &f_info[g_ptr->feat];
+	turn_flags_ptr->do_view = TRUE;
+	turn_flags_ptr->do_turn = TRUE;
+	return TRUE;
+}
+
 
 /*!
  * @brief 守りのルーンによるモンスターの移動制限を処理する
diff --git a/src/monster/monster-move.h b/src/monster/monster-move.h
index 6a2ad6780..6ab692452 100644
--- a/src/monster/monster-move.h
+++ b/src/monster/monster-move.h
@@ -3,5 +3,8 @@
 #include "angband.h"
 #include "monster/monster-util.h"
 
+bool process_wall(player_type *target_ptr, turn_flags *turn_flags_ptr, monster_type *m_ptr, POSITION ny, POSITION nx, bool can_cross);
+bool process_door(player_type *target_ptr, turn_flags *turn_flags_ptr, monster_type *m_ptr, POSITION ny, POSITION nx);
+
 bool process_protection_rune(player_type *target_ptr, turn_flags *turn_flags_ptr, monster_type *m_ptr, POSITION ny, POSITION nx);
 bool process_explosive_rune(player_type *target_ptr, turn_flags *turn_flags_ptr, monster_type *m_ptr, POSITION ny, POSITION nx);
-- 
2.11.0