]> git.mxchange.org Git - quix0rs-gnu-social.git/blob - lib/mail.php
twiddle some parens in imsettings for gettext
[quix0rs-gnu-social.git] / lib / mail.php
1 <?php
2 /*
3  * Laconica - a distributed open-source microblogging tool
4  * Copyright (C) 2008, Controlez-Vous, Inc.
5  *
6  * This program is free software: you can redistribute it and/or modify
7  * it under the terms of the GNU Affero General Public License as published by
8  * the Free Software Foundation, either version 3 of the License, or
9  * (at your option) any later version.
10  *
11  * This program is distributed in the hope that it will be useful,
12  * but WITHOUT ANY WARRANTY; without even the implied warranty of
13  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
14  * GNU Affero General Public License for more details.
15  *
16  * You should have received a copy of the GNU Affero General Public License
17  * along with this program.  If not, see <http://www.gnu.org/licenses/>.
18  */
19
20 if (!defined('LACONICA')) { exit(1); }
21
22 require_once('Mail.php');
23
24 function mail_backend() {
25         static $backend = NULL;
26
27         if (!$backend) {
28                 global $config;
29                 $backend = Mail::factory($config['mail']['backend'],
30                                                                  ($config['mail']['params']) ? $config['mail']['params'] : array());
31                 if (PEAR::isError($backend)) {
32                         common_server_error($backend->getMessage(), 500);
33                 }
34         }
35         return $backend;
36 }
37
38 # XXX: use Mail_Queue... maybe
39
40 function mail_send($recipients, $headers, $body) {
41         $backend = mail_backend();
42         assert($backend); # throws an error if it's bad
43         $sent = $backend->send($recipients, $headers, $body);
44         if (PEAR::isError($sent)) {
45                 common_log(LOG_ERROR, 'Email error: ' . $sent->getMessage());
46                 return false;
47         }
48         return true;
49 }
50
51 function mail_notify_from() {
52         global $config;
53         if ($config['mail']['notifyfrom']) {
54                 return $config['mail']['notifyfrom'];
55         } else {
56                 return $config['site']['name'] . ' <noreply@'.$config['site']['server'].'>';
57         }
58 }
59
60 function mail_to_user(&$user, $subject, $body, $address=NULL) {
61         if (!$address) {
62                 $address = $user->email;
63         }
64
65         $recipients = $address;
66         $profile = $user->getProfile();
67
68         $headers['From'] = mail_notify_from();
69         $headers['To'] = $profile->getBestName() . ' <' . $address . '>';
70         $headers['Subject'] = $subject;
71
72         return mail_send($recipients, $headers, $body);
73 }
74
75 # For confirming a Jabber address
76 # XXX: change to use mail_to_user() above
77
78 function mail_confirm_address($code, $nickname, $address) {
79         $recipients = $address;
80         $headers['From'] = mail_notify_from();
81         $headers['To'] = $nickname . ' <' . $address . '>';
82         $headers['Subject'] = _('Email address confirmation');
83
84         $body = "Hey, $nickname.";
85         $body .= "\n\n";
86         $body .= 'Someone just entered this email address on ' . common_config('site', 'name') . '.';
87         $body .= "\n\n";
88         $body .= 'If it was you, and you want to confirm your entry, use the URL below:';
89         $body .= "\n\n";
90         $body .= "\t".common_local_url('confirmaddress',
91                                                                    array('code' => $code));
92         $body .= "\n\n";
93         $body .= 'If not, just ignore this message.';
94         $body .= "\n\n";
95         $body .= 'Thanks for your time, ';
96         $body .= "\n";
97         $body .= common_config('site', 'name');
98         $body .= "\n";
99
100         mail_send($recipients, $headers, $body);
101 }