#!/usr/bin/perl -w
use strict;
use Frontier::Client;
use Data::Dumper;
############################################################################
# This is a sample script for use of the experimental RHN Management APIs. #
# The API is currently available using XMLRPC only, which is described in
#
# depth at:
#
#
#
# http://www.xmlrpc.com/
#
#
#
# We use the Frontier modules, available from:
#
#
#
# http://theoryx5.uwinnipeg.ca/mod_perl/cpan-search?dist=Frontier-RPC
#
#
#
############################################################################
############################################################################
#
Defining an XMLRPC session.
#
############################################################################
# Define the host first.
This will be the FQDN of your satellite system.
my $HOST = 'satellite.server.yourdomain.com';
# Now we create the client object that will be used throughout the session.
my $client = new Frontier::Client(url => "http://$HOST/rpc/api");
# Next, we execute a login call, which returns a session identifier that
will
# be passed in all subsequent calls.
The syntax of this call is described
at:
#
#
http://$HOST/rpc/api/auth/login/
my $session = $client->call('auth.login', 'username', 'password');
############################################################################
#
System calls.
#
############################################################################
# This next call returns a list of systems available to the user.
The
# syntax of this call is described at:
#
#
http://$HOST/rpc/api/system/list_user_systems/
#
# In the code snippet below, we dump data about our systems, and we
# capture the ID of the first system we find for future operations.
my $systems = $client->call('system.list_user_systems', $session);
for my $system (@$systems) {
print Dumper($system);
}
print "\n\nCapturing ID of system @$systems[0]->{name}\n\n";
Sample API Script
221
Summary of Contents for NETWORK SATELLITE 5.1.0 - CHANNEL MANAGEMENT
Page 1: ...Red Hat Network Satellite Reference Guide 5 1 0 5 1 ISBN Publication date ...
Page 2: ...Red Hat Network Satellite ...
Page 4: ...Red Hat Network Satellite ...
Page 12: ...xii ...
Page 22: ...8 ...
Page 35: ...Figure 2 11 Available Package Updates Available Package Updates 21 ...
Page 52: ...38 ...
Page 74: ...Figure 5 15 Text Mode Welcome Screen Chapter 5 Red Hat Network Registration Client 60 ...
Page 176: ...162 ...
Page 202: ...188 ...
Page 220: ...206 ...
Page 300: ...Your Preferences 71 Index 286 ...
