Compare commits
| Author | SHA1 | Date | |
|---|---|---|---|
|
|
fd2ae72b79 | ||
|
|
4256b6cef7 | ||
|
|
61e7a690eb | ||
|
|
7365700b72 | ||
|
|
cff8493205 | ||
|
|
e10bb250d8 | ||
|
|
c18696a718 | ||
|
|
dd5a892fb6 | ||
|
|
7d058ee526 | ||
|
|
0ac0018444 | ||
|
|
5300b2a867 | ||
|
|
c676c06e2e | ||
|
|
697daedba3 | ||
|
|
cd52263b8e | ||
|
|
a2bde03574 | ||
|
|
24d16bc1aa | ||
|
|
bb0cdd467a | ||
|
|
9ef8e72f3e | ||
|
|
ad507ed46c | ||
|
|
5bb5dfe654 | ||
|
|
83d9baa9f6 | ||
|
|
753bff38ec | ||
|
|
5f069276eb | ||
|
|
7f4c4f2af1 | ||
|
|
c5c65f8088 | ||
|
|
6c999a7450 | ||
|
|
82c6fcf1d1 | ||
|
|
94772fcd7c | ||
|
|
71f36c3063 | ||
|
|
89b18aea02 |
@@ -0,0 +1,5 @@
|
|||||||
|
/vendor
|
||||||
|
composer.lock
|
||||||
|
.idea/
|
||||||
|
|
||||||
|
*~
|
||||||
+29
-2
@@ -1,10 +1,33 @@
|
|||||||
|
+---------------------------------------------------------+
|
||||||
|
| ACKNOWLEDGEMENTS |
|
||||||
|
+---------------------------------------------------------+
|
||||||
|
|
||||||
|
This project is based on work by Jan Krákora, (c) 2004-2013.
|
||||||
|
The original license is reproduced below.
|
||||||
|
|
||||||
|
https://code.google.com/archive/p/phpmodbus/
|
||||||
|
|
||||||
|
Further improvements - John S. Long and other contributors
|
||||||
|
|
||||||
|
https://github.com/adduc/phpmodbus
|
||||||
|
|
||||||
|
Cleanup and namespaces - Ondřej Hruška, 2016
|
||||||
|
|
||||||
|
https://github.com/MightyPork/phpmodbus
|
||||||
|
|
||||||
|
|
||||||
|
+---------------------------------------------------------+
|
||||||
|
| ORIGINAL LICENSE |
|
||||||
|
+---------------------------------------------------------+
|
||||||
|
|
||||||
|
|
||||||
The Phpmodbus License, Version 1
|
The Phpmodbus License, Version 1
|
||||||
============================
|
============================
|
||||||
|
|
||||||
Copyright (c) 2004, 2008 Jan Krakora, Wago (http://www.wago.com)
|
Copyright (c) 2004, 2013 Jan Krakora
|
||||||
All rights reserved.
|
All rights reserved.
|
||||||
|
|
||||||
This license is a legal agreement between you and Jan Krakora, Wago (the "Author")
|
This license is a legal agreement between you and Jan Krakora (the "Author")
|
||||||
for the use of Phpmodbus (the "Software"). By obtaining, using and/or
|
for the use of Phpmodbus (the "Software"). By obtaining, using and/or
|
||||||
copying the Software, you agree that you have read, understood, and will
|
copying the Software, you agree that you have read, understood, and will
|
||||||
comply with the terms and conditions of this license.
|
comply with the terms and conditions of this license.
|
||||||
@@ -60,3 +83,7 @@ LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON
|
|||||||
ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT
|
ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT
|
||||||
(INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF THIS
|
(INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF THIS
|
||||||
SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
|
SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
|
End of file.
|
||||||
@@ -1,133 +0,0 @@
|
|||||||
<?php
|
|
||||||
/**
|
|
||||||
* Phpmodbus Copyright (c) 2004, 2010 Jan Krakora, WAGO Kontakttechnik GmbH & Co. KG (http://www.wago.com)
|
|
||||||
*
|
|
||||||
* This source file is subject to the "PhpModbus license" that is bundled
|
|
||||||
* with this package in the file license.txt.
|
|
||||||
*
|
|
||||||
* @author Jan Krakora
|
|
||||||
* @copyright Copyright (c) 2004, 2010 Jan Krakora, WAGO Kontakttechnik GmbH & Co. KG (http://www.wago.com)
|
|
||||||
* @license PhpModbus license
|
|
||||||
* @category Phpmodbus
|
|
||||||
* @package Phpmodbus
|
|
||||||
* @version $id$
|
|
||||||
*/
|
|
||||||
|
|
||||||
/**
|
|
||||||
* IecType
|
|
||||||
*
|
|
||||||
* The class includes set of IEC-1131 data type functions that converts a PHP
|
|
||||||
* data types to a IEC data type.
|
|
||||||
*
|
|
||||||
* @author Jan Krakora
|
|
||||||
* @copyright Copyright (c) 2004, 2010 Jan Krakora, WAGO Kontakttechnik GmbH & Co. KG (http://www.wago.com)
|
|
||||||
* @package Phpmodbus
|
|
||||||
*/
|
|
||||||
class IecType {
|
|
||||||
|
|
||||||
/**
|
|
||||||
* iecBYTE
|
|
||||||
*
|
|
||||||
* Converts a value to IEC-1131 BYTE data type
|
|
||||||
*
|
|
||||||
* @param value value from 0 to 255
|
|
||||||
* @return value IEC BYTE data type
|
|
||||||
*
|
|
||||||
*/
|
|
||||||
function iecBYTE($value) {
|
|
||||||
return chr($value & 0xFF);
|
|
||||||
}
|
|
||||||
|
|
||||||
/**
|
|
||||||
* iecINT
|
|
||||||
*
|
|
||||||
* Converts a value to IEC-1131 INT data type
|
|
||||||
*
|
|
||||||
* @param value value to be converted
|
|
||||||
* @return value IEC-1131 INT data type
|
|
||||||
*
|
|
||||||
*/
|
|
||||||
function iecINT($value) {
|
|
||||||
return self::iecBYTE(($value >> 8) & 0x00FF) .
|
|
||||||
self::iecBYTE(($value & 0x00FF));
|
|
||||||
}
|
|
||||||
|
|
||||||
/**
|
|
||||||
* iecDINT
|
|
||||||
*
|
|
||||||
* Converts a value to IEC-1131 DINT data type
|
|
||||||
*
|
|
||||||
* @param value value to be converted
|
|
||||||
* @param value endianness defines endian codding (little endian == 0, big endian == 1)
|
|
||||||
* @return value IEC-1131 INT data type
|
|
||||||
*
|
|
||||||
*/
|
|
||||||
function iecDINT($value, $endianness = 0) {
|
|
||||||
// result with right endianness
|
|
||||||
return self::endianness($value, $endianness);
|
|
||||||
}
|
|
||||||
|
|
||||||
/**
|
|
||||||
* iecREAL
|
|
||||||
*
|
|
||||||
* Converts a value to IEC-1131 REAL data type. The function uses function @use float2iecReal.
|
|
||||||
*
|
|
||||||
* @param value value to be converted
|
|
||||||
* @param value endianness defines endian codding (little endian == 0, big endian == 1)
|
|
||||||
* @return value IEC-1131 REAL data type
|
|
||||||
*/
|
|
||||||
function iecREAL($value, $endianness = 0) {
|
|
||||||
// iecREAL representation
|
|
||||||
$real = self::float2iecReal($value);
|
|
||||||
// result with right endianness
|
|
||||||
return self::endianness($real, $endianness);
|
|
||||||
}
|
|
||||||
|
|
||||||
/**
|
|
||||||
* float2iecReal
|
|
||||||
*
|
|
||||||
* This function converts float value to IEC-1131 REAL single precision form.
|
|
||||||
*
|
|
||||||
* For more see [{@link http://en.wikipedia.org/wiki/Single_precision Single precision on Wiki}] or
|
|
||||||
* [{@link http://de.php.net/manual/en/function.base-convert.php PHP base_convert function commentary}, Todd Stokes @ Georgia Tech 21-Nov-2007] or
|
|
||||||
* [{@link http://www.php.net/manual/en/function.pack.php PHP pack/unpack functionality}]
|
|
||||||
*
|
|
||||||
* @param float value to be converted
|
|
||||||
* @return value IEC REAL data type
|
|
||||||
*/
|
|
||||||
private function float2iecReal($value) {
|
|
||||||
// get float binary string
|
|
||||||
$float = pack("f", $value);
|
|
||||||
// set 32-bit unsigned integer of the float
|
|
||||||
$w = unpack("L", $float);
|
|
||||||
return $w[1];
|
|
||||||
}
|
|
||||||
|
|
||||||
/**
|
|
||||||
* endianness
|
|
||||||
*
|
|
||||||
* Make endianess as required.
|
|
||||||
* For more see http://en.wikipedia.org/wiki/Endianness
|
|
||||||
*
|
|
||||||
* @param int $value
|
|
||||||
* @param bool $endianness
|
|
||||||
* @return int
|
|
||||||
*/
|
|
||||||
private function endianness($value, $endianness = 0) {
|
|
||||||
if ($endianness == 0)
|
|
||||||
return
|
|
||||||
self::iecBYTE(($value >> 8) & 0x000000FF) .
|
|
||||||
self::iecBYTE(($value & 0x000000FF)) .
|
|
||||||
self::iecBYTE(($value >> 24) & 0x000000FF) .
|
|
||||||
self::iecBYTE(($value >> 16) & 0x000000FF);
|
|
||||||
else
|
|
||||||
return
|
|
||||||
self::iecBYTE(($value >> 24) & 0x000000FF) .
|
|
||||||
self::iecBYTE(($value >> 16) & 0x000000FF) .
|
|
||||||
self::iecBYTE(($value >> 8) & 0x000000FF) .
|
|
||||||
self::iecBYTE(($value & 0x000000FF));
|
|
||||||
}
|
|
||||||
|
|
||||||
}
|
|
||||||
|
|
||||||
?>
|
|
||||||
@@ -1,543 +0,0 @@
|
|||||||
<?php
|
|
||||||
/**
|
|
||||||
* Phpmodbus Copyright (c) 2004, 2010 Jan Krakora, WAGO Kontakttechnik GmbH & Co. KG (http://www.wago.com)
|
|
||||||
*
|
|
||||||
* This source file is subject to the "PhpModbus license" that is bundled
|
|
||||||
* with this package in the file license.txt.
|
|
||||||
*
|
|
||||||
*
|
|
||||||
* @copyright Copyright (c) 2004, 2010 Jan Krakora, WAGO Kontakttechnik GmbH & Co. KG (http://www.wago.com)
|
|
||||||
* @license PhpModbus license
|
|
||||||
* @category Phpmodbus
|
|
||||||
* @tutorial Phpmodbus.pkg
|
|
||||||
* @package Phpmodbus
|
|
||||||
* @version $id$
|
|
||||||
*
|
|
||||||
*/
|
|
||||||
|
|
||||||
require_once dirname(__FILE__) . '/IecType.php';
|
|
||||||
require_once dirname(__FILE__) . '/PhpType.php';
|
|
||||||
|
|
||||||
/**
|
|
||||||
* ModbusMasterUdp
|
|
||||||
*
|
|
||||||
* This class deals with the MODBUS master using UDP stack.
|
|
||||||
*
|
|
||||||
* Implemented MODBUS functions:
|
|
||||||
* - FC 3: read multiple registers
|
|
||||||
* - FC 16: write multiple registers
|
|
||||||
* - FC 23: read write registers
|
|
||||||
*
|
|
||||||
* @author Jan Krakora
|
|
||||||
* @copyright Copyright (c) 2004, 2010 Jan Krakora, WAGO Kontakttechnik GmbH & Co. KG (http://www.wago.com)
|
|
||||||
* @package Phpmodbus
|
|
||||||
*
|
|
||||||
*/
|
|
||||||
class ModbusMasterUdp {
|
|
||||||
var $sock;
|
|
||||||
var $port = "502";
|
|
||||||
var $host = "192.168.1.1";
|
|
||||||
var $status;
|
|
||||||
var $timeout_sec = 5; // 5 sec
|
|
||||||
var $endianess = 0; // defines endian codding (little endian == 0, big endian == 1)
|
|
||||||
|
|
||||||
/**
|
|
||||||
* Modbus
|
|
||||||
*
|
|
||||||
* This is the constructor that defines {@link $host} IP address of the object.
|
|
||||||
*
|
|
||||||
* @param String $host An IP address of a Modbus TCP device. E.g. "192.168.1.1".
|
|
||||||
*/
|
|
||||||
function ModbusMasterUdp($host){
|
|
||||||
$this->host = $host;
|
|
||||||
}
|
|
||||||
|
|
||||||
/**
|
|
||||||
* __toString
|
|
||||||
*
|
|
||||||
* Magic method
|
|
||||||
*/
|
|
||||||
function __toString() {
|
|
||||||
return "<pre>" . $this->status . "</pre>";
|
|
||||||
}
|
|
||||||
|
|
||||||
/**
|
|
||||||
* connect
|
|
||||||
*
|
|
||||||
* Connect the socket
|
|
||||||
*
|
|
||||||
* @return bool
|
|
||||||
*/
|
|
||||||
private function connect(){
|
|
||||||
// UDP socket
|
|
||||||
$this->sock = socket_create(AF_INET, SOCK_DGRAM, SOL_UDP);
|
|
||||||
// connect
|
|
||||||
$result = @socket_connect($this->sock, $this->host, $this->port);
|
|
||||||
if ($result === false) {
|
|
||||||
throw new Exception("socket_connect() failed.</br>Reason: ($result)".
|
|
||||||
socket_strerror(socket_last_error($this->sock)));
|
|
||||||
} else {
|
|
||||||
$this->status .= "Connected\n";
|
|
||||||
return true;
|
|
||||||
}
|
|
||||||
}
|
|
||||||
|
|
||||||
/**
|
|
||||||
* disconnect
|
|
||||||
*
|
|
||||||
* Disconnect the socket
|
|
||||||
*/
|
|
||||||
private function disconnect(){
|
|
||||||
socket_close($this->sock);
|
|
||||||
$this->status .= "Disconnected\n";
|
|
||||||
}
|
|
||||||
|
|
||||||
/**
|
|
||||||
* send
|
|
||||||
*
|
|
||||||
* Send the packet via Modbus
|
|
||||||
*
|
|
||||||
* @param string $packet
|
|
||||||
*/
|
|
||||||
private function send($packet){
|
|
||||||
socket_write($this->sock, $packet, strlen($packet));
|
|
||||||
$this->status .= "Send\n";
|
|
||||||
}
|
|
||||||
|
|
||||||
/**
|
|
||||||
* rec
|
|
||||||
*
|
|
||||||
* Receive data from the socket
|
|
||||||
*
|
|
||||||
* @return bool
|
|
||||||
*/
|
|
||||||
private function rec(){
|
|
||||||
socket_set_nonblock($this->sock);
|
|
||||||
$readsocks[] = $this->sock;
|
|
||||||
$writesocks = NULL;
|
|
||||||
$exceptsocks = NULL;
|
|
||||||
$rec = "";
|
|
||||||
$lastAccess = time();
|
|
||||||
while (socket_select($readsocks,
|
|
||||||
$writesocks,
|
|
||||||
$exceptsocks,
|
|
||||||
0,
|
|
||||||
300000) !== FALSE) {
|
|
||||||
$this->status .= "Wait data ... \n";
|
|
||||||
if (in_array($this->sock, $readsocks)) {
|
|
||||||
while (@socket_recv($this->sock, $rec, 2000, 0)) {
|
|
||||||
$this->status .= "Data received\n";
|
|
||||||
return $rec;
|
|
||||||
}
|
|
||||||
$lastAccess = time();
|
|
||||||
} else {
|
|
||||||
if (time()-$lastAccess >= $this->timeout_sec) {
|
|
||||||
throw new Exception( "Watchdog time expired [ " .
|
|
||||||
$this->timeout_sec . " sec]!!! Connection to " .
|
|
||||||
$this->host . " is not established.");
|
|
||||||
}
|
|
||||||
}
|
|
||||||
$readsocks[] = $this->sock;
|
|
||||||
}
|
|
||||||
}
|
|
||||||
|
|
||||||
/**
|
|
||||||
* responseCode
|
|
||||||
*
|
|
||||||
* Check the Modbus response code
|
|
||||||
*
|
|
||||||
* @param string $packet
|
|
||||||
* @return bool
|
|
||||||
*/
|
|
||||||
private function responseCode($packet){
|
|
||||||
if(($packet[7] & 0x80) > 0) {
|
|
||||||
throw new Exception("Modbus response error code:" . ord($packet[8]));
|
|
||||||
} else {
|
|
||||||
$this->status .= "Modbus response error code: NOERROR\n";
|
|
||||||
return true;
|
|
||||||
}
|
|
||||||
}
|
|
||||||
|
|
||||||
/**
|
|
||||||
* readMultipleRegisters
|
|
||||||
*
|
|
||||||
* Modbus function FC 3(0x03) - Read Multiple Registers.
|
|
||||||
*
|
|
||||||
* This function reads {@link $quantity} of Words (2 bytes) from reference
|
|
||||||
* {@link $referenceRead} of a memory of a Modbus device given by
|
|
||||||
* {@link $unitId}.
|
|
||||||
*
|
|
||||||
*
|
|
||||||
* @param int $unitId usually ID of Modbus device
|
|
||||||
* @param int $reference Reference in the device memory to read data (e.g. in device WAGO 750-841, memory MW0 starts at address 12288).
|
|
||||||
* @param int $quantity Amounth of the data to be read from device.
|
|
||||||
* @return false|Array Success flag or array of received data.
|
|
||||||
*/
|
|
||||||
function readMultipleRegisters($unitId, $reference, $quantity){
|
|
||||||
$this->status .= "readMultipleRegisters: START\n";
|
|
||||||
// connect
|
|
||||||
$this->connect();
|
|
||||||
// send FC 3
|
|
||||||
$packet = $this->readMultipleRegistersPacketBuilder($unitId, $reference, $quantity);
|
|
||||||
$this->status .= $this->printPacket($packet);
|
|
||||||
$this->send($packet);
|
|
||||||
// receive response
|
|
||||||
$rpacket = $this->rec();
|
|
||||||
$this->status .= $this->printPacket($rpacket);
|
|
||||||
// parse packet
|
|
||||||
$receivedData = $this->readMultipleRegistersParser($rpacket);
|
|
||||||
// disconnect
|
|
||||||
$this->disconnect();
|
|
||||||
$this->status .= "readMultipleRegisters: DONE\n";
|
|
||||||
// return
|
|
||||||
return $receivedData;
|
|
||||||
}
|
|
||||||
|
|
||||||
/**
|
|
||||||
* fc3
|
|
||||||
*
|
|
||||||
* Alias to {@link readMultipleRegisters} method.
|
|
||||||
*
|
|
||||||
* @param int $unitId
|
|
||||||
* @param int $reference
|
|
||||||
* @param int $quantity
|
|
||||||
* @return false|Array
|
|
||||||
*/
|
|
||||||
function fc3($unitId, $reference, $quantity){
|
|
||||||
return $this->readMultipleRegisters($unitId, $reference, $quantity);
|
|
||||||
}
|
|
||||||
|
|
||||||
/**
|
|
||||||
* readMultipleRegistersPacketBuilder
|
|
||||||
*
|
|
||||||
* Packet FC 3 builder - read multiple registers
|
|
||||||
*
|
|
||||||
* @param int $unitId
|
|
||||||
* @param int $reference
|
|
||||||
* @param int $quantity
|
|
||||||
* @return string
|
|
||||||
*/
|
|
||||||
private function readMultipleRegistersPacketBuilder($unitId, $reference, $quantity){
|
|
||||||
$dataLen = 0;
|
|
||||||
// build data section
|
|
||||||
$buffer1 = "";
|
|
||||||
// build body
|
|
||||||
$buffer2 = "";
|
|
||||||
$buffer2 .= iecType::iecBYTE(3); // FC 3 = 3(0x03)
|
|
||||||
// build body - read section
|
|
||||||
$buffer2 .= iecType::iecINT($reference); // refnumber = 12288
|
|
||||||
$buffer2 .= iecType::iecINT($quantity); // quantity
|
|
||||||
$dataLen += 5;
|
|
||||||
// build header
|
|
||||||
$buffer3 = '';
|
|
||||||
$buffer3 .= iecType::iecINT(rand(0,65000)); // transaction ID
|
|
||||||
$buffer3 .= iecType::iecINT(0); // protocol ID
|
|
||||||
$buffer3 .= iecType::iecINT($dataLen + 1); // lenght
|
|
||||||
$buffer3 .= iecType::iecBYTE($unitId); //unit ID
|
|
||||||
// return packet string
|
|
||||||
return $buffer3. $buffer2. $buffer1;
|
|
||||||
}
|
|
||||||
|
|
||||||
/**
|
|
||||||
* readMultipleRegistersParser
|
|
||||||
*
|
|
||||||
* FC 3 response parser
|
|
||||||
*
|
|
||||||
* @param string $packet
|
|
||||||
* @return array
|
|
||||||
*/
|
|
||||||
private function readMultipleRegistersParser($packet){
|
|
||||||
$data = array();
|
|
||||||
// check Response code
|
|
||||||
$this->responseCode($packet);
|
|
||||||
// get data
|
|
||||||
for($i=0;$i<ord($packet[8]);$i++){
|
|
||||||
$data[$i] = ord($packet[9+$i]);
|
|
||||||
}
|
|
||||||
return $data;
|
|
||||||
}
|
|
||||||
|
|
||||||
/**
|
|
||||||
* writeMultipleRegister
|
|
||||||
*
|
|
||||||
* Modbus function FC16(0x10) - Write Multiple Register.
|
|
||||||
*
|
|
||||||
* This function writes {@link $data} array at {@link $reference} position of
|
|
||||||
* memory of a Modbus device given by {@link $unitId}.
|
|
||||||
*
|
|
||||||
*
|
|
||||||
* @param int $unitId usually ID of Modbus device
|
|
||||||
* @param int $reference Reference in the device memory (e.g. in device WAGO 750-841, memory MW0 starts at address 12288)
|
|
||||||
* @param array $data Array of values to be written.
|
|
||||||
* @param array $dataTypes Array of types of values to be written. The array should consists of string "INT", "DINT" and "REAL".
|
|
||||||
* @return bool Success flag
|
|
||||||
*/
|
|
||||||
function writeMultipleRegister($unitId, $reference, $data, $dataTypes){
|
|
||||||
$this->status .= "writeMultipleRegister: START\n";
|
|
||||||
// connect
|
|
||||||
$this->connect();
|
|
||||||
// send FC16
|
|
||||||
$packet = $this->writeMultipleRegisterPacketBuilder($unitId, $reference, $data, $dataTypes);
|
|
||||||
$this->status .= $this->printPacket($packet);
|
|
||||||
$this->send($packet);
|
|
||||||
// receive response
|
|
||||||
$rpacket = $this->rec();
|
|
||||||
$this->status .= $this->printPacket($rpacket);
|
|
||||||
// parse packet
|
|
||||||
$this->writeMultipleRegisterParser($rpacket);
|
|
||||||
// disconnect
|
|
||||||
$this->disconnect();
|
|
||||||
$this->status .= "writeMultipleRegister: DONE\n";
|
|
||||||
return true;
|
|
||||||
}
|
|
||||||
|
|
||||||
|
|
||||||
/**
|
|
||||||
* fc16
|
|
||||||
*
|
|
||||||
* Alias to {@link writeMultipleRegister} method
|
|
||||||
*
|
|
||||||
* @param int $unitId
|
|
||||||
* @param int $reference
|
|
||||||
* @param array $data
|
|
||||||
* @param array $dataTypes
|
|
||||||
* @return bool
|
|
||||||
*/
|
|
||||||
function fc16($unitId, $reference, $data, $dataTypes){
|
|
||||||
return $this->writeMultipleRegister($unitId, $reference, $data, $dataTypes);
|
|
||||||
}
|
|
||||||
|
|
||||||
|
|
||||||
/**
|
|
||||||
* writeMultipleRegisterPacketBuilder
|
|
||||||
*
|
|
||||||
* Packet builder FC16 - WRITE multiple register
|
|
||||||
* e.g.: 4dd90000000d0010300000030603e807d00bb8
|
|
||||||
*
|
|
||||||
* @param int $unitId
|
|
||||||
* @param int $reference
|
|
||||||
* @param array $data
|
|
||||||
* @param array $dataTypes
|
|
||||||
* @return string
|
|
||||||
*/
|
|
||||||
private function writeMultipleRegisterPacketBuilder($unitId, $reference, $data, $dataTypes){
|
|
||||||
$dataLen = 0;
|
|
||||||
// build data section
|
|
||||||
$buffer1 = "";
|
|
||||||
foreach($data as $key=>$dataitem) {
|
|
||||||
if($dataTypes[$key]=="INT"){
|
|
||||||
$buffer1 .= iecType::iecINT($dataitem); // register values x
|
|
||||||
$dataLen += 2;
|
|
||||||
}
|
|
||||||
elseif($dataTypes[$key]=="DINT"){
|
|
||||||
$buffer1 .= iecType::iecDINT($dataitem, $endianess); // register values x
|
|
||||||
$dataLen += 4;
|
|
||||||
}
|
|
||||||
elseif($dataTypes[$key]=="REAL") {
|
|
||||||
$buffer1 .= iecType::iecREAL($dataitem, $endianess); // register values x
|
|
||||||
$dataLen += 4;
|
|
||||||
}
|
|
||||||
else{
|
|
||||||
$buffer1 .= iecType::iecINT($dataitem); // register values x
|
|
||||||
$dataLen += 2;
|
|
||||||
}
|
|
||||||
}
|
|
||||||
// build body
|
|
||||||
$buffer2 = "";
|
|
||||||
$buffer2 .= iecType::iecBYTE(16); // FC 16 = 16(0x10)
|
|
||||||
$buffer2 .= iecType::iecINT($reference); // refnumber = 12288
|
|
||||||
$buffer2 .= iecType::iecINT($dataLen/2); // word count
|
|
||||||
$buffer2 .= iecType::iecBYTE($dataLen); // byte count
|
|
||||||
$dataLen += 6;
|
|
||||||
// build header
|
|
||||||
$buffer3 = '';
|
|
||||||
$buffer3 .= iecType::iecINT(rand(0,65000)); // transaction ID
|
|
||||||
$buffer3 .= iecType::iecINT(0); // protocol ID
|
|
||||||
$buffer3 .= iecType::iecINT($dataLen + 1); // lenght
|
|
||||||
$buffer3 .= iecType::iecBYTE($unitId); //unit ID
|
|
||||||
|
|
||||||
// return packet string
|
|
||||||
return $buffer3. $buffer2. $buffer1;
|
|
||||||
}
|
|
||||||
|
|
||||||
/**
|
|
||||||
* writeMultipleRegisterParser
|
|
||||||
*
|
|
||||||
* FC16 response parser
|
|
||||||
*
|
|
||||||
* @param string $packet
|
|
||||||
* @return bool
|
|
||||||
*/
|
|
||||||
private function writeMultipleRegisterParser($packet){
|
|
||||||
$this->responseCode($rpacket);
|
|
||||||
return true;
|
|
||||||
}
|
|
||||||
|
|
||||||
/**
|
|
||||||
* readWriteRegisters
|
|
||||||
*
|
|
||||||
* Modbus function FC23(0x17) - Read Write Registers.
|
|
||||||
*
|
|
||||||
* This function writes {@link $data} array at reference {@link $referenceWrite}
|
|
||||||
* position of memory of a Modbus device given by {@link $unitId}. Simultanously,
|
|
||||||
* it returns {@link $quantity} of Words (2 bytes) from reference {@link $referenceRead}.
|
|
||||||
*
|
|
||||||
*
|
|
||||||
* @param int $unitId usually ID of Modbus device
|
|
||||||
* @param int $referenceRead Reference in the device memory to read data (e.g. in device WAGO 750-841, memory MW0 starts at address 12288).
|
|
||||||
* @param int $quantity Amounth of the data to be read from device.
|
|
||||||
* @param int $referenceWrite Reference in the device memory to write data.
|
|
||||||
* @param array $data Array of values to be written.
|
|
||||||
* @param array $dataTypes Array of types of values to be written. The array should consists of string "INT", "DINT" and "REAL".
|
|
||||||
* @return false|Array Success flag or array of data.
|
|
||||||
*/
|
|
||||||
function readWriteRegisters($unitId, $referenceRead, $quantity, $referenceWrite, $data, $dataTypes){
|
|
||||||
$this->status .= "readWriteRegisters: START\n";
|
|
||||||
// connect
|
|
||||||
$this->connect();
|
|
||||||
// send FC23
|
|
||||||
$packet = $this->readWriteRegistersPacketBuilder($unitId, $referenceRead, $quantity, $referenceWrite, $data, $dataTypes);
|
|
||||||
$this->status .= $this->printPacket($packet);
|
|
||||||
$this->send($packet);
|
|
||||||
// receive response
|
|
||||||
$rpacket = $this->rec();
|
|
||||||
$this->status .= $this->printPacket($rpacket);
|
|
||||||
// parse packet
|
|
||||||
$receivedData = $this->readWriteRegistersParser($rpacket);
|
|
||||||
// disconnect
|
|
||||||
$this->disconnect();
|
|
||||||
$this->status .= "writeMultipleRegister: DONE\n";
|
|
||||||
// return
|
|
||||||
return $receivedData;
|
|
||||||
}
|
|
||||||
|
|
||||||
/**
|
|
||||||
* fc23
|
|
||||||
*
|
|
||||||
* Alias to {@link readWriteRegisters} method.
|
|
||||||
*
|
|
||||||
* @param int $unitId
|
|
||||||
* @param int $referenceRead
|
|
||||||
* @param int $quantity
|
|
||||||
* @param int $referenceWrite
|
|
||||||
* @param array $data
|
|
||||||
* @param array $dataTypes
|
|
||||||
* @return false|Array
|
|
||||||
*/
|
|
||||||
function fc23($unitId, $referenceRead, $quantity, $referenceWrite, $data, $dataTypes){
|
|
||||||
return $this->readWriteRegisters($unitId, $referenceRead, $quantity, $referenceWrite, $data, $dataTypes);
|
|
||||||
}
|
|
||||||
|
|
||||||
/**
|
|
||||||
* readWriteRegistersPacketBuilder
|
|
||||||
*
|
|
||||||
* Packet FC23 builder - READ WRITE registers
|
|
||||||
*
|
|
||||||
*
|
|
||||||
* @param int $unitId
|
|
||||||
* @param int $referenceRead
|
|
||||||
* @param int $quantity
|
|
||||||
* @param int $referenceWrite
|
|
||||||
* @param array $data
|
|
||||||
* @param array $dataTypes
|
|
||||||
* @return string
|
|
||||||
*/
|
|
||||||
private function readWriteRegistersPacketBuilder($unitId, $referenceRead, $quantity, $referenceWrite, $data, $dataTypes){
|
|
||||||
$dataLen = 0;
|
|
||||||
// build data section
|
|
||||||
$buffer1 = "";
|
|
||||||
foreach($data as $key => $dataitem) {
|
|
||||||
if($dataTypes[$key]=="INT"){
|
|
||||||
$buffer1 .= iecType::iecINT($dataitem); // register values x
|
|
||||||
$dataLen += 2;
|
|
||||||
}
|
|
||||||
elseif($dataTypes[$key]=="DINT"){
|
|
||||||
$buffer1 .= iecType::iecDINT($dataitem, $endianess); // register values x
|
|
||||||
$dataLen += 4;
|
|
||||||
}
|
|
||||||
elseif($dataTypes[$key]=="REAL") {
|
|
||||||
$buffer1 .= iecType::iecREAL($dataitem, $endianess); // register values x
|
|
||||||
$dataLen += 4;
|
|
||||||
}
|
|
||||||
else{
|
|
||||||
$buffer1 .= iecType::iecINT($dataitem); // register values x
|
|
||||||
$dataLen += 2;
|
|
||||||
}
|
|
||||||
}
|
|
||||||
// build body
|
|
||||||
$buffer2 = "";
|
|
||||||
$buffer2 .= iecType::iecBYTE(23); // FC 23 = 23(0x17)
|
|
||||||
// build body - read section
|
|
||||||
$buffer2 .= iecType::iecINT($referenceRead); // refnumber = 12288
|
|
||||||
$buffer2 .= iecType::iecINT($quantity); // quantity
|
|
||||||
// build body - write section
|
|
||||||
$buffer2 .= iecType::iecINT($referenceWrite); // refnumber = 12288
|
|
||||||
$buffer2 .= iecType::iecINT($dataLen/2); // word count
|
|
||||||
$buffer2 .= iecType::iecBYTE($dataLen); // byte count
|
|
||||||
$dataLen += 10;
|
|
||||||
// build header
|
|
||||||
$buffer3 = '';
|
|
||||||
$buffer3 .= iecType::iecINT(rand(0,65000)); // transaction ID
|
|
||||||
$buffer3 .= iecType::iecINT(0); // protocol ID
|
|
||||||
$buffer3 .= iecType::iecINT($dataLen + 1); // lenght
|
|
||||||
$buffer3 .= iecType::iecBYTE($unitId); //unit ID
|
|
||||||
|
|
||||||
// return packet string
|
|
||||||
return $buffer3. $buffer2. $buffer1;
|
|
||||||
}
|
|
||||||
|
|
||||||
|
|
||||||
/**
|
|
||||||
* readWriteRegistersParser
|
|
||||||
*
|
|
||||||
* FC23 response parser
|
|
||||||
*
|
|
||||||
* @param string $packet
|
|
||||||
* @return array
|
|
||||||
*/
|
|
||||||
private function readWriteRegistersParser($packet){
|
|
||||||
$data = array();
|
|
||||||
// if not exception
|
|
||||||
if(!$this->responseCode($packet))
|
|
||||||
return false;
|
|
||||||
// get data
|
|
||||||
for($i=0;$i<ord($packet[8]);$i++){
|
|
||||||
$data[$i] = ord($packet[9+$i]);
|
|
||||||
}
|
|
||||||
return $data;
|
|
||||||
}
|
|
||||||
|
|
||||||
/**
|
|
||||||
* byte2hex
|
|
||||||
*
|
|
||||||
* Parse data and get it to the Hex form
|
|
||||||
*
|
|
||||||
* @param char $value
|
|
||||||
* @return string
|
|
||||||
*/
|
|
||||||
private function byte2hex($value){
|
|
||||||
$h = dechex(($value >> 4) & 0x0F);
|
|
||||||
$l = dechex($value & 0x0F);
|
|
||||||
return "$h$l";
|
|
||||||
}
|
|
||||||
|
|
||||||
/**
|
|
||||||
* printPacket
|
|
||||||
*
|
|
||||||
* Print a packet in the hex form
|
|
||||||
*
|
|
||||||
* @param string $packet
|
|
||||||
* @return string
|
|
||||||
*/
|
|
||||||
private function printPacket($packet){
|
|
||||||
$str = "";
|
|
||||||
$str .= "Packet: ";
|
|
||||||
for($i=0;$i<strlen($packet);$i++){
|
|
||||||
$str .= $this->byte2hex(ord($packet[$i]));
|
|
||||||
}
|
|
||||||
$str .= "\n";
|
|
||||||
return $str;
|
|
||||||
}
|
|
||||||
}
|
|
||||||
|
|
||||||
?>
|
|
||||||
@@ -1,249 +0,0 @@
|
|||||||
<?php
|
|
||||||
/**
|
|
||||||
* Phpmodbus Copyright (c) 2004, 2010 Jan Krakora, WAGO Kontakttechnik GmbH & Co. KG (http://www.wago.com)
|
|
||||||
*
|
|
||||||
* This source file is subject to the "PhpModbus license" that is bundled
|
|
||||||
* with this package in the file license.txt.
|
|
||||||
*
|
|
||||||
* @author Jan Krakora
|
|
||||||
* @copyright Copyright (c) 2004, 2010 Jan Krakora, WAGO Kontakttechnik GmbH & Co. KG (http://www.wago.com)
|
|
||||||
* @license PhpModbus license
|
|
||||||
* @category Phpmodbus
|
|
||||||
* @package Phpmodbus
|
|
||||||
* @version $id$
|
|
||||||
*
|
|
||||||
*/
|
|
||||||
|
|
||||||
/**
|
|
||||||
* PhpType
|
|
||||||
*
|
|
||||||
* The class includes set of methods that convert the received Modbus data
|
|
||||||
* (array of bytes) to the PHP data type, i.e. signed int, unsigned int and float.
|
|
||||||
*
|
|
||||||
* @author Jan Krakora
|
|
||||||
* @copyright Copyright (c) 2004, 2010 Jan Krakora, WAGO Kontakttechnik GmbH & Co. KG (http://www.wago.com)
|
|
||||||
* @package Phpmodbus
|
|
||||||
*
|
|
||||||
*/
|
|
||||||
class PhpType {
|
|
||||||
|
|
||||||
/**
|
|
||||||
* bytes2float
|
|
||||||
*
|
|
||||||
* The function converts array of 4 bytes to float. The return value
|
|
||||||
* depends on order of the input bytes (endianning).
|
|
||||||
*
|
|
||||||
* @param array $values
|
|
||||||
* @param bool $endianness
|
|
||||||
* @return float
|
|
||||||
*/
|
|
||||||
public static function bytes2float($values, $endianness = 0) {
|
|
||||||
$data = array();
|
|
||||||
$real = 0;
|
|
||||||
|
|
||||||
// Set the array to correct form
|
|
||||||
$data = self::checkData($values);
|
|
||||||
// Combine bytes
|
|
||||||
$real = self::combineBytes($data, $endianness);
|
|
||||||
// Convert the real value to float
|
|
||||||
return (float) self::real2float($real);
|
|
||||||
}
|
|
||||||
|
|
||||||
/**
|
|
||||||
* bytes2signedInt
|
|
||||||
*
|
|
||||||
* The function converts array of 2 or 4 bytes to signed integer.
|
|
||||||
* The return value depends on order of the input bytes (endianning).
|
|
||||||
*
|
|
||||||
* @param array $values
|
|
||||||
* @param bool $endianness
|
|
||||||
* @return int
|
|
||||||
*/
|
|
||||||
public static function bytes2signedInt($values, $endianness = 0) {
|
|
||||||
$data = array();
|
|
||||||
$int = 0;
|
|
||||||
// Set the array to correct form
|
|
||||||
$data = self::checkData($values);
|
|
||||||
// Combine bytes
|
|
||||||
$int = self::combineBytes($data, $endianness);
|
|
||||||
// In the case of signed 2 byte value convert it to 4 byte one
|
|
||||||
if ((count($values) == 2) && ((0x8000 & $int) > 0)) {
|
|
||||||
$int = 0xFFFF8000 | $int;
|
|
||||||
}
|
|
||||||
// Convert the value
|
|
||||||
return (int) self::dword2signedInt($int);
|
|
||||||
}
|
|
||||||
|
|
||||||
/**
|
|
||||||
* bytes2unsignedInt
|
|
||||||
*
|
|
||||||
* The function converts array of 2 or 4 bytes to unsigned integer.
|
|
||||||
* The return value depends on order of the input bytes (endianning).
|
|
||||||
*
|
|
||||||
* @param array $values
|
|
||||||
* @param bool $endianness
|
|
||||||
* @return int|float
|
|
||||||
*/
|
|
||||||
public static function bytes2unsignedInt($values, $endianness = 0) {
|
|
||||||
$data = array();
|
|
||||||
$int = 0;
|
|
||||||
// Set the array to correct form
|
|
||||||
$data = self::checkData($values);
|
|
||||||
// Combine bytes
|
|
||||||
$int = self::combineBytes($data, $endianness);
|
|
||||||
// Convert the value
|
|
||||||
return self::dword2unsignedInt($int);
|
|
||||||
}
|
|
||||||
|
|
||||||
/**
|
|
||||||
* bytes2string
|
|
||||||
*
|
|
||||||
* The function converts an values array to the string. The function detects
|
|
||||||
* the end of the string by 0x00 character as defined by string standards.
|
|
||||||
*
|
|
||||||
* @param array $values
|
|
||||||
* @param bool $endianness
|
|
||||||
* @return string
|
|
||||||
*/
|
|
||||||
public static function bytes2string($values, $endianness = 0) {
|
|
||||||
// Prepare string variable
|
|
||||||
$str = "";
|
|
||||||
// Parse the received data word array
|
|
||||||
for($i=0;$i<count($values);$i+=2) {
|
|
||||||
if ($endianness) {
|
|
||||||
if($values[$i] != 0)
|
|
||||||
$str .= chr($values[$i]);
|
|
||||||
else
|
|
||||||
break;
|
|
||||||
if($values[$i+1] != 0)
|
|
||||||
$str .= chr($values[$i+1]);
|
|
||||||
else
|
|
||||||
break;
|
|
||||||
}
|
|
||||||
else {
|
|
||||||
if($values[$i+1] != 0)
|
|
||||||
$str .= chr($values[$i+1]);
|
|
||||||
else
|
|
||||||
break;
|
|
||||||
if($values[$i] != 0)
|
|
||||||
$str .= chr($values[$i]);
|
|
||||||
else
|
|
||||||
break;
|
|
||||||
}
|
|
||||||
}
|
|
||||||
// return string
|
|
||||||
return $str;
|
|
||||||
}
|
|
||||||
|
|
||||||
/**
|
|
||||||
* real2float
|
|
||||||
*
|
|
||||||
* This function converts a value in IEC-1131 REAL single precision form to float.
|
|
||||||
*
|
|
||||||
* For more see [{@link http://en.wikipedia.org/wiki/Single_precision Single precision on Wiki}] or
|
|
||||||
* [{@link http://de.php.net/manual/en/function.base-convert.php PHP base_convert function commentary}, Todd Stokes @ Georgia Tech 21-Nov-2007] or
|
|
||||||
* [{@link http://www.php.net/manual/en/function.pack.php PHP pack/unpack functionality}]
|
|
||||||
*
|
|
||||||
* @param value value in IEC REAL data type to be converted
|
|
||||||
* @return float float value
|
|
||||||
*/
|
|
||||||
private static function real2float($value) {
|
|
||||||
// get unsigned long
|
|
||||||
$ulong = pack("L", $value);
|
|
||||||
// set float
|
|
||||||
$float = unpack("f", $ulong);
|
|
||||||
|
|
||||||
return $float[1];
|
|
||||||
}
|
|
||||||
|
|
||||||
/**
|
|
||||||
* dword2signedInt
|
|
||||||
*
|
|
||||||
* Switch double word to signed integer
|
|
||||||
*
|
|
||||||
* @param int $value
|
|
||||||
* @return int
|
|
||||||
*/
|
|
||||||
private static function dword2signedInt($value) {
|
|
||||||
if ((0x80000000 & $value) != 0) {
|
|
||||||
return -(0x7FFFFFFF & ~$value)-1;
|
|
||||||
} else {
|
|
||||||
return (0x7FFFFFFF & $value);
|
|
||||||
}
|
|
||||||
}
|
|
||||||
|
|
||||||
/**
|
|
||||||
* dword2signedInt
|
|
||||||
*
|
|
||||||
* Switch double word to unsigned integer
|
|
||||||
*
|
|
||||||
* @param int $value
|
|
||||||
* @return int|float
|
|
||||||
*/
|
|
||||||
private static function dword2unsignedInt($value) {
|
|
||||||
if ((0x80000000 & $value) != 0) {
|
|
||||||
return ((float) (0x7FFFFFFF & $value)) + 2147483648;
|
|
||||||
} else {
|
|
||||||
return (int) (0x7FFFFFFF & $value);
|
|
||||||
}
|
|
||||||
}
|
|
||||||
|
|
||||||
/**
|
|
||||||
* checkData
|
|
||||||
*
|
|
||||||
* Check if the data variable is array, and check if the values are numeric
|
|
||||||
*
|
|
||||||
* @param int $data
|
|
||||||
* @return int
|
|
||||||
*/
|
|
||||||
private static function checkData($data) {
|
|
||||||
// Check the data
|
|
||||||
if (!is_array($data) ||
|
|
||||||
count($data)<2 ||
|
|
||||||
count($data)>4 ||
|
|
||||||
count($data)==3) {
|
|
||||||
throw new Exception('The input data should be an array of 2 or 4 bytes.');
|
|
||||||
}
|
|
||||||
// Fill the rest of array by zeroes
|
|
||||||
if (count($data) == 2) {
|
|
||||||
$data[2] = 0;
|
|
||||||
$data[3] = 0;
|
|
||||||
}
|
|
||||||
// Check the values to be number
|
|
||||||
if (!is_numeric($data[0]) ||
|
|
||||||
!is_numeric($data[1]) ||
|
|
||||||
!is_numeric($data[2]) ||
|
|
||||||
!is_numeric($data[3])) {
|
|
||||||
throw new Exception('Data are not numeric or the array keys are not indexed by 0,1,2 and 3');
|
|
||||||
}
|
|
||||||
|
|
||||||
return $data;
|
|
||||||
}
|
|
||||||
|
|
||||||
/**
|
|
||||||
* combineBytes
|
|
||||||
*
|
|
||||||
* Combine bytes together
|
|
||||||
*
|
|
||||||
* @param int $data
|
|
||||||
* @param bool $endianness
|
|
||||||
* @return int
|
|
||||||
*/
|
|
||||||
private static function combineBytes($data, $endianness) {
|
|
||||||
$value = 0;
|
|
||||||
// Combine bytes
|
|
||||||
if ($endianness == 0)
|
|
||||||
$value = (($data[3] & 0xFF)<<16) |
|
|
||||||
(($data[2] & 0xFF)<<24) |
|
|
||||||
(($data[1] & 0xFF)) |
|
|
||||||
(($data[0] & 0xFF)<<8);
|
|
||||||
else
|
|
||||||
$value = (($data[3] & 0xFF)<<24) |
|
|
||||||
(($data[2] & 0xFF)<<16) |
|
|
||||||
(($data[1] & 0xFF)<<8) |
|
|
||||||
(($data[0] & 0xFF));
|
|
||||||
|
|
||||||
return $value;
|
|
||||||
}
|
|
||||||
}
|
|
||||||
?>
|
|
||||||
@@ -0,0 +1,62 @@
|
|||||||
|
# phpmodbus
|
||||||
|
|
||||||
|
Implementation of the basic functionality of the Modbus TCP and UDP based protocol using PHP.
|
||||||
|
|
||||||
|
**NOTE: This is a fork to fix & update the library code (and code alone). Notably, the tests are probably all broken.**
|
||||||
|
|
||||||
|
> **What's new**
|
||||||
|
>
|
||||||
|
> This fork adds a namespace and fixes issues encountered when porting to PHP 7
|
||||||
|
|
||||||
|
|
||||||
|
## Implemented features
|
||||||
|
|
||||||
|
* Modbus master
|
||||||
|
* FC1 - Read coils
|
||||||
|
* FC2 - Read input discretes
|
||||||
|
* FC3 - Read holding registers
|
||||||
|
* FC4 - Read holding input registers
|
||||||
|
* FC5 - Write single coil
|
||||||
|
* FC6 - Write single register
|
||||||
|
* FC15 - Write multiple coils
|
||||||
|
* FC16 - Write multiple registers
|
||||||
|
* FC23 - Read/Write multiple registers
|
||||||
|
|
||||||
|
|
||||||
|
## Requirements
|
||||||
|
|
||||||
|
* The PHP extension php_sockets.dll should be enabled (server php.ini file)
|
||||||
|
|
||||||
|
|
||||||
|
## Example
|
||||||
|
|
||||||
|
```php
|
||||||
|
use PHPModbus/ModbusMaster;
|
||||||
|
use PHPModbus/PhpType;
|
||||||
|
|
||||||
|
// Modbus master UDP
|
||||||
|
$modbus = new ModbusMaster("192.168.1.1", "UDP");
|
||||||
|
// Read multiple registers
|
||||||
|
try {
|
||||||
|
$recData = $modbus->readMultipleRegisters(0, 12288, 5);
|
||||||
|
} catch (Exception $e) {
|
||||||
|
// Print error information if any
|
||||||
|
echo $modbus;
|
||||||
|
echo $e;
|
||||||
|
exit;
|
||||||
|
}
|
||||||
|
// Print data in string format
|
||||||
|
echo PhpType::bytes2string($recData);
|
||||||
|
```
|
||||||
|
|
||||||
|
Use the `setTimeout($seconds)` and `setSocketTimeout($read_timeout_sec, $write_timeout_sec)` methods to adjust wait times.
|
||||||
|
|
||||||
|
Most of the code is (to some extent) commented and documented with PhpDoc. You should get useful tooltips in your IDE.
|
||||||
|
|
||||||
|
|
||||||
|
## GoogleCode legacy docs & downloads
|
||||||
|
|
||||||
|
This project was originally hosted on (now defunct) Google Code. It's still archived here:
|
||||||
|
|
||||||
|
* [GoogleCode Archived Repo](http://code.google.com/p/phpmodbus)
|
||||||
|
|
||||||
+14
-6
@@ -1,17 +1,25 @@
|
|||||||
{
|
{
|
||||||
"name": "adduc/phpmodbus",
|
"name": "mightypork/phpmodbus",
|
||||||
"description": "Composer version of PhpModBus",
|
"keywords": ["phpmodbus","modbus"],
|
||||||
|
"description": "PhpModbus with namespaces and updated to PHP 7",
|
||||||
"license": "LGPL",
|
"license": "LGPL",
|
||||||
|
"require": {
|
||||||
|
"php": "^5.3.2 || ^7.0",
|
||||||
|
"ext-sockets": "*"
|
||||||
|
},
|
||||||
"authors": [
|
"authors": [
|
||||||
{
|
{
|
||||||
"name": "Honza Krakora",
|
"name": "Honza Krakora",
|
||||||
"email": "krakora.jan@googlemail.com"
|
"email": "krakora.jan@googlemail.com"
|
||||||
|
},
|
||||||
|
{
|
||||||
|
"name": "Ondřej Hruška",
|
||||||
|
"email": "ondra@ondrovo.com"
|
||||||
}
|
}
|
||||||
],
|
],
|
||||||
"autoload": {
|
"autoload": {
|
||||||
"classmap": [ "Phpmodbus" ]
|
"psr-4": {
|
||||||
},
|
"PHPModbus\\": "src/"
|
||||||
"require": {
|
}
|
||||||
"ext-sockets": "*"
|
|
||||||
}
|
}
|
||||||
}
|
}
|
||||||
|
|||||||
@@ -0,0 +1,3 @@
|
|||||||
|
Those examples have not been updated to use namespaces.
|
||||||
|
|
||||||
|
They may not work. Just for reference.
|
||||||
@@ -1,11 +1,10 @@
|
|||||||
<?php
|
<?php
|
||||||
|
|
||||||
require_once dirname(__FILE__) . '/../Phpmodbus/ModbusMasterUdp.php';
|
use PHPModbus\ModbusMaster;
|
||||||
|
|
||||||
// Create Modbus object
|
// Create Modbus object
|
||||||
// $ip = "192.168.1.1";
|
|
||||||
$ip = "192.192.15.51";
|
$ip = "192.192.15.51";
|
||||||
$modbus = new ModbusMasterUdp($ip);
|
$modbus = new ModbusMaster($ip, "UDP");
|
||||||
|
|
||||||
try {
|
try {
|
||||||
// FC 3
|
// FC 3
|
||||||
@@ -14,9 +13,7 @@ try {
|
|||||||
$mw0address = 12288;
|
$mw0address = 12288;
|
||||||
$quantity = 6;
|
$quantity = 6;
|
||||||
$recData = $modbus->readMultipleRegisters($moduleId, $reference, $quantity);
|
$recData = $modbus->readMultipleRegisters($moduleId, $reference, $quantity);
|
||||||
print_r($recData);
|
} catch (Exception $e) {
|
||||||
}
|
|
||||||
catch (Exception $e) {
|
|
||||||
echo $modbus;
|
echo $modbus;
|
||||||
echo $e;
|
echo $e;
|
||||||
exit;
|
exit;
|
||||||
@@ -33,10 +30,10 @@ catch (Exception $e) {
|
|||||||
<h1>Dump of M-memory from WAGO 750-84x series coupler.</h1>
|
<h1>Dump of M-memory from WAGO 750-84x series coupler.</h1>
|
||||||
<ul>
|
<ul>
|
||||||
<li>PLC: 750-84x series</li>
|
<li>PLC: 750-84x series</li>
|
||||||
<li>IP: <?php echo $ip?></li>
|
<li>IP: <?php echo $ip ?></li>
|
||||||
<li>Modbus module ID: <?php echo $moduleId?></li>
|
<li>Modbus module ID: <?php echo $moduleId ?></li>
|
||||||
<li>Modbus memory reference: <?php echo $reference?></li>
|
<li>Modbus memory reference: <?php echo $reference ?></li>
|
||||||
<li>Modbus memory quantity: <?php echo $quantity?></li>
|
<li>Modbus memory quantity: <?php echo $quantity ?></li>
|
||||||
</ul>
|
</ul>
|
||||||
|
|
||||||
<h2>M-memory dump</h2>
|
<h2>M-memory dump</h2>
|
||||||
@@ -48,12 +45,12 @@ catch (Exception $e) {
|
|||||||
<td>value</td>
|
<td>value</td>
|
||||||
</tr>
|
</tr>
|
||||||
<?php
|
<?php
|
||||||
for($i=0;$i<count($recData);$i+=2) {
|
for ($i = 0; $i < count($recData); $i += 2) {
|
||||||
?>
|
?>
|
||||||
<tr>
|
<tr>
|
||||||
<td><?php echo $i+$reference?></td>
|
<td><?php echo $i + $reference ?></td>
|
||||||
<td>MW<?php echo ($i + $reference - $mw0address)/2?></td>
|
<td>MW<?php echo ($i + $reference - $mw0address) / 2 ?></td>
|
||||||
<td><?php echo ($recData[$i] << 8)+ $recData[$i+1]?></td>
|
<td><?php echo ($recData[$i] << 8) + $recData[$i + 1] ?></td>
|
||||||
</tr>
|
</tr>
|
||||||
<?php
|
<?php
|
||||||
}
|
}
|
||||||
@@ -61,9 +58,8 @@ catch (Exception $e) {
|
|||||||
</table>
|
</table>
|
||||||
|
|
||||||
<h2>Modbus class status</h2>
|
<h2>Modbus class status</h2>
|
||||||
<?php
|
|
||||||
echo $modbus;
|
<pre><?= $modbus ?></pre>
|
||||||
?>
|
|
||||||
|
|
||||||
</body>
|
</body>
|
||||||
</html>
|
</html>
|
||||||
|
|||||||
@@ -1,16 +1,16 @@
|
|||||||
<?php
|
<?php
|
||||||
|
|
||||||
require_once dirname(__FILE__) . '/../Phpmodbus/ModbusMasterUdp.php';
|
use PHPModbus\ModbusMaster;
|
||||||
|
use PHPModbus\PhpType;
|
||||||
|
|
||||||
// Create Modbus object
|
// Create Modbus object
|
||||||
$modbus = new ModbusMasterUdp("192.192.15.51");
|
$modbus = new ModbusMaster("192.192.15.51", "UDP");
|
||||||
|
|
||||||
try {
|
try {
|
||||||
// FC 3
|
// FC 3
|
||||||
// read 10 words (20 bytes) from device ID=0, address=12288
|
// read 10 words (20 bytes) from device ID=0, address=12288
|
||||||
$recData = $modbus->readMultipleRegisters(0, 12288, 10);
|
$recData = $modbus->readMultipleRegisters(0, 12288, 10);
|
||||||
}
|
} catch (Exception $e) {
|
||||||
catch (Exception $e) {
|
|
||||||
// Print error information if any
|
// Print error information if any
|
||||||
echo $modbus;
|
echo $modbus;
|
||||||
echo $e;
|
echo $e;
|
||||||
@@ -28,17 +28,17 @@ $values = array_chunk($recData, 4);
|
|||||||
|
|
||||||
// Get float from REAL interpretation
|
// Get float from REAL interpretation
|
||||||
echo "<h3>REAL to Float</h3>\n";
|
echo "<h3>REAL to Float</h3>\n";
|
||||||
foreach($values as $bytes)
|
foreach ($values as $bytes)
|
||||||
echo PhpType::bytes2float($bytes) . "</br>";
|
echo PhpType::bytes2float($bytes) . "</br>";
|
||||||
|
|
||||||
// Get integer from DINT interpretation
|
// Get integer from DINT interpretation
|
||||||
echo "<h3>DINT to integer </h3>\n";
|
echo "<h3>DINT to integer </h3>\n";
|
||||||
foreach($values as $bytes)
|
foreach ($values as $bytes)
|
||||||
echo PhpType::bytes2signedInt($bytes) . "</br>";
|
echo PhpType::bytes2signedInt($bytes) . "</br>";
|
||||||
|
|
||||||
// Get integer of float from DINT interpretation
|
// Get integer of float from DINT interpretation
|
||||||
echo "<h3>DWORD to integer (or float) </h3>\n";
|
echo "<h3>DWORD to integer (or float) </h3>\n";
|
||||||
foreach($values as $bytes)
|
foreach ($values as $bytes)
|
||||||
echo PhpType::bytes2unsignedInt($bytes) . "</br>";
|
echo PhpType::bytes2unsignedInt($bytes) . "</br>";
|
||||||
|
|
||||||
echo "<h2>16 bit types</h2>\n";
|
echo "<h2>16 bit types</h2>\n";
|
||||||
@@ -47,15 +47,14 @@ $values = array_chunk($recData, 2);
|
|||||||
|
|
||||||
// Get signed integer from INT interpretation
|
// Get signed integer from INT interpretation
|
||||||
echo "<h3>INT to integer </h3>\n";
|
echo "<h3>INT to integer </h3>\n";
|
||||||
foreach($values as $bytes)
|
foreach ($values as $bytes)
|
||||||
echo PhpType::bytes2signedInt($bytes) . "</br>";
|
echo PhpType::bytes2signedInt($bytes) . "</br>";
|
||||||
|
|
||||||
// Get unsigned integer from WORD interpretation
|
// Get unsigned integer from WORD interpretation
|
||||||
echo "<h3>WORD to integer </h3>\n";
|
echo "<h3>WORD to integer </h3>\n";
|
||||||
foreach($values as $bytes)
|
foreach ($values as $bytes)
|
||||||
echo PhpType::bytes2unsignedInt($bytes) . "</br>";
|
echo PhpType::bytes2unsignedInt($bytes) . "</br>";
|
||||||
|
|
||||||
// Get string from STRING interpretation
|
// Get string from STRING interpretation
|
||||||
echo "<h3>STRING to string </h3>\n";
|
echo "<h3>STRING to string </h3>\n";
|
||||||
echo PhpType::bytes2string($recData) . "</br>";
|
echo PhpType::bytes2string($recData) . "</br>";
|
||||||
?>
|
|
||||||
@@ -0,0 +1,24 @@
|
|||||||
|
<?php
|
||||||
|
|
||||||
|
use PHPModbus\ModbusMaster;
|
||||||
|
|
||||||
|
// Create Modbus object
|
||||||
|
$modbus = new ModbusMaster("192.192.15.51", "UDP");
|
||||||
|
|
||||||
|
try {
|
||||||
|
// FC 1
|
||||||
|
$recData = $modbus->readCoils(0, 12288, 12);
|
||||||
|
} catch (Exception $e) {
|
||||||
|
// Print error information if any
|
||||||
|
echo $modbus;
|
||||||
|
echo $e;
|
||||||
|
exit;
|
||||||
|
}
|
||||||
|
|
||||||
|
// Print status information
|
||||||
|
echo "</br>Status:</br>" . $modbus;
|
||||||
|
|
||||||
|
// Print read data
|
||||||
|
echo "</br>Data:</br>";
|
||||||
|
var_dump($recData);
|
||||||
|
echo "</br>";
|
||||||
@@ -0,0 +1,27 @@
|
|||||||
|
<?php
|
||||||
|
|
||||||
|
use PHPModbus\ModbusMaster;
|
||||||
|
|
||||||
|
// Create Modbus object
|
||||||
|
$modbus = new ModbusMaster("192.192.15.51", "UDP");
|
||||||
|
|
||||||
|
// Data to be written - supports both 0/1 and booleans (true, false)
|
||||||
|
$data = array(
|
||||||
|
1, 0, 1, 1, 0, 1, 1, 1,
|
||||||
|
1, 1, 1, 1, 0, 0, 0, 0,
|
||||||
|
0, 0, 0, 0, 1, 1, 1, 1,
|
||||||
|
1, 1, 1, 1, 1, 1, 1, 1,
|
||||||
|
);
|
||||||
|
|
||||||
|
try {
|
||||||
|
// FC15
|
||||||
|
$modbus->writeMultipleCoils(0, 12288, $data);
|
||||||
|
} catch (Exception $e) {
|
||||||
|
// Print error information if any
|
||||||
|
echo $modbus;
|
||||||
|
echo $e;
|
||||||
|
exit;
|
||||||
|
}
|
||||||
|
|
||||||
|
// Print status information
|
||||||
|
echo $modbus;
|
||||||
@@ -1,19 +1,18 @@
|
|||||||
<?php
|
<?php
|
||||||
|
|
||||||
require_once dirname(__FILE__) . '/../Phpmodbus/ModbusMasterUdp.php';
|
use PHPModbus\ModbusMaster;
|
||||||
|
|
||||||
// Create Modbus object
|
// Create Modbus object
|
||||||
$modbus = new ModbusMasterUdp("192.192.15.51");
|
$modbus = new ModbusMaster("192.192.15.51", "UDP");
|
||||||
|
|
||||||
// Data to be writen
|
// Data to be writen
|
||||||
$data = array(1000, 2000, 3.0);
|
$data = array(10, -1000, 2000, 3.0);
|
||||||
$dataTypes = array("INT", "DINT", "REAL");
|
$dataTypes = array("WORD", "INT", "DINT", "REAL");
|
||||||
|
|
||||||
try {
|
try {
|
||||||
// FC16
|
// FC16
|
||||||
$modbus->writeMultipleRegister(0, 12288, $data, $dataTypes);
|
$modbus->writeMultipleRegister(0, 12288, $data, $dataTypes);
|
||||||
}
|
} catch (Exception $e) {
|
||||||
catch (Exception $e) {
|
|
||||||
// Print error information if any
|
// Print error information if any
|
||||||
echo $modbus;
|
echo $modbus;
|
||||||
echo $e;
|
echo $e;
|
||||||
|
|||||||
@@ -0,0 +1,25 @@
|
|||||||
|
<?php
|
||||||
|
|
||||||
|
use PHPModbus\ModbusMaster;
|
||||||
|
|
||||||
|
// Create Modbus object
|
||||||
|
$modbus = new ModbusMaster("192.192.15.51", "UDP");
|
||||||
|
|
||||||
|
try {
|
||||||
|
// FC 2
|
||||||
|
// read 2 input bits from address 0x0 (Wago input image)
|
||||||
|
$recData = $modbus->readInputDiscretes(0, 0, 2);
|
||||||
|
} catch (Exception $e) {
|
||||||
|
// Print error information if any
|
||||||
|
echo $modbus;
|
||||||
|
echo $e;
|
||||||
|
exit;
|
||||||
|
}
|
||||||
|
|
||||||
|
// Print status information
|
||||||
|
echo "</br>Status:</br>" . $modbus;
|
||||||
|
|
||||||
|
// Print read data
|
||||||
|
echo "</br>Data:</br>";
|
||||||
|
var_dump($recData);
|
||||||
|
echo "</br>";
|
||||||
@@ -0,0 +1,25 @@
|
|||||||
|
<?php
|
||||||
|
|
||||||
|
use PHPModbus\ModbusMaster;
|
||||||
|
|
||||||
|
// Create Modbus object
|
||||||
|
$modbus = new ModbusMaster("192.192.15.51", "UDP");
|
||||||
|
|
||||||
|
// Data to be writen
|
||||||
|
$bitValue = true;
|
||||||
|
$bitNumber = 2;
|
||||||
|
$andMask = 0xFFFF ^ pow(2, $bitNumber);
|
||||||
|
$orMask = 0x0000 ^ (pow(2, $bitNumber) * $bitValue);
|
||||||
|
|
||||||
|
try {
|
||||||
|
// FC22
|
||||||
|
$modbus->maskWriteRegister(0, 12288, $andMask, $orMask);
|
||||||
|
} catch (Exception $e) {
|
||||||
|
// Print error information if any
|
||||||
|
echo $modbus;
|
||||||
|
echo $e;
|
||||||
|
exit;
|
||||||
|
}
|
||||||
|
|
||||||
|
// Print status information
|
||||||
|
echo $modbus;
|
||||||
@@ -1,19 +1,18 @@
|
|||||||
<?php
|
<?php
|
||||||
|
|
||||||
require_once dirname(__FILE__) . '/../Phpmodbus/ModbusMasterUdp.php';
|
use PHPModbus\ModbusMaster;
|
||||||
|
|
||||||
// Create Modbus object
|
// Create Modbus object
|
||||||
$modbus = new ModbusMasterUdp("192.192.15.51");
|
$modbus = new ModbusMaster("192.192.15.51", "UDP");
|
||||||
|
|
||||||
// Data to be writen
|
// Data to be writen
|
||||||
$data = array(1000, 2000, 3.0);
|
$data = array(10, -1000, 2000, 3.0);
|
||||||
$dataTypes = array("INT", "DINT", "REAL");
|
$dataTypes = array("WORD", "INT", "DINT", "REAL");
|
||||||
|
|
||||||
try {
|
try {
|
||||||
// FC23
|
// FC23
|
||||||
$recData = $modbus->readWriteRegisters(0, 12288, 6, 12288, $data, $dataTypes);
|
$recData = $modbus->readWriteRegisters(0, 12288, 6, 12288, $data, $dataTypes);
|
||||||
}
|
} catch (Exception $e) {
|
||||||
catch (Exception $e) {
|
|
||||||
// Print error information if any
|
// Print error information if any
|
||||||
echo $modbus;
|
echo $modbus;
|
||||||
echo $e;
|
echo $e;
|
||||||
@@ -27,5 +26,3 @@ echo "</br>Status:</br>" . $modbus;
|
|||||||
echo "</br>Data:</br>";
|
echo "</br>Data:</br>";
|
||||||
print_r($recData);
|
print_r($recData);
|
||||||
echo "</br>";
|
echo "</br>";
|
||||||
|
|
||||||
?>
|
|
||||||
@@ -1,15 +1,14 @@
|
|||||||
<?php
|
<?php
|
||||||
|
|
||||||
require_once dirname(__FILE__) . '/../Phpmodbus/ModbusMasterUdp.php';
|
use PHPModbus\ModbusMaster;
|
||||||
|
|
||||||
// Create Modbus object
|
// Create Modbus object
|
||||||
$modbus = new ModbusMasterUdp("192.192.15.51");
|
$modbus = new ModbusMaster("192.192.15.51", "UDP");
|
||||||
|
|
||||||
try {
|
try {
|
||||||
// FC 3
|
// FC 3
|
||||||
$recData = $modbus->readMultipleRegisters(0, 12288, 6);
|
$recData = $modbus->readMultipleRegisters(0, 12288, 6);
|
||||||
}
|
} catch (Exception $e) {
|
||||||
catch (Exception $e) {
|
|
||||||
// Print error information if any
|
// Print error information if any
|
||||||
echo $modbus;
|
echo $modbus;
|
||||||
echo $e;
|
echo $e;
|
||||||
@@ -23,4 +22,3 @@ echo "</br>Status:</br>" . $modbus;
|
|||||||
echo "</br>Data:</br>";
|
echo "</br>Data:</br>";
|
||||||
print_r($recData);
|
print_r($recData);
|
||||||
echo "</br>";
|
echo "</br>";
|
||||||
?>
|
|
||||||
@@ -0,0 +1,18 @@
|
|||||||
|
<?php
|
||||||
|
|
||||||
|
use PHPModbus\ModbusMasterUdp;
|
||||||
|
|
||||||
|
// Create Modbus object
|
||||||
|
$modbus = new ModbusMasterUdp("192.192.15.51");
|
||||||
|
|
||||||
|
try {
|
||||||
|
// Read input discretes - FC 4
|
||||||
|
$recData = $modbus->readMultipleInputRegisters(0, 0, 2);
|
||||||
|
} catch (Exception $e) {
|
||||||
|
// Print error information if any
|
||||||
|
echo $modbus;
|
||||||
|
echo $e;
|
||||||
|
exit;
|
||||||
|
}
|
||||||
|
|
||||||
|
var_dump($recData);
|
||||||
@@ -0,0 +1,23 @@
|
|||||||
|
<?php
|
||||||
|
|
||||||
|
use PHPModbus\ModbusMasterUdp;
|
||||||
|
|
||||||
|
// Create Modbus object
|
||||||
|
$modbus = new ModbusMasterUdp("192.192.15.51");
|
||||||
|
|
||||||
|
// Data to be writen - TRUE, FALSE
|
||||||
|
$data_true = array(true);
|
||||||
|
$data_false = array(false);
|
||||||
|
|
||||||
|
try {
|
||||||
|
// Write single coil - FC5
|
||||||
|
$modbus->writeSingleCoil(0, 12288, $data_true);
|
||||||
|
$modbus->writeSingleCoil(0, 12289, $data_false);
|
||||||
|
$modbus->writeSingleCoil(0, 12290, $data_true);
|
||||||
|
$modbus->writeSingleCoil(0, 12291, $data_false);
|
||||||
|
} catch (Exception $e) {
|
||||||
|
// Print error information if any
|
||||||
|
echo $modbus;
|
||||||
|
echo $e;
|
||||||
|
exit;
|
||||||
|
}
|
||||||
@@ -0,0 +1,22 @@
|
|||||||
|
<?php
|
||||||
|
|
||||||
|
use PHPModbus\ModbusMaster;
|
||||||
|
|
||||||
|
// Create Modbus object
|
||||||
|
$modbus = new ModbusMaster("192.192.15.51", "UDP");
|
||||||
|
|
||||||
|
// Data to be writen
|
||||||
|
$data = array(-1000);
|
||||||
|
|
||||||
|
try {
|
||||||
|
// FC6
|
||||||
|
$modbus->writeSingleRegister(0, 12288, $data);
|
||||||
|
} catch (Exception $e) {
|
||||||
|
// Print error information if any
|
||||||
|
echo $modbus;
|
||||||
|
echo $e;
|
||||||
|
exit;
|
||||||
|
}
|
||||||
|
|
||||||
|
// Print status information
|
||||||
|
echo $modbus;
|
||||||
-19
@@ -1,19 +0,0 @@
|
|||||||
Copyright (c) 2004, 2009 Jan Krakora, Wago (http://www.wago.com)
|
|
||||||
All rights reserved.
|
|
||||||
|
|
||||||
Phpmodbus library
|
|
||||||
####################
|
|
||||||
|
|
||||||
Phpmodbus for PHP is a small and easy-to-use Modbus UDP master library. For more
|
|
||||||
see project at http://phpmodbus.googlecode.com
|
|
||||||
|
|
||||||
Release notes
|
|
||||||
===============
|
|
||||||
|
|
||||||
0.1 -> 0.2.r20
|
|
||||||
---------------
|
|
||||||
+ Added new class for conversion from received bytes to PHP data types (PhpType class)
|
|
||||||
+ Added new data conversion using PhpType example
|
|
||||||
+ Added new alias methods fc3, fc16 and fc23 (ModbusMasterUdp class)
|
|
||||||
* Fixed problems with the endianess when data written (IecType class)
|
|
||||||
* Improved commentaries for documentation
|
|
||||||
+141
@@ -0,0 +1,141 @@
|
|||||||
|
<?php
|
||||||
|
|
||||||
|
namespace PHPModbus;
|
||||||
|
|
||||||
|
/**
|
||||||
|
* Phpmodbus Copyright (c) 2004, 2013 Jan Krakora
|
||||||
|
*
|
||||||
|
* This source file is subject to the "PhpModbus license" that is bundled
|
||||||
|
* with this package in the file license.txt.
|
||||||
|
*
|
||||||
|
* @author Jan Krakora
|
||||||
|
* @copyright Copyright (c) 2004, 2013 Jan Krakora
|
||||||
|
* @license PhpModbus license
|
||||||
|
* @category Phpmodbus
|
||||||
|
* @package Phpmodbus
|
||||||
|
* @version $id$
|
||||||
|
*/
|
||||||
|
|
||||||
|
/**
|
||||||
|
* IecType
|
||||||
|
*
|
||||||
|
* The class includes set of IEC-1131 data type functions that converts a PHP
|
||||||
|
* data types to a IEC data type.
|
||||||
|
*
|
||||||
|
* @author Jan Krakora
|
||||||
|
* @copyright Copyright (c) 2004, 2010 Jan Krakora
|
||||||
|
* @package Phpmodbus
|
||||||
|
*/
|
||||||
|
class IecType
|
||||||
|
{
|
||||||
|
/**
|
||||||
|
* iecBYTE
|
||||||
|
*
|
||||||
|
* Converts a value to IEC-1131 BYTE data type
|
||||||
|
*
|
||||||
|
* @param int $value from 0 to 255
|
||||||
|
* @return int IEC BYTE data type
|
||||||
|
*
|
||||||
|
*/
|
||||||
|
public static function iecBYTE($value)
|
||||||
|
{
|
||||||
|
return chr($value & 0xFF);
|
||||||
|
}
|
||||||
|
|
||||||
|
/**
|
||||||
|
* iecINT
|
||||||
|
*
|
||||||
|
* Converts a value to IEC-1131 INT data type
|
||||||
|
*
|
||||||
|
* @param int $value to be converted
|
||||||
|
* @return int IEC-1131 INT data type
|
||||||
|
*
|
||||||
|
*/
|
||||||
|
public static function iecINT($value)
|
||||||
|
{
|
||||||
|
return self::iecBYTE(($value >> 8) & 0x00FF) .
|
||||||
|
self::iecBYTE(($value & 0x00FF));
|
||||||
|
}
|
||||||
|
|
||||||
|
/**
|
||||||
|
* iecDINT
|
||||||
|
*
|
||||||
|
* Converts a value to IEC-1131 DINT data type
|
||||||
|
*
|
||||||
|
* @param int $value to be converted
|
||||||
|
* @param int $bigEndian defines endian codding (little endian == 0, big endian == 1)
|
||||||
|
* @return int IEC-1131 INT data type
|
||||||
|
*
|
||||||
|
*/
|
||||||
|
public static function iecDINT($value, $bigEndian = 0)
|
||||||
|
{
|
||||||
|
// result with right endianness
|
||||||
|
return self::endianness($value, $bigEndian);
|
||||||
|
}
|
||||||
|
|
||||||
|
/**
|
||||||
|
* iecREAL
|
||||||
|
*
|
||||||
|
* Converts a value to IEC-1131 REAL data type. The function uses function @use float2iecReal.
|
||||||
|
*
|
||||||
|
* @param int $value to be converted
|
||||||
|
* @param bool $bigEndian defines endian codding (little endian == 0, big endian == 1)
|
||||||
|
* @return int IEC-1131 REAL data type
|
||||||
|
*/
|
||||||
|
public static function iecREAL($value, $bigEndian = 0)
|
||||||
|
{
|
||||||
|
// iecREAL representation
|
||||||
|
$real = self::float2iecReal($value);
|
||||||
|
// result with right endianness
|
||||||
|
return self::endianness($real, $bigEndian);
|
||||||
|
}
|
||||||
|
|
||||||
|
/**
|
||||||
|
* float2iecReal
|
||||||
|
*
|
||||||
|
* This function converts float value to IEC-1131 REAL single precision form.
|
||||||
|
*
|
||||||
|
* For more see [{@link http://en.wikipedia.org/wiki/Single_precision Single precision on Wiki}] or
|
||||||
|
* [{@link http://de.php.net/manual/en/function.base-convert.php PHP base_convert function commentary}, Todd Stokes
|
||||||
|
* @ Georgia Tech 21-Nov-2007] or
|
||||||
|
* [{@link http://www.php.net/manual/en/function.pack.php PHP pack/unpack functionality}]
|
||||||
|
*
|
||||||
|
* @param float $value to be converted
|
||||||
|
* @return int IEC REAL data type
|
||||||
|
*/
|
||||||
|
private static function float2iecReal($value)
|
||||||
|
{
|
||||||
|
// get float binary string
|
||||||
|
$float = pack("f", $value);
|
||||||
|
// set 32-bit unsigned integer of the float
|
||||||
|
$w = unpack("L", $float);
|
||||||
|
return $w[1];
|
||||||
|
}
|
||||||
|
|
||||||
|
/**
|
||||||
|
* endianness
|
||||||
|
*
|
||||||
|
* Make endianess as required.
|
||||||
|
* For more see http://en.wikipedia.org/wiki/Endianness
|
||||||
|
*
|
||||||
|
* @param int $value
|
||||||
|
* @param bool $bigEndian
|
||||||
|
* @return int
|
||||||
|
*/
|
||||||
|
private static function endianness($value, $bigEndian = 0)
|
||||||
|
{
|
||||||
|
if ($bigEndian == 0) {
|
||||||
|
return
|
||||||
|
self::iecBYTE(($value >> 8) & 0x000000FF) .
|
||||||
|
self::iecBYTE(($value & 0x000000FF)) .
|
||||||
|
self::iecBYTE(($value >> 24) & 0x000000FF) .
|
||||||
|
self::iecBYTE(($value >> 16) & 0x000000FF);
|
||||||
|
} else {
|
||||||
|
return
|
||||||
|
self::iecBYTE(($value >> 24) & 0x000000FF) .
|
||||||
|
self::iecBYTE(($value >> 16) & 0x000000FF) .
|
||||||
|
self::iecBYTE(($value >> 8) & 0x000000FF) .
|
||||||
|
self::iecBYTE(($value & 0x000000FF));
|
||||||
|
}
|
||||||
|
}
|
||||||
|
}
|
||||||
File diff suppressed because it is too large
Load Diff
@@ -0,0 +1,51 @@
|
|||||||
|
<?php
|
||||||
|
|
||||||
|
namespace PHPModbus;
|
||||||
|
|
||||||
|
/**
|
||||||
|
* Phpmodbus Copyright (c) 2004, 2012 Jan Krakora
|
||||||
|
*
|
||||||
|
* This source file is subject to the "PhpModbus license" that is bundled
|
||||||
|
* with this package in the file license.txt.
|
||||||
|
*
|
||||||
|
*
|
||||||
|
* @copyright Copyright (c) 2004, 2012 Jan Krakora
|
||||||
|
* @license PhpModbus license
|
||||||
|
* @category Phpmodbus
|
||||||
|
* @tutorial Phpmodbus.pkg
|
||||||
|
* @package Phpmodbus
|
||||||
|
* @version $id$
|
||||||
|
*
|
||||||
|
*/
|
||||||
|
|
||||||
|
/**
|
||||||
|
* ModbusMasterTcp
|
||||||
|
*
|
||||||
|
* This class deals with the MODBUS master using TCP. Extends ModbusMaster class.
|
||||||
|
*
|
||||||
|
* Implemented MODBUS functions:
|
||||||
|
* - FC 1: read coils
|
||||||
|
* - FC 3: read multiple registers
|
||||||
|
* - FC 15: write multiple coils
|
||||||
|
* - FC 16: write multiple registers
|
||||||
|
* - FC 23: read write registers
|
||||||
|
*
|
||||||
|
* @author Jan Krakora
|
||||||
|
* @copyright Copyright (c) 2004, 2012 Jan Krakora
|
||||||
|
* @package Phpmodbus
|
||||||
|
*
|
||||||
|
*/
|
||||||
|
class ModbusMasterTcp extends ModbusMaster
|
||||||
|
{
|
||||||
|
/**
|
||||||
|
* ModbusMasterTcp
|
||||||
|
*
|
||||||
|
* This is the constructor that defines {@link $host} IP address of the object.
|
||||||
|
*
|
||||||
|
* @param String $host An IP address of a Modbus TCP device. E.g. "192.168.1.1".
|
||||||
|
*/
|
||||||
|
public function __construct($host)
|
||||||
|
{
|
||||||
|
parent::__construct($host, "TCP");
|
||||||
|
}
|
||||||
|
}
|
||||||
@@ -0,0 +1,51 @@
|
|||||||
|
<?php
|
||||||
|
|
||||||
|
namespace PHPModbus;
|
||||||
|
|
||||||
|
/**
|
||||||
|
* Phpmodbus Copyright (c) 2004, 2012 Jan Krakora
|
||||||
|
*
|
||||||
|
* This source file is subject to the "PhpModbus license" that is bundled
|
||||||
|
* with this package in the file license.txt.
|
||||||
|
*
|
||||||
|
*
|
||||||
|
* @copyright Copyright (c) 2004, 2012 Jan Krakora
|
||||||
|
* @license PhpModbus license
|
||||||
|
* @category Phpmodbus
|
||||||
|
* @tutorial Phpmodbus.pkg
|
||||||
|
* @package Phpmodbus
|
||||||
|
* @version $id$
|
||||||
|
*
|
||||||
|
*/
|
||||||
|
|
||||||
|
/**
|
||||||
|
* ModbusMasterUdp
|
||||||
|
*
|
||||||
|
* This class deals with the MODBUS master using UDP stack.
|
||||||
|
*
|
||||||
|
* Implemented MODBUS master functions:
|
||||||
|
* - FC 1: read coils
|
||||||
|
* - FC 3: read multiple registers
|
||||||
|
* - FC 15: write multiple coils
|
||||||
|
* - FC 16: write multiple registers
|
||||||
|
* - FC 23: read write registers
|
||||||
|
*
|
||||||
|
* @author Jan Krakora
|
||||||
|
* @copyright Copyright (c) 2004, 2012 Jan Krakora
|
||||||
|
* @package Phpmodbus
|
||||||
|
*
|
||||||
|
*/
|
||||||
|
class ModbusMasterUdp extends ModbusMaster
|
||||||
|
{
|
||||||
|
/**
|
||||||
|
* ModbusMasterUdp
|
||||||
|
*
|
||||||
|
* This is the constructor that defines {@link $host} IP address of the object.
|
||||||
|
*
|
||||||
|
* @param String $host An IP address of a Modbus UDP device. E.g. "192.168.1.1".
|
||||||
|
*/
|
||||||
|
public function __construct($host)
|
||||||
|
{
|
||||||
|
parent::__construct($host, "UDP");
|
||||||
|
}
|
||||||
|
}
|
||||||
+266
@@ -0,0 +1,266 @@
|
|||||||
|
<?php
|
||||||
|
|
||||||
|
namespace PHPModbus;
|
||||||
|
use Exception;
|
||||||
|
|
||||||
|
/**
|
||||||
|
* Phpmodbus Copyright (c) 2004, 2012 Jan Krakora
|
||||||
|
*
|
||||||
|
* This source file is subject to the "PhpModbus license" that is bundled
|
||||||
|
* with this package in the file license.txt.
|
||||||
|
*
|
||||||
|
* @author Jan Krakora
|
||||||
|
* @copyright Copyright (c) 2004, 2012 Jan Krakora
|
||||||
|
* @license PhpModbus license
|
||||||
|
* @category Phpmodbus
|
||||||
|
* @package Phpmodbus
|
||||||
|
* @version $id$
|
||||||
|
*
|
||||||
|
*/
|
||||||
|
|
||||||
|
/**
|
||||||
|
* PhpType
|
||||||
|
*
|
||||||
|
* The class includes set of methods that convert the received Modbus data
|
||||||
|
* (array of bytes) to the PHP data type, i.e. signed int, unsigned int and float.
|
||||||
|
*
|
||||||
|
* @author Jan Krakora
|
||||||
|
* @copyright Copyright (c) 2004, 2012 Jan Krakora
|
||||||
|
* @package Phpmodbus
|
||||||
|
*
|
||||||
|
*/
|
||||||
|
class PhpType
|
||||||
|
{
|
||||||
|
/**
|
||||||
|
* bytes2float
|
||||||
|
*
|
||||||
|
* The function converts array of 4 bytes to float. The return value
|
||||||
|
* depends on order of the input bytes (endianning).
|
||||||
|
*
|
||||||
|
* @param array $values
|
||||||
|
* @param bool $bigEndian
|
||||||
|
* @return float
|
||||||
|
*/
|
||||||
|
public static function bytes2float($values, $bigEndian = 0)
|
||||||
|
{
|
||||||
|
// Set the array to correct form
|
||||||
|
$data = self::checkData($values);
|
||||||
|
// Combine bytes
|
||||||
|
$real = self::combineBytes($data, $bigEndian);
|
||||||
|
// Convert the real value to float
|
||||||
|
return (float)self::real2float($real);
|
||||||
|
}
|
||||||
|
|
||||||
|
/**
|
||||||
|
* bytes2signedInt
|
||||||
|
*
|
||||||
|
* The function converts array of 2 or 4 bytes to signed integer.
|
||||||
|
* The return value depends on order of the input bytes (endianning).
|
||||||
|
*
|
||||||
|
* @param array $values
|
||||||
|
* @param bool $bigEndian
|
||||||
|
* @return int
|
||||||
|
*/
|
||||||
|
public static function bytes2signedInt($values, $bigEndian = 0)
|
||||||
|
{
|
||||||
|
$data = array();
|
||||||
|
$int = 0;
|
||||||
|
// Set the array to correct form
|
||||||
|
$data = self::checkData($values);
|
||||||
|
// Combine bytes
|
||||||
|
$int = self::combineBytes($data, $bigEndian);
|
||||||
|
// In the case of signed 2 byte value convert it to 4 byte one
|
||||||
|
if ((count($values) == 2) && ((0x8000 & $int) > 0)) {
|
||||||
|
$int = 0xFFFF8000 | $int;
|
||||||
|
}
|
||||||
|
// Convert the value
|
||||||
|
return (int)self::dword2signedInt($int);
|
||||||
|
}
|
||||||
|
|
||||||
|
/**
|
||||||
|
* bytes2unsignedInt
|
||||||
|
*
|
||||||
|
* The function converts array of 2 or 4 bytes to unsigned integer.
|
||||||
|
* The return value depends on order of the input bytes (endianning).
|
||||||
|
*
|
||||||
|
* @param array $values
|
||||||
|
* @param bool $bigEndian
|
||||||
|
* @return int|float
|
||||||
|
*/
|
||||||
|
public static function bytes2unsignedInt($values, $bigEndian = 0)
|
||||||
|
{
|
||||||
|
$data = array();
|
||||||
|
$int = 0;
|
||||||
|
// Set the array to correct form
|
||||||
|
$data = self::checkData($values);
|
||||||
|
// Combine bytes
|
||||||
|
$int = self::combineBytes($data, $bigEndian);
|
||||||
|
// Convert the value
|
||||||
|
return self::dword2unsignedInt($int);
|
||||||
|
}
|
||||||
|
|
||||||
|
/**
|
||||||
|
* bytes2string
|
||||||
|
*
|
||||||
|
* The function converts an values array to the string. The function detects
|
||||||
|
* the end of the string by 0x00 character as defined by string standards.
|
||||||
|
*
|
||||||
|
* @param array $values
|
||||||
|
* @param bool $bigEndian
|
||||||
|
* @return string
|
||||||
|
*/
|
||||||
|
public static function bytes2string($values, $bigEndian = 0)
|
||||||
|
{
|
||||||
|
// Prepare string variable
|
||||||
|
$str = "";
|
||||||
|
// Parse the received data word array
|
||||||
|
for ($i = 0; $i < count($values); $i += 2) {
|
||||||
|
if ($bigEndian) {
|
||||||
|
if ($values[$i] != 0) {
|
||||||
|
$str .= chr($values[$i]);
|
||||||
|
} else {
|
||||||
|
break;
|
||||||
|
}
|
||||||
|
if ($values[$i + 1] != 0) {
|
||||||
|
$str .= chr($values[$i + 1]);
|
||||||
|
} else {
|
||||||
|
break;
|
||||||
|
}
|
||||||
|
} else {
|
||||||
|
if ($values[$i + 1] != 0) {
|
||||||
|
$str .= chr($values[$i + 1]);
|
||||||
|
} else {
|
||||||
|
break;
|
||||||
|
}
|
||||||
|
if ($values[$i] != 0) {
|
||||||
|
$str .= chr($values[$i]);
|
||||||
|
} else {
|
||||||
|
break;
|
||||||
|
}
|
||||||
|
}
|
||||||
|
}
|
||||||
|
// return string
|
||||||
|
return $str;
|
||||||
|
}
|
||||||
|
|
||||||
|
/**
|
||||||
|
* real2float
|
||||||
|
*
|
||||||
|
* This function converts a value in IEC-1131 REAL single precision form to float.
|
||||||
|
*
|
||||||
|
* For more see [{@link http://en.wikipedia.org/wiki/Single_precision Single precision on Wiki}] or
|
||||||
|
* [{@link http://de.php.net/manual/en/function.base-convert.php PHP base_convert function commentary}, Todd Stokes
|
||||||
|
* @ Georgia Tech 21-Nov-2007] or
|
||||||
|
* [{@link http://www.php.net/manual/en/function.pack.php PHP pack/unpack functionality}]
|
||||||
|
*
|
||||||
|
* @param int $value in IEC REAL data type to be converted
|
||||||
|
* @return float float value
|
||||||
|
*/
|
||||||
|
private static function real2float($value)
|
||||||
|
{
|
||||||
|
// get unsigned long
|
||||||
|
$ulong = pack("L", $value);
|
||||||
|
// set float
|
||||||
|
$float = unpack("f", $ulong);
|
||||||
|
|
||||||
|
return $float[1];
|
||||||
|
}
|
||||||
|
|
||||||
|
/**
|
||||||
|
* dword2signedInt
|
||||||
|
*
|
||||||
|
* Switch double word to signed integer
|
||||||
|
*
|
||||||
|
* @param int $value
|
||||||
|
* @return int
|
||||||
|
*/
|
||||||
|
private static function dword2signedInt($value)
|
||||||
|
{
|
||||||
|
if ((0x80000000 & $value) != 0) {
|
||||||
|
return -(0x7FFFFFFF & ~$value) - 1;
|
||||||
|
} else {
|
||||||
|
return (0x7FFFFFFF & $value);
|
||||||
|
}
|
||||||
|
}
|
||||||
|
|
||||||
|
/**
|
||||||
|
* dword2signedInt
|
||||||
|
*
|
||||||
|
* Switch double word to unsigned integer
|
||||||
|
*
|
||||||
|
* @param int $value
|
||||||
|
* @return int|float
|
||||||
|
*/
|
||||||
|
private static function dword2unsignedInt($value)
|
||||||
|
{
|
||||||
|
if ((0x80000000 & $value) != 0) {
|
||||||
|
return ((float)(0x7FFFFFFF & $value)) + 2147483648;
|
||||||
|
} else {
|
||||||
|
return (int)(0x7FFFFFFF & $value);
|
||||||
|
}
|
||||||
|
}
|
||||||
|
|
||||||
|
/**
|
||||||
|
* checkData
|
||||||
|
*
|
||||||
|
* Check if the data variable is array, and check if the values are numeric
|
||||||
|
*
|
||||||
|
* @param int[] $data
|
||||||
|
* @return int
|
||||||
|
* @throws Exception
|
||||||
|
*/
|
||||||
|
private static function checkData($data)
|
||||||
|
{
|
||||||
|
// Check the data
|
||||||
|
if (!is_array($data) ||
|
||||||
|
count($data) < 2 ||
|
||||||
|
count($data) > 4 ||
|
||||||
|
count($data) == 3
|
||||||
|
) {
|
||||||
|
throw new Exception('The input data should be an array of 2 or 4 bytes.');
|
||||||
|
}
|
||||||
|
// Fill the rest of array by zeroes
|
||||||
|
if (count($data) == 2) {
|
||||||
|
$data[2] = 0;
|
||||||
|
$data[3] = 0;
|
||||||
|
}
|
||||||
|
// Check the values to be number
|
||||||
|
if (!is_numeric($data[0]) ||
|
||||||
|
!is_numeric($data[1]) ||
|
||||||
|
!is_numeric($data[2]) ||
|
||||||
|
!is_numeric($data[3])
|
||||||
|
) {
|
||||||
|
throw new Exception('Data are not numeric or the array keys are not indexed by 0,1,2 and 3');
|
||||||
|
}
|
||||||
|
|
||||||
|
return $data;
|
||||||
|
}
|
||||||
|
|
||||||
|
/**
|
||||||
|
* combineBytes
|
||||||
|
*
|
||||||
|
* Combine bytes together
|
||||||
|
*
|
||||||
|
* @param int $data
|
||||||
|
* @param bool $bigEndian
|
||||||
|
* @return int
|
||||||
|
*/
|
||||||
|
private static function combineBytes($data, $bigEndian)
|
||||||
|
{
|
||||||
|
$value = 0;
|
||||||
|
// Combine bytes
|
||||||
|
if ($bigEndian == 0) {
|
||||||
|
$value = (($data[3] & 0xFF) << 16) |
|
||||||
|
(($data[2] & 0xFF) << 24) |
|
||||||
|
(($data[1] & 0xFF)) |
|
||||||
|
(($data[0] & 0xFF) << 8);
|
||||||
|
} else {
|
||||||
|
$value = (($data[3] & 0xFF) << 24) |
|
||||||
|
(($data[2] & 0xFF) << 16) |
|
||||||
|
(($data[1] & 0xFF) << 8) |
|
||||||
|
(($data[0] & 0xFF));
|
||||||
|
}
|
||||||
|
|
||||||
|
return $value;
|
||||||
|
}
|
||||||
|
}
|
||||||
@@ -0,0 +1,256 @@
|
|||||||
|
|
||||||
|
|
||||||
|
(* @NESTEDCOMMENTS := 'Yes' *)
|
||||||
|
(* @PATH := '' *)
|
||||||
|
(* @OBJECTFLAGS := '0, 8' *)
|
||||||
|
(* @SYMFILEFLAGS := '2048' *)
|
||||||
|
PROGRAM PLC_PRG
|
||||||
|
VAR
|
||||||
|
(* BOOL, COIL *)
|
||||||
|
COIL1 AT %MX0.0 : BOOL := 0;
|
||||||
|
COIL2 AT %MX0.1 : BOOL := 0;
|
||||||
|
COIL3 AT %MX0.2 : BOOL := 0;
|
||||||
|
COIL4 AT %MX0.3 : BOOL := 0;
|
||||||
|
COIL5 AT %MX0.4 : BOOL := 0;
|
||||||
|
COIL6 AT %MX0.5 : BOOL := 0;
|
||||||
|
COIL7 AT %MX0.6 : BOOL := 0;
|
||||||
|
COIL8 AT %MX0.7 : BOOL := 0;
|
||||||
|
|
||||||
|
(* BYTE *)
|
||||||
|
BYTE1 AT %MB0 : BYTE := 0;
|
||||||
|
BYTE2 AT %MB1 : BYTE := 0;
|
||||||
|
BYTE3 AT %MB2 : BYTE := 0;
|
||||||
|
BYTE4 AT %MB3 : BYTE := 0;
|
||||||
|
BYTE5 AT %MB4 : BYTE := 0;
|
||||||
|
|
||||||
|
(* INT *)
|
||||||
|
INT1 AT %MW0 : INT := 0;
|
||||||
|
INT2 AT %MW1 : INT := 0;
|
||||||
|
INT3 AT %MW2 : INT := 0;
|
||||||
|
INT4 AT %MW3 : INT := 0;
|
||||||
|
INT5 AT %MW4 : INT := 0;
|
||||||
|
|
||||||
|
(* WORD *)
|
||||||
|
WORD1 AT %MW0 : WORD := 0;
|
||||||
|
WORD2 AT %MW1 : WORD := 0;
|
||||||
|
WORD3 AT %MW2 : WORD := 0;
|
||||||
|
WORD4 AT %MW3 : WORD := 0;
|
||||||
|
WORD5 AT %MW4 : WORD := 0;
|
||||||
|
|
||||||
|
(* DINT *)
|
||||||
|
DINT1 AT %MD0 : DINT := 0;
|
||||||
|
DINT2 AT %MD1 : DINT := 0;
|
||||||
|
DINT3 AT %MD2 : DINT := 0;
|
||||||
|
DINT4 AT %MD3 : DINT := 0;
|
||||||
|
DINT5 AT %MD4 : DINT := 0;
|
||||||
|
|
||||||
|
(* DWORD *)
|
||||||
|
DWORD1 AT %MD0 : DWORD := 0;
|
||||||
|
DWORD2 AT %MD1 : DWORD := 0;
|
||||||
|
DWORD3 AT %MD2 : DWORD := 0;
|
||||||
|
DWORD4 AT %MD3 : DWORD := 0;
|
||||||
|
DWORD5 AT %MD4 : DWORD := 0;
|
||||||
|
|
||||||
|
(* REAL *)
|
||||||
|
REAL1 AT %MD0 : REAL := 0;
|
||||||
|
REAL2 AT %MD1 : REAL := 0;
|
||||||
|
REAL3 AT %MD2 : REAL := 0;
|
||||||
|
REAL4 AT %MD3 : REAL := 0;
|
||||||
|
REAL5 AT %MD4 : REAL := 0;
|
||||||
|
|
||||||
|
(* String *)
|
||||||
|
STRING1 AT %MW0 : STRING := 'Hello word!!!';
|
||||||
|
END_VAR
|
||||||
|
|
||||||
|
(* @END_DECLARATION := '0' *)
|
||||||
|
(* Something to do *)
|
||||||
|
;
|
||||||
|
END_PROGRAM
|
||||||
|
|
||||||
|
(* @NESTEDCOMMENTS := 'Yes' *)
|
||||||
|
(* @GLOBAL_VARIABLE_LIST := 'Global_Variables' *)
|
||||||
|
(* @PATH := '' *)
|
||||||
|
(* @OBJECTFLAGS := '0, 8' *)
|
||||||
|
(* @SYMFILEFLAGS := '2048' *)
|
||||||
|
VAR_GLOBAL
|
||||||
|
END_VAR
|
||||||
|
|
||||||
|
(* @OBJECT_END := 'Global_Variables' *)
|
||||||
|
(* @CONNECTIONS := Global_Variables
|
||||||
|
FILENAME : ''
|
||||||
|
FILETIME : 0
|
||||||
|
EXPORT : 0
|
||||||
|
NUMOFCONNECTIONS : 0
|
||||||
|
*)
|
||||||
|
|
||||||
|
(* @NESTEDCOMMENTS := 'Yes' *)
|
||||||
|
(* @GLOBAL_VARIABLE_LIST := 'Variable_Configuration' *)
|
||||||
|
(* @PATH := '' *)
|
||||||
|
(* @OBJECTFLAGS := '0, 8' *)
|
||||||
|
(* @SYMFILEFLAGS := '2048' *)
|
||||||
|
VAR_CONFIG
|
||||||
|
END_VAR
|
||||||
|
|
||||||
|
(* @OBJECT_END := 'Variable_Configuration' *)
|
||||||
|
(* @CONNECTIONS := Variable_Configuration
|
||||||
|
FILENAME : ''
|
||||||
|
FILETIME : 0
|
||||||
|
EXPORT : 0
|
||||||
|
NUMOFCONNECTIONS : 0
|
||||||
|
*)
|
||||||
|
|
||||||
|
|
||||||
|
_ALARMCONFIG
|
||||||
|
_ALARMCONFIGNEXTTEXTID : 10002
|
||||||
|
_ALARMCONFIGFORMATS : 'HH$':$'mm$':$'ss','dd$'-$'MM$'-$'yyyy'
|
||||||
|
_ALARMCLASSLIST : 1
|
||||||
|
_ALARMCLASSID : 0
|
||||||
|
_ALARMCLASSACKTYPE : 0
|
||||||
|
_ALARMCLASSNAME : 'DEFAULT'
|
||||||
|
_ALARMCLASSDESCRIPTION : ''
|
||||||
|
_ALARMCLASSBGCOLORS : 16777215,16777215,16777215
|
||||||
|
_ALARMCLASSTEXTCOLORS : 3394560,255,16711680
|
||||||
|
_ALARMCLASSBITMAPS : '','',''
|
||||||
|
_ALARMACTIONLIST : 0
|
||||||
|
(* @ALARMCLASSRESETCOLORS := '_ALARMCLASSRESETCOLORS: 33023,16777215' *)
|
||||||
|
(* @ALARMCLASSRESETBITMAP := '_ALARMCLASSRESETBITMAP: $'$'' *)
|
||||||
|
_ALARMGROUPLISTNAME : 'System'
|
||||||
|
_ALARMGROUPPATH : 'System'
|
||||||
|
_ALARMGROUPLIST : 0
|
||||||
|
_VISUALSETTINGSFLAGS : 0,0,0,0
|
||||||
|
_VISUALSETTINGSFLAGS : '','',''
|
||||||
|
_VISUALSETTINGSDYNTEXTFILECOUNT : 0
|
||||||
|
|
||||||
|
(* @ALARMCONFIGFLAGS := '_ALARMCONFIGFLAGS: 0' *)
|
||||||
|
(* @ALARMCONFIGGLOBALDB_STR := '_ALARMCONFIGGLOBALDB_STRINGS: $'$',$'$',$'$',$'$'' *)
|
||||||
|
(* @ALARMCONFIGGLOBALDB_NUM := '_ALARMCONFIGGLOBALDB_NUMBERS: 0,0' *)
|
||||||
|
_END_ALARMCONFIG
|
||||||
|
|
||||||
|
|
||||||
|
LIBRARY
|
||||||
|
Standard.lib 2.12.10 14:48:34
|
||||||
|
(* @LIBRARYSYMFILEINFO := '0' *)
|
||||||
|
NumOfPOUs: 26
|
||||||
|
ASCIIBYTE_TO_STRING: 2048
|
||||||
|
CONCAT: 0
|
||||||
|
CTD: 0
|
||||||
|
CTU: 0
|
||||||
|
CTUD: 0
|
||||||
|
DELETE: 0
|
||||||
|
F_TRIG: 0
|
||||||
|
FIND: 0
|
||||||
|
INSERT: 0
|
||||||
|
LEFT: 0
|
||||||
|
LEN: 0
|
||||||
|
MID: 0
|
||||||
|
R_TRIG: 0
|
||||||
|
REAL_STATE: 2048
|
||||||
|
REPLACE: 0
|
||||||
|
RIGHT: 0
|
||||||
|
RS: 0
|
||||||
|
RTC: 0
|
||||||
|
SEMA: 0
|
||||||
|
SR: 0
|
||||||
|
STANDARD_VERSION: 2048
|
||||||
|
STRING_COMPARE: 2048
|
||||||
|
STRING_TO_ASCIIBYTE: 2048
|
||||||
|
TOF: 0
|
||||||
|
TON: 0
|
||||||
|
TP: 0
|
||||||
|
NumOfGVLs: 1
|
||||||
|
'Global Variables 0': 0
|
||||||
|
END_LIBRARY
|
||||||
|
|
||||||
|
LIBRARY
|
||||||
|
SYSLIBCALLBACK.LIB 2.12.10 14:48:32
|
||||||
|
(* @LIBRARYSYMFILEINFO := '0' *)
|
||||||
|
NumOfPOUs: 2
|
||||||
|
SysCallbackRegister: 0
|
||||||
|
SysCallbackUnregister: 0
|
||||||
|
NumOfGVLs: 2
|
||||||
|
Globale_Variablen: 0
|
||||||
|
Version: 0
|
||||||
|
END_LIBRARY
|
||||||
|
|
||||||
|
PLC_CONFIGURATION
|
||||||
|
_GLOBAL
|
||||||
|
_VERSION: 3
|
||||||
|
_AUTOADR: 0
|
||||||
|
_CHECKADR: 0
|
||||||
|
_SAVECONFIGFILESINPROJECT: 0
|
||||||
|
_END_GLOBAL
|
||||||
|
|
||||||
|
_MODULE: '3S'
|
||||||
|
_SECTION_NAME: 'Root'
|
||||||
|
_INDEX_IN_PARENT: '-1'
|
||||||
|
_MODULE_NAME: 'Hardware configuration'
|
||||||
|
_NODE_ID: -1
|
||||||
|
_IECIN: %IB0
|
||||||
|
_IECOUT: %QB0
|
||||||
|
_IECDIAG: %MB0
|
||||||
|
_DOWNLOAD: 1
|
||||||
|
_EXCLUDEFROMAUTOADR: 0
|
||||||
|
_COMMENT: ''
|
||||||
|
|
||||||
|
_MODULE: '3S'
|
||||||
|
_SECTION_NAME: 'K_Bus'
|
||||||
|
_INDEX_IN_PARENT: '1'
|
||||||
|
_MODULE_NAME: 'K-Bus'
|
||||||
|
_NODE_ID: 0
|
||||||
|
_IECIN: %IB0
|
||||||
|
_IECOUT: %QB0
|
||||||
|
_IECDIAG: %MB0
|
||||||
|
_DOWNLOAD: 1
|
||||||
|
_EXCLUDEFROMAUTOADR: 0
|
||||||
|
_COMMENT: ''
|
||||||
|
_END_MODULE
|
||||||
|
|
||||||
|
_MODULE: '3S'
|
||||||
|
_SECTION_NAME: 'FB_VARS'
|
||||||
|
_INDEX_IN_PARENT: '2'
|
||||||
|
_MODULE_NAME: 'Fieldbus variables'
|
||||||
|
_NODE_ID: 1
|
||||||
|
_IECIN: %IB0
|
||||||
|
_IECOUT: %QB0
|
||||||
|
_IECDIAG: %MB0
|
||||||
|
_DOWNLOAD: 1
|
||||||
|
_EXCLUDEFROMAUTOADR: 0
|
||||||
|
_COMMENT: ''
|
||||||
|
_END_MODULE
|
||||||
|
_END_MODULE
|
||||||
|
PLC_END
|
||||||
|
|
||||||
|
|
||||||
|
RESOURCE
|
||||||
|
{event_task : 'start','Called when program starts','','FUNCTION systemevent: DWORD VAR_INPUT dwEvent: DWORD; dwFilter: DWORD; dwOwner: DWORD; END_VAR '}{event_task_info : 0,1,11986}
|
||||||
|
{event_task : 'stop','Called when program stops','','FUNCTION systemevent: DWORD VAR_INPUT dwEvent: DWORD; dwFilter: DWORD; dwOwner: DWORD; END_VAR '}{event_task_info : 0,2,11986}
|
||||||
|
{event_task : 'before_reset','Called before reset takes place','','FUNCTION systemevent: DWORD VAR_INPUT dwEvent: DWORD; dwFilter: DWORD; dwOwner: DWORD; END_VAR '}{event_task_info : 0,3,11986}
|
||||||
|
{event_task : 'after_reset','Called after reset took place','','FUNCTION systemevent: DWORD VAR_INPUT dwEvent: DWORD; dwFilter: DWORD; dwOwner: DWORD; END_VAR '}{event_task_info : 0,4,11986}
|
||||||
|
{event_task : 'shutdown','Called before shutdown is performed (Firmware update over ethernet)','','FUNCTION systemevent: DWORD VAR_INPUT dwEvent: DWORD; dwFilter: DWORD; dwOwner: DWORD; END_VAR '}{event_task_info : 0,5,11986}
|
||||||
|
{event_task : 'excpt_watchdog','Software watchdog of IEC-task expired','','FUNCTION systemevent: DWORD VAR_INPUT dwEvent: DWORD; dwFilter: DWORD; dwOwner: DWORD; END_VAR '}{event_task_info : 0,7,11986}
|
||||||
|
{event_task : 'excpt_fieldbus','Fieldbus error','','FUNCTION systemevent: DWORD VAR_INPUT dwEvent: DWORD; dwFilter: DWORD; dwOwner: DWORD; END_VAR '}{event_task_info : 0,9,11986}
|
||||||
|
{event_task : 'excpt_ioupdate','KBus error','','FUNCTION systemevent: DWORD VAR_INPUT dwEvent: DWORD; dwFilter: DWORD; dwOwner: DWORD; END_VAR '}{event_task_info : 0,10,11986}
|
||||||
|
{event_task : 'excpt_dividebyzero','Division by zero. Only integer operations!','','FUNCTION systemevent: DWORD VAR_INPUT dwEvent: DWORD; dwFilter: DWORD; dwOwner: DWORD; END_VAR '}{event_task_info : 0,18,11986}
|
||||||
|
{event_task : 'excpt_noncontinuable','Exception handler','','FUNCTION systemevent: DWORD VAR_INPUT dwEvent: DWORD; dwFilter: DWORD; dwOwner: DWORD; END_VAR '}{event_task_info : 0,20,11986}
|
||||||
|
{event_task : 'after_reading_inputs','Called after reading of inputs','','FUNCTION systemevent: DWORD VAR_INPUT dwEvent: DWORD; dwFilter: DWORD; dwOwner: DWORD; END_VAR '}{event_task_info : 0,28,11986}
|
||||||
|
{event_task : 'before_writing_outputs','Called before writing of outputs','','FUNCTION systemevent: DWORD VAR_INPUT dwEvent: DWORD; dwFilter: DWORD; dwOwner: DWORD; END_VAR '}{event_task_info : 0,29,11986}
|
||||||
|
{event_task : 'debug_loop','Debug loop at breakpoint','','FUNCTION systemevent: DWORD VAR_INPUT dwEvent: DWORD; dwFilter: DWORD; dwOwner: DWORD; END_VAR '}{event_task_info : 0,31,11986}
|
||||||
|
{event_task : 'online_change','Is called after CodeInit() at Online-Change','','FUNCTION systemevent: DWORD VAR_INPUT dwEvent: DWORD; dwFilter: DWORD; dwOwner: DWORD; END_VAR '}{event_task_info : 0,33,11986}
|
||||||
|
{event_task : 'before_download','Is called before the Download starts','','FUNCTION systemevent: DWORD VAR_INPUT dwEvent: DWORD; dwFilter: DWORD; dwOwner: DWORD; END_VAR '}{event_task_info : 0,34,11986}
|
||||||
|
{event_task : 'event_login','Is called before the login service is performed','','FUNCTION systemevent: DWORD VAR_INPUT dwEvent: DWORD; dwFilter: DWORD; dwOwner: DWORD; END_VAR '}{event_task_info : 0,501,11986}
|
||||||
|
{event_task : 'eth_overload','Ethernet Overload','','FUNCTION systemevent: DWORD VAR_INPUT dwEvent: DWORD; dwFilter: DWORD; dwOwner: DWORD; END_VAR '}{event_task_info : 0,750,11986}
|
||||||
|
{event_task : 'eth_network_ready','Is called directly after the Network and the PLC are initialised','','FUNCTION systemevent: DWORD VAR_INPUT dwEvent: DWORD; dwFilter: DWORD; dwOwner: DWORD; END_VAR '}{event_task_info : 0,751,11986}
|
||||||
|
{event_task : 'blink_code','New blink code / Blink code cleared ( Call STATUS_GET_LAST_ERROR for details )','','FUNCTION systemevent: DWORD VAR_INPUT dwEvent: DWORD; dwFilter: DWORD; dwOwner: DWORD; END_VAR '}{event_task_info : 0,752,11986}
|
||||||
|
{event_task : 'interrupt_0','Interrupt Real Time Clock (every second)','','FUNCTION systemevent: DWORD VAR_INPUT dwEvent: DWORD; dwFilter: DWORD; dwOwner: DWORD; END_VAR '}{event_task_info : 0,1000,11986}
|
||||||
|
|
||||||
|
END_RESOURCE
|
||||||
|
|
||||||
|
|
||||||
|
_WORKSPACE
|
||||||
|
_GLOBALVISUALSETTINGS
|
||||||
|
_VISUALSETTINGSFLAGS : 0,0,0,0
|
||||||
|
_VISUALSETTINGSFLAGS : '','',''
|
||||||
|
_VISUALSETTINGSDYNTEXTFILECOUNT : 0
|
||||||
|
_VISUALBITMAPLISTCOUNT : 0
|
||||||
|
_END_GLOBALVISUALSETTINGS
|
||||||
|
_END_WORKSPACE
|
||||||
@@ -0,0 +1,15 @@
|
|||||||
|
rem Create Codesys EXP file
|
||||||
|
|
||||||
|
rem Build cmd file
|
||||||
|
set CODESYS="c:\Program Files (x86)\WAGO Software\CoDeSys V2.3\codesys.exe"
|
||||||
|
set PROJECT=test
|
||||||
|
del %PROJECT%.EXP
|
||||||
|
echo file open %PROJECT%.pro >> codesys_cmd_file.cmd
|
||||||
|
echo project export %PROJECT%.EXP >> codesys_cmd_file.cmd
|
||||||
|
rem echo file saveas %PROJECT%.lib internallib >> codesys_cmd_file.cmd
|
||||||
|
echo file close >> codesys_cmd_file.cmd
|
||||||
|
echo file quit >> codesys_cmd_file.cmd
|
||||||
|
%CODESYS% /noinfo /cmd codesys_cmd_file.cmd
|
||||||
|
|
||||||
|
rem Clean all when finished
|
||||||
|
del codesys_cmd_file.cmd
|
||||||
Binary file not shown.
@@ -1 +1,12 @@
|
|||||||
Endianing off <hr>0 --> Packet: 0000_0000_</br>1 --> Packet: 0000_3f80_</br>-2 --> Packet: 0000_c000_</br>0.333333333333 --> Packet: aaaa_3eaa_</br>25 --> Packet: 0000_41c8_</br>Endianing on <hr>0 --> Packet: 0000_0000_</br>1 --> Packet: 3f80_0000_</br>-2 --> Packet: c000_0000_</br>0.333333333333 --> Packet: 3eaa_aaaa_</br>25 --> Packet: 41c8_0000_</br>
|
Endianing off <hr>
|
||||||
|
0 --> Packet: 0000_0000_<br>
|
||||||
|
1 --> Packet: 0000_3f80_<br>
|
||||||
|
-2 --> Packet: 0000_c000_<br>
|
||||||
|
0.333333333333 --> Packet: aaab_3eaa_<br>
|
||||||
|
25 --> Packet: 0000_41c8_<br>
|
||||||
|
Endianing on <hr>
|
||||||
|
0 --> Packet: 0000_0000_<br>
|
||||||
|
1 --> Packet: 3f80_0000_<br>
|
||||||
|
-2 --> Packet: c000_0000_<br>
|
||||||
|
0.333333333333 --> Packet: 3eaa_aaab_<br>
|
||||||
|
25 --> Packet: 41c8_0000_<br>
|
||||||
|
|||||||
@@ -7,7 +7,7 @@ $data = Array (
|
|||||||
"0" => 0, // -> 0000 0000
|
"0" => 0, // -> 0000 0000
|
||||||
"1" => 1, // -> 3f80 0000
|
"1" => 1, // -> 3f80 0000
|
||||||
"2" => -2, // -> c000 0000
|
"2" => -2, // -> c000 0000
|
||||||
"3" => 1/3, // -> 3eaa aaab
|
"3" => 0.333333333333, //1/3 -> 3eaa aaab
|
||||||
"4" => 25 // -> 41c8 0000
|
"4" => 25 // -> 41c8 0000
|
||||||
);
|
);
|
||||||
|
|
||||||
@@ -25,26 +25,26 @@ function printPacket($packet){
|
|||||||
if($i % 2)
|
if($i % 2)
|
||||||
$str .= "_";
|
$str .= "_";
|
||||||
}
|
}
|
||||||
$str .= "</br>";
|
$str .= "<br>\n";
|
||||||
return $str;
|
return $str;
|
||||||
}
|
}
|
||||||
|
|
||||||
echo "Endianing off <hr>";
|
echo "Endianing off <hr>\n";
|
||||||
// Print mixed values
|
// Print mixed values
|
||||||
for($i=0;$i<count($data);$i++) {
|
for($i=0;$i<count($data);$i++) {
|
||||||
echo $data[$i] . " --> ";
|
echo $data[$i] . " --> ";
|
||||||
$v = IecType::iecREAL($data[$i], 0);
|
$v = IecType::iecREAL($data[$i], 0);
|
||||||
echo printPacket($v);
|
echo printPacket($v);
|
||||||
"<br>";
|
"<br>\n";
|
||||||
}
|
}
|
||||||
|
|
||||||
echo "Endianing on <hr>";
|
echo "Endianing on <hr>\n";
|
||||||
// Print mixed values
|
// Print mixed values
|
||||||
for($i=0;$i<count($data);$i++) {
|
for($i=0;$i<count($data);$i++) {
|
||||||
echo $data[$i] . " --> ";
|
echo $data[$i] . " --> ";
|
||||||
$v = IecType::iecREAL($data[$i], 1);
|
$v = IecType::iecREAL($data[$i], 1);
|
||||||
echo printPacket($v);
|
echo printPacket($v);
|
||||||
"<br>";
|
"<br>\n";
|
||||||
}
|
}
|
||||||
|
|
||||||
?>
|
?>
|
||||||
@@ -0,0 +1,11 @@
|
|||||||
|
@echo off
|
||||||
|
call ../config.bat
|
||||||
|
|
||||||
|
for %%f in (test.*.php) do %php% -q "%%f" > "output/%%f.html"
|
||||||
|
|
||||||
|
cd output
|
||||||
|
for %%f in (*.html) do %diff% "%%f" ../ref/"%%f"
|
||||||
|
cd ..
|
||||||
|
pause
|
||||||
|
|
||||||
|
@echo on
|
||||||
@@ -0,0 +1,72 @@
|
|||||||
|
Array
|
||||||
|
(
|
||||||
|
[0] => 0
|
||||||
|
[1] => 0
|
||||||
|
[2] => 0
|
||||||
|
[3] => 1
|
||||||
|
[4] => 0
|
||||||
|
[5] => 1
|
||||||
|
[6] => 0
|
||||||
|
[7] => 255
|
||||||
|
[8] => 0
|
||||||
|
[9] => 255
|
||||||
|
)
|
||||||
|
Array
|
||||||
|
(
|
||||||
|
[0] => 0
|
||||||
|
[1] => 0
|
||||||
|
[2] => 0
|
||||||
|
[3] => 1
|
||||||
|
[4] => 255
|
||||||
|
[5] => 255
|
||||||
|
[6] => 127
|
||||||
|
[7] => 255
|
||||||
|
[8] => 128
|
||||||
|
[9] => 0
|
||||||
|
)
|
||||||
|
Array
|
||||||
|
(
|
||||||
|
[0] => 0
|
||||||
|
[1] => 0
|
||||||
|
[2] => 0
|
||||||
|
[3] => 0
|
||||||
|
[4] => 0
|
||||||
|
[5] => 1
|
||||||
|
[6] => 0
|
||||||
|
[7] => 0
|
||||||
|
[8] => 255
|
||||||
|
[9] => 255
|
||||||
|
[10] => 255
|
||||||
|
[11] => 255
|
||||||
|
[12] => 255
|
||||||
|
[13] => 255
|
||||||
|
[14] => 127
|
||||||
|
[15] => 255
|
||||||
|
[16] => 0
|
||||||
|
[17] => 0
|
||||||
|
[18] => 128
|
||||||
|
[19] => 0
|
||||||
|
)
|
||||||
|
Array
|
||||||
|
(
|
||||||
|
[0] => 0
|
||||||
|
[1] => 0
|
||||||
|
[2] => 0
|
||||||
|
[3] => 0
|
||||||
|
[4] => 0
|
||||||
|
[5] => 0
|
||||||
|
[6] => 63
|
||||||
|
[7] => 128
|
||||||
|
[8] => 0
|
||||||
|
[9] => 0
|
||||||
|
[10] => 192
|
||||||
|
[11] => 0
|
||||||
|
[12] => 170
|
||||||
|
[13] => 171
|
||||||
|
[14] => 62
|
||||||
|
[15] => 170
|
||||||
|
[16] => 0
|
||||||
|
[17] => 0
|
||||||
|
[18] => 65
|
||||||
|
[19] => 200
|
||||||
|
)
|
||||||
@@ -0,0 +1 @@
|
|||||||
|
writeMultipleRegister (FC26): DONE
|
||||||
@@ -0,0 +1 @@
|
|||||||
|
Caught exception: Unknown socket protocol, should be 'TCP' or 'UDP'
|
||||||
@@ -0,0 +1,72 @@
|
|||||||
|
Array
|
||||||
|
(
|
||||||
|
[0] => 0
|
||||||
|
[1] => 0
|
||||||
|
[2] => 0
|
||||||
|
[3] => 1
|
||||||
|
[4] => 0
|
||||||
|
[5] => 1
|
||||||
|
[6] => 0
|
||||||
|
[7] => 255
|
||||||
|
[8] => 0
|
||||||
|
[9] => 255
|
||||||
|
)
|
||||||
|
Array
|
||||||
|
(
|
||||||
|
[0] => 0
|
||||||
|
[1] => 0
|
||||||
|
[2] => 0
|
||||||
|
[3] => 1
|
||||||
|
[4] => 255
|
||||||
|
[5] => 255
|
||||||
|
[6] => 127
|
||||||
|
[7] => 255
|
||||||
|
[8] => 128
|
||||||
|
[9] => 0
|
||||||
|
)
|
||||||
|
Array
|
||||||
|
(
|
||||||
|
[0] => 0
|
||||||
|
[1] => 0
|
||||||
|
[2] => 0
|
||||||
|
[3] => 0
|
||||||
|
[4] => 0
|
||||||
|
[5] => 1
|
||||||
|
[6] => 0
|
||||||
|
[7] => 0
|
||||||
|
[8] => 255
|
||||||
|
[9] => 255
|
||||||
|
[10] => 255
|
||||||
|
[11] => 255
|
||||||
|
[12] => 255
|
||||||
|
[13] => 255
|
||||||
|
[14] => 127
|
||||||
|
[15] => 255
|
||||||
|
[16] => 0
|
||||||
|
[17] => 0
|
||||||
|
[18] => 128
|
||||||
|
[19] => 0
|
||||||
|
)
|
||||||
|
Array
|
||||||
|
(
|
||||||
|
[0] => 0
|
||||||
|
[1] => 0
|
||||||
|
[2] => 0
|
||||||
|
[3] => 0
|
||||||
|
[4] => 0
|
||||||
|
[5] => 0
|
||||||
|
[6] => 63
|
||||||
|
[7] => 128
|
||||||
|
[8] => 0
|
||||||
|
[9] => 0
|
||||||
|
[10] => 192
|
||||||
|
[11] => 0
|
||||||
|
[12] => 170
|
||||||
|
[13] => 171
|
||||||
|
[14] => 62
|
||||||
|
[15] => 170
|
||||||
|
[16] => 0
|
||||||
|
[17] => 0
|
||||||
|
[18] => 65
|
||||||
|
[19] => 200
|
||||||
|
)
|
||||||
@@ -0,0 +1 @@
|
|||||||
|
writeMultipleRegister (FC26): DONE
|
||||||
@@ -0,0 +1,44 @@
|
|||||||
|
<?php
|
||||||
|
require_once dirname(__FILE__) . '/../../Phpmodbus/ModbusMaster.php';
|
||||||
|
require_once dirname(__FILE__) . '/../config.php';
|
||||||
|
|
||||||
|
// Create Modbus object
|
||||||
|
$modbus = new ModbusMaster($test_host_ip, "TCP");
|
||||||
|
|
||||||
|
// Data to be writen - BYTE
|
||||||
|
$data = array(0, 1, 1, pow(2,8)-1, pow(2,8)-1);
|
||||||
|
$dataTypes = array("BYTE", "BYTE", "BYTE", "BYTE", "BYTE");
|
||||||
|
// Write data - FC 16
|
||||||
|
$modbus->writeMultipleRegister(0, 12288, $data, $dataTypes);
|
||||||
|
// Read data - FC3
|
||||||
|
$recData = $modbus->readMultipleRegisters(0, 12288, 5);
|
||||||
|
print_r($recData);
|
||||||
|
|
||||||
|
// Data to be writen - INT
|
||||||
|
$data = array(0, 1, -1, pow(2,15)-1, -pow(2,15));
|
||||||
|
$dataTypes = array("INT", "INT", "INT", "INT", "INT");
|
||||||
|
// Write data - FC 16
|
||||||
|
$modbus->writeMultipleRegister(0, 12288, $data, $dataTypes);
|
||||||
|
// Read data - FC3
|
||||||
|
$recData = $modbus->readMultipleRegisters(0, 12288, 5);
|
||||||
|
print_r($recData);
|
||||||
|
|
||||||
|
// Data to be writen - DINT
|
||||||
|
$data = array(0, 1, -1, pow(2,31)-1, -pow(2,31));
|
||||||
|
$dataTypes = array("DINT", "DINT", "DINT", "DINT", "DINT");
|
||||||
|
// Write data - FC 16
|
||||||
|
$modbus->writeMultipleRegister(0, 12288, $data, $dataTypes);
|
||||||
|
// Read data - FC3
|
||||||
|
$recData = $modbus->readMultipleRegisters(0, 12288, 10);
|
||||||
|
print_r($recData);
|
||||||
|
|
||||||
|
// Data to be writen - REAL
|
||||||
|
$data = array(0, 1, -2, 1/3, 25);
|
||||||
|
$dataTypes = array("REAL", "REAL", "REAL", "REAL", "REAL");
|
||||||
|
// Write data - FC 16
|
||||||
|
$modbus->writeMultipleRegister(0, 12288, $data, $dataTypes);
|
||||||
|
// Read data - FC3
|
||||||
|
$recData = $modbus->readMultipleRegisters(0, 12288, 10);
|
||||||
|
print_r($recData);
|
||||||
|
|
||||||
|
?>
|
||||||
@@ -0,0 +1,24 @@
|
|||||||
|
<?php
|
||||||
|
require_once dirname(__FILE__) . '/../../Phpmodbus/ModbusMaster.php';
|
||||||
|
require_once dirname(__FILE__) . '/../config.php';
|
||||||
|
|
||||||
|
// Create Modbus object
|
||||||
|
$modbus = new ModbusMaster($test_host_ip, "TCP");
|
||||||
|
|
||||||
|
// Data to be writen
|
||||||
|
$data = array(1000, 2000, 1.250, 1.250);
|
||||||
|
$dataTypes = array("REAL", "REAL", "REAL", "REAL");
|
||||||
|
|
||||||
|
// FC23
|
||||||
|
$recData = $modbus->readWriteRegisters(0, 12288, 6, 12288, $data, $dataTypes);
|
||||||
|
|
||||||
|
if(!$recData) {
|
||||||
|
// Print error information if any
|
||||||
|
echo "</br>Error:</br>" . $modbus->errstr . "</br>";
|
||||||
|
//
|
||||||
|
exit();
|
||||||
|
}
|
||||||
|
|
||||||
|
// Print status information
|
||||||
|
echo "writeMultipleRegister (FC26): DONE";
|
||||||
|
?>
|
||||||
@@ -0,0 +1,22 @@
|
|||||||
|
<?php
|
||||||
|
require_once dirname(__FILE__) . '/../../Phpmodbus/ModbusMaster.php';
|
||||||
|
require_once dirname(__FILE__) . '/../config.php';
|
||||||
|
|
||||||
|
// Create Modbus object
|
||||||
|
$modbus = new ModbusMaster($test_host_ip, "Mismatch");
|
||||||
|
|
||||||
|
// Data to be writen
|
||||||
|
$data = array(1000, 2000, 1.250, 1.250);
|
||||||
|
$dataTypes = array("REAL", "REAL", "REAL", "REAL");
|
||||||
|
|
||||||
|
// FC23
|
||||||
|
try {
|
||||||
|
$recData = $modbus->readWriteRegisters(0, 12288, 6, 12288, $data, $dataTypes);
|
||||||
|
} catch (Exception $e) {
|
||||||
|
echo 'Caught exception: ', $e->getMessage(), "\n";
|
||||||
|
exit();
|
||||||
|
}
|
||||||
|
// Should through an Exception
|
||||||
|
|
||||||
|
// Print status information
|
||||||
|
echo "Should never reach this line!";
|
||||||
@@ -0,0 +1,44 @@
|
|||||||
|
<?php
|
||||||
|
require_once dirname(__FILE__) . '/../../Phpmodbus/ModbusMaster.php';
|
||||||
|
require_once dirname(__FILE__) . '/../config.php';
|
||||||
|
|
||||||
|
// Create Modbus object
|
||||||
|
$modbus = new ModbusMaster($test_host_ip, "UDP");
|
||||||
|
|
||||||
|
// Data to be writen - BYTE
|
||||||
|
$data = array(0, 1, 1, pow(2,8)-1, pow(2,8)-1);
|
||||||
|
$dataTypes = array("BYTE", "BYTE", "BYTE", "BYTE", "BYTE");
|
||||||
|
// Write data - FC 16
|
||||||
|
$modbus->writeMultipleRegister(0, 12288, $data, $dataTypes);
|
||||||
|
// Read data - FC3
|
||||||
|
$recData = $modbus->readMultipleRegisters(0, 12288, 5);
|
||||||
|
print_r($recData);
|
||||||
|
|
||||||
|
// Data to be writen - INT
|
||||||
|
$data = array(0, 1, -1, pow(2,15)-1, -pow(2,15));
|
||||||
|
$dataTypes = array("INT", "INT", "INT", "INT", "INT");
|
||||||
|
// Write data - FC 16
|
||||||
|
$modbus->writeMultipleRegister(0, 12288, $data, $dataTypes);
|
||||||
|
// Read data - FC3
|
||||||
|
$recData = $modbus->readMultipleRegisters(0, 12288, 5);
|
||||||
|
print_r($recData);
|
||||||
|
|
||||||
|
// Data to be writen - DINT
|
||||||
|
$data = array(0, 1, -1, pow(2,31)-1, -pow(2,31));
|
||||||
|
$dataTypes = array("DINT", "DINT", "DINT", "DINT", "DINT");
|
||||||
|
// Write data - FC 16
|
||||||
|
$modbus->writeMultipleRegister(0, 12288, $data, $dataTypes);
|
||||||
|
// Read data - FC3
|
||||||
|
$recData = $modbus->readMultipleRegisters(0, 12288, 10);
|
||||||
|
print_r($recData);
|
||||||
|
|
||||||
|
// Data to be writen - REAL
|
||||||
|
$data = array(0, 1, -2, 1/3, 25);
|
||||||
|
$dataTypes = array("REAL", "REAL", "REAL", "REAL", "REAL");
|
||||||
|
// Write data - FC 16
|
||||||
|
$modbus->writeMultipleRegister(0, 12288, $data, $dataTypes);
|
||||||
|
// Read data - FC3
|
||||||
|
$recData = $modbus->readMultipleRegisters(0, 12288, 10);
|
||||||
|
print_r($recData);
|
||||||
|
|
||||||
|
?>
|
||||||
@@ -0,0 +1,24 @@
|
|||||||
|
<?php
|
||||||
|
require_once dirname(__FILE__) . '/../../Phpmodbus/ModbusMaster.php';
|
||||||
|
require_once dirname(__FILE__) . '/../config.php';
|
||||||
|
|
||||||
|
// Create Modbus object
|
||||||
|
$modbus = new ModbusMaster($test_host_ip, "UDP");
|
||||||
|
|
||||||
|
// Data to be writen
|
||||||
|
$data = array(1000, 2000, 1.250, 1.250);
|
||||||
|
$dataTypes = array("REAL", "REAL", "REAL", "REAL");
|
||||||
|
|
||||||
|
// FC23
|
||||||
|
$recData = $modbus->readWriteRegisters(0, 12288, 6, 12288, $data, $dataTypes);
|
||||||
|
|
||||||
|
if(!$recData) {
|
||||||
|
// Print error information if any
|
||||||
|
echo "</br>Error:</br>" . $modbus->errstr . "</br>";
|
||||||
|
//
|
||||||
|
exit();
|
||||||
|
}
|
||||||
|
|
||||||
|
// Print status information
|
||||||
|
echo "writeMultipleRegister (FC26): DONE";
|
||||||
|
?>
|
||||||
@@ -0,0 +1,11 @@
|
|||||||
|
@echo off
|
||||||
|
call ../config.bat
|
||||||
|
|
||||||
|
for %%f in (test.*.php) do %php% -q "%%f" > "output/%%f.html"
|
||||||
|
|
||||||
|
cd output
|
||||||
|
for %%f in (*.html) do %diff% "%%f" ../ref/"%%f"
|
||||||
|
cd ..
|
||||||
|
pause
|
||||||
|
|
||||||
|
@echo on
|
||||||
@@ -0,0 +1,72 @@
|
|||||||
|
Array
|
||||||
|
(
|
||||||
|
[0] => 0
|
||||||
|
[1] => 0
|
||||||
|
[2] => 0
|
||||||
|
[3] => 1
|
||||||
|
[4] => 0
|
||||||
|
[5] => 1
|
||||||
|
[6] => 0
|
||||||
|
[7] => 255
|
||||||
|
[8] => 0
|
||||||
|
[9] => 255
|
||||||
|
)
|
||||||
|
Array
|
||||||
|
(
|
||||||
|
[0] => 0
|
||||||
|
[1] => 0
|
||||||
|
[2] => 0
|
||||||
|
[3] => 1
|
||||||
|
[4] => 255
|
||||||
|
[5] => 255
|
||||||
|
[6] => 127
|
||||||
|
[7] => 255
|
||||||
|
[8] => 128
|
||||||
|
[9] => 0
|
||||||
|
)
|
||||||
|
Array
|
||||||
|
(
|
||||||
|
[0] => 0
|
||||||
|
[1] => 0
|
||||||
|
[2] => 0
|
||||||
|
[3] => 0
|
||||||
|
[4] => 0
|
||||||
|
[5] => 1
|
||||||
|
[6] => 0
|
||||||
|
[7] => 0
|
||||||
|
[8] => 255
|
||||||
|
[9] => 255
|
||||||
|
[10] => 255
|
||||||
|
[11] => 255
|
||||||
|
[12] => 255
|
||||||
|
[13] => 255
|
||||||
|
[14] => 127
|
||||||
|
[15] => 255
|
||||||
|
[16] => 0
|
||||||
|
[17] => 0
|
||||||
|
[18] => 128
|
||||||
|
[19] => 0
|
||||||
|
)
|
||||||
|
Array
|
||||||
|
(
|
||||||
|
[0] => 0
|
||||||
|
[1] => 0
|
||||||
|
[2] => 0
|
||||||
|
[3] => 0
|
||||||
|
[4] => 0
|
||||||
|
[5] => 0
|
||||||
|
[6] => 63
|
||||||
|
[7] => 128
|
||||||
|
[8] => 0
|
||||||
|
[9] => 0
|
||||||
|
[10] => 192
|
||||||
|
[11] => 0
|
||||||
|
[12] => 170
|
||||||
|
[13] => 171
|
||||||
|
[14] => 62
|
||||||
|
[15] => 170
|
||||||
|
[16] => 0
|
||||||
|
[17] => 0
|
||||||
|
[18] => 65
|
||||||
|
[19] => 200
|
||||||
|
)
|
||||||
@@ -0,0 +1 @@
|
|||||||
|
writeMultipleRegister (FC26): DONE
|
||||||
@@ -0,0 +1,44 @@
|
|||||||
|
<?php
|
||||||
|
require_once dirname(__FILE__) . '/../../Phpmodbus/ModbusMasterTcp.php';
|
||||||
|
require_once dirname(__FILE__) . '/../config.php';
|
||||||
|
|
||||||
|
// Create Modbus object
|
||||||
|
$modbus = new ModbusMasterTcp($test_host_ip);
|
||||||
|
|
||||||
|
// Data to be writen - BYTE
|
||||||
|
$data = array(0, 1, 1, pow(2,8)-1, pow(2,8)-1);
|
||||||
|
$dataTypes = array("BYTE", "BYTE", "BYTE", "BYTE", "BYTE");
|
||||||
|
// Write data - FC 16
|
||||||
|
$modbus->writeMultipleRegister(0, 12288, $data, $dataTypes);
|
||||||
|
// Read data - FC3
|
||||||
|
$recData = $modbus->readMultipleRegisters(0, 12288, 5);
|
||||||
|
print_r($recData);
|
||||||
|
|
||||||
|
// Data to be writen - INT
|
||||||
|
$data = array(0, 1, -1, pow(2,15)-1, -pow(2,15));
|
||||||
|
$dataTypes = array("INT", "INT", "INT", "INT", "INT");
|
||||||
|
// Write data - FC 16
|
||||||
|
$modbus->writeMultipleRegister(0, 12288, $data, $dataTypes);
|
||||||
|
// Read data - FC3
|
||||||
|
$recData = $modbus->readMultipleRegisters(0, 12288, 5);
|
||||||
|
print_r($recData);
|
||||||
|
|
||||||
|
// Data to be writen - DINT
|
||||||
|
$data = array(0, 1, -1, pow(2,31)-1, -pow(2,31));
|
||||||
|
$dataTypes = array("DINT", "DINT", "DINT", "DINT", "DINT");
|
||||||
|
// Write data - FC 16
|
||||||
|
$modbus->writeMultipleRegister(0, 12288, $data, $dataTypes);
|
||||||
|
// Read data - FC3
|
||||||
|
$recData = $modbus->readMultipleRegisters(0, 12288, 10);
|
||||||
|
print_r($recData);
|
||||||
|
|
||||||
|
// Data to be writen - REAL
|
||||||
|
$data = array(0, 1, -2, 1/3, 25);
|
||||||
|
$dataTypes = array("REAL", "REAL", "REAL", "REAL", "REAL");
|
||||||
|
// Write data - FC 16
|
||||||
|
$modbus->writeMultipleRegister(0, 12288, $data, $dataTypes);
|
||||||
|
// Read data - FC3
|
||||||
|
$recData = $modbus->readMultipleRegisters(0, 12288, 10);
|
||||||
|
print_r($recData);
|
||||||
|
|
||||||
|
?>
|
||||||
@@ -0,0 +1,24 @@
|
|||||||
|
<?php
|
||||||
|
require_once dirname(__FILE__) . '/../../Phpmodbus/ModbusMasterTcp.php';
|
||||||
|
require_once dirname(__FILE__) . '/../config.php';
|
||||||
|
|
||||||
|
// Create Modbus object
|
||||||
|
$modbus = new ModbusMasterTcp($test_host_ip);
|
||||||
|
|
||||||
|
// Data to be writen
|
||||||
|
$data = array(1000, 2000, 1.250, 1.250);
|
||||||
|
$dataTypes = array("REAL", "REAL", "REAL", "REAL");
|
||||||
|
|
||||||
|
// FC23
|
||||||
|
$recData = $modbus->readWriteRegisters(0, 12288, 6, 12288, $data, $dataTypes);
|
||||||
|
|
||||||
|
if(!$recData) {
|
||||||
|
// Print error information if any
|
||||||
|
echo "</br>Error:</br>" . $modbus->errstr . "</br>";
|
||||||
|
//
|
||||||
|
exit();
|
||||||
|
}
|
||||||
|
|
||||||
|
// Print status information
|
||||||
|
echo "writeMultipleRegister (FC26): DONE";
|
||||||
|
?>
|
||||||
@@ -0,0 +1,66 @@
|
|||||||
|
array(32) {
|
||||||
|
[0]=>
|
||||||
|
bool(true)
|
||||||
|
[1]=>
|
||||||
|
bool(false)
|
||||||
|
[2]=>
|
||||||
|
bool(true)
|
||||||
|
[3]=>
|
||||||
|
bool(true)
|
||||||
|
[4]=>
|
||||||
|
bool(false)
|
||||||
|
[5]=>
|
||||||
|
bool(true)
|
||||||
|
[6]=>
|
||||||
|
bool(true)
|
||||||
|
[7]=>
|
||||||
|
bool(true)
|
||||||
|
[8]=>
|
||||||
|
bool(true)
|
||||||
|
[9]=>
|
||||||
|
bool(true)
|
||||||
|
[10]=>
|
||||||
|
bool(true)
|
||||||
|
[11]=>
|
||||||
|
bool(true)
|
||||||
|
[12]=>
|
||||||
|
bool(false)
|
||||||
|
[13]=>
|
||||||
|
bool(false)
|
||||||
|
[14]=>
|
||||||
|
bool(false)
|
||||||
|
[15]=>
|
||||||
|
bool(false)
|
||||||
|
[16]=>
|
||||||
|
bool(false)
|
||||||
|
[17]=>
|
||||||
|
bool(false)
|
||||||
|
[18]=>
|
||||||
|
bool(false)
|
||||||
|
[19]=>
|
||||||
|
bool(false)
|
||||||
|
[20]=>
|
||||||
|
bool(true)
|
||||||
|
[21]=>
|
||||||
|
bool(true)
|
||||||
|
[22]=>
|
||||||
|
bool(true)
|
||||||
|
[23]=>
|
||||||
|
bool(true)
|
||||||
|
[24]=>
|
||||||
|
bool(true)
|
||||||
|
[25]=>
|
||||||
|
bool(true)
|
||||||
|
[26]=>
|
||||||
|
bool(true)
|
||||||
|
[27]=>
|
||||||
|
bool(true)
|
||||||
|
[28]=>
|
||||||
|
bool(true)
|
||||||
|
[29]=>
|
||||||
|
bool(true)
|
||||||
|
[30]=>
|
||||||
|
bool(true)
|
||||||
|
[31]=>
|
||||||
|
bool(true)
|
||||||
|
}
|
||||||
@@ -62,7 +62,7 @@ Array
|
|||||||
[10] => 192
|
[10] => 192
|
||||||
[11] => 0
|
[11] => 0
|
||||||
[12] => 170
|
[12] => 170
|
||||||
[13] => 170
|
[13] => 171
|
||||||
[14] => 62
|
[14] => 62
|
||||||
[15] => 170
|
[15] => 170
|
||||||
[16] => 0
|
[16] => 0
|
||||||
|
|||||||
@@ -0,0 +1,72 @@
|
|||||||
|
Array
|
||||||
|
(
|
||||||
|
[0] => 0
|
||||||
|
[1] => 0
|
||||||
|
[2] => 0
|
||||||
|
[3] => 1
|
||||||
|
[4] => 0
|
||||||
|
[5] => 1
|
||||||
|
[6] => 0
|
||||||
|
[7] => 255
|
||||||
|
[8] => 0
|
||||||
|
[9] => 255
|
||||||
|
)
|
||||||
|
Array
|
||||||
|
(
|
||||||
|
[0] => 0
|
||||||
|
[1] => 0
|
||||||
|
[2] => 0
|
||||||
|
[3] => 1
|
||||||
|
[4] => 255
|
||||||
|
[5] => 255
|
||||||
|
[6] => 127
|
||||||
|
[7] => 255
|
||||||
|
[8] => 128
|
||||||
|
[9] => 0
|
||||||
|
)
|
||||||
|
Array
|
||||||
|
(
|
||||||
|
[0] => 0
|
||||||
|
[1] => 0
|
||||||
|
[2] => 0
|
||||||
|
[3] => 0
|
||||||
|
[4] => 0
|
||||||
|
[5] => 1
|
||||||
|
[6] => 0
|
||||||
|
[7] => 0
|
||||||
|
[8] => 255
|
||||||
|
[9] => 255
|
||||||
|
[10] => 255
|
||||||
|
[11] => 255
|
||||||
|
[12] => 255
|
||||||
|
[13] => 255
|
||||||
|
[14] => 127
|
||||||
|
[15] => 255
|
||||||
|
[16] => 0
|
||||||
|
[17] => 0
|
||||||
|
[18] => 128
|
||||||
|
[19] => 0
|
||||||
|
)
|
||||||
|
Array
|
||||||
|
(
|
||||||
|
[0] => 0
|
||||||
|
[1] => 0
|
||||||
|
[2] => 0
|
||||||
|
[3] => 0
|
||||||
|
[4] => 0
|
||||||
|
[5] => 0
|
||||||
|
[6] => 63
|
||||||
|
[7] => 128
|
||||||
|
[8] => 0
|
||||||
|
[9] => 0
|
||||||
|
[10] => 192
|
||||||
|
[11] => 0
|
||||||
|
[12] => 170
|
||||||
|
[13] => 171
|
||||||
|
[14] => 62
|
||||||
|
[15] => 170
|
||||||
|
[16] => 0
|
||||||
|
[17] => 0
|
||||||
|
[18] => 65
|
||||||
|
[19] => 200
|
||||||
|
)
|
||||||
@@ -0,0 +1,7 @@
|
|||||||
|
Test should pass when %IX0.0==FALSE and %IX0.1==TRUE
|
||||||
|
array(2) {
|
||||||
|
[0]=>
|
||||||
|
bool(false)
|
||||||
|
[1]=>
|
||||||
|
bool(true)
|
||||||
|
}
|
||||||
@@ -0,0 +1 @@
|
|||||||
|
writeMultipleRegister (FC26): DONE
|
||||||
@@ -0,0 +1,11 @@
|
|||||||
|
Test should pass when %IX0.0==FALSE and %IX0.1==TRUE
|
||||||
|
array(4) {
|
||||||
|
[0]=>
|
||||||
|
int(0)
|
||||||
|
[1]=>
|
||||||
|
int(2)
|
||||||
|
[2]=>
|
||||||
|
int(0)
|
||||||
|
[3]=>
|
||||||
|
int(0)
|
||||||
|
}
|
||||||
@@ -0,0 +1,5 @@
|
|||||||
|
Array
|
||||||
|
(
|
||||||
|
[0] => 0
|
||||||
|
[1] => 5
|
||||||
|
)
|
||||||
@@ -0,0 +1,5 @@
|
|||||||
|
Array
|
||||||
|
(
|
||||||
|
[0] => 207
|
||||||
|
[1] => 199
|
||||||
|
)
|
||||||
@@ -0,0 +1,22 @@
|
|||||||
|
<?php
|
||||||
|
require_once dirname(__FILE__) . '/../../Phpmodbus/ModbusMasterUdp.php';
|
||||||
|
require_once dirname(__FILE__) . '/../config.php';
|
||||||
|
|
||||||
|
// Create Modbus object
|
||||||
|
$modbus = new ModbusMasterUdp($test_host_ip);
|
||||||
|
|
||||||
|
// Data to be writen - BOOL array
|
||||||
|
$data = array(1, 0, TRUE, TRUE, 0, 1, TRUE, TRUE,
|
||||||
|
1, 1, TRUE, TRUE, 0, 0, FALSE, FALSE,
|
||||||
|
0, 0, FALSE, FALSE, 1, 1, TRUE, TRUE,
|
||||||
|
1, 1, TRUE, TRUE, 1, 1, TRUE, TRUE);
|
||||||
|
// Write data - FC 15
|
||||||
|
$modbus->writeMultipleCoils(0, 12288, $data);
|
||||||
|
//echo $modbus->status;
|
||||||
|
//$modbus->status = "";
|
||||||
|
//echo "\n\n";
|
||||||
|
// Read data - FC 1
|
||||||
|
$recData = $modbus->readCoils(0, 12288, 32);
|
||||||
|
//echo $modbus->status;
|
||||||
|
//echo "\n\n";
|
||||||
|
var_dump($recData);
|
||||||
@@ -3,7 +3,7 @@ require_once dirname(__FILE__) . '/../../Phpmodbus/ModbusMasterUdp.php';
|
|||||||
require_once dirname(__FILE__) . '/../config.php';
|
require_once dirname(__FILE__) . '/../config.php';
|
||||||
|
|
||||||
// Create Modbus object
|
// Create Modbus object
|
||||||
$modbus = new ModbusMasterUdp($testip);
|
$modbus = new ModbusMasterUdp($test_host_ip);
|
||||||
|
|
||||||
// Data to be writen - BYTE
|
// Data to be writen - BYTE
|
||||||
$data = array(0, 1, 1, pow(2,8)-1, pow(2,8)-1);
|
$data = array(0, 1, 1, pow(2,8)-1, pow(2,8)-1);
|
||||||
|
|||||||
@@ -0,0 +1,45 @@
|
|||||||
|
<?php
|
||||||
|
require_once dirname(__FILE__) . '/../../Phpmodbus/ModbusMasterUdp.php';
|
||||||
|
require_once dirname(__FILE__) . '/../config.php';
|
||||||
|
|
||||||
|
// Create Modbus object
|
||||||
|
$modbus = new ModbusMasterUdp($test_host_ip);
|
||||||
|
$modbus->client = $test_bind_client_ip;
|
||||||
|
|
||||||
|
// Data to be writen - BYTE
|
||||||
|
$data = array(0, 1, 1, pow(2,8)-1, pow(2,8)-1);
|
||||||
|
$dataTypes = array("BYTE", "BYTE", "BYTE", "BYTE", "BYTE");
|
||||||
|
// Write data - FC 16
|
||||||
|
$modbus->writeMultipleRegister(0, 12288, $data, $dataTypes);
|
||||||
|
// Read data - FC3
|
||||||
|
$recData = $modbus->readMultipleRegisters(0, 12288, 5);
|
||||||
|
print_r($recData);
|
||||||
|
|
||||||
|
// Data to be writen - INT
|
||||||
|
$data = array(0, 1, -1, pow(2,15)-1, -pow(2,15));
|
||||||
|
$dataTypes = array("INT", "INT", "INT", "INT", "INT");
|
||||||
|
// Write data - FC 16
|
||||||
|
$modbus->writeMultipleRegister(0, 12288, $data, $dataTypes);
|
||||||
|
// Read data - FC3
|
||||||
|
$recData = $modbus->readMultipleRegisters(0, 12288, 5);
|
||||||
|
print_r($recData);
|
||||||
|
|
||||||
|
// Data to be writen - DINT
|
||||||
|
$data = array(0, 1, -1, pow(2,31)-1, -pow(2,31));
|
||||||
|
$dataTypes = array("DINT", "DINT", "DINT", "DINT", "DINT");
|
||||||
|
// Write data - FC 16
|
||||||
|
$modbus->writeMultipleRegister(0, 12288, $data, $dataTypes);
|
||||||
|
// Read data - FC3
|
||||||
|
$recData = $modbus->readMultipleRegisters(0, 12288, 10);
|
||||||
|
print_r($recData);
|
||||||
|
|
||||||
|
// Data to be writen - REAL
|
||||||
|
$data = array(0, 1, -2, 1/3, 25);
|
||||||
|
$dataTypes = array("REAL", "REAL", "REAL", "REAL", "REAL");
|
||||||
|
// Write data - FC 16
|
||||||
|
$modbus->writeMultipleRegister(0, 12288, $data, $dataTypes);
|
||||||
|
// Read data - FC3
|
||||||
|
$recData = $modbus->readMultipleRegisters(0, 12288, 10);
|
||||||
|
print_r($recData);
|
||||||
|
|
||||||
|
?>
|
||||||
@@ -0,0 +1,14 @@
|
|||||||
|
<?php
|
||||||
|
require_once dirname(__FILE__) . '/../../Phpmodbus/ModbusMasterUdp.php';
|
||||||
|
require_once dirname(__FILE__) . '/../config.php';
|
||||||
|
|
||||||
|
// Create Modbus object
|
||||||
|
$modbus = new ModbusMasterUdp($test_host_ip);
|
||||||
|
|
||||||
|
// Test requirements
|
||||||
|
echo "Test should pass when %IX0.0==FALSE and %IX0.1==TRUE\n";
|
||||||
|
|
||||||
|
// Read input discretes - FC 2
|
||||||
|
$recData = $modbus->readInputDiscretes(0, 0, 2);
|
||||||
|
|
||||||
|
var_dump($recData);
|
||||||
@@ -3,7 +3,7 @@ require_once dirname(__FILE__) . '/../../Phpmodbus/ModbusMasterUdp.php';
|
|||||||
require_once dirname(__FILE__) . '/../config.php';
|
require_once dirname(__FILE__) . '/../config.php';
|
||||||
|
|
||||||
// Create Modbus object
|
// Create Modbus object
|
||||||
$modbus = new ModbusMasterUdp($testip);
|
$modbus = new ModbusMasterUdp($test_host_ip);
|
||||||
|
|
||||||
// Data to be writen
|
// Data to be writen
|
||||||
$data = array(1000, 2000, 1.250, 1.250);
|
$data = array(1000, 2000, 1.250, 1.250);
|
||||||
|
|||||||
@@ -0,0 +1,25 @@
|
|||||||
|
<?php
|
||||||
|
require_once dirname(__FILE__) . '/../../Phpmodbus/ModbusMasterUdp.php';
|
||||||
|
require_once dirname(__FILE__) . '/../config.php';
|
||||||
|
|
||||||
|
// Create Modbus object
|
||||||
|
$modbus = new ModbusMasterUdp($test_host_ip);
|
||||||
|
$modbus->client = $test_bind_client_ip;
|
||||||
|
|
||||||
|
// Data to be writen
|
||||||
|
$data = array(1000, 2000, 1.250, 1.250);
|
||||||
|
$dataTypes = array("REAL", "REAL", "REAL", "REAL");
|
||||||
|
|
||||||
|
// FC23
|
||||||
|
$recData = $modbus->readWriteRegisters(0, 12288, 6, 12288, $data, $dataTypes);
|
||||||
|
|
||||||
|
if(!$recData) {
|
||||||
|
// Print error information if any
|
||||||
|
echo "</br>Error:</br>" . $modbus->errstr . "</br>";
|
||||||
|
//
|
||||||
|
exit();
|
||||||
|
}
|
||||||
|
|
||||||
|
// Print status information
|
||||||
|
echo "writeMultipleRegister (FC26): DONE";
|
||||||
|
?>
|
||||||
@@ -0,0 +1,14 @@
|
|||||||
|
<?php
|
||||||
|
require_once dirname(__FILE__) . '/../../Phpmodbus/ModbusMasterUdp.php';
|
||||||
|
require_once dirname(__FILE__) . '/../config.php';
|
||||||
|
|
||||||
|
// Create Modbus object
|
||||||
|
$modbus = new ModbusMasterUdp($test_host_ip);
|
||||||
|
|
||||||
|
// Test requirements
|
||||||
|
echo "Test should pass when %IX0.0==FALSE and %IX0.1==TRUE\n";
|
||||||
|
|
||||||
|
// Read input discretes - FC 4
|
||||||
|
$recData = $modbus->readMultipleInputRegisters(0, 0, 2);
|
||||||
|
|
||||||
|
var_dump($recData);
|
||||||
@@ -0,0 +1,23 @@
|
|||||||
|
<?php
|
||||||
|
require_once dirname(__FILE__) . '/../../Phpmodbus/ModbusMasterUdp.php';
|
||||||
|
require_once dirname(__FILE__) . '/../config.php';
|
||||||
|
|
||||||
|
// Create Modbus object
|
||||||
|
$modbus = new ModbusMasterUdp($test_host_ip);
|
||||||
|
|
||||||
|
// Data to be writen - TRUE, FALSE
|
||||||
|
$data_true = array(TRUE);
|
||||||
|
$data_false = array(FALSE);
|
||||||
|
|
||||||
|
// Reset target WORD
|
||||||
|
$modbus->writeSingleRegister(0, 12288, array(0), array('WORD'));
|
||||||
|
|
||||||
|
// Write single coil - FC5
|
||||||
|
$modbus->writeSingleCoil(0, 12288, $data_true);
|
||||||
|
$modbus->writeSingleCoil(0, 12289, $data_false);
|
||||||
|
$modbus->writeSingleCoil(0, 12290, $data_true);
|
||||||
|
$modbus->writeSingleCoil(0, 12291, $data_false);
|
||||||
|
|
||||||
|
// Read data - FC3
|
||||||
|
$recData = $modbus->readMultipleRegisters(0, 12288, 1);
|
||||||
|
print_r($recData);
|
||||||
@@ -0,0 +1,15 @@
|
|||||||
|
<?php
|
||||||
|
require_once dirname(__FILE__) . '/../../Phpmodbus/ModbusMasterUdp.php';
|
||||||
|
require_once dirname(__FILE__) . '/../config.php';
|
||||||
|
|
||||||
|
// Create Modbus object
|
||||||
|
$modbus = new ModbusMasterUdp($test_host_ip);
|
||||||
|
|
||||||
|
// Data to be writen - INT
|
||||||
|
$data = array(-12345);
|
||||||
|
$dataTypes = array("INT");
|
||||||
|
// Write data - FC6
|
||||||
|
$modbus->writeSingleRegister(0, 12288, $data, $dataTypes);
|
||||||
|
// Read data - FC3
|
||||||
|
$recData = $modbus->readMultipleRegisters(0, 12288, 1);
|
||||||
|
print_r($recData);
|
||||||
@@ -0,0 +1,3 @@
|
|||||||
|
Probably broken and dubious.
|
||||||
|
|
||||||
|
Left from the original repo.
|
||||||
+1
-1
@@ -1,4 +1,4 @@
|
|||||||
set php=c:\Program_Files\xampplite\php\php.exe
|
set php=c:\Program_Files\xampp\php\php.exe
|
||||||
rem set php=C:\PHP\versions\php-5.2.6-Win32\php.exe -d auto_prepend_file=C:\PHP\locale.php
|
rem set php=C:\PHP\versions\php-5.2.6-Win32\php.exe -d auto_prepend_file=C:\PHP\locale.php
|
||||||
set diff="diff.exe"
|
set diff="diff.exe"
|
||||||
rem set testUri=http://localHost/nette/_trunk/tests
|
rem set testUri=http://localHost/nette/_trunk/tests
|
||||||
|
|||||||
+2
-2
@@ -1,3 +1,3 @@
|
|||||||
<?php
|
<?php
|
||||||
$testip = "192.192.15.51";
|
$test_host_ip = "192.192.1.10";
|
||||||
?>
|
$test_bind_client_ip = "192.192.1.100";
|
||||||
@@ -1,121 +0,0 @@
|
|||||||
<refentry id="{@id}">
|
|
||||||
<refnamediv>
|
|
||||||
<refname>Phpmodbus user's guide</refname>
|
|
||||||
<refpurpose>Phpmodbus How-to</refpurpose>
|
|
||||||
</refnamediv>
|
|
||||||
<refsynopsisdiv>
|
|
||||||
<author>
|
|
||||||
Jan Krakora
|
|
||||||
<authorblurb>
|
|
||||||
{@link mailto:jak.krakora@wago.com email}
|
|
||||||
</authorblurb>
|
|
||||||
</author>
|
|
||||||
</refsynopsisdiv>
|
|
||||||
{@toc}
|
|
||||||
<refsect1 id="{@id intro}">
|
|
||||||
<title>Introduction</title>
|
|
||||||
<para>
|
|
||||||
Phpmodbus is a PHP library for the Modbus protocol. The library implements
|
|
||||||
Modbus UDP master class with subset of the most used Modbus commands.
|
|
||||||
</para>
|
|
||||||
<para>
|
|
||||||
The library implements:
|
|
||||||
<itemizedlist>
|
|
||||||
<listitem><para>FC 3: read multiple registers</para></listitem>
|
|
||||||
<listitem><para>FC 16: write multiple registers</para></listitem>
|
|
||||||
<listitem><para>FC 23: read write registers</para></listitem>
|
|
||||||
</itemizedlist>
|
|
||||||
</para>
|
|
||||||
<para>
|
|
||||||
For more about Modbus protocol see [{@link http://www.modbus.org}] or
|
|
||||||
[{@link http://en.wikipedia.org/wiki/Modbus Wiki}]
|
|
||||||
</para>
|
|
||||||
<note>
|
|
||||||
Developed with support of <graphic fileref="wago_logo.png"/> {@link http://www.wago.com}.
|
|
||||||
</note>
|
|
||||||
</refsect1>
|
|
||||||
<refsect1 id="{@id intro}">
|
|
||||||
<title>Installation</title>
|
|
||||||
<para>
|
|
||||||
At the first, it is supposed an PHP solution has been already installed on
|
|
||||||
your server (LAMP, WAMP, MSS+CGI etc.).
|
|
||||||
</para>
|
|
||||||
<para>
|
|
||||||
Copy the Phpmodbus library to your PHP project folder.
|
|
||||||
</para>
|
|
||||||
<para>
|
|
||||||
Create a PHP script and assign the library using
|
|
||||||
<programlisting role="ini">
|
|
||||||
<![CDATA[ require_once dirname(__FILE__) . '/Phpmodbus/ModbusMasterUdp.php'; ]]>
|
|
||||||
</programlisting>
|
|
||||||
</para>
|
|
||||||
<para>
|
|
||||||
To create the Modbus master object, that will communicate with a Modbus slave
|
|
||||||
at IP address 192.168.1.1, write
|
|
||||||
<programlisting role="ini">
|
|
||||||
<![CDATA[ $modbus = new ModbusMasterUdp("192.168.1.1"); ]]>
|
|
||||||
</programlisting>
|
|
||||||
</para>
|
|
||||||
<para>
|
|
||||||
To read 5 words (10 bytes) located at the memory beginning at address = 12288 of
|
|
||||||
the devide with Modbus ID=0 use
|
|
||||||
<programlisting role="ini">
|
|
||||||
<![CDATA[ $recData = $modbus->readMultipleRegisters(0, 12288, 5); ]]>
|
|
||||||
</programlisting>
|
|
||||||
</para>
|
|
||||||
<para>
|
|
||||||
For other examples see sections bellow.
|
|
||||||
</para>
|
|
||||||
</refsect1>
|
|
||||||
<refsect1 id="{@id examples}">
|
|
||||||
<title>Examples</title>
|
|
||||||
<para>
|
|
||||||
This section presents library features and examples
|
|
||||||
</para>
|
|
||||||
<refsect2 id="{@id example_fc3}">
|
|
||||||
<title>FC3 - read mutliple registers</title>
|
|
||||||
<para>
|
|
||||||
FC3 functionality example
|
|
||||||
</para>
|
|
||||||
<para>
|
|
||||||
{@example example_fc3.php}
|
|
||||||
</para>
|
|
||||||
</refsect2>
|
|
||||||
<refsect2 id="{@id example_fc16}">
|
|
||||||
<title>FC16 - write mutliple registers</title>
|
|
||||||
<para>
|
|
||||||
FC16 functionality example
|
|
||||||
</para>
|
|
||||||
<para>
|
|
||||||
{@example example_fc16.php}
|
|
||||||
</para>
|
|
||||||
</refsect2>
|
|
||||||
<refsect2 id="{@id example_fc23}">
|
|
||||||
<title>FC23 - read write registers</title>
|
|
||||||
<para>
|
|
||||||
FC23 functionality example
|
|
||||||
</para>
|
|
||||||
<para>
|
|
||||||
{@example example_fc23.php}
|
|
||||||
</para>
|
|
||||||
</refsect2>
|
|
||||||
<refsect2 id="{@id wago_example}">
|
|
||||||
<title>Dump of M-memory from WAGO 750-84x series coupler.</title>
|
|
||||||
<para>
|
|
||||||
Dump of M-memory from WAGO 750-84x series coupler.
|
|
||||||
</para>
|
|
||||||
<para>
|
|
||||||
{@example example_750841_Mmemory.php}
|
|
||||||
</para>
|
|
||||||
</refsect2>
|
|
||||||
<refsect2 id="{@id datatype}">
|
|
||||||
<title>Data conversion to PHP types.</title>
|
|
||||||
<para>
|
|
||||||
Conversion of the data bytes, received from Modbus, to a PHP type.
|
|
||||||
</para>
|
|
||||||
<para>
|
|
||||||
{@example example_datatype.php}
|
|
||||||
</para>
|
|
||||||
</refsect2>
|
|
||||||
</refsect1>
|
|
||||||
</refentry>
|
|
||||||
Binary file not shown.
|
Before Width: | Height: | Size: 1.2 KiB |
Reference in New Issue
Block a user