解析torrent文件 - 哈希信息.(二郎)

Question

我正在尝试提供正确的url编码信息哈希发送到跟踪器以获取对等列表.

为了测试,我尝试在这个URL中解析torrent .

打开文件后,手动剪切信息字典片段和SHA1-hash它的值我得到这个二进制值:

<< 84,124,15,255,155,171,156,168,91,46,204,24,249,116,110,139,202,167,163,54 >>

从后一个二进制值检索的ASCII字符串是788f590f28a799cc1009a9b780b649fd6f0a2e91,它与站点中提到的值相同.

所以我们假设到现在为止一切都是正确的(不是吗？).

在使用下面的url-encoding函数对二进制值进行编码后,得到T%7c%0f%ff%9b%ab%9c%a8%5b.%cc%18​​%f9tn%8b%ca%a7%a36,这不是甚至接近我应发送给跟踪器的正确urlencoded值.(当我将此信息发送给跟踪器时,我收到一条未找到的错误消息,此外,它与我使用wireshark看到的值不匹配,即x%8fY%0f%28%a7%99%cc%10%09%a9 %b7%80%b6I%fdo%0a.%91).

我正在使用的URL编码功能:

encode(<<Bin:20/binary-unit:8>>)->
    %io:format("~p~n", [binary_to_list(Bin)]),
    encode(binary_to_list(Bin));
encode(List) -> do_encode(List).

do_encode([])-> [];
do_encode([H|T]) when H>=$a, H=<$z ->
    [H| encode(T)];
do_encode([H|T]) when H>=$A, H=<$Z ->
    [H| encode(T)];
do_encode([H|T]) when H>=$0, H=<$9 ->
    [H| encode(T)];
do_encode([H|T]) when H==$- ->
    [H| encode(T)];
do_encode([H|T]) when H==$. ->
    [H|do_encode(T)];
do_encode([H|T]) when H==$* ->
    [H|do_encode(T)];
do_encode([H|T]) ->
     to_hex(H) ++ encode(T).

hex(N) when N < 10 ->
    $0+N;
hex(N) when N >= 10, N < 16 ->
    $a+(N-10).
to_hex(N) when N < 256 ->
    [$%, hex(N div 16), hex(N rem 16)].

以上功能是错误的吗？在原始数据处理方面,我是一个新手.所以非常感谢帮助/想法!谢谢!

Answer 1

请注意，URL 编码在 erlang 中已经可用（尽管隐藏得很好）。

1> B = <<84,124,15,255,155,171,156,168,91,46,204,24,249,116,110, 139,202,167,163,54>>.
<<84,124,15,255,155,171,156,168,91,46,204,24,249,116,110,
2> L = erlang:binary_to_list(B).
[84,124,15,255,155,171,156,168,91,46,204,24,249,116,110,139,
 202,167,163,54]
3> edoc_lib:escape_uri(L).
"T%7c%f%c3%bf%c2%9b%c2%ab%c2%9c%c2%a8%5b.%c3%8c%18%c3%b9tn%c2%8b%c3%8a%c2%a7%c2%a36"

它产生与你相同的结果。