email notification on new subscriptions

darcs-hash:20080615030202-84dde-ebed7919c227ce280dc818f301e15001eb8b5926.gz

2 files changed, 63 insertions, 1 deletions

diff --git a/lib/common.php b/lib/common.php
index 8050476e7..34c024ece 100644
--- a/lib/common.php
+++ b/lib/common.php
@@ -51,7 +51,11 @@ $config =
 		'license' =>
 		array('url' => 'http://creativecommons.org/licenses/by/3.0/',
 			  'title' => 'Creative Commons Attribution 3.0',
-			  'image' => 'http://i.creativecommons.org/l/by/3.0/88x31.png'));
+			  'image' => 'http://i.creativecommons.org/l/by/3.0/88x31.png'),
+		'mail' =>
+		array('backend' => 'mail',
+			  'params' => NULL)
+		);
 
 $config['db'] = &PEAR::getStaticProperty('DB_DataObject','options');
 
@@ -68,6 +72,7 @@ require_once(INSTALLDIR.'/config.php');
 require_once(INSTALLDIR.'/lib/util.php');
 require_once(INSTALLDIR.'/lib/action.php');
 require_once(INSTALLDIR.'/lib/theme.php');
+require_once(INSTALLDIR.'/lib/mail.php');
 
 require_once(INSTALLDIR.'/classes/Avatar.php');
 require_once(INSTALLDIR.'/classes/Notice.php');
diff --git a/lib/mail.php b/lib/mail.php
new file mode 100644
index 000000000..6656964ab
--- /dev/null
+++ b/lib/mail.php
@@ -0,0 +1,57 @@
+<?php
+/*
+ * Laconica - a distributed open-source microblogging tool
+ * Copyright (C) 2008, Controlez-Vous, Inc.
+ *
+ * This program is free software: you can redistribute it and/or modify
+ * it under the terms of the GNU Affero General Public License as published by
+ * the Free Software Foundation, either version 3 of the License, or
+ * (at your option) any later version.
+ *
+ * This program is distributed in the hope that it will be useful,
+ * but WITHOUT ANY WARRANTY; without even the implied warranty of
+ * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+ * GNU Affero General Public License for more details.
+ *
+ * You should have received a copy of the GNU Affero General Public License
+ * along with this program.  If not, see <http://www.gnu.org/licenses/>.
+ */
+
+if (!defined('LACONICA')) { exit(1); }
+
+require_once('Mail.php');
+
+function mail_backend() {
+	static $backend = NULL; 
+	
+	if (!$backend) {
+		global $config;
+		$backend = Mail::factory($config['mail']['backend'],
+								 ($config['mail']['params']) ? $config['mail']['params'] : array());
+		if (PEAR::isError($backend)) {
+			common_server_error($backend->getMessage(), 500);
+		}
+	}
+	return $backend;
+}
+
+# XXX: use Mail_Queue... maybe
+
+function mail_send($recipients, $headers, $body) {
+	$backend = mail_backend();
+	assert($backend); # throws an error if it's bad
+	$sent = $backend->send($recipients, $headers, $body);
+	if (PEAR::isError($sent)) {
+		common_server_error($sent->getMessage(), 500);
+	}
+}
+
+function mail_notify_from() {
+	global $config;
+	if ($config['mail']['notifyfrom']) {
+		return $config['mail']['notifyfrom'];
+	} else {
+		return 'Do Not Reply <nobody@'.$config['site']['server'].'>';
+	}
+}
+ 
\ No newline at end of file