dh_installpam

   1 #!/usr/bin/perl -w
   2
   3 =head1 NAME
   4
   5 dh_installpam - install pam support files
   6
   7 =cut
   8
   9 use strict;
  10 use Debian::Debhelper::Dh_Lib;
  11
  12 =head1 SYNOPSIS
  13
  14 B<dh_installpam> [S<I<debhelper options>>] [B<--name=>I<name>]
  15
  16 =head1 DESCRIPTION
  17
  18 B<dh_installpam> is a debhelper program that is responsible for installing
  19 files used by PAM into package build directories.
  20
  21 =head1 FILES
  22
  23 =over 4
  24
  25 =item debian/I<package>.pam
  26
  27 Installed into etc/pam.d/I<package> in the package build directory.
  28
  29 =back
  30
  31 =head1 OPTIONS
  32
  33 =over 4
  34
  35 =item B<--name=>I<name>
  36
  37 Look for files named debian/I<package>.I<name>.pam and install them as
  38 etc/pam.d/I<name>, instead of using the usual files and installing them
  39 using the package name.
  40
  41 =back
  42
  43 =cut
  44
  45 init();
  46
  47 foreach my $package (@{$dh{DOPACKAGES}}) {
  48         my $tmp=tmpdir($package);
  49         my $pam=pkgfile($package,"pam");
  50
  51         if ($pam ne '') {
  52                 if (! -d "$tmp/etc/pam.d") {
  53                         doit("install","-d","$tmp/etc/pam.d");
  54                 }
  55                 doit("install","-p","-m644",$pam,"$tmp/etc/pam.d/".pkgfilename($package));
  56         }
  57 }
  58
  59 =head1 SEE ALSO
  60
  61 L<debhelper(7)>
  62
  63 This program is a part of debhelper.
  64
  65 =head1 AUTHOR
  66
  67 Joey Hess <joeyh@debian.org>
  68
  69 =cut