5 dh - debhelper command sequencer
10 use Debian::Debhelper::Dh_Lib;
14 B<dh> I<sequence> [B<--with> I<addon>[B<,>I<addon> ...]] [B<--list>] [B<--until> I<cmd>] [B<--before> I<cmd>] [B<--after> I<cmd>] [B<--remaining>] [S<I<debhelper options>>]
18 B<dh> runs a sequence of debhelper commands. The supported I<sequence>s
19 correspond to the targets of a F<debian/rules> file: B<build-arch>,
20 B<build-indep>, B<build>, B<clean>, B<install-indep>, B<install-arch>,
21 B<install>, B<binary-arch>, B<binary-indep>, and B<binary>.
23 Commands in the B<build-indep>, B<install-indep> and B<binary-indep>
24 sequences are passed the B<-i> option to ensure they only work on
25 architecture independent packages, and commands in the B<build-arch>,
26 B<install-arch> and B<binary-arch> sequences are passed the B<-a>
27 option to ensure they only work on architecture dependent packages.
29 If F<debian/rules> contains a target with a name like B<override_>I<dh_command>,
30 then when it would normally run I<dh_command>, B<dh> will instead call that
31 target. The override target can then run the command with additional options,
32 or run entirely different commands instead. See examples below. (Note that to
33 use this feature, you should Build-Depend on debhelper 7.0.50 or above.)
39 =item B<--with> I<addon>[B<,>I<addon> ...]
41 Add the debhelper commands specified by the given addon to appropriate places
42 in the sequence of commands that is run. This option can be repeated more
43 than once, or multiple addons can be listed, separated by commas.
44 This is used when there is a third-party package that provides
45 debhelper commands. See the F<PROGRAMMING> file for documentation about
46 the sequence addon interface.
48 =item B<--without> I<addon>
50 The inverse of B<--with>, disables using the given addon.
52 =item B<--list>, B<-l>
54 List all available addons.
56 =item B<--until> I<cmd>
58 Run commands in the sequence until and including I<cmd>, then stop.
60 =item B<--before> I<cmd>
62 Run commands in the sequence before I<cmd>, then stop.
64 =item B<--after> I<cmd>
66 Run commands in the sequence that come after I<cmd>.
70 Run all commands in the sequence that have yet to be run.
74 Prints commands that would run for a given sequence, but does not run them.
78 All other options passed to B<dh> are passed on to each command it runs. This
79 can be used to set an option like B<-v> or B<-X> or B<-N>, as well as for more
82 In the above options, I<cmd> can be a full name of a debhelper command, or
83 a substring. It'll first search for a command in the sequence exactly
84 matching the name, to avoid any ambiguity. If there are multiple substring
85 matches, the last one in the sequence will be used.
93 foreach my $i (0..$#sequence) {
94 if ($command eq $sequence[$i]) {
100 foreach my $i (0..$#sequence) {
101 if ($sequence[$i] =~ /\Q$command\E/) {
106 error "command specification \"$command\" does not match any command in the sequence"
115 To see what commands are included in a sequence, without actually doing
118 dh binary-arch --no-act
120 This is a very simple rules file, for packages where the default sequences of
121 commands work with no additional options.
127 Often you'll want to pass an option to a specific debhelper command. The
128 easy way to do with is by adding an override target for that command.
137 override_dh_installdocs:
138 dh_installdocs README TODO
140 Sometimes the automated L<dh_auto_configure(1)> and L<dh_auto_build(1)>
141 can't guess what to do for a strange package. Here's how to avoid running
142 either and instead run your own commands.
148 override_dh_auto_configure:
151 override_dh_auto_build:
152 make universe-explode-in-delight
154 Another common case is wanting to do something manually before or
155 after a particular debhelper command is run.
161 override_dh_fixperms:
163 chmod 4755 debian/foo/usr/bin/foo
165 If your package is a Python package, B<dh> will use B<dh_pysupport> by
166 default. This is how to use B<dh_pycentral> instead.
170 dh $@ --with python-central
172 If your package uses autotools and you want to freshen F<config.sub> and
173 F<config.guess> with newer versions from the B<autotools-dev> package
174 at build time, you can use some commands provided in B<autotools-dev>
175 that automate it, like this.
179 dh $@ --with autotools_dev
181 Here is how to force use of Perl's B<Module::Build> build system,
182 which can be necessary if debhelper wrongly detects that the package
187 dh $@ --buildsystem=perl_build
189 To patch your package using quilt, you can tell B<dh> to use quilt's B<dh>
190 sequence addons like this:
196 Here is an example of overriding where the B<dh_auto_>I<*> commands find
197 the package's source, for a package where the source is located in a
202 dh $@ --sourcedirectory=src
204 And here is an example of how to tell the B<dh_auto_>I<*> commands to build
205 in a subdirectory, which will be removed on B<clean>.
209 dh $@ --builddirectory=build
211 If your package can be built in parallel, you can support parallel building
212 as follows. Then B<dpkg-buildpackage -j> will work.
218 Here is a way to prevent B<dh> from running several commands that you don't
219 want it to run, by defining empty override targets for each command.
225 # Commands not to run:
226 override_dh_auto_test override_dh_compress override_dh_fixperms:
228 Sometimes, you may need to make an override target only run commands when a
229 particular package is being built. This can be accomplished using
230 L<dh_listpackages(1)> to test what is being built. For example:
236 override_dh_fixperms:
238 ifneq (,$(filter foo, $(shell dh_listpackages)))
239 chmod 4755 debian/foo/usr/bin/foo
242 Finally, remember that you are not limited to using override targets in the
243 rules file when using B<dh>. You can also explicitly define the regular
244 rules file targets when it makes sense to do so. A common reason to do this
245 is if your package needs different B<build-arch> and B<build-indep> targets.
246 For example, a package with a long document build process can put it in
253 binary: binary-arch binary-indep ;
254 binary-arch:: build-arch
255 binary-indep:: build-indep
256 build: build-arch build-indep ;
264 If you're curious about B<dh>'s internals, here's how it works under the hood.
266 Each debhelper command will record when it's successfully run in
267 F<debian/package.debhelper.log>. (Which B<dh_clean> deletes.) So B<dh> can tell
268 which commands have already been run, for which packages, and skip running
269 those commands again.
271 Each time B<dh> is run, it examines the log, and finds the last logged command
272 that is in the specified sequence. It then continues with the next command
273 in the sequence. The B<--until>, B<--before>, B<--after>, and B<--remaining>
274 options can override this behavior.
276 B<dh> uses the B<DH_INTERNAL_OPTIONS> environment variable to pass information
277 through to debhelper commands that are run inside override targets. The
278 contents (and indeed, existence) of this environment variable, as the name
279 might suggest, is subject to change at any time.
283 # Stash this away before init modifies it.
286 # python-support is enabled by default, at least for now
287 # (and comes first so python-central loads later and can disable it).
288 unshift @ARGV, "--with=python-support";
291 "until=s" => \$dh{UNTIL},
292 "after=s" => \$dh{AFTER},
293 "before=s" => \$dh{BEFORE},
294 "remaining" => \$dh{REMAINING},
296 my ($option,$value)=@_;
297 push @{$dh{WITH}},split(",", $value);
300 my ($option,$value)=@_;
301 @{$dh{WITH}} = grep { $_ ne $value } @{$dh{WITH}};
303 "l" => \&list_addons,
304 "list" => \&list_addons,
306 # Disable complaints about unknown options; they are passed on to
307 # the debhelper commands.
308 ignore_unknown_options => 1,
309 # Bundling does not work well since there are unknown options.
315 # If make is using a jobserver, but it is not available
316 # to this process, clean out MAKEFLAGS. This avoids
317 # ugly warnings when calling make.
318 if (is_make_jobserver_unavailable()) {
319 clean_jobserver_makeflags();
322 # Definitions of sequences.
324 $sequences{build} = [qw{
330 $sequences{'build-indep'} = [@{$sequences{build}}];
331 $sequences{'build-arch'} = [@{$sequences{build}}];
332 $sequences{clean} = [qw{
379 $sequences{'install'} = [@{$sequences{build}}, @i];
380 $sequences{'install-indep'} = [@{$sequences{'build-indep'}}, @i];
381 $sequences{'install-arch'} = [@{$sequences{'build-arch'}}, @i];
393 $sequences{binary} = [@{$sequences{install}}, @ba, @b];
394 $sequences{'binary-indep'} = [@{$sequences{'install-indep'}}, @b];
395 $sequences{'binary-arch'} = [@{$sequences{'install-arch'}}, @ba, @b];
397 # Additional command options
400 # sequence addon interface
405 foreach my $sequence (keys %sequences) {
406 my @list=@{$sequences{$sequence}};
407 next unless grep $existing, @list;
409 foreach my $command (@list) {
410 if ($command eq $existing) {
411 push @new, $new if $offset < 0;
413 push @new, $new if $offset > 0;
419 $sequences{$sequence}=\@new;
430 foreach my $sequence (keys %sequences) {
431 $sequences{$sequence}=[grep { $_ ne $command } @{$sequences{$sequence}}];
438 unshift @{$sequences{$sequence}}, $command;
440 sub add_command_options {
442 push @{$command_opts{$command}}, @_;
444 sub remove_command_options {
447 # Remove only specified options
448 if (my $opts = $command_opts{$command}) {
449 foreach my $opt (@_) {
450 $opts = [ grep { $_ ne $opt } @$opts ];
452 $command_opts{$command} = $opts;
456 # Clear all additional options
457 delete $command_opts{$command};
465 eval q{use File::Spec};
466 my $path = File::Spec->catdir($inc, "Debian/Debhelper/Sequence");
468 for my $module_path (glob "$path/*.pm") {
469 my $name = basename($module_path);
477 for my $name (sort keys %addons) {
484 foreach my $addon (@{$dh{WITH}}) {
485 my $mod="Debian::Debhelper::Sequence::$addon";
489 error("unable to load addon $addon: $@");
495 # From v8, the sequence is the very first parameter.
496 $sequence=shift @ARGV_orig;
497 if ($sequence=~/^-/) {
498 error "Unknown sequence $sequence (options should not come before the sequence)";
502 # Before v8, the sequence could be at any position in the parameters,
503 # so was what was left after parsing.
505 if (defined $sequence) {
506 @ARGV_orig=grep { $_ ne $sequence } @ARGV_orig;
509 if (! defined $sequence) {
510 error "specify a sequence to run";
512 if ($sequence eq 'debian/rules' ||
513 $sequence =~ /^override_dh_/) {
514 # make -B causes the rules file to be run as a target.
515 # Also support completly empty override targets.
518 elsif (! exists $sequences{$sequence}) {
519 error "Unknown sequence $sequence (choose from: ".
520 join(" ", sort keys %sequences).")";
522 my @sequence=@{$sequences{$sequence}};
524 # The list of all packages that can be acted on.
525 my @packages=@{$dh{DOPACKAGES}};
527 # Get the options to pass to commands in the sequence.
528 # Filter out options intended only for this program.
530 if ($sequence eq 'build-arch' ||
531 $sequence eq 'install-arch' ||
532 $sequence eq 'binary-arch') {
534 # as an optimisation, remove from the list any packages
535 # that are not arch dependent
536 my %arch_packages = map { $_ => 1 } getpackages("arch");
537 @packages = grep { $arch_packages{$_} } @packages;
539 elsif ($sequence eq 'build-indep' ||
540 $sequence eq 'install-indep' ||
541 $sequence eq 'binary-indep') {
543 # ditto optimisation for arch indep
544 my %indep_packages = map { $_ => 1 } getpackages("indep");
545 @packages = grep { $indep_packages{$_} } @packages;
548 my $opt=shift @ARGV_orig;
549 if ($opt =~ /^--?(after|until|before|with|without)$/) {
553 elsif ($opt =~ /^--?(no-act|remaining|(after|until|before|with|without)=)/) {
557 push @options, "-O".$opt;
560 if ($options[$#options]=~/^-O--/) {
561 $options[$#options].="=".$opt;
564 $options[$#options].=$opt;
569 # Figure out at what point in the sequence to start for each package.
572 foreach my $package (@packages) {
573 my @log=load_log($package, \%logged);
575 # Run commands in the sequence that come after the
577 $startpoint{$package}=command_pos($dh{AFTER}, @sequence) + 1;
578 # Write a dummy log entry indicating that the specified
579 # command was, in fact, run. This handles the case where
580 # no commands remain to run after it, communicating to
581 # future dh instances that the specified command should not
583 write_log($sequence[$startpoint{$package}-1], $package);
585 elsif ($dh{REMAINING}) {
586 # Start at the beginning so all remaining commands will get
588 $startpoint{$package}=0;
591 # Find the last logged command that is in the sequence, and
592 # continue with the next command after it. If no logged
593 # command is in the sequence, we're starting at the beginning..
594 $startpoint{$package}=0;
595 COMMAND: foreach my $command (reverse @log) {
596 foreach my $i (0..$#sequence) {
597 if ($command eq $sequence[$i]) {
598 $startpoint{$package}=$i+1;
606 # Figure out what point in the sequence to go to.
607 my $stoppoint=$#sequence;
609 $stoppoint=command_pos($dh{UNTIL}, @sequence);
611 elsif ($dh{BEFORE}) {
612 $stoppoint=command_pos($dh{BEFORE}, @sequence) - 1;
615 # Now run the commands in the sequence.
616 foreach my $i (0..$stoppoint) {
617 # Figure out which packages need to run this command.
619 foreach my $package (@packages) {
620 if ($startpoint{$package} > $i ||
621 $logged{$package}{$sequence[$i]}) {
622 push @exclude, $package;
626 if (@exclude eq @packages) {
627 # Command already done for all packages.
631 run($sequence[$i], \@packages, \@exclude, @options);
636 my @packages=@{shift()};
637 my @exclude=@{shift()};
640 # If some packages are excluded, add flags
641 # to prevent them from being acted on.
642 push @options, map { "-N$_" } @exclude;
644 # Check for override targets in debian/rules and
645 # run them instead of running the command directly.
646 my $override_command;
647 my $has_explicit_target = rules_explicit_target("override_".$command);
648 if (defined $has_explicit_target) {
649 $override_command=$command;
650 # Check if target isn't noop
651 if ($has_explicit_target) {
652 # This passes the options through to commands called
654 $ENV{DH_INTERNAL_OPTIONS}=join("\x1e", @options);
655 $ENV{DH_INTERNAL_OVERRIDE}=$command;
656 $command="debian/rules";
657 @options="override_".$override_command;
664 # Pass additional command options if any
665 unshift @options, @{$command_opts{$command}} if exists $command_opts{$command};
668 if (defined $command) {
669 # 3 space indent lines the command being run up under the
670 # sequence name after "dh ".
671 print " ".escape_shell($command, @options)."\n";
674 print " ", "# Skipping ", $override_command, " - empty override", "\n";
678 if (defined $command) {
679 my $ret=system($command, @options);
681 if ($ret >> 8 != 0) {
689 if (defined $override_command) {
690 # Update log for overridden command now that it has
691 # finished successfully.
692 # (But avoid logging for dh_clean since it removes
694 if ($override_command ne 'dh_clean') {
695 my %packages=map { $_ => 1 } @packages;
696 map { delete $packages{$_} } @exclude;
697 write_log($override_command, keys %packages);
698 commit_override_log(keys %packages);
701 delete $ENV{DH_INTERNAL_OPTIONS};
702 delete $ENV{DH_INTERNAL_OVERRIDE};
711 sub rules_explicit_target {
712 # Checks if a specified target exists as an explicit target
714 # undef is returned if target does not exist, 0 if target is noop
715 # and 1 if target has dependencies or executes commands.
718 if (! $rules_parsed) {
719 my $processing_targets = 0;
720 my $not_a_target = 0;
722 open(MAKE, "LC_ALL=C make -Rrnpsf debian/rules debhelper-fail-me 2>/dev/null |");
724 if ($processing_targets) {
725 if (/^# Not a target:/) {
729 if (!$not_a_target && /^([^#:]+)::?\s*(.*)$/) {
730 # Target is defined. NOTE: if it is a depenency of
731 # .PHONY it will be defined too but that's ok.
732 # $2 contains target dependencies if any.
733 $current_target = $1;
734 $targets{$current_target} = ($2) ? 1 : 0;
737 if (defined $current_target) {
739 # Check if target has commands to execute
740 if (/^#\s*commands to execute/) {
741 $targets{$current_target} = 1;
746 $current_target = undef;
750 # "Not a target:" is always followed by
751 # a target name, so resetting this one
756 elsif (/^# Files$/) {
757 $processing_targets = 1;
764 return $targets{$target};
773 This program is a part of debhelper.
777 Joey Hess <joeyh@debian.org>