程序師世界是廣大編程愛好者互助、分享、學習的平台,程序師世界有你更精彩!
首頁
編程語言
C語言|JAVA編程
Python編程
網頁編程
ASP編程|PHP編程
JSP編程
數據庫知識
MYSQL數據庫|SqlServer數據庫
Oracle數據庫|DB2數據庫
 程式師世界 >> 編程語言 >> 網頁編程 >> PHP編程 >> PHP綜合 >> php實現與erlang的二進制通訊實例解析

php實現與erlang的二進制通訊實例解析

編輯:PHP綜合

一般來說網絡通訊常用的方式有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, <<Len:?USHORT,Cmd:?USHORT,Contain:4/binary-unit:8>> = 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端代碼:

<?php

$timeout = 3;
//超時時間:3秒

$fp = fsockopen("tcp://127.0.0.1", 5678, $errno, $errstr, $timeout/* 連接超時時間 */);
if (!$fp) {
 echo "$errstr ($errno)<br />\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端,則直接用位語法來匹配二進制數據即可。

  1. 上一頁:
  2. 下一頁:
Copyright © 程式師世界 All Rights Reserved