<?
// Paypal hits this page once a donation has gone through.
// This may appear to be light on the input validation, but the vast majority of that is handled through paypal confirmation
// $_POST['txn_id'] centains the unique identifier if anyone ever needs it
if(!is_number($_POST['custom'])) { die(); } //Seems too stupid a mistake to bother banning

// Create request to return to paypal
$Request = 'cmd=_notify-validate';
foreach ($_POST as $Key => $Value) {
	$Value = urlencode(stripslashes($Value));
	$Request .= "&$Key=$Value";
}

// Headers
$Headers = "POST /cgi-bin/webscr HTTP/1.1\r\n";
$Headers .= "Host: www.paypal.com\r\n";
$Headers .= "Content-Type: application/x-www-form-urlencoded\r\n";
$Headers .= "Content-Length: ".strlen($Request)."\r\n";
$Headers .= "Connection: close\r\n\r\n";

// Socket
$Socket = fsockopen ('www.paypal.com', 80, $errno, $errstr, 30);

// Send and process reply
fwrite ($Socket, $Headers.$Request);
$Result = '';
while (!feof($Socket)) {
	$Result .= fgets ($Socket, 1024);
}

if (strpos($Result,'VERIFIED') !== false || check_perms('site_debug')) {
	if ($_POST['mc_gross'] >= PAYPAL_MINIMUM) {
		if ($_POST['mc_currency'] == PAYPAL_CURRENCY) {
			if ($_POST['business'] == PAYPAL_ADDRESS) {
				if (($_POST['payment_status'] == "Completed") || ($_POST['payment_status'] == "Pending")) {
					$DB->query('SELECT Donor FROM users_info WHERE UserID=\''.$_POST['custom'].'\'');
					list($Donor) = $DB->next_record();
					if($Donor == 0){
						//First time donor
						$DB->query('UPDATE users_main SET Invites = Invites + \''.DONOR_INVITES.'\' WHERE ID=\''.$_POST['custom'].'\'');
						$DB->query('UPDATE users_info SET Donor = \'1\' WHERE UserID=\''.$_POST['custom'].'\'');
						$DB->query('SELECT Invites FROM users_main WHERE ID=\''.$_POST['custom'].'\'');
						list($Invites) = $DB->next_record();
						$Cache->begin_transaction('user_info_'.$_POST['custom']);
						$Cache->update_row(false, array('Donor' => 1));
						$Cache->commit_transaction(0);
						$Cache->begin_transaction('user_info_heavy_'.$_POST['custom']);
						$Cache->update_row(false, array('Invites' => $Invites));
						$Cache->commit_transaction(0);
						Misc::send_pm($_POST['custom'],0,db_string('Thank you for your donation'),db_string('Your donation from '.$_POST['payer_email'].' of '.$_POST['mc_gross'].' '.PAYPAL_CURRENCY.' has been successfully processed. Because this is your first time donating, you have now been awarded Donor status as represented by the <3 found on your profile and next to your username where it appears. This has entitled you to a additional site features which you can now explore, and has granted you '.DONOR_INVITES.' invitations to share with others. Thank you for supporting '.SITE_NAME.'.'),'');
					} else {
						//Repeat donor
						Misc::send_pm($_POST['custom'],0,db_string('Thank you for your donation'),db_string('Your donation from '.$_POST['payer_email'].' of '.$_POST['mc_gross'].' '.PAYPAL_CURRENCY.' has been successfully processed. Your continued support is highly appreciated and helps to make this place possible.'),'');
					}
					
					
				}
			}
		}
	} else {
		if ($_POST['mc_gross'] > 0) {
			//Donation less than minimum
			Misc::send_pm($_POST['custom'],0,db_string('Thank you for your donation'),db_string('Your donation from '.$_POST['payer_email'].' of '.$_POST['mc_gross'].' '.PAYPAL_CURRENCY.' has been successfully processed. Unfortunately however this donation was less than the specified minimum donation of '.PAYPAL_MINIMUM.' '.PAYPAL_CURRENCY.' and while we are grateful, no special privileges have been awarded to you.'),'');
		} else {
			//Failed pending donation
			$Message = "User http://".NONSSL_SITE_URL."/user.php?id=".$_POST['custom']." had donation of ".$TotalDonated." ".PAYPAL_CURRENCY." at ".$DonationTime." UTC from ".$_POST['payer_email']." returned.";
			$DB->query('SELECT SUM(Amount), MIN(Time) FROM donations WHERE UserID=\''.$_POST['custom'].'\';');
			list($TotalDonated,$DonationTime) = $DB->next_record();
			if ($TotalDonated+$_POST['mc_gross'] == 0) {
				$DB->query("SELECT Invites FROM users_main WHERE ID='".$_POST['custom']."'");
				list($Invites) = $DB->next_record();
				if(($Invites - DONOR_INVITES) >= 0) {
					$NewInvites = $Invites - DONOR_INVITES;
				} else {
					$NewInvites = 0;
					$Message .= " They had already used at least one of their donation gained invites.";
				}
				$DB->query("UPDATE users_main SET Invites = ".$NewInvites." WHERE ID='".$_POST['custom']."'");
				$DB->query('UPDATE users_info SET Donor = \'0\' WHERE UserID=\''.$_POST['custom'].'\'');
				$Cache->begin_transaction('user_info_'.$_POST['custom']);
				$Cache->update_row(false, array('Donor' => 0));
				$Cache->commit_transaction(0);
				$Cache->begin_transaction('user_info_heavy_'.$_POST['custom']);
				$Cache->update_row(false, array('Invites' => $Invites));
				$Cache->commit_transaction(0);
				Misc::send_pm($_POST['custom'],0,db_string('Notice of donation failure'),db_string('PapPal has just notified us that the donation you sent from '.$_POST['payer_email'].' of '.$TotalDonated.' '.PAYPAL_CURRENCY.' at '.$DonationTime.' UTC has been revoked. Because of this your special privileges have been revoked, and your invites removed.'),'');
				
				
				send_irc("PRIVMSG ".BOT_REPORT_CHAN." :".$Message);
			}
		}
	}
	$DB->query("UPDATE users_info 
		SET 
		AdminComment=CONCAT('".sqltime()." - User donated ".db_string($_POST['mc_gross'])." ".db_string(PAYPAL_CURRENCY)." from ".db_string($_POST['payer_email']).".\n',AdminComment)
		WHERE UserID='".$_POST['custom']."'");
	$DB->query("INSERT INTO donations
	(UserID, Amount, Email, Time)	VALUES
	('".$_POST['custom']."', '".db_string($_POST['mc_gross'])."', '".db_string($_POST['payer_email'])."', '".sqltime()."')");
} else {
	$DB->query("INSERT INTO ip_bans
	(FromIP, ToIP, Reason) VALUES
	('".Tools::ip_to_unsigned($_SERVER['REMOTE_ADDR'])."','".ip2long($_SERVER['REMOTE_ADDR'])."', 'Attempted to exploit donation system.')");
}
fclose ($Socket);
if (check_perms('site_debug')) {
	include(SERVER_ROOT.'/sections/donate/donate.php');
}
$Cache->cache_value('debug_donate',array($Result,$_POST),0);
?>