debian: update postinst, postrm and prerm script style

Signed-off-by: Thomas Lamprecht <t.lamprecht@proxmox.com>
This commit is contained in:
Thomas Lamprecht 2023-06-13 15:14:15 +02:00
parent 6d345395f3
commit 920c82fb9b
3 changed files with 24 additions and 24 deletions

View File

@ -1,6 +1,7 @@
#!/usr/bin/perl -w #!/usr/bin/perl
use strict; use strict;
use warnings;
# Ignore all invocations except when called on to configure. # Ignore all invocations except when called on to configure.
exit 0 unless $ARGV[0] =~ /configure/; exit 0 unless $ARGV[0] =~ /configure/;
@ -16,10 +17,9 @@ system("depmod $version");
if (-d "/etc/kernel/postinst.d") { if (-d "/etc/kernel/postinst.d") {
print STDERR "Examining /etc/kernel/postinst.d.\n"; print STDERR "Examining /etc/kernel/postinst.d.\n";
system ("run-parts --verbose --exit-on-error --arg=$version " . system(
"--arg=$imagedir/vmlinuz-$version " . "run-parts --verbose --exit-on-error --arg=$version --arg=$imagedir/vmlinuz-$version /etc/kernel/postinst.d"
"/etc/kernel/postinst.d") && ) && die "Failed to process /etc/kernel/postinst.d";
die "Failed to process /etc/kernel/postinst.d";
} }
exit 0 exit 0

View File

@ -1,6 +1,7 @@
#!/usr/bin/perl -w #!/usr/bin/perl
use strict; use strict;
use warnings;
# Ignore all 'upgrade' invocations . # Ignore all 'upgrade' invocations .
exit 0 if $ARGV[0] =~ /upgrade/; exit 0 if $ARGV[0] =~ /upgrade/;
@ -11,10 +12,9 @@ my $version = "@@KVNAME@@";
if (-d "/etc/kernel/postrm.d") { if (-d "/etc/kernel/postrm.d") {
print STDERR "Examining /etc/kernel/postrm.d.\n"; print STDERR "Examining /etc/kernel/postrm.d.\n";
system ("run-parts --verbose --exit-on-error --arg=$version " . system (
"--arg=$imagedir/vmlinuz-$version " . "run-parts --verbose --exit-on-error --arg=$version --arg=$imagedir/vmlinuz-$version /etc/kernel/postrm.d"
"/etc/kernel/postrm.d") && ) && die "Failed to process /etc/kernel/postrm.d";
die "Failed to process /etc/kernel/postrm.d";
} }
unlink "$imagedir/initrd.img-$version"; unlink "$imagedir/initrd.img-$version";
@ -25,15 +25,15 @@ unlink "/var/lib/initramfs-tools/$version";
exit 0 unless $ARGV[0] =~ /purge/; exit 0 unless $ARGV[0] =~ /purge/;
my @files_to_remove = qw{ my @files_to_remove = qw{
modules.dep modules.isapnpmap modules.pcimap modules.dep modules.isapnpmap modules.pcimap
modules.usbmap modules.parportmap modules.usbmap modules.parportmap
modules.generic_string modules.ieee1394map modules.generic_string modules.ieee1394map
modules.ieee1394map modules.pnpbiosmap modules.ieee1394map modules.pnpbiosmap
modules.alias modules.ccwmap modules.inputmap modules.alias modules.ccwmap modules.inputmap
modules.symbols modules.ofmap modules.symbols modules.ofmap
modules.seriomap modules.*.bin modules.seriomap modules.*.bin
modules.softdep modules.devname modules.softdep modules.devname
}; };
foreach my $extra_file (@files_to_remove) { foreach my $extra_file (@files_to_remove) {
for (glob("/lib/modules/$version/$extra_file")) { for (glob("/lib/modules/$version/$extra_file")) {

View File

@ -1,6 +1,7 @@
#!/usr/bin/perl -w #!/usr/bin/perl
use strict; use strict;
use warnings;
# Ignore all invocations uxcept when called on to remove # Ignore all invocations uxcept when called on to remove
exit 0 unless ($ARGV[0] && $ARGV[0] =~ /remove/) ; exit 0 unless ($ARGV[0] && $ARGV[0] =~ /remove/) ;
@ -14,10 +15,9 @@ my $version = "@@KVNAME@@";
if (-d "/etc/kernel/prerm.d") { if (-d "/etc/kernel/prerm.d") {
print STDERR "Examining /etc/kernel/prerm.d.\n"; print STDERR "Examining /etc/kernel/prerm.d.\n";
system ("run-parts --verbose --exit-on-error --arg=$version " . system(
"--arg=$imagedir/vmlinuz-$version " . "run-parts --verbose --exit-on-error --arg=$version --arg=$imagedir/vmlinuz-$version /etc/kernel/prerm.d"
"/etc/kernel/prerm.d") && ) && die "Failed to process /etc/kernel/prerm.d";
die "Failed to process /etc/kernel/prerm.d";
} }
exit 0 exit 0