@@ -33,11 +33,6 @@ groups() ->
3333 {non_parallel_tests , [], [
3434 simple ,
3535 change_definition ,
36- autodelete_amqp091_src_on_confirm ,
37- autodelete_amqp091_src_on_publish ,
38- autodelete_amqp091_dest_on_confirm ,
39- autodelete_amqp091_dest_on_publish ,
40- autodelete_with_rejections ,
4136 simple_amqp10_dest ,
4237 simple_amqp10_src ,
4338 amqp091_to_amqp10_with_dead_lettering ,
@@ -270,117 +265,6 @@ change_definition(Config) ->
270265 amqp10_expect_empty (Sess , Dest2 )
271266 end ).
272267
273- autodelete_amqp091_src_on_confirm (Config ) ->
274- autodelete_case (Config , {<<" on-confirm" >>, 50 , 50 , 50 },
275- fun autodelete_amqp091_src /2 ),
276- ok .
277-
278- autodelete_amqp091_src_on_publish (Config ) ->
279- autodelete_case (Config , {<<" on-publish" >>, 50 , 50 , 50 },
280- fun autodelete_amqp091_src /2 ),
281- ok .
282-
283- autodelete_amqp091_dest_on_confirm (Config ) ->
284- autodelete_case (Config , {<<" on-confirm" >>, 50 , 50 , 50 },
285- fun autodelete_amqp091_dest /2 ),
286- ok .
287-
288- autodelete_amqp091_dest_on_publish (Config ) ->
289- autodelete_case (Config , {<<" on-publish" >>, 50 , 50 , 50 },
290- fun autodelete_amqp091_dest /2 ),
291- ok .
292-
293- autodelete_case (Config , Args , CaseFun ) ->
294- with_amqp10_session (Config , CaseFun (Config , Args )).
295-
296- autodelete_do (Config , {AckMode , After , ExpSrc , ExpDest }) ->
297- Src = ? config (srcq , Config ),
298- Dest = ? config (destq , Config ),
299- fun (Session ) ->
300- amqp10_publish (Session , Src , <<" hello" >>, 100 ),
301- shovel_test_utils :set_param_nowait (
302- Config ,
303- ? PARAM , [{<<" src-address" >>, Src },
304- {<<" src-protocol" >>, <<" amqp10" >>},
305- {<<" src-delete-after" >>, After },
306- {<<" src-prefetch-count" >>, 5 },
307- {<<" dest-address" >>, Dest },
308- {<<" dest-protocol" >>, <<" amqp10" >>},
309- {<<" ack-mode" >>, AckMode }
310- ]),
311- await_autodelete (Config , <<" test" >>),
312- amqp10_expect_count (Session , Dest , ExpDest ),
313- amqp10_expect_count (Session , Src , ExpSrc )
314- end .
315-
316- autodelete_amqp091_src (Config , {AckMode , After , ExpSrc , ExpDest }) ->
317- Src = ? config (srcq , Config ),
318- Dest = ? config (destq , Config ),
319- fun (Session ) ->
320- amqp10_publish (Session , Src , <<" hello" >>, 100 ),
321- shovel_test_utils :set_param_nowait (
322- Config ,
323- ? PARAM , [{<<" src-queue" >>, Src },
324- {<<" src-protocol" >>, <<" amqp091" >>},
325- {<<" src-delete-after" >>, After },
326- {<<" src-prefetch-count" >>, 5 },
327- {<<" dest-address" >>, Dest },
328- {<<" dest-protocol" >>, <<" amqp10" >>},
329- {<<" ack-mode" >>, AckMode }
330- ]),
331- await_autodelete (Config , <<" test" >>),
332- amqp10_expect_count (Session , Dest , ExpDest ),
333- amqp10_expect_count (Session , Src , ExpSrc )
334- end .
335-
336- autodelete_amqp091_dest (Config , {AckMode , After , ExpSrc , ExpDest }) ->
337- Src = ? config (srcq , Config ),
338- Dest = ? config (destq , Config ),
339- fun (Session ) ->
340- amqp10_publish (Session , Src , <<" hello" >>, 100 ),
341- shovel_test_utils :set_param_nowait (
342- Config ,
343- ? PARAM , [{<<" src-address" >>, Src },
344- {<<" src-protocol" >>, <<" amqp10" >>},
345- {<<" src-delete-after" >>, After },
346- {<<" src-prefetch-count" >>, 5 },
347- {<<" dest-queue" >>, Dest },
348- {<<" dest-protocol" >>, <<" amqp091" >>},
349- {<<" ack-mode" >>, AckMode }
350- ]),
351- await_autodelete (Config , <<" test" >>),
352- amqp10_expect_count (Session , Dest , ExpDest ),
353- amqp10_expect_count (Session , Src , ExpSrc )
354- end .
355-
356- autodelete_with_rejections (Config ) ->
357- Src = ? config (srcq , Config ),
358- Dest = ? config (destq , Config ),
359- with_amqp10_session (
360- Config ,
361- fun (Sess ) ->
362- amqp10_declare_queue (Sess , Dest , #{<<" x-max-length" >> => {uint , 5 },
363- <<" x-overflow" >> => {utf8 , <<" reject-publish" >>}}),
364-
365- shovel_test_utils :set_param (Config , ? PARAM ,
366- [{<<" src-protocol" >>, <<" local" >>},
367- {<<" src-queue" >>, Src },
368- {<<" src-delete-after" >>, 10 },
369- {<<" dest-protocol" >>, <<" local" >>},
370- {<<" dest-predeclared" >>, true },
371- {<<" dest-queue" >>, Dest }
372- ]),
373- amqp10_publish (Sess , Src , <<" hello" >>, 10 ),
374- await_autodelete (Config , <<" test" >>),
375- Expected = lists :sort ([[Src , <<" 5" >>], [Dest , <<" 5" >>]]),
376- ? awaitMatch (
377- Expected ,
378- lists :sort (rabbit_ct_broker_helpers :rabbitmqctl_list (
379- Config , 0 ,
380- [" list_queues" , " name" , " messages_ready" , " --no-table-headers" ])),
381- 30_000 )
382- end ).
383-
384268test_amqp10_delete_after_queue_length (Config ) ->
385269 Src = ? config (srcq , Config ),
386270 Dest = ? config (destq , Config ),
0 commit comments