<?php
 
include "php_serial.class.php";
 
$serial = new phpSerial();
// Linux serial device /dev/ttyS0 for COM1
$serial->deviceSet('/dev/ttyUSB0');
// 串口通信参数设置 9600-8-N-1 (no flow control)
// stty -F /dev/ttyUSB0 9600 -parenb cs8 -cstopb clocal -crtscts -ixon -ixoff
$serial->confBaudRate(9600); // 波特率
$serial->confParity('none'); // 奇偶校验 -parenb (符号-表示OFF关闭)
$serial->confCharacterLength(8); // 字符长度 cs8
$serial->confStopBits(1); // 停止位 -cstopb
$serial->confFlowControl('none'); // 流量控制 clocal -crtscts -ixon -ixoff
$serial->deviceOpen();
 
$code = '010340000002D1CB';
$send_hx = pack("H*", $code);
$serial->sendMessage($send_hx,0.2); // 发送指令
 
$read = $serial->readPort();
//    var_dump($read);
if ($read) {
    $hex = unpack("H*", $read);
    $str = $hex[1];
    echo $str . "\r\n";
} else {
 
}
 
 
$serial->deviceClose();
 
// 计算crc16 校验码
// $string 16进制 ( modbus rtu string )
//output -> 2bytes string 
 
function crc16($string, $length = 0) {
 
    $auchCRCHi = array(0x00, 0xC1, 0x81, 0x40, 0x01, 0xC0, 0x80, 0x41, 0x01, 0xC0, 0x80, 0x41, 0x00, 0xC1, 0x81,
        0x40, 0x01, 0xC0, 0x80, 0x41, 0x00, 0xC1, 0x81, 0x40, 0x00, 0xC1, 0x81, 0x40, 0x01, 0xC0,
        0x80, 0x41, 0x01, 0xC0, 0x80, 0x41, 0x00, 0xC1, 0x81, 0x40, 0x00, 0xC1, 0x81, 0x40, 0x01,
        0xC0, 0x80, 0x41, 0x00, 0xC1, 0x81, 0x40, 0x01, 0xC0, 0x80, 0x41, 0x01, 0xC0, 0x80, 0x41,
        0x00, 0xC1, 0x81, 0x40, 0x01, 0xC0, 0x80, 0x41, 0x00, 0xC1, 0x81, 0x40, 0x00, 0xC1, 0x81,
        0x40, 0x01, 0xC0, 0x80, 0x41, 0x00, 0xC1, 0x81, 0x40, 0x01, 0xC0, 0x80, 0x41, 0x01, 0xC0,
        0x80, 0x41, 0x00, 0xC1, 0x81, 0x40, 0x00, 0xC1, 0x81, 0x40, 0x01, 0xC0, 0x80, 0x41, 0x01,
        0xC0, 0x80, 0x41, 0x00, 0xC1, 0x81, 0x40, 0x01, 0xC0, 0x80, 0x41, 0x00, 0xC1, 0x81, 0x40,
        0x00, 0xC1, 0x81, 0x40, 0x01, 0xC0, 0x80, 0x41, 0x01, 0xC0, 0x80, 0x41, 0x00, 0xC1, 0x81,
        0x40, 0x00, 0xC1, 0x81, 0x40, 0x01, 0xC0, 0x80, 0x41, 0x00, 0xC1, 0x81, 0x40, 0x01, 0xC0,
        0x80, 0x41, 0x01, 0xC0, 0x80, 0x41, 0x00, 0xC1, 0x81, 0x40, 0x00, 0xC1, 0x81, 0x40, 0x01,
        0xC0, 0x80, 0x41, 0x01, 0xC0, 0x80, 0x41, 0x00, 0xC1, 0x81, 0x40, 0x01, 0xC0, 0x80, 0x41,
        0x00, 0xC1, 0x81, 0x40, 0x00, 0xC1, 0x81, 0x40, 0x01, 0xC0, 0x80, 0x41, 0x00, 0xC1, 0x81,
        0x40, 0x01, 0xC0, 0x80, 0x41, 0x01, 0xC0, 0x80, 0x41, 0x00, 0xC1, 0x81, 0x40, 0x01, 0xC0,
        0x80, 0x41, 0x00, 0xC1, 0x81, 0x40, 0x00, 0xC1, 0x81, 0x40, 0x01, 0xC0, 0x80, 0x41, 0x01,
        0xC0, 0x80, 0x41, 0x00, 0xC1, 0x81, 0x40, 0x00, 0xC1, 0x81, 0x40, 0x01, 0xC0, 0x80, 0x41,
        0x00, 0xC1, 0x81, 0x40, 0x01, 0xC0, 0x80, 0x41, 0x01, 0xC0, 0x80, 0x41, 0x00, 0xC1, 0x81,
        0x40);
    $auchCRCLo = array(0x00, 0xC0, 0xC1, 0x01, 0xC3, 0x03, 0x02, 0xC2, 0xC6, 0x06, 0x07, 0xC7, 0x05, 0xC5, 0xC4,
        0x04, 0xCC, 0x0C, 0x0D, 0xCD, 0x0F, 0xCF, 0xCE, 0x0E, 0x0A, 0xCA, 0xCB, 0x0B, 0xC9, 0x09,
        0x08, 0xC8, 0xD8, 0x18, 0x19, 0xD9, 0x1B, 0xDB, 0xDA, 0x1A, 0x1E, 0xDE, 0xDF, 0x1F, 0xDD,
        0x1D, 0x1C, 0xDC, 0x14, 0xD4, 0xD5, 0x15, 0xD7, 0x17, 0x16, 0xD6, 0xD2, 0x12, 0x13, 0xD3,
        0x11, 0xD1, 0xD0, 0x10, 0xF0, 0x30, 0x31, 0xF1, 0x33, 0xF3, 0xF2, 0x32, 0x36, 0xF6, 0xF7,
        0x37, 0xF5, 0x35, 0x34, 0xF4, 0x3C, 0xFC, 0xFD, 0x3D, 0xFF, 0x3F, 0x3E, 0xFE, 0xFA, 0x3A,
        0x3B, 0xFB, 0x39, 0xF9, 0xF8, 0x38, 0x28, 0xE8, 0xE9, 0x29, 0xEB, 0x2B, 0x2A, 0xEA, 0xEE,
        0x2E, 0x2F, 0xEF, 0x2D, 0xED, 0xEC, 0x2C, 0xE4, 0x24, 0x25, 0xE5, 0x27, 0xE7, 0xE6, 0x26,
        0x22, 0xE2, 0xE3, 0x23, 0xE1, 0x21, 0x20, 0xE0, 0xA0, 0x60, 0x61, 0xA1, 0x63, 0xA3, 0xA2,
        0x62, 0x66, 0xA6, 0xA7, 0x67, 0xA5, 0x65, 0x64, 0xA4, 0x6C, 0xAC, 0xAD, 0x6D, 0xAF, 0x6F,
        0x6E, 0xAE, 0xAA, 0x6A, 0x6B, 0xAB, 0x69, 0xA9, 0xA8, 0x68, 0x78, 0xB8, 0xB9, 0x79, 0xBB,
        0x7B, 0x7A, 0xBA, 0xBE, 0x7E, 0x7F, 0xBF, 0x7D, 0xBD, 0xBC, 0x7C, 0xB4, 0x74, 0x75, 0xB5,
        0x77, 0xB7, 0xB6, 0x76, 0x72, 0xB2, 0xB3, 0x73, 0xB1, 0x71, 0x70, 0xB0, 0x50, 0x90, 0x91,
        0x51, 0x93, 0x53, 0x52, 0x92, 0x96, 0x56, 0x57, 0x97, 0x55, 0x95, 0x94, 0x54, 0x9C, 0x5C,
        0x5D, 0x9D, 0x5F, 0x9F, 0x9E, 0x5E, 0x5A, 0x9A, 0x9B, 0x5B, 0x99, 0x59, 0x58, 0x98, 0x88,
        0x48, 0x49, 0x89, 0x4B, 0x8B, 0x8A, 0x4A, 0x4E, 0x8E, 0x8F, 0x4F, 0x8D, 0x4D, 0x4C, 0x8C,
        0x44, 0x84, 0x85, 0x45, 0x87, 0x47, 0x46, 0x86, 0x82, 0x42, 0x43, 0x83, 0x41, 0x81, 0x80,
        0x40);
    $length = ($length <= 0 ? strlen($string) : $length);
    $uchCRCHi = 0xFF;
    $uchCRCLo = 0xFF;
    $uIndex = 0;
    for ($i = 0; $i < $length; $i++) {
        $uIndex = $uchCRCLo ^ ord(substr($string, $i, 1));
        $uchCRCLo = $uchCRCHi ^ $auchCRCHi[$uIndex];
        $uchCRCHi = $auchCRCLo[$uIndex];
    }
    return(chr($uchCRCLo) . chr($uchCRCHi));
}
 
function trimall($str) {             //删除空格  
    $qian = array(" ", "　", "\t", "\n", "\r");
    $hou = array("", "", "", "", "");
    return str_replace($qian, $hou, $str);
}
 
function myhex2bin($h) {     // 16转换2
    $r = '';
    if (!is_string($h))
        return $r;
 
    for ($a = 0; $a < strlen($h); $a += 2) {
        $r .= chr(hexdec($h{$a} . $h{($a + 1)}));
    }
    return $r;
}
 
function hexToStr($hex) {//十六进制转字符串
    $unpack_code = unpack("H*", $hex);
    return $unpack_code[1];
}
 
?>

<?php
define ("SERIAL_DEVICE_NOTSET", 0);
define ("SERIAL_DEVICE_SET", 1);
define ("SERIAL_DEVICE_OPENED", 2);
 
/**
 * PHP 串口通信
 * 支持linux下 读写
 * Windows下 暂时只可写 
 */
class phpSerial
{
	var $_device = null;
	var $_windevice = null;
	var $_dHandle = null;
	var $_dState = SERIAL_DEVICE_NOTSET;
	var $_buffer = "";
	var $_os = "";
 
	/**
	 * 自动清空接收缓冲区 默认 true
	 *
	 * @var bool
	 */
	var $autoflush = true;
 
	/**
	 * 构造函数 执行操作系统和setserial一些检查
	 *
	 * @return phpSerial
	 */
	function phpSerial ()
	{
		setlocale(LC_ALL, "en_US");
 
		$sysname = php_uname();
 
		if (substr($sysname, 0, 5) === "Linux")
		{
			$this->_os = "linux";
 
			if($this->_exec("stty --version") === 0)
			{
				register_shutdown_function(array($this, "deviceClose"));
			}
			else
			{
				trigger_error("stty 无效，无法运行.", E_USER_ERROR);
			}
		}
		elseif(substr($sysname, 0, 7) === "Windows")
		{
			$this->_os = "windows";
			register_shutdown_function(array($this, "deviceClose"));
		}
		else
		{
			trigger_error("操作系统既不是Linux也不是Windows，无法运行.", E_USER_ERROR);
			exit();
		}
	}
 
	//
	// 打开/关闭设备 -- {START}
	//
 
	/**
	 * 设备设置功能：用于设置设备名称/地址
	 * -> linux : /dev/ttyS0
	 * -> windows : COMxx 
	 * @param string $device 串口名 
	 * @return bool
	 */
	function deviceSet ($device)
	{
		if ($this->_dState !== SERIAL_DEVICE_OPENED)
		{
			if ($this->_os === "linux")
			{
				if (preg_match("@^COM(\d+):?$@i", $device, $matches))
				{
					$device = "/dev/ttyS" . ($matches[1] - 1);
				}
 
				if ($this->_exec("stty -F " . $device) === 0)
				{
					$this->_device = $device;
					$this->_dState = SERIAL_DEVICE_SET;
					return true;
				}
			}
			elseif ($this->_os === "windows")
			{
				if (preg_match("@^COM(\d+):?$@i", $device, $matches) and $this->_exec(exec("mode " . $device)) === 0)
				{
					$this->_windevice = "COM" . $matches[1];
					$this->_device = "\\.\com" . $matches[1];
					$this->_dState = SERIAL_DEVICE_SET;
					return true;
				}
			}
 
			trigger_error("指定的串行端口无效", E_USER_WARNING);
			return false;
		}
		else
		{
			trigger_error("串口被占用", E_USER_WARNING);
			return false;
		}
	}
 
	/**
	 * 打开用于读取和/或写入的设备
	 *
	 * @param string 开启方式：与open()参数相同
	 * @return bool
	 */
	function deviceOpen ($mode = "r+b")
	{
		if ($this->_dState === SERIAL_DEVICE_OPENED)
		{
			trigger_error("设备已经打开", E_USER_NOTICE);
			return true;
		}
 
		if ($this->_dState === SERIAL_DEVICE_NOTSET)
		{
			trigger_error("必须在打开之前设置该设备", E_USER_WARNING);
			return false;
		}
 
		if (!preg_match("@^[raw]\+?b?$@", $mode))
		{
			trigger_error("无效的打开模式 : ".$mode.". Use fopen() modes.", E_USER_WARNING);
			return false;
		}
 
		$this->_dHandle = @fopen($this->_device, $mode);
 
		if ($this->_dHandle !== false)
		{
			stream_set_blocking($this->_dHandle, 0);
			$this->_dState = SERIAL_DEVICE_OPENED;
			return true;
		}
 
		$this->_dHandle = null;
		trigger_error("串口打开失败", E_USER_WARNING);
		return false;
	}
 
	/**
	 *串口关闭
	 *
	 * @return bool
	 */
	function deviceClose ()
	{
		if ($this->_dState !== SERIAL_DEVICE_OPENED)
		{
			return true;
		}
 
		if (fclose($this->_dHandle))
		{
			$this->_dHandle = null;
			$this->_dState = SERIAL_DEVICE_SET;
			return true;
		}
 
		trigger_error("串口关闭失败", E_USER_ERROR);
		return false;
	}
 
	//
	//打开/关闭设备 --{STOP}
	//
 
	//
	// 配置部分 -- {START}
	//
 
	/**
	 * 波特率设置
	 * 参考波特率 : 110, 150, 300, 600, 1200, 2400, 4800, 9600, 38400,
	 * 57600 and 115200.
	 *
	 * @param int $rate 设置端口的波特率
	 * @return bool
	 */
	function confBaudRate ($rate)
	{
		if ($this->_dState !== SERIAL_DEVICE_SET)
		{
			trigger_error("无法设置波特率：设备没有设置或打开", E_USER_WARNING);
			return false;
		}
 
		$validBauds = array (
			110    => 11,
			150    => 15,
			300    => 30,
			600    => 60,
			1200   => 12,
			2400   => 24,
			4800   => 48,
			9600   => 96,
			19200  => 19,
			38400  => 38400,
			57600  => 57600,
			115200 => 115200
		);
 
		if (isset($validBauds[$rate]))
		{
			if ($this->_os === "linux")
			{
				$ret = $this->_exec("stty -F " . $this->_device . " " . (int) $rate, $out);
 
			}
			elseif ($this->_os === "windows")
			{
				$ret = $this->_exec("mode " . $this->_windevice . " BAUD=" . $validBauds[$rate], $out);
			}
			else return false;
 
			if ($ret !== 0)
			{
				trigger_error ("无法设置波特率: " . $out[1], E_USER_WARNING);
				return false;
			}
		}
	}
 
	/**
	 * 配置校验位
	 * 模式 : odd, even, none
	 *
	 * @param string $parity 校验模式
	 * @return bool
	 */
	function confParity ($parity)
	{
		if ($this->_dState !== SERIAL_DEVICE_SET)
		{
			trigger_error("无法设置奇偶校验：设备没有设置或打开", E_USER_WARNING);
			return false;
		}
 
		$args = array(
			"none" => "-parenb",
			"odd"  => "parenb parodd",
			"even" => "parenb -parodd",
		);
 
		if (!isset($args[$parity]))
		{
			trigger_error("不支持奇偶模式", E_USER_WARNING);
			return false;
		}
 
		if ($this->_os === "linux")
		{
			$ret = $this->_exec("stty -F " . $this->_device . " " . $args[$parity], $out);
		}
		else
		{
			$ret = $this->_exec("mode " . $this->_windevice . " PARITY=" . $parity{0}, $out);
		}
 
		if ($ret === 0)
		{
			return true;
		}
 
		trigger_error("无法设置奇偶校验 : " . $out[1], E_USER_WARNING);
		return false;
	}
 
	/**
	 * 设置字符的长度
	 *
	 * @param int $int 字符长度（5 < =长度< = 8）
	 * @return bool
	 */
	function confCharacterLength ($int)
	{
		if ($this->_dState !== SERIAL_DEVICE_SET)
		{
			trigger_error("无法设置字符长度：设备没有设置或打开", E_USER_WARNING);
			return false;
		}
 
		$int = (int) $int;
		if ($int < 5) $int = 5;
		elseif ($int > 8) $int = 8;
 
		if ($this->_os === "linux")
		{
			$ret = $this->_exec("stty -F " . $this->_device . " cs" . $int, $out);
		}
		else
		{
			$ret = $this->_exec("mode " . $this->_windevice . " DATA=" . $int, $out);
		}
 
		if ($ret === 0)
		{
			return true;
		}
 
		trigger_error("无法设置字符长度 : " .$out[1], E_USER_WARNING);
		return false;
	}
 
	/**
	 * 设置停止位的长度
	 *
	 * @param float $length 
	 * 停止位的长度 它必须是1,1.5或2 Linux和某些计算机上不支持1.5。.
	 * @return bool
	 */
	function confStopBits ($length)
	{
		if ($this->_dState !== SERIAL_DEVICE_SET)
		{
			trigger_error("无法设置停止位的长度：设备没有设置或打开", E_USER_WARNING);
			return false;
		}
 
		if ($length != 1 and $length != 2 and $length != 1.5 and !($length == 1.5 and $this->_os === "linux"))
		{
			trigger_error("指定的停止位长度无效", E_USER_WARNING);
			return false;
		}
 
		if ($this->_os === "linux")
		{
			$ret = $this->_exec("stty -F " . $this->_device . " " . (($length == 1) ? "-" : "") . "cstopb", $out);
		}
		else
		{
			$ret = $this->_exec("mode " . $this->_windevice . " STOP=" . $length, $out);
		}
 
		if ($ret === 0)
		{
			return true;
		}
 
		trigger_error("无法设置停止位长度: " . $out[1], E_USER_WARNING);
		return false;
	}
 
	/**
	 * 配置流程控制
	 *
	 * @param string $mode 设置流程控制模式 可行的模式 :
	 * 	-> "none" : 无流量控制
	 * 	-> "rts/cts" : 使用RTS/CTS握手
	 * 	-> "xon/xoff" : 使用的XON / XOFF协议
	 * @return bool
	 */
	function confFlowControl ($mode)
	{
		if ($this->_dState !== SERIAL_DEVICE_SET)
		{
			trigger_error("无法设置流程控制模式：设备没有设置或打开", E_USER_WARNING);
			return false;
		}
 
		$linuxModes = array(
			"none"     => "clocal -crtscts -ixon -ixoff",
			"rts/cts"  => "-clocal crtscts -ixon -ixoff",
			"xon/xoff" => "-clocal -crtscts ixon ixoff"
		);
		$windowsModes = array(
			"none"     => "xon=off octs=off rts=on",
			"rts/cts"  => "xon=off octs=on rts=hs",
			"xon/xoff" => "xon=on octs=off rts=on",
		);
 
		if ($mode !== "none" and $mode !== "rts/cts" and $mode !== "xon/xoff") {
			trigger_error("指定的流控制模式无效", E_USER_ERROR);
			return false;
		}
 
		if ($this->_os === "linux")
			$ret = $this->_exec("stty -F " . $this->_device . " " . $linuxModes[$mode], $out);
		else
			$ret = $this->_exec("mode " . $this->_windevice . " " . $windowsModes[$mode], $out);
 
		if ($ret === 0) return true;
		else {
			trigger_error("无法设置流程控制 : " . $out[1], E_USER_ERROR);
			return false;
		}
	}
 
	/**
	 * 设置串口其他参数 只有在需要的时候才使用它
	 * 
	 * @param string $param 参数名称
	 * @param string $arg 参数值
	 * @return bool
	 */
	function setSetserialFlag ($param, $arg = "")
	{
		if (!$this->_ckOpened()) return false;
 
		$return = exec ("setserial " . $this->_device . " " . $param . " " . $arg . " 2>&1");
 
		if ($return{0} === "I")
		{
			trigger_error("设置：无效标志", E_USER_WARNING);
			return false;
		}
		elseif ($return{0} === "/")
		{
			trigger_error("设置：设备文件错误", E_USER_WARNING);
			return false;
		}
		else
		{
			return true;
		}
	}
 
	//
	// 配置部分 -- {STOP}
	//
 
	//
	// I/O 部分 -- {START}
	//
 
	/**
	 * 将字符串发送到设备
	 *
	 * @param string $str 要发送到设备的字符串
	 * @param float $waitForReply 等待答复的时间（以秒为单位）
	 */
	function sendMessage ($str, $waitForReply = 0.1)
	{
		$this->_buffer .= $str;
 
		if ($this->autoflush === true) $this->flush();
 
		usleep((int) ($waitForReply * 1000000));
	}
 
	/**
	 * 读取端口直到没有新的数据是可用的，然后返回内容
	 *
	 * @pararm int $count 要读取的字符数（将停止更少的字符在缓冲区）
	 * 	
	 * @return string
	 */
	function readPort ($count = 0)
	{
		if ($this->_dState !== SERIAL_DEVICE_OPENED)
		{
			trigger_error("必须打开设备才能读取它", E_USER_WARNING);
			return false;
		}
 
		if ($this->_os === "linux")
		{
			$content = ""; $i = 0;
 
			if ($count !== 0)
			{
				do {
					if ($i > $count) $content .= fread($this->_dHandle, ($count - $i));
					else $content .= fread($this->_dHandle, 128);
				} while (($i += 128) === strlen($content));
			}
			else
			{
				do {
					$content .= fread($this->_dHandle, 128);
				} while (($i += 128) === strlen($content));
			}
 
			return $content;
		}
		elseif ($this->_os === "windows")
		{
			/* */
		}
 
		trigger_error("Windows中暂时不支持读取串行端口", E_USER_WARNING);
		return false;
	}
 
	/**
	 * 刷新输出缓冲区
	 *
	 * @return bool
	 */
	function flush ()
	{
		if (!$this->_ckOpened()) return false;
 
		if (fwrite($this->_dHandle, $this->_buffer) !== false)
		{
			$this->_buffer = "";
			return true;
		}
		else
		{
			$this->_buffer = "";
			trigger_error("发送消息时出错", E_USER_WARNING);
			return false;
		}
	}
 
	//
	// I/O 部分 -- {STOP}
	//
 
	//
	// 内部工具包 -- {START}
	//
 
	function _ckOpened()
	{
		if ($this->_dState !== SERIAL_DEVICE_OPENED)
		{
			trigger_error("串口设备必须打开", E_USER_WARNING);
			return false;
		}
 
		return true;
	}
 
	function _ckClosed()
	{
		if ($this->_dState !== SERIAL_DEVICE_CLOSED)
		{
			trigger_error("串口设备必须关闭", E_USER_WARNING);
			return false;
		}
 
		return true;
	}
 
	function _exec($cmd, &$out = null)
	{
		$desc = array(
			1 => array("pipe", "w"),
			2 => array("pipe", "w")
		);
 
		$proc = proc_open($cmd, $desc, $pipes);
 
		$ret = stream_get_contents($pipes[1]);
		$err = stream_get_contents($pipes[2]);
 
		fclose($pipes[1]);
		fclose($pipes[2]);
 
		$retVal = proc_close($proc);
 
		if (func_num_args() == 2) $out = array($ret, $err);
		return $retVal;
	}
 
	//
	// 内部工具包 -- {STOP}
	//
}
?>