dandri/simplexmq
1
0
Fork 0
mirror of https://github.com/simplex-chat/simplexmq.git synced 2026-03-30 22:55:50 +00:00
Code Issues Packages Projects Releases Wiki Activity

smp protocol: fix encoding for SOKS/ENDS responses (#1683)

Browse Source
This commit is contained in:
Evgeny
2025-12-25 13:00:29 +00:00
committed by GitHub
parent 11ae20ea20
commit bafdbc1dec
1 changed files with 2 additions and 2 deletions
Download Patch File Download Diff File Expand all files Collapse all files

4
src/Simplex/Messaging/Protocol.hs
View File

@@ -1948,7 +1948,7 @@ instance ProtocolEncoding SMPVersion ErrorType BrokerMsg where
e :: Encoding a => a -> ByteString
e = smpEncode
serviceResp tag n idsHash
| v >= serviceCertsSMPVersion = e (tag, ' ', n, idsHash)
| v >= rcvServiceSMPVersion = e (tag, ' ', n, idsHash)
| otherwise = e (tag, ' ', n)
protocolP v = \case
@@ -1993,7 +1993,7 @@ instance ProtocolEncoding SMPVersion ErrorType BrokerMsg where
PONG_ -> pure PONG
where
serviceRespP resp
| v >= serviceCertsSMPVersion = resp <$> _smpP <*> smpP
| v >= rcvServiceSMPVersion = resp <$> _smpP <*> smpP
| otherwise = resp <$> _smpP <*> pure mempty
fromProtocolError = \case