summaryrefslogtreecommitdiff
path: root/dh_installdeb
diff options
context:
space:
mode:
Diffstat (limited to 'dh_installdeb')
-rwxr-xr-xdh_installdeb117
1 files changed, 0 insertions, 117 deletions
diff --git a/dh_installdeb b/dh_installdeb
deleted file mode 100755
index 9527ff2e..00000000
--- a/dh_installdeb
+++ /dev/null
@@ -1,117 +0,0 @@
-#!/usr/bin/perl -w
-
-=head1 NAME
-
-dh_installdeb - install files into the DEBIAN directory
-
-=cut
-
-use strict;
-use Debian::Debhelper::Dh_Lib;
-
-=head1 SYNOPSIS
-
-B<dh_installdeb> [S<I<debhelper options>>]
-
-=head1 DESCRIPTION
-
-dh_installdeb is a debhelper program that is responsible for installing
-files into the DEBIAN directories in package build directories with the
-correct permissions.
-
-dh_installdeb automatically installs the following files from debian/ into
-the DEBIAN directory:
- package.postinst
- package.preinst
- package.postrm
- package.prerm
- package.shlibs
- package.conffiles
-
-The postinst, preinst, postrm, and prerm are handled specially: If a
-corresponding file named debian/package.script.debhelper exists, the contents
-of that file are merged into the script as follows: If the script exists,
-then anywhere in it that "#DEBHELPER#" appears, the text of the .debhelper
-file is inserted. If the script does not exist, then a script is generated
-from the .debhelper file. The .debhelper files are created by other debhelper
-programs, such as L<dh_installmenu(1)>, and are shell script fragments.
-
-In V3 compatibility mode and higher, all files in the etc/ directory in a
-package will automatically be flagged as conffiles by this program, so
-there is no need to list them manually in package.conffiles.
-
-=cut
-
-init();
-
-foreach my $package (@{$dh{DOPACKAGES}}) {
- my $tmp=tmpdir($package);
- my $ext=pkgext($package);
-
- if (! -d "$tmp/DEBIAN") {
- doit("install","-o",0,"-g",0,"-d","$tmp/DEBIAN");
- }
-
- # Install debian install scripts.
- # If any .debhelper files exist, add them into the scripts.
- foreach my $file (qw{postinst preinst prerm postrm}) {
- my $f=pkgfile($package,$file);
- if ($f) {
- if (-f "debian/$ext$file.debhelper") {
- # Add this into the script, where it has
- # #DEBHELPER#
- complex_doit("perl -pe 's~#DEBHELPER#~qx{cat debian/$ext$file.debhelper}~eg' < $f > $tmp/DEBIAN/$file");
- }
- else {
- # Just get rid of any #DEBHELPER# in the
- # script.
- complex_doit("sed s/#DEBHELPER#// < $f > $tmp/DEBIAN/$file");
- }
- doit("chown","0.0","$tmp/DEBIAN/$file");
- doit("chmod",755,"$tmp/DEBIAN/$file");
- }
- else {
- # Auto-generate script header and add .debhelper
- # content to it.
- if (-f "debian/$ext$file.debhelper") {
- complex_doit("printf '#!/bin/sh\nset -e\n' > $tmp/DEBIAN/$file");
- complex_doit("cat debian/$ext$file.debhelper >> $tmp/DEBIAN/$file");
- doit("chown","0.0","$tmp/DEBIAN/$file");
- doit("chmod",755,"$tmp/DEBIAN/$file");
- }
- }
- }
-
- # Install non-executable files
- foreach my $file (qw{shlibs conffiles}) {
- my $f=pkgfile($package,$file);
- if ($f) {
- doit("install","-o",0,"-g",0,"-m",644,"-p",$f,"$tmp/DEBIAN/$file");
- }
- }
-
- # Automatic conffiles registration: If it is in /etc, it is a
- # conffile.
- if (! compat(2) && -d "$tmp/etc") {
- complex_doit("find $tmp/etc -type f -printf '/etc/%P\n' >> $tmp/DEBIAN/conffiles");
- # Anything found?
- if (-z "$tmp/DEBIAN/conffiles") {
- doit("rm", "-f", "$tmp/DEBIAN/conffiles");
- }
- else {
- doit("chmod", 644, "$tmp/DEBIAN/conffiles");
- }
- }
-}
-
-=head1 SEE ALSO
-
-L<debhelper(7)>
-
-This program is a part of debhelper.
-
-=head1 AUTHOR
-
-Joey Hess <joeyh@debian.org>
-
-=cut