}
public function ECOU()
{
$this->SendSTART();
$this->SendU($this->ReadU());
$this->SendRETURN();
}
public function SETU()
{
$this->buf = $this->ReadU();
}
public function GETU()
{
$this->SendSTART();
$this->SendU($this->buf);
$this->SendRETURN();
$this->buf = NULL;
}
}
$ctx = FactoryNew('server', 'Server');
try {
$ctx->LinkCreate($argv);
$ctx->LogC("test", 1, "this is the log test\n");
$ctx->ProcessEvent(MqS::WAIT_FOREVER);
} catch (Exception $e) {
$ctx->ErrorSet($e);
}
$ctx->Exit();
?>
#§ \file theLink/example/php/MyServer.php
#§ \brief \$Id$
#§
#§ (C) 2010 - NHI - #1 - Project - Group
#§
#§ \version \$Rev$
#§ \author EMail: aotto1968 at users.berlios.de
#§ \attention this software has GPL permissions to copy
#§ please contact AUTHORS for additional information
#§
class MyServer extends MqS implements iServerSetup
{
public function ServerSetup()
{
$this->ServiceCreate('HLWO', array(&$this, 'HLWO'));
}
public function HLWO()
{
$this->SendSTART();
$this->SendC("Hello World");
$this->SendRETURN();
}
}
$srv = FactoryNew('MyServer');
try {
$srv->LinkCreate($argv);
$srv->ProcessEvent(MqS::WAIT_FOREVER);
} catch (Exception $ex) {
$srv->ErrorSet($ex);
}
$srv->Exit();
#§
class TestServer extends MqS implements iServerSetup
{
public function ServerSetup()
{
$this->ServiceCreate('GTCX', array(&$this, 'GTCX'));
}
public function GTCX()
{
$this->SendSTART();
$this->SendI($this->LinkGetCtxId());
$this->SendC("+");
if ($this->LinkIsParent()) {
$this->SendI(-1);
} else {
$this->SendI($this->LinkGetParent()->LinkGetCtxId());
}
$this->SendC("+");
$this->SendC($this->ConfigGetName());
$this->SendC(":");
$this->SendRETURN();
}
}
$srv = FactoryNew('TestServer');
try {
$srv->LinkCreate($argv);
$srv->ProcessEvent(MqS::WAIT_FOREVER);
} catch (Exception $ex) {
$srv->ErrorSet($ex);
}
$srv->Exit();
#§ \file theLink/example/php/mulserver.php
#§ \brief \$Id$
#§
#§ (C) 2010 - NHI - #1 - Project - Group
#§
#§ \version \$Rev$
#§ \author EMail: aotto1968 at users.berlios.de
#§ \attention this software has GPL permissions to copy
#§ please contact AUTHORS for additional information
#§
class MulServer extends MqS implements iServerSetup
{
public function ServerSetup()
{
$this->ServiceCreate('MMUL', array(&$this, 'MMUL'));
}
public function MMUL()
{
$this->SendSTART();
$this->SendD($this->ReadD() * $this->ReadD());
$this->SendRETURN();
}
}
$srv = FactoryNew('mulserver', 'MulServer');
try {
$srv->LinkCreate($argv);
$srv->ProcessEvent(MqS::WAIT_FOREVER);
} catch (Exception $ex) {
$srv->ErrorSet($ex);
}
$srv->Exit();
$list[] = "<{$item}>";
}
$this->data[] = $list;
$this->SendRETURN();
}
public function EOFcmd()
{
$ftr = $this->ServiceGetFilter();
foreach ($this->data as $list) {
$ftr->SendSTART();
foreach ($list as $item) {
$ftr->SendC($item);
}
$ftr->SendEND_AND_WAIT('+FTR');
}
$ftr->SendSTART();
$ftr->SendEND_AND_WAIT('+EOF');
$this->SendRETURN();
}
}
$srv = FactoryNew('filter', 'Filter1');
try {
$srv->LinkCreate($argv);
$srv->ProcessEvent(MqS::WAIT_FOREVER);
} catch (Exception $ex) {
$srv->ErrorSet($ex);
}
$srv->Exit();
?>
#§ \brief \$Id$
#§
#§ (C) 2010 - NHI - #1 - Project - Group
#§
#§ \version \$Rev$
#§ \author EMail: aotto1968 at users.berlios.de
#§ \attention this software has GPL permissions to copy
#§ please contact AUTHORS for additional information
#§
class Filter3 extends MqS implements iServerSetup
{
public function ServerSetup()
{
$ftr = $this->ServiceGetFilter();
$this->ServiceProxy("+ALL");
$this->ServiceProxy("+TRT");
$ftr->ServiceProxy("+ALL");
$ftr->ServiceProxy("+TRT");
}
}
$srv = FactoryNew('Filter3');
try {
$srv->LinkCreate($argv);
$srv->ProcessEvent(MqS::WAIT_FOREVER);
} catch (Exception $ex) {
$srv->ErrorSet($ex);
}
$srv->Exit();
?>
