Flash 与 Erlang 服务器通信

Question

看来这是一个 erlang 问题。 我有这个代码来测试客户端发送数据，用 Actionscript 3 编写：

var socket:Socket=new Socket("localhost", 2345);
socket.addEventListener(Event.CONNECT, connected);

private function connected(event:Event):void {
    socket.writeInt(12); //packet length, should be correct? 4 bytes each?
    socket.writeInt(3);
    socket.writeInt(6);
    socket.writeInt(9);
    socket.flush();
}

然后我有这个小型服务器，用 Erlang 编写：

start_nano_server() ->
    {ok, Listen} = gen_tcp:listen(2345, [binary, {packet, 0},
                     {reuseaddr, true},
                     {active, true},
                    {packet_size, 128}]),
    {ok, Socket} = gen_tcp:accept(Listen),
    gen_tcp:close(Listen), 
    receive_data(Socket, []).

receive_data(Socket, SoFar) ->
    receive
    {tcp,Socket,Bin} ->   
        receive_data(Socket, [Bin|SoFar]);
    {tcp_closed,Socket} ->
        Bytes=list_to_binary(reverse(SoFar)),
        io:format("~p~n",[Bytes])
    end.

现在，无论我从客户端发送什么，我总是得到 [<<0 ,0,0,4,0,0,0,32>>] 作为响应。 我可以尝试直接向套接字写入字节而不是整数，我得到了同样的结果。 我可以写更多或更少的数据，但结果相同。 UTF 字符串结果相同。 即使指定“4”作为数据包标头长度，我也只会得到与 [<<0,0,0,32>>] 相同的一致结果。 我不明白我在这里做错了什么。

Answer 1

以下是我们连接到 Flash 套接字的工作 Erlang 服务器的摘录...

它基于 Klacke 的 chargen 服务器示例：
http://erlang.org/examples/klacke_examples/chargen.erl

-module(remoting_soc).

-export([accept/1]).

accept(Listen) ->

    {ok, Soc} = gen_tcp:accept(Listen),
    Pid = spawn(fun() -> loop(Soc) end),
    gen_tcp:controlling_process(Soc,Pid),
    %% Start Listening for another connection
    remoting_soc:accept(Listen).

loop(Socket)->

    receive

        {tcp, Socket,"register"++Rest} ->
            ...do stuff...
            loop(Socket);

    end.

Answer 2

在接收数据之前尝试不要关闭Listen。

Answer 3

怀疑它更有可能是 Flash 问题 - 您的 Erlang 服务器代码与 Java 套接字客户端完美配合。

Answer 4

如果有人想知道答案，我将回答我自己的问题。

使用数据包嗅探器，我能够发现 Flash 确实发送了错误的数据包。 虽然我不知道数据包数据的实际意义是什么，但我知道问题出在哪里。 我想这是因为我在同一台机器上打开了Flash套接字和Erlang套接字 - 通常这不会成为问题，但我相信由于Flash在侦听套接字和发送套接字之间没有任何区别，因此它以某种方式与 Erlang 程序上的打开套接字发生冲突。

当您在 Flash 套接字中指定 Socket(host, port) 时，您不仅可以在该套接字上发送数据，而且还可以接收数据，因此这似乎是问题的根源。

我测试了在我的笔记本电脑上运行 Flash 程序和在我的 PC 上运行服务器，效果很好。