X-Git-Url: https://git.donarmstrong.com/?a=blobdiff_plain;f=dh_installxfonts;h=d247bfadb631179f0cfe7267b3d3bd19f70c4e4f;hb=fb8f18f4a98669c3b85e1bd7920fbabfc00b886e;hp=e1a46aab3493ca7c47a0983f327e139eb2b06eb1;hpb=85ad35770e541b848bf2954424879318da797b84;p=debhelper.git diff --git a/dh_installxfonts b/dh_installxfonts index e1a46aa..d247bfa 100755 --- a/dh_installxfonts +++ b/dh_installxfonts @@ -1,35 +1,97 @@ #!/usr/bin/perl -w -# -# Integration with the Debian X11 font policy. -BEGIN { push @INC, "debian", "/usr/share/debhelper" } -use Dh_Lib; +=head1 NAME + +dh_installxfonts - register X fonts + +=cut + +use strict; +use Debian::Debhelper::Dh_Lib; + +=head1 SYNOPSIS + +B [S>] + +=head1 DESCRIPTION + +B is a debhelper program that is responsible for +registering X fonts, so their corresponding F, F, +and F be rebuilt properly at install time. + +Before calling this program, you should have installed any X fonts provided +by your package into the appropriate location in the package build +directory, and if you have F or F files, you should +install them into the correct location under F in your +package build directory. + +Your package should depend on B so that the +BI<*> commands are available. (This program adds that dependency to +B<${misc:Depends}>.) + +This program automatically generates the F and F commands needed +to register X fonts. These commands are inserted into the maintainer +scripts by B. See L for an explanation of how +this works. + +=head1 NOTES + +See L, L, and +L for more information about X font installation. + +See Debian policy, section 11.8.5. for details about doing fonts the Debian +way. + +=cut + init(); -foreach $PACKAGE (@{$dh{DOPACKAGES}}) { - $TMP=tmpdir($PACKAGE); +foreach my $package (@{$dh{DOPACKAGES}}) { + my $tmp=tmpdir($package); - # Find all fint directories in the package build directory. - opendir DIR, "$TMP/usr/X11R6/lib/X11/fonts/" || next; - my @fontdirs = grep { -d $_ && !/^\./ } (readdir DIR); - closedir DIR; + # Find all font directories in the package build directory. + my @fontdirs; + foreach my $parentdir ("$tmp/usr/share/fonts/X11/") { + opendir(DIR, $parentdir) || next; + @fontdirs = grep { -d "$parentdir/$_" && !/^\./ } (readdir DIR); + closedir DIR; + } if (@fontdirs) { - # Figure out what commands the postinst will need to call. - my @updatecmds=('/usr/bin/X11/mkfontdir'); + # Figure out what commands the postinst and postrm will need + # to call. + my @cmds; + my @cmds_postinst; + my @cmds_postrm; foreach my $f (@fontdirs) { - push @updatecmds, '/usr/sbin/update-fonts-alias' - if -f "$TMP/etc/X11/fonts/$f/$PACKAGE.alias"; - # This must come _before_ mkfontdir, thus the unshift. - unshift @updatecmds, '/usr/sbin/update-fonts-scale' - if -f "$TMP/etc/X11/fonts/$f/$PACKAGE.scale"; + # This must come before update-fonts-dir. + push @cmds, "update-fonts-scale $f" + if -f "$tmp/etc/X11/fonts/$f/$package.scale"; + push @cmds, "update-fonts-dir --x11r7-layout $f"; + if (-f "$tmp/etc/X11/fonts/$f/$package.alias") { + push @cmds_postinst, "update-fonts-alias --include /etc/X11/fonts/$f/$package.alias $f"; + push @cmds_postrm, "update-fonts-alias --exclude /etc/X11/fonts/$f/$package.alias $f"; + addsubstvar($package, "misc:Depends", "xfonts-utils (>= 1:7.5+2)"); + } } - autoscript($PACKAGE, "postinst", "postinst-xfonts", - "s:#FONTDIRS#:".join(' ', @fontdirs). - ":;s:#UPDATECMDS#:".join(' ', @updatecmds).":"); - autoscript($PACKAGE, "postrm", "postrm-xfonts", - "s:#FONTDIRS#:".join(' ', @fontdirs). - ":;s:#UPDATECMDS#:".join(' ', @updatecmds).":"); + autoscript($package, "postinst", "postinst-xfonts", + "s:#CMDS#:".join(";", @cmds, @cmds_postinst).":"); + autoscript($package, "postrm", "postrm-xfonts", + "s:#CMDS#:".join(";", @cmds, @cmds_postrm).":"); + + addsubstvar($package, "misc:Depends", "xfonts-utils"); } } + +=head1 SEE ALSO + +L + +This program is a part of debhelper. + +=head1 AUTHOR + +Joey Hess + +=cut