Re: [Libguestfs] [PATCH] sysprep: handle distro specific sysv scripts
On Thu, Dec 12, Pino Toscano wrote: What do you think? I think that your Should-Start handling is broken. Required means the given file can not properly work without the listed servers, insserv will error out. Should means it can very well work without them if they are not present or enabled. Otherwise the given file has to be scheduled after the listed services. Olaf ___ Libguestfs mailing list Libguestfs@redhat.com https://www.redhat.com/mailman/listinfo/libguestfs
Re: [Libguestfs] [PATCH] sysprep: handle distro specific sysv scripts
On Thursday 12 December 2013 16:27:30 Olaf Hering wrote: On Thu, Dec 12, Pino Toscano wrote: Sure, but as a Should-Start means it is a weak dependency, and can be skipped, which is what I don't want. Are you saying in Debian the Should-Start is not handled properly? Even if Should-Start is weak it still has to be taken into account. No, I'm saying a weak dependency is no guarantee the provided firstboot commands can run successfully, and running them after $all should provide a better safety. -- Pino Toscano ___ Libguestfs mailing list Libguestfs@redhat.com https://www.redhat.com/mailman/listinfo/libguestfs
[Libguestfs] [PATCH] sysprep: handle distro specific sysv scripts
Currently firstboot would only work on redhat-based images. Handle redhat-based, suse-based and debian guests, error out in case of an unknown distro. Update firstboot.sh: - make sure scripts exists and can be executed - add LSB header to avoid insserv warnings later on - run script only if called with start Update functions, pass only required options. Signed-off-by: Olaf Hering o...@aepfle.de diff --git a/sysprep/firstboot.ml b/sysprep/firstboot.ml index 97cd8a9..719ab38 100644 --- a/sysprep/firstboot.ml +++ b/sysprep/firstboot.ml @@ -28,14 +28,35 @@ let firstboot_dir = /usr/lib/virt-sysprep let firstboot_sh = sprintf \ #!/bin/sh - +### BEGIN INIT INFO +# Provides: virt-sysprep +# Required-Start:$null +# Should-Start: $all +# Required-Stop: $null +# Should-Stop: $all +# Default-Start: 2 3 5 +# Default-Stop: 0 1 6 +# Short-Description: Start scripts to run once at next boot +# Description: Start scripts to run once at next boot +# These scripts run the first time the guest boots, +# and then are deleted. Output or errors from the scripts +# are written to ~root/virt-sysprep-firstboot.log. +### END INIT INFO + d=%s/scripts logfile=~root/virt-sysprep-firstboot.log -for f in $d/* ; do - echo '=== Running' $f '===' $logfile - $f $logfile 21 - rm $f -done +if test \$1\ = \start\ +then + for f in $d/* ; do +if test -x \$f\ +then + echo '=== Running' $f '===' $logfile + $f $logfile 21 + rm -f $f +fi + done +fi firstboot_dir let firstboot_service = sprintf \ @@ -56,7 +77,7 @@ WantedBy=default.target let failed fs = ksprintf (fun msg - failwith (s_firstboot: failed: ^ msg)) fs -let rec install_service g root = +let rec install_service g distro = g#mkdir_p firstboot_dir; g#mkdir_p (sprintf %s/scripts firstboot_dir); g#write (sprintf %s/firstboot.sh firstboot_dir) firstboot_sh; @@ -64,18 +85,18 @@ let rec install_service g root = (* systemd, else assume sysvinit *) if g#is_dir /etc/systemd then -install_systemd_service g root +install_systemd_service g else -install_sysvinit_service g root +install_sysvinit_service g distro (* Install the systemd firstboot service, if not installed already. *) -and install_systemd_service g root = +and install_systemd_service g = g#write (sprintf %s/firstboot.service firstboot_dir) firstboot_service; g#mkdir_p /etc/systemd/system/default.target.wants; g#ln_sf (sprintf %s/firstboot.service firstboot_dir) /etc/systemd/system/default.target.wants -and install_sysvinit_service g root = +and install_sysvinit_redhat g = g#mkdir_p /etc/rc.d/rc2.d; g#mkdir_p /etc/rc.d/rc3.d; g#mkdir_p /etc/rc.d/rc5.d; @@ -86,12 +107,51 @@ and install_sysvinit_service g root = g#ln_sf (sprintf %s/firstboot.sh firstboot_dir) /etc/rc.d/rc5.d/99virt-sysprep-firstboot +(* Make firstboot.sh look like a runlevel script to avoid insserv warnings. *) +and install_sysvinit_suse g = + g#mkdir_p /etc/init.d/rc2.d; + g#mkdir_p /etc/init.d/rc3.d; + g#mkdir_p /etc/init.d/rc5.d; + g#ln_sf (sprintf %s/firstboot.sh firstboot_dir) +/etc/init.d/virt-sysprep-firstboot; + g#ln_sf ../virt-sysprep-firstboot +/etc/init.d/rc2.d/S99virt-sysprep-firstboot; + g#ln_sf ../virt-sysprep-firstboot +/etc/init.d/rc3.d/S99virt-sysprep-firstboot; + g#ln_sf ../virt-sysprep-firstboot +/etc/init.d/rc5.d/S99virt-sysprep-firstboot + +and install_sysvinit_debian g = + g#mkdir_p /etc/init.d; + g#mkdir_p /etc/rc.d/rc2.d; + g#mkdir_p /etc/rc.d/rc3.d; + g#mkdir_p /etc/rc.d/rc5.d; + g#ln_sf (sprintf %s/firstboot.sh firstboot_dir) +/etc/init.d/virt-sysprep-firstboot; + g#ln_sf /etc/init.d/virt-sysprep-firstboot +/etc/rc2.d/S99virt-sysprep-firstboot; + g#ln_sf /etc/init.d/virt-sysprep-firstboot +/etc/rc3.d/S99virt-sysprep-firstboot; + g#ln_sf /etc/init.d/virt-sysprep-firstboot +/etc/rc5.d/S99virt-sysprep-firstboot + +and install_sysvinit_service g distro = + match distro with + | (fedora|rhel|centos|scientificlinux|redhat-based) - +install_sysvinit_redhat g + | (opensuse|sles|suse-based) - +install_sysvinit_suse g + | debian - +install_sysvinit_debian g + | _ - +failed guest type %s is not supported distro + let add_firstboot_script g root id content = let typ = g#inspect_get_type root in let distro = g#inspect_get_distro root in match typ, distro with | linux, _ - -install_service g root; +install_service g distro; let t = Int64.of_float (Unix.time ()) in let r = string_random8 () in let filename = sprintf %s/scripts/%Ld-%s-%s firstboot_dir t r id in -- 1.7.12 ___ Libguestfs mailing list Libguestfs@redhat.com https://www.redhat.com/mailman/listinfo/libguestfs
Re: [Libguestfs] [PATCH] sysprep: handle distro specific sysv scripts
On Fri, Sep 21, Olaf Hering wrote: +and install_sysvinit_debian g = + g#mkdir_p /etc/init.d; + g#mkdir_p /etc/rc.d/rc2.d; + g#mkdir_p /etc/rc.d/rc3.d; + g#mkdir_p /etc/rc.d/rc5.d; This is a typo, rc.d has to be removed, will resend. I have no Debian based image, so I can not test this code path. Olaf ___ Libguestfs mailing list Libguestfs@redhat.com https://www.redhat.com/mailman/listinfo/libguestfs
[Libguestfs] [PATCH] sysprep: handle distro specific sysv scripts
Currently firstboot would only work on redhat-based images. Handle redhat-based, suse-based and debian guests, error out in case of an unknown distro. Update firstboot.sh: - make sure scripts exists and can be executed - add LSB header to avoid insserv warnings later on - run script only if called with start Update functions, pass only required options. Signed-off-by: Olaf Hering o...@aepfle.de diff --git a/sysprep/firstboot.ml b/sysprep/firstboot.ml index 97cd8a9..c5296a1 100644 --- a/sysprep/firstboot.ml +++ b/sysprep/firstboot.ml @@ -28,14 +28,35 @@ let firstboot_dir = /usr/lib/virt-sysprep let firstboot_sh = sprintf \ #!/bin/sh - +### BEGIN INIT INFO +# Provides: virt-sysprep +# Required-Start:$null +# Should-Start: $all +# Required-Stop: $null +# Should-Stop: $all +# Default-Start: 2 3 5 +# Default-Stop: 0 1 6 +# Short-Description: Start scripts to run once at next boot +# Description: Start scripts to run once at next boot +# These scripts run the first time the guest boots, +# and then are deleted. Output or errors from the scripts +# are written to ~root/virt-sysprep-firstboot.log. +### END INIT INFO + d=%s/scripts logfile=~root/virt-sysprep-firstboot.log -for f in $d/* ; do - echo '=== Running' $f '===' $logfile - $f $logfile 21 - rm $f -done +if test \$1\ = \start\ +then + for f in $d/* ; do +if test -x \$f\ +then + echo '=== Running' $f '===' $logfile + $f $logfile 21 + rm -f $f +fi + done +fi firstboot_dir let firstboot_service = sprintf \ @@ -56,7 +77,7 @@ WantedBy=default.target let failed fs = ksprintf (fun msg - failwith (s_firstboot: failed: ^ msg)) fs -let rec install_service g root = +let rec install_service g distro = g#mkdir_p firstboot_dir; g#mkdir_p (sprintf %s/scripts firstboot_dir); g#write (sprintf %s/firstboot.sh firstboot_dir) firstboot_sh; @@ -64,18 +85,18 @@ let rec install_service g root = (* systemd, else assume sysvinit *) if g#is_dir /etc/systemd then -install_systemd_service g root +install_systemd_service g else -install_sysvinit_service g root +install_sysvinit_service g distro (* Install the systemd firstboot service, if not installed already. *) -and install_systemd_service g root = +and install_systemd_service g = g#write (sprintf %s/firstboot.service firstboot_dir) firstboot_service; g#mkdir_p /etc/systemd/system/default.target.wants; g#ln_sf (sprintf %s/firstboot.service firstboot_dir) /etc/systemd/system/default.target.wants -and install_sysvinit_service g root = +and install_sysvinit_redhat g = g#mkdir_p /etc/rc.d/rc2.d; g#mkdir_p /etc/rc.d/rc3.d; g#mkdir_p /etc/rc.d/rc5.d; @@ -86,12 +107,51 @@ and install_sysvinit_service g root = g#ln_sf (sprintf %s/firstboot.sh firstboot_dir) /etc/rc.d/rc5.d/99virt-sysprep-firstboot +(* Make firstboot.sh look like a runlevel script to avoid insserv warnings. *) +and install_sysvinit_suse g = + g#mkdir_p /etc/init.d/rc2.d; + g#mkdir_p /etc/init.d/rc3.d; + g#mkdir_p /etc/init.d/rc5.d; + g#ln_sf (sprintf %s/firstboot.sh firstboot_dir) +/etc/init.d/virt-sysprep-firstboot; + g#ln_sf ../virt-sysprep-firstboot +/etc/init.d/rc2.d/S99virt-sysprep-firstboot; + g#ln_sf ../virt-sysprep-firstboot +/etc/init.d/rc3.d/S99virt-sysprep-firstboot; + g#ln_sf ../virt-sysprep-firstboot +/etc/init.d/rc5.d/S99virt-sysprep-firstboot + +and install_sysvinit_debian g = + g#mkdir_p /etc/init.d; + g#mkdir_p /etc/rc2.d; + g#mkdir_p /etc/rc3.d; + g#mkdir_p /etc/rc5.d; + g#ln_sf (sprintf %s/firstboot.sh firstboot_dir) +/etc/init.d/virt-sysprep-firstboot; + g#ln_sf /etc/init.d/virt-sysprep-firstboot +/etc/rc2.d/S99virt-sysprep-firstboot; + g#ln_sf /etc/init.d/virt-sysprep-firstboot +/etc/rc3.d/S99virt-sysprep-firstboot; + g#ln_sf /etc/init.d/virt-sysprep-firstboot +/etc/rc5.d/S99virt-sysprep-firstboot + +and install_sysvinit_service g distro = + match distro with + | (fedora|rhel|centos|scientificlinux|redhat-based) - +install_sysvinit_redhat g + | (opensuse|sles|suse-based) - +install_sysvinit_suse g + | debian - +install_sysvinit_debian g + | _ - +failed guest type %s is not supported distro + let add_firstboot_script g root id content = let typ = g#inspect_get_type root in let distro = g#inspect_get_distro root in match typ, distro with | linux, _ - -install_service g root; +install_service g distro; let t = Int64.of_float (Unix.time ()) in let r = string_random8 () in let filename = sprintf %s/scripts/%Ld-%s-%s firstboot_dir t r id in -- 1.7.12 ___ Libguestfs mailing list Libguestfs@redhat.com https://www.redhat.com/mailman/listinfo/libguestfs