[CSL-885] Subdivide retrievalWorkerImpl on smaller functions
[CSL-885] Subdivide retrievalWorkerImpl on smaller functions

input-output-hk/cardano-sl,input-output-hk/cardano-sl,input-output-hk/pos-haskell-prototype,input-output-hk/cardano-sl,input-output-hk/pos-haskell-prototype,input-output-hk/pos-haskell-prototype,input-output-hk/cardano-sl