[platal.git] / include / marketing.inc.php

<?php
/***************************************************************************
 *  Copyright (C) 2003-2008 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                *
 ***************************************************************************/

class Marketing
{
    static private $engines = array(
        //user name  => array(class name,          require data)
        'annuaire'   => array('AnnuaireMarketing', false),
        'groupe'     => array('GroupMarketing',    true),
        'liste'      => array('ListMarketing',     true),
    );

    private $engine;
    public $sender_mail;
    public $user;

    private $type;
    private $data;
    private $from;
    private $sender;

    private $hash = '';

    public function __construct($uid, $email, $type, $data, $from, $sender = null)
    {
        $this->user         = $this->getUser($uid, $email);
        $this->sender_mail  = $this->getFrom($from, $sender);
        $this->engine      =& $this->getEngine($type, $data, $from == 'user' ? $sender : null);

        $this->type   = $type;
        $this->data   = $data;
        $this->from   = $from;
        $this->sender = $sender;
    }

    private function getUser($uid, $email)
    {
        require_once("xorg.misc.inc.php");
        $res = XDB::query("SELECT  FIND_IN_SET('femme', flags) AS sexe, nom, prenom, promo
                             FROM  auth_user_md5
                            WHERE  user_id = {?}", $uid);
        if ($res->numRows() == 0) {
            return null;
        }
        $user            = $res->fetchOneAssoc();
        $user['id']      = $uid;
        $user['forlife'] = make_forlife($user['prenom'], $user['nom'], $user['promo']);
        $user['mail']    = $email;
        $user['to']      = '"' . $user['prenom'] . ' ' . $user['nom'] . '" <' . $email . '>';
        return $user;
    }

    private function getFrom($from, $sender)
    {
        global $globals;

        if ($from == 'staff') {
            return '"L\'équipe de Polytechnique.org" <register@' . $globals->mail->domain . '>';
        } else {
            $res = XDB::query("SELECT  u.nom, u.prenom, a.alias
                                 FROM  auth_user_md5 AS u
                           INNER JOIN  aliases       AS a ON (a.id = u.user_id AND FIND_IN_SET('bestalias', a.flags))
                                WHERE  u.user_id = {?}", $sender);
            if (!$res->numRows()) {
                return '"L\'équipe de Polytechnique.org" <register@' . $globals->mail->domain . '>';
            }
            $sender = $res->fetchOneAssoc();
            return '"' . $sender['prenom'] . ' ' . $sender['nom'] . '" <' . $sender['alias'] . '@' . $globals->mail->domain . '>';
        }
    }

    private function &getEngine($type, $data, $from)
    {
        $class = $type . 'Marketing';
        if (!class_exists($class, false)) {
            $class= 'DefaultMarketing';
        }
        $engine = new $class($data, $from);
        if (!$engine instanceof MarketingEngine) {
            $engine = null;
        }
        return $engine;
    }

    public function getTitle()
    {
        return $this->engine->getTitle();
    }

    public function getText()
    {
        return $this->engine->getText($this->user);
    }

    public function send($title = null, $text = null)
    {
        $this->hash = rand_url_id(12);
        if (!$title) {
            $title = $this->engine->getTitle();
        }
        if (!$text) {
            $text = $this->engine->getText($this->user);
        }
        $sender = substr($this->sender_mail, 1, strpos($this->sender_mail, '"', 2)-1);
        $text = str_replace(array("%%hash%%", "%%sender%%"),
            array($this->hash, $this->sender_mail),
            $text);
        $mailer = new PlMailer();
        $mailer->setFrom($this->sender_mail);
        $mailer->addTo($this->user['mail']);
        $mailer->setSubject($title);
        $mailer->setTxtBody($text);
        $mailer->send();
        $this->incr();
    }

    public function add($valid = true)
    {
        XDB::execute('INSERT IGNORE INTO  register_marketing
                                          (uid, sender, email, date, last, nb, type, hash, message, message_data)
                                  VALUES  ({?}, {?}, {?}, NOW(), 0, 0, {?}, {?}, {?}, {?})',
                    $this->user['id'], $this->sender, $this->user['mail'], $this->from, $this->hash,
                    $this->type, $this->data);
        $this->engine->process($this->user);
        if ($valid) {
            require_once 'validations.inc.php';
            $valid = new MarkReq($this->sender, $this->user['id'], $this->user['mail'],
                                 $this->from == 'user', $this->type, $this->data);
            $valid->submit();
        }
        return true;
    }

    private function incr()
    {
        XDB::execute('UPDATE  register_marketing
                         SET  nb=nb+1, hash={?}, last=NOW()
                       WHERE  uid={?} AND email={?}',
            $this->hash, $this->user['id'], $this->user['mail']);
    }

    static public function getEngineList($exclude_data = true)
    {
        $array = array();
        foreach (Marketing::$engines as $e => $d) {
            if (!$d[1] || !$exclude_data) {
                $array[] = $e;
            }
        }
        return $array;
    }

    static public function get($uid, $email, $recentOnly = false)
    {
        $res = XDB::query("SELECT  uid, email, message, message_data, type, sender
                             FROM  register_marketing
                            WHERE  uid = {?}
                              AND  email = {?}".(
              $recentOnly ? ' AND  DATEDIFF(NOW(), last) < 30' : ''), $uid, $email);

        if ($res->numRows() == 0) {
            return null;
        }
        list ($uid, $email, $type, $data, $from, $sender) = $res->fetchOneRow();
        return new Marketing($uid, $email, $type, $data, $from, $sender);
    }

    static public function clear($uid, $email = null)
    {
        if (!$email) {
            XDB::execute("DELETE FROM register_marketing WHERE uid = {?}", $uid);
        } else {
            XDB::execute("DELETE FROM register_marketing WHERE uid = {?} AND email = {?}", $uid, $email);
        }
    }

    static public function relance($uid, $nbx = -1)
    {
        global $globals;

        if ($nbx < 0) {
            $res = XDB::query("SELECT COUNT(*) FROM auth_user_md5 WHERE deces=0");
            $nbx = $res->fetchOneCell();
        }

        $res = XDB::query("SELECT  r.date, u.promo, u.nom, u.prenom, r.email, r.bestalias
                             FROM  register_pending AS r
                       INNER JOIN  auth_user_md5    AS u ON u.user_id = r.uid
                            WHERE  hash!='INSCRIT' AND uid={?} AND TO_DAYS(relance) < TO_DAYS(NOW())", $uid);
        if (!list($date, $promo, $nom, $prenom, $email, $alias) = $res->fetchOneRow()) {
            return false;
        }

        require_once('secure_hash.inc.php');
        $hash     = rand_url_id(12);
        $pass     = rand_pass();
        $pass_encrypted = hash_encrypt($pass);
        $fdate    = strftime('%d %B %Y', strtotime($date));

        $mymail = new PlMailer('marketing/relance.mail.tpl');
        $mymail->assign('nbdix',      $nbx);
        $mymail->assign('fdate',      $fdate);
        $mymail->assign('lusername',  $alias);
        $mymail->assign('nveau_pass', $pass);
        $mymail->assign('baseurl',    $globals->baseurl);
        $mymail->assign('lins_id',    $hash);
        $mymail->assign('lemail',     $email);
        $mymail->assign('subj',       $alias.'@'.$globals->mail->domain);
        $mymail->send();
        XDB::execute('UPDATE  register_pending
                         SET  hash={?}, password={?}, relance=NOW()
                       WHERE uid={?}', $hash, $pass_encrypted, $uid);
        return "$prenom $nom ($promo)";
    }
}

interface MarketingEngine
{
    public function __construct($data, $from);
    public function getTitle();
    public function getText(array $user);
    public function process(array $user);
}

//
class AnnuaireMarketing implements MarketingEngine
{
    protected $titre;
    protected $intro;
    protected $signature;

    public function __construct($data, $from)
    {
        $this->titre = "Rejoins la communauté polytechnicienne sur Internet";
        $this->intro = "   Tu n'as pas de fiche dans l'annuaire des polytechniciens sur Internet. "
                     . "Pour y figurer, il te suffit de visiter cette page ou de copier cette adresse "
                     . "dans la barre de ton navigateur :";
        if ($from === null) {
            $this->signature = "L'équipe de Polytechnique.org,\n"
                             . "Le portail des élèves & anciens élèves de l'École polytechnique";
        } else {
            $this->signature = "%%sender%%";
        }
    }

    public function getTitle()
    {
        return $this->titre;
    }

    private function getIntro()
    {
        return $this->intro;
    }

    public function getSignature()
    {
        return $this->signature;
    }

    protected function prepareText(PlPage &$page, array $user)
    {
        $page->assign('intro', $this->getIntro());
        $page->assign('u', $user);
        $page->assign('sign', $this->getSignature());
        $res = XDB::query("SELECT COUNT(*) FROM auth_user_md5 WHERE perms IN ('user', 'admin') AND deces = 0");
        $page->assign('num_users', $res->fetchOneCell());
    }

    public function getText(array $user)
    {
        $page = new XorgPage('marketing/marketing.mail.tpl', NO_SKIN);
        $this->prepareText($page, $user);
        return $page->raw();
    }

    public function process(array $user)
    {
    }
}

class ListMarketing extends AnnuaireMarketing
{
    private $name;
    private $domain;
    public function __construct($data, $from)
    {
        list($this->name, $this->domain) = explode('@', $data);
        $res = XDB::query("SELECT  prenom, IF (nom_usage != '', nom_usage, nom)
            FROM  auth_user_md5
            WHERE  user_id = {?} AND user_id != 0", $from ? $from : 0);
        if ($res->numRows()) {
            list($prenom, $nom) = $res->fetchOneRow();
            $from = "$prenom $nom";
        } else {
            $from = "Je";
        }
        $this->titre = "Un camarade solicite ton inscription à $data";
        $this->intro = "Polytechnique.org, l'annuaire des polytechniciens sur internet, "
            . "fournit de nombreux services aux groupes X, ainsi que des listes "
            . "de diffusion pour les X en faisant la demande.\n\n"
            . "$from solicite ton inscription à la liste <$data>. "
            . "Cependant, seuls les X inscrits sur Polytechnique.org peuvent "
            . "profiter de l'ensemble de nos services, c'est pourquoi nous te "
            . "proposons auparavant de t'inscrire sur notre site. Pour cela, il "
            . "te suffit de visiter cette page ou de copier cette adresse dans "
            . "la barre de ton navigateur :";
    }

    public function process(array $user)
    {
        return XDB::execute("REPLACE INTO  register_subs (uid, type, sub, domain)
            VALUES  ({?}, 'list', {?}, {?})",
                $user['id'], $this->name, $this->domain);
    }
}

class GroupMarketing extends AnnuaireMarketing
{
    private $group;
    public function __construct($data, $from)
    {
        $this->group = $data;
        $res = XDB::query("SELECT  prenom, IF (nom_usage != '', nom_usage, nom)
            FROM  auth_user_md5
            WHERE  user_id = {?} AND user_id != 0", $from ? $from : 0);
        if ($res->numRows()) {
            list($prenom, $nom) = $res->fetchOneRow();
            $from = "$prenom $nom vient";
        } else {
            $from = "Je viens";
        }
        $this->titre = "Profite de ton inscription au groupe \"$data\" pour découvrir Polytechnique.org";
        $this->intro = "Polytechnique.org, l'annuaire des polytechniciens sur internet, fournit "
            . "de nombreux services aux groupes X ( listes de diffusion, paiement en "
            . "ligne, sites internet...), en particulier pour le groupe \"$data\"\n\n"
            . "$from de t'inscrire dans l'annuaire du groupe \"$data\". "
            . "Cependant, seuls les X inscrits sur Polytechnique.org peuvent profiter "
            . "de l'ensemble de nos services, c'est pourquoi nous te proposons de "
            . "t'inscrire sur notre site . Pour cela, il te suffit de visiter cette page "
            . "ou de copier cette adresse dans la barre de ton navigateur :";
    }

    public function process(array $user)
    {
        return XDB::execute("REPLACE INTO  register_subs (uid, type, sub, domain)
            VALUES  ({?}, 'group', {?}, '')",
                $user['id'], $this->group);
    }
}

/// Make AnnuaireMarketing to be the default message
class DefaultMarketing extends AnnuaireMarketing
{
}

// vim:set et sw=4 sts=4 sws=4 enc=utf-8:
?>
Commit	Line	Data
0337d704	1	<?php
0337d704	2	/***************************************************************************
179afa7f	3	* Copyright (C) 2003-2008 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
e654517d	22	class Marketing
	23	{
	24	static private $engines = array(
	25	//user name => array(class name, require data)
	26	'annuaire' => array('AnnuaireMarketing', false),
	27	'groupe' => array('GroupMarketing', true),
	28	'liste' => array('ListMarketing', true),
	29	);
0337d704	30
e654517d	31	private $engine;
	32	public $sender_mail;
	33	public $user;
0337d704	34
e654517d	35	private $type;
	36	private $data;
	37	private $from;
	38	private $sender;
	39
	40	private $hash = '';
	41
	42	public function __construct($uid, $email, $type, $data, $from, $sender = null)
	43	{
	44	$this->user = $this->getUser($uid, $email);
	45	$this->sender_mail = $this->getFrom($from, $sender);
24490a67	46	$this->engine =& $this->getEngine($type, $data, $from == 'user' ? $sender : null);
e654517d	47
	48	$this->type = $type;
	49	$this->data = $data;
	50	$this->from = $from;
eaf30d86	51	$this->sender = $sender;
e654517d	52	}
	53
	54	private function getUser($uid, $email)
	55	{
	56	require_once("xorg.misc.inc.php");
	57	$res = XDB::query("SELECT FIND_IN_SET('femme', flags) AS sexe, nom, prenom, promo
	58	FROM auth_user_md5
	59	WHERE user_id = {?}", $uid);
	60	if ($res->numRows() == 0) {
	61	return null;
eaf30d86	62	}
e654517d	63	$user = $res->fetchOneAssoc();
	64	$user['id'] = $uid;
	65	$user['forlife'] = make_forlife($user['prenom'], $user['nom'], $user['promo']);
	66	$user['mail'] = $email;
	67	$user['to'] = '"' . $user['prenom'] . ' ' . $user['nom'] . '" <' . $email . '>';
	68	return $user;
	69	}
	70
	71	private function getFrom($from, $sender)
	72	{
799cdbcd	73	global $globals;
eaf30d86	74
e654517d	75	if ($from == 'staff') {
24490a67	76	return '"L\'équipe de Polytechnique.org" <register@' . $globals->mail->domain . '>';
e654517d	77	} else {
	78	$res = XDB::query("SELECT u.nom, u.prenom, a.alias
	79	FROM auth_user_md5 AS u
	80	INNER JOIN aliases AS a ON (a.id = u.user_id AND FIND_IN_SET('bestalias', a.flags))
	81	WHERE u.user_id = {?}", $sender);
	82	if (!$res->numRows()) {
24490a67	83	return '"L\'équipe de Polytechnique.org" <register@' . $globals->mail->domain . '>';
e654517d	84	}
e654517d	85	$sender = $res->fetchOneAssoc();
1d55fe45	86	return '"' . $sender['prenom'] . ' ' . $sender['nom'] . '" <' . $sender['alias'] . '@' . $globals->mail->domain . '>';
e654517d	87	}
	88	}
	89
f62bd784	90	private function &getEngine($type, $data, $from)
e654517d	91	{
	92	$class = $type . 'Marketing';
	93	if (!class_exists($class, false)) {
	94	$class= 'DefaultMarketing';
	95	}
8c4a0c30	96	$engine = new $class($data, $from);
8c4a0c30	97	if (!$engine instanceof MarketingEngine) {
f62bd784	98	$engine = null;
f62bd784	99	}
f62bd784	100	return $engine;
e654517d	101	}
	102
	103	public function getTitle()
	104	{
	105	return $this->engine->getTitle();
	106	}
	107
	108	public function getText()
	109	{
	110	return $this->engine->getText($this->user);
	111	}
	112
	113	public function send($title = null, $text = null)
	114	{
	115	$this->hash = rand_url_id(12);
	116	if (!$title) {
	117	$title = $this->engine->getTitle();
	118	}
	119	if (!$text) {
	120	$text = $this->engine->getText($this->user);
	121	}
	122	$sender = substr($this->sender_mail, 1, strpos($this->sender_mail, '"', 2)-1);
	123	$text = str_replace(array("%%hash%%", "%%sender%%"),
	124	array($this->hash, $this->sender_mail),
	125	$text);
	126	$mailer = new PlMailer();
	127	$mailer->setFrom($this->sender_mail);
	128	$mailer->addTo($this->user['mail']);
	129	$mailer->setSubject($title);
	130	$mailer->setTxtBody($text);
	131	$mailer->send();
	132	$this->incr();
	133	}
	134
	135	public function add($valid = true)
	136	{
	137	XDB::execute('INSERT IGNORE INTO register_marketing
	138	(uid, sender, email, date, last, nb, type, hash, message, message_data)
	139	VALUES ({?}, {?}, {?}, NOW(), 0, 0, {?}, {?}, {?}, {?})',
	140	$this->user['id'], $this->sender, $this->user['mail'], $this->from, $this->hash,
	141	$this->type, $this->data);
	142	$this->engine->process($this->user);
	143	if ($valid) {
	144	require_once 'validations.inc.php';
	145	$valid = new MarkReq($this->sender, $this->user['id'], $this->user['mail'],
eaf30d86	146	$this->from == 'user', $this->type, $this->data);
e654517d	147	$valid->submit();
	148	}
	149	return true;
	150	}
	151
	152	private function incr()
	153	{
	154	XDB::execute('UPDATE register_marketing
	155	SET nb=nb+1, hash={?}, last=NOW()
	156	WHERE uid={?} AND email={?}',
	157	$this->hash, $this->user['id'], $this->user['mail']);
	158	}
	159
	160	static public function getEngineList($exclude_data = true)
	161	{
	162	$array = array();
	163	foreach (Marketing::$engines as $e => $d) {
	164	if (!$d[1] \|\| !$exclude_data) {
	165	$array[] = $e;
	166	}
	167	}
	168	return $array;
	169	}
	170
8ded5b5e	171	static public function get($uid, $email, $recentOnly = false)
e654517d	172	{
	173	$res = XDB::query("SELECT uid, email, message, message_data, type, sender
	174	FROM register_marketing
8ded5b5e	175	WHERE uid = {?}
	176	AND email = {?}".(
	177	$recentOnly ? ' AND DATEDIFF(NOW(), last) < 30' : ''), $uid, $email);
	178
e654517d	179	if ($res->numRows() == 0) {
	180	return null;
	181	}
	182	list ($uid, $email, $type, $data, $from, $sender) = $res->fetchOneRow();
	183	return new Marketing($uid, $email, $type, $data, $from, $sender);
	184	}
	185
	186	static public function clear($uid, $email = null)
	187	{
	188	if (!$email) {
	189	XDB::execute("DELETE FROM register_marketing WHERE uid = {?}", $uid);
	190	} else {
eaf30d86	191	XDB::execute("DELETE FROM register_marketing WHERE uid = {?} AND email = {?}", $uid, $email);
e654517d	192	}
	193	}
	194
	195	static public function relance($uid, $nbx = -1)
	196	{
	197	global $globals;
	198
	199	if ($nbx < 0) {
	200	$res = XDB::query("SELECT COUNT(*) FROM auth_user_md5 WHERE deces=0");
	201	$nbx = $res->fetchOneCell();
	202	}
eaf30d86	203
e654517d	204	$res = XDB::query("SELECT r.date, u.promo, u.nom, u.prenom, r.email, r.bestalias
	205	FROM register_pending AS r
	206	INNER JOIN auth_user_md5 AS u ON u.user_id = r.uid
	207	WHERE hash!='INSCRIT' AND uid={?} AND TO_DAYS(relance) < TO_DAYS(NOW())", $uid);
	208	if (!list($date, $promo, $nom, $prenom, $email, $alias) = $res->fetchOneRow()) {
	209	return false;
	210	}
eaf30d86	211
e654517d	212	require_once('secure_hash.inc.php');
	213	$hash = rand_url_id(12);
	214	$pass = rand_pass();
	215	$pass_encrypted = hash_encrypt($pass);
	216	$fdate = strftime('%d %B %Y', strtotime($date));
eaf30d86	217
b71f7275	218	$mymail = new PlMailer('marketing/relance.mail.tpl');
e654517d	219	$mymail->assign('nbdix', $nbx);
	220	$mymail->assign('fdate', $fdate);
	221	$mymail->assign('lusername', $alias);
	222	$mymail->assign('nveau_pass', $pass);
	223	$mymail->assign('baseurl', $globals->baseurl);
	224	$mymail->assign('lins_id', $hash);
	225	$mymail->assign('lemail', $email);
	226	$mymail->assign('subj', $alias.'@'.$globals->mail->domain);
	227	$mymail->send();
	228	XDB::execute('UPDATE register_pending
	229	SET hash={?}, password={?}, relance=NOW()
	230	WHERE uid={?}', $hash, $pass_encrypted, $uid);
	231	return "$prenom $nom ($promo)";
	232	}
0337d704	233	}
0337d704	234
e654517d	235	interface MarketingEngine
0337d704	236	{
e654517d	237	public function __construct($data, $from);
	238	public function getTitle();
	239	public function getText(array $user);
	240	public function process(array $user);
0337d704	241	}
0337d704	242
eaf30d86	243	//
e654517d	244	class AnnuaireMarketing implements MarketingEngine
	245	{
	246	protected $titre;
	247	protected $intro;
24490a67	248	protected $signature;
0337d704	249
e654517d	250	public function __construct($data, $from)
e654517d	251	{
24490a67	252	$this->titre = "Rejoins la communauté polytechnicienne sur Internet";
	253	$this->intro = " Tu n'as pas de fiche dans l'annuaire des polytechniciens sur Internet. "
	254	. "Pour y figurer, il te suffit de visiter cette page ou de copier cette adresse "
e654517d	255	. "dans la barre de ton navigateur :";
24490a67	256	if ($from === null) {
	257	$this->signature = "L'équipe de Polytechnique.org,\n"
	258	. "Le portail des élèves & anciens élèves de l'École polytechnique";
	259	} else {
	260	$this->signature = "%%sender%%";
	261	}
e654517d	262	}
	263
	264	public function getTitle()
	265	{
	266	return $this->titre;
	267	}
	268
	269	private function getIntro()
	270	{
	271	return $this->intro;
	272	}
	273
24490a67	274	public function getSignature()
	275	{
	276	return $this->signature;
	277	}
	278
04334c61	279	protected function prepareText(PlPage &$page, array $user)
e654517d	280	{
	281	$page->assign('intro', $this->getIntro());
	282	$page->assign('u', $user);
24490a67	283	$page->assign('sign', $this->getSignature());
e654517d	284	$res = XDB::query("SELECT COUNT(*) FROM auth_user_md5 WHERE perms IN ('user', 'admin') AND deces = 0");
	285	$page->assign('num_users', $res->fetchOneCell());
	286	}
	287
	288	public function getText(array $user)
	289	{
b71f7275	290	$page = new XorgPage('marketing/marketing.mail.tpl', NO_SKIN);
e654517d	291	$this->prepareText($page, $user);
	292	return $page->raw();
	293	}
	294
	295	public function process(array $user)
	296	{
	297	}
	298	}
	299
	300	class ListMarketing extends AnnuaireMarketing
0337d704	301	{
e654517d	302	private $name;
	303	private $domain;
	304	public function __construct($data, $from)
	305	{
	306	list($this->name, $this->domain) = explode('@', $data);
	307	$res = XDB::query("SELECT prenom, IF (nom_usage != '', nom_usage, nom)
24490a67	308	FROM auth_user_md5
24490a67	309	WHERE user_id = {?} AND user_id != 0", $from ? $from : 0);
e654517d	310	if ($res->numRows()) {
	311	list($prenom, $nom) = $res->fetchOneRow();
	312	$from = "$prenom $nom";
	313	} else {
	314	$from = "Je";
	315	}
	316	$this->titre = "Un camarade solicite ton inscription à $data";
24490a67	317	$this->intro = "Polytechnique.org, l'annuaire des polytechniciens sur internet, "
	318	. "fournit de nombreux services aux groupes X, ainsi que des listes "
	319	. "de diffusion pour les X en faisant la demande.\n\n"
	320	. "$from solicite ton inscription à la liste <$data>. "
	321	. "Cependant, seuls les X inscrits sur Polytechnique.org peuvent "
	322	. "profiter de l'ensemble de nos services, c'est pourquoi nous te "
	323	. "proposons auparavant de t'inscrire sur notre site. Pour cela, il "
	324	. "te suffit de visiter cette page ou de copier cette adresse dans "
	325	. "la barre de ton navigateur :";
e654517d	326	}
0337d704	327
e654517d	328	public function process(array $user)
	329	{
	330	return XDB::execute("REPLACE INTO register_subs (uid, type, sub, domain)
24490a67	331	VALUES ({?}, 'list', {?}, {?})",
24490a67	332	$user['id'], $this->name, $this->domain);
0337d704	333	}
e654517d	334	}
0337d704	335
e654517d	336	class GroupMarketing extends AnnuaireMarketing
	337	{
	338	private $group;
	339	public function __construct($data, $from)
	340	{
	341	$this->group = $data;
	342	$res = XDB::query("SELECT prenom, IF (nom_usage != '', nom_usage, nom)
24490a67	343	FROM auth_user_md5
24490a67	344	WHERE user_id = {?} AND user_id != 0", $from ? $from : 0);
e654517d	345	if ($res->numRows()) {
	346	list($prenom, $nom) = $res->fetchOneRow();
	347	$from = "$prenom $nom vient";
	348	} else {
	349	$from = "Je viens";
	350	}
	351	$this->titre = "Profite de ton inscription au groupe \"$data\" pour découvrir Polytechnique.org";
24490a67	352	$this->intro = "Polytechnique.org, l'annuaire des polytechniciens sur internet, fournit "
	353	. "de nombreux services aux groupes X ( listes de diffusion, paiement en "
	354	. "ligne, sites internet...), en particulier pour le groupe \"$data\"\n\n"
	355	. "$from de t'inscrire dans l'annuaire du groupe \"$data\". "
	356	. "Cependant, seuls les X inscrits sur Polytechnique.org peuvent profiter "
	357	. "de l'ensemble de nos services, c'est pourquoi nous te proposons de "
	358	. "t'inscrire sur notre site . Pour cela, il te suffit de visiter cette page "
	359	. "ou de copier cette adresse dans la barre de ton navigateur :";
0337d704	360	}
0337d704	361
e654517d	362	public function process(array $user)
	363	{
	364	return XDB::execute("REPLACE INTO register_subs (uid, type, sub, domain)
24490a67	365	VALUES ({?}, 'group', {?}, '')",
24490a67	366	$user['id'], $this->group);
e654517d	367	}
0337d704	368	}
0337d704	369
e654517d	370	/// Make AnnuaireMarketing to be the default message
	371	class DefaultMarketing extends AnnuaireMarketing
	372	{
	373	}
0337d704	374
a7de4ef7	375	// vim:set et sw=4 sts=4 sws=4 enc=utf-8:
0337d704	376	?>