#define OSRF_STATUS_INTERNALSERVERERROR 500
#define OSRF_STATUS_NOTIMPLEMENTED 501
-#define OSRF_STATUS_SERVICEUNAVAILABLE 503
#define OSRF_STATUS_VERSIONNOTSUPPORTED 505
var OSRF_STATUS_EXPFAILED = 417;
var OSRF_STATUS_INTERNALSERVERERROR = 500;
var OSRF_STATUS_NOTIMPLEMENTED = 501;
-var OSRF_STATUS_SERVICEUNAVAILABLE = 503;
var OSRF_STATUS_VERSIONNOTSUPPORTED = 505;
// TODO: get path from ./configure prefix
STATUS_BADREQUEST STATUS_UNAUTHORIZED STATUS_FORBIDDEN
STATUS_NOTFOUND STATUS_NOTALLOWED STATUS_TIMEOUT
STATUS_INTERNALSERVERERROR STATUS_NOTIMPLEMENTED
- STATUS_SERVICEUNAVAILABLE
STATUS_VERSIONNOTSUPPORTED STATUS_REDIRECTED
STATUS_EXPFAILED STATUS_COMPLETE STATUS_PARTIAL
STATUS_NOCONTENT/;
STATUS_BADREQUEST STATUS_UNAUTHORIZED STATUS_FORBIDDEN
STATUS_NOTFOUND STATUS_NOTALLOWED STATUS_TIMEOUT
STATUS_INTERNALSERVERERROR STATUS_NOTIMPLEMENTED
- STATUS_SERVICEUNAVAILABLE
STATUS_VERSIONNOTSUPPORTED STATUS_REDIRECTED
STATUS_EXPFAILED STATUS_COMPLETE STATUS_PARTIAL
STATUS_NOCONTENT/ ],
sub STATUS_INTERNALSERVERERROR { return 500 }
sub STATUS_NOTIMPLEMENTED { return 501 }
-sub STATUS_SERVICEUNAVAILABLE { return 503 }
sub STATUS_VERSIONNOTSUPPORTED { return 505 }
my $log = 'OpenSRF::Utils::Logger';
use OpenSRF::Transport::PeerHandle;
use OpenSRF::Utils::SettingsClient;
use OpenSRF::Utils::Logger qw($logger);
-use OpenSRF::DomainObject::oilsResponse qw/:status/;
use OpenSRF::Transport::SlimJabber::Client;
use Encode;
use POSIX qw/:sys_wait_h :errno_h/;