change license field so packagist shut up

Expose variables to configure socket read and write timeouts in  sec and usec (microseconds) precision

.gitignore

@@ -0,0 +1,5 @@
+/vendor
+composer.lock
+.idea/
+
+*~

.hgignore

@@ -1,2 +0,0 @@
-vendor
-.svn

.hgtags

@@ -1,7 +0,0 @@
-a88b5a87fb4cd49f16ce72062cce19d55f1fbf98 0.2
-a7f90c18859d31922bdd8c61299e2790f5e2eb1a 0.3
-bdf8b3f414c4d08fc0edf9fd1953f55db26e4bac 0.4
-1e09b0da7d8c62a9a292ee51540feac9de4c1222 0.4.1
-e1262f028e180c2719564f840ffa1a9f8672b6be 0.5
-079f8ac1f49faf4e6bbb84d62c39eee1507805f2 0.6
-5885b1a0d0dc89577eeb871ee2c3fba8e70dd4fb 0.7

LICENSE

@@ -1,3 +1,28 @@
++---------------------------------------------------------+
+| 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
+    
+  https://git.ondrovo.com/packages/php-modbus
+
+
++---------------------------------------------------------+
+| ORIGINAL LICENSE                                        |
++---------------------------------------------------------+
+
+
 The Phpmodbus License, Version 1
 ============================
 
@@ -60,3 +85,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
 (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF THIS
 SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE. 
+
+
+
+End of file.

Phpmodbus/IecType.php

@@ -1,133 +0,0 @@
-<?php
-/**
- * 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 value value from 0 to 255
-     * @return value IEC BYTE data type
-     *
-     */
-    public static 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
-     *
-     */
-    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 value value to be converted
-     * @param value endianness defines endian codding (little endian == 0, big endian == 1)
-     * @return value IEC-1131 INT data type
-     *
-     */
-    public static 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
-     */
-    public static 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 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 $endianness
-     * @return int
-     */
-    private static 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));
-    }
-
-}
-
-?>

Phpmodbus/ModbusMasterTcp.php

@@ -1,49 +0,0 @@
-<?php
-/**
- * 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$
- *  
- */
-
-require_once dirname(__FILE__) . '/ModbusMaster.php'; 
-
-/**
- * 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".
-   */         
-  function ModbusMasterTcp($host){
-    $this->host = $host;
-    $this->socket_protocol = "TCP";
-  }
-}

Phpmodbus/ModbusMasterUdp.php

@@ -1,50 +0,0 @@
-<?php
-/**
- * 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$
- *  
- */
-
-require_once dirname(__FILE__) . '/ModbusMaster.php'; 
-
-/**
- * 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".
-   */         
-  function ModbusMasterUdp($host){
-    $this->host = $host;
-    $this->socket_protocol = "UDP";    
-  }
-}

Phpmodbus/PhpType.php

@@ -1,249 +0,0 @@
-<?php
-/**
- * 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 $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;
-    }
-}
-?>

README.md

@@ -1,44 +1,62 @@
-phpmodbus
+# phpmodbus
-=========
-This project deals with an implementation of the basic functionality of the Modbus TCP and UDP based protocol using PHP.
-It's a copy of the releases from the project page over at [Google Code](https://code.google.com/p/phpmodbus/) with
-composer support added.
 
-Features
+Implementation of the basic functionality of the Modbus TCP and UDP based protocol using PHP. 
---------
 
-* Modbus master
+**NOTE: This is a fork to fix & update the library code.**
-    * 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
 
-Example
+> **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
- // Modbus master UDP
+use PHPModbus\ModbusMaster; 
- $modbus = new ModbusMaster("192.168.1.1", "UDP");
+use PHPModbus\PhpType; 
- // Read multiple registers
+
- try {
+// Modbus master UDP
-     $recData = $modbus->readMultipleRegisters(0, 12288, 5);
+$modbus = new ModbusMaster("192.168.1.1", "UDP"); 
- }
+// Read multiple registers
- catch (Exception $e) {
+try {
-     // Print error information if any
+    $recData = $modbus->readMultipleRegisters(0, 12288, 5); 
-     echo $modbus;
+} catch (Exception $e) {
-     echo $e;
+    // Print error information if any
-     exit;
+    echo $modbus . "\n";
- }
+    echo $e;
- // Print data in string format
+    exit;
- echo PhpType::bytes2string($recData);
+}
+// Print data in string format
+echo PhpType::bytes2string($recData); 
 ```
 
-For more see [documentation][] or [FAQ][].
+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.
+
+
+## GoogleCode legacy docs & downloads
+
+This project was originally hosted on Google Code. It is still archived here:
+
+* [GoogleCode Archived Repo](http://code.google.com/p/phpmodbus)
 
-[documentation]: https://code.google.com/p/phpmodbus/downloads/list
-[FAQ]: https://code.google.com/p/phpmodbus/wiki/FAQ

composer.json

@@ -1,17 +1,25 @@
 {
-    "name": "adduc/phpmodbus",
+  "name": "mightypork/phpmodbus",
-    "description": "Composer version of PhpModBus",
+  "keywords": ["phpmodbus","modbus"],
-    "license": "LGPL",
+  "description": "PhpModbus with namespaces and updated to PHP 7",
-    "authors": [
+  "license": "LGPL-2.1-or-later",
-        {
+  "require": {
-            "name": "Honza Krakora",
+    "php": "^5.3.2 || ^7.0",
-            "email": "krakora.jan@googlemail.com"
+    "ext-sockets": "*"
-        }
+  },
-    ],
+  "authors": [
-    "autoload": {
+    {
-        "classmap": [ "Phpmodbus" ]
+      "name": "Honza Krakora",
+      "email": "krakora.jan@googlemail.com"
     },
-    "require": {
+    {
-        "ext-sockets": "*"
+      "name": "Ondřej Hruška",
+      "email": "ondra@ondrovo.com"
     }
+  ],
+  "autoload": {
+    "psr-4": {
+      "PHPModbus\\": "src/"
+    }
+  }
 }

examples/example_750841_Mmemory.php

@@ -1,67 +0,0 @@
-<?php
-
-require_once dirname(__FILE__) . '/../Phpmodbus/ModbusMaster.php';
-
-// Create Modbus object
-$ip = "192.192.15.51";
-$modbus = new ModbusMaster($ip, "UDP");
-
-try {
-    // FC 3
-    $moduleId = 0;
-    $reference = 12288;
-    $mw0address = 12288;
-    $quantity = 6;
-    $recData = $modbus->readMultipleRegisters($moduleId, $reference, $quantity);
-}
-catch (Exception $e) {
-    echo $modbus;
-    echo $e;
-    exit;
-}
-
-?>
-<html>
-    <head>
-        <meta http-equiv="content-type" content="text/html; charset=windows-1250">
-        <meta name="generator" content="PSPad editor, www.pspad.com">
-        <title>WAGO 750-841 M-memory dump</title>
-    </head>
-    <body>
-        <h1>Dump of M-memory from WAGO 750-84x series coupler.</h1>
-        <ul>
-            <li>PLC: 750-84x series</li>
-            <li>IP: <?php echo $ip?></li>
-            <li>Modbus module ID: <?php echo $moduleId?></li>
-            <li>Modbus memory reference: <?php echo $reference?></li>
-            <li>Modbus memory quantity: <?php echo $quantity?></li>
-        </ul>
-
-        <h2>M-memory dump</h2>
-
-        <table border="1px" width="400px">
-            <tr>
-                <td>Modbus address</td>
-                <td>MWx</td>
-                <td>value</td>
-            </tr>
-            <?php
-            for($i=0;$i<count($recData);$i+=2) {
-                ?>
-            <tr>
-                <td><?php echo $i+$reference?></td>
-                <td>MW<?php echo ($i + $reference - $mw0address)/2?></td>
-                <td><?php echo ($recData[$i] << 8)+ $recData[$i+1]?></td>
-            </tr>
-                <?php
-            }
-            ?>
-        </table>
-
-        <h2>Modbus class status</h2>
-        <?php
-        echo $modbus;
-        ?>
-
-    </body>
-</html> 

examples/example_datatype.php

@@ -1,61 +0,0 @@
-<?php
-
-require_once dirname(__FILE__) . '/../Phpmodbus/ModbusMaster.php';
-
-// Create Modbus object
-$modbus = new ModbusMaster("192.192.15.51", "UDP");
-
-try {
-    // FC 3
-    // read 10 words (20 bytes) from device ID=0, address=12288
-    $recData = $modbus->readMultipleRegisters(0, 12288, 10);
-}
-catch (Exception $e) {
-    // Print error information if any
-    echo $modbus;
-    echo $e;
-    exit;
-}
-
-// Received data
-echo "<h1>Received Data</h1>\n";
-print_r($recData);
-
-// Conversion
-echo "<h2>32 bits types</h2>\n";
-// Chunk the data array to set of 4 bytes
-$values = array_chunk($recData, 4);
-
-// Get float from REAL interpretation
-echo "<h3>REAL to Float</h3>\n";
-foreach($values as $bytes)
-    echo PhpType::bytes2float($bytes) . "</br>";
-
-// Get integer from DINT interpretation
-echo "<h3>DINT to integer </h3>\n";
-foreach($values as $bytes)
-    echo PhpType::bytes2signedInt($bytes) . "</br>";
-
-// Get integer of float from DINT interpretation
-echo "<h3>DWORD to integer (or float) </h3>\n";
-foreach($values as $bytes)
-    echo PhpType::bytes2unsignedInt($bytes) . "</br>";
-
-echo "<h2>16 bit types</h2>\n";
-// Chunk the data array to set of 4 bytes
-$values = array_chunk($recData, 2);
-
-// Get signed integer from INT interpretation
-echo "<h3>INT to integer </h3>\n";
-foreach($values as $bytes)
-    echo PhpType::bytes2signedInt($bytes) . "</br>";
-
-// Get unsigned integer from WORD interpretation
-echo "<h3>WORD to integer </h3>\n";
-foreach($values as $bytes)
-    echo PhpType::bytes2unsignedInt($bytes) . "</br>";
-
-// Get string from STRING interpretation
-echo "<h3>STRING to string </h3>\n";
-echo PhpType::bytes2string($recData) . "</br>";
-?>

examples/example_fc1.php

@@ -1,25 +0,0 @@
-<?php
-
-require_once dirname(__FILE__) . '/../Phpmodbus/ModbusMaster.php';
-
-// 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>";

examples/example_fc15.php

@@ -1,26 +0,0 @@
-<?php
-
-require_once dirname(__FILE__) . '/../Phpmodbus/ModbusMaster.php';
-
-// Create Modbus object
-$modbus = new ModbusMaster("192.192.15.51", "UDP");
-
-// Data to be writen
-$data = array(TRUE, FALSE, TRUE, TRUE, FALSE, TRUE, TRUE, TRUE, 
-              TRUE, TRUE, TRUE, TRUE, FALSE, FALSE, FALSE, FALSE,
-              FALSE, FALSE, FALSE, FALSE, TRUE, TRUE, TRUE, TRUE,
-              TRUE, TRUE, TRUE, TRUE, TRUE, TRUE, TRUE, TRUE);
-
-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;

examples/example_fc16.php

@@ -1,26 +0,0 @@
-<?php
-
-require_once dirname(__FILE__) . '/../Phpmodbus/ModbusMaster.php';
-
-// Create Modbus object
-$modbus = new ModbusMaster("192.192.15.51", "UDP");
-
-// Data to be writen
-$data = array(10, -1000, 2000, 3.0);
-$dataTypes = array("WORD", "INT", "DINT", "REAL");
-
-try {
-    // FC16
-    $modbus->writeMultipleRegister(0, 12288, $data, $dataTypes);
-}
-catch (Exception $e) {
-    // Print error information if any
-    echo $modbus;
-    echo $e;
-    exit;
-}
-
-// Print status information
-echo $modbus;
-
-?>

examples/example_fc2.php

@@ -1,26 +0,0 @@
-<?php
-
-require_once dirname(__FILE__) . '/../Phpmodbus/ModbusMaster.php';
-
-// 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>";

examples/example_fc23.php

@@ -1,31 +0,0 @@
-<?php
-
-require_once dirname(__FILE__) . '/../Phpmodbus/ModbusMaster.php';
-
-// Create Modbus object
-$modbus = new ModbusMaster("192.192.15.51", "UDP");
-
-// Data to be writen
-$data = array(10, -1000, 2000, 3.0);
-$dataTypes = array("WORD", "INT", "DINT", "REAL");
-
-try {
-    // FC23
-    $recData = $modbus->readWriteRegisters(0, 12288, 6, 12288, $data, $dataTypes);
-}
-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>";
-print_r($recData);
-echo "</br>";
-
-?>

examples/example_fc3.php

@@ -1,26 +0,0 @@
-<?php
-
-require_once dirname(__FILE__) . '/../Phpmodbus/ModbusMaster.php';
-
-// Create Modbus object
-$modbus = new ModbusMaster("192.192.15.51", "UDP");
-
-try {
-    // FC 3
-    $recData = $modbus->readMultipleRegisters(0, 12288, 6);
-}
-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>";
-print_r($recData); 
-echo "</br>";
-?>

examples/example_fc4.php

@@ -1,19 +0,0 @@
-<?php
-
-require_once dirname(__FILE__) . '/../../Phpmodbus/ModbusMasterUdp.php';
-
-// 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);

examples/example_fc5.php

@@ -1,24 +0,0 @@
-<?php
-
-require_once dirname(__FILE__) . '/../../Phpmodbus/ModbusMasterUdp.php';
-
-// 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;
-}

examples/example_fc6.php

@@ -1,26 +0,0 @@
-<?php
-
-require_once dirname(__FILE__) . '/../Phpmodbus/ModbusMaster.php';
-
-// Create Modbus object
-$modbus = new ModbusMaster("192.192.15.51", "UDP");
-
-// Data to be writen
-$data = array(-1000);
-$dataTypes = array("INT");
-
-try {
-    // FC6
-    $modbus->writeSingleRegister(0, 12288, $data, $dataTypes);
-}
-catch (Exception $e) {
-    // Print error information if any
-    echo $modbus;
-    echo $e;
-    exit;
-}
-
-// Print status information
-echo $modbus;
-
-?>

src/IecType.php

@@ -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));
+		}
+	}
+}

src/ModbusMasterTcp.php

@@ -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");
+	}
+}

src/ModbusMasterUdp.php

@@ -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");
+	}
+}

src/PhpType.php

@@ -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;
+	}
+}

tests/Codesys/TEST.EXP

@@ -1,256 +0,0 @@
-
-
-(* @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

tests/Codesys/_make_exp.cmd

@@ -1,15 +0,0 @@
-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

tests/IecType/_test.bat

@@ -1,11 +0,0 @@
-@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

tests/IecType/ref/test.iecByte.php.html

@@ -1 +0,0 @@
-125<br>98<br>0<br>0<br>0<br>0<br>0<br>0<br>0<br>0<br>0<br>0<br>255<br>255<br>255<br>255<br>158<br>88<br>97<br>168<br>

tests/IecType/ref/test.iecDInt.php.html

@@ -1 +0,0 @@
-Endianing off <hr>0 --> Packet: 0000_0000_</br>1 --> Packet: 0001_0000_</br>-1 --> Packet: ffff_ffff_</br>2147483647 --> Packet: ffff_7fff_</br>-2147483648 --> Packet: 0000_8000_</br>Endianing on <hr>0 --> Packet: 0000_0000_</br>1 --> Packet: 0000_0001_</br>-1 --> Packet: ffff_ffff_</br>2147483647 --> Packet: 7fff_ffff_</br>-2147483648 --> Packet: 8000_0000_</br>

tests/IecType/ref/test.iecInt.php.html

@@ -1 +0,0 @@
-Endianing off <hr>0 --> Packet: 0000_</br>1 --> Packet: 0001_</br>-1 --> Packet: ffff_</br>32767 --> Packet: 7fff_</br>-32768 --> Packet: 8000_</br>Endianing on <hr>0 --> Packet: 0000_</br>1 --> Packet: 0001_</br>-1 --> Packet: ffff_</br>32767 --> Packet: 7fff_</br>-32768 --> Packet: 8000_</br>

tests/IecType/ref/test.iecReal.php.html

@@ -1,12 +0,0 @@
-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>

tests/IecType/test.iecByte.php

@@ -1,33 +0,0 @@
-<?php
-
-require_once dirname(__FILE__) . '/../../Phpmodbus/ModbusMasterUdp.php';
-
-// Received bytes interpreting Mixed values
-$data = Array (
-    "0" => 125, // 32098 (DINT)
-    "1" => 98,
-    "2" => 0,
-    "3" => 0,
-    "4" => 0,  // 0 (DINT)
-    "5" => 0,
-    "6" => 0,
-    "7" => 0,
-    "8" => 0,  // 0 (DINT)
-    "9" => 0, 
-    "10" => 0,
-    "11" => 0,
-    "12" => 255, // -1 (DINT)
-    "13" => 255,
-    "14" => 255,
-    "15" => 255,
-    "16" => 158, // -25000 (INT)
-    "17" => 88,
-    "18" => 97, // 25000 (INT)
-    "19" => 168    
-);
-
-// Print mixed values
-foreach($data as $d)
-  echo ord(IecType::iecBYTE($d)) . "<br>";
- 
-?>

tests/IecType/test.iecDInt.php

@@ -1,50 +0,0 @@
-<?php
-
-require_once dirname(__FILE__) . '/../../Phpmodbus/ModbusMasterUdp.php';
-
-// Received bytes interpreting Mixed values
-$data = Array (
-    "0" => 0, 
-    "1" => 1,
-    "2" => -1,
-    "3" => pow(2,31)-1,
-    "4" => -pow(2,31)
-);
-
-function byte2hex($value){
-  $h = dechex(($value >> 4) & 0x0F);
-  $l = dechex($value & 0x0F);
-  return "$h$l";
-}
-  
-function printPacket($packet){
-  $str = "";   
-  $str .= "Packet: "; 
-  for($i=0;$i<strlen($packet);$i++){    
-    $str .= byte2hex(ord($packet[$i]));
-    if($i % 2)
-      $str .= "_";
-  }
-  $str .= "</br>";
-  return $str;
-}
-
-echo "Endianing off <hr>";
-// Print mixed values
-for($i=0;$i<count($data);$i++) {
-  echo $data[$i] . " --> ";
-  $v = IecType::iecDINT($data[$i], 0);
-  echo printPacket($v);
-  "<br>";
-}
-
-echo "Endianing on <hr>";
-// Print mixed values
-for($i=0;$i<count($data);$i++) {
-  echo $data[$i] . " --> ";
-  $v = IecType::iecDINT($data[$i], 1);
-  echo printPacket($v);
-  "<br>";
-}
- 
-?>

tests/IecType/test.iecInt.php

@@ -1,50 +0,0 @@
-<?php
-
-require_once dirname(__FILE__) . '/../../Phpmodbus/ModbusMasterUdp.php';
-
-// Received bytes interpreting Mixed values
-$data = Array (
-    "0" => 0, 
-    "1" => 1,
-    "2" => -1,
-    "3" => pow(2,15)-1,
-    "4" => -pow(2,15)
-);
-
-function byte2hex($value){
-  $h = dechex(($value >> 4) & 0x0F);
-  $l = dechex($value & 0x0F);
-  return "$h$l";
-}
-  
-function printPacket($packet){
-  $str = "";   
-  $str .= "Packet: "; 
-  for($i=0;$i<strlen($packet);$i++){    
-    $str .= byte2hex(ord($packet[$i]));
-    if($i % 2)
-      $str .= "_";
-  }
-  $str .= "</br>";
-  return $str;
-}
-
-echo "Endianing off <hr>";
-// Print mixed values
-for($i=0;$i<count($data);$i++) {
-  echo $data[$i] . " --> ";
-  $v = IecType::iecINT($data[$i], 0);
-  echo printPacket($v);
-  "<br>";
-}
-
-echo "Endianing on <hr>";
-// Print mixed values
-for($i=0;$i<count($data);$i++) {
-  echo $data[$i] . " --> ";
-  $v = IecType::iecINT($data[$i], 1);
-  echo printPacket($v);
-  "<br>";
-}
- 
-?>

tests/IecType/test.iecReal.php

@@ -1,50 +0,0 @@
-<?php
-
-require_once dirname(__FILE__) . '/../../Phpmodbus/ModbusMasterUdp.php';
-
-// http://en.wikipedia.org/wiki/Single_precision
-$data = Array (
-    "0" => 0, // -> 0000 0000
-    "1" => 1, // -> 3f80 0000
-    "2" => -2, // -> c000 0000
-    "3" => 0.333333333333, //1/3 -> 3eaa aaab
-    "4" => 25 // -> 41c8 0000
-);
-
-function byte2hex($value){
-  $h = dechex(($value >> 4) & 0x0F);
-  $l = dechex($value & 0x0F);
-  return "$h$l";
-}
-  
-function printPacket($packet){
-  $str = "";   
-  $str .= "Packet: "; 
-  for($i=0;$i<strlen($packet);$i++){    
-    $str .= byte2hex(ord($packet[$i]));
-    if($i % 2)
-      $str .= "_";
-  }
-  $str .= "<br>\n";
-  return $str;
-}
-
-echo "Endianing off <hr>\n";
-// Print mixed values
-for($i=0;$i<count($data);$i++) {
-  echo $data[$i] . " --> ";
-  $v = IecType::iecREAL($data[$i], 0);
-  echo printPacket($v);
-  "<br>\n";
-}
-
-echo "Endianing on <hr>\n";
-// Print mixed values
-for($i=0;$i<count($data);$i++) {
-  echo $data[$i] . " --> ";
-  $v = IecType::iecREAL($data[$i], 1);
-  echo printPacket($v);
-  "<br>\n";
-}
- 
-?>

tests/ModbusMaster/_test.bat

@@ -1,11 +0,0 @@
-@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

tests/ModbusMaster/ref/test.tcp.fc16fc3.php.html

@@ -1,72 +0,0 @@
-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
-)

tests/ModbusMaster/ref/test.tcp.fc26.php.html

@@ -1 +0,0 @@
-writeMultipleRegister (FC26): DONE

tests/ModbusMaster/ref/test.tcp.socket_protocol_mismatch.php.html

@@ -1 +0,0 @@
-Caught exception: Unknown socket protocol, should be 'TCP' or 'UDP'

tests/ModbusMaster/ref/test.udp.fc16fc3.php.html

@@ -1,72 +0,0 @@
-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
-)

tests/ModbusMaster/ref/test.udp.fc26.php.html

@@ -1 +0,0 @@
-writeMultipleRegister (FC26): DONE

tests/ModbusMaster/test.tcp.fc16fc3.php

@@ -1,44 +0,0 @@
-<?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);
-
-?>

tests/ModbusMaster/test.tcp.fc26.php

@@ -1,24 +0,0 @@
-<?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";
-?>

tests/ModbusMaster/test.tcp.socket_protocol_mismatch.php

@@ -1,22 +0,0 @@
-<?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!";

tests/ModbusMaster/test.udp.fc16fc3.php

@@ -1,44 +0,0 @@
-<?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);
-
-?>

tests/ModbusMaster/test.udp.fc26.php

@@ -1,24 +0,0 @@
-<?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";
-?>

tests/ModbusMasterTcp/_test.bat

@@ -1,11 +0,0 @@
-@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

tests/ModbusMasterTcp/ref/test.fc16fc3.php.html

@@ -1,72 +0,0 @@
-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
-)

tests/ModbusMasterTcp/ref/test.fc26.php.html

@@ -1 +0,0 @@
-writeMultipleRegister (FC26): DONE

tests/ModbusMasterTcp/test.fc16fc3.php

@@ -1,44 +0,0 @@
-<?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);
-
-?>

tests/ModbusMasterTcp/test.fc26.php

@@ -1,24 +0,0 @@
-<?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";
-?>

tests/ModbusMasterUdp/_test.bat

@@ -1,11 +0,0 @@
-@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

tests/ModbusMasterUdp/ref/test.fc15fc1.php.html

@@ -1,66 +0,0 @@
-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)
-}

tests/ModbusMasterUdp/ref/test.fc16fc3.php.html

@@ -1,72 +0,0 @@
-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
-)

tests/ModbusMasterUdp/ref/test.fc16fc3bind.php.html

@@ -1,72 +0,0 @@
-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
-)

tests/ModbusMasterUdp/ref/test.fc2.php.html

@@ -1,7 +0,0 @@
-Test should pass when %IX0.0==FALSE and %IX0.1==TRUE
-array(2) {
-  [0]=>
-  bool(false)
-  [1]=>
-  bool(true)
-}

tests/ModbusMasterUdp/ref/test.fc26.php.html

@@ -1 +0,0 @@
-writeMultipleRegister (FC26): DONE

tests/ModbusMasterUdp/ref/test.fc26bind.php.html

@@ -1 +0,0 @@
-writeMultipleRegister (FC26): DONE

tests/ModbusMasterUdp/ref/test.fc4.php.html

@@ -1,11 +0,0 @@
-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)
-}

tests/ModbusMasterUdp/ref/test.fc5.php.html

@@ -1,5 +0,0 @@
-Array
-(
-    [0] => 0
-    [1] => 5
-)

tests/ModbusMasterUdp/ref/test.fc6fc3.php.html

@@ -1,5 +0,0 @@
-Array
-(
-    [0] => 207
-    [1] => 199
-)

tests/ModbusMasterUdp/test.fc15fc1.php

@@ -1,22 +0,0 @@
-<?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);

tests/ModbusMasterUdp/test.fc16fc3.php

@@ -1,44 +0,0 @@
-<?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 - 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);
-
-?>

tests/ModbusMasterUdp/test.fc16fc3bind.php

@@ -1,45 +0,0 @@
-<?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);
-
-?>

tests/ModbusMasterUdp/test.fc2.php

@@ -1,14 +0,0 @@
-<?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);

tests/ModbusMasterUdp/test.fc26.php

@@ -1,24 +0,0 @@
-<?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
-$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";
-?>

tests/ModbusMasterUdp/test.fc26bind.php

@@ -1,25 +0,0 @@
-<?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";
-?>

tests/ModbusMasterUdp/test.fc4.php

@@ -1,14 +0,0 @@
-<?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);

tests/ModbusMasterUdp/test.fc5.php

@@ -1,23 +0,0 @@
-<?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);

tests/ModbusMasterUdp/test.fc6fc3.php

@@ -1,15 +0,0 @@
-<?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);

tests/PhpType/_test.bat

@@ -1,11 +0,0 @@
-@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

tests/PhpType/ref/test.bytes2mixed.php.html

@@ -1 +0,0 @@
-32098<br>0<br>0<br>-1<br>-25000<br>25000<br>

tests/PhpType/ref/test.bytes2real.php.html

@@ -1 +0,0 @@
-1000<br>2000<br>1.25<br>

tests/PhpType/ref/test.bytes2signedint.php.html

@@ -1 +0,0 @@
--1<br>0<br>1<br>-2147483648<br>2147483647<br> 

tests/PhpType/ref/test.bytes2string.php.html

@@ -1 +0,0 @@
-eHll oowlr!da<br>Hello world!<br>

tests/PhpType/ref/test.bytes2unsignedint.php.html

@@ -1,6 +0,0 @@
-float(4294967295)
-<br>int(0)
-<br>int(1)
-<br>float(2147483648)
-<br>int(2147483647)
-<br> 

tests/PhpType/ref/test.strangearray.size.php.html

@@ -1 +0,0 @@
-Exception 'Data are not in array 2 or 4 bytes'<br>25602<br>Exception 'Data are not in array 2 or 4 bytes'<br>25602<br>Exception 'Data are not in array 2 or 4 bytes'<br>

tests/PhpType/ref/test.strangearray.textarray.php.html

@@ -1 +0,0 @@
-Exception 'Data are not numeric'

tests/PhpType/test.bytes2mixed.php

@@ -1,37 +0,0 @@
-<?php
-
-require_once dirname(__FILE__) . '/../../Phpmodbus/ModbusMasterUdp.php';
-
-// Received bytes interpreting Mixed values
-$data = Array (
-    "0" => 125, // 32098 (DINT)
-    "1" => 98,
-    "2" => 0,
-    "3" => 0,
-    "4" => 0,  // 0 (DINT)
-    "5" => 0,
-    "6" => 0,
-    "7" => 0,
-    "8" => 0,  // 0 (DINT)
-    "9" => 0, 
-    "10" => 0,
-    "11" => 0,
-    "12" => 255, // -1 (DINT)
-    "13" => 255,
-    "14" => 255,
-    "15" => 255,
-    "16" => 158, // -25000 (INT)
-    "17" => 88,
-    "18" => 97, // 25000 (INT)
-    "19" => 168    
-);
-
-// Print mixed values
-echo PhpType::bytes2unsignedInt(array_slice($data, 0, 4)) . "<br>";
-echo PhpType::bytes2signedInt(array_slice($data, 4, 4)) . "<br>";
-echo PhpType::bytes2signedInt(array_slice($data, 8, 4)) . "<br>";
-echo PhpType::bytes2signedInt(array_slice($data, 12, 4)) . "<br>";
-echo PhpType::bytes2signedInt(array_slice($data, 16, 2)) . "<br>";
-echo PhpType::bytes2signedInt(array_slice($data, 18, 2)) . "<br>";
- 
-?>

tests/PhpType/test.bytes2real.php

@@ -1,27 +0,0 @@
-<?php
-
-require_once dirname(__FILE__) . '/../../Phpmodbus/ModbusMasterUdp.php';
-
-// Received bytes interpreting 3 REAL values (6 words)
-$data = array( // 1000
-  0 => 0,
-  1 => 0,
-  2 => 68,
-  3 => 122,
-  4 => 0,
-  5 => 0,
-  6 => 68,
-  7 => 250,
-  8 => 0,
-  9 => 0,
-  10 => 63,
-  11 => 160,
-);
-
-$dword = array_chunk($data, 4);
-
-// Print float interpretation of the real value 
-echo PhpType::bytes2float($dword[0]) . "<br>";
-echo PhpType::bytes2float($dword[1]) . "<br>";
-echo PhpType::bytes2float($dword[2]) . "<br>";
-?>

tests/PhpType/test.bytes2signedint.php

@@ -1,35 +0,0 @@
-<?php
-
-require_once dirname(__FILE__) . '/../../Phpmodbus/ModbusMasterUdp.php';
-
-// Received bytes interpreting DINT values
-$data = array(
-  0xFF, // -1
-  0xFF,
-  0xFF,
-  0xFF,
-  0, // 0
-  0,
-  0,
-  0,
-  0, // 1
-  0x01,
-  0,
-  0,
-  0, // minus max
-  0,
-  0x80,
-  0x0,
-  0xFF, // plus max
-  0xFF,
-  0x7F,
-  0xFF,
-);
-
-$dword = array_chunk($data, 4);
-
-// Print float interpretation of the real value 
-foreach($dword as $value) {
-  echo PhpType::bytes2signedInt($value) . "<br>";
-}
-?> 

tests/PhpType/test.bytes2string.php

@@ -1,28 +0,0 @@
-<?php
-
-require_once dirname(__FILE__) . '/../../Phpmodbus/ModbusMasterUdp.php';
-
-// Received bytes interpreting 3 REAL values (6 words)
-$data = array( // String "Hello word!"
-    0x48, //H
-    0x65, //e
-    0x6c, //l
-    0x6c, //l
-    0x6f, //o
-    0x20, //
-    0x77, //w
-    0x6f, //o
-    0x72, //r
-    0x6c, //l
-    0x64, //d
-    0x21, //!
-    0x00, //\0
-    0x61, //a
-    0x61  //a
-);
-
-// Print string interpretation of the values
-echo PhpType::bytes2string($data) . "<br>";
-echo PhpType::bytes2string($data, true) . "<br>";
-
-?>

tests/PhpType/test.bytes2unsignedint.php

@@ -1,36 +0,0 @@
-<?php
-
-require_once dirname(__FILE__) . '/../../Phpmodbus/ModbusMasterUdp.php';
-
-// Received bytes interpreting DINT values
-$data = array(
-  0xFF, // -1
-  0xFF,
-  0xFF,
-  0xFF,
-  0, // 0
-  0,
-  0,
-  0,
-  0, // 1
-  0x01,
-  0,
-  0,
-  0, // minus max
-  0,
-  0x80,
-  0x0,
-  0xFF, // plus max
-  0xFF,
-  0x7F,
-  0xFF,
-);
-
-$dword = array_chunk($data, 4);
-
-// Print float interpretation of the real value 
-foreach($dword as $value) {
-  var_dump(PhpType::bytes2unsignedInt($value));
-  echo "<br>";
-}
-?> 

tests/PhpType/test.strangearray.size.php

@@ -1,44 +0,0 @@
-<?php
-/* 
- * To change this template, choose Tools | Templates
- * and open the template in the editor.
- */
-require_once dirname(__FILE__) . '/../../Phpmodbus/ModbusMasterUdp.php';
-
-// Received bytes interpreting Mixed values
-$data = Array (
-    "0" => 100, // 32098 (DINT)
-    "1" => 2,
-    "2" => 0,
-    "3" => 0,
-    "4" => 100, // 32098 (DINT)
-    "5" => 2
-);
-
-// Print mixed values
-try {
-  echo PhpType::bytes2unsignedInt(array_slice($data, 0, 1)) . "<br>";
-} catch(Exception $e) {
-  echo "Exception 'Data are not in array 2 or 4 bytes'". "<br>";
-}
-try {
-  echo PhpType::bytes2unsignedInt(array_slice($data, 0, 2)). "<br>";
-} catch(Exception $e) {
-  echo "Exception 'Data are not in array 2 or 4 bytes'". "<br>";
-}
-try {
-  echo PhpType::bytes2unsignedInt(array_slice($data, 0, 3)). "<br>";
-} catch(Exception $e) {
-  echo "Exception 'Data are not in array 2 or 4 bytes'". "<br>";
-}
-try {
-  echo PhpType::bytes2unsignedInt(array_slice($data, 0, 4)). "<br>";
-} catch(Exception $e) {
-  echo "Exception 'Data are not in array 2 or 4 bytes'". "<br>";
-}
-try {
-  echo PhpType::bytes2unsignedInt(array_slice($data, 0, 5)). "<br>";
-} catch(Exception $e) {
-  echo "Exception 'Data are not in array 2 or 4 bytes'". "<br>";
-}
-?>

tests/PhpType/test.strangearray.textarray.php

@@ -1,22 +0,0 @@
-<?php
-/* 
- * To change this template, choose Tools | Templates
- * and open the template in the editor.
- */
-require_once dirname(__FILE__) . '/../../Phpmodbus/ModbusMasterUdp.php';
-
-// Received bytes interpreting Mixed values
-$data = Array (
-    "0" => 100, // 32098 (DINT)
-    "1" => "e",
-    "2" => 0,
-    "3" => 0
-);
-
-// Print mixed values
-try {
-  echo PhpType::bytes2unsignedInt(array_slice($data, 0, 4));
-} catch(Exception $e) {
-  echo "Exception 'Data are not numeric'";
-}
-?>

tests/config.bat

@@ -1,5 +0,0 @@
-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
-set diff="diff.exe"
-rem set testUri=http://localHost/nette/_trunk/tests
-rem set wget=wget.exe 

tests/config.php

@@ -1,3 +0,0 @@
-<?php
-  $test_host_ip = "192.192.1.10";  
-  $test_bind_client_ip = "192.192.1.100";

tutorials/Phpmodbus/Phpmodbus.pkg

@@ -1,210 +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:krakora.jan@googlemail.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 TCP/UDP master class with subset of the most used Modbus commands.
-  </para>
-  <para>
-   The library implements:
-   <itemizedlist>
-     <listitem><para>FC  1: read multiple coils</para></listitem>
-     <listitem><para>FC  2: read input discretes</para></listitem>
-     <listitem><para>FC  3: read multiple registers</para></listitem>
-     <listitem><para>FC  4: read multiple input registers</para></listitem>
-     <listitem><para>FC  5: write single coil</para></listitem>
-     <listitem><para>FC  6: write single register</para></listitem>
-     <listitem><para>FC 15: write multiple coils</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>
- </refsect1>
- <refsect1 id="{@id install}">
-  <title>Install</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 require_once() command
-     <programlisting role="c">
-      <![CDATA[require_once dirname(__FILE__) . '/Phpmodbus/ModbusMaster.php'; ]]>
-     </programlisting>     
-  </para>
-  <para>
-    To create UDP Modbus master object communicating to an modbus slave 
-    e.g. at IP address 192.168.1.1 write
-    <programlisting role="c" linenumbering="numbered" startinglinenumber="2">
-      <![CDATA[ $modbus = new ModbusMaster("192.168.1.1", "UDP"); ]]>
-    </programlisting>
-  </para>
-  <para>
-    To create TCP Modbus master use
-    <programlisting role="c" linenumbering="numbered" startinglinenumber="2">
-      <![CDATA[ $modbus = new ModbusMaster("192.168.1.1", "TCP"); ]]>
-    </programlisting>
-  </para>
-  <para>
-    To read 5 words (10 bytes) from the device ID=0 and its memory address 12288
-    use try-catch method call
-    <programlisting role="c" linenumbering="numbered" startinglinenumber="3">
-      <![CDATA[try {
-    // Function processing
-    $recData = $modbus->readMultipleRegisters(0, 12288, 5); 
-}
-catch (Exception $e) {
-    // Exception processing, e.g. print error information
-    echo $modbus;
-    echo $e;
-    exit; 
-}]]>
-     </programlisting>
-  </para>
-  <para>
-    To process the function byte stream, use conversion to PHP types in 
-  </para>
-  <programlisting role="c" linenumbering="numbered" startinglinenumber="15">
-      <![CDATA[echo PhpType::bytes2string($recData); ]]>
-     </programlisting>
-  <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_fc1}">
-    <title>FC1 - read mutliple coils</title>
-    <para>
-      FC1 functionality example
-    </para>
-    <para>
-    {@example example_fc1.php}
-    </para>
-  </refsect2>
-  <refsect2 id="{@id example_fc2}">
-    <title>FC2 - read input discretes</title>
-    <para>
-      FC2 functionality example
-    </para>
-    <para>
-    {@example example_fc2.php}
-    </para>
-  </refsect2>
-  <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_fc4}">
-    <title>FC4 - read multiple input registers </title>
-    <para>
-      FC4 functionality example
-    </para>
-    <para>
-    {@example example_fc4.php}
-    </para>
-  </refsect2>
-  <refsect2 id="{@id example_fc5}">
-    <title>FC5 - write single coil</title>
-    <para>
-      FC5 functionality example
-    </para>
-    <para>
-    {@example example_fc5.php}
-    </para>
-  </refsect2>
-  <refsect2 id="{@id example_fc6}">
-    <title>FC6 - write single register</title>
-    <para>
-      FC6 functionality example
-    </para>
-    <para>
-    {@example example_fc6.php}
-    </para>
-  </refsect2>
-  <refsect2 id="{@id example_fc15}">
-    <title>FC15 - write mutliple coils</title>
-    <para>
-      FC15 functionality example
-    </para>
-    <para>
-    {@example example_fc15.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> 
- <refsect1 id="{@id back_comp}">
-  <title>Back compatibility</title>
-  <para>
-   This version is back compatible to the last versions. Just use  
-   <programlisting role="c">
-      <![CDATA[require_once dirname(__FILE__) . '/Phpmodbus/ModbusMasterUdp.php';
-$modbus = new ModbusMasterUdp("192.168.1.1"); 
-// ... ]]>
-     </programlisting>
-  </para>
- </refsect1>
-</refentry>