function abortme($why, $excode)
{
print "Context1 failed: {$why}\n";
exit($excode);
}
$client = new PlutonClient('context');
$request = new PlutonClientRequest();
$client->initialize();
if (!$request->setContext("random", 23)) {
abortme("Context set of innocuous name failed", 1);
}
if ($request->setContext("pluton.haha", 24)) {
abortme("Context set of protected namespace succeeded", 2);
}
$request->reset();
$request->setContext("echo.sleepMS", "3300");
$res = $client->addRequest("system.echo.0.raw", $request);
print "AddRequest = {$res}\n";
if (!$res) {
$em1 = $request->getFaultText();
$em2 = $client->getFault();
abortme("addRequest Failed with {$em1}:{$em2}", 3);
}
$st = time();
$res = $client->executeAndWaitAll();
print "E&WAll = {$res}\n";
$et = time();
print "Time diffs st={$st} et={$et}\n";
if ($st + 2 > $et) {
abortme("Context didn't caused echo to sleep - was it really set?", 3);
}
#!/usr/bin/php
<?php
$pc = new PlutonClient("phpClient");
$pc->initialize();
$clReq1 = new PlutonClientRequest();
$clReq2 = new PlutonClientRequest();
$req1 = "1234567890";
$req2 = "qwertyuiop";
$clReq1->setRequestData($req1);
if (!$pc->addRequest(SERVICE_KEY, $clReq1)) {
print_r("addRequest Error! " . $pc->getFault() . "\n");
exit(-1);
}
$clReq2->setRequestData($req2);
if (!$pc->addRequest(SERVICE_KEY, $clReq2)) {
print_r("addRequest Error! " . $pc->getFault() . "\n");
exit(-1);
}
// ExecuteAndWaitALL
$pc->executeAndWaitAll();
if ($pc->hasFault()) {
print_r("Fault! " . $pc->getFault() . "\n");
exit(-1);
}
$response = '';
$fault = $clReq1->getResponseData($response);
if ($fault != 0) {
print_r("fault: " . $clReq1->getFaultText() . "\n");
exit(1);
}
if ($response != $req1) {
#!/usr/local/bin/php
<?php
$client = new PlutonClient('fault');
$client->initialize("/does/not/exist");
if ($client->hasFault()) {
print "client has fault after bogus initialize - good\n";
} else {
print "client does NOT have fault after bogus initialize - bad\n";
exit(1);
}
$ftext = $client->getFault();
$fc = $client->getFaultCode();
$flong = $client->getFaultMessage("LONG", 1);
$fshort = $client->getFaultMessage("SHORT", 0);
print "Fault code={$fc} Text={$ftext}\n";
print "Short={$fshort}\n";
print "Long={$flong}\n";
if (strlen($flong) == 0) {
print "Long message should not be zero length\n";
exit(3);
}
if (strlen($fshort) == strlen($flong)) {
print "Hmm expected short message to be shorter than long message\n";
exit(4);
}
$client->initialize();
$client->reset();
if ($client->hasFault()) {
print "client has fault after reset - bad\n";
exit(5);
}
