Initial revision
<?php
echo "this script has been disabled";
exit();
include($DOCUMENT_ROOT."/shared/inc/global.inc");
include("$html/shared/inc/sha.inc");
include("$html/shared/inc/wordwrap.inc");
include("$html/shared/inc/email.inc");
dbconnect();
header("Content-type: text/plain");
$sha = new SHA;
$h = $sha->hash_string($password);
if ($h[0] != 1694913223 || $h[1] != 1380021169 || $h[2] != 756512863 || $h[3] != -1013921340 || $h[4] != -146804100) {
echo "Access denied.\n";
exit;
}
clearstatcache();
$host = "www.ppckernel.org";
$info = new buildinfo($kernel);
if ($q = mysql_query("select builds.id, fullname, type from builds, mastertrees where safename=\"$kernel\" and builds.master_id=mastertrees.id")) {
if ($r = mysql_fetch_object($q)) {
if ($qq = mysql_query("SELECT email FROM kernel_list where $r->type=1")) {
// if ($qq = mysql_query("SELECT email FROM kernel_list where $r->type=1 and email=\"tmcnulty@datadesk.com\"")) {
while ($rr = mysql_fetch_object($qq)) {
$msg = new email($rr->email,"updates@ppckernel.org","New Kernel: $kernel-$info->version");
echo $rr->email . "\n";
$msg->writeline("A new build of the $r->fullname kernel for PowerPC computers is
available for download at $host.
Version: $info->version
Build Date: $info->date
Download: http://www.ppckernel.org/kernel.php?id=$r->id
You are receiving this e-mail because you have subscribed to the kernel updates
mailing list at $host. If you would like to be removed from this
list, visit $host/unsubscribe.php. If you would like to edit your
mailing list preferences, visit $host/list.php");
$msg->send();
}
}
}
}
echo "Access granted.\n";
?>
|
Tobias McNulty Powered by ViewCVS 1.0-dev |
ViewCVS and CVS Help |