,,

<?php
// --------------------------------------------------------------------------
// File name : RS232_Server.php
// Description : RS232演示上位機(jī)程序
// Requirement : PHP 5.1.4 (cli) (http://www.php.net)
//
// Copyright(C), HonestQiao, 2006, All Rights Reserved.
//
// Author: HonestQiao (honestqiao@hotmail.com/QQ:5601680)
//
// 程序簡介：
// 本程序與RS232_Client構(gòu)成一個(gè)完整的演示系統(tǒng)，展示了PHP在RS232串口通訊上的應(yīng)用。
// 程序之中實(shí)現(xiàn)了一個(gè)基礎(chǔ)但是完整的RS232通訊協(xié)議(HQB232)，通訊協(xié)議格式如下：
// 協(xié)議內(nèi)容：
//          C->S 01 //請(qǐng)求通訊
//          S->C 02 //響應(yīng)通訊
//          C->S LEN DATA //LEN表示數(shù)據(jù)(DATA)長度 DATA表示實(shí)際數(shù)據(jù)
//          C->S 03 //結(jié)束通訊
// 說明：S表示上位機(jī) C表示下位機(jī)
//    HQB232表示HonestQiao演示的基礎(chǔ)(Base)RS232通訊協(xié)議，包含了協(xié)議的
// 請(qǐng)求和響應(yīng)，數(shù)據(jù)幀的結(jié)構(gòu)。
//    演示過程為通訊的請(qǐng)求和響應(yīng)，文件的發(fā)送(數(shù)據(jù)幀)，通訊的結(jié)束
//    數(shù)據(jù)幀的結(jié)構(gòu)為當(dāng)前的當(dāng)前數(shù)據(jù)的長度，數(shù)據(jù)的HEX字符串(兩位補(bǔ)足)
//
//    歡迎探討PHP在RS232串口通訊上的應(yīng)用。
// --------------------------------------------------------------------------
set_time_limit(0);
exec('mode COM1: baud=9600 data=8 stop=1 parity=n xon=on');

$fd = dio_open('COM1:', O_RDWR);
if(!$fd)
{
die("Error when open COM1");
}

$ff = dio_stat($fd);print_r($ff);
echo "HQB232 SERVER is listenning on COM1\n";
/// read
$len = 2;
$t=0;while (($t++)<1000)
{
$data = dio_read($fd, $len);
if ($data) {
if($data==chr(0).chr(1)){
echo "S_RECV:01\n";
echo "S_SEND:02\n";
dio_write($fd,chr(0).chr(2));
break;
}
}
}

$handle = fopen("E:\\RS232\\TEST\\S_WAPMMonitor.exe", 'w');
/// read
$len = 2;
$t=0;while ($handle && ($t++)<1000)
{
$len = 2;
$data = dio_read($fd, $len);
if($data==chr(0).chr(3)){
echo "S_RECV:03\n";
break;
}
elseif ($data) {
$len = hexdec($data);
if($len>0)
{
$data = dio_read($fd, $len);
if($data){
fwrite($handle, str2hex($data));
echo "S_RECV 圖片點(diǎn)擊可在新窗口打開查看

$len) ".microtime()."\n";
}
}
}
}
fclose($handle);
dio_close($fd);

function str2hex($string)
{
$str = '';
for($i=0; $i<strlen($string); $i+=2){
$str .= chr(hexdec(substr($string,$i,2)));
}
return $str;
}
?>

<?php
// --------------------------------------------------------------------------
// File name : RS232_Client.php
// Description : RS232演示下位機(jī)程序
// Requirement : PHP 5.1.4 (cli) (http://www.php.net)
//
// Copyright(C), HonestQiao, 2006, All Rights Reserved.
//
// Author: HonestQiao (honestqiao@hotmail.com/QQ:5601680)
//
// 程序簡介：
// 本程序與RS232_Server構(gòu)成一個(gè)完整的演示系統(tǒng)，展示了PHP在RS232串口通訊上的應(yīng)用。
// 程序之中實(shí)現(xiàn)了一個(gè)基礎(chǔ)但是完整的RS232通訊協(xié)議(HQB232)，通訊協(xié)議格式如下：
// 協(xié)議內(nèi)容：
//          C->S 01 //請(qǐng)求通訊
//          S->C 02 //響應(yīng)通訊
//          C->S LEN DATA //LEN表示數(shù)據(jù)(DATA)長度 DATA表示實(shí)際數(shù)據(jù)
//          C->S 03 //結(jié)束通訊
// 說明：S表示上位機(jī) C表示下位機(jī)
//    HQB232表示HonestQiao演示的基礎(chǔ)(Base)RS232通訊協(xié)議，包含了協(xié)議的
// 請(qǐng)求和響應(yīng)，數(shù)據(jù)幀的結(jié)構(gòu)。
//    演示過程為通訊的請(qǐng)求和響應(yīng)，文件的發(fā)送(數(shù)據(jù)幀)，通訊的結(jié)束
//    數(shù)據(jù)幀的結(jié)構(gòu)為當(dāng)前的當(dāng)前數(shù)據(jù)的長度，數(shù)據(jù)的HEX字符串(兩位補(bǔ)足)
//
//    歡迎探討PHP在RS232串口通訊上的應(yīng)用。
// --------------------------------------------------------------------------
set_time_limit(0);
exec('mode COM2: baud=9600 data=8 stop=1 parity=n xon=on');

$fd = dio_open('COM2:', O_RDWR);
if(!$fd)
{
die("Error when open COM2");
}

$ff = dio_stat($fd);print_r($ff);
echo "HQB232 CLIENT is start on COM2\n";
dio_write($fd,chr(0).chr(1));echo "C_SEND:01\n";
$len = 2;
$t=0;while(($t++)<1000)
{
$data = dio_read($fd, $len);
if($data==chr(0).chr(2)){
echo "C_RECV:02\n";
break;
}
}
/*
$len = 2;
$t=0;while(($t++)<10)
{
$sdata = sprintf("%03d",$t) . "=" . microtime() . " (" . randomkeys(rand(0,35)) . ")";
$slen = strlen($sdata);
$stxlen = sprintf("%02d",$slen);
dio_write($fd,"$stxlen");
dio_write($fd,"$sdata");echo "C_SEND 圖片點(diǎn)擊可在新窗口打開查看

$stxlen)$sdata\n";
//sleep(1);
}
*/

$handle = fopen ("E:\\RS232\\TEST\\WAPMMonitor.exe", "rb");
$data = "";
while ($handle && !feof($handle)) {
  $sdata = fread($handle, 127);
  $sdata = hex2str($sdata);
  $slen = strlen($sdata);
  $stxlen = sprintf("%02X",$slen);
  dio_write($fd,"$stxlen");
  dio_write($fd,"$sdata");echo "C_SEND 圖片點(diǎn)擊可在新窗口打開查看

$slen) ".microtime()."\n";
  usleep(300);
}
fclose($handle);

dio_write($fd,chr(0).chr(3));echo "C_SEND:03\n";
dio_close($fd);

function randomkeys($length)
  {
$pattern = "1234567890abcdefghijklmnopqrstuvwxyz";
for($i=0;$i<$length;$i++)
{
   $key .= $pattern{rand(0,35)};
}
return $key;
}

function hex2str($hexstring)
{
$str = '';
for($i=0; $i<strlen($hexstring); $i++){
$str .= sprintf("%02X",ord(substr($hexstring,$i,1)));
}
return $str;
}
?>

引用：
1. 代碼之中的：請(qǐng)修改為你自己的實(shí)際測(cè)試文件

$handle = fopen ("E:\\RS232\\TEST\\WAPMMonitor.exe", "rb");

$handle = fopen("E:\\RS232\\TEST\\S_WAPMMonitor.exe", 'w');

2. 進(jìn)過測(cè)試，可以傳送文本文件、二進(jìn)制文件。

3. HQB232協(xié)議修改，原01、02、03指令，修改為chr(0).chr(1)、chr(0).chr(2)、chr(0).chr(3)來構(gòu)成

[ 本帖最後由 HonestQiao 於 2006-6-12 22:36 編輯 ]

--------------------------------------------------------------------------------
HonestQiao 回復(fù)於：2006-06-12 22:34:15

下位機(jī)：
引用：
F:\usr\local\php5>php -f e:\RS232\TEST\RS232_Client.php
Array
(
[device] => 3
[inode] => 0
[mode] => 8192
[nlink] => 1
[uid] => 0
[gid] => 0
[device_type] => 3
[size] => 0
[atime] => 0
[mtime] => 0
[ctime] => 0
)
HQB232 CLIENT is start on COM2
C_SEND:01
C_RECV:02
C_SEND 圖片點(diǎn)擊可在新窗口打開查看

254) 0.13996900 1150122704
C_SEND 圖片點(diǎn)擊可在新窗口打開查看

254) 0.15466700 1150122704
C_SEND 圖片點(diǎn)擊可在新窗口打開查看

254) 0.16974000 1150122704
C_SEND 圖片點(diǎn)擊可在新窗口打開查看

254) 0.18528900 1150122704
C_SEND 圖片點(diǎn)擊可在新窗口打開查看

254) 0.20090600 1150122704
C_SEND 圖片點(diǎn)擊可在新窗口打開查看

254) 0.21663400 1150122704
C_SEND 圖片點(diǎn)擊可在新窗口打開查看

254) 0.23250500 1150122704
C_SEND:(254) 0.24777600 1150122704
C_SEND:(254) 0.26817000 1150122704
......
C_SEND:(254) 0.40825900 1150122760
C_SEND:(254) 0.42385700 1150122760
C_SEND:(254) 0.44418500 1150122760
C_SEND:(254) 0.45507900 1150122760
C_SEND:(254) 0.47073100 1150122760
C_SEND:(224) 0.48722600 1150122760
C_SEND:03

F:\usr\local\php5>

上位機(jī)：
引用：
F:\usr\local\php5>php -f e:\RS232\TEST\RS232_Server.php
Array
(
[device] => 3
[inode] => 0
[mode] => 8192
[nlink] => 1
[uid] => 0
[gid] => 0
[device_type] => 3
[size] => 0
[atime] => 0
[mtime] => 0
[ctime] => 0
)
HQB232 SERVER is listenning on COM1
S_RECV:01
S_SEND:02
S_RECV:(254) 0.19748000 1150122704
S_RECV:(254) 0.19868100 1150122704
S_RECV:(254) 0.19938200 1150122704
S_RECV:(254) 0.20037200 1150122704
S_RECV:(254) 0.25953800 1150122704
S_RECV:(254) 0.26053400 1150122704
S_RECV:(254) 0.26154600 1150122704
S_RECV:(254) 0.26404100 1150122704
S_RECV:(254) 0.32071300 1150122704
......
S_RECV:(254) 0.45466900 1150122760
S_RECV:(254) 0.45513400 1150122760
S_RECV:(254) 0.51607300 1150122760
S_RECV:(254) 0.51748000 1150122760
S_RECV:(254) 0.51805800 1150122760
S_RECV:(224) 0.51856700 1150122760
S_RECV:03

F:\usr\local\php5>

主題：通訊]PHP在RS232串口通訊協(xié)議的應(yīng)用演示

通訊]PHP在RS232串口通訊協(xié)議的應(yīng)用演示

回復(fù)標(biāo)題：
上傳附件：

	簽名：不顯示顯示