CCS(3pm) User Contributed Perl Documentation CCS(3pm)
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
";
exit $ccshandle;
}
my $rtn;
my $err;
$err = $ccs->get($ccshandle, '/cluster/@name', $rtn);
if ($err != 0) {
print "Query is not valid
";
}
print "My Cluster name is $rtn
";
$err = $ccs->disconnect($ccshandle);
if ($err != 0) {
print "Problems disconnecting from libccs
";
}
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>
perl v5.14.2 2013-01-12 CCS(3pm)
