NAME¶
Cluster::CCS - Perl wrapper for the Cluster Configuration Service library
SYNOPSIS¶
use Cluster::CCS;
my $ccs = new Cluster::CCS();
$ccs->fullxpath(1);
my $ccshandle = $ccs->connect();
if ($ccshandle < 1) {
print "Cannot comunicate with libccs\n";
exit $ccshandle;
}
my $rtn;
my $err;
$err = $ccs->get($ccshandle, '/cluster/@name', $rtn);
if ($err != 0) {
print "Query is not valid\n";
}
print "My Cluster name is $rtn\n";
$err = $ccs->disconnect($ccshandle);
if ($err != 0) {
print "Problems disconnecting from libccs\n";
}
exit $err;
DESCRIPTION¶
Cluster::CCS provides a perl XS wrapper for libccs.
METHODS¶
new¶
Creates a new Cluster::CCS object.
fullxpath(value)¶
Enable or disable full xpath queries. Set 1 to enable, 0 to disable.
This has to be set before connect() or force_connect.
In order to change this value, a disconnect operation is required.
connect(void)¶
Initialize the connection to libccs/libconfdb/corosync objdb.
Returns 1 on success or negative on failure.
force_connect(cluster_name, blocking)¶
Initialize the connection to libccs/libconfdb/corosync objdb.
If blocking is set, it will retry the operation until it succeed.
Returns 1 on success or negative on failure.
disconnect(desc)¶
Disconnect and free resources allocated during opertaion.
Returns 0 on success.
get(desc, query, rtn)¶
Perform a simple xpath query.
Returns 0 on success, negative otherwise. On success rtn will contain the
requested data.
get_list(desc, query, rtn)¶
Perform a simple xpath query and retain some data to iterate over a list of
results.
Returns 0 on success, negative otherwise. On success rtn will contain the
requested data.
set(desc, path, val)¶
This operation is not yet implemented in libccs.
lookup_nodename(desc, nodename, rtn)¶
Perform a nodename lookup using several methods.
Return 0 on success and rtn will contain the requested data.
EXPORTS¶
Nothing is exported by default.
BUGS¶
https://bugzilla.redhat.com/
SEE ALSO¶
cluster.conf(5), ccs(7), ccs_tool(8)
AUTHOR¶
Fabio M. Di Nitto <fdinitto@redhat.com>