在 erlang 中编码/解码 XDR 类型的推荐方法是什么？

Question

在另一个 SO 讨论中，我们讨论了将 erlang 应用程序连接到另一个使用 XDR 编码的非 erlang 应用程序用于网络通信的数据包。

不幸的是，我找不到任何关于使用 erlang 处理 XDR 数据的真正指导。

那么在 erlang 中处理 XDR 编码数据的推荐方法是什么？

谢谢

PS：到目前为止，我可以找到以下资源：

• 让 Erlang 说话对外（2002，PDF，仅简短提及 XDR）

• Sendmail 遇见 Erlang：使用 Erlang 进行电子邮件应用程序的体验（2000 年，这里也没有任何相关内容，但仍然是一个有趣的阅读）

• 然后是这个帖子，它是相关的并且提供了一些 XDR 例程，但是是从 08/2000 开始的，因此甚至早于 erlang 对位语法的支持。

Answer 1

Jungerl Erlang 源代码集合。 它有一个代码生成器，可以生成 Erlang 代码来管理基于 XDR 的协议。

Answer 2

构建您自己的 XDR 编码和解码库并不困难。

将 Erlang 术语编码为 XDR 很简单：

%% @spec push_bool(bool()) -> binary()

push_bool(Value) ->
    case Value of
        true ->
           <<0, 0, 0, 1>>;
        false ->
            <<0, 0, 0, 0>>
    end.

采用其他方式则有点冗长，具体取决于您希望如何完成错误报告。 我选择了例外：

%% @spec pull_bool(binary()) -> {bool(), binary()}

pull_bool(Bin) ->
    {Value, Tail} = 
        try
            <<0, 0, 0, V, T/binary>> = Bin,
            {V, T}
        catch 
            error:{badmatch, _} -> 
                throw({xdr_error, "Invalid boolean value"})
        end,
    Result = case Value of
                 0 -> false;
                 1 -> true;
                 _ -> throw({xdr_error, "Invalid boolean value"})
             end, 
    {Result, Tail}.

实际上总共没有那么多 XDR 数据类型，因此总共可能只有几百行代码。