Why not script
B Extrude one cap
A boolean Intersect B = C
(A boolean Union B ) boolean Diff C