1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
|
#!/usr/bin/perl -w
=head1 NAME
dh_clifixperms - fix permissions of files in CLI package build directories
=cut
use strict;
use Debian::Debhelper::Dh_Lib;
=head1 SYNOPSIS
B<dh_clifixperms> [S<I<debhelper options>>] [B<-X>I<item>]
=head1 DESCRIPTION
dh_clifixperms is a debhelper program that is responsible for setting
the permissions of files and directories for CLI assemblies and
executables.
dh_clifixperms makes all files that end in *.dll, *.mdb, *.cs,
*.aspx, and *.config to mode 644 and *.exe to mode 755.
=head1 OPTIONS
=over 4
=item B<-X>I<item>, B<--exclude> I<item>
Exclude files that contain "item" anywhere in their filename from having
their permissions changed. You may use this option multiple times to build
up a list of things to exclude.
=back
=cut
init();
foreach my $package (@{$dh{DOPACKAGES}}) {
my $tmp=tmpdir($package);
my $find_options='';
if (defined($dh{EXCLUDE_FIND}) && $dh{EXCLUDE_FIND} ne '') {
$find_options="! \\( $dh{EXCLUDE_FIND} \\)";
}
# Fix the permissions of various CLI-based files
for my $ext (qw(dll mdb cs config aspx))
{
complex_doit("find $tmp $find_options -name \"*.$ext\" -type f -print0",
"2>/dev/null | xargs -0r chmod 0644");
}
complex_doit("find $tmp $find_options -name \"*.exe\" -type f -print0",
"2>/dev/null | xargs -0r chmod 0755");
}
=head1 SEE ALSO
L<debhelper(7)>
This program is a part of cli-common.
=head1 AUTHOR
Dylan R. E. Moonfire <debian@mfgames.com> based on work from Joey Hess
<joeyh@debian.org>.
=cut
|
