pharpend/zx
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

WIP: Part Deux

Browse Source
This commit is contained in:
Craig Everett 2019-12-12 15:26:20 +09:00
parent 8251a805a7
commit ec39a1b1e9
1 changed files with 3 additions and 3 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

6
zomp/lib/otpr/zx/0.2.1/src/zx_auth.erl
View File

@ -247,11 +247,11 @@ accept4(_, #{key_name := PackageKey}, {_, UserKey, _, _, _}) ->
{error, bad_key}. {error, bad_key}.
accept5(ZspBin, accept5(ZspBin,
{{Realm, Name, Version}, KeyName, Tags, Deps, Mods}, Meta = #{package_id := {_, Name, Version}, key_name := KeyName},
{UserName, KeyName, Key, SSTag, Socket}) -> {UserName, KeyName, Key, SSTag, Socket}) ->
Command = 14, Command = 14,
Payload = {Realm, {Name, Version}, Tags, Deps, Mods, byte_size(ZspBin)}, ReqMeta = {{Name, Version}, Meta, byte_size(ZspBin)},
Message = {SSTag, UserName, KeyName, Payload}, Message = {SSTag, UserName, KeyName, ReqMeta},
Request = pack_and_sign(Command, Message, Key), Request = pack_and_sign(Command, Message, Key),
ok = gen_tcp:send(Socket, <<0:8, Request/binary>>), ok = gen_tcp:send(Socket, <<0:8, Request/binary>>),
ok = inet:setopts(Socket, [{active, once}]), ok = inet:setopts(Socket, [{active, once}]),