From cce5e7710295021b41d9aaecc503a60fb99256be Mon Sep 17 00:00:00 2001
From: deva <deva>
Date: Sat, 4 Oct 2008 10:38:03 +0000
Subject: Initial revision

---
 utils/pressrelease.php | 165 +++++++++++++++++++++++++++++++++++++++++++++++++
 1 file changed, 165 insertions(+)
 create mode 100644 utils/pressrelease.php

(limited to 'utils/pressrelease.php')

diff --git a/utils/pressrelease.php b/utils/pressrelease.php
new file mode 100644
index 0000000..3ae25b4
--- /dev/null
+++ b/utils/pressrelease.php
@@ -0,0 +1,165 @@
+<?php
+/**
+<?xml version="1.0" encoding="UTF-8"?>
+<mailinglist>
+  <email name="HeavyMetal.dk" url="http://www.heavymetal.dk/" email="info@heavymetal.dk"/>
+  <email name="Blabbermouth.net" url="http://www.blabbermouth.net" email="bmouth@bellatlantic.net"/>
+  <email name="Power Metal.dk" url="http://www.powermetal.dk/" email="kenn@powermetal.dk"/>
+  <email name="Revolution Music" url="http://www.revolution-music.dk" email="heavybear@revolution-music.dk "/>
+  <email name="Antenna" url="http://www.antenna.nu"  email="lolk@antenna.nu"/>
+  <email name="Supreme Brutality" url="http://www.supremebrutality.net" email="contact@supremebrutality.net"/>
+  <email name="Vampire Magazine" url="http://www.vampire-magazine.com" email="Ricardo@vampire-magazine.com"/>
+  <email name="Danish Metal" url="http://www.danishmetal.dk"  email="martin@danishmetal.dk"/>
+  <email name="Revelationz" url="http://www.revelationz.net"  email="mail@revelationz.net"/>
+</mailinglist>
+ **/
+
+
+/**
+ * CONFIG
+ */
+$subject_prefix = "DIE Pressrelease";
+$sender = "DIE <info@executionroom.com>";
+$replyto = $sender;
+$footer = "
+
+Stay Brutal!
+// DIE
+http://www.executionroom.com
+info@executionroom.com
+";
+
+class Email {
+	public $name;
+	public $url;
+	public $email;
+
+	public function Email($name, $url, $email)
+	{
+		$this->name = $name;
+		$this->url = $url;
+		$this->email = $email;
+	}
+
+	function send($subject, $message) {
+		global $subject_prefix;
+		global $sender;
+		global $replyto;
+		global $footer;
+
+		$message .= $footer;
+		$headers = "From: " . $sender . "\r\n";
+		$headers .= "Reply-To: " . $replyto . "\r\n";
+		$headers .= "Content-Type: text/plain; charset=iso-8859-1\r\n";
+		$headers .= "X-Mailer: PHP/" . phpversion();
+		$subject = "[".$subject_prefix."] " . $subject;
+		
+		$ret = mail($this->email, $subject, $message, $headers);
+		if(!$ret) echo "Fail(".$this->email.")";
+ 
+		//usleep(100000);
+	}
+}
+
+class PressRelease {
+	private $file;
+	private $mailinglist = array();
+
+	public function add($email) {
+		$key = $email->email;
+		$this->mailinglist[$key] = $email;
+	}
+	
+	public function remove($email) {
+		if(array_key_exists($email, $this->mailinglist)) {
+			unset($this->mailinglist[$email]);
+		}
+	}
+
+	public function write()
+	{
+	  /*
+		$fp = fopen($this->file, "w");
+		fwrite($fp, "<?xml version=\"1.0\" encoding=\"UTF-8\"?>\n");
+
+		fwrite($fp, "<mailinglist>\n");
+		foreach($this->mailinglist as $email) {
+			fwrite($fp, "  <email email=\"" .
+						 htmlspecialchars($email->email, ENT_QUOTES, "UTF-8") . "\"\n");
+			fwrite($fp, "         timestamp=\"" . $email->timestamp . "\">\n");
+			fwrite($fp, "  </email>\n");
+		}
+		fwrite($fp, "</mailinglist>\n");
+
+		fclose($fp);
+	  */
+	}
+	
+	private function read()
+	{
+		$dom = new DomDocument;
+		$dom->preserveWhiteSpace = FALSE;
+		$dom->load($this->file);
+		$params = $dom->getElementsByTagName('email');
+
+		foreach ($params as $param) {
+			$email = new Email($param->getAttribute('name'),
+					   $param->getAttribute('url'),
+					   $param->getAttribute('email'));
+			$this->add($email);
+		}
+	}
+  /*
+	public function subscribe($email)
+	{
+		$email = new EMail($email, time());
+		$this->add($email);
+		$this->write();
+	}
+ 
+	public function unsubscribe($email)
+	{
+		$this->remove($email);
+		$this->write();
+	}
+  */
+	public function post($subject, $message)
+	{
+		$sz = sizeof($this->mailinglist);
+
+		echo "<div style=\"text-align: center; padding-top: 120px; padding-bottom: 100px; position: absolute; top: 25%; left: 0px; width: 99.4%; height: 150px; border: solid #0000ff 3px; background: #fff; color: #000;\">Sending ". $sz ." mails <br/>\n&lt;";
+		ob_flush();
+		flush();
+
+		$num = 0;
+		$lvl = 0;
+		$steps = floor($sz / 10) + 1;
+
+		foreach($this->mailinglist as $email) {
+			$email->send($subject, $message);
+			$pct = $num / $sz * 100;
+			if($pct >= $lvl) {
+				printf("<font style=\"font-size: 9px;\">%.0f%%</font>", $lvl);
+				$lvl += 100/$steps;
+			} else {
+				echo ".";
+			}
+			ob_flush();
+			flush();
+			$num++;
+		}
+		echo "<font style=\"font-size: 9px;\">[100%]</font>&gt;\n<br/>done<br/>\n";
+		echo "<a style=\"font-size: 20px; font-weight: bold;\" href=\"?page=admin&amp;module=pressrelease\">[CLOSE]</a>";
+		echo "</div>\n";
+		ob_flush();
+		flush();
+	}
+
+	public function PressRelease($file)
+	{
+		$this->file =  $file;
+		$this->read();
+	}
+}
+
+?>
\ No newline at end of file
-- 
cgit v1.2.3