0337d704 |
1 | <?php |
2 | /*************************************************************************** |
50a40a33 |
3 | * Copyright (C) 2003-2006 Polytechnique.org * |
0337d704 |
4 | * http://opensource.polytechnique.org/ * |
5 | * * |
6 | * This program is free software; you can redistribute it and/or modify * |
7 | * it under the terms of the GNU General Public License as published by * |
8 | * the Free Software Foundation; either version 2 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 General Public License for more details. * |
15 | * * |
16 | * You should have received a copy of the GNU General Public License * |
17 | * along with this program; if not, write to the Free Software * |
18 | * Foundation, Inc., * |
19 | * 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA * |
20 | ***************************************************************************/ |
21 | |
22 | require_once 'diogenes/diogenes.hermes.inc.php'; |
23 | |
24 | // {{{ get_all_redirects |
25 | |
4370c7eb |
26 | function get_all_redirects($membres, $mls, &$client) |
0337d704 |
27 | { |
28 | global $globals; |
29 | |
30 | $tos = array(); |
31 | |
32 | if ($membres) { |
08cce2ff |
33 | $res = XDB::query( |
0337d704 |
34 | 'SELECT IF(u.nom <> "", u.nom, m.nom) AS nom, |
35 | IF(u.prenom <> "", u.prenom, m.prenom) AS prenom, |
36 | IF(m.email <> "", m.email, CONCAT(a.alias, "@polytechnique.org")) as email, |
0cc4c07d |
37 | IF(m.sexe IS NULL, FIND_IN_SET("femme", u.flags), m.sexe) AS sexe |
0337d704 |
38 | FROM groupex.membres AS m |
39 | LEFT JOIN auth_user_md5 AS u ON (m.uid=u.user_id AND m.uid<50000) |
40 | LEFT JOIN aliases AS a ON (a.id=u.user_id and a.type="a_vie") |
41 | WHERE asso_id = {?}', $globals->asso('id')); |
42 | $tos = $res->fetchAllAssoc(); |
43 | } |
44 | |
45 | foreach ($mls as $ml) { |
46 | if (list(,$members) = $client->get_members($ml)) { |
47 | foreach ($members as $mem) { |
575dd9be |
48 | list($m, $dom) = explode('@',$mem[1]); |
0337d704 |
49 | if ($dom == $globals->mail->domain || $dom == $globals->mail->domain2) { |
08cce2ff |
50 | $res = XDB::query('SELECT prenom, nom, FIND_IN_SET("femme", u.flags) AS sexe |
8cc026af |
51 | FROM auth_user_md5 AS u |
52 | INNER JOIN aliases AS a ON u.user_id = a.id |
53 | WHERE a.alias = {?}', $m); |
0337d704 |
54 | if ($person = $res->fetchOneAssoc()) { |
55 | $person['email'] = $mem[1]; |
56 | $tos[] = $person; |
57 | } |
58 | } else { |
0cc4c07d |
59 | $res = XDB::query('SELECT prenom, nom, sexe FROM groupex.membres WHERE email={?}', $mem[1]); |
0337d704 |
60 | if ($person = $res->fetchOneAssoc()) { |
61 | $person['email'] = $mem[1]; |
62 | $tos[] = $person; |
63 | } else { |
64 | $tos[] = array('email' => $mem[1]); |
65 | } |
66 | } |
67 | } |
68 | } |
69 | } |
70 | |
71 | return $tos; |
72 | } |
73 | |
74 | // }}} |
75 | // {{{ _send_xnet_mail |
76 | |
9898b36e |
77 | function _send_xnet_mail($user, $body, $mailer, $replyto = null) |
0337d704 |
78 | { |
79 | $cher = isset($user['sexe']) ? ($user['sexe'] ? 'Chère' : 'Cher') : 'Cher(e)'; |
80 | $nom = isset($user['nom']) ? $user['nom'] : ""; |
81 | $pnom = isset($user['prenom']) ? $user['prenom'] : preg_replace('!@.*!', '', $user['email']); |
82 | $to = isset($user['prenom']) ? "\"{$user['prenom']} {$user['nom']}\" <{$user['email']}>" : $user['email']; |
83 | |
84 | $text = $body; |
85 | $text = preg_replace('!<cher>!i', $cher, $text); |
86 | $text = preg_replace('!<nom>!i', $nom, $text); |
87 | $text = preg_replace('!<prenom>!i', $pnom, $text); |
88 | |
89 | $mailer->addHeader('To', $to); |
9898b36e |
90 | if ($replyto) { |
91 | $mailer->addHeader('Reply-To', $replyto); |
92 | } |
0337d704 |
93 | $mailer->setTxtBody(wordwrap($text, 72)); |
94 | $mailer->send(); |
95 | } |
96 | |
97 | // }}} |
98 | // {{{ send_xnet_mails |
99 | |
9898b36e |
100 | function send_xnet_mails($from, $sujet, $body, $tos, $replyto = null) |
0337d704 |
101 | { |
bdccfd95 |
102 | global $globals; |
0337d704 |
103 | $sent = array(); |
104 | |
105 | $mailer = new HermesMailer(); |
106 | $mailer->setSubject($sujet); |
107 | $mailer->setFrom($from); |
bdccfd95 |
108 | $mailer->addHeader('X-Xorg-Login', S::v('bestalias') . '@' . $globals->mail->domain); |
0337d704 |
109 | |
110 | foreach ($tos as $user) { |
111 | if ($sent[$user['email']]) continue; |
9898b36e |
112 | _send_xnet_mail($user, $body, $mailer, $replyto); |
0337d704 |
113 | $sent[$user['email']] = true; |
114 | } |
115 | } |
116 | |
117 | // }}} |
118 | |
119 | // vim:set et sw=4 sts=4 sws=4 foldmethod=marker: |
120 | ?> |