summaryrefslogtreecommitdiff
path: root/src/Network/Tox/Onion/Transport.hs
diff options
context:
space:
mode:
authorJoe Crayne <joe@jerkface.net>2018-12-03 21:03:52 -0500
committerJoe Crayne <joe@jerkface.net>2018-12-16 14:08:26 -0500
commit97cbacd0c9fb0d9aa1d76c29ea87404b9d3c1cc4 (patch)
tree829ec78b0ded3c5652adc81971f3d3850b0b5393 /src/Network/Tox/Onion/Transport.hs
parent93e51f29cc6c25455a5f91dbc1c3e678922523fd (diff)
TCP Client, WIP.
Diffstat (limited to 'src/Network/Tox/Onion/Transport.hs')
-rw-r--r--src/Network/Tox/Onion/Transport.hs2
1 files changed, 1 insertions, 1 deletions
diff --git a/src/Network/Tox/Onion/Transport.hs b/src/Network/Tox/Onion/Transport.hs
index 3d8a9e93..0cb03718 100644
--- a/src/Network/Tox/Onion/Transport.hs
+++ b/src/Network/Tox/Onion/Transport.hs
@@ -105,7 +105,7 @@ putOnionAsymm typ p a = put typ >> p >> putAliasedAsymm a
105 105
106data OnionMessage (f :: * -> *) 106data OnionMessage (f :: * -> *)
107 = OnionAnnounce (Asymm (f (AnnounceRequest,Nonce8))) 107 = OnionAnnounce (Asymm (f (AnnounceRequest,Nonce8)))
108 | OnionAnnounceResponse Nonce8 Nonce24 (f AnnounceResponse) 108 | OnionAnnounceResponse Nonce8 Nonce24 (f AnnounceResponse) -- XXX: Why is Nonce8 transmitted in the clear?
109 | OnionToRoute PublicKey (Asymm (Encrypted DataToRoute)) -- destination key, aliased Asymm 109 | OnionToRoute PublicKey (Asymm (Encrypted DataToRoute)) -- destination key, aliased Asymm
110 | OnionToRouteResponse (Asymm (Encrypted DataToRoute)) 110 | OnionToRouteResponse (Asymm (Encrypted DataToRoute))
111 111