version 1.13, 2003/02/03 18:03:51
|
version 1.14, 2003/05/27 13:16:44
|
Line 76 else # It exists, so look at the file me
|
Line 76 else # It exists, so look at the file me
|
|
|
if ($uid ne $web_uid) # If file owned by someone else other than www. |
if ($uid ne $web_uid) # If file owned by someone else other than www. |
{ |
{ |
print('**** ERROR **** <TARGET /> should be owned by'. |
print('**** WARNING **** <TARGET /> should be owned by'. |
' www.'."\n".'Try these commands to make things right:'."\n". |
' www.'."\n".'Try these commands to make things right:'."\n". |
'chown www:www <TARGET />'."\n". |
'chown www:www <TARGET />'."\n". |
'chmod a-rwx,u+rwx <TARGET />'."\n"); |
'chmod a-rwx,u+rwx <TARGET />'."\n"); |
Line 87 else # It exists, so look at the file me
|
Line 87 else # It exists, so look at the file me
|
my $wflag = $1; |
my $wflag = $1; |
if ($wflag != 7) # Can www use this socket? (Hope so!) |
if ($wflag != 7) # Can www use this socket? (Hope so!) |
{ |
{ |
print('**** ERROR **** '. |
print('**** WARNING **** '. |
'<TARGET /> should be user "rwx" (by'. |
'<TARGET /> should be user "rwx" (by'. |
' www).'."\n".'Try these commands to make things right:'."\n". |
' www).'."\n".'Try these commands to make things right:'."\n". |
'chown www:www <TARGET />'."\n". |
'chown www:www <TARGET />'."\n". |
Line 97 else # It exists, so look at the file me
|
Line 97 else # It exists, so look at the file me
|
$wflag=$1; |
$wflag=$1; |
if ($wflag ne "00") # Can others use this socket? (Hope not!) |
if ($wflag ne "00") # Can others use this socket? (Hope not!) |
{ |
{ |
print('**** ERROR **** '. |
print('**** WARNING **** '. |
'<TARGET /> should not be group or everybody accessible'. |
'<TARGET /> should not be group or everybody accessible'. |
'.'."\n".'Try these commands to make things right:'."\n". |
'.'."\n".'Try these commands to make things right:'."\n". |
'chown www:www <TARGET />'."\n". |
'chown www:www <TARGET />'."\n". |