欢迎您访问程序员文章站本站旨在为大家提供分享程序员计算机编程知识!
您现在的位置是: 首页  >  后端开发

php 与 erlang 实现二进制通信

程序员文章站 2022-06-16 21:07:55
...
php 与 erlang 实现二进制通讯

网络通讯常用的有2种:文本通讯和二进制通讯。php与erlang之间文本通讯比较简单,这里不做讨论,主要讨论php与erlang实现二进制通讯。

通讯示例

erlang端代码:

-module(server).-export([start/0]).-define( UINT, 32/unsigned-little-integer).-define( INT, 32/signed-little-integer).-define( USHORT, 16/unsigned-little-integer).-define( SHORT, 16/signed-little-integer).-define( UBYTE, 8/unsigned-little-integer).-define( BYTE, 8/signed-little-integer).-define( PORT, 5678).%% 启动服务并接受客户端的连接start() ->  {ok, LSock} = gen_tcp:listen(?PORT, [binary, {packet, 0},{active, false}]),  io:format("socket listen: ~p on ~p ~n",[LSock, ?PORT]),  accept(LSock).accept(LSock) ->  {ok, ASock} = gen_tcp:accept(LSock),  spawn(fun() -> server_loop(ASock) end),  accept(LSock).server_loop(ASock) ->  case gen_tcp:recv(ASock, 0) of    {ok, > = A} ->      io:format("recv data: ~p ~p ~p~n", [Len, Cmd, Contain]),      %%将接收到数据发送回客户端      gen_tcp:send(ASock, A),      server_loop(ASock);    {ok, Data} ->      io:format("recv unformated data: ~p~n", [Data]),      server_loop(ASock);    {error, _} ->      {ok, recv_error}    end.

php端代码:

\n";} else {  stream_set_timeout($fp, $timeout);  //远程数据接收或发送超时时间  $format = "vva4";  $data = pack($format, 4, 10001, "abcd");  //$data 按照一定格式被打包成二进制数据  fwrite($fp, $data);  if (!feof($fp)) {    $rs = fread($fp, 1024);    //读取远程数据    if ($rs) {      $len = strlen($rs);      //$len 可以获取数据的长度,用以计算content的长度      //在这个例子中,content 的长度为 4      $format = "vlen/vcmd/a4content";      $data = unpack($format, $rs);      print_r($data);    } else {      echo "timeout!";    }  } else {    echo "timeout!";  }  fclose($fp);}?>

正常情况下php端会显示以下内容:

Array ( [len] => 4 [cmd] => 10001 [content] => abcd )

通讯说明

这里用到的是php的pack函数和unpack函数

pack函数:将数据按照一定格式打包成二进制数据,生成的数据接近C/C++的结构体(C/C++字符串带结束符)。

unpack函数:与pack相反,对二进制数据进行解包。

而erlang端,直接用位语法来匹配二进制数据即可


php 与 erlang 实现二进制通信

声明:本文内容由网友自发贡献,版权归原作者所有,本站不承担相应法律责任。如您发现有涉嫌抄袭侵权的内容,请联系admin@php.cn核实处理。

相关文章

相关视频