编码：
<?php
error_reporting(E_ALL);
/* Allow the script to hang around waiting for connections. */
set_time_limit(0);
/* Turn on implicit output flushing so we see what we're getting
* as it comes in. */
ob_implicit_flush();
$address = '127.0.0.1';
$port = 11100;
if (($sock = socket_create(AF_INET, SOCK_DGRAM, SOL_UP)) === false) {
echo "socket_create() failed: reason: " . socket_strerror(socket_last_error()) . "\n";
}
if (socket_bind($sock, $address, $port) === false) {
echo "socket_bind() failed: reason: " . socket_strerror(socket_last_error($sock)) . "\n";
}
if (socket_listen($sock, 5) === false) {
echo "socket_listen() failed: reason: " . socket_strerror(socket_last_error($sock)) . "\n";
}
do {
if (($msgsock = socket_accept($sock)) === false) {
echo "socket_accept() failed: reason: " . socket_strerror(socket_last_error($sock)) . "\n";
break;
}
do {
$out = socket_read($msgsock, 2048);
if (!empty($out)) {
if ($out == 'quit') {
break;
}
elseif ($out == 'shutdown') {
socket_write($msgsock, 'plc down', 8);
socket_close($msgsock);
break 2;
}
else {
switch ($out) {
case "KABBE": $response = "Kabbe te!"; break;
case "SZOPJ": $response = "Szopjal te!"; break;
default: $response = "Ismeretlen parancs";
}
socket_write($msgsock, $response, strlen($response));
break;
}
}
} while (true);
socket_close($msgsock);
} while (true);
socket_close($sock);
?>
它适用于 TCP：
$socket = socket_create(AF_INET, SOCK_STREAM, SOL_TCP);
但使用 UDP 它不起作用：
$sock = socket_create(AF_INET, SOCK_DGRAM, SOL_UDP);
错误：
警告：socket_listen() [function.socket-listen]：无法在套接字 [0] 上侦听：引用的对象类型不支持尝试的操作。在第 22 行的 C:\wamp\www\socket\socket.php 中，socket_listen() 失败：原因：所引用的对象类型不支持尝试的操作。
警告：socket_accept() [function.socket-accept]：无法接受传入连接 [0]：引用的对象类型不支持尝试的操作。在第 27 行的 C:\wamp\www\socket\socket.php 中，socket_accept() 失败：原因：所引用的对象类型不支持尝试的操作。