diff options
author | Baptiste Daroussin <bapt@FreeBSD.org> | 2014-09-01 21:25:59 +0000 |
---|---|---|
committer | Baptiste Daroussin <bapt@FreeBSD.org> | 2014-09-01 21:25:59 +0000 |
commit | 8003ba152f15aa82aaadd76fcd6b669cc0cc9981 (patch) | |
tree | 7842527232644d8f0fc76639a38e9596a910d381 /mail/majordomo/files/patch-sec1 | |
parent | Convert to USES=libtool and add INSTALL_TARGET=install-strip (diff) |
Remove non staged ports without pending PR from ma*
Notes
Notes:
svn path=/head/; revision=366959
Diffstat (limited to 'mail/majordomo/files/patch-sec1')
-rw-r--r-- | mail/majordomo/files/patch-sec1 | 87 |
1 files changed, 0 insertions, 87 deletions
diff --git a/mail/majordomo/files/patch-sec1 b/mail/majordomo/files/patch-sec1 deleted file mode 100644 index d13161a1aefd..000000000000 --- a/mail/majordomo/files/patch-sec1 +++ /dev/null @@ -1,87 +0,0 @@ ---- bounce-remind Mon Jan 3 14:35:32 2000 -+++ bounce-remind.new Mon Jan 3 14:38:16 2000 -@@ -24,10 +24,23 @@ - shift(@ARGV); - shift(@ARGV); - } --if (! -r $cf) { -- die("$cf not readable; stopped"); -+ -+if (not sysopen CONFIG,$cf,O_RDONLY) -+{ -+ die sprintf qq|Unable to sysopen config file "$cf"%s.\n|,$! ? ": $!" : ''; - } --require "$cf"; -+elsif ((stat CONFIG)[4] != $>) -+{ -+ die qq|Config file "$cf" not owned by effective UID.\n|; -+} -+elsif (eval(join '',<CONFIG>),$@) -+{ -+ die qq|Unable to eval "$cf": $@.\n|; -+} -+else -+{ -+ close CONFIG; -+} - - # Go to the home directory specified by the .cf file - chdir("$homedir"); ---- config-test.orig Wed Aug 27 08:17:13 1997 -+++ config-test Wed Jan 5 01:41:37 2000 -@@ -119,10 +119,21 @@ - - $cf = $ARGV[0] || $ENV{'MAJORDOMO_CF'}; - --if (eval "require '$cf'") { -- &good("'require'd $cf okay."); --} else { -- &bad("something's wrong with $cf: $@"); -+if (not sysopen CONFIG,$cf,O_RDONLY) -+{ -+ die sprintf qq|Unable to sysopen config file "$cf"%s.\n|,$! ? ": $!" : ''; -+} -+elsif ((stat CONFIG)[4] != $>) -+{ -+ die qq|Config file "$cf" not owned by effective UID.\n|; -+} -+elsif (eval(join '',<CONFIG>),$@) -+{ -+ die qq|Unable to eval "$cf": $@.\n|; -+} -+else -+{ -+ close CONFIG; - } - - foreach (@requires) { ---- majordomo Mon Jan 3 13:37:13 2000 -+++ majordomo.new Mon Jan 3 14:15:29 2000 -@@ -40,11 +40,23 @@ - die "Unknown argument $ARGV[0]\n"; - } - } --if (! -r $cf) { -- die("$cf not readable; stopped"); --} - --require "$cf"; -+if (not sysopen CONFIG,$cf,O_RDONLY) -+{ -+ die sprintf qq|Unable to sysopen config file "$cf"%s.\n|,$! ? ": $!" : ''; -+} -+elsif ((stat CONFIG)[4] != $>) -+{ -+ die qq|Config file "$cf" not owned by effective UID.\n|; -+} -+elsif (eval(join '',<CONFIG>),$@) -+{ -+ die qq|Unable to eval "$cf": $@.\n|; -+} -+else -+{ -+ close CONFIG; -+} - - # Go to the home directory specified by the .cf file - chdir("$homedir") || die "chdir to $homedir failed, $!\n"; |