summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorMatthew Sackman <matthew@lshift.net>2009-04-29 16:25:39 +0100
committerMatthew Sackman <matthew@lshift.net>2009-04-29 16:25:39 +0100
commitd10f3828c48016f811b70f4cd4cd82ee826ee5e4 (patch)
treedcb4d4a8400d001c10135b79c3e3f60331ed7708
parentdfbab52506e4667cf0ae63b7fadfa219106a816d (diff)
parent6ea526c16dece49dcf483ce54df450c7dce71986 (diff)
downloadrabbitmq-server-git-d10f3828c48016f811b70f4cd4cd82ee826ee5e4.tar.gz
merging in 20592
-rw-r--r--src/rabbit_exchange.erl14
1 files changed, 8 insertions, 6 deletions
diff --git a/src/rabbit_exchange.erl b/src/rabbit_exchange.erl
index 89e828d75e..7f3a78e920 100644
--- a/src/rabbit_exchange.erl
+++ b/src/rabbit_exchange.erl
@@ -321,15 +321,13 @@ exchanges_for_queue(QueueName) ->
sets:from_list(
mnesia:select(reverse_route, [{MatchHead, [], ['$1']}]))).
-has_bindings(ExchangeName) ->
- MatchHead = #route{binding = #binding{exchange_name = ExchangeName,
- _ = '_'}},
+contains(Table, MatchHead) ->
try
- continue(mnesia:select(route, [{MatchHead, [], ['$_']}], 1, read))
+ continue(mnesia:select(Table, [{MatchHead, [], ['$_']}], 1, read))
catch exit:{aborted, {badarg, _}} ->
%% work around OTP-7025, which was fixed in R12B-1, by
%% falling back on a less efficient method
- case mnesia:match_object(MatchHead) of
+ case mnesia:match_object(Table, MatchHead, read) of
[] -> false;
[_|_] -> true
end
@@ -475,7 +473,11 @@ maybe_auto_delete(Exchange = #exchange{auto_delete = true}) ->
ok.
conditional_delete(Exchange = #exchange{name = ExchangeName}) ->
- case has_bindings(ExchangeName) of
+ Match = #route{binding = #binding{exchange_name = ExchangeName, _ = '_'}},
+ %% we need to check for durable routes here too in case a bunch of
+ %% routes to durable queues have been removed temporarily as a
+ %% result of a node failure
+ case contains(route, Match) orelse contains(durable_routes, Match) of
false -> unconditional_delete(Exchange);
true -> {error, in_use}
end.