<?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)成一個完整的演示系統(tǒng)，展示了PHP在RS232串口通訊上的應(yīng)用。
// 程序之中實現(xiàn)了一個基礎(chǔ)但是完整的RS232通訊協(xié)議(HQB232)，通訊協(xié)議格式如下：
// 協(xié)議內(nèi)容：
//             C->S 01 //請求通訊
//             S->C 02 //響應(yīng)通訊
//             C->S LEN DATA //LEN表示數(shù)據(jù)(DATA)長度 DATA表示實際數(shù)據(jù)
//             C->S 03 //結(jié)束通訊
// 說明：S表示上位機(jī) C表示下位機(jī)
//       HQB232表示HonestQiao演示的基礎(chǔ)(Base)RS232通訊協(xié)議，包含了協(xié)議的
//   請求和響應(yīng)，數(shù)據(jù)幀的結(jié)構(gòu)。
//       演示過程為通訊的請求和響應(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$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)成一個完整的演示系統(tǒng)，展示了PHP在RS232串口通訊上的應(yīng)用。
// 程序之中實現(xiàn)了一個基礎(chǔ)但是完整的RS232通訊協(xié)議(HQB232)，通訊協(xié)議格式如下：
// 協(xié)議內(nèi)容：
//             C->S 01 //請求通訊
//             S->C 02 //響應(yīng)通訊
//             C->S LEN DATA //LEN表示數(shù)據(jù)(DATA)長度 DATA表示實際數(shù)據(jù)
//             C->S 03 //結(jié)束通訊
// 說明：S表示上位機(jī) C表示下位機(jī)
//       HQB232表示HonestQiao演示的基礎(chǔ)(Base)RS232通訊協(xié)議，包含了協(xié)議的
//   請求和響應(yīng)，數(shù)據(jù)幀的結(jié)構(gòu)。
//       演示過程為通訊的請求和響應(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$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$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. 代碼之中的：    請修改為你自己的實際測試文件

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


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


2. 進(jìn)過測試，可以傳送文本文件、二進(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_SEND254) 0.13996900 1150122704
C_SEND254) 0.15466700 1150122704
C_SEND254) 0.16974000 1150122704
C_SEND254) 0.18528900 1150122704
C_SEND254) 0.20090600 1150122704
C_SEND254) 0.21663400 1150122704
C_SEND254) 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>