Send TraceTxSubmissionProcessed for the new TX submission

Send TraceTxSubmissionProcessed for the new TX submission protocol.
Fix count for TraceTxSubmissionCollected, it should be number of TXs
"collected", not number of TXs accepted by the mempool.

Author: karknu

ouroboros-network/src/Ouroboros/Network/TxSubmission/Inbound/Server.hs

@@ -72,9 +72,16 @@ txSubmissionInboundV2
         txidsAccepted <- mempoolAddTxs txs
         traceWith tracer $
           TraceTxInboundAddedToMempool txidsAccepted
-        let !collected = length txidsAccepted
+        let !collected = length txs
+        let !accepted = length txidsAccepted
         traceWith tracer $
           TraceTxSubmissionCollected collected
+
+        traceWith tracer $ TraceTxSubmissionProcessed ProcessedTxCount {
+            ptxcAccepted = accepted
+          , ptxcRejected = collected - accepted
+          }
+
         -- TODO:
         -- We can update the state so that other `tx-submission` servers will
         -- not try to add these txs to the mempool.