5 dh - debhelper command sequencer
10 use Debian::Debhelper::Dh_Lib;
14 B<dh> sequence [B<--with> I<addon>[,I<addon>,...]] [B<--until> I<cmd>] [B<--before> I<cmd>] [B<--after> I<cmd>] [B<--remaining>] [S<I<debhelper options>>]
18 dh runs a sequence of debhelper commands. The supported sequences
19 correspond to the targets of a debian/rules file: "build", "clean",
20 "install", "binary-arch", "binary-indep", and "binary".
22 Commands in the binary-indep sequence are passed the "-i" option to ensure
23 they only work on binary independent packages, and commands in the
24 binary-arch sequences are passed the "-a" option to ensure they only work
25 on architecture dependent packages.
27 Each debhelper command will record when it's successfully run in
28 debian/package.debhelper.log. (Which dh_clean deletes.) So dh can tell
29 which commands have already been run, for which packages, and skip running
32 Each time dh is run, it examines the log, and finds the last logged command
33 that is in the specified sequence. It then continues with the next command
34 in the sequence. The B<--until>, B<--before>, B<--after>, and B<--remaining>
35 options can override this behavior.
37 If debian/rules contains a target with a name like "override_I<dh_command>",
38 then when it gets to that command in the sequence, dh will run that
39 target from the rules file, rather than running the actual command. The
40 override target can then run the command with additional options, or run
41 entirely different commands instead. (Note that to use this feature,
42 you should Build-Depend on debhelper 7.0.50 or above.)
48 =item B<--with> I<addon>[,I<addon>,...]
50 Add the debhelper commands specified by the given addon to appropriate places
51 in the sequence of commands that is run. This option can be repeated more
52 than once, or multiple addons can be listed, separated by commas.
53 This is used when there is a third-party package that provides
54 debhelper commands. See the PROGRAMMING file for documentation about
55 the sequence addon interface.
57 =item B<--without> I<addon>
59 The inverse of --with, disables using the given addon.
61 =item B<--until> I<cmd>
63 Run commands in the sequence until and including I<cmd>, then stop.
65 =item B<--before> I<cmd>
67 Run commands in the sequence before I<cmd>, then stop.
69 =item B<--after> I<cmd>
71 Run commands in the sequence that come after I<cmd>.
75 Run all commands in the sequence that have yet to be run.
79 All other options passed to dh are passed on to each command it runs. This
80 can be used to set an option like "-v" or "-X" or "-N", as well as for more
83 =head1 COMMAND SPECIFICATION
85 I<cmd> can be a full name of a debhelper command, or a substring. It'll first
86 search for a command in the sequence exactly matching the name, to avoid any
87 ambiguity. If there are multiple substring matches, the last one in the
88 sequence will be used.
96 foreach my $i (0..$#sequence) {
97 if ($command eq $sequence[$i]) {
103 foreach my $i (0..$#sequence) {
104 if ($sequence[$i] =~ /\Q$command\E/) {
109 error "command specification \"$command\" does not match any command in the sequence"
118 To see what commands are included in a sequence, without actually doing
121 dh binary-arch --no-act
123 This is a very simple rules file, for packages where the default sequences of
124 commands work with no additional options.
130 Often you'll want to pass an option to a specific debhelper command. The
131 easy way to do with is by adding an override target for that command.
140 override_dh_installdocs:
141 dh_installdocs README TODO
143 Sometimes the automated dh_auto_configure and dh_auto_build can't guess
144 what to do for a strange package. Here's how to avoid running either
145 and instead run your own commands.
151 override_dh_auto_configure:
154 override_dh_auto_build:
155 make universe-explode-in-delight
157 Another common case is wanting to do something manually before or
158 after a particular debhelper command is run.
164 override_dh_fixperms:
166 chmod 4755 debian/foo/usr/bin/foo
168 If your package is a python package, dh will use dh_pysupport by
169 default. This is how to use dh_pycentral instead.
173 dh --with python-central $@
175 To patch your package using quilt, you can tell dh to use quilt's dh
176 sequence addons like this:
182 Here is an example of overriding where the dh_auto_* commands find
183 the package's source, for a package where the source is located in a
184 subdirectory. It also forces use of perl's Module::Build build system,
185 which can be necessary if debhelper wrongly detects that the package
190 dh --sourcedirectory=src --buildsystem=perl_build $@
194 # Stash this away before init modifies it.
197 # python-support is enabled by default, at least for now
198 # (and comes first so python-central loads later and can disable it).
199 unshift @ARGV, "--with=python-support";
202 "until=s" => \$dh{UNTIL},
203 "after=s" => \$dh{AFTER},
204 "before=s" => \$dh{BEFORE},
205 "remaining" => \$dh{REMAINING},
207 my ($option,$value)=@_;
208 push @{$dh{WITH}},split(",", $value);
211 my ($option,$value)=@_;
212 @{$dh{WITH}} = grep { $_ ne $value } @{$dh{WITH}};
217 # Definitions of sequences.
219 $sequences{build} = [qw{
225 $sequences{clean} = [qw{
230 $sequences{install} = [@{$sequences{build}}, qw{
277 $sequences{'binary-indep'} = [@{$sequences{install}}, @b];
278 $sequences{binary} = [@{$sequences{install}}, qw{
283 $sequences{'binary-arch'} = [@{$sequences{binary}}];
285 # sequence addon interface
290 foreach my $sequence (keys %sequences) {
291 my @list=@{$sequences{$sequence}};
292 next unless grep $existing, @list;
294 foreach my $command (@list) {
295 if ($command eq $existing) {
296 push @new, $new if $offset < 0;
298 push @new, $new if $offset > 0;
304 $sequences{$sequence}=\@new;
315 foreach my $sequence (keys %sequences) {
316 $sequences{$sequence}=[grep { $_ ne $command } @{$sequences{$sequence}}];
320 foreach my $addon (@{$dh{WITH}}) {
321 my $mod="Debian::Debhelper::Sequence::$addon";
325 error("--with $addon not supported or failed to load module $mod");
329 # Get the sequence of commands to run.
331 error "specify a sequence to run";
334 if ($sequence eq 'debian/rules' ||
335 $sequence =~ /^override_dh_/) {
336 # make -B causes the rules file to be run as a target
337 # and support completly empty override targets
340 elsif (! exists $sequences{$sequence}) {
341 error "Unknown sequence $sequence (choose from: ".
342 join(" ", sort keys %sequences).")";
344 my @sequence=@{$sequences{$sequence}};
346 # The list of all packages that can be acted on.
347 my @packages=@{$dh{DOPACKAGES}};
349 # Get the options to pass to commands in the sequence.
350 # Filter out options intended only for this program.
352 if ($sequence eq 'binary-arch') {
354 # as an optimisation, remove from the list any packages
355 # that are not arch dependent
356 my %arch_packages = map { $_ => 1 } getpackages("arch");
357 @packages = grep { $arch_packages{$_} } @packages;
359 elsif ($sequence eq 'binary-indep') {
361 # ditto optimisation for arch indep
362 my %indep_packages = map { $_ => 1 } getpackages("indep");
363 @packages = grep { $indep_packages{$_} } @packages;
366 my $opt=shift @ARGV_orig;
367 next if $opt eq $sequence;
368 if ($opt =~ /^--?(after|until|before|with|without)$/) {
372 elsif ($opt =~ /^--?(no-act|remaining|(after|until|before|with|without)=)/) {
378 # Figure out at what point in the sequence to start for each package.
381 foreach my $package (@packages) {
382 my @log=load_log($package, \%logged);
384 # Run commands in the sequence that come after the
386 $startpoint{$package}=command_pos($dh{AFTER}, @sequence) + 1;
387 # Write a dummy log entry indicating that the specified
388 # command was, in fact, run. This handles the case where
389 # no commands remain to run after it, communicating to
390 # future dh instances that the specified command should not
392 write_log($sequence[$startpoint{$package}-1], $package);
394 elsif ($dh{REMAINING}) {
395 # Start at the beginning so all remaining commands will get
397 $startpoint{$package}=0;
400 # Find the last logged command that is in the sequence, and
401 # continue with the next command after it. If no logged
402 # command is in the sequence, we're starting at the beginning..
403 $startpoint{$package}=0;
404 COMMAND: foreach my $command (reverse @log) {
405 foreach my $i (0..$#sequence) {
406 if ($command eq $sequence[$i]) {
407 $startpoint{$package}=$i+1;
415 # Figure out what point in the sequence to go to.
416 my $stoppoint=$#sequence;
418 $stoppoint=command_pos($dh{UNTIL}, @sequence);
420 elsif ($dh{BEFORE}) {
421 $stoppoint=command_pos($dh{BEFORE}, @sequence) - 1;
424 # Now run the commands in the sequence.
425 foreach my $i (0..$stoppoint) {
426 # Figure out which packages need to run this command.
428 foreach my $package (@packages) {
429 if ($startpoint{$package} > $i ||
430 $logged{$package}{$sequence[$i]}) {
431 push @exclude, $package;
435 if (@exclude eq @packages) {
436 # Command already done for all packages.
440 run($sequence[$i], \@packages, \@exclude, @options);
445 my @packages=@{shift()};
446 my @exclude=@{shift()};
449 # If some packages are excluded, add flags
450 # to prevent them from being acted on.
451 push @options, map { "-N$_" } @exclude;
453 # Check for override targets in debian/rules and
454 # run them instead of running the command directly.
455 my $override_command;
456 if (rules_explicit_target("override_".$command)) {
457 $override_command=$command;
458 # This passes the options through to commands called
460 $ENV{DH_INTERNAL_OPTIONS}=join(" ", @options);
461 $command="debian/rules";
462 @options="override_".$override_command;
465 # 3 space indent lines the command being run up under the
466 # sequence name after "dh ".
467 print " ".escape_shell($command, @options)."\n";
470 my $ret=system($command, @options);
471 if ($ret >> 8 != 0) {
478 if (defined $override_command) {
479 delete $ENV{DH_INTERNAL_OPTIONS};
480 # Need to handle logging for overriden commands here,
481 # because the actual debhelper command may not have
482 # been run by the rules file target.
483 # (But avoid logging for dh_clean since it removes
485 if ($override_command ne 'dh_clean') {
486 my %packages=map { $_ => 1 } @packages;
487 map { delete $packages{$_} } @exclude;
488 write_log($override_command, keys %packages);
498 sub rules_explicit_target {
499 # Checks if a specified target exists as an explicit target
503 if (! $rules_parsed) {
504 my $processing_targets = 0;
505 my $not_a_target = 0;
506 open(MAKE, "LC_ALL=C make -Rrnpsf debian/rules debhelper-fail-me 2>/dev/null |");
508 if ($processing_targets) {
509 if (/^# Not a target:/) {
513 if (!$not_a_target && /^([^#:]+)::?/) {
515 # NOTE: if it is a depenency
516 # of .PHONY it will be
517 # defined too but that's ok.
520 # "Not a target:" is always followed by
521 # a target name, so resetting this one
525 } elsif (/^# Files$/) {
526 $processing_targets = 1;
533 return exists $targets{$target};
542 This program is a part of debhelper.
546 Joey Hess <joeyh@debian.org>