File 1234-mnesia-Discard-old-irrelevant-msgs.patch of Package erlang
From ec9a108ee966f78d8c5e4bfdaa0e111f197aa01f Mon Sep 17 00:00:00 2001
From: Dan Gudmundsson <dgud@erlang.org>
Date: Wed, 19 Feb 2025 14:41:00 +0100
Subject: [PATCH] mnesia: Discard old irrelevant msgs
During startup we postpone handling certain messages until after
schema merge, they may be invalid and if so discard them.
For example the {i_have_tab, Tab, Node} where the table copy have been deleted
on the Node, should not be handled.
---
lib/mnesia/src/mnesia_controller.erl | 30 ++++++++++++++++++----------
1 file changed, 19 insertions(+), 11 deletions(-)
diff --git a/lib/mnesia/src/mnesia_controller.erl b/lib/mnesia/src/mnesia_controller.erl
index 02d873040b..d65378bba2 100644
--- a/lib/mnesia/src/mnesia_controller.erl
+++ b/lib/mnesia/src/mnesia_controller.erl
@@ -1485,17 +1485,25 @@ orphan_tables([Tab | Tabs], Node, Ns, Local, Remote) ->
orphan_tables([], _, _, LocalOrphans, RemoteMasters) ->
{LocalOrphans, RemoteMasters}.
-node_has_tabs([Tab | Tabs], Node, State) when Node /= node() ->
- State2 =
- try update_whereabouts(Tab, Node, State) of
- State1 = #state{} -> State1
- catch exit:R -> %% Tab was just deleted?
- case ?catch_val({Tab, cstruct}) of
- {'EXIT', _} -> State; % yes
- _ -> erlang:error(R)
- end
- end,
- node_has_tabs(Tabs, Node, State2);
+node_has_tabs([Tab | Tabs], Node, State0) when Node /= node() ->
+ State = try
+ case ?catch_val({Tab, cstruct}) of
+ {'EXIT', _} -> State0;
+ Cs ->
+ case mnesia_lib:cs_to_storage_type(Node, Cs) of
+ unknown -> %% handle_early_msgs may come with obsolete
+ State0; %% information, if irrelevant ignore it.
+ _ ->
+ #state{} = update_whereabouts(Tab, Node, State0)
+ end
+ end
+ catch exit:R:ST -> %% Tab was just deleted?
+ case ?catch_val({Tab, cstruct}) of
+ {'EXIT', _} -> State0; % yes
+ _ -> erlang:error({R, ST})
+ end
+ end,
+ node_has_tabs(Tabs, Node, State);
node_has_tabs([Tab | Tabs], Node, State) ->
user_sync_tab(Tab),
node_has_tabs(Tabs, Node, State);
--
2.43.0
