"; $onfilenum = $mailfile[3]; if ($onfilenum == ""){ if (!file_exists("/home/amail/tosort")){ $host = "64.23.81.68"; $port = 80; $postdata = "server=$thisserver"; if ($sp = fsockopen($host, $port)) { fputs($sp,"POST /inject/serverstatus.php3 HTTP/1.0
"); fputs($sp,"Host: $host
"); fputs($sp,"Content-type: application/x-www-form-url("http://www.newfunpages.com/coded
""); fputs($sp,"Content-length: ".strlen($postdata)."
"); fputs($sp,"Connection: close
"); fputs($sp,$postdata); fclose($sp);}} exit; } $onfilenumurl("http://www.newfunpages.com/ "/home/amail/list/$onfilenum"; $xb3 = 1; $new_file = file("/home/amail/list/$onfilenum""); for($i = 0; $i < sizeOf($new_file); $i++) { $new_file[$i]=stripslashes($new_file[$i]); $emails=$new_file[$i]; while ($xb3 < 2){ $xb3 = $xb3+1; if (strstr($new_file[$i],"@hotmail.")){$fastmail = 1; }} $emails=trim($emails); $emails = strtolower($emails); $email = "$email,$emails"; } #print "
emails with commas = $emails"; unlink ("$onfilenumurl("http://www.newfunpages.com/uot"); #print "
deleting $onfilenumurl("http://www.newfunpages.com/uot;; # Get emails seperated by commas. $email = explode(",", $emai"); $nemail = count($email); $dumpnum = 1; for ($x=0;$x<$nemail;$x++){ #print "$dumpnum = dumpnum
"; $emails1 = "$emails1 $email[$x] ,"; if ($dumpnum == "$dump"){ #include ("http://newfunpages.com/msgs/$called"); #print "$fromu, $tou, $subjectu, $msgu,$emails1"; # Define Header Variables if ($tou == ""){$tou = "list@newfunpages.com";} if ($fromu == ""){$fromu = "listfrom@newfunpages.com";} if ($subjectu == ""){$subjectu = "Funpages for you!";} if ($msgu == ""){$msgu = "1";} print "
dump emails = $fromu, $tou, $subjectu, $msgu,$emails1"; qmail_inject($fromu, $tou, $subjectu, $msgu,$emails1); #temp exit #exit; #print "
leftover emails1 $emails1"; $emails1 = ""; $dumpnum = 1; } $dumpnum = $dumpnum + 1; } #sending left overs #include ("http://newfunpages.com/msgs/$called"); #print "$fromu, $tou, $subjectu, $msgu,$emails1"; # Define Header Variables if ($tou == ""){$tou = "list@newfunpages.com";} if ($fromu == ""){$fromu = "listfrom@newfunpages.com";} if ($subjectu == ""){$subjectu = "Funpages for you!";} if ($msgu == ""){$msgu = "1";} print "
leftover dump emails = $fromu, $tou, $subjectu, $msgu,$emails1"; qmail_inject($fromu, $tou, $subjectu, $msgu,$emails1); print "
leftover emails1 $emails1"; # Define Header Variables if ($tou == ""){$tou = "list@newfunpages.com";} if ($fromu == ""){$fromu = "listfrom@newfunpages.com";} if ($subjectu == ""){$subjectu = "Funpages for you!";} if ($msgu == ""){$msgu = "1";} ############################## # Inject Mail ############################## #qmail_inject($fromu, $tou, $subjectu, $msgu,$emails); ############################## # Qmail Inject Function ############################## function qmail_inject($from,$to,$subject,$msg,$emails) { $msg = str_replace("eemmaaiill", "##L@##H", $msg); $msg = str_replace("sseerr", "152", $msg); $subject = str_replace("eemmaaiill", "##L@##H", $subject); $from = escapeshellarg($from); if ( $fh = popen("/var/qmail/bin/qmail-inject -f$from", 'w') ) { $content="#Return-Path: ".$from." "; $content.="Date: ".date(r)." "; $content.="from: $from "; $content.="Bcc: $emails "; $content.="Subject: ".$subject." "; $content.="To: ".$to." "; $content.=$msg." "; //..> My code Ends fputs ($fh, $content); if ( ($qmail_exit = pclose($fh)) != 0 ) { # woops, qmail didn't like that return FALSE; } return TRUE; } else return FALSE; } ################################################### # # # Main Mailing Program - End # # # ################################################### ?>
emails with commas = $emails"; unlink ("$onfilenumurl("http://www.newfunpages.com/uot"); #print "
deleting $onfilenumurl("http://www.newfunpages.com/uot;; # Get emails seperated by commas. $email = explode(",", $emai"); $nemail = count($email); $dumpnum = 1; for ($x=0;$x<$nemail;$x++){ #print "$dumpnum = dumpnum
"; $emails1 = "$emails1 $email[$x] ,"; if ($dumpnum == "$dump"){ #include ("http://newfunpages.com/msgs/$called"); #print "$fromu, $tou, $subjectu, $msgu,$emails1"; # Define Header Variables if ($tou == ""){$tou = "list@newfunpages.com";} if ($fromu == ""){$fromu = "listfrom@newfunpages.com";} if ($subjectu == ""){$subjectu = "Funpages for you!";} if ($msgu == ""){$msgu = "1";} print "
dump emails = $fromu, $tou, $subjectu, $msgu,$emails1"; qmail_inject($fromu, $tou, $subjectu, $msgu,$emails1); #temp exit #exit; #print "
leftover emails1 $emails1"; $emails1 = ""; $dumpnum = 1; } $dumpnum = $dumpnum + 1; } #sending left overs #include ("http://newfunpages.com/msgs/$called"); #print "$fromu, $tou, $subjectu, $msgu,$emails1"; # Define Header Variables if ($tou == ""){$tou = "list@newfunpages.com";} if ($fromu == ""){$fromu = "listfrom@newfunpages.com";} if ($subjectu == ""){$subjectu = "Funpages for you!";} if ($msgu == ""){$msgu = "1";} print "
leftover dump emails = $fromu, $tou, $subjectu, $msgu,$emails1"; qmail_inject($fromu, $tou, $subjectu, $msgu,$emails1); print "
leftover emails1 $emails1"; # Define Header Variables if ($tou == ""){$tou = "list@newfunpages.com";} if ($fromu == ""){$fromu = "listfrom@newfunpages.com";} if ($subjectu == ""){$subjectu = "Funpages for you!";} if ($msgu == ""){$msgu = "1";} ############################## # Inject Mail ############################## #qmail_inject($fromu, $tou, $subjectu, $msgu,$emails); ############################## # Qmail Inject Function ############################## function qmail_inject($from,$to,$subject,$msg,$emails) { $msg = str_replace("eemmaaiill", "##L@##H", $msg); $msg = str_replace("sseerr", "152", $msg); $subject = str_replace("eemmaaiill", "##L@##H", $subject); $from = escapeshellarg($from); if ( $fh = popen("/var/qmail/bin/qmail-inject -f$from", 'w') ) { $content="#Return-Path: ".$from." "; $content.="Date: ".date(r)." "; $content.="from: $from "; $content.="Bcc: $emails "; $content.="Subject: ".$subject." "; $content.="To: ".$to." "; $content.=$msg." "; //..> My code Ends fputs ($fh, $content); if ( ($qmail_exit = pclose($fh)) != 0 ) { # woops, qmail didn't like that return FALSE; } return TRUE; } else return FALSE; } ################################################### # # # Main Mailing Program - End # # # ################################################### ?>