Bommels05/Mozilla
Bommels05/Mozilla
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

Bug 162438 - fix permissions/tests for Bugzilla/ directory

Browse Source 
r=joel x2


git-svn-id: svn://10.0.0.236/trunk@127230 18797224-902f-48f8-a5cc-f745e15eee43
This commit is contained in:
bbaetz%student.usyd.edu.au 2002-08-14 00:59:47 +00:00
parent 5c3806fde7
commit b19b95beef
2 changed files with 15 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

13
mozilla/webtools/bugzilla/checksetup.pl
View File

@ -773,6 +773,17 @@ END
close HTACCESS;
chmod $fileperm, ".htaccess";
}
if (!-e "Bugzilla/.htaccess") {
print "Creating Bugzilla/.htaccess...\n";
open HTACCESS, ">Bugzilla/.htaccess";
print HTACCESS <<'END';
# nothing in this directory is retrievable unless overriden by an .htaccess
# in a subdirectory
deny from all
END
close HTACCESS;
chmod $fileperm, "Bugzilla/.htaccess";
}
if (!-e "data/.htaccess") {
print "Creating data/.htaccess...\n";
open HTACCESS, ">data/.htaccess";
@ -1102,6 +1113,7 @@ if ($my_webservergroup) {
fixPerms('data/webdot/.htaccess', $<, $webservergid, 027);
fixPerms('data/params', $<, $webservergid, 017);
fixPerms('*', $<, $webservergid, 027);
fixPerms('Bugzilla', $<, $webservergid, 027, 1);
fixPerms('template', $<, $webservergid, 027, 1);
fixPerms('css', $<, $webservergid, 027, 1);
chmod 0644, 'globals.pl';
@ -1126,6 +1138,7 @@ if ($my_webservergroup) {
fixPerms('data/webdot/.htaccess', $<, $gid, 022);
fixPerms('data/params', $<, $gid, 011);
fixPerms('*', $<, $gid, 022);
fixPerms('Bugzilla', $<, $gid, 022, 1);
fixPerms('template', $<, $gid, 022, 1);
fixPerms('css', $<, $gid, 022, 1);

3
mozilla/webtools/bugzilla/t/Support/Files.pm
View File

@ -37,8 +37,9 @@ package Support::Files;
@additional_files = ('syncshadowdb','processmail');
@exclude_files = ('importxml.pl');
# XXX - this file should be rewritten to use File::Find or similar
$file = '*';
@files = glob($file);
@files = (glob($file), glob('Bugzilla/*.pm'));
sub isTestingFile {
my ($file) = @_;