Architecture: all
Depends: perl, libexpect-perl, ${misc:Depends}
Recommends: perl-doc, rsync, qemu-system, openssh-client,
- isolinux, syslinux-utils, genisoimage, amtterm, libwww-perl, procps,
+ isolinux, syslinux-common, genisoimage, amtterm, libwww-perl, procps,
sudo, file
Suggests: scons, make, isc-dhcp-server, tftpd-hpa, iproute | iproute2
Description: Tool for booting operating systems on remote hardware
if (defined $iso_image) {
system_verbose("mkdir -p isolinux");
# FIXME: Does somebody need support for older syslinux (without ldlinux etc.)?
- system_verbose('cp /usr/lib/ISOLINUX/isolinux.bin /usr/lib/syslinux/modules/bios/mboot.c32 /usr/lib/syslinux/modules/bios/menu.c32 /usr/lib/syslinux/modules/bios/ldlinux.c32 isolinux');
+ system_verbose('cp /usr/lib/ISOLINUX/isolinux.bin /usr/lib/syslinux/modules/bios/mboot.c32 /usr/lib/syslinux/modules/bios/libcom32.c32 /usr/lib/syslinux/modules/bios/menu.c32 /usr/lib/syslinux/modules/bios/ldlinux.c32 isolinux');
open(my $fh, ">isolinux/isolinux.cfg");
if ($#scripts) {
print $fh "TIMEOUT 50\n";
print $fh "$menu_iso";
close($fh);
- my $files = join(" ", map("$_=$_", (keys(%files_iso), 'isolinux/isolinux.bin', 'isolinux/isolinux.cfg', 'isolinux/mboot.c32', 'isolinux/ldlinux.c32', 'isolinux/menu.c32')));
+ my $files = join(" ", map("$_=$_", (keys(%files_iso), 'isolinux/isolinux.bin', 'isolinux/isolinux.cfg', 'isolinux/libcom32.c32', 'isolinux/mboot.c32', 'isolinux/ldlinux.c32', 'isolinux/menu.c32')));
$iso_image ||= "$config_name.iso";
# Note: We use -U flag below to "Allow 'untranslated' filenames,
WVPASS ./script --gen-only --pulsar
WVPASS grep "exec HYP" config-novaboot
-exit 0
-
# Broken
WVSTART ISO image generation
create_dummy
-WVPASS ./script --iso
+WVPASS ./script --iso --target ''
# Hi-lock: (("^.*\\(?:WVSTART\\).*$" (0 (quote hi-black-b) t)))