Fixes vim mode line.

[platal.git] / modules / xnetgrp / mail.inc.php

<?php
/***************************************************************************
 *  Copyright (C) 2003-2014 Polytechnique.org                              *
 *  http://opensource.polytechnique.org/                                   *
 *                                                                         *
 *  This program is free software; you can redistribute it and/or modify   *
 *  it under the terms of the GNU General Public License as published by   *
 *  the Free Software Foundation; either version 2 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 General Public License for more details.                           *
 *                                                                         *
 *  You should have received a copy of the GNU General Public License      *
 *  along with this program; if not, write to the Free Software            *
 *  Foundation, Inc.,                                                      *
 *  59 Temple Place, Suite 330, Boston, MA  02111-1307  USA                *
 ***************************************************************************/

// {{{ get_all_redirects

function get_all_redirects($membres, $mls, $client)
{
    global $globals;

    $tos = array();

    // TODO: add more filters to choose users
    if (!empty($membres)) {
        $uf = new UserFilter(new UFC_Group($globals->asso('id')));
        $tos = $uf->getUsers();
    }

    foreach ($mls as $ml) {
        // $list_members is a (list_details, members, list_owners) array, where
        // members is an array of (0 => name, 1 => email) arrays.
        $list_members = $client->get_members($ml);
        if ($list_members) {
            foreach ($list_members[1] as $mem) {
                $uf = new UserFilter(new UFC_Email($mem[1]));
                $user = $uf->getUser();
                if ($user) {
                    $tos[] = $user;
                } else {
                    $tos[] = $mem[1];
                }
            }
        }
    }

    return $tos;
}

// }}}
// {{{ _send_xnet_mail

function _send_xnet_mail($user, $body, $wiki, $mailer, $replyto = null)
{
    if ($user instanceof PlUser) {
        $dear      = $user->isFemale() ? 'Chère' : 'Cher';
        $lastname  = $user->lastName();
        $firstname = $user->firstName();
    } else {
        $dear      = 'Cher(e)';
        $lastname  = '';
        $firstname = $user;
    }

    global $globals;
    $grp_name = $globals->asso('nom');
    $grp_short = $globals->asso('diminutif');

    $text = str_ireplace(array('<cher>', '<nom>', '<prenom>'),
                         array($dear, $lastname, $firstname), $body);
    if ($wiki) {
        $text .= (
            "\n" .
            "---- \n" .
            "Message envoyé pour le groupe [[http://www.polytechnique.net/${grp_short}|${grp_name}]] via les outils de Polytechnique.org \\\\\n" .
            "[[http://www.polytechnique.net/${grp_short}/annuaire|Annuaire]] | [[http://www.polytechnique.net/${grp_short}/unsubscribe|Se désinscrire]]"
        );
    } else {
        $text .= (
            "\n" .
            "---- \n" .
            "Message envoyé pour le groupe ${grp_name} via les outils de Polytechnique.org\n" .
            "Annuaire : http://www.polytechnique.net/${grp_short}/annuaire | Désinscription : http://www.polytechnique.net/${grp_short}/unsubscribe"
        );
    }

    $mailer->setTo($user);
    if ($replyto) {
        $mailer->addHeader('Reply-To', $replyto);
    }
    if ($wiki) {
        $mailer->setWikiBody($text);
    } else {
        $mailer->setTxtBody(wordwrap($text, 72));
    }
    $mailer->send();
}

// }}}
// {{{ send_xnet_mails

function send_xnet_mails($from, $sujet, $body, $wiki, $tos, $replyto = null, $upload = null, $name = null)
{
    global $globals;
    $sent = array();

    $mailer = new PlMailer();
    $mailer->setSubject($sujet);
    $mailer->setFrom($from);
    if ($upload && $upload->exists()) {
        $mailer->addUploadAttachment($upload, $name);
    }

    foreach ($tos as $user) {
        if ($user instanceof User) {
            $email = $user->bestEmail();
        } else {
            $email = $user;
        }

        if (!isset($sent[$email])) {
            _send_xnet_mail($user, $body, $wiki, $mailer, $replyto);
            $sent[$email] = true;
        }
    }
}

// }}}

// vim:set et sw=4 sts=4 sws=4 foldmethod=marker fenc=utf-8:
?>