github.com/xen-tools.xen-tools
1
0
Fork 0
mirror of synced 2026-04-27 04:46:28 +00:00
Code Releases Activity

2006-08-15 21:30:07 by steve

Browse Source 
Updated pod so that tests/pod-check.t succeeds.  Sigh.
This commit is contained in:
steve
2006-08-15 21:30:07 +00:00
parent 9e5068c8f2
commit 7e3919688b
7 changed files with 106 additions and 14 deletions
Download Patch File Download Diff File Expand all files Collapse all files

46
bin/xen-create-image
View File

@@ -440,7 +440,7 @@ Install an X11 server, using VNC and XDM
--
http://www.steve.org.uk/
$Id: xen-create-image,v 1.65 2006-08-15 21:17:28 steve Exp $
$Id: xen-create-image,v 1.66 2006-08-15 21:30:07 steve Exp $
=cut
@@ -650,6 +650,8 @@ exit;
This means that the the companion scripts xt-* are present on the
host.
=end doc
=cut
sub checkSystem
@@ -673,6 +675,8 @@ sub checkSystem
Setup the default options we'd expect into our global CONFIG hash.
=end doc
=cut
sub setupDefaultOptions
@@ -747,6 +751,8 @@ sub setupDefaultOptions
read the global configuration file /etc/xen-tools/xen-tools.conf
=end doc
=cut
sub readConfigurationFile
@@ -804,6 +810,8 @@ sub readConfigurationFile
Parse the command line arguments this script was given.
=end doc
=cut
sub parseCommandLineArguments
@@ -889,7 +897,7 @@ sub parseCommandLineArguments
if ( $VERSION )
{
my $REVISION = '$Revision: 1.65 $';
my $REVISION = '$Revision: 1.66 $';
if ( $REVISION =~ /1.([0-9.]+) / )
{
@@ -973,6 +981,8 @@ E_O_ERROR
Make sure this script is being run by a user with UID 0.
=end doc
=cut
sub testRootUser
@@ -997,6 +1007,8 @@ E_O_ROOT
Test that the command line arguments we were given make sense.
=end doc
=cut
sub checkArguments
@@ -1139,6 +1151,8 @@ E_O_ERROR
Check that we have some required files present.
=end doc
=cut
sub checkFilesPresent
@@ -1185,6 +1199,8 @@ sub checkFilesPresent
Show the user a summery of what is going to be created for them
=end doc
=cut
sub showSummery
@@ -1243,6 +1259,8 @@ sub showSummery
Test that the user has the "loop" module loaded and present,
this is just a warning useful to newcomers.
=end doc
=cut
sub testLoopbackModule
@@ -1272,6 +1290,8 @@ sub testLoopbackModule
We also will call the filesystem creation routine to make sure we
have a valid filesystem.
=end doc
=cut
sub createLoopbackImages
@@ -1388,6 +1408,8 @@ sub createLoopbackImages
This function is responsible for creating two new logical volumes within
a given LVM volume group.
=end doc
=cut
sub createLVMBits
@@ -1492,6 +1514,8 @@ sub createLVMBits
Format the given image in the users choice of filesystem.
=end doc
=cut
sub createFilesystem
@@ -1542,6 +1566,8 @@ sub createFilesystem
Create the swap filesystem on the given device.
=end doc
=cut
sub createSwap
@@ -1558,6 +1584,8 @@ sub createSwap
Alternatively mount the relevant LVM volume instead.
=end doc
=cut
sub mountImage
@@ -1618,6 +1646,8 @@ sub mountImage
The script will be given the appropriate arguments from our environment.
=end doc
=cut
sub installSystem
@@ -1683,6 +1713,8 @@ sub installSystem
Before we do this we must pass all the relevent options into our
environment.
=end doc
=cut
sub runCustomisationHooks
@@ -1754,6 +1786,8 @@ sub runCustomisationHooks
If the user specified a role for the new instance then execute it.
=end doc
=cut
sub runRoleScript
@@ -1800,6 +1834,8 @@ sub runRoleScript
Note that we don't need to do any setup for the environment since
we did this already before running the hook scripts.
=end doc
=cut
sub runXenConfigCreation
@@ -1824,6 +1860,8 @@ sub runXenConfigCreation
chroot() into the new system and setup the password.
=end doc
=cut
sub setupRootPassword
@@ -1850,6 +1888,8 @@ sub setupRootPassword
When running verbosely we will also display any command output once
it has finished.
=end doc
=cut
sub runCommand
@@ -1909,6 +1949,8 @@ sub runCommand
If we still have the temporary image mounted then make sure
it is unmounted before we terminate.
=end doc
=cut
sub END

14
bin/xen-delete-image
View File

@@ -99,7 +99,7 @@ Specify the LVM volume group where images were previously saved.
--
http://www.steve.org.uk/
$Id: xen-delete-image,v 1.12 2006-08-14 20:55:29 steve Exp $
$Id: xen-delete-image,v 1.13 2006-08-15 21:30:07 steve Exp $
=cut
@@ -200,6 +200,8 @@ exit;
Read the configuration file specified.
=end doc
=cut
sub readConfigurationFile
@@ -258,6 +260,8 @@ sub readConfigurationFile
Parse the arguments specified upon the command line.
=end doc
=cut
sub parseCommandLineArguments
@@ -284,7 +288,7 @@ sub parseCommandLineArguments
if ( $VERSION )
{
my $REVISION = '$Revision: 1.12 $';
my $REVISION = '$Revision: 1.13 $';
if ( $REVISION =~ /1.([0-9.]+) / )
{
@@ -303,6 +307,8 @@ sub parseCommandLineArguments
Check that we received the arguments we expected.
=end doc
=cut
sub checkArguments
@@ -343,6 +349,8 @@ sub checkArguments
Delete the named image, and the corresponding configuration file
from /etc/xen.
=end doc
=cut
sub deleteXenImage
@@ -440,6 +448,8 @@ sub deleteXenImage
When running verbosely we will also display any command output.
=end doc
=cut
sub runCommand

12
bin/xen-list-images
View File

@@ -67,7 +67,7 @@ Show the version number and exit.
--
http://www.steve.org.uk/
$Id: xen-list-images,v 1.10 2006-08-14 20:55:29 steve Exp $
$Id: xen-list-images,v 1.11 2006-08-15 21:30:07 steve Exp $
=cut
@@ -157,6 +157,8 @@ exit;
Read the configuration file specified.
=end doc
=cut
sub readConfigurationFile
@@ -215,6 +217,8 @@ sub readConfigurationFile
Parse the arguments specified upon the command line.
=end doc
=cut
sub parseCommandLineArguments
@@ -238,7 +242,7 @@ sub parseCommandLineArguments
if ( $VERSION )
{
my $REVISION = '$Revision: 1.10 $';
my $REVISION = '$Revision: 1.11 $';
if ( $REVISION =~ /1.([0-9.]+) / )
{
@@ -258,6 +262,8 @@ sub parseCommandLineArguments
Return an array containing the names of each xen configuration
file we found.
=end doc
=cut
sub findXenInstances
@@ -279,6 +285,8 @@ sub findXenInstances
Show details about the the Xen instance contained in the given
configuration file.
=end doc
=cut
sub displayInstance

12
bin/xen-update-image
View File

@@ -82,7 +82,7 @@ Specify the LVM volume group which contains the image(s).
--
http://www.steve.org.uk/
$Id: xen-update-image,v 1.7 2006-08-14 20:55:29 steve Exp $
$Id: xen-update-image,v 1.8 2006-08-15 21:30:07 steve Exp $
=cut
@@ -180,6 +180,8 @@ exit;
Mount the primary disk image, so that we're ready to update it.
=end doc
=cut
sub updateXenImage
@@ -267,6 +269,8 @@ sub updateXenImage
Read the configuration file specified.
=end doc
=cut
sub readConfigurationFile
@@ -325,6 +329,8 @@ sub readConfigurationFile
Parse the arguments specified upon the command line.
=end doc
=cut
sub parseCommandLineArguments
@@ -348,7 +354,7 @@ sub parseCommandLineArguments
if ( $VERSION )
{
my $REVISION = '$Revision: 1.7 $';
my $REVISION = '$Revision: 1.8 $';
if ( $REVISION =~ /1.([0-9.]+) / )
{
@@ -367,6 +373,8 @@ sub parseCommandLineArguments
Test that the options we received from the command line, or our
configuration file, make sense.
=end doc
=cut
sub checkArguments

10
bin/xt-create-xen-config
View File

@@ -57,7 +57,7 @@ xt-create-config - Create a Xen configuration file for a new domain.
--
http://www.steve.org.uk/
$Id: xt-create-xen-config,v 1.13 2006-08-14 20:55:29 steve Exp $
$Id: xt-create-xen-config,v 1.14 2006-08-15 21:30:07 steve Exp $
=cut
@@ -136,6 +136,8 @@ exit 0;
Parse the command line arguments this script was given.
=end doc
=cut
sub parseCommandLineArguments
@@ -162,7 +164,7 @@ sub parseCommandLineArguments
if ( $VERSION )
{
my $REVISION = '$Revision: 1.13 $';
my $REVISION = '$Revision: 1.14 $';
if ( $REVISION =~ /1.([0-9.]+) / )
{
@@ -181,6 +183,8 @@ sub parseCommandLineArguments
Test that the command line arguments we were given make sense.
=end doc
=cut
sub checkArguments
@@ -231,6 +235,8 @@ sub checkArguments
file. We modify some of the variables contained in our environment
and then process the template file with B<Text::Template>.
=end doc
=cut
sub createXenConfig

10
bin/xt-customize-image
View File

@@ -66,7 +66,7 @@ xt-customize-image - Customize a freshly installed copy of GNU/Linux
--
http://www.steve.org.uk/
$Id: xt-customize-image,v 1.13 2006-08-14 20:55:29 steve Exp $
$Id: xt-customize-image,v 1.14 2006-08-15 21:30:07 steve Exp $
=cut
@@ -137,6 +137,8 @@ exit 0;
Parse the command line arguments this script was given.
=end doc
=cut
sub parseCommandLineArguments
@@ -163,7 +165,7 @@ sub parseCommandLineArguments
if ( $VERSION )
{
my $REVISION = '$Revision: 1.13 $';
my $REVISION = '$Revision: 1.14 $';
if ( $REVISION =~ /1.([0-9.]+) / )
{
@@ -182,6 +184,8 @@ sub parseCommandLineArguments
Test that the command line arguments we were given make sense.
=end doc
=cut
sub checkArguments
@@ -256,6 +260,8 @@ E_OR
We will give each script the name of the directory containing the
installation as a single argument.
=end doc
=cut
sub runDistributionHooks

16
bin/xt-install-image
View File

@@ -80,7 +80,7 @@ Install the distribution specified by the B<--dist> argument using the debootstr
--
http://www.steve.org.uk/
$Id: xt-install-image,v 1.22 2006-08-15 21:17:28 steve Exp $
$Id: xt-install-image,v 1.23 2006-08-15 21:30:07 steve Exp $
=cut
@@ -195,6 +195,8 @@ exit 0;
Parse the command line arguments this script was given.
=end doc
=cut
sub parseCommandLineArguments
@@ -235,7 +237,7 @@ sub parseCommandLineArguments
if ( $VERSION )
{
my $REVISION = '$Revision: 1.22 $';
my $REVISION = '$Revision: 1.23 $';
if ( $REVISION =~ /1.([0-9.]+) / )
{
@@ -254,6 +256,8 @@ sub parseCommandLineArguments
Test that the command line arguments we were given make sense.
=end doc
=cut
sub checkArguments
@@ -373,6 +377,8 @@ EOF
Install a new image of Debian using 'debootstrap'.
=end doc
=cut
sub installDebootstrapImage
@@ -451,6 +457,8 @@ sub installDebootstrapImage
Install a new distribution of GNU/Linux using the rpmstrap tool.
=end doc
=cut
sub installRPMStrapImage
@@ -497,6 +505,8 @@ sub installRPMStrapImage
When running verbosely we will also display any command output.
=end doc
=cut
sub runCommand
@@ -578,6 +588,8 @@ sub runCommand
to another as a caching operation which will speed up installations via
debootstrap.
=end doc
=cut
sub copyDebFiles