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