1
0
mirror of synced 2026-02-20 13:55:16 +00:00

Compare commits

...

153 Commits

Author SHA1 Message Date
Axel Beckert
e1caf2566a Declare this as 4.4 RC1 2013-10-28 22:39:03 +01:00
Axel Beckert
2c020323f6 Refactoring: xt-create-xen-config: Use s/// to strip trailing MB size suffixes 2013-10-28 22:28:40 +01:00
Axel Beckert
c82cb31adc Fix cases where maxmem is not defined
(which is fine)
2013-10-28 21:57:10 +01:00
Axel Beckert
b676da079c xen-delete-image: Exit with return code != 0 in all error cases 2013-10-28 21:31:14 +01:00
Axel Beckert
4d73574a40 xen-delete-image: Proper error message if --test is not used with --dir
Also abort earlier in this case.

Closes: #704878
2013-10-28 21:28:45 +01:00
Axel Beckert
55b303f5a9 Add changelog entry for Patryk Ściborek's fix 2013-10-28 20:54:39 +01:00
Patryk Ściborek
96679edad9 Fix disableStartStopDaemon() if /sbin/initctl is not present 2013-10-28 20:48:10 +01:00
Axel Beckert
ca734e511f Bump Standards-Version to 3.9.5 (no changes) 2013-10-28 10:54:50 +01:00
Axel Beckert
1e76cd2da9 Update changelog 2013-10-25 19:23:39 +02:00
Axel Beckert
d9ed3e65db Merge branch 'fix_passwd' of gitorious.org:xen-tools/aseques-xen-tools 2013-10-25 18:36:54 +02:00
Axel Beckert
73ced0b3f3 Update changelog 2013-10-25 18:36:48 +02:00
Joan
42345c75d4 Fix password interation on image creation 2013-10-25 10:51:11 +02:00
Axel Beckert
ff4aa11dd3 Merge branch 'maxmem' of gitorious.org:xen-tools/aseques-xen-tools 2013-10-23 13:59:16 +02:00
Axel Beckert
cfa30f06b6 Preliminary support for Ubuntu 14.04 Trusty Tahr 2013-10-23 13:54:45 +02:00
Joan
b51936e6ee Updated changelog 2013-10-18 14:09:59 +02:00
Joan
1374208d3b Implemente the option maxmem in xen-tools allowing to set a maximum value to enable dynamic memory ballooning. 2013-10-18 12:59:50 +02:00
Axel Beckert
0e8178ab0f Fix german-ish grammar and remove dash in "IP-Addresses" 2013-10-01 22:20:41 +02:00
Axel Beckert
d20f832f82 Also display MAC address after the DomU has been created 2013-10-01 22:19:10 +02:00
Axel Beckert
fae561aaca Meaningful whitespace fixes in hooks/common/40-setup-networking-deb 2013-09-24 23:16:22 +02:00
Axel Beckert
205bf96f0a Handle potentially empty gateway setting properly
… in hooks/common/40-setup-networking-deb

Thanks Simone Caruso!
2013-09-24 23:11:05 +02:00
Axel Beckert
571f540992 Refactoring: Replace all occurrences of "! -z" by "-n"
Occurred in hooks and bash-completion.
2013-09-24 22:54:05 +02:00
Axel Beckert
86dd78c681 Drop support for memory size in kilobytes in xen-create-image
Neither xt-create-xen-config nor xm support it.
2013-09-24 22:41:20 +02:00
Axel Beckert
6644afa9fd xen-list-images now displays a unit after the memory size 2013-09-24 22:36:27 +02:00
Axel Beckert
7bb7089c9f Changelog entry for Gitorious merge request #5 2013-09-24 22:20:14 +02:00
Axel Beckert
a9dfc112b9 Merge commit 'refs/merge-requests/5' of git://gitorious.org/xen-tools/xen-tools into merge-requests/5 2013-09-24 22:08:41 +02:00
Axel Beckert
c62b053a7b Also declare POD encoding in Xen::Tools::Common
Recode Xen::Tools::Common to UTF-8

Fixes FTBFS with Perl 5.18. Closes #720519 a second time.
2013-09-24 22:02:28 +02:00
Axel Beckert
cc4e170357 Dependency on Term::UI needed for Perl >= 5.17 2013-09-10 17:53:51 +02:00
Axel Beckert
70bf0607db Merge branch 'master' of gitorious.org:xen-tools/xen-tools 2013-09-10 16:14:01 +02:00
Axel Beckert
d8e4a4f264 Note that f1c7c6e1 closes #703159 2013-09-10 16:10:33 +02:00
Axel Beckert
5825331cea Fix typo in current changelog entry 2013-08-24 04:07:16 +02:00
Axel Beckert
f1c7c6e11c Loop around calling "passwd" to get a second chance to change the password
Needs Term::UI which is part of Debian's perl-modules package, hence
no new (build-) dependencies needed.
2013-08-24 00:54:21 +02:00
Axel Beckert
3b806d9f25 Do not run "passwd" via runCommand
runCommand captures STDOUT for logging which is not desired for
interactive commands.

Makes --passwd usable again.

Thanks to Christan Herzog for the bug report.
2013-08-24 00:12:44 +02:00
Axel Beckert
97b0ed29c0 Also switch from cdn.debian.net to http.debian.net in xen-tools.conf 2013-08-23 21:13:44 +02:00
Axel Beckert
12960c8f2b Release 4.4 beta 1 2013-08-23 19:31:47 +02:00
Axel Beckert
029faab59c Add build-dependencies on libdata-validate-{domain,ip,uri}-perl 2013-08-23 19:31:47 +02:00
Axel Beckert
cb5ce9ea5c Bump Standards-Version to 3.9.4 (no changes) 2013-08-23 19:08:42 +02:00
Axel Beckert
fbc903877a Declare POD encoding to be UTF-8 in bin/*
Fixes FTBFS with Perl 5.18.

Closes: #720519
2013-08-23 09:08:43 +02:00
Axel Beckert
fb8b494b41 Preliminary support for Ubuntu Saucy
Does not yet work due to missing support for Saucy in debootstrap.

Also move default mirror for Ubuntu Hardy from archive to old-releases
as Hardy is now EoL.
2013-07-11 01:49:46 +02:00
Axel Beckert
516a7a1625 Update descriptions of distributions 2013-07-11 01:30:41 +02:00
Axel Beckert
d0c4439a10 README: Update list of required Perl modules 2013-07-11 01:13:45 +02:00
Axel Beckert
87fc2a76a0 Remove some redundancy in the README 2013-07-11 00:59:33 +02:00
Axel Beckert
34838811f9 Reorder list of Perl modules in README alphabetically 2013-07-11 00:57:59 +02:00
Axel Beckert
ad68cdb46b Change CPAN links from search.cpan.org to metacpan.org 2013-07-11 00:55:51 +02:00
Axel Beckert
e5abe64ae0 Fix broken quoting in list of required binaries 2013-07-11 00:44:25 +02:00
Axel Beckert
9c47e5da4f Use File::Which instead of findBinary or which 2013-07-11 00:39:05 +02:00
Axel Beckert
b271bf6a63 TODO: Still to many backticks in use
Also merge the two findBinary TODOs
2013-07-11 00:26:12 +02:00
Axel Beckert
a72fbb5f79 TODO: The mess after hitting Ctrl-C has been fixed, too 2013-07-11 00:16:09 +02:00
Axel Beckert
149ad47c5f TODO: Remove #623443-related stuff. Fixed in 74f35d65 2013-07-11 00:13:28 +02:00
Axel Beckert
4442c1a17f TODO: Move remaining code deduplication to Break-Backwards-Compatibility list 2013-07-11 00:11:54 +02:00
Axel Beckert
be55a4a6f2 Remove reference to removed t/xen-tools.t from KNOWN_BUGS 2013-07-11 00:07:37 +02:00
Axel Beckert
5883b7a15c TODO: Generate ECDSA host keys where possible 2013-07-10 23:54:46 +02:00
Axel Beckert
9e05298832 Add dependency on ${perl:Depends} to fix dpkg-gencontrol warning 2013-07-10 22:55:20 +02:00
Axel Beckert
be05397249 Bump debhelper compatibility to 9
Update versioned debhelper build-dependency
2013-07-10 22:53:14 +02:00
Axel Beckert
3b72f2ee4b Mention that #715340 is fixed by 1de424a6 2013-07-10 22:45:05 +02:00
Axel Beckert
699025f33e Use Data::Validate::{Domain,IP} for IP addresses and hostname checks
Add corresponding dependencies on libdata-validate-{domain,ip}-perl.
2013-07-10 22:38:29 +02:00
Axel Beckert
74f35d6550 Better document and check requirements for --apt_proxy
See http://bugs.debian.org/623443 for the corresponding apt issue.

Also add a dependency on libdata-validate-uri-perl which is used to do
the syntax check.
2013-07-10 21:50:09 +02:00
Axel Beckert
72a2a637be Mention issue about #623443 in TODO 2013-07-09 22:38:42 +02:00
Axel Beckert
5ac0f15c32 Remove all redundant pod-inline occurrences of "=cut"
Also care that there are always two blank lines before each "=head1"
(except behind "=head1 NAME").
2013-04-18 20:41:51 +02:00
Axel Beckert
dcb9284636 Remove unused Perl modules Xen::Tools and Xen::Tools::Log
Further developement of the (if any) will happen in the git branch
"xen-tools-moose" where they are still available.

Also remove the according (already disabled) tests and test
modifications from the test suite.

Also remove no the more needed build-dependency on Moose as well as
one Makefile line installing the above mentioned Perl modules.
2013-04-18 20:17:33 +02:00
Axel Beckert
07622d8ed0 t/xen-delete-image.t: Check xen-delete-image exit code
Also run xen-delete-image verbose and print output.
2013-04-18 16:26:55 +02:00
Axel Beckert
081c0370d4 Properly clean up after t/xt-create-xen-config.t 2013-04-18 16:21:25 +02:00
Axel Beckert
ea209f085b Refactor some code duplication in xen-delete-image 2013-04-18 16:21:25 +02:00
Axel Beckert
a70b79f63f Hopefully catch all remaining "ARRAY(0x…).log" issues 2013-04-18 14:45:27 +02:00
Axel Beckert
c482220b99 Rework xci POD: New SYNOPSIS; add EXAMPLES, rename old SYNOPSIS to OPTIONS 2013-04-18 13:52:45 +02:00
Axel Beckert
dcd0bf09f1 Add reference for the three types of MAC relevant for DomUs 2013-04-16 18:03:33 +02:00
Axel Beckert
92a825b87b Axel's Break-Backwards-Compatibility Wishlist: MAC stuff 2013-04-16 17:57:12 +02:00
Axel Beckert
6871954f6e Merge branch 'lib-vs-share' 2013-04-11 19:49:53 +02:00
Axel Beckert
e9d8bd0896 xt-install-image: Don't bail out if only cdebootstrap is installed
There was a duplicated check on debootstrap being installed and only
one has been expanded when cdebootstrap support was added. So
xen-tools bailed out if debootstrap wasn't installed even if it had
been instructed to use cdebootstrap instead.

This also adds support for cdebootstrap-static.

Additionally xt-install-image dispatcher has been extended to hand
array refs of command paths instead of just single command paths.

Thanks to Elmar Heeb for reporting this issue!
2013-04-11 19:47:05 +02:00
Axel Beckert
9369fd2a03 Update debian/changelog 2013-04-11 19:18:41 +02:00
Axel Beckert
04dd81ec07 Mention http.debian.net as default mirror also in POD 2013-04-11 15:59:42 +02:00
Axel Beckert
d39255dc5e Reindent options in POD 2013-04-11 15:59:19 +02:00
Axel Beckert
5a48067d9e Make some x-c-i commandline options negatable
Update documentation and tests accordingly.

Also add pygrub = 1 as example to xen-tools.conf, now that the effect
can be reversed via commandline options.
2013-04-11 15:51:31 +02:00
Axel Beckert
6fc51d20be Update xen-tools.conf comments to be more concise and consistent
Thanks Elmar Heeb!
2013-04-11 13:08:31 +02:00
Axel Beckert
16dbe870f2 TODO: test for --size constraints
... and its prerequisites
2013-04-11 10:52:45 +02:00
Axel Beckert
cb3227d61b Don't only allow lowercase "b" for "bytes".
Also put some examples in the according error message.
2013-04-11 10:32:20 +02:00
Axel Beckert
a89aa86511 Consistent amount of blank lines in POD 2013-04-11 10:29:56 +02:00
Axel Beckert
555ce383d3 Switch from /usr/lib/xen-tools/ to /usr/share/xen-tools/ to properly adhere FHS 2013-04-05 20:19:22 +02:00
Axel Beckert
b29117be02 Ignore Devel::Cover cache 2013-03-22 16:58:59 +01:00
Axel Beckert
ff7ded28e8 Only the key for %ENV, but not for %CONFIG, needs to be modified 2013-03-14 00:10:18 +01:00
Axel Beckert
f0691c9a38 Merge branch 'master' of gitorious.org:xen-tools/xen-tools
Conflicts:
	debian/changelog
2013-03-14 00:01:05 +01:00
Axel Beckert
76d9d59510 Fix export of environment variables (dash vs underscore)
Previously they could contain dashes and then were only accessible
from within Perl, but not from within Bash.

From now on potential dashes in environment variable names are
converted to underscores ("_") before being exported. May affect some
hook or role scripts.
2013-03-13 23:29:52 +01:00
Axel Beckert
5342b04ac7 Some more TODOs (mostly refactoring + code cleanup) 2013-03-13 23:17:09 +01:00
Axel Beckert
01e525106b Use Test::NoTabs in t/no-tabs.t 2013-03-05 23:07:04 +01:00
Axel Beckert
5146706536 Document 4.3.1 in NEWS 2013-01-26 01:18:28 +01:00
Axel Beckert
dfa32a97ca Also switch xt-guess-suite-and-mirror's fallback to http.debian.net 2013-01-25 17:34:39 +01:00
Axel Beckert
c409759745 Rename NEWS to NEWS.markdown 2013-01-25 17:32:20 +01:00
Axel Beckert
149b92af77 Document 4.3 release date in NEWS 2013-01-25 17:30:17 +01:00
Axel Beckert
a4b3c9c568 Also use http.debian.net as default mirror for the debian-archive 2013-01-25 17:09:54 +01:00
Axel Beckert
dbb9124666 Use http.debian.net as default Debian mirror if no mirror is given
... i.e. if even xt-guess-suite-and-mirror is not used.
2013-01-25 17:09:19 +01:00
Axel Beckert
f2d30eaa63 xen-delete-image no more passes $CONFIG{hostname} as array to logprint_with_config
The deletion of failed attempts was logged to files named like
ARRAY(0xa9dd98).log because the hostname was passed twice, i.e. as
arrayref (which didn't hurt otherwise).
2013-01-25 15:22:42 +01:00
Axel Beckert
0709308c1f Save exit code $? at the beginning of the END block
Otherwise cleaning up by doing some system() calls garbles $? with
unwanted values.
2013-01-25 13:19:36 +01:00
Axel Beckert
d3baf1f8ba KNOWN BUGS: -1 +1 2013-01-25 13:03:23 +01:00
Axel Beckert
d7f219f160 Create /boot/grub/default if non-existent
Seems to be needed at least for Squeeze.
2013-01-24 23:14:34 +01:00
Axel Beckert
bc054b1b02 chomp the output of dpkg --print-architecture 2013-01-24 23:14:34 +01:00
Axel Beckert
f18285943c Call update-grub at the end of 82-install-grub-legacy to update menu.lst 2013-01-24 23:14:34 +01:00
Axel Beckert
780839988d Remove trailing blank line 2013-01-24 23:14:34 +01:00
Axel Beckert
025e20a1f1 Better check for grub-legacy availability which ignores virtual packages 2013-01-24 23:14:34 +01:00
Axel Beckert
9330b79d51 hooks/common.sh: Fix syntax error in installCentOS4Package wrapper. 2013-01-24 23:14:10 +01:00
Axel Beckert
979b6fb166 hooks/common.sh: installDebianPackage no more installs recommends 2013-01-24 23:07:56 +01:00
Axel Beckert
57c7d13c48 Factor out legacy grub menu.lst generation 2013-01-24 23:06:53 +01:00
Axel Beckert
1de424a69d Fix filesystem tools installation in 91-install-fs-tools
Was broken since 4.3rc1.

Merged 91-install-fs-tools back into 90-make-fstab. Added support for
RPM-based distributions, too, so it's more generic now.
2013-01-23 18:02:44 +01:00
Axel Beckert
505950dae0 isAPT: Also check for dpkg and rename it to isDeb
That way we should not try to use Debian/Ubuntu package names if
apt4rpm is available.
2013-01-23 17:47:13 +01:00
Axel Beckert
0c8b5d25c4 Factor out functions to test if we should use yum or apt 2013-01-23 17:40:00 +01:00
Axel Beckert
bce580658e hooks/common.sh: Rename installCentOS4Package to installRPMPackage
Add installCentOS4Package wrapper for backward compatibility.
2013-01-23 17:00:09 +01:00
Axel Beckert
b451260f0d TODO/KNOWN_BUGS: Add some hook issues noticed recently
Found during debugging error messages and warnings in log files.
2013-01-23 16:08:01 +01:00
Axel Beckert
af6e1435aa Mention in error message why xen-create-image thinks that an installation failed 2013-01-23 13:14:35 +01:00
Axel Beckert
290ca33840 Fix some typos and grammar in log messages 2013-01-23 13:14:35 +01:00
Axel Beckert
a1838d9030 Also use linux-image-virtual instead of linux-image-server for >= karmic 2013-01-23 13:14:35 +01:00
Axel Beckert
30ae761c27 Fix typo 2013-01-22 02:37:44 +01:00
Axel Beckert
9182aaccb7 Install grub-legacy in all pygrub-based DomUs 2013-01-22 02:35:27 +01:00
Axel Beckert
a2aa1b8a02 Factor out module-init-tools (or kmod) installation 2013-01-22 02:33:12 +01:00
Axel Beckert
03506de7e4 Refactoring: Normalize 80-kernel-install for Ubuntus 2013-01-22 02:01:13 +01:00
Axel Beckert
f71460358b chmod 644 everything in xen-tools/misc 2013-01-22 01:29:13 +01:00
Axel Beckert
8c2a2878df Ubuntu: install linux-image-virtual instead of linux-image-server
By default install linux-image-virtual instead of linux-image-server
on Ubuntu Intrepid and newer.

Hopefully closes: #640099, LP #839492
2013-01-22 01:18:57 +01:00
Axel Beckert
2e69bee531 Rename misc/{xen-tools → xen-tools.bash-completion}
This prevents name space cluttering and ambiguity in xen-tools/misc/.
2013-01-22 00:21:10 +01:00
Axel Beckert
e985d4151b Ship /etc/initramfs-tools/conf.d/xen-tools with MODULES=most
This is a necessary setting to generate Dom0 initrds which are also
suitable for DomU usage.

Trigger update-initramfs in the Debian package.
2013-01-22 00:17:27 +01:00
Axel Beckert
a4a4b7a8e7 Add default mount options for ext4, identical to ext2/ext3 2013-01-21 21:23:41 +01:00
Axel Beckert
a297aa4f5b Fix quoting in hooks/common/91-install-fs-tools 2013-01-21 16:32:10 +01:00
Axel Beckert
6423a67982 Handle module-init-tools → kmod transition in wheezy/raring gracefully 2013-01-21 16:20:03 +01:00
Axel Beckert
4dbb6fe189 Bump copyright years in xen-delete-image and xen-list-images 2013-01-18 02:25:06 +01:00
Axel Beckert
d38718b24b xen-create-image seems to work now again, too: remove TODO 2013-01-18 02:21:25 +01:00
Axel Beckert
53c013f1cc xen-delete-image now also understand --extension 2013-01-18 02:13:19 +01:00
Axel Beckert
6a59d0fd9b Properly ident --extension docs in xen-list-images' POD 2013-01-18 02:12:22 +01:00
Axel Beckert
4e7f58785f Fix Markdown syntax of reference style links in README 2013-01-18 01:55:57 +01:00
Axel Beckert
e240c63c8b README: Installing Dapper and Edgy no more works on Wheezy due to #659360 2013-01-18 01:37:52 +01:00
Axel Beckert
c39628cbe4 Overwork TLS disabling on Debian and Ubuntu 2013-01-18 01:26:11 +01:00
Axel Beckert
73dabead05 unMountImage may fail if $CONFIG{FAIL} is already set 2013-01-17 22:59:34 +01:00
Axel Beckert
ce1624b83e Remove redundant and broken second setting of mirror by distribution 2013-01-17 22:59:01 +01:00
Axel Beckert
97553c50fb Handle Sarge amd64 case properly
Uses File::Which, (build-) dependency on libfile-which-perl added
2013-01-17 22:48:15 +01:00
Axel Beckert
3456849ec8 Make t/xen-lists-images.t more strict: No more /i 2013-01-17 22:17:37 +01:00
Axel Beckert
dc5b36f8ef xen-list-images now also outputs the name of the config file 2013-01-17 22:15:21 +01:00
Axel Beckert
00623e2327 Add --extension option to xen-list-images 2013-01-17 22:13:34 +01:00
Axel Beckert
c6caa0a0ad Fix "--extension=" with empty parameter 2013-01-17 21:57:50 +01:00
Axel Beckert
13dbf65793 Mention that --keep does not prevent unmounting 2013-01-17 21:19:55 +01:00
Axel Beckert
d6144d45ea It's said that just "END" is better style than "sub END". 2013-01-17 21:16:22 +01:00
Axel Beckert
b682ad1817 Normalize redundant FAIL test 2013-01-17 21:16:22 +01:00
Axel Beckert
61df2a6c51 Trap SIGINT to unmount to temporary mount point
This makes END being called again after Ctrl-C.
2013-01-17 21:16:22 +01:00
Axel Beckert
c1e7cb717a Add optional argument to unMountImage and hence runCommand to allow failure 2013-01-17 21:16:22 +01:00
Axel Beckert
a223eedf0b Remove redundant unMountImage call 2013-01-17 20:55:42 +01:00
Axel Beckert
987cf32458 TODO: Move /usr/lib/xen-tools/ to /usr/share/xen-tools/ 2013-01-17 18:30:39 +01:00
Axel Beckert
dd15b27b85 Apply wrap-and-sort to debian/control 2013-01-17 18:06:40 +01:00
Axel Beckert
0defc0f0e3 Switch to a minimal dh style debian/rules
Override dh_auto_build as it triggers the nop target.
2013-01-17 18:05:12 +01:00
Axel Beckert
1f70c8f5d7 Use dh_installexamples with a debian/examples file
This was also the reason to move the examples around in the previous
commit. :-)
2013-01-17 17:53:31 +01:00
Axel Beckert
39c6bb5974 Move examples from debian/examples to examples 2013-01-17 17:51:16 +01:00
Axel Beckert
02240309b3 Bump Copyright years at multiple place 2013-01-17 17:09:37 +01:00
Axel Beckert
ed2c2d5a14 TODO: Obvious Sarge amd64 mirror issues 2013-01-17 16:49:34 +01:00
Axel Beckert
931f88f99a No more explicitly call "make manpages"
It's a depedency of "make install" in the next line anyway.
2013-01-16 18:00:26 +01:00
Axel Beckert
5d0bd617e0 Fix copy & paste error in binary-* targets in debian/rules 2013-01-16 17:59:39 +01:00
Axel Beckert
70e0115f94 Use dh_auto_{install,clean}; use "$(MAKE)" instead of "make" 2013-01-16 16:58:10 +01:00
Axel Beckert
1d16c86eba Remove explicit mentioning of upstream changelog in debian/rules
dh_installchangelogs finds it by itself if it exist. That way building
out of a freshly clone git repository does not fail due to a missing
upstream changelog.
2013-01-16 16:55:23 +01:00
Axel Beckert
e15d6cfd5e Revert "Install upstream ChangeLog only if it exists."
This reverts commit 35477c6172.

If the upstream ChangeLog did not exist, the debian/changelog wasn't
installed either. Which was not the intention.
2013-01-16 16:47:15 +01:00
Axel Beckert
ae33f60680 Makefile: Accept "DESTDIR" instead of "prefix=", too
That way it adheres more commonly used conventions and allows using dh_auto_install
2013-01-16 16:44:42 +01:00
Philipp Erbelding
70a30bb146 prevent matching lines like "shadow_memory = 16" 2012-11-08 12:38:48 +01:00
115 changed files with 1225 additions and 1534 deletions

3
.gitignore vendored
View File

@@ -28,3 +28,6 @@
# backups created by "make update-version"
*.bak
# Devel::Cover cache
cover_db/

View File

@@ -1,6 +1,11 @@
KNOWN BUGS in xen-tools
=======================
Bugs to fix before next release
-------------------------------
[None so far]
Bugs to fix rather soon
-----------------------
@@ -11,8 +16,6 @@ Bugs to fix rather soon
[Bug Report](http://xen-tools.org/pipermail/xen-tools-discuss/2010-May/000757.html)
* `xen-delete-image` ignores extension setting
* partitions were mounted in config file order, not in mountpoint order.
That implies that if you specified :
@@ -29,22 +32,3 @@ Bugs to fix rather soon
Current (unreleased) fix is to sort by mountpoint length.
Fix would be to reproduce what mount does with mount `-a`.
* `xen-create-image` doesn't unmount the `tempdir` properly if `/proc`
wasn't mounted inside
* `xen-create-image` says on startup summary that the Debian mirror is
used even if Ubuntu is going to be installed (and works)
* `xen-list-images` does not honour `--extension`
* `--extension=''` (i.e. empty string) no more works
Bugs to fix later
-----------------
`t/xen-tools.t` can't really test Xen::Tools as the latter requires a
local Xen installation. For proper testing, a dummy set of Xen
configuration files and configurable paths to them in `Xen::Tools`
would be necessary.

View File

@@ -3,7 +3,7 @@ xen-tools
---------
Copyright (c) 2005-2009: Steve Kemp. All rights reserved.
Copyright (c) 2010-2012: The Xen-Tools Development Team, currently consisting of:
Copyright (c) 2010-2013: The Xen-Tools Development Team, currently consisting of:
Axel Beckert <abe@deuxchevaux.org>,
Dmitry Nedospasov <dmitry@nedos.net>, and
Stéphane Jourdois <sjourdois@gmail.com>

130
Makefile
View File

@@ -14,7 +14,7 @@
#
TMP ?= /tmp
DIST_PREFIX = ${TMP}
VERSION = 4.4~dev
VERSION = 4.4rc1
DEBVERSION = $(shell echo $(VERSION)|sed 's/\(rc\|pre\|beta\|alpha\)/~\1/')
BASE = xen-tools
VCS = git
@@ -22,7 +22,8 @@ VCS = git
#
# Installation prefix, useful for the Debian package.
#
prefix=
DESTDIR=
prefix=${DESTDIR}
nop:
@@ -94,7 +95,7 @@ fixup-perms:
chmod 644 etc/xen-tools.conf
chmod 644 etc/xm.tmpl
chmod 644 etc/xm-nfs.tmpl
chmod 644 misc/xen-tools misc/README
chmod 644 misc/*
#
# Install files to /etc/
@@ -109,8 +110,10 @@ install-etc:
cp etc/xm.tmpl ${prefix}/etc/xen-tools/
cp etc/xm-nfs.tmpl ${prefix}/etc/xen-tools/
cp partitions/*-* ${prefix}/etc/xen-tools/partitions.d/
-mkdir -p ${prefix}/etc/bash_completion.d
cp misc/xen-tools ${prefix}/etc/bash_completion.d/
-mkdir -p ${prefix}/etc/bash_completion.d/
cp misc/xen-tools.bash-completion ${prefix}/etc/bash_completion.d/xen-tools
-mkdir -p ${prefix}/etc/initramfs-tools/conf.d/
cp misc/xen-tools.initramfs-tools ${prefix}/etc/initramfs-tools/conf.d/xen-tools
#
@@ -144,62 +147,64 @@ install-bin:
#
install-hooks:
for i in roles/* ; do if [ -f $$i ]; then cp $$i ${prefix}/etc/xen-tools/role.d; fi ; done
for i in ${prefix}/usr/lib/xen-tools/*.d; do if [ -L "$$i" ]; then rm -vf "$$i"; fi; done
mkdir -p ${prefix}/usr/lib/xen-tools/centos-4.d/
mkdir -p ${prefix}/usr/lib/xen-tools/centos-5.d/
mkdir -p ${prefix}/usr/lib/xen-tools/centos-6.d/
mkdir -p ${prefix}/usr/lib/xen-tools/fedora-core-6.d/
cp -R hooks/centos-4/*-* ${prefix}/usr/lib/xen-tools/centos-4.d
cp -R hooks/centos-5/*-* ${prefix}/usr/lib/xen-tools/centos-5.d
cp -R hooks/centos-6/*-* ${prefix}/usr/lib/xen-tools/centos-6.d
cp -R hooks/fedora-core-6/*-* ${prefix}/usr/lib/xen-tools/fedora-core-6.d
-cd ${prefix}/usr/lib/xen-tools/ && ln -s fedora-core-6.d fedora-core-4.d
-cd ${prefix}/usr/lib/xen-tools/ && ln -s fedora-core-6.d fedora-core-5.d
-cd ${prefix}/usr/lib/xen-tools/ && ln -s fedora-core-6.d fedora-core-7.d
-cd ${prefix}/usr/lib/xen-tools/ && ln -s fedora-core-6.d fedora-core-8.d
-cd ${prefix}/usr/lib/xen-tools/ && ln -s fedora-core-6.d fedora-core-9.d
-cd ${prefix}/usr/lib/xen-tools/ && ln -s fedora-core-6.d fedora-core-10.d
-cd ${prefix}/usr/lib/xen-tools/ && ln -s fedora-core-6.d fedora-core-11.d
-cd ${prefix}/usr/lib/xen-tools/ && ln -s fedora-core-6.d fedora-core-12.d
-cd ${prefix}/usr/lib/xen-tools/ && ln -s fedora-core-6.d fedora-core-13.d
-cd ${prefix}/usr/lib/xen-tools/ && ln -s fedora-core-6.d fedora-core-14.d
-cd ${prefix}/usr/lib/xen-tools/ && ln -s fedora-core-6.d fedora-core-15.d
-cd ${prefix}/usr/lib/xen-tools/ && ln -s fedora-core-6.d fedora-core-16.d
-cd ${prefix}/usr/lib/xen-tools/ && ln -s fedora-core-6.d fedora-core-17.d
mkdir -p ${prefix}/usr/lib/xen-tools/debian.d/
cp -R hooks/debian/*-* ${prefix}/usr/lib/xen-tools/debian.d
-cd ${prefix}/usr/lib/xen-tools/ && ln -s debian.d sarge.d
-cd ${prefix}/usr/lib/xen-tools/ && ln -s debian.d etch.d
-cd ${prefix}/usr/lib/xen-tools/ && ln -s debian.d lenny.d
-cd ${prefix}/usr/lib/xen-tools/ && ln -s debian.d squeeze.d
-cd ${prefix}/usr/lib/xen-tools/ && ln -s debian.d wheezy.d
-cd ${prefix}/usr/lib/xen-tools/ && ln -s debian.d jessie.d
-cd ${prefix}/usr/lib/xen-tools/ && ln -s debian.d sid.d
-cd ${prefix}/usr/lib/xen-tools/ && ln -s debian.d testing.d
-cd ${prefix}/usr/lib/xen-tools/ && ln -s debian.d stable.d
mkdir -p ${prefix}/usr/lib/xen-tools/gentoo.d/
cp -R hooks/gentoo/*-* ${prefix}/usr/lib/xen-tools/gentoo.d
mkdir -p ${prefix}/usr/lib/xen-tools/dapper.d/
cp -R hooks/dapper/*-* ${prefix}/usr/lib/xen-tools/dapper.d/
mkdir -p ${prefix}/usr/lib/xen-tools/edgy.d/
cp -R hooks/edgy/*-* ${prefix}/usr/lib/xen-tools/edgy.d/
-cd ${prefix}/usr/lib/xen-tools/ && ln -s edgy.d feisty.d
-cd ${prefix}/usr/lib/xen-tools/ && ln -s edgy.d gutsy.d
-cd ${prefix}/usr/lib/xen-tools/ && ln -s edgy.d hardy.d
mkdir -p ${prefix}/usr/lib/xen-tools/intrepid.d/
cp -R hooks/intrepid/*-* ${prefix}/usr/lib/xen-tools/intrepid.d/
-cd ${prefix}/usr/lib/xen-tools/ && ln -s intrepid.d jaunty.d
mkdir -p ${prefix}/usr/lib/xen-tools/karmic.d/
cp -R hooks/karmic/*-* ${prefix}/usr/lib/xen-tools/karmic.d/
-cd ${prefix}/usr/lib/xen-tools/ && ln -s karmic.d lucid.d
-cd ${prefix}/usr/lib/xen-tools/ && ln -s karmic.d maverick.d
-cd ${prefix}/usr/lib/xen-tools/ && ln -s karmic.d natty.d
-cd ${prefix}/usr/lib/xen-tools/ && ln -s karmic.d oneiric.d
-cd ${prefix}/usr/lib/xen-tools/ && ln -s karmic.d precise.d
-cd ${prefix}/usr/lib/xen-tools/ && ln -s karmic.d quantal.d
-cd ${prefix}/usr/lib/xen-tools/ && ln -s karmic.d raring.d
cp hooks/common.sh ${prefix}/usr/lib/xen-tools
cp -r hooks/common ${prefix}/usr/lib/xen-tools
for i in ${prefix}/usr/share/xen-tools/*.d; do if [ -L "$$i" ]; then rm -vf "$$i"; fi; done
mkdir -p ${prefix}/usr/share/xen-tools/centos-4.d/
mkdir -p ${prefix}/usr/share/xen-tools/centos-5.d/
mkdir -p ${prefix}/usr/share/xen-tools/centos-6.d/
mkdir -p ${prefix}/usr/share/xen-tools/fedora-core-6.d/
cp -R hooks/centos-4/*-* ${prefix}/usr/share/xen-tools/centos-4.d
cp -R hooks/centos-5/*-* ${prefix}/usr/share/xen-tools/centos-5.d
cp -R hooks/centos-6/*-* ${prefix}/usr/share/xen-tools/centos-6.d
cp -R hooks/fedora-core-6/*-* ${prefix}/usr/share/xen-tools/fedora-core-6.d
-cd ${prefix}/usr/share/xen-tools/ && ln -s fedora-core-6.d fedora-core-4.d
-cd ${prefix}/usr/share/xen-tools/ && ln -s fedora-core-6.d fedora-core-5.d
-cd ${prefix}/usr/share/xen-tools/ && ln -s fedora-core-6.d fedora-core-7.d
-cd ${prefix}/usr/share/xen-tools/ && ln -s fedora-core-6.d fedora-core-8.d
-cd ${prefix}/usr/share/xen-tools/ && ln -s fedora-core-6.d fedora-core-9.d
-cd ${prefix}/usr/share/xen-tools/ && ln -s fedora-core-6.d fedora-core-10.d
-cd ${prefix}/usr/share/xen-tools/ && ln -s fedora-core-6.d fedora-core-11.d
-cd ${prefix}/usr/share/xen-tools/ && ln -s fedora-core-6.d fedora-core-12.d
-cd ${prefix}/usr/share/xen-tools/ && ln -s fedora-core-6.d fedora-core-13.d
-cd ${prefix}/usr/share/xen-tools/ && ln -s fedora-core-6.d fedora-core-14.d
-cd ${prefix}/usr/share/xen-tools/ && ln -s fedora-core-6.d fedora-core-15.d
-cd ${prefix}/usr/share/xen-tools/ && ln -s fedora-core-6.d fedora-core-16.d
-cd ${prefix}/usr/share/xen-tools/ && ln -s fedora-core-6.d fedora-core-17.d
mkdir -p ${prefix}/usr/share/xen-tools/debian.d/
cp -R hooks/debian/*-* ${prefix}/usr/share/xen-tools/debian.d
-cd ${prefix}/usr/share/xen-tools/ && ln -s debian.d sarge.d
-cd ${prefix}/usr/share/xen-tools/ && ln -s debian.d etch.d
-cd ${prefix}/usr/share/xen-tools/ && ln -s debian.d lenny.d
-cd ${prefix}/usr/share/xen-tools/ && ln -s debian.d squeeze.d
-cd ${prefix}/usr/share/xen-tools/ && ln -s debian.d wheezy.d
-cd ${prefix}/usr/share/xen-tools/ && ln -s debian.d jessie.d
-cd ${prefix}/usr/share/xen-tools/ && ln -s debian.d sid.d
-cd ${prefix}/usr/share/xen-tools/ && ln -s debian.d testing.d
-cd ${prefix}/usr/share/xen-tools/ && ln -s debian.d stable.d
mkdir -p ${prefix}/usr/share/xen-tools/gentoo.d/
cp -R hooks/gentoo/*-* ${prefix}/usr/share/xen-tools/gentoo.d
mkdir -p ${prefix}/usr/share/xen-tools/dapper.d/
cp -R hooks/dapper/*-* ${prefix}/usr/share/xen-tools/dapper.d/
mkdir -p ${prefix}/usr/share/xen-tools/edgy.d/
cp -R hooks/edgy/*-* ${prefix}/usr/share/xen-tools/edgy.d/
-cd ${prefix}/usr/share/xen-tools/ && ln -s edgy.d feisty.d
-cd ${prefix}/usr/share/xen-tools/ && ln -s edgy.d gutsy.d
-cd ${prefix}/usr/share/xen-tools/ && ln -s edgy.d hardy.d
mkdir -p ${prefix}/usr/share/xen-tools/intrepid.d/
cp -R hooks/intrepid/*-* ${prefix}/usr/share/xen-tools/intrepid.d/
-cd ${prefix}/usr/share/xen-tools/ && ln -s intrepid.d jaunty.d
mkdir -p ${prefix}/usr/share/xen-tools/karmic.d/
cp -R hooks/karmic/*-* ${prefix}/usr/share/xen-tools/karmic.d/
-cd ${prefix}/usr/share/xen-tools/ && ln -s karmic.d lucid.d
-cd ${prefix}/usr/share/xen-tools/ && ln -s karmic.d maverick.d
-cd ${prefix}/usr/share/xen-tools/ && ln -s karmic.d natty.d
-cd ${prefix}/usr/share/xen-tools/ && ln -s karmic.d oneiric.d
-cd ${prefix}/usr/share/xen-tools/ && ln -s karmic.d precise.d
-cd ${prefix}/usr/share/xen-tools/ && ln -s karmic.d quantal.d
-cd ${prefix}/usr/share/xen-tools/ && ln -s karmic.d raring.d
-cd ${prefix}/usr/share/xen-tools/ && ln -s karmic.d saucy.d
-cd ${prefix}/usr/share/xen-tools/ && ln -s karmic.d trusty.d
cp hooks/common.sh ${prefix}/usr/share/xen-tools
cp -r hooks/common ${prefix}/usr/share/xen-tools
#
@@ -207,7 +212,6 @@ install-hooks:
#
install-libraries:
-mkdir -p ${prefix}/usr/share/perl5/Xen/Tools
cp ./lib/Xen/*.pm ${prefix}/usr/share/perl5/Xen
cp ./lib/Xen/Tools/*.pm ${prefix}/usr/share/perl5/Xen/Tools
#
@@ -300,7 +304,9 @@ uninstall:
-rm -rf ${prefix}/etc/xen-tools/skel
-rmdir ${prefix}/etc/xen-tools/
-rm -f ${prefix}/etc/bash_completion.d/xen-tools
# Maybe needed to remove older releases of xen-tools
rm -rf ${prefix}/usr/lib/xen-tools
rm -rf ${prefix}/usr/share/xen-tools
rm -f ${prefix}/usr/share/man/man8/xen-create-image.8.gz
rm -f ${prefix}/usr/share/man/man8/xen-delete-image.8.gz
rm -f ${prefix}/usr/share/man/man8/xen-list-images.8.gz

View File

@@ -1,5 +1,11 @@
xen-tools 4.3rc2 (released TODO)
=======================================
xen-tools 4.3.1 (released 30-Jun-2012)
======================================
Bugfix Release only
xen-tools 4.3 (released 26-Jun-2012)
====================================
Bug Fixes
---------

View File

@@ -32,19 +32,19 @@ known to work reliably, i.e.:
* Etch 4.0 (Dom0 no more tested)
* Lenny 5.0
* Squeeze 6.0
* Wheezy 7.0
* Jessie 8.0 (preliminary support as it's not yet available)
* Sid (works at least at the moment of writing :-)
* Wheezy 7
* Jessie 8 (under developement)
* Sid (always under developement; works at least at the moment of writing :-)
### Ubuntu
(only DomUs tested)
* Dapper Drake 6.06
* Edgy Eft 6.10
* Dapper Drake 6.06 (needs editing of `/usr/share/debootstrap/scripts/dapper` since at least debootstrap version 1.0.37, see [#659360][1])
* Edgy Eft 6.10 (needs editing of `/usr/share/debootstrap/scripts/edgy` since at least debootstrap version 1.0.37, see [#659360][1])
* Feisty Fawn 7.04
* Gutsy Gibbon 7.10
* Hardy Heron 8.04 (see [1][])
* Hardy Heron 8.04 (see [Installing Ubuntu 8.04 as DomU][2])
* Interpid Ibex 8.10
* Jaunty Jackaplope 9.04
* Karmic Koala 9.10
@@ -54,12 +54,14 @@ known to work reliably, i.e.:
* Oneiric Ocelot 11.10
* Precise Pangolin 12.04
* Quantal Quetzal 12.10
* Raring Ringtail 13.04 (preliminary support as it's not yet available)
* Raring Ringtail 13.04
* Saucy Salamander 13.10 (under developement)
[1]: http://www.linux-vserver.org/Installing_Ubuntu_8.04_Hardy_as_guest
"There is an issue with debootstrap on hardy not installing ksyslogd
This can be fixed by chrooting into the newly installed system and
removing the startup scripts."
[1]: http://bugs.debian.org/659360
"debootstrap in Wheezy can no more build Ubuntu Edgy or earlier"
[2]: http://www.linux-vserver.org/Installing_Ubuntu_8.04_Hardy_as_guest
"There is an issue with debootstrap on hardy not installing ksyslogd."
### CentOS
@@ -82,11 +84,22 @@ Requirements
To use these tools you'll need the following software:
* [debootstrap](http://packages.debian.org/debootstrap)
* Perl
* The Perl module [Text::Template](http://search.cpan.org/dist/Text-Template/)
([Debian Package libtext-template-perl](http://packages.debian.org/libtext-template-perl))
* The Perl module [Config::IniFiles](http://search.cpan.org/dist/Config-IniFiles/)
* Perl and the following Perl modules
* [Config::IniFiles](http://metacpan.org/release/Config-IniFiles)
([Debian Package libconfig-inifiles-perl](http://packages.debian.org/libconfig-inifiles-perl))
* [Text::Template](http://metacpan.org/release/Text-Template)
([Debian Package libtext-template-perl](http://packages.debian.org/libtext-template-perl))
* [Data::Validate::Domain](http://metacpan.org/release/Data-Validate-Domain)
([Debian Package libdata-validate-domain-perl](http://packages.debian.org/libdata-validate-domain-perl))
* [Data::Validate::IP](http://metacpan.org/release/Data-Validate-IP)
([Debian Package libdata-validate-ip-perl](http://packages.debian.org/libdata-validate-ip-perl))
* [Data::Validate::URI](http://metacpan.org/release/Data-Validate-URI)
([Debian Package libdata-validate-uri-perl](http://packages.debian.org/libdata-validate-uri-perl))
* [File::Slurp](http://metacpan.org/release/File-Slurp)
([Debian Package libfile-slurp-perl](http://packages.debian.org/libfile-slurp-perl))
* [File::Which](http://metacpan.org/release/File-Which)
([Debian Package libfile-which-perl](http://packages.debian.org/libfile-which-perl))
* and some more modules which are part of the Perl core and hence do not need to be installed separately.
* Make, if you are not installing through a package manager
You can try to install RPM-based distributions such as CentOS, or

View File

@@ -3,12 +3,6 @@ TODO
See KNOWN_BUGS.markdown for real bugs.
Bugs to fix and features to add for 4.3
---------------------------------------
Refactor TLS disabling. Seems to be happen twice, once in 20-setup-apt
and once in 10-disable-tls.
Bugs to fix and features to add for 5.0
---------------------------------------
@@ -79,12 +73,6 @@ Bugs to fix and features to add for 5.0
* LVM snapshot support as an install source.
* Clean up mounts on `Ctrl-C`, causes error while installing otherwise:
Removing /dev/vg0/acromantula-domu1-disk - since we're forcing the
install Can't remove open logical volume "acromantula-domu1-disk"
this should be a matter of unmounting the mounted volume from /tmp.
* Generic grub support
This will generate a much nicer `menu.lst` as a side effect, as its
@@ -134,6 +122,9 @@ Bugs to fix and features to add for 5.0
`authorized_keys` (e.g. a users public key) or to just add the Dom0's
`/root/.ssh/authorized_keys` as the DomU's one.
* Generate ECDSA host keys where possible. (Likely depends on the
to-be-installed SSH version.)
* More generic roles
Deploy a web server or setup ssmtp directly via flag when setting up
@@ -171,16 +162,32 @@ Bugs to fix and features to add for 5.0
* Make used Xen toolstack configurable, i.e. via --xen-toolstack=xl
* Code Deduplication / Refactor the code for less code duplication
`bin/x*` currently contain the same or similar code like e.g. in the
function readConfigurationFile. This needs to be cleaned up.
* Unify --debug and --dumpconfig. Likely make --debug exit
gracefully. Document --debug if --dumpconfig is removed.
* Use `Perl::Critic`
* Refactor the different Ubuntu hooks directories so that only one
ubuntu hooks directory is left.
Then also refactor TLS disabling so that it works on all
distributions the same. Currently Debian is a special case and
Ubuntu half a special case.
* Remove from the (unused) Xen::Tools what's already in the used
Xen::Tools::Common.
* Add test for `--size` constraints (upper- and lowercase letters,
with and without `B`, etc.)
* Needs a `--dry-run` or `--check-constraints` option in
`xen-create-image` first. Which probably both would be a good
idea.
* Replace several occurences of backticks with runCommand. (Mostly
mount commands in `xen-update-image`. The calls to uname or
lsb_release should be fine.)
Stuff from Steve's TODO list / Generic TODOs
--------------------------------------------
@@ -188,6 +195,9 @@ Stuff from Steve's TODO list / Generic TODOs
* `xen-delete-image` should unallocate any used IP addresses.
* `installGentooPackage` in `hooks/common.sh` is a stub and does
nothing yet.
Axel's Break-Backwards-Compatibility Wishlist
---------------------------------------------
@@ -222,4 +232,14 @@ Axel's Break-Backwards-Compatibility Wishlist
Maybe add some `--autostart` or such.
* Maybe replace findBinary with File::Which
* MAC addresses should no more depend on the distribution.
* Let the admin switch between MAC addresses based on XenSource's OUI,
its organisation's own OUI or locally administrated MAC addresses.
See also http://wiki.xen.org/wiki/Xen_Networking#MAC_addresses
* More radical Code Deduplication
`bin/x*` currently still contain similar code like e.g. in the
function parseCommandLineArguments. This should be cleaned up, too,
but may need a bigger redesign.

View File

@@ -1,42 +1,58 @@
#!/usr/bin/perl -w
=encoding utf8
=head1 NAME
xen-create-image - Easily create new Xen instances with networking and OpenSSH.
=cut
=head1 SYNOPSIS
xen-create-image --hostname=<hostname> <further options>
=head1 EXAMPLES
xen-create-image --hostname=some-domu --dist=wheezy --lvm=vg0
xen-create-image --hostname=some-domu --dist=precise --dir=/srv/xen
See below for more specific examples: LOOPBACK EXAMPLES, LVM EXAMPLE
and EVMS EXAMPLE.
=head1 OPTIONS
Help Options:
--help Show the help information for this script.
--help Show the help information for this script.
--manual Read the manual, and examples, for this script.
--manual Read the manual, and examples, for this script.
--verbose Show useful debugging information.
--(no)verbose (Don't) show more of what xen-create-image is
currently doing.
--dumpconfig Show current configuration.
--dumpconfig Show current configuration.
--version Show the version number and exit.
--version Show the version number and exit.
Size / General options:
--accounts Copy all non-system accounts to the guest image
--(no)accounts
(Don't) copy all non-system accounts to the guest
image
--admins Specify that some administrators should be created for
this image, using xen-shell.
--boot Boot the new instance after creating it.
--(no)boot (Don't) boot the new instance after creating it.
--cache=bool Cache .deb files on the host when installing the new
guest with the debootstrap tool. Accepted values:
"yes" (default) and "no".
--cachedir=/path/to/cache/directory
Override the default .deb cache directory. Defaults to
/var/cache/apt/archives/ if it exists (i.e. on Debian
@@ -47,7 +63,9 @@ xen-create-image - Easily create new Xen instances with networking and OpenSSH.
Read the specified file in addition to the global
configuration file.
--copyhosts Copy entries from the dom0's /etc/hosts file to the guest
--(no)copyhosts
(Don't) copy entries from the dom0's /etc/hosts file
to the guest
--copy-cmd NOP: Ignored.
@@ -57,60 +75,71 @@ xen-create-image - Easily create new Xen instances with networking and OpenSSH.
installed. Specifying the path is optional.
--disk_device=diskname
Use specified device name for virtual devices instead of
the default value "xvda".
Use specified device name for virtual devices instead
of the default value "xvda".
--extension=ext
Specify the suffix to give the Xen configuration
file. (Default value: ".cfg")
--force Force overwriting existing images. This will remove
existing images or LVM volumes which match those which
are liable to be used by the new invocation.
--(no)force (Don't) force overwriting existing images. This will
remove existing images or LVM volumes which match
those which are liable to be used by the new
invocation.
--fs=fs Specify the filesystem type to use for the new guest.
Valid choices are 'ext2', 'ext3', 'ext4', 'reiserfs',
'xfs' or 'btrfs'. (Note: pygrub *DOES NOT* support xfs)
'xfs' or 'btrfs'. (Note: pygrub *DOES NOT* support
xfs)
--genpass=1 Generate a random root password (default, set to 0 to turn off)
--genpass=1 Generate a random root password (default, set to 0 to
turn off)
--genpass_len=N
Override the default password length of 8 and generate a
random password of length N. Note: this only works in
conjunction with --genpass
Override the default password length of 8 and generate
a random password of length N. Note: this only works
in conjunction with --genpass
--hash_method=algorithm
Override the default hashing method of sha256 and use the
provided algorithm. Can be : md5, sha256 or sha512
Override the default hashing method of sha256 and use
the provided algorithm. Can be : md5, sha256 or sha512
--hooks=1 Specify whether to run hooks after the image is created.
--ide Use IDE names for virtual devices (i.e. hda not xvda)
--image=str Specify whether to create "sparse" or "full" disk images.
Full images are mandatory when using LVM, so this setting
is ignored in that case.
--image=str Specify whether to create "sparse" or "full" disk
images. Full images are mandatory when using LVM, so
this setting is ignored in that case.
--image-dev=/path/to/device
Specify a physical/logical volume for the disk image.
--initrd=/path/to/initrd
Specify the initial ramdisk. If an image is specified it
must exist.
Specify the initial ramdisk. If an image is specified
it must exist.
--install=1 Specify whether to install the guest system or not.
--keep Don't delete our images if installation fails.
--(no)keep (Don't) keep our images if installation fails. It
maybe unmounted, though.
--kernel=/path/to/kernel
Set the path to the kernel to use for domU. If a
kernel is specified it must exist.
--memory=size
Setup the amount of memory allocated to the new instance.
As suffix recognized size units are "M", "MB", "G" and
"GB" (case does not matter). If there's no unit given,
megabytes are assumed.
Setup the amount of memory allocated to the new
instance. As suffix recognized size units are "M",
"MB", "G" and "GB" (case does not matter). If there's
no unit given, megabytes are assumed.
--maxmem=size
Setup the maximum amount of memory that can be allocated
to the new instance. As suffix recognized size units are "M",
"MB", "G" and "GB" (case does not matter). If there's
no unit given, megabytes are assumed.
Required for dynamic memory ballooning.
--modules=/path/to/modules
Set the path to the kernel modules to use for domU.
@@ -125,9 +154,8 @@ xen-create-image - Easily create new Xen instances with networking and OpenSSH.
--no-xen-ok Don't complain if xen seems not installed or xend is
not running. (Needed for the testsuite.)
--output=dir Specify the output directory to create the xen configuration
file within.
--output=dir Specify the output directory to create the xen
configuration file within.
--partitions=file
Use a specific partition layout configuration file.
@@ -140,23 +168,23 @@ xen-create-image - Easily create new Xen instances with networking and OpenSSH.
--password=passphrase
Set the root password for the new guest.
--passwd Ask for a root password interactively during setup.
NOTE: This overrides --genpass --password
--(no)passwd (Don't) ask for a root password interactively during
setup. NOTE: This overrides --genpass --password.
--pygrub DomU should be booted using pygrub.
--(no)pygrub DomU should (not) be booted using pygrub.
--role=role Run the specified role script(s) post-install.
Role scripts are discussed later in this manpage.
Can be an absolute path. Otherwise it's relative to the
value of --roledir.
--role=role Run the specified role script(s) post-install. Role
scripts are discussed later in this manpage. Can be
an absolute path. Otherwise it's relative to the value
of --roledir.
--role-args="--arg1 --arg2"
Pass the named string literally to any role script.
This is useful for site-specific roles.
--finalrole=role
Similar to role scripts. Run the specified role script(s)
after cfg file creation.
Similar to role scripts. Run the specified role
script(s) after cfg file creation.
--roledir=/path/to/directory
Specify the directory which contains the role scripts.
@@ -183,20 +211,22 @@ xen-create-image - Easily create new Xen instances with networking and OpenSSH.
beforehand.
--vcpus=num
Set the number of vcpus that the new instance will have
instead of the default value of "1".
Set the number of vcpus that the new instance will
have instead of the default value of "1".
Installation options:
--arch=arch Pass the given architecture to debootstrap, rinse,
or rpmstrap when installing the system. This argument
is ignored for other install methods.
--arch=arch Pass the given architecture to debootstrap, rinse, or
rpmstrap when installing the system. This argument is
ignored for other install methods.
--dist=dist Specify the distribution you wish to install.
--install-method=method
Specify the installation method to use. Valid methods are:
Specify the installation method to use. Valid methods
are:
* debootstrap
* cdebootstrap
@@ -214,16 +244,18 @@ xen-create-image - Easily create new Xen instances with networking and OpenSSH.
--mirror=url Setup the mirror to use when installing via
debootstrap. (Default value: mirror used in
/etc/apt/sources.list or for Debian
"http://cdn.debian.net/debian/" and for Ubuntu
"http://http.debian.net/debian/" and for Ubuntu
"http://archive.ubuntu.com/ubuntu/")
The above mentioned Debian mirror hostname uses GeoIP
to choose a more or less close Debian mirror. See
http://wiki.debian.org/DebianGeoMirror for details.
The above mentioned Debian mirror hostname
automatically tries to choose a more or less close
Debian mirror. See http://http.debian.net/ for
details.
--apt_proxy=url
--apt_proxy=protocol://hostname:port/
Specify a proxy to be used by debootstrap, and within
the guest.
the guest. Needs the same syntax as APT's
Acquire::http::Proxy. See apt.conf(5).
--template=tmpl
Specify which template file to use when creating the
@@ -234,15 +266,15 @@ xen-create-image - Easily create new Xen instances with networking and OpenSSH.
Networking options:
--bridge=brname
Optionally, set a specific bridge for the new instance.
This can be especially useful when running multiple
bridges on a dom0.
Optionally, set a specific bridge for the new
instance. This can be especially useful when running
multiple bridges on a dom0.
--broadcast=123.456.789.ABC
Setup the broadcast address for the new instance.
--dhcp The guest will be configured to fetch its networking
details via DHCP.
--(no)dhcp The guest will (not) be configured to fetch its
networking details via DHCP.
--gateway=gw Setup the network gateway for the new instance.
@@ -252,8 +284,9 @@ xen-create-image - Easily create new Xen instances with networking and OpenSSH.
one is setup as the "system" IP, and the additional
ones are added as aliases.
Note that Xen 3.x supports a maximum of three vif statements
per guest. This option conflicts with --dhcp.
Note that Xen 3.x supports a maximum of three vif
statements per guest. This option conflicts with
--dhcp.
--mac=AA:BB:CC:DD:EE:FF
Specify the MAC address to use for a given interface.
@@ -267,26 +300,31 @@ xen-create-image - Easily create new Xen instances with networking and OpenSSH.
--nameserver="123.456.789.ABC 123.456.789.DEF"
Setup the nameserver of the machine, multiple space
separated nameservers are allowed.
If not provided, Dom0's /etc/resolv.conf will be copied
to guest.
separated nameservers are allowed. If not provided,
Dom0's /etc/resolv.conf will be copied to guest.
--vifname=vifname
Optionally, set a specific vif name for the new instance.
Optionally, set a specific vif name for the new
instance.
Mandatory options:
--dir=/path/to/directory
Specify where the output images should go.
Subdirectories will be created for each guest
If you do not wish to use loopback images specify --lvm
or --evms. (These three options are mutually exclusive.)
Subdirectories will be created for each guest.
If you do not wish to use loopback images specify
--lvm or --evms. (These three options are mutually
exclusive.)
--evms=lvm2/container
Specify the container to save images within, i.e. '--evms
lvm2/mycontainer'. If you do not wish to use EVMS specify
--dir or --lvm. (These three options are mutually exclusive.)
Specify the container to save images within,
i.e. '--evms lvm2/mycontainer'. If you do not wish to
use EVMS specify --dir or --lvm. (These three options
are mutually exclusive.)
--hostname=host.example.org
Set the hostname of the new guest system. Ideally
@@ -298,8 +336,6 @@ xen-create-image - Easily create new Xen instances with networking and OpenSSH.
If you do not wish to use LVM specify --dir or --evms.
(These three options are mutually exclusive.)
=cut
=head1 NOTES
@@ -322,8 +358,6 @@ Create a Xen configuration file in so that xm/xl can start the new domain.
The result of invoking these three scripts, and some minor glue between
them, is a simple means of creating new Xen guest domains.
=cut
=head1 DESCRIPTION
@@ -346,7 +380,6 @@ Create a Xen configuration file in so that xm/xl can start the new domain.
If you wish to install additional packages or do any additional
configuration of your new guests, please read the section on "ROLES".
=cut
=head1 CONFIGURATION
@@ -392,6 +425,7 @@ Create a Xen configuration file in so that xm/xl can start the new domain.
size = 2Gb # Disk image size.
image = full # Allocate the full disk size immediately.
memory = 128Mb # Memory size
maxmem = 512Mb # Memory size
swap = 128Mb # Swap size
fs = ext3 # use EXT3 filesystems
dist = stable # Default distribution to install.
@@ -426,9 +460,6 @@ Create a Xen configuration file in so that xm/xl can start the new domain.
This makes use of loopback images stored beneath /home/xen and
will be installed via the debootstrap command.
=cut
=head1 NETWORKING AUTO-SETUP
@@ -464,8 +495,6 @@ Create a Xen configuration file in so that xm/xl can start the new domain.
and would no longer be available. If all the IP addresses are taken
then the system will fail.
=cut
=head1 PARTITIONING
@@ -480,8 +509,6 @@ Create a Xen configuration file in so that xm/xl can start the new domain.
Now when you create a new image specify the name of this file with as
an argument to the --partition option.
=cut
=head1 XEN CONFIGURATION FILE
@@ -499,8 +526,6 @@ Create a Xen configuration file in so that xm/xl can start the new domain.
Alternatively you can create multiple configuration files and
specify the one to use with the --template option.
=cut
=head1 LOOPBACK EXAMPLES
@@ -536,8 +561,6 @@ Create a Xen configuration file in so that xm/xl can start the new domain.
The '/domains/' subdirectory will be created if necessary.
=cut
=head1 LVM EXAMPLE
@@ -559,7 +582,6 @@ Create a Xen configuration file in so that xm/xl can start the new domain.
mkdir -p /mnt/foo
mount /dev/myvolumegroup/vm01.my.flat-disk /mnt/foo
=cut
=head1 EVMS EXAMPLE
@@ -581,8 +603,6 @@ Create a Xen configuration file in so that xm/xl can start the new domain.
mkdir -p /mnt/foo
mount /dev/evms/vm01.my.flat-disk /mnt/foo
=cut
=head1 INSTALLATION METHODS
@@ -598,7 +618,6 @@ Create a Xen configuration file in so that xm/xl can start the new domain.
arguments, or settings in the configuration file. Only one installation
method may be specified at a time; they are mutually-exclusive.
=cut
=head1 INSTALLATION SPEEDUPS
@@ -628,8 +647,6 @@ Create a Xen configuration file in so that xm/xl can start the new domain.
--lvm=myvolumegroup --hostname=vm01.my.flat \
--install-method=copy --install-source=/path/to/copy/from
=cut
=head1 DEBOOTSTRAP CACHING
@@ -657,8 +674,6 @@ Create a Xen configuration file in so that xm/xl can start the new domain.
If you set your cache directory to anything else, simply rm the
contents of the directory.
=cut
=head1 ROLES
@@ -735,9 +750,6 @@ Install an X11 server, using VNC and XDM
NOTE: Multiple role scripts may be invoked if you separate their
names with commas.
=cut
=head1 THE SKELETON DIRECTORY
@@ -765,11 +777,10 @@ Install an X11 server, using VNC and XDM
Dmitry Nedospasov, http://nedos.net/
Stéphane Jourdois
=cut
=head1 LICENSE
Copyright (c) 2005-2009 by Steve Kemp, (c) 2010-2012 by The Xen-Tools
Copyright (c) 2005-2009 by Steve Kemp, (c) 2010-2013 by The Xen-Tools
Development Team. All rights reserved.
This module is free software;
@@ -779,6 +790,7 @@ The LICENSE file contains the full text of the license.
=cut
$SIG{INT} = \&clean_up;
use strict;
use English;
@@ -787,9 +799,15 @@ use Env;
use File::Path qw/ mkpath /;
use File::Temp qw/ tempdir /;
use File::Copy qw/ mv cp /;
use File::Which;
use Getopt::Long;
use Pod::Usage;
use Data::Dumper;
use Data::Validate::URI qw/ is_uri /;
use Data::Validate::IP qw/ is_ipv4 /;
use Data::Validate::Domain qw/ is_hostname /;
use Term::UI;
use Term::ReadLine;
use Xen::Tools::Common;
@@ -823,7 +841,7 @@ my $MOUNT_POINT = undef;
#
# Release number.
#
my $RELEASE = '4.4~dev';
my $RELEASE = '4.4rc1';
#
@@ -1048,7 +1066,7 @@ if ( $CONFIG{ 'install' } )
#
if ( !-x $MOUNT_POINT . "/bin/ls" )
{
logprint("System installation failed. Aborting\n");
logprint("System installation failed: /bin/ls missing. Aborting.\n");
$CONFIG{'FAIL'} = 1;
exit 127;
}
@@ -1141,11 +1159,11 @@ E_O_ERROR
# Check that all the binaries have been installed properly
#
my @required =
qw ( / xt-customize-image xt-install-image xt-create-xen-config / );
qw(xt-customize-image xt-install-image xt-create-xen-config);
foreach my $bin (@required)
{
if ( !defined( findBinary($bin) ) )
if ( !defined( which($bin) ) )
{
logprint( "The script '$bin' was not found.\nAborting\n\n" );
$CONFIG{'FAIL'} = 1;
@@ -1320,20 +1338,22 @@ sub setupDefaultOptions
# Initialize per distribution mirror defaults: Debian
foreach my $debdist (qw(squeeze wheezy jessie sid testing oldstable stable unstable)) {
$CONFIG{ 'mirror_'.$debdist } = $CONFIG{ 'mirror' }
$CONFIG{ 'mirror_'.$debdist } = 'http://http.debian.net/debian';
}
foreach my $debdist (qw(sarge etch lenny)) {
$CONFIG{ 'mirror_'.$debdist } = 'http://archive.debian.org/debian';
$CONFIG{ 'mirror_'.$debdist } = 'http://http.debian.net/debian-archive/debian';
}
# Initialize per distribution mirror defaults: Ubuntu
foreach my $ubuntudist (qw(hardy lucid oneiric precise quantal raring)) {
foreach my $ubuntudist (qw(lucid precise quantal raring saucy trusty)) {
$CONFIG{ 'mirror_'.$ubuntudist } = 'http://archive.ubuntu.com/ubuntu';
}
foreach my $ubuntudist (qw(dapper edgy feisty gutsy intrepid jaunty karmic maverick natty)) {
foreach my $ubuntudist (qw(dapper edgy feisty gutsy hardy intrepid jaunty karmic maverick natty oneiric)) {
$CONFIG{ 'mirror_'.$ubuntudist } = 'http://old-releases.ubuntu.com/ubuntu';
}
$CONFIG{ 'apt_proxy' } = '';
$CONFIG{ 'arch' } = '';
$CONFIG{ 'arch' } =
which('dpkg') ? `dpkg --print-architecture` : '';
chomp($CONFIG{ 'arch' });
$CONFIG{ 'fs' } = 'ext3';
$CONFIG{ 'force' } = 0;
$CONFIG{ 'no_xen_ok' } = 0;
@@ -1417,13 +1437,13 @@ sub checkOption
# Define argument types
my %types = (
integerWithSuffix => {
check => qr/^[0-9.]+[GgMmKk]b?$/,
message => "takes a suffixed integer.\n",
check => qr/^[0-9.]+[GM]B?$/i,
message => "takes a suffixed (mb, MB, G, etc.) integer.\n",
},
distribution => {
check => sub { -d "/usr/lib/xen-tools/$_[0].d" },
check => sub { -d "/usr/share/xen-tools/$_[0].d" },
message => "takes a distribution name " .
"(see /usr/lib/xen-tools for valid values).\n",
"(see /usr/share/xen-tools for valid values).\n",
},
imageType => {
check => qr/^sparse|full$/,
@@ -1446,15 +1466,15 @@ sub checkOption
message => "must be a disk device (xvd[a-z]+, sd[a-z]+).\n",
},
ipv4 => {
check => qr/^(?:(?:25[0-5]|2[0-4][0-9]|[01]?[0-9][0-9]?)\.){3}(?:25[0-5]|2[0-4][0-9]|[01]?[0-9][0-9]?)$/,
check => sub { is_ipv4($_[0]) },
message => "must be valid IPv4.\n",
},
ipv4_or_auto => {
check => qr/^(?:auto|(?:(?:25[0-5]|2[0-4][0-9]|[01]?[0-9][0-9]?)\.){3}(?:25[0-5]|2[0-4][0-9]|[01]?[0-9][0-9]?))$/,
check => sub { is_ipv4($_[0]) or $_[0] eq 'auto' },
message => "must be valid IPv4 or the keyword 'auto'.\n",
},
hostname => {
check => qr/^[a-z0-9][a-z0-9.-]{0,254}$/i,
check => sub { is_hostname($_[0]) },
message => "must be a valid hostname.\n",
},
supportedFs => {
@@ -1485,6 +1505,10 @@ sub checkOption
check => qr/^md5|sha256|sha512$/i,
message => "must be md5, sha256 or sha512.\n",
},
uri => {
check => sub { is_uri($_[0]) },
message => "must be an URI including the protocol\n",
},
);
# Define what argument each option accepts.
@@ -1495,6 +1519,7 @@ sub checkOption
swap => 'integerWithSuffix',
image => 'imageType',
memory => 'integerWithSuffix',
maxmem => 'integerWithSuffix',
kernel => 'existingFile',
initrd => 'existingFile',
modules => 'existingDir',
@@ -1519,6 +1544,7 @@ sub checkOption
mac => 'mac',
ip => 'ipv4_or_auto',
hash_method => 'hashMethod',
apt_proxy => 'uri',
);
# If given option does not exists in optionsTypes,
@@ -1592,6 +1618,7 @@ sub parseCommandLineArguments
"noswap", \&checkOption,
"image=s", \&checkOption,
"memory=s", \&checkOption,
"maxmem=s", \&checkOption,
"vcpus=i", \&checkOption,
# Locations
@@ -1609,14 +1636,14 @@ sub parseCommandLineArguments
"disk_device=s", \&checkOption,
# Hosts options
"nohosts", \$CONFIG{ 'nohosts' },
"copyhosts", \$CONFIG{ 'copyhosts' },
"nohosts", \$CONFIG{ 'nohosts' },
"copyhosts!", \$CONFIG{ 'copyhosts' },
# Deprecated legacy options for backwards compatibility
"no-hosts", \$CONFIG{ 'nohosts' },
"copy-hosts", \$CONFIG{ 'copyhosts' },
"no-hosts", \$CONFIG{ 'nohosts' },
"copy-hosts!", \$CONFIG{ 'copyhosts' },
# Networking options
"dhcp", \$CONFIG{ 'dhcp' },
"dhcp!", \$CONFIG{ 'dhcp' },
"bridge=s", \&checkOption,
"gateway=s", \&checkOption,
"hostname=s", \&checkOption,
@@ -1637,11 +1664,11 @@ sub parseCommandLineArguments
"debootstrap-cmd=s", \$CONFIG{ 'debootstrap-cmd' },
# Misc. options
"accounts", \$CONFIG{ 'accounts' },
"accounts!", \$CONFIG{ 'accounts' },
"admins=s", \&checkOption,
"arch=s", \&checkOption,
"fs=s", \&checkOption,
"boot", \$CONFIG{ 'boot' },
"boot!", \$CONFIG{ 'boot' },
"cache=s", \&checkOption,
"cachedir=s", \&checkOption,
"config=s", \&checkOption,
@@ -1649,8 +1676,8 @@ sub parseCommandLineArguments
"scsi", \$CONFIG{ 'scsi' },
"install=i", \&checkOption,
"hooks=i", \&checkOption,
"pygrub", \$CONFIG{ 'pygrub' },
"passwd", \$CONFIG{ 'passwd' },
"pygrub!", \$CONFIG{ 'pygrub' },
"passwd!", \$CONFIG{ 'passwd' },
"genpass=i", \&checkOption,
"genpass-len=i", \&checkOption,
"genpass_len=i", \&checkOption,
@@ -1661,20 +1688,20 @@ sub parseCommandLineArguments
"role-args=s", \&checkOption,
"finalrole=s", \&checkOption,
"roledir=s", \&checkOption,
"force", \$CONFIG{ 'force' },
"force!", \$CONFIG{ 'force' },
"no-xen-ok", \$CONFIG{ 'no_xen_ok' },
"keep", \$CONFIG{ 'keep' },
"keep!", \$CONFIG{ 'keep' },
"template=s", \&checkOption,
"output=s", \&checkOption,
"extension=s", \&checkOption,
"extension:s", \&checkOption,
"dontformat", \&checkOption,
# Help options
"debug", \$CONFIG{ 'debug' },
"debug!", \$CONFIG{ 'debug' },
"help", \$HELP,
"manual", \$MANUAL,
"dumpconfig", \$DUMPCONFIG,
"verbose", \$CONFIG{ 'verbose' },
"verbose!", \$CONFIG{ 'verbose' },
"version", \$VERSION
) )
{
@@ -1813,7 +1840,7 @@ sub checkArguments
#
# Lucid and probably all later Ubuntus, too, don't work without pygrub
#
if ( $CONFIG{ 'dist' } =~ /lucid|maverick|natty|oneiric|precise|quantal|raring/ )
if ( $CONFIG{ 'dist' } =~ /lucid|maverick|natty|oneiric|precise|quantal|raring|saucy/ )
{
$CONFIG{ 'pygrub' } = 1;
}
@@ -1823,9 +1850,10 @@ sub checkArguments
#
if ( $CONFIG{ 'dist' } =~ /sarge/ and
$CONFIG{ 'arch' } =~ /amd64/ and
$CONFIG{ 'mirror_sarge' } eq 'http://archive.debian.org/debian' )
$CONFIG{ 'mirror_sarge' } =~ m(/debian-archive/debian/?$))
{
$CONFIG{ 'mirror_sarge' } = 'http://archive.debian.org/debian-amd64';
$CONFIG{ 'mirror_sarge' } =~
s(/debian-archive/debian/?)(/debian-archive/debian-amd64);
}
#
@@ -2260,7 +2288,7 @@ sub checkBinariesPresent
foreach my $file (@required)
{
if ( !defined( findBinary($file) ) )
if ( !defined( which($file) ) )
{
logprint("The following binary is required to run this tool\n");
logprint("\t$file\n");
@@ -2276,7 +2304,7 @@ sub checkBinariesPresent
{
# loopback image
if ( !defined( findBinary("dd") ) )
if ( !defined( which("dd") ) )
{
logprint("The following binary is required to run this tool\n");
logprint("\tdd\n");
@@ -2297,7 +2325,7 @@ sub checkBinariesPresent
foreach my $file (@evms)
{
if ( !defined( findBinary($file) ) )
if ( !defined( which($file) ) )
{
logprint("The following binary is required to run this tool\n");
logprint("\t$file\n");
@@ -2317,7 +2345,7 @@ sub checkBinariesPresent
foreach my $file (@lvm)
{
if ( !defined( findBinary($file) ) )
if ( !defined( which($file) ) )
{
logprint("The following binary is required to run this tool\n");
logprint("\t$file\n");
@@ -2623,6 +2651,11 @@ sub showSummary
logprint("Image type : $CONFIG{'image'}\n");
logprint("Memory size : $CONFIG{'memory'}\n");
if ( defined( $CONFIG{ 'maxmem' } ) )
{
logprint("Max mem size : $CONFIG{'maxmem'}\n");
}
if ( defined( $CONFIG{ 'kernel' } ) && length( $CONFIG{ 'kernel' } ) )
{
logprint("Kernel path : $CONFIG{'kernel'}\n");
@@ -3291,7 +3324,7 @@ sub createFilesystem
#
my ($binary, $args) = split(/ /, $command, 2);
if ( !defined( findBinary($binary) ) )
if ( !defined( which($binary) ) )
{
logprint(
"The binary '$binary' required to create the filesystem $fs is missing\n"
@@ -3516,15 +3549,6 @@ sub installSystem
sub exportEnvironment
{
#
# Per-distribution mirror?
#
my $distMirror = "mirror_" . $CONFIG{ 'dist' };
if ( $CONFIG{ $distMirror } && length( $CONFIG{ $distMirror } ) )
{
$CONFIG{ 'mirror' } = $CONFIG{ $distMirror };
}
#
# Export partitions array to configuration
#
@@ -3534,7 +3558,9 @@ sub exportEnvironment
{
if ( defined( $CONFIG{ $key } ) )
{
$ENV{ $key } = $CONFIG{ $key };
my $envkey = $key;
$envkey =~ s/-/_/g;
$ENV{ $envkey } = $CONFIG{ $key };
}
}
}
@@ -3918,7 +3944,19 @@ sub setupRootPassword
{
if ( -x $MOUNT_POINT . "/usr/bin/passwd" )
{
runCommand("chroot $MOUNT_POINT /usr/bin/passwd", \%CONFIG);
my $tryagain = 1;
my $term = Term::ReadLine->new('Password change failed');
while ($tryagain) {
my $rc = system("chroot $MOUNT_POINT /usr/bin/passwd");
if ($rc >> 8) {
$tryagain = $term->ask_yn(
prompt => 'Do you want to try to change the password again??',
default => 'y',
);
} else {
$tryagain=0;
}
}
}
else
{
@@ -4029,13 +4067,13 @@ sub generatePassword {
sub unMountImage
{
my ($point) = (@_);
my ($point, $fail_ok) = (@_);
#
# First we unmount /proc and /dev/pts in the guest install.
#
runCommand("umount $point/proc", \%CONFIG);
#runCommand("umount $point/dev/pts", \%CONFIG);
runCommand("umount $point/proc", \%CONFIG, $fail_ok);
#runCommand("umount $point/dev/pts", \%CONFIG, $fail_ok);
#
# Open /proc/mount and get a list of currently mounted paths
@@ -4072,7 +4110,7 @@ sub unMountImage
foreach my $path (@points)
{
$CONFIG{ 'verbose' } && print "Unmounting : $path\n";
runCommand("umount $path", \%CONFIG);
runCommand("umount $path", \%CONFIG, $fail_ok);
}
$MOUNT_POINT = undef;
@@ -4088,9 +4126,19 @@ sub unMountImage
=cut
sub END
sub clean_up () {
if ( defined($MOUNT_POINT) )
{
unMountImage($MOUNT_POINT, 1);
}
}
END
{
exit 0 if $VERSION || $HELP || $MANUAL || $DUMPCONFIG;
# Capture exit code
my $exitcode = $?;
exit $exitcode if $VERSION || $HELP || $MANUAL || $DUMPCONFIG;
my $host_rsa_key = '';
#
@@ -4108,7 +4156,7 @@ sub END
} else {
$host_rsa_key = "N/A";
}
unMountImage($MOUNT_POINT);
unMountImage($MOUNT_POINT, $CONFIG{'FAIL'});
}
#
@@ -4117,14 +4165,6 @@ sub END
#
if ( $CONFIG{ 'boot' } and !$CONFIG{'FAIL'} )
{
#
# Unmount the image and any subsequent mounts.
#
if ( defined($MOUNT_POINT) ) {
unMountImage($MOUNT_POINT);
}
#
# If there is an /etc/xen/auto directory then link in the
# domain so that it will automatically restart, if it isn't
@@ -4188,7 +4228,7 @@ sub END
# $CONFIG{'FAIL'} = 0 - Success
# $CONFIG{'FAIL'} = 1 - Failed to install, delete the image
# $CONFIG{'FAIL'} = 2 - Files exist, either .cfg or lvm... etc
if ( ($CONFIG{'FAIL'} == 1 or $CONFIG{'FAIL'} == 1) && ( !$CONFIG{ 'keep' } ) )
if ( $CONFIG{'FAIL'} == 1 && ( !$CONFIG{ 'keep' } ) )
{
#
@@ -4222,7 +4262,8 @@ sub END
logprint("---------------------\n");
logprint("Hostname : $CONFIG{'hostname'}\n");
logprint("Distribution : $CONFIG{'dist'}\n");
logprint("IP-Address(es) : ");
logprint("MAC Address : $CONFIG{'mac'}\n");
logprint("IP Address(es) : ");
if ( $CONFIG{ 'dhcp' } ) {
logprint("dynamic");
} elsif( $CONFIG{ 'ip' } ) {
@@ -4238,4 +4279,6 @@ sub END
}
logprint("\n");
}
exit $exitcode;
}

View File

@@ -1,5 +1,7 @@
#!/usr/bin/perl -w
=encoding utf8
=head1 NAME
xen-create-nfs - Create a Xen configuration file for an NFS-root guest.
@@ -36,8 +38,6 @@ xen-create-nfs - Create a Xen configuration file for an NFS-root guest.
--nfs_server Specify the NFS server to mount the root partition from.
--nfs_root Specify the path, upon the NFS server, to mount.
=cut
=head1 OPTIONS
@@ -55,11 +55,8 @@ Read the manual for this script.
=item B<--version>
Show the version number and exit.
=back
=cut
=head1 DESCRIPTION
@@ -71,8 +68,6 @@ Show the version number and exit.
support more than the minimal number of options to completement the
existing xen-create-image script, however it is hopefully useful.
=cut
=head1 REFERENCE
@@ -81,16 +76,12 @@ Show the version number and exit.
http://www.debian-administration.org/articles/505
=cut
=head1 AUTHORS
Steve Kemp, http://www.steve.org.uk/
Stéphane Jourdois
=cut
=head1 LICENSE
@@ -102,7 +93,6 @@ you can redistribute it and/or modify it under
the same terms as Perl itself.
The LICENSE file contains the full text of the license.
=cut
@@ -131,7 +121,7 @@ $CONFIG{ 'template' } = '/etc/xen-tools/xm-nfs.tmpl';
#
# Release number.
#
my $RELEASE = '4.4~dev';
my $RELEASE = '4.4rc1';
# store version number away.

View File

@@ -1,5 +1,7 @@
#!/usr/bin/perl -w
=encoding utf8
=head1 NAME
xen-delete-image - Delete previously created Xen instances.
@@ -8,6 +10,10 @@ xen-delete-image - Delete previously created Xen instances.
xen-delete-image [options] [--hostname=]imageName1 [--hostname=]imageName2
Filename Options:
--extension Specify the file extension to use. An empty extension is equal
to any extension.
Help Options:
--help Show help information.
--manual Read the manual for this script.
@@ -26,8 +32,6 @@ xen-delete-image - Delete previously created Xen instances.
--test Don't complain if we're not invoked by root.
--no-xen-ok Don't complain if xen seems not installed or xend is not running
=cut
=head1 OPTIONS
@@ -52,16 +56,14 @@ Specify the LVM volume group where images were previously saved.
Read the manual for this script.
=item B<--test>
Do not complain, or exit, if the script is not executed by the root user.
Do not complain, or exit, if the script is not executed by the root
user. (Only works in conjunction with --dir.)
=item B<--version>
Show the version number and exit.
=back
=cut
=head1 DESCRIPTION
@@ -75,8 +77,6 @@ Show the version number and exit.
but will fail to remove anything which the user does not have permission
to delete.)
=cut
=head1 LOOPBACK EXAMPLE
@@ -92,8 +92,6 @@ Show the version number and exit.
(The matching Xen configuration files beneath /etc/xen will also be
removed.)
=cut
=head1 LVM EXAMPLE
@@ -110,8 +108,6 @@ Show the version number and exit.
The Xen configuration files will also be removed from beneath /etc/xen.
=cut
=head1 EVMS EXAMPLE
@@ -128,8 +124,6 @@ Show the version number and exit.
The Xen configuration files will also be removed.
=cut
=head1 AUTHORS
@@ -137,12 +131,10 @@ Show the version number and exit.
Axel Beckert, http://noone.org/abe/
Stéphane Jourdois
=cut
=head1 LICENSE
Copyright (c) 2005-2009 by Steve Kemp, (c) 2010 by The Xen-Tools
Copyright (c) 2005-2009 by Steve Kemp, (c) 2010-2013 by The Xen-Tools
Development Team. All rights reserved.
This module is free software;
@@ -150,7 +142,6 @@ you can redistribute it and/or modify it under
the same terms as Perl itself.
The LICENSE file contains the full text of the license.
=cut
@@ -173,7 +164,7 @@ my %CONFIG;
#
# Release number.
#
my $RELEASE = '4.4~dev';
my $RELEASE = '4.4rc1';
#
@@ -181,6 +172,11 @@ my $RELEASE = '4.4~dev';
#
$CONFIG{ 'xm' } = findXenToolstack();
#
# Default values
#
$CONFIG{ 'extension' } = '.cfg';
#
# Read the global configuration file if it exists.
@@ -223,27 +219,21 @@ E_O_ROOT
#
# Loop over the supplied arguments, and attempt to delete each
# image.
# image. Check both, bare parameters as well as --hostname options.
#
while ( my $name = shift )
{
if ( $CONFIG{ 'no_xen_ok' } or !xenRunning($name, \%CONFIG) )
{
deleteXenImage($name);
}
else
{
print "Skipping xen guest '$name' - it appears to be running.\n";
}
my @hosts = ();
if (exists($CONFIG{ 'hostname' }) and defined($CONFIG{ 'hostname' })) {
my $hostname_option = $CONFIG{ 'hostname' };
@hosts = 'ARRAY' eq ref($hostname_option) ?
@$hostname_option : $hostname_option;
}
#
# Also delete any which were specified using the --hostname flag
#
my $hosts = $CONFIG{ 'hostname' };
foreach my $name (@$hosts)
foreach my $name (@ARGV, @hosts)
{
if ( $CONFIG{ 'no_xen_ok' } or !xenRunning($name, \%CONFIG) )
my %PER_HOST_CONFIG = %CONFIG;
$PER_HOST_CONFIG{ 'hostname' } = $name;
if ( $CONFIG{ 'no_xen_ok' } or !xenRunning($name, \%PER_HOST_CONFIG) )
{
deleteXenImage($name);
}
@@ -282,6 +272,7 @@ sub parseCommandLineArguments
"dry-run", \$CONFIG{ 'dry-run' },
"lvm=s", \$CONFIG{ 'lvm' },
"evms=s", \$CONFIG{ 'evms' },
"extension:s", \$CONFIG{ 'extension' },
"hostname=s@", \$CONFIG{ 'hostname' },
"test", \$CONFIG{ 'test' },
"verbose", \$CONFIG{ 'verbose' },
@@ -319,10 +310,10 @@ sub checkArguments
#
# When testing we only care about loopback images, not disk images.
#
if ( $CONFIG{ 'test' } )
if ( $CONFIG{ 'test' } and ( $CONFIG{ 'lvm' } or $CONFIG{ 'evms' } ))
{
$CONFIG{ 'lvm' } = undef;
$CONFIG{ 'evms' } = undef;
print "Error: --test only works with --dir.\n";
exit 1;
}
#
@@ -344,7 +335,7 @@ sub checkArguments
print " --dir\n";
print " --evms\n";
print " --lvm\n";
exit;
exit 2;
}
}
@@ -371,17 +362,17 @@ sub deleteXenImage
#
# Delete the Xen auto-start file if it exists.
#
if ( -e "/etc/xen/auto/$hostname.cfg" )
if ( -e "/etc/xen/auto/$hostname".$CONFIG{ 'extension' } )
{
push( @delete, "/etc/xen/auto/$hostname.cfg" );
push( @delete, "/etc/xen/auto/$hostname".$CONFIG{ 'extension' } );
}
#
# Delete the Xen configuration file if it exists.
#
if ( -e "/etc/xen/$hostname.cfg" )
if ( -e "/etc/xen/$hostname".$CONFIG{ 'extension' } )
{
push( @delete, "/etc/xen/$hostname.cfg" );
push( @delete, "/etc/xen/$hostname".$CONFIG{ 'extension' } );
}
#
@@ -404,7 +395,8 @@ sub deleteXenImage
}
}
my %PER_HOST_CONFIG = %CONFIG;
$PER_HOST_CONFIG{ 'hostname' } = $hostname;
if ( defined( $CONFIG{ 'dir' } ) )
{
my $prefix = $CONFIG{ 'dir' } . "/domains/";
@@ -438,7 +430,7 @@ sub deleteXenImage
print "Would remove LVM swap volume /dev/$CONFIG{'lvm'}/$hostname-swap\n";
} else {
print "Removing swap volume\n";
runCommand("lvremove /dev/$CONFIG{'lvm'}/$hostname-swap --force", \%CONFIG);
runCommand("lvremove /dev/$CONFIG{'lvm'}/$hostname-swap --force", \%PER_HOST_CONFIG);
}
}
@@ -448,7 +440,7 @@ sub deleteXenImage
print "Would remove LVM disk volume /dev/$CONFIG{'lvm'}/$hostname-disk\n";
} else {
print "Removing LVM disk volume\n";
runCommand("lvremove /dev/$CONFIG{'lvm'}/$hostname-disk --force", \%CONFIG);
runCommand("lvremove /dev/$CONFIG{'lvm'}/$hostname-disk --force", \%PER_HOST_CONFIG);
}
}
@@ -470,8 +462,8 @@ sub deleteXenImage
print "Would remove EVMS swap volume: $CONFIG{'evms'}/$hostname-swap\n";
} else {
print "Removing EVMS swap volume\n";
runCommand("echo Delete : /dev/evms/$hostname-swap | evms", \%CONFIG);
runCommand("echo Delete : $CONFIG{'evms'}/$hostname-swap | evms", \%CONFIG);
runCommand("echo Delete : /dev/evms/$hostname-swap | evms", \%PER_HOST_CONFIG);
runCommand("echo Delete : $CONFIG{'evms'}/$hostname-swap | evms", \%PER_HOST_CONFIG);
}
}
@@ -482,8 +474,8 @@ sub deleteXenImage
print "Would remove EVMS disk volume: $CONFIG{'evms'}/$hostname-swap\n";
} else {
print "Removing EVMS disk volume\n";
runCommand("echo Delete : /dev/evms/$hostname-disk | evms", \%CONFIG);
runCommand("echo Delete : $CONFIG{'evms'}/$hostname-disk | evms", \%CONFIG);
runCommand("echo Delete : /dev/evms/$hostname-disk | evms", \%PER_HOST_CONFIG);
runCommand("echo Delete : $CONFIG{'evms'}/$hostname-disk | evms", \%PER_HOST_CONFIG);
}
}

View File

@@ -1,5 +1,7 @@
#!/usr/bin/perl -w
=encoding utf8
=head1 NAME
xen-list-images - List all the created and configured Xen images.
@@ -8,6 +10,10 @@ xen-list-images - List all the created and configured Xen images.
xen-list-image [options]
Filename Options:
--extension Specify the file extension to use. An empty extension is equal
to any extension.
Help Options:
--help Show this scripts help information.
--manual Read this scripts manual.
@@ -16,6 +22,7 @@ xen-list-images - List all the created and configured Xen images.
Testing options:
--test Specify an alternate Xen configuration directory.
=head1 OPTIONS
=over 8
@@ -48,26 +55,22 @@ Show the version number and exit.
and then either the IP address configured, or "DHCP" to denote
a dynamic host.
=cut
=head1 TODO
It should be possible to determine the disk(s) used by the images,
and then display their sizes.
=cut
=head1 AUTHORS
Steve Kemp, http://www.steve.org.uk/
Stéphane Jourdois
=cut
=head1 LICENSE
Copyright (c) 2005-2009 by Steve Kemp, (c) 2010 by The Xen-Tools
Copyright (c) 2005-2009 by Steve Kemp, (c) 2010-2013 by The Xen-Tools
Development Team. All rights reserved.
This module is free software;
@@ -95,14 +98,15 @@ use Xen::Tools::Common;
my %CONFIG;
#
# Default prefix
# Default values
#
$CONFIG{ 'prefix' } = "/etc/xen";
$CONFIG{ 'extension' } = '.cfg';
#
# Release number.
#
my $RELEASE = '4.4~dev';
my $RELEASE = '4.4rc1';
@@ -162,6 +166,7 @@ sub parseCommandLineArguments
# Parse options.
#
GetOptions( "test=s", \$CONFIG{ 'prefix' },
"extension:s", \$CONFIG{ 'extension' },
"help", \$HELP,
"manual", \$MANUAL,
"version", \$VERSION );
@@ -192,9 +197,12 @@ sub findXenInstances
{
my @found;
foreach my $file ( sort( glob( $CONFIG{ 'prefix' } . "/*.cfg" ) ) )
foreach my $file ( sort( glob( $CONFIG{ 'prefix' } . "/*" . $CONFIG{ 'extension' } ) ) )
{
push @found, $file if ( -e $file );
push @found, $file if (
-f $file and
$file !~ m(~$|\.dpkg-[a-z]+$|\.sxp$|/xl\.conf$)
);
}
return (@found);
@@ -241,7 +249,7 @@ sub displayInstance
{
$name = $1;
}
if ( $line =~ /.*memory[^0-9]*([0-9]+)/i )
if ( $line =~ /^\s*memory[^0-9]*([0-9]+)/i )
{
$mem = $1;
}
@@ -256,9 +264,10 @@ sub displayInstance
}
print "Name: $name\n";
print "Memory: $mem\n";
print "Memory: $mem MB\n";
print "IP: " . $ip . $mac . "\n" if length($ip);
print "DHCP" . $mac . "\n" if $dhcp;
print "Config: $file\n";
}

View File

@@ -1,5 +1,7 @@
#!/usr/bin/perl -w
=encoding utf8
=head1 NAME
xen-resize-guest - Resize a loopback or LVM based xen guest.
@@ -20,8 +22,6 @@ xen-resize-guest - Resize a loopback or LVM based xen guest.
--force Force the resize to happen without a last-chance delay.
--hostname Specify the hostname of the guest to resize.
=cut
=head1 OPTIONS
@@ -53,8 +53,6 @@ Show the version number and exit.
=back
=cut
=head1 DESCRIPTION
@@ -74,15 +72,12 @@ Show the version number and exit.
More than once I've heard of users making mistakes and breaking their
filesystems; hence this tool.
=cut
=head1 AUTHORS
Steve Kemp, http://www.steve.org.uk/
Axel Beckert, http://noone.org/abe/
=cut
=head1 LICENSE
@@ -94,7 +89,6 @@ you can redistribute it and/or modify it under
the same terms as Perl itself.
The LICENSE file contains the full text of the license.
=cut
@@ -117,7 +111,7 @@ my %CONFIG;
#
# Release number.
#
my $RELEASE = '4.4~dev';
my $RELEASE = '4.4rc1';
#

View File

@@ -1,5 +1,7 @@
#!/usr/bin/perl -w
=encoding utf8
=head1 NAME
xen-update-image - Update the software installed upon offline Xen images.
@@ -18,9 +20,6 @@ xen-update-image - Update the software installed upon offline Xen images.
--lvm Specify the LVM volume group which contains the image(s).
--evms Specify the EVMS container which contains the image(s).
=cut
=head1 OPTIONS
@@ -46,8 +45,6 @@ Show the version number and exit.
=back
=cut
=head1 DESCRIPTION
@@ -65,8 +62,6 @@ Show the version number and exit.
corruption otherwise it will allow you to update your image without
booting it.
=cut
=head1 EXAMPLES
@@ -77,8 +72,6 @@ Show the version number and exit.
xen-update-images --dir=/home/xen test.my.flat x11.my.flat
=cut
=head1 AUTHORS
@@ -86,7 +79,6 @@ Show the version number and exit.
Axel Beckert, http://noone.org/abe/
Stéphane Jourdois
=cut
=head1 LICENSE
@@ -121,7 +113,7 @@ my %CONFIG;
#
# Release number.
#
my $RELEASE = '4.4~dev';
my $RELEASE = '4.4rc1';
#

View File

@@ -1,11 +1,11 @@
#!/usr/bin/perl -w
=encoding utf8
=head1 NAME
xt-create-config - Create a Xen configuration file for a new guest
=cut
=head1 SYNOPSIS
xt-create-config [options]
@@ -39,7 +39,6 @@ xt-create-config - Create a Xen configuration file for a new guest
All other options from xen-create-image, such as the new IP address(es)
to give to the new instance, will be passed as environmental variables.
=cut
=head1 ABOUT
@@ -53,8 +52,6 @@ xt-create-config - Create a Xen configuration file for a new guest
By default the script will use /etc/xen-tools/xm.tmpl as its input.
=cut
=head1 INVOCATION
@@ -75,9 +72,6 @@ xt-create-config - Create a Xen configuration file for a new guest
=for example end
=cut
=head1 ARGUMENT PASSING
This script will be invoked with a full copy of the arguments from
@@ -102,7 +96,6 @@ xt-create-config - Create a Xen configuration file for a new guest
for the "Text::Template" perl module. (If you have the perldoc
package installed you can read this with "perldoc Text::Template".)
=cut
=head1 AUTHORS
@@ -110,7 +103,6 @@ xt-create-config - Create a Xen configuration file for a new guest
Axel Beckert, http://noone.org/abe/
Stéphane Jourdois
=cut
=head1 LICENSE
@@ -156,7 +148,7 @@ $CONFIG{ 'extension' } = '.cfg';
#
# Release number.
#
my $RELEASE = '4.4~dev';
my $RELEASE = '4.4rc1';
@@ -215,7 +207,7 @@ sub parseCommandLineArguments
#
GetOptions( "admins=s", \$ENV{ 'admins' },
"output=s", \$CONFIG{ 'output' },
"extension=s", \$CONFIG{ 'extension' },
"extension:s", \$CONFIG{ 'extension' },
"template=s", \$CONFIG{ 'template' },
"verbose", \$CONFIG{ 'verbose' },
"help", \$HELP,
@@ -377,11 +369,23 @@ sub createXenConfig
#
# Remove any trailing Mb.
#
if ( $ENV{ 'memory' } =~ /^(\d+)Mb?.*$/i )
{
$ENV{ 'memory' } = $1;
}
$ENV{ 'memory' } =~ s/^(\d+)Mb?.*$/$1/i;
#
# The maxmem size: Convert Gb -> Mb.
#
if ( exists($ENV{ 'maxmem' }) and defined($ENV{ 'maxmem' })) {
if ($ENV{ 'maxmem' } =~ /^(\d+)Gb?.*$/i )
{
$ENV{ 'maxmem' } = $1 * 1024;
}
#
# Remove any trailing Mb.
#
$ENV{ 'maxmem' } =~ s/^(\d+)Mb?.*$/$1/i;
}
#
# Images as presented to Xen - either loopback images, or LVM partitions.
@@ -398,13 +402,13 @@ sub createXenConfig
$ENV{ 'image_suffix' } = '';
importPartitionsFromEnvironment();
}
elsif ( $ENV{ 'image-dev' } )
elsif ( $ENV{ 'image_dev' } )
{
$ENV{ 'image_vbd' } = "phy:$ENV{'image-dev'}";
$ENV{ 'image_vbd' } = "phy:$ENV{'image_dev'}";
if ( $ENV{ 'swap-dev' } )
if ( $ENV{ 'swap_dev' } )
{
$ENV{ 'swap_vbd' } = "phy:$ENV{'swap-dev'}";
$ENV{ 'swap_vbd' } = "phy:$ENV{'swap_dev'}";
}
else
{

View File

@@ -1,11 +1,11 @@
#!/usr/bin/perl -w
=encoding utf8
=head1 NAME
xt-customize-image - Customize a freshly installed copy of GNU/Linux
=cut
=head1 SYNOPSIS
xt-customize-image [options]
@@ -25,7 +25,6 @@ xt-customize-image - Customize a freshly installed copy of GNU/Linux
All other options from xen-create-image, such as the new IP address(es)
to give to the new instance, will be passed as environmental variables.
=cut
=head1 NOTES
@@ -41,8 +40,6 @@ xt-customize-image - Customize a freshly installed copy of GNU/Linux
--location - The temporary installation root of the new install
--dist - The distribution which has been installed.
=cut
=head1 HOOK SCRIPTS
@@ -54,11 +51,9 @@ xt-customize-image - Customize a freshly installed copy of GNU/Linux
the --location option.
For the distribution named 'foo' the scripts will be loaded and
executed from '/usr/lib/xen-tools/foo.d'. Each executable will
executed from '/usr/share/xen-tools/foo.d'. Each executable will
be loaded and executed in sorted order.
=cut
=head1 AUTHORS
@@ -66,8 +61,6 @@ xt-customize-image - Customize a freshly installed copy of GNU/Linux
Axel Beckert, http://noone.org/abe/
Stéphane Jourdois
=cut
=head1 LICENSE
@@ -98,7 +91,7 @@ my %CONFIG;
#
# Release number.
#
my $RELEASE = '4.4~dev';
my $RELEASE = '4.4rc1';
@@ -215,7 +208,7 @@ sub checkArguments
# If there are no scripts then we clearly cannot
# customise it!
#
my $dir = "/usr/lib/xen-tools/" . $CONFIG{ 'dist' } . ".d";
my $dir = "/usr/share/xen-tools/" . $CONFIG{ 'dist' } . ".d";
if ( !-d $dir )
{
@@ -257,7 +250,7 @@ sub runDistributionHooks
#
# Hook directory.
#
my $hooks = "/usr/lib/xen-tools/" . $CONFIG{ 'dist' } . ".d/";
my $hooks = "/usr/share/xen-tools/" . $CONFIG{ 'dist' } . ".d/";
#
# Installation prefix

View File

@@ -1,12 +1,12 @@
#!/usr/bin/perl -w
=encoding utf8
=head1 NAME
xt-guess-suite-and-mirror - Tries to guess the most suitable suite and
mirror for DomUs on Debian and Ubuntu Dom0s.
=cut
=head1 SYNOPSIS
--suite Show suite
@@ -20,7 +20,6 @@ mirror for DomUs on Debian and Ubuntu Dom0s.
--manual Show the manual for this script.
--version Show the version number and exit.
=cut
=head1 DESCRIPTION
@@ -28,14 +27,12 @@ xt-guess-suite-and-mirror tries to find the mirror and suite the Xen
Dom0 is currently using and returns them in a way suitable for
xen-create-image(1) or the backticks feature in xen-tools.conf.
=cut
=head1 AUTHORS
Axel Beckert, http://noone.org/abe/
Stéphane Jourdois
=cut
=head1 LICENSE
@@ -55,9 +52,9 @@ full text of the license.
# Fallback to Debian or Ubuntu in case we can't find anything
my $fallback = 'Debian';
# Which mirrors to use if everything else fails (cdn.debian.net uses
# GeoIP, see http://wiki.debian.org/DebianGeoMirror)
my %fallback_mirror = ( Debian => 'http://cdn.debian.net/debian/',
# Which mirrors to use if everything else fails (http.debian.net
# redirects to a working mirror nearby)
my %fallback_mirror = ( Debian => 'http://http.debian.net/debian/',
Ubuntu => 'http://archive.ubuntu.com/ubuntu/' );
# Which suite to use if everything else fails. For Debian "stable"
@@ -74,6 +71,7 @@ my @sources_list_files = ( '/etc/apt/sources.list',
use File::Slurp;
use Getopt::Long;
use Pod::Usage;
use File::Which;
use strict;
@@ -81,7 +79,7 @@ use strict;
#
# Release number.
#
my $RELEASE = '4.4~dev';
my $RELEASE = '4.4rc1';
# Init
my $mirror = '';
@@ -153,10 +151,8 @@ all_sources_list_files: foreach my $sources_list_file (@sources_list_files) {
die "Couldn't find a useful entry in the sources.list files of the Dom0. Tried:\n ".
join("\n ", @sources_list_files)."\n" unless $found;
my $lsb_release = `which lsb_release`;
chomp($lsb_release);
if (!$found and $lsb_release and -x $lsb_release) {
my $lsb_release = which('lsb_release');
if (!$found and defined($lsb_release) and -x $lsb_release) {
my $vendor = `$lsb_release -s -i`;
if ($vendor eq 'Debian' or $vendor eq 'Ubuntu') {

View File

@@ -1,11 +1,11 @@
#!/usr/bin/perl -w
=encoding utf8
=head1 NAME
xt-install-image - Install a fresh copy of GNU/Linux into a directory
=cut
=head1 SYNOPSIS
xt-install-image [options]
@@ -39,8 +39,6 @@ xt-install-image - Install a fresh copy of GNU/Linux into a directory
All other options from xen-create-image will be passed as environmental
variables.
=cut
=head1 NOTES
@@ -50,8 +48,6 @@ xt-install-image - Install a fresh copy of GNU/Linux into a directory
configuration, etc.
=cut
=head1 INSTALLATION METHODS
There are several available methods of installation, depending upon the
@@ -78,8 +74,6 @@ Untar a .tar file into the new installation location. This tarfile is assumed t
=back
=cut
=head1 AUTHORS
@@ -88,7 +82,6 @@ Untar a .tar file into the new installation location. This tarfile is assumed t
Dmitry Nedospasov, http://nedos.net/
Stéphane Jourdois
=cut
=head1 LICENSE
@@ -119,7 +112,7 @@ my %CONFIG;
#
# Release number.
#
my $RELEASE = '4.4~dev';
my $RELEASE = '4.4rc1';
#
@@ -133,13 +126,19 @@ my $RELEASE = '4.4~dev';
# needDirectory Defined if we need an install-source directory specified.
#
#
my $debootstrap_cmd;
my %dispatch = (
"copy" => { sub => \&do_copy,
needBinary => "/bin/cp",
needDirectory => 1,
},
"debootstrap" => { sub => \&do_debootstrap,
needBinary => "/usr/sbin/debootstrap",
needBinary => ["/usr/sbin/debootstrap", "/usr/bin/cdebootstrap", "/usr/bin/cdebootstrap-static"],
var => \$debootstrap_cmd,
},
"cdebootstrap" => { sub => \&do_debootstrap,
needBinary => ["/usr/sbin/cdebootstrap", "/usr/bin/cdebootstrap-static"],
var => \$debootstrap_cmd,
},
"rinse" => { sub => \&do_rinse,
needBinary => "/usr/sbin/rinse",
@@ -210,13 +209,35 @@ if ( defined( $CONFIG{ 'install-method' } ) &&
#
# Do we need to test for a binary.
if ( ( $installer->{ 'needBinary' } ) &&
( !-x $installer->{ 'needBinary' } ) )
{
print
"The following required binary for the installation was not found\n";
print "\t" . $installer->{ 'needBinary' } . "\n";
exit 1;
if ( $installer->{ 'needBinary' } ) {
if ( 'ARRAY' eq ref $installer->{ 'needBinary' } ) {
unless (ref $installer->{ 'var' }) {
die "Assertion: If dispatch->->needBinary is an array ref, dispatch->->var must exist";
}
foreach my $binary (@{$installer->{ 'needBinary' }}) {
if (-x $binary) {
${$installer->{ 'var' }} = $binary;
last;
}
}
unless ( ${$installer->{ 'var' }} ) {
print
"One of the following binaries are required for the installation, but none was found\n";
print "\t" . join(', ', @{$installer->{ 'needBinary' }}) . "\n";
exit 1;
}
}
else
{
if ( !-x $installer->{ 'needBinary' } ) {
print
"The following required binary for the installation was not found\n";
print "\t" . $installer->{ 'needBinary' } . "\n";
exit 1;
}
}
}
# Do we need a directory specified as the installation source?
@@ -387,7 +408,7 @@ sub checkArguments
# If there are no scripts then we clearly cannot
# customise it!
#
my $dir = "/usr/lib/xen-tools/" . $CONFIG{ 'dist' } . ".d";
my $dir = "/usr/share/xen-tools/" . $CONFIG{ 'dist' } . ".d";
if ( !-d $dir )
{
@@ -572,21 +593,9 @@ sub do_debootstrap
# The command is a little configurable - mostly to allow you
# to use cdebootstrap.
#
my $cmd = $CONFIG{ 'debootstrap-cmd' };
my $cmd = $CONFIG{ 'debootstrap-cmd' } || $debootstrap_cmd;
print "Using $cmd as debootstrap command\n";
my $cachedir = $CONFIG{ 'cachedir' };
if ( !$cmd )
{
if (-x '/usr/sbin/debootstrap') {
$cmd = '/usr/sbin/debootstrap';
} elsif (-x '/usr/sbin/cdebootstrap') {
$cmd = '/usr/sbin/cdebootstrap';
} else {
print STDERR "Found neither debootstrap nor cdebootstrap and no --debootstrap-cmd given\n";
exit 1;
}
print "Using $cmd as debootstrap command\n";
}
#
# Cache from host -> new installation if we've got caching

15
debian/NEWS vendored
View File

@@ -1,3 +1,18 @@
xen-tools (4.4~beta1-1) unstable; urgency=low
* Exported environment variables no more contain dashes ("-"). Dashes in
environment variable names are from now on converted to underscores
("_") before being exported. May affect some hook or role scripts.
* /usr/lib/xen-tools/ has been moved to /usr/share/xen-tools/ to
properly adhere to FHS. In case you had local scripts added to
/usr/lib/xen-tools/, please move them to /usr/share/xen-tools/, too
and then remove /usr/lib/xen-tools/ and its left-over subdirectories
which all should be empty at that point, i.e. "rmdir -p
/usr/lib/xen-tools/*" should do the trick.
-- Axel Beckert <abe@debian.org> Fri, 23 Aug 2013 19:01:16 +0200
xen-tools (4.2~rc1-1) unstable; urgency=low
By default, xen-create-image now generates a random root password and

113
debian/changelog vendored
View File

@@ -1,25 +1,126 @@
xen-tools (4.4~dev-1) UNRELEASED; urgency=low
xen-tools (4.4~rc1-1) unstable; urgency=low
* New upstream release
* New upstream release candidate
- Also switch from cdn.debian.net to http.debian.net in xen-tools.conf
- Do not run "passwd" via runCommand as that one captures STDOUT for
logging. Makes --passwd usable again. Thanks to Christian Herzog for
the bug report.
- Loop around calling "passwd" to get a second chance to change the
password. (Closes: #703159) Thanks to Joan <aseques@gmail.com> for a
bug fix in this new code.
+ Add dependency on "libterm-ui-perl | perl (<< 5.17.0)"
- Declares one more POD encoding and recode Xen::Tools::Common to
UTF-8. Fixes FTBFS with Perl 5.18. (Finally closes: #720519)
- Apply patch by Philipp Erbelding to fix overzealous line matching in
xen-list-images. (Gitorious merge request #5)
- xen-list-images now displays a unit after the memory size
- Drop support for memory size in kilobytes in xen-create-image,
neither xt-create-xen-config nor xm support it.
- Refactoring: Replace all occurrences of "! -z" by "-n" in hooks and
bash completion.
- Handle potentially empty gateway setting properly in
hooks/common/40-setup-networking-deb. Thanks Simone Caruso!
- Reformat hooks/common/40-setup-networking-deb so that the result
neither has trailing whitespace nor broken indentation.
- Also display MAC address after the DomU has been created.
- Preliminary support for Ubuntu 14.04 Trusty Tahr.
- Added --maxmem flag to set a maximum value for dynamic memory
ballooning. Thanks to Joan <aseques@gmail.com> for the patch!
- Added fix by Patryk Ściborek againsat disableStartStopDaemon()
aborting under some circumstances. (Closes: #725192)
- Abort early and with proper error message if "xen-delete-image
--test" is not used with "--dir". (Closes: #704878)
- xen-delete-image: Exit with return code != 0 in all error cases.
- Refactoring: xt-create-xen-config: Use s/// to strip trailing MB
size suffixes.
* Bump Standards-Version to 3.9.5 (no changes).
-- Axel Beckert <abe@debian.org> Mon, 28 Oct 2013 22:31:03 +0100
xen-tools (4.4~beta1-1) unstable; urgency=low
* New upstream beta release
- Code deduplication to unify the xen-*-image scripts
- Moves /usr/lib/xen-tools/ to /usr/share/xen-tools/
- Use http.debian.net as default Debian mirror if no mirror is given
and xt-guess-suite-and-mirror is not used.
- Fix symbolic link hooks/centos-6/15-setup-arch (Closes: #690299)
- Execute END block not on --version/--help/--manual (Closes: #684346)
- Move code for --boot feature to END block. Fixes missing SSH
fingerprint display if --boot was used. (Closes: #679183)
- Correctly handle aborts in END block. (Closes: #704882)
- Use local parameter instead of global variable in unMountImage.
- Also recognize "M" and "G" instead of "MB" and "GB" as size unit for
--memory. (Closes: #691320) Document the recognized units.
- Default DomUs to use the noop scheduler (Closes: #693131)
- Overwork TLS disabling on Debian and Ubuntu
- xen-list-images now also outputs the file name of the config file.
- xen-list-images and xen-delete-image now understand --extension.
- Fixes "--extension=" with empty parameter.
- Sarge amd64 case handle properly
- Remove CVS revisions from --version output
- Preliminary support for Debian Jessie and Ubuntu Raring
- Support for Debian Jessie, Ubuntu Raring and preliminary support for
Ubuntu Saucy (debootstrap doesn't have support for Saucy at the time
of writing)
- Preliminary support for xl toolstack
- xen-create-image: Consistently use runCommand() instead of system()
- xt-install-image: Don't bail out if only cdebootstrap is installed
but not debootstrap (Thanks Elmar Heeb!)
- Makefile accepts DESTDIR=…
- Move examples from debian/examples to examples.
- Uses File::Which exclusively (no more findBinary, no more `which`),
added (build-) dependency on libfile-which-perl
- Knows about module-init-tools → kmod transition in wheezy/raring.
- Adds default mount options for ext4, identical to ext2/ext3.
- Ships /etc/initramfs-tools/conf.d/xen-tools for generating Dom0
initrds also suitable for DomU usage. Trigger update-initramfs.
- By default install linux-image-virtual instead of linux-image-server
on Ubuntu Intrepid and newer (Hopefully closes: #640099, LP #839492)
- Installs a legacy grub in all pygrub based Debian/Ubuntu DomUs to be
able to update the menu.list automatically.
- hooks/common.sh: installDebianPackage no more installs recommends.
- hooks/common.sh: Rename installCentOS4Package to installRPMPackage.
Add installCentOS4Package wrapper for backward compatibility.
- Fix filesystem tools installation in 91-install-fs-tools (which was
broken since 4.3~rc1-1) by merging 91-install-fs-tools back into
90-make-fstab. (Closes: #715340) Also supports RPM-based
distributions now.
- Fixes export of environment variables. Previously they could contain
dashes and then were only accessible from within Perl, but not from
within Bash.
- Fixes creation of "ARRAY(0x…).log" named log files.
- Makes some options (like --pygrub) negatable.
- Uses Test::NoTabs; add according build-dependency.
- Removes unused Perl modules Xen::Tools and Xen::Tools::Log from
source code. Also removes the according tests from the test suite.
→ Remove no more needed build-dependency on Moose.
- Better documents and checks requirements for the --apt_proxy
value. (See #623443 for the corresponding apt issue.) Add (build-)
dependency on libdata-validate-uri-perl.
- Use Data::Validate::{Domain,IP} for IP addresses and hostname checks.
Add corresponding (build-) dependencies on
libdata-validate-{domain,ip}-perl.
- Fixes broken quoting in list of required binaries
- Declares POD encoding. Fixes FTBFS with Perl 5.18. (Closes: #720519)
* Add debian/gbp.conf to be able to to build xen-tools with
git-buildpackage.
* Install (manually generated) upstream ChangeLog only if it
exists. Allows automatic builds from the git repository.
* Clean up debian/rules:
- Don't mention (generated) upstream changelog explicitly,
dh_installchangelogs finds it by itself if it exist. That way
building out of a freshly clone git repository does not fail due to
a missing upstream changelog.
- Use dh_auto_{install,clean}; use "$(MAKE)" instead of "make" where
dh_auto_* can't help. No more explicitly call "make manpages", it's
a depedency of "make install" in the next line anyway.
- Finally switch to a minimal dh style debian/rules.
* Bump debhelper compatibility to 9
- Update versioned debhelper build-dependency
* Bump Standards-Version to 3.9.4 (no changes)
* Add dependency on ${perl:Depends} to fix dpkg-gencontrol warning.
* Bump copyright years in debian/copyright.
* Apply wrap-and-sort.
-- Axel Beckert <abe@debian.org> Tue, 13 Nov 2012 23:37:54 +0100
-- Axel Beckert <abe@debian.org> Fri, 23 Aug 2013 19:00:03 +0200
xen-tools (4.3.1-1) unstable; urgency=low

2
debian/compat vendored
View File

@@ -1 +1 @@
7
9

45
debian/control vendored
View File

@@ -2,17 +2,46 @@ Source: xen-tools
Section: utils
Priority: extra
Maintainer: Axel Beckert <abe@debian.org>
Build-Depends: debhelper (>= 7.0.0), libtest-pod-perl, libtext-template-perl, libfile-slurp-perl, devscripts, libmoose-perl, libtest-pod-coverage-perl, git
Standards-Version: 3.9.3
Build-Depends: debhelper (>= 9~),
devscripts,
git,
libdata-validate-domain-perl,
libdata-validate-ip-perl,
libdata-validate-uri-perl,
libfile-slurp-perl,
libfile-which-perl,
libtest-notabs-perl,
libtest-pod-coverage-perl,
libtest-pod-perl,
libtext-template-perl
Standards-Version: 3.9.5
Homepage: http://xen-tools.org/software/xen-tools
Vcs-Browser: http://gitorious.org/xen-tools/xen-tools
Vcs-Git: git://gitorious.org/xen-tools/xen-tools.git
Package: xen-tools
Architecture: all
Depends: debootstrap | cdebootstrap, perl-modules, libtext-template-perl, libconfig-inifiles-perl, libfile-slurp-perl, ${misc:Depends}, openssh-client
Recommends: xen-hypervisor-amd64 | xen-hypervisor-i386 | xen-hypervisor-i386-pae, rinse (>= 1.9.1-1), libexpect-perl, xen-utils
Suggests: reiserfsprogs, xfsprogs, cfengine2, btrfs-tools
Depends: debootstrap | cdebootstrap,
libconfig-inifiles-perl,
libdata-validate-domain-perl,
libdata-validate-ip-perl,
libdata-validate-uri-perl,
libfile-slurp-perl,
libfile-which-perl,
libterm-ui-perl | perl (<< 5.17.0),
libtext-template-perl,
openssh-client,
perl-modules,
${misc:Depends},
${perl:Depends}
Recommends: libexpect-perl,
rinse (>= 1.9.1-1),
xen-hypervisor-amd64 | xen-hypervisor-i386 | xen-hypervisor-i386-pae,
xen-utils
Suggests: btrfs-tools,
cfengine2,
reiserfsprogs,
xfsprogs
Description: Tools to manage Xen virtual servers
This package contains tools to manage Debian based Xen virtual servers.
.
@@ -25,7 +54,8 @@ Description: Tools to manage Xen virtual servers
* Debian 4.0 Etch
* Debian 5.0 Lenny
* Debian 6.0 Squeeze
* Debian 7.0 Wheezy
* Debian 7 Wheezy
* Debian 8 Jessie (under development)
* Debian Sid (Unstable)
* Ubuntu 6.06 Dapper Drake (LTS)
* Ubuntu 6.10 Edgy Eft
@@ -40,5 +70,8 @@ Description: Tools to manage Xen virtual servers
* Ubuntu 11.04 Natty Narwhal
* Ubuntu 11.10 Oneiric Ocelot
* Ubuntu 12.04 Precise Pangolin (LTS)
* Ubuntu 12.10 Quantal Quetzal
* Ubuntu 13.04 Raring Ringtail
* Ubuntu 13.10 Saucy Salamander (under development)
* CentOS 5
* CentOS 6

2
debian/copyright vendored
View File

@@ -4,7 +4,7 @@ Tue, 20 Dec 2005 02:21:05 +0200.
It was downloaded from http://xen-tools.org/software/xen-tools/
Copyright 2005-2009: Steve Kemp <steve@steve.org.uk>
Copyright 2010-2012: The Xen-Tools Development Team, currently consisting of:
Copyright 2010-2013: The Xen-Tools Development Team, currently consisting of:
Axel Beckert <abe@deuxchevaux.org>,
Dmitry Nedospasov <dmitry@nedos.net>, and
Stéphane Jourdois <sjourdois@gmail.com>

2
debian/dirs vendored
View File

@@ -1,4 +1,4 @@
/etc/xen-tools
/etc/xen-tools/role.d
/etc/xen-tools/skel
/usr/lib/xen-tools
/usr/share/xen-tools

2
debian/docs vendored
View File

@@ -4,4 +4,4 @@ SUPPORT.markdown
BUGS.markdown
TODO.markdown
KNOWN_BUGS.markdown
NEWS
NEWS.markdown

1
debian/examples vendored Normal file
View File

@@ -0,0 +1 @@
examples/*

54
debian/rules vendored
View File

@@ -2,55 +2,7 @@
# Uncomment this to turn on verbose mode.
#export DH_VERBOSE=1
%:
dh $@
configure: configure-stamp
configure-stamp:
dh_testdir
touch configure-stamp
build: build-arch build-indep
build-arch: build-stamp
build-indep: build-stamp
build-stamp: configure-stamp
dh_testdir
touch build-stamp
clean:
dh_testdir
dh_testroot
make clean
dh_clean
install: build
dh_testdir
dh_testroot
dh_prep
dh_auto_test
make manpages
make install prefix=`pwd`/debian/xen-tools
dh_installdirs
# Build architecture-independent files here.
binary-indep: build install
# We have nothing to do by default.
# Build architecture-dependent files here.
binary-indep: build install
dh_testdir
dh_testroot
dh_install
dh_installexamples debian/examples/setup-kernel-initrd debian/examples/update-modules
[ ! -e ChangeLog ] || dh_installchangelogs ChangeLog
dh_installdocs
dh_compress
dh_fixperms
dh_installdeb
dh_gencontrol
dh_md5sums
dh_builddeb
binary: binary-indep binary-arch
.PHONY: build clean binary-indep binary-arch binary install configure
override_dh_auto_build:

1
debian/triggers vendored Normal file
View File

@@ -0,0 +1 @@
activate update-initramfs

View File

@@ -125,13 +125,15 @@ install-method = debootstrap
# Disk and Sizing options.
##
#
size = 4Gb # Disk image size.
memory = 128Mb # Memory size
swap = 128Mb # Swap size
# noswap = 1 # Don't use swap at all for the new system.
fs = ext3 # use the EXT3 filesystem for the disk image.
dist = `xt-guess-suite-and-mirror --suite` # Default distribution to install.
image = sparse # Specify sparse vs. full disk images.
size = 4G # Root disk, suffix (G, M, k) required
memory = 128M # Suffix (G, M, k) required
#maxmem = 256M # Suffix (G, M, k) optional
swap = 128M # Suffix (G, M, k) required
# noswap = 1 # Don't use swap at all for new systems.
fs = ext3 # Default file system for any disk
dist = `xt-guess-suite-and-mirror --suite`
# Default distribution is determined by Dom0's distribution
image = sparse # Specify sparse vs. full disk images (file based images only)
#
# See the README for currently supported and tested distributions. You can
@@ -235,6 +237,13 @@ image = sparse # Specify sparse vs. full disk images.
kernel = /boot/vmlinuz-`uname -r`
initrd = /boot/initrd.img-`uname -r`
#
# Uncomment the following line if you wish to use pygrub by default
# for all distributions.
#
# pygrub = 1
#
#
# The architecture to use when using debootstrap, rinse, or rpmstrap.
#
@@ -264,15 +273,15 @@ mirror = `xt-guess-suite-and-mirror --mirror`
# mirror_sarge = http://archive.debian.org/debian
# mirror_etch = http://archive.debian.org/debian
# mirror_lenny = http://archive.debian.org/debian
# mirror_squeeze = http://cdn.debian.net/debian
# mirror_wheezy = http://cdn.debian.net/debian
# mirror_jessie = http://cdn.debian.net/debian
# mirror_sid = http://cdn.debian.net/debian
# mirror_squeeze = http://http.debian.net/debian
# mirror_wheezy = http://http.debian.net/debian
# mirror_jessie = http://http.debian.net/debian
# mirror_sid = http://http.debian.net/debian
# mirror_dapper = http://old-releases.ubuntu.com/ubuntu
# mirror_edgy = http://old-releases.ubuntu.com/ubuntu
# mirror_feisty = http://old-releases.ubuntu.com/ubuntu
# mirror_gutsy = http://old-releases.ubuntu.com/ubuntu
# mirror_hardy = http://archive.ubuntu.com/ubuntu
# mirror_hardy = http://old-releases.ubuntu.com/ubuntu
# mirror_intrepid = http://old-releases.ubuntu.com/ubuntu
# mirror_jaunty = http://old-releases.ubuntu.com/ubuntu
# mirror_karmic = http://old-releases.ubuntu.com/ubuntu
@@ -283,6 +292,8 @@ mirror = `xt-guess-suite-and-mirror --mirror`
# mirror_precise = http://archive.ubuntu.com/ubuntu
# mirror_quantal = http://archive.ubuntu.com/ubuntu
# mirror_raring = http://archive.ubuntu.com/ubuntu
# mirror_saucy = http://archive.ubuntu.com/ubuntu
# mirror_trusty = http://archive.ubuntu.com/ubuntu
# If this is defined it will be used by debootstrap, and configured as the
# proxy for the guest
@@ -292,6 +303,7 @@ mirror = `xt-guess-suite-and-mirror --mirror`
#
# Filesystem options for the different filesystems we support.
#
ext4_options = noatime,nodiratime,errors=remount-ro
ext3_options = noatime,nodiratime,errors=remount-ro
ext2_options = noatime,nodiratime,errors=remount-ro
xfs_options = defaults

View File

@@ -17,6 +17,11 @@
}
}
memory = '{$memory}'
{ if ( $maxmem )
{
$OUT .= "maxmem = '$maxmem'\n";
}
}
# Name

View File

@@ -37,6 +37,11 @@
}
vcpus = '{$vcpus}'
memory = '{$memory}'
{ if ( $maxmem )
{
$OUT .= "maxmem = '$maxmem'\n";
}
}
#
# Disk device(s).

View File

@@ -19,7 +19,7 @@ hooks/
* The installation will have a running installation of OpenSSH
The subdirectories in this hooks/ directory will be installed
to the directory /usr/lib/xen-tools/
to the directory /usr/share/xen-tools/
Steve
--

View File

@@ -8,8 +8,8 @@ prefix=$1
#
# Source our common functions
#
if [ -e /usr/lib/xen-tools/common.sh ]; then
. /usr/lib/xen-tools/common.sh
if [ -e /usr/share/xen-tools/common.sh ]; then
. /usr/share/xen-tools/common.sh
else
. ./hooks/common.sh
fi
@@ -41,7 +41,7 @@ EOF
for i in `seq 1 $NUMPARTITIONS`; do
echo -n "/dev/xvde$i " >> ${prefix}/etc/fstab
eval part=\$PARTITION$i
if [ ! -z "`echo $part | grep swap`" ]; then
if [ -n "`echo $part | grep swap`" ]; then
echo "none swap ws 0 0" >> ${prefix}/etc/fstab
else
echo $part | awk -F: '{print $4,$3,$5,0,1}' >> ${prefix}/etc/fstab

View File

@@ -8,8 +8,8 @@ prefix=$1
#
# Source our common functions
#
if [ -e /usr/lib/xen-tools/common.sh ]; then
. /usr/lib/xen-tools/common.sh
if [ -e /usr/share/xen-tools/common.sh ]; then
. /usr/share/xen-tools/common.sh
else
. ./hooks/common.sh
fi
@@ -41,7 +41,7 @@ EOF
for i in `seq 1 $NUMPARTITIONS`; do
echo -n "/dev/sda$i " >> ${prefix}/etc/fstab
eval part=\$PARTITION$i
if [ ! -z "`echo $part | grep swap`" ]; then
if [ -n "`echo $part | grep swap`" ]; then
echo "none swap ws 0 0" >> ${prefix}/etc/fstab
else
echo $part | awk -F: '{print $4,$3,$5,0,1}' >> ${prefix}/etc/fstab

View File

@@ -24,7 +24,7 @@ logMessage ()
{
message="$*"
if [ ! -z "${verbose}" ]; then
if [ -n "${verbose}" ]; then
echo $message
fi
}
@@ -60,7 +60,7 @@ assert ()
# We take special care so that daemons shouldn't start after installation
# which they might otherwise do.
#
# NOTE: Function not renamed with trailing "s" for compatability reasons.
# NOTE: Function not renamed with trailing "s" for compatibility reasons.
#
installDebianPackage ()
{
@@ -98,7 +98,7 @@ installDebianPackage ()
#
# Install the packages
#
DEBIAN_FRONTEND=noninteractive chroot ${prefix} /usr/bin/apt-get --yes --force-yes install "$@"
DEBIAN_FRONTEND=noninteractive chroot ${prefix} /usr/bin/apt-get --yes --force-yes --no-install-recommends install "$@"
#
# Remove the policy-rc.d script.
@@ -113,6 +113,143 @@ installDebianPackage ()
}
#
# Generate a Debian-/Ubuntu-compliant menu.lst for legacy GRUB
#
generateDebianGrubMenuLst ()
{
prefix="$1"
DOMU_ISSUE="$2"
DOMU_KERNEL="$3"
DOMU_RAMDISK="$4"
#
# Log our options
#
logMessage "Generating a legacy GRUB menu.lst into prefix ${prefix}"
#
# We require at least 3 parameters
#
assert "$LINENO" "${prefix}"
assert "$LINENO" "${DOMU_ISSUE}"
assert "$LINENO" "${DOMU_KERNEL}"
#
# Prefix must be a directory, kernel a file
#
assert "$LINENO" -d ${prefix}
assert "$LINENO" -f "${prefix}/boot/${DOMU_KERNEL}"
#
# Generate a menu.lst for pygrub
#
mkdir -p ${prefix}/boot/grub
cat << E_O_MENU > ${prefix}/boot/grub/menu.lst
default 0
timeout 2
### BEGIN AUTOMAGIC KERNELS LIST
## lines between the AUTOMAGIC KERNELS LIST markers will be modified
## by the debian update-grub script except for the default options below
## DO NOT UNCOMMENT THEM, Just edit them to your needs
## ## Start Default Options ##
## default kernel options
## default kernel options for automagic boot options
## If you want special options for specific kernels use kopt_x_y_z
## where x.y.z is kernel version. Minor versions can be omitted.
## e.g. kopt=root=/dev/hda1 ro
## kopt_2_6_8=root=/dev/hdc1 ro
## kopt_2_6_8_2_686=root=/dev/hdc2 ro
# kopt=root=/dev/xvda2 ro elevator=noop
## default grub root device
## e.g. groot=(hd0,0)
# groot=(hd0,0)
## should update-grub create alternative automagic boot options
## e.g. alternative=true
## alternative=false
# alternative=true
## should update-grub lock alternative automagic boot options
## e.g. lockalternative=true
## lockalternative=false
# lockalternative=false
## additional options to use with the default boot option, but not with the
## alternatives
## e.g. defoptions=vga=791 resume=/dev/hda5
# defoptions=
## should update-grub lock old automagic boot options
## e.g. lockold=false
## lockold=true
# lockold=false
## altoption boot targets option
## multiple altoptions lines are allowed
## e.g. altoptions=(extra menu suffix) extra boot options
## altoptions=(single-user) single
# altoptions=(single-user mode) single
## controls how many kernels should be put into the menu.lst
## only counts the first occurence of a kernel, not the
## alternative kernel options
## e.g. howmany=all
## howmany=7
# howmany=all
## should update-grub create memtest86 boot option
## e.g. memtest86=true
## memtest86=false
# memtest86=false
## should update-grub adjust the value of the default booted system
## can be true or false
# updatedefaultentry=false
## should update-grub add savedefault to the default options
## can be true or false
# savedefault=false
## ## End Default Options ##
### END DEBIAN AUTOMAGIC KERNELS LIST
# Entries statically generated bu xen-tools upon installation. Maybe
# removed manually if the entries above (generated by update-grub)
# seem to work fine.
title $DOMU_ISSUE
root (hd0,0)
kernel /boot/$DOMU_KERNEL root=/dev/xvda2 ro elevator=noop
initrd /boot/$DOMU_RAMDISK
title $DOMU_ISSUE (Single-User)
root (hd0,0)
kernel /boot/$DOMU_KERNEL root=/dev/xvda2 ro single elevator=noop
initrd /boot/$DOMU_RAMDISK
title $DOMU_ISSUE (Default Kernel)
root (hd0,0)
kernel /vmlinuz root=/dev/xvda2 ro elevator=noop
initrd /initrd.img
title $DOMU_ISSUE (Default Kernel, Single-User)
root (hd0,0)
kernel /vmlinuz root=/dev/xvda2 ro single elevator=noop
initrd /initrd.img
E_O_MENU
}
#
# Disable the start-stop-daemon
@@ -124,12 +261,14 @@ disableStartStopDaemon ()
for starter in start-stop-daemon initctl; do
local daemonfile="${prefix}/sbin/${starter}"
mv "${daemonfile}" "${daemonfile}.REAL"
echo '#!/bin/sh' > "${daemonfile}"
echo "echo \"Warning: Fake ${starter} called, doing nothing\"" >> "${daemonfile}"
if [ -e "${daemonfile}" ]; then
mv "${daemonfile}" "${daemonfile}.REAL"
echo '#!/bin/sh' > "${daemonfile}"
echo "echo \"Warning: Fake ${starter} called, doing nothing\"" >> "${daemonfile}"
chmod 755 "${daemonfile}"
logMessage "${starter} disabled / made a stub."
chmod 755 "${daemonfile}"
logMessage "${starter} disabled / made a stub."
fi
done
}
@@ -191,9 +330,9 @@ removeDebianPackage ()
#
# Install a CentOS4 package via yum
# Install a RPM package via yum
#
installCentOS4Package ()
installRPMPackage ()
{
prefix=$1
package=$2
@@ -201,7 +340,7 @@ installCentOS4Package ()
#
# Log our options
#
logMessage "Installing CentOS4 ${package} to prefix ${prefix}"
logMessage "Installing RPM ${package} to prefix ${prefix}"
#
# We require a package + prefix
@@ -220,6 +359,15 @@ installCentOS4Package ()
chroot ${prefix} /usr/bin/yum -y install ${package}
}
# Backwards Compatibility Function
installCentOS4Package () ( installRPMPackage "$@" )
#
# Functions to test if we're on a redhatesk or debianesk system
#
isDeb() ( [ -x $1/usr/bin/apt-get -a -x $1/usr/bin/dpkg ] )
isYum() ( [ -x $1/usr/bin/yum ] )
#
@@ -230,11 +378,11 @@ installPackage ()
prefix=$1
package=$2
if [ -x ${prefix}/usr/bin/apt-get ] ; then
if isDeb ; then
installDebianPackage "$@"
elif [ -x ${prefix}/usr/bin/yum ] ; then
installCentOS4Package "$@"
elif isYum ; then
installRPMPackage "$@"
else
logMessage "Unable to install package ${package}; no package manager found"
@@ -261,4 +409,3 @@ installGentooPackage ()
logMessage "NOTE: Not doing anything - this is a stub - FIXME"
}

View File

@@ -14,8 +14,8 @@ prefix=$1
#
# Source our common functions
#
if [ -e /usr/lib/xen-tools/common.sh ]; then
. /usr/lib/xen-tools/common.sh
if [ -e /usr/share/xen-tools/common.sh ]; then
. /usr/share/xen-tools/common.sh
else
. ./hooks/common.sh
fi

View File

@@ -13,8 +13,8 @@ prefix=$1
#
# Source our common functions
#
if [ -e /usr/lib/xen-tools/common.sh ]; then
. /usr/lib/xen-tools/common.sh
if [ -e /usr/share/xen-tools/common.sh ]; then
. /usr/share/xen-tools/common.sh
else
. ./hooks/common.sh
fi

View File

@@ -14,8 +14,8 @@ prefix=$1
#
# Source our common functions
#
if [ -e /usr/lib/xen-tools/common.sh ]; then
. /usr/lib/xen-tools/common.sh
if [ -e /usr/share/xen-tools/common.sh ]; then
. /usr/share/xen-tools/common.sh
else
. ./hooks/common.sh
fi

View File

@@ -13,8 +13,8 @@ prefix=$1
#
# Source our common functions
#
if [ -e /usr/lib/xen-tools/common.sh ]; then
. /usr/lib/xen-tools/common.sh
if [ -e /usr/share/xen-tools/common.sh ]; then
. /usr/share/xen-tools/common.sh
else
. ./hooks/common.sh
fi

View File

@@ -6,8 +6,8 @@ prefix=$1
#
# Source our common functions
#
if [ -e /usr/lib/xen-tools/common.sh ]; then
. /usr/lib/xen-tools/common.sh
if [ -e /usr/share/xen-tools/common.sh ]; then
. /usr/share/xen-tools/common.sh
else
. ./hooks/common.sh
fi

View File

@@ -14,8 +14,8 @@ prefix=$1
#
# Source our common functions
#
if [ -e /usr/lib/xen-tools/common.sh ]; then
. /usr/lib/xen-tools/common.sh
if [ -e /usr/share/xen-tools/common.sh ]; then
. /usr/share/xen-tools/common.sh
else
. ./hooks/common.sh
fi
@@ -70,18 +70,14 @@ chroot ${prefix} /usr/bin/apt-get update
#
# Now fixup TLS on non-64bit systems after dapper.
# Now fixup TLS on non-64bit systems after dapper. For dapper this is
# already fixed in 10-disable-tls.
#
if [ "$dist" != 'dapper' ]; then
if [ "`uname -m`" = "x86_64" ]; then
if [ "$arch" = 'i386' -a "$dist" != 'dapper' ]; then
logMessage "Ignoring TLS since we're a 64 bit host."
logMessage "Installing libc6-xen"
installDebianPackage ${prefix} libc6-xen
else
logMessage "Installing libc6-xen"
installDebianPackage ${prefix} libc6-xen
fi
fi

View File

@@ -13,8 +13,8 @@ prefix=$1
#
# Source our common functions
#
if [ -e /usr/lib/xen-tools/common.sh ]; then
. /usr/lib/xen-tools/common.sh
if [ -e /usr/share/xen-tools/common.sh ]; then
. /usr/share/xen-tools/common.sh
else
. ./hooks/common.sh
fi

View File

@@ -13,8 +13,8 @@ prefix=$1
#
# Source our common functions
#
if [ -e /usr/lib/xen-tools/common.sh ]; then
. /usr/lib/xen-tools/common.sh
if [ -e /usr/share/xen-tools/common.sh ]; then
. /usr/share/xen-tools/common.sh
else
. ./hooks/common.sh
fi

View File

@@ -12,8 +12,8 @@ prefix=$1
#
# Source our common functions
#
if [ -e /usr/lib/xen-tools/common.sh ]; then
. /usr/lib/xen-tools/common.sh
if [ -e /usr/share/xen-tools/common.sh ]; then
. /usr/share/xen-tools/common.sh
else
. ./hooks/common.sh
fi
@@ -49,7 +49,7 @@ rm -f ${prefix}/etc/event.d/tty[!1]
#
# Are we using an alternative serial device?
#
if [ ! -z "${serial_device}" ]; then
if [ -n "${serial_device}" ]; then
serial_device=`basename ${serial_device}`

View File

@@ -13,8 +13,8 @@ prefix=$1
#
# Source our common functions
#
if [ -e /usr/lib/xen-tools/common.sh ]; then
. /usr/lib/xen-tools/common.sh
if [ -e /usr/share/xen-tools/common.sh ]; then
. /usr/share/xen-tools/common.sh
else
. ./hooks/common.sh
fi
@@ -71,8 +71,8 @@ setupStaticNetworking ()
# if $p2p is set then add a "pointopoint" setting.
#
point='';
if [ ! -z "${p2p}" ]; then
point="pointopoint ${p2p}"
if [ -n "${p2p}" ]; then
point=" pointopoint ${p2p}"
else
point=''
fi
@@ -81,10 +81,18 @@ setupStaticNetworking ()
# broadcast address?
#
bcast='';
if [ ! -z "${broadcast}" ]; then
if [ -n "${broadcast}" ]; then
bcast=" broadcast ${broadcast}"
fi
#
# gateway address?
#
gateway='';
if [ -n "${gateway}" ]; then
gateway=" gateway ${gateway}"
fi
#
# We have a static IP address
#
@@ -100,10 +108,10 @@ iface lo inet loopback
auto eth0
iface eth0 inet static
address ${ip1}
gateway ${gateway}
${gateway}
netmask ${netmask}
${bcast}
${point}
${bcast}
${point}
# post-up ethtool -K eth0 tx off
#

View File

@@ -13,8 +13,8 @@ prefix=$1
#
# Source our common functions
#
if [ -e /usr/lib/xen-tools/common.sh ]; then
. /usr/lib/xen-tools/common.sh
if [ -e /usr/share/xen-tools/common.sh ]; then
. /usr/share/xen-tools/common.sh
else
. ./hooks/common.sh
fi

View File

@@ -15,8 +15,8 @@ prefix=$1
#
# Source our common functions
#
if [ -e /usr/lib/xen-tools/common.sh ]; then
. /usr/lib/xen-tools/common.sh
if [ -e /usr/share/xen-tools/common.sh ]; then
. /usr/share/xen-tools/common.sh
else
. ./hooks/common.sh
fi

View File

@@ -15,8 +15,8 @@ prefix=$1
#
# Source our common functions
#
if [ -e /usr/lib/xen-tools/common.sh ]; then
. /usr/lib/xen-tools/common.sh
if [ -e /usr/share/xen-tools/common.sh ]; then
. /usr/share/xen-tools/common.sh
else
. ./hooks/common.sh
fi

View File

@@ -14,8 +14,8 @@ prefix=$1
#
# Source our common functions
#
if [ -e /usr/lib/xen-tools/common.sh ]; then
. /usr/lib/xen-tools/common.sh
if [ -e /usr/share/xen-tools/common.sh ]; then
. /usr/share/xen-tools/common.sh
else
. ./hooks/common.sh
fi

View File

@@ -11,8 +11,8 @@ prefix=$1
#
# Source our common functions
#
if [ -e /usr/lib/xen-tools/common.sh ]; then
. /usr/lib/xen-tools/common.sh
if [ -e /usr/share/xen-tools/common.sh ]; then
. /usr/share/xen-tools/common.sh
else
. ./hooks/common.sh
fi

View File

@@ -11,8 +11,8 @@ prefix=$1
#
# Source our common functions
#
if [ -e /usr/lib/xen-tools/common.sh ]; then
. /usr/lib/xen-tools/common.sh
if [ -e /usr/share/xen-tools/common.sh ]; then
. /usr/share/xen-tools/common.sh
else
. ./hooks/common.sh
fi

View File

@@ -15,8 +15,8 @@ prefix=$1
#
# Source our common functions
#
if [ -e /usr/lib/xen-tools/common.sh ]; then
. /usr/lib/xen-tools/common.sh
if [ -e /usr/share/xen-tools/common.sh ]; then
. /usr/share/xen-tools/common.sh
else
. ./hooks/common.sh
fi
@@ -38,9 +38,9 @@ mkdir -p ${prefix}/etc/ssh
#
if [ ! -f ${prefix}/etc/ssh/ssh_host_rsa_key ]; then
if ssh-keygen -t rsa -N "" -f ${prefix}/etc/ssh/ssh_host_rsa_key -C "root@${hostname}"; then
logMessage "successfully generetaged Host RSA"
logMessage "successfully generated RSA host key"
else
logMessage "failed to generate Host RSA Key"
logMessage "failed to generate RSA host key"
fi
fi
@@ -49,9 +49,9 @@ fi
#
if [ ! -f ${prefix}/etc/ssh/ssh_host_dsa_key ]; then
if ssh-keygen -t dsa -N "" -f ${prefix}/etc/ssh/ssh_host_dsa_key -C "root@${hostname}"; then
logMessage "successfully generetaged Host DSA"
logMessage "successfully generated DSA host key"
else
logMessage "failed to generate Host DSA Key"
logMessage "failed to generate DSA host key"
fi
fi

View File

@@ -13,8 +13,8 @@ prefix=$1
#
# Source our common functions
#
if [ -e /usr/lib/xen-tools/common.sh ]; then
. /usr/lib/xen-tools/common.sh
if [ -e /usr/share/xen-tools/common.sh ]; then
. /usr/share/xen-tools/common.sh
else
. ./hooks/common.sh
fi

View File

@@ -14,8 +14,8 @@ prefix=$1
#
# Source our common functions
#
if [ -e /usr/lib/xen-tools/common.sh ]; then
. /usr/lib/xen-tools/common.sh
if [ -e /usr/share/xen-tools/common.sh ]; then
. /usr/share/xen-tools/common.sh
else
. ./hooks/common.sh
fi

View File

@@ -19,8 +19,8 @@ prefix=$1
#
# Source our common functions
#
if [ -e /usr/lib/xen-tools/common.sh ]; then
. /usr/lib/xen-tools/common.sh
if [ -e /usr/share/xen-tools/common.sh ]; then
. /usr/share/xen-tools/common.sh
else
. ./hooks/common.sh
fi
@@ -73,11 +73,6 @@ else
cp -au /lib/modules/$(uname -r) ${prefix}/lib/modules
fi
#
# Install the module-init-tools package.
#
installDebianPackage ${prefix} module-init-tools
fi # if pygrub
#

View File

@@ -19,8 +19,8 @@ prefix=$1
#
# Source our common functions
#
if [ -e /usr/lib/xen-tools/common.sh ]; then
. /usr/lib/xen-tools/common.sh
if [ -e /usr/share/xen-tools/common.sh ]; then
. /usr/share/xen-tools/common.sh
else
. ./hooks/common.sh
fi

View File

@@ -0,0 +1,44 @@
#!/bin/sh
#
# Ensure that either modules-init-tools or kmod is setup.
#
# This is required in most setups. But even if it isn't required it
# can't really do anything bad; just waste a bit of space.
#
prefix=$1
#
# Source our common functions
#
if [ -e /usr/share/xen-tools/common.sh ]; then
. /usr/share/xen-tools/common.sh
else
. ./hooks/common.sh
fi
#
# Log our start
#
logMessage Script $0 starting
#
# Install either kmod or module-init-tools package.
#
if chroot ${prefix} /usr/bin/apt-cache show module-init-tools >/dev/null 2>/dev/null; then
if chroot ${prefix} /usr/bin/apt-cache show module-init-tools | fgrep -qi transitional; then
installDebianPackage ${prefix} kmod
else
installDebianPackage ${prefix} module-init-tools
fi
else
installDebianPackage ${prefix} kmod
fi
#
# Log our finish
#
logMessage Script $0 finished

View File

@@ -0,0 +1,52 @@
#!/bin/sh
#
# Ensure that either modules-init-tools or kmod is setup.
#
# This is most likely required if you're using a custom kernel
# for your Xen system. But even if it isn't required it can't
# really do anything bad; just waste a bit of space.
prefix=$1
#
# Source our common functions
#
if [ -e /usr/share/xen-tools/common.sh ]; then
. /usr/share/xen-tools/common.sh
else
. ./hooks/common.sh
fi
#
# Log our start
#
logMessage Script $0 starting
if [ ${pygrub} ]; then
#
# Install the grub 0.9x package ("grub-legacy" on Debian, "grub" on Ubuntu)
#
if chroot ${prefix} /usr/bin/apt-cache show grub-legacy 2>/dev/null | egrep -qi 'GRand Unified Bootloader.*Legacy'; then
installDebianPackage ${prefix} grub-legacy
else
installDebianPackage ${prefix} grub
fi
if [ ! -e ${prefix}/boot/grub/default ]; then
echo default > ${prefix}/boot/grub/default
fi
chroot ${prefix} /usr/sbin/update-grub
else
logMessage "pygrub not set, skipping grub-legacy installation"
fi # if pygrub
#
# Log our finish
#
logMessage Script $0 finished

View File

@@ -17,8 +17,8 @@ prefix=$1
#
# Source our common functions
#
if [ -e /usr/lib/xen-tools/common.sh ]; then
. /usr/lib/xen-tools/common.sh
if [ -e /usr/share/xen-tools/common.sh ]; then
. /usr/share/xen-tools/common.sh
else
. ./hooks/common.sh
fi
@@ -48,7 +48,7 @@ if [ "${ide}" ]; then
elif [ "${scsi}" ]; then
device=sda
else
if [ ! -z "${disk_device}" ]; then
if [ -n "${disk_device}" ]; then
device=`basename $disk_device`
fi
fi
@@ -100,6 +100,34 @@ for part in `seq 1 ${NUMPARTITIONS}`; do
done
logMessage Checking for filesystem tools to install
#
# Install any required packages for the given root filesystem
#
if [ "$has_xfs" -eq 1 ]; then
installPackage ${prefix} xfsprogs
fi
if [ "$has_reiserfs" -eq 1 ]; then
if isAPT; then
installDebianPackage reiserfsprogs
elif isYum; then
installRPMPackage reiserfs-utils
else
logMessage "Unable to install reiserfs tools; no package manager recognized"
fi
fi
if [ "$has_btrfs" -eq 1 ]; then
if isAPT; then
installDebianPackage btrfs-tools
elif isYum; then
installRPMPackage btrfs-progs
else
logMessage "Unable to install btrfs tools; no package manager recognized"
fi
fi
#
# Log our finish
#

View File

@@ -1,45 +0,0 @@
#!/bin/sh
#
# Some root filesystems will require the installation of new packages
#
# Steve
# --
# http://www.steve.org.uk/
prefix=$1
#
# Source our common functions
#
if [ -e /usr/lib/xen-tools/common.sh ]; then
. /usr/lib/xen-tools/common.sh
else
. ./hooks/common.sh
fi
#
# Log our start
#
logMessage Script $0 starting
#
# Install any required packages for the given root filesystem
#
if [ $has_xfs -eq 1 ]; then
installDebianPackage ${prefix} xfsprogs
fi
if [ $has_reiserfs -eq 1 ]; then
installDebianPackage ${prefix} reiserfsprogs
fi
if [ $has_btrfs -eq 1 ]; then
installDebianPackage ${prefix} btrfs-tools
fi
#
# Log our finish
#
logMessage Script $0 finished

View File

@@ -13,8 +13,8 @@ prefix=$1
#
# Source our common functions
#
if [ -e /usr/lib/xen-tools/common.sh ]; then
. /usr/lib/xen-tools/common.sh
if [ -e /usr/share/xen-tools/common.sh ]; then
. /usr/share/xen-tools/common.sh
else
. ./hooks/common.sh
fi

View File

@@ -12,8 +12,8 @@ prefix=$1
#
# Source our common functions
#
if [ -e /usr/lib/xen-tools/common.sh ]; then
. /usr/lib/xen-tools/common.sh
if [ -e /usr/share/xen-tools/common.sh ]; then
. /usr/share/xen-tools/common.sh
else
. ./hooks/common.sh
fi

View File

@@ -14,8 +14,8 @@ prefix=$1
#
# Source our common functions
#
if [ -e /usr/lib/xen-tools/common.sh ]; then
. /usr/lib/xen-tools/common.sh
if [ -e /usr/share/xen-tools/common.sh ]; then
. /usr/share/xen-tools/common.sh
else
. ./hooks/common.sh
fi

View File

@@ -0,0 +1 @@
../common/81-install-modules-init-tools

View File

@@ -1 +0,0 @@
../common/91-install-fs-tools

View File

@@ -14,8 +14,8 @@ prefix=$1
#
# Source our common functions
#
if [ -e /usr/lib/xen-tools/common.sh ]; then
. /usr/lib/xen-tools/common.sh
if [ -e /usr/share/xen-tools/common.sh ]; then
. /usr/share/xen-tools/common.sh
else
. ./hooks/common.sh
fi
@@ -90,30 +90,20 @@ fi
#
chroot ${prefix} /usr/bin/apt-get update
#
# For sid or etch systems we install libc6-xen
# For all systems after Sarge we install libc6-xen on i386
#
# For sarge we don't have that option, so we disable TLS.
# For Sarge we don't have that option, so we disable TLS the hard way.
#
if [ "`uname -m`" = "x86_64" ]; then
logMessage "Ignoring TLS since we're a 64 bit host."
else
case "${dist}" in
*)
logMessage "Installing xen-aware libc6"
installDebianPackage ${prefix} libc6-xen
;;
sarge)
logMessage "Disabling TLS"
mv ${prefix}/lib/tls ${prefix}/lib/tls.disabled
mkdir ${prefix}/lib/tls
;;
esac
if [ "${arch}" = "i386" ]; then
if [ "${dist}" = 'sarge' ]; then
logMessage "Disabling TLS"
mv ${prefix}/lib/tls ${prefix}/lib/tls.disabled
mkdir ${prefix}/lib/tls
else
logMessage "Installing xen-aware libc6"
installDebianPackage ${prefix} libc6-xen
fi
fi

View File

@@ -15,8 +15,8 @@ prefix=$1
# Source our common functions
#
if [ -e /usr/lib/xen-tools/common.sh ]; then
. /usr/lib/xen-tools/common.sh
if [ -e /usr/share/xen-tools/common.sh ]; then
. /usr/share/xen-tools/common.sh
else
. ./hooks/common.sh
fi
@@ -103,28 +103,8 @@ fi
# Generate a menu.lst for pygrub
#
mkdir -p ${prefix}/boot/grub
cat << E_O_MENU > ${prefix}/boot/grub/menu.lst
default 0
timeout 2
generateDebianGrubMenuLst "${prefix}" "$DOMU_ISSUE" "$DOMU_KERNEL" "$DOMU_RAMDISK"
title $DOMU_ISSUE
root (hd0,0)
kernel /boot/$DOMU_KERNEL root=/dev/xvda2 ro elevator=noop
initrd /boot/$DOMU_RAMDISK
title $DOMU_ISSUE (Single-User)
root (hd0,0)
kernel /boot/$DOMU_KERNEL root=/dev/xvda2 ro single elevator=noop
initrd /boot/$DOMU_RAMDISK
E_O_MENU
#
# Install the module-init-tools package.
#
installDebianPackage ${prefix} module-init-tools
else
logMessage pygrub not set, skipping kernel install

View File

@@ -0,0 +1 @@
../common/81-install-modules-init-tools

View File

@@ -0,0 +1 @@
../common/82-install-grub-legacy

View File

@@ -1 +0,0 @@
../common/91-install-fs-tools

View File

@@ -12,8 +12,8 @@ prefix=$1
#
# Source our common functions
#
if [ -e /usr/lib/xen-tools/common.sh ]; then
. /usr/lib/xen-tools/common.sh
if [ -e /usr/share/xen-tools/common.sh ]; then
. /usr/share/xen-tools/common.sh
else
. ./hooks/common.sh
fi

View File

@@ -15,8 +15,8 @@ prefix=$1
# Source our common functions
#
if [ -e /usr/lib/xen-tools/common.sh ]; then
. /usr/lib/xen-tools/common.sh
if [ -e /usr/share/xen-tools/common.sh ]; then
. /usr/share/xen-tools/common.sh
else
. ./hooks/common.sh
fi
@@ -27,7 +27,7 @@ fi
logMessage Script $0 starting
if [ ${pygrub} ]; then
if [ "${pygrub}" ]; then
#
# Attempt to install a xen kernel, if that fails, then install a normal one
@@ -78,32 +78,12 @@ fi
# Generate a menu.lst for pygrub
#
mkdir -p ${prefix}/boot/grub
cat << E_O_MENU > ${prefix}/boot/grub/menu.lst
default 0
timeout 2
generateDebianGrubMenuLst "${prefix}" "$DOMU_ISSUE" "$DOMU_KERNEL" "$DOMU_RAMDISK"
title $DOMU_ISSUE
root (hd0,0)
kernel /boot/$DOMU_KERNEL root=/dev/xvda2 ro elevator=noop
initrd /boot/$DOMU_RAMDISK
title $DOMU_ISSUE (Single-User)
root (hd0,0)
kernel /boot/$DOMU_KERNEL root=/dev/xvda2 ro single elevator=noop
initrd /boot/$DOMU_RAMDISK
E_O_MENU
#
# Install the module-init-tools package.
#
installDebianPackage ${prefix} module-init-tools
else
logMessage pygrub not set, skipping kernel install
fi
fi # if pygrub
#
# Log our finish

View File

@@ -0,0 +1 @@
../common/81-install-modules-init-tools

View File

@@ -0,0 +1 @@
../common/82-install-grub-legacy

View File

@@ -1 +0,0 @@
../common/91-install-fs-tools

View File

@@ -12,8 +12,8 @@ prefix=$1
#
# Source our common functions
#
if [ -e /usr/lib/xen-tools/common.sh ]; then
. /usr/lib/xen-tools/common.sh
if [ -e /usr/share/xen-tools/common.sh ]; then
. /usr/share/xen-tools/common.sh
else
. ./hooks/common.sh
fi

View File

@@ -12,8 +12,8 @@ prefix=$1
#
# Source our common functions
#
if [ -e /usr/lib/xen-tools/common.sh ]; then
. /usr/lib/xen-tools/common.sh
if [ -e /usr/share/xen-tools/common.sh ]; then
. /usr/share/xen-tools/common.sh
else
. ./hooks/common.sh
fi
@@ -61,7 +61,7 @@ setupStaticNetworking ()
# if $p2p is set then add a "pointopoint" setting.
#
point='';
if [ ! -z "${p2p}" ]; then
if [ -n "${p2p}" ]; then
point="pointopoint ${p2p}"
else
point=''

View File

@@ -15,8 +15,8 @@ prefix=$1
#
# Source our common functions
#
if [ -e /usr/lib/xen-tools/common.sh ]; then
. /usr/lib/xen-tools/common.sh
if [ -e /usr/share/xen-tools/common.sh ]; then
. /usr/share/xen-tools/common.sh
else
. ./hooks/common.sh
fi

View File

@@ -16,8 +16,8 @@ prefix=$1
#
# Source our common functions
#
if [ -e /usr/lib/xen-tools/common.sh ]; then
. /usr/lib/xen-tools/common.sh
if [ -e /usr/share/xen-tools/common.sh ]; then
. /usr/share/xen-tools/common.sh
else
. ./hooks/common.sh
fi

View File

@@ -15,8 +15,8 @@ prefix=$1
# Source our common functions
#
if [ -e /usr/lib/xen-tools/common.sh ]; then
. /usr/lib/xen-tools/common.sh
if [ -e /usr/share/xen-tools/common.sh ]; then
. /usr/share/xen-tools/common.sh
else
. ./hooks/common.sh
fi
@@ -27,13 +27,13 @@ fi
logMessage Script $0 starting
if [ ${pygrub} ]; then
if [ "${pygrub}" ]; then
#
# Attempt to install a xen kernel, if that fails, then install a normal one
#
KERNEL_PKG="linux-image-server"
KERNEL_PKG="linux-image-virtual"
logMessage Attempting to install the $KERNEL_PKG kernel image
logMessage WARNING: This kernel may not have pvops
@@ -68,32 +68,11 @@ fi
# Generate a menu.lst for pygrub
#
mkdir -p ${prefix}/boot/grub
cat << E_O_MENU > ${prefix}/boot/grub/menu.lst
default 0
timeout 2
title $DOMU_ISSUE
root (hd0,0)
kernel /boot/$DOMU_KERNEL root=/dev/xvda2 ro elevator=noop
initrd /boot/$DOMU_RAMDISK
title $DOMU_ISSUE (Single-User)
root (hd0,0)
kernel /boot/$DOMU_KERNEL root=/dev/xvda2 ro single elevator=noop
initrd /boot/$DOMU_RAMDISK
E_O_MENU
#
# Install the module-init-tools package.
#
installDebianPackage ${prefix} module-init-tools
generateDebianGrubMenuLst "${prefix}" "$DOMU_ISSUE" "$DOMU_KERNEL" "$DOMU_RAMDISK"
else
logMessage pygrub not set, skipping kernel install
fi
fi # if pygrub
#
# Log our finish

View File

@@ -0,0 +1 @@
../common/81-install-modules-init-tools

View File

@@ -0,0 +1 @@
../common/82-install-grub-legacy

View File

@@ -1 +0,0 @@
../common/91-install-fs-tools

View File

@@ -15,25 +15,25 @@ prefix=$1
# Source our common functions
#
if [ -e /usr/lib/xen-tools/common.sh ]; then
. /usr/lib/xen-tools/common.sh
if [ -e /usr/share/xen-tools/common.sh ]; then
. /usr/share/xen-tools/common.sh
else
. ./hooks/common.sh
fi
if [ "${pygrub}" ]; then
#
# Log our start
#
logMessage Script $0 starting
if [ "${pygrub}" ]; then
#
# The type of kernel that we will be installing
#
# linux_kernel_type="desktop"
#
linux_kernel_type="server"
linux_kernel_type="virtual"
linux_kernel_package="linux-image-${linux_kernel_type}"
@@ -54,33 +54,17 @@ DOMU_KERNEL=$(basename $(ls -1 ${prefix}/boot/vmlinuz* | tail -n 1))
DOMU_RAMDISK=$(basename $(ls -1 ${prefix}/boot/initrd*|tail -n 1))
DOMU_ISSUE=$(head -n 1 ${prefix}/etc/issue | awk -F '\' '{ print $1 }' | sed 's/[ \t]*$//')
mkdir -p ${prefix}/boot/grub
cat << E_O_MENU > ${prefix}/boot/grub/menu.lst
default 0
timeout 2
#
# Generate a menu.lst for pygrub
#
title $DOMU_ISSUE
root (hd0,0)
kernel /boot/$DOMU_KERNEL root=/dev/xvda2 ro elevator=noop
initrd /boot/$DOMU_RAMDISK
generateDebianGrubMenuLst "${prefix}" "$DOMU_ISSUE" "$DOMU_KERNEL" "$DOMU_RAMDISK"
title $DOMU_ISSUE (Single-User)
root (hd0,0)
kernel /boot/$DOMU_KERNEL root=/dev/xvda2 ro single elevator=noop
initrd /boot/$DOMU_RAMDISK
E_O_MENU
else
logMessage "Package '${linux_kernel_package}' is not available"
fi
#
# Install the module-init-tools package.
#
installDebianPackage ${prefix} module-init-tools
else
logMessage pygrub not set, skipping kernel install
fi # if pygrub

View File

@@ -0,0 +1 @@
../common/81-install-modules-init-tools

View File

@@ -0,0 +1 @@
../common/82-install-grub-legacy

View File

@@ -1 +0,0 @@
../common/91-install-fs-tools

View File

@@ -1,332 +0,0 @@
package Xen::Tools;
use warnings;
use strict;
use Moose;
use Xen::Tools::Log;
=head1 NAME
Xen::Tools - Build Xen domains with Perl
=head1 VERSION
Version 0.01
=cut
our $VERSION = '0.01';
=head1 SYNOPSIS
my $xt = Xen::Tools->new();
=head1 FUNCTIONS
=head2 new
Instantiate the object.
=cut
override 'new' => sub {
my $class = shift;
# Initialize the base class
my $self = $class->super(@_);
$self->{_xtl} = Xen::Tools::Log->new( hostname => $self->hostname,
logpath => $self->logpath,
);
$self->_checkSystem();
return $self;
};
=head2 meta
This is a method which provides access to the current class's meta-
class. Inherited from Moose.
=cut
=head2 log
This method sends a log message to the current object's logging
mechanism
=cut
sub log {
my $self = shift;
$self->{_xtl}->print(@_);
}
=head2 hostname
Attribute which indicates the domain's hostname
=cut
has 'hostname' => ( is => 'ro', isa => 'Str', required => 1 );
=head2 logpath
Attribute which indicates the log directory. Defaults to /var/log/xen-tools
=cut
has 'logpath' => ( is => 'ro',
isa => 'Str',
default => '/var/log/xen-tools'
);
=begin doc
_findBinary
Find the location of the specified binary on the curent user's PATH.
Return undef if the named binary isn't found.
=end doc
=cut
sub _findBinary {
my $self = shift;
my( $bin ) = (@_);
# strip any path which might be present.
$bin = $2 if ( $bin =~ /(.*)[\/\\](.*)/ );
foreach my $entry ( split( /:/, $ENV{'PATH'} ) )
{
# guess of location.
my $guess = $entry . "/" . $bin;
# return it if it exists and is executable
return $guess if ( -e $guess && -x $guess );
}
return;
}
=begin doc
_checkSystem
Test that this system is fully setup for the new xen-create-image
script.
This means that the the companion scripts xt-* are present on the
host and executable.
=end doc
=cut
sub _checkSystem {
my $self = shift;
my @required = qw ( / xt-customize-image
xt-install-image
xt-create-xen-config / );
foreach my $bin ( @required )
{
if ( ! defined( $self->_findBinary( $bin ) ) )
{
$self->log("The script '$bin' was not found.\n",
"Aborting\n\n"
);
exit;
}
}
#
# Make sure that we have Text::Template installed - this
# will be used by `xt-create-xen-config` and if that fails then
# running is pointless.
#
my $test = "use Text::Template";
eval( $test );
if ( ( $@ ) && ( ! $self->{_force} ) )
{
print <<E_O_ERROR;
Aborting: The Text::Template perl module isn't installed or available.
Specify '--force' to skip this check and continue regardless.
E_O_ERROR
exit;
}
#
# Make sure that xen-shell is installed if we've got an --admin
# flag specified
#
if ( $self->{_admins} )
{
my $shell = undef;
$shell = "/usr/bin/xen-login-shell" if ( -x "/usr/bin/xen-login-shell" );
$shell = "/usr/local/bin/xen-login-shell" if ( -x "/usr/bin/local/xen-login-shell" );
if ( !defined( $shell ) )
{
print <<EOF;
You've specified administrator accounts for use with the xen-shell,
however the xen-shell doesn't appear to be installed.
Aborting.
EOF
exit;
}
}
#
# Test the system has a valid (network-script) + (vif-script) setup.
#
return $self->_testXenConfig();
}
=begin doc
Test that the current Xen host has a valid network configuration,
this is designed to help newcomers to Xen.
=end doc
=cut
sub _testXenConfig {
my $self = shift;
# wierdness.
return if ( ! -d "/etc/xen" );
#
# Temporary hash.
#
my %cfg;
#
# Read the configuration file.
#
open( my $config_fh, q{<}, '/etc/xen/xend-config.sxp' )
or die "Failed to read /etc/xen/xend-config.sxp: $!";
while( <$config_fh> )
{
next if ( ! $_ || !length( $_ ) );
# vif
if ( $_ =~ /^\(vif-script ([^)]+)/ )
{
$cfg{'vif-script'} = $1;
}
# network
if ( $_ =~ /^\(network-script ([^)]+)/ )
{
$cfg{'network-script'} = $1;
}
}
close( $config_fh );
if ( !defined( $cfg{'network-script'} ) ||
!defined( $cfg{'vif-script'} ) )
{
print <<EOF;
WARNING
-------
You appear to have a missing vif-script, or network-script, in the
Xen configuration file /etc/xen/xend-config.sxp.
Please fix this and restart Xend, or your guests will not be able
to use any networking!
EOF
}
else
{
if ( ( $cfg{'network-script'} =~ /dummy/i ) ||
( $cfg{'vif-script'} =~ /dummy/i ) )
{
print <<EOF;
WARNING
-------
You appear to have a "dummy" vif-script, or network-script, setting
in the Xen configuration file /etc/xen/xend-config.sxp.
Please fix this and restart Xend, or your guests will not be able to
use any networking!
EOF
}
}
return 1;
}
=head1 AUTHOR
C.J. Adams-Collier, C<< <cjac at colliertech.org> >>
=head1 BUGS
Please report any bugs or feature requests to C<bug-xen-tools at rt.cpan.org>, or through
the web interface at L<http://rt.cpan.org/NoAuth/ReportBug.html?Queue=Xen-Tools>. I will be notified, and then you'll
automatically be notified of progress on your bug as I make changes.
=head1 SUPPORT
You can find documentation for this module with the perldoc command.
perldoc Xen::Tools
You can also look for information at:
=over 4
=item * RT: CPAN's request tracker
L<http://rt.cpan.org/NoAuth/Bugs.html?Dist=Xen-Tools>
=item * AnnoCPAN: Annotated CPAN documentation
L<http://annocpan.org/dist/Xen-Tools>
=item * CPAN Ratings
L<http://cpanratings.perl.org/d/Xen-Tools>
=item * Search CPAN
L<http://search.cpan.org/dist/Xen-Tools>
=back
=head1 COPYRIGHT & LICENSE
Copyright 2007 C.J. Adams-Collier, all rights reserved.
This program is free software; you can redistribute it and/or modify it
under the same terms as Perl itself.
=cut
1; # End of Xen::Tools

View File

@@ -2,10 +2,13 @@
package Xen::Tools::Common;
=encoding utf8
=head1 NAME
Xen::Tools::Common - Common funtions used in xen-tools' Perl scripts
=head1 SYNOPSIS
use Xen::Tools::Common;
@@ -19,9 +22,10 @@ use Exporter 'import';
use vars qw(@EXPORT_OK @EXPORT);
use English;
use File::Which;
@EXPORT = qw(readConfigurationFile xenRunning runCommand setupAdminUsers
findXenToolstack findBinary
findXenToolstack
logprint_with_config logonly_with_config fail_with_config);
=head1 FUNCTIONS
@@ -138,38 +142,6 @@ sub xenRunning ($$)
return ($running);
}
=head2 findBinary
=begin doc
Find the location of the specified binary on the curent user's PATH.
Return undef if the named binary isn't found.
=end doc
=cut
sub findBinary
{
my ($bin) = (@_);
# strip any path which might be present.
$bin = $2 if ( $bin =~ /(.*)[\/\\](.*)/ );
foreach my $entry ( split( /:/, $ENV{ 'PATH' } ) )
{
# guess of location.
my $guess = $entry . "/" . $bin;
# return it if it exists and is executable
return $guess if ( -e $guess && -x $guess );
}
return undef;
}
=head2 findXenToolstack
=begin doc
@@ -191,12 +163,12 @@ sub findXenToolstack
return $toolstack if $toolstack;
}
my $xm = findBinary('xm');
my $xm = which('xm');
if ($xm and system("$xm list >/dev/null 2>/dev/null") == 0) {
return $xm;
}
my $xl = findBinary('xl');
my $xl = which('xl');
if ($xl and system("$xl list >/dev/null 2>/dev/null") == 0) {
return $xl;
}
@@ -218,9 +190,9 @@ sub findXenToolstack
=cut
sub runCommand ($$)
sub runCommand ($$;$)
{
my ($cmd, $CONFIG) = (@_);
my ($cmd, $CONFIG, $fail_ok) = (@_);
#
# Set a local if we don't have one.
@@ -245,10 +217,12 @@ sub runCommand ($$)
my $rcopen = open(CMD, '-|', $cmd);
if (!defined($rcopen)) {
logprint_with_config("Starting command '$cmd' failed: $!\n", $CONFIG);
logprint_with_config("Aborting\n", $CONFIG);
print "See /var/log/xen-tools/".$CONFIG->{'hostname'}.".log for details\n";
$CONFIG->{'FAIL'} = 1;
exit 127;
unless ($fail_ok) {
logprint_with_config("Aborting\n", $CONFIG);
print "See /var/log/xen-tools/".$CONFIG->{'hostname'}.".log for details\n";
$CONFIG->{'FAIL'} = 1;
exit 127;
}
}
while (my $line = <CMD>) {
@@ -270,8 +244,10 @@ sub runCommand ($$)
logprint_with_config("Running command '$cmd' failed with exit code $?.\n", $CONFIG);
logprint_with_config("Aborting\n", $CONFIG);
print "See /var/log/xen-tools/".$CONFIG->{'hostname'}.".log for details\n";
$CONFIG->{'FAIL'} = 1;
exit 127;
unless ($fail_ok) {
$CONFIG->{'FAIL'} = 1;
exit 127;
}
}
}
@@ -428,7 +404,7 @@ sub logprint_with_config ($$)
Steve Kemp, http://www.steve.org.uk/
Axel Beckert, http://noone.org/abe/
Dmitry Nedospasov, http://nedos.net/
Stéphane Jourdois
Stéphane Jourdois
Merged from several scripts by Axel Beckert.

View File

@@ -1,212 +0,0 @@
package Xen::Tools::Log;
use warnings;
use strict;
use Moose;
use File::Spec;
use POSIX; # strftime
use Carp;
=head1 NAME
Xen::Tools::Log - Log Xen::Tools events
=head1 VERSION
Version 0.01
=cut
our $VERSION = '0.01';
=head1 SYNOPSIS
Mostly internal to Xen::Tools. Use this to create a logging mechanism.
my $xtl = Xen::Tools::Log->new( hostname => 'firewall' );
$xtl->print("Yay for logging.");
=head1 FUNCTIONS
=head2 new
Create the log object
=cut
=head2 print
Print the given string both to our screen, and to the logfile.
=cut
sub print {
my $self = shift;
$self->print_screen( @_ );
$self->print_log( @_ );
}
=head2 print_screen
Print the given string to our screen
=cut
sub print_screen {
my $self = shift;
print map { "$_\n" } @_;
}
=head2 print_log
Print the given string to the logfile.
=cut
sub print_log {
my $self = shift;
# Create an RFC 822 conformant date string
my $date = strftime( "%a, %d %b %Y %H:%M:%S %z", localtime );
my $fh = $self->log_fh();
print $fh ( map { "$date - $_" } @_ );
}
=head2 hostname
Attribute storing the hostname this log describes
=cut
has 'hostname' => ( is => 'rw', isa => 'Str', required => 1 );
=head2 logpath
Attribute storing the directory in which the log file resides
=cut
has 'logpath' => ( is => 'rw',
isa => 'Str',
default => '/var/log/xen-tools'
);
=head2 log_fh
FileHandle attribute storing the filehandle of the log
=cut
has 'log_fh' => ( is => 'ro',
isa => 'FileHandle',
lazy => 1,
default => \&_init_fh,
);
=head2 clean_up
Boolean attribute indicating whether the log will be cleaned up when the
logger is closed
=cut
has 'clean_up' => ( is => 'ro',
isa => 'Bool',
default => 0,
);
before 'DESTROY' => sub {
my $self = shift;
# Deconstructor
};
=head2 meta
This is a method which provides access to the current class's meta-
class. Inherited from Moose.
=cut
=begin doc
_init_fh
This private method initializes the logging filehandle, creating the
containing directory if it does not exist.
=end doc
=cut
sub _init_fh {
my $self = shift;
my $logFile =
File::Spec->catfile( $self->logpath(), $self->hostname() . '.log' );
system( qw(mkdir -p), $self->logpath() ) unless -d $self->logpath();
carp "Couldn't create log directory: $!" unless $? == 0;
open( $self->{log_fh}, q{>>}, $logFile ) or
carp "Couldn't open log file for append: $!";
};
=head1 AUTHOR
C.J. Adams-Collier, C<< <cjac at colliertech.org> >>
=head1 BUGS
Please report any bugs or feature requests to C<bug-xen-tools-log at rt.cpan.org>, or through
the web interface at L<http://rt.cpan.org/NoAuth/ReportBug.html?Queue=Xen-Tools>. I will be notified, and then you'll
automatically be notified of progress on your bug as I make changes.
=head1 SUPPORT
You can find documentation for this module with the perldoc command.
perldoc Xen::Tools
You can also look for information at:
=over 4
=item * RT: CPAN's request tracker
L<http://rt.cpan.org/NoAuth/Bugs.html?Dist=Xen-Tools>
=item * AnnoCPAN: Annotated CPAN documentation
L<http://annocpan.org/dist/Xen-Tools>
=item * CPAN Ratings
L<http://cpanratings.perl.org/d/Xen-Tools>
=item * Search CPAN
L<http://search.cpan.org/dist/Xen-Tools>
=back
=head1 COPYRIGHT & LICENSE
Copyright 2007 C.J. Adams-Collier, all rights reserved.
This program is free software; you can redistribute it and/or modify it
under the same terms as Perl itself.
=cut
1; # End of Xen::Tools::Log

View File

@@ -31,7 +31,7 @@ function _find_xen_images
for i in /etc/xen/*.cfg ; do
name=`grep ^name $i 2>/dev/null | awk -F\' '{print $2}'`
if [ ! -z "${name}" ] ; then
if [ -n "${name}" ] ; then
names="${names} ${name}"
fi
done
@@ -65,8 +65,8 @@ _xen_create_image()
# Available distributions, by which we mean distributions which
# we have hook scripts available.
#
for i in `/bin/ls -1 /usr/lib/xen-tools/ ` ; do
if [ -d /usr/lib/xen-tools/${i} ]; then
for i in `/bin/ls -1 /usr/share/xen-tools/ ` ; do
if [ -d /usr/share/xen-tools/${i} ]; then
dists="${dists} ${i/.d/}"
fi
done

View File

@@ -0,0 +1,7 @@
# This initramfs-tools configuration file is installed by xen-tools.
#
# To make the Dom0's initramfs working inside DomUs, too, most modules
# need to be included, not just those necvessary for the host system
# and its hardware.
MODULES=most

View File

@@ -40,7 +40,7 @@ rm -rf $RPM_BUILD_ROOT
/etc/bash_completion.d/*
/usr/bin/*
/usr/share/man/man8/*
/usr/lib/xen-tools
/usr/share/xen-tools
%changelog

View File

@@ -15,8 +15,8 @@ prefix=$1
#
# Source our common functions - this will let us install a Debian package.
#
if [ -e /usr/lib/xen-tools/common.sh ]; then
. /usr/lib/xen-tools/common.sh
if [ -e /usr/share/xen-tools/common.sh ]; then
. /usr/share/xen-tools/common.sh
else
echo "Installation problem"
fi

View File

@@ -11,8 +11,8 @@ prefix=$1
#
# Source our common functions - this will let us install a Debian package.
#
if [ -e /usr/lib/xen-tools/common.sh ]; then
. /usr/lib/xen-tools/common.sh
if [ -e /usr/share/xen-tools/common.sh ]; then
. /usr/share/xen-tools/common.sh
else
echo "Installation problem"
fi

View File

@@ -30,8 +30,8 @@ source=/etc/xen-tools/sed.d/
#
# Source our common functions - this will let us install a Debian package.
#
if [ -e /usr/lib/xen-tools/common.sh ]; then
. /usr/lib/xen-tools/common.sh
if [ -e /usr/share/xen-tools/common.sh ]; then
. /usr/share/xen-tools/common.sh
else
echo "Installation problem"
fi

View File

@@ -15,8 +15,8 @@ prefix=$1
#
# Source our common functions - this will let us install a Debian package.
#
if [ -e /usr/lib/xen-tools/common.sh ]; then
. /usr/lib/xen-tools/common.sh
if [ -e /usr/share/xen-tools/common.sh ]; then
. /usr/share/xen-tools/common.sh
else
echo "Installation problem"
fi

View File

@@ -16,8 +16,8 @@ prefix=$1
#
# Source our common functions - this will let us install a Debian package.
#
if [ -e /usr/lib/xen-tools/common.sh ]; then
. /usr/lib/xen-tools/common.sh
if [ -e /usr/share/xen-tools/common.sh ]; then
. /usr/share/xen-tools/common.sh
else
echo "Installation problem"
fi

View File

@@ -11,8 +11,8 @@ prefix=$1
#
# Source our common functions - this will let us install a Debian package.
#
if [ -e /usr/lib/xen-tools/common.sh ]; then
. /usr/lib/xen-tools/common.sh
if [ -e /usr/share/xen-tools/common.sh ]; then
. /usr/share/xen-tools/common.sh
else
echo "Installation problem"
fi

Some files were not shown because too many files have changed in this diff Show More