r1892: * dh_install: swap two paras in man page for clarity. Closes: #359182

[debhelper.git] / dh_installinit

diff --git a/dh_installinit b/dh_installinit
index 360f378397176f34fe749c94b351ce8a41e2edc7..952e2d35096b507958ba1cd6b5abe2f2504d5aa7 100755 (executable)
--- a/dh_installinit
+++ b/dh_installinit
@@ -38,6 +38,13 @@ by the package name.
 
 Do not modify postinst/postrm/prerm scripts.
 
+=item B<-o>, B<--onlyscripts>
+
+Only modify postinst/postrm/prerm scripts, do not actually install any init
+script or default files. May be useful if the init script is shipped and/or
+installed by upstream in a way that doesn't make it easy to let
+dh_installinit find it.
+
 =item B<-r>, B<--no-restart-on-upgrade>
 
 Do not restart init script on upgrade.
@@ -81,6 +88,12 @@ preference to the files it normally installs.
 
 This parameter is deprecated, use the --name parameter instead.
 
+=item B<--error-handler=>I<function>
+
+Call the named shell function if running the init script fails. The
+function should be provided in the prerm and postinst scripts, before the
+#DEBHELPER# token.
+
 =back
 
 =head1 NOTES
@@ -124,20 +137,22 @@ foreach my $package (@{$dh{DOPACKAGES}}) {
              pkgfile($package,"init.d");
        my $default=pkgfile($package,'default');
 
-       if ($default ne '') {
+       if ($default ne '' && ! $dh{ONLYSCRIPTS}) {
                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") {
-                       doit("install","-d","$tmp/etc/init.d");
+       if ($init ne '' || $dh{ONLYSCRIPTS}) {
+               if (! $dh{ONLYSCRIPTS}) {
+                       if (! -d "$tmp/etc/init.d") {
+                               doit("install","-d","$tmp/etc/init.d");
+                       }
+               
+                       doit("install","-p","-m755",$init,"$tmp/etc/init.d/$script");
                }
-
-               doit("install","-p","-m755",$init,"$tmp/etc/init.d/$script");
-
+               
                # This is set by the -u "foo" command line switch, it's
                # the parameters to pass to update-rc.d. If not set,
                # we have to say "defaults".
@@ -148,33 +163,33 @@ foreach my $package (@{$dh{DOPACKAGES}}) {
                if ($params eq '') {
                        $params="defaults";
                }
-
+                
                if (! $dh{NOSCRIPTS}) {
                        if (! $dh{NO_START}) {
                                # update-rc.d, and start script
                                autoscript($package,"postinst", "postinst-init",
-                                       "s/#SCRIPT#/$script/;s/#INITPARMS#/$params/");
+                                       "s/#SCRIPT#/$script/;s/#INITPARMS#/$params/;s/#ERROR_HANDLER#/$dh{ERROR_HANDLER}/");
                        
                                if ($dh{R_FLAG}) {
                                        # stops script only on remove
                                        autoscript($package,"prerm","prerm-init-norestart",
-                                               "s/#SCRIPT#/$script/;s/#INITPARMS#/$params/");
+                                               "s/#SCRIPT#/$script/;s/#INITPARMS#/$params/;s/#ERROR_HANDLER#/$dh{ERROR_HANDLER}/");
                                }
                                else {
                                        # always stops script
                                        autoscript($package,"prerm","prerm-init",
-                                               "s/#SCRIPT#/$script/;s/#INITPARMS#/$params/");
+                                               "s/#SCRIPT#/$script/;s/#INITPARMS#/$params/;s/#ERROR_HANDLER#/$dh{ERROR_HANDLER}/");
                                }
                        }
                        else {
                                # just update-rc.d
                                autoscript($package,"postinst", "postinst-init-nostart",
-                                       "s/#SCRIPT#/$script/;s/#INITPARMS#/$params/");
+                                       "s/#SCRIPT#/$script/;s/#INITPARMS#/$params/;s/#ERROR_HANDLER#/$dh{ERROR_HANDLER}/");
                        }
 
                        # removes rc.d links
                        autoscript($package,"postrm","postrm-init",
-                               "s/#SCRIPT#/$script/;s/#INITPARMS#/$params/");
+                               "s/#SCRIPT#/$script/;s/#INITPARMS#/$params/;s/#ERROR_HANDLER#/$dh{ERROR_HANDLER}/");
                }
        }
 }