<?php

// Initialize variables
$from = "";
$to = "";
$cc = "";
$bcc = "";
$subject = "";
$allheaders = "";
$otherheaders = "";
$message = "";
$splittingheaders = true;


// Get the email from stdin
$fd = fopen("php://stdin", "r");
$email = "";
while (!feof($fd)) {
    $email .= fread($fd, 1024);
}
fclose($fd);

// Parse the email line by line into an array 
$lines = explode("\n", $email);

// For each of the lines in the email
for ($i=0; $i<count($lines); $i++) {
	// If we are separating the headers out from the message body
    if ($splittingheaders) {
		$allheaders .= $lines[$i]."\n";
		
        // Look out for special headers
        if (preg_match("/^subject: (.*)/i", $lines[$i], $matches)) {
            $subject = $matches[1];
        }
        elseif (preg_match("/^from: (.*)/i", $lines[$i], $matches)) {
            $from = $matches[1];
			$fromEmail = ereg("([[:alnum:]_\.\-]+@([[:alnum:]_\.\-]+\.)+[[:alpha:]]{2,4})", $from, $emailMatch);
			$fromEmail = $emailMatch[1];
        }
        elseif (preg_match("/^to: (.*)/i", $lines[$i], $matches)) {
            $to = $matches[1];
        }
        elseif (preg_match("/^cc: (.*)/i", $lines[$i], $matches)) {
            $cc = $matches[1];
        }
        elseif (preg_match("/^bcc: (.*)/i", $lines[$i], $matches)) {
            $bcc = $matches[1];
        }
		else {
			$otherheaders .= $lines[$i]."\n";
		}
    }
	else{	// Add this line to the message body
        $message .= $lines[$i]."\n";
    }

	// If the line is blank
    if (trim($lines[$i])=="") {
        // The header section has ended
        $splittingheaders = false;
    }
}


// Read in the list of recent emails from the filesystem
$recentMatches = 0;
$fd = fopen("/path/to/RecentList.txt", "r");
while (!feof($fd)) {
    $recentList .= fread($fd, 1024);
}
fclose($fd);

$lines = explode("\n", $recentList);
for ($i=0; $i<count($lines); $i++) {
	$items = explode("^", $lines[$i]);
	$itemFrom = $items[0];
	$itemDate = strtotime($items[1]);
	if($itemFrom == $fromEmail) {
		$recentMatches++;
	}
}

// Add this email to the list and save the list to the filesystem
$fd = fopen("/path/to/recentList.txt", "w");
for ($i=0; $i < count($lines); $i++) {
	if($i > 0 || count($lines) < 10)
		fwrite($fd, $lines[$i] . "\n");
}
fwrite($fd, $fromEmail . "^" . $date);
fclose($fd);

// If the user isn't from our domain and hasn't sent too many recent emails
if($recentMatches < 8 && !strpos($from, '@yourdomain.com'))  {
     // Then send an autoresponse back to the user
     mail("$from", "Responding subject", "", "From: Responder Name <responder@yourdomain.com>");
}

// If the user isn't from our domain and hasn't sent too many recent emails
if($recentMatches < 8 && !strpos($from, '@yourdomain.com')) {
	// Forward the email
	mail("First Last <email@yourdomain.com>", "$subject", "$message", "From: $from\n");
	mail("First Last <email2@yourdomain.com>", "$subject", "$message", "From: $from\n");
}

?>erus"