]> git.donarmstrong.com Git - debhelper.git/blobdiff - dh_installinit
r543: * Patch from Andrew Suffield to make dh_perl understand #!/usr/bin/env perl
[debhelper.git] / dh_installinit
index e7f9b70b1a8b99d8f17d199240059fa5daac73ae..b20a1114780e66f2f06247b27d621d0fcd9b443d 100755 (executable)
@@ -1,10 +1,89 @@
 #!/usr/bin/perl -w
-#
-# Install debian/init[.d], and set up the postinst and postrm for init
-# scripts.
+
+=head1 NAME
+
+dh_installinit - install init scripts into package build directories
+
+=cut
 
 use strict;
 use Debian::Debhelper::Dh_Lib;
+
+=head1 SYNOPSIS
+
+B<dh_installinit> [S<I<debhelper options>>] [B<--init-script=>I<scriptname>] [B<-n>] [B<-r>] [B<-d>] [S<B<--> I<params>>]
+
+=head1 DESCRIPTION
+
+dh_installinit is a debhelper program that is responsible for installing
+init scripts and associated defaults files into package build directories.
+
+It also automatically generates the postinst and postrm and prerm commands
+needed to set up the symlinks in /etc/rc*.d/ and to start and stop the init
+scripts.
+
+If a file named debian/package.init exists, then it is installed into
+etc/init.d/package in the package build directory, with "package" replaced
+by the package name.
+
+If a file named debian/package.default exists, then it is installed into
+etc/default/package in the package build directory, with "package" replaced
+by the package name.
+
+Historically this program generates postrm and prerm commands that run the
+init scripts by hand. In V4 mode, it uses the invoke-rc.d program instead.
+See L<debhelper(1)> for details about V4 mode. If you decide to use this, you
+should make your package depend on sysvinit (>= 2.80-1) (this dependency is
+added to ${misc:Depends} by this program in V4 mode).
+
+=head1 OPTIONS
+
+=over 4
+
+=item B<-n>, B<--noscripts>
+
+Do not modify postinst/postrm/prerm scripts.
+
+=item B<-r>, B<--no-restart-on-upgrade>
+
+Do not restart daemon on upgrade.
+
+=item B<-d>, B<--remove-d>
+
+Remove trailing "d" from the name of the package, and use the result for the
+filename the init script is installed as in etc/init.d/ , and the default file
+is installed as in etc/default/ . This may be useful for daemons with names
+ending in "d". (Note: this takes precedence over the --init-script parameter
+described below.)
+
+=item B<-u>I<params> B<--update-rcd-params=>I<params>
+
+=item B<--> I<params>
+
+Pass "params" to L<update-rc.d(8)>. If not specified, "defaults" will be
+passed to L<update-rc.d(8)>.
+
+=item B<--init-script=>I<scriptname>
+
+Use "scriptname" as for the filename the init script is installed as in
+etc/init.d/ (and also use it as the filename for the defaults file, if it
+is installed). This is useful if you need to have an init script with a name
+different from the package's name. Note that if you use this parameter,
+dh_installinit will look to see if a file in the debian/ directory exists
+that looks like "package.scriptname" and if so will install it as the init
+script in preference to the files it normally installs. This feature is really
+only useful if you need a single package to install more than one init script.
+
+=back
+
+=head1 NOTES
+
+Note that this command is not idempotent. "dh_clean -k" should be called
+between invocations of this command. Otherwise, it may cause multiple
+instances of the same text to be added to maintainer scripts.
+
+=cut
+
 init();
 
 foreach my $package (@{$dh{DOPACKAGES}}) {
@@ -33,6 +112,14 @@ foreach my $package (@{$dh{DOPACKAGES}}) {
 
        my $init=pkgfile($package,$script) || pkgfile($package,"init") ||
              pkgfile($package,"init.d");
+       my $default=pkgfile($package,'default');
+
+       if ($default ne '') {
+               if (! -d "$tmp/etc/default") {
+                       doit("install","-d","$tmp/etc/default");
+               }
+               doit("install","-p","-m644",$default,"$tmp/etc/default/$script");
+       }
 
        if ($init ne '') {
                if (! -d "$tmp/etc/init.d") {
@@ -52,25 +139,51 @@ foreach my $package (@{$dh{DOPACKAGES}}) {
                        $params="defaults";
                }
 
+               my $substvaradded=0;
                if (! $dh{NOSCRIPTS}) {
-                       # -r on the command line sets R_FLAG. If it's set, there
-                       # is no restart on upgrade.
+                       # In v4 mode, use invoke-rc.d versions of the
+                       # autoscripts; prior to that use the old,
+                       # manual-invoking versions.
+                       my $tailstr="";
+                       if (! compat(3)) {
+                               $tailstr="-invoke";
+                               addsubstvar($package, "misc:Depends", "sysvinit", ">= 2.80-1");
+                               $substvaradded=1;
+                       }
+                       autoscript($package,"postinst", "postinst-init$tailstr",
+                               "s/#SCRIPT#/$script/;s/#INITPARMS#/$params/");
+                       # -r on the command line sets R_FLAG. If it's set,
+                       # there  is no restart on upgrade, so don't stop
+                       # daemon. (It's ok that it's always started.)
                        if ($dh{R_FLAG}) {
-                               autoscript($package,"postinst", "postinst-init-norestart",
-                                       "s/#SCRIPT#/$script/;s/#INITPARMS#/$params/");
-                               autoscript($package,"postrm","postrm-init",
-                                       "s/#SCRIPT#/$script/;s/#INITPARMS#/$params/");
-                               autoscript($package,"prerm","prerm-init-norestart",
+                               autoscript($package,"prerm","prerm-init-norestart$tailstr",
                                        "s/#SCRIPT#/$script/;s/#INITPARMS#/$params/");
                        }
                        else {
-                               autoscript($package,"postinst","postinst-init",
-                                       "s/#SCRIPT#/$script/;s/#INITPARMS#/$params/");
-                               autoscript($package,"postrm","postrm-init",
-                                       "s/#SCRIPT#/$script/;s/#INITPARMS#/$params/");
-                               autoscript($package,"prerm","prerm-init",
+                               autoscript($package,"prerm","prerm-init$tailstr",
                                        "s/#SCRIPT#/$script/;s/#INITPARMS#/$params/");
                        }
+                       # This script just removes the links, so it's the
+                       # same for all varients.
+                       autoscript($package,"postrm","postrm-init",
+                               "s/#SCRIPT#/$script/;s/#INITPARMS#/$params/");
+               }
+
+               if (! $substvaradded) {
+                       # Remove it, for idemotency's sake.
+                       addsubstvar($package, "misc:Depends", "sysvinit", ">= 2.80-1", 1);
                }
        }
 }
+
+=head1 SEE ALSO
+
+L<debhelper(1)>
+
+This program is a part of debhelper.
+
+=head1 AUTHOR
+
+Joey Hess <joeyh@debian.org>
+
+=cut