<?php
/***************************************************************************
- * Copyright (C) 2003-2006 Polytechnique.org *
+ * Copyright (C) 2003-2007 Polytechnique.org *
* http://opensource.polytechnique.org/ *
* *
* This program is free software; you can redistribute it and/or modify *
return PL_NOT_FOUND;
}
- new_group_open_page('xnet/groupe/asso.tpl');
+ new_group_open_page('xnetgrp/asso.tpl');
if (S::logged()) {
if (Env::has('read')) {
{
global $globals;
- new_groupadmin_page('xnet/groupe/edit.tpl');
+ new_groupadmin_page('xnetgrp/edit.tpl');
if (Post::has('submit')) {
if (S::has_perms()) {
if (Post::v('mail_domain') && (strstr(Post::v('mail_domain'), '.') === false)) {
- $page->trig("le domaine doit être un FQDN (aucune modif effectuée) !!!");
+ $page->trig("le domaine doit être un FQDN (aucune modif effectuée) !!!");
return;
}
XDB::execute(
{
global $globals;
- new_groupadmin_page('xnet/groupe/mail.tpl');
+ new_groupadmin_page('xnetgrp/mail.tpl');
$mmlist = new MMList(S::v('uid'), S::v('password'),
$globals->asso('mail_domain'));
$page->assign('listes', $mmlist->get_lists());
require_once dirname(__FILE__) . '/xnetgrp/mail.inc.php';
$tos = get_all_redirects($mbr, $mls, $mmlist);
send_xnet_mails($from, $sujet, $body, $tos, Post::v('replyto'), $_FILES['uploaded']);
- $page->kill("Mail envoyé !");
+ $page->kill("Mail envoyé !");
$page->assign('sent', true);
}
}
function handler_annuaire(&$page)
{
global $globals;
- new_annu_page('xnet/groupe/annuaire.tpl');
+ new_annu_page('xnetgrp/annuaire.tpl');
$sort = Env::v('order');
switch (Env::v('order')) {
IF(m.origine="X", IF(u.nom_usage<>"", u.nom_usage, u.nom),m.nom),
1, 1)) as letter, COUNT(*)
FROM groupex.membres AS m
- LEFT JOIN auth_user_md5 AS u ON ( u.user_id = m.uid )
- WHERE asso_id = {?}
+ LEFT JOIN auth_user_md5 AS u ON ( u.user_id = m.uid)
+ WHERE asso_id = {?} and u.perms != \'pending\'
GROUP BY letter
ORDER BY letter', $globals->asso('id'));
} else {
$res = XDB::iterRow(
'SELECT IF(m.origine="X",u.promo,
- IF(m.origine="ext", "extérieur", "personne morale")) AS promo,
+ IF(m.origine="ext", "extérieur", "personne morale")) AS promo,
COUNT(*), IF(m.origine="X",u.promo,"") AS promo_o
FROM groupex.membres AS m
LEFT JOIN auth_user_md5 AS u ON ( u.user_id = m.uid )
$nbp = intval(($tot-1)/NB_PER_PAGE);
$links = array();
if ($ofs) {
- $links['précédent'] = $ofs-1;
+ $links['précédent'] = $ofs-1;
}
for ($i = 0; $i <= $nbp; $i++) {
$links[(string)($i+1)] = $i;
IF(u.nom_usage<>"", u.nom_usage, u.nom),
m.nom) LIKE "'.addslashes(Env::v('initiale')).'%"';
} elseif (Env::has('promo')) {
- $ini = 'AND IF(m.origine="X", u.promo, IF(m.origine="ext", "extérieur", "personne morale")) = "'
+ $ini = 'AND IF(m.origine="X", u.promo, IF(m.origine="ext", "extérieur", "personne morale")) = "'
.addslashes(Env::v('promo')).'"';
} elseif (Env::has('admin')) {
$ini = 'AND m.perms = "admin"';
$ann = XDB::iterator(
"SELECT IF(m.origine='X',IF(u.nom_usage<>'', u.nom_usage, u.nom) ,m.nom) AS nom,
IF(m.origine='X',u.prenom,m.prenom) AS prenom,
- IF(m.origine='X', u.promo, IF(m.origine='ext', 'extérieur', 'personne morale')) AS promo,
+ IF(m.origine='X', u.promo, IF(m.origine='ext', 'extérieur', 'personne morale')) AS promo,
IF(m.origine='X',u.promo,'') AS promo_o,
IF(m.origine='X' AND u.perms != 'pending',a.alias,m.email) AS email,
IF(m.origine='X',FIND_IN_SET('femme', u.flags), m.sexe) AS femme,
m.perms='admin' AS admin,
m.origine='X' AS x,
u.perms!='pending' AS inscrit,
- m.uid
+ m.uid, e.email AS actif
FROM groupex.membres AS m
LEFT JOIN auth_user_md5 AS u ON ( u.user_id = m.uid )
LEFT JOIN aliases AS a ON ( a.id = m.uid AND a.type='a_vie' )
+ LEFT JOIN emails AS e ON ( e.flags = 'active' AND e.uid = m.uid)
WHERE m.asso_id = {?} $ini
AND (m.origine != 'X' OR u.perms != 'pending' OR m.email IS NOT NULL)
+ GROUP BY m.uid
ORDER BY $tri
LIMIT {?},{?}", $globals->asso('id'), $ofs*NB_PER_PAGE, NB_PER_PAGE);
$page->assign('ann', $ann);
function handler_trombi(&$page, $num = 1)
{
global $globals;
- new_annu_page('xnet/groupe/trombi.tpl');
+ new_annu_page('xnetgrp/trombi.tpl');
$page->assign('urlmainsite', "https://www.polytechnique.org/");
$trombi = new Trombi(array($this, '_trombi_getlist'));
$vcard = new VCard($res->fetchColumn(), $photos == 'photos', 'Membre du groupe ' . $globals->asso('nom'));
$vcard->do_page($page);
} else {
- return PL_NOTALLOWED;
+ return PL_FORBIDDEN;
}
}
{
global $globals;
- new_group_open_page('xnet/groupe/inscrire.tpl');
+ new_group_open_page('xnetgrp/inscrire.tpl');
if (!$globals->asso('inscriptible'))
- $page->kill("Il n'est pas possible de s'inscire en ligne à ce "
- ."groupe. Essaie de joindre le contact indiqué "
- ."sur la page de présentation.");
+ $page->kill("Il n'est pas possible de s'inscire en ligne à ce "
+ ."groupe. Essaie de joindre le contact indiqué "
+ ."sur la page de présentation.");
if (!is_null($u) && may_update()) {
$page->assign('u', $u);
$u, $globals->asso('id'));
$n = $res->fetchOneCell();
if ($n) {
- $page->kill("$prenom $nom est déjà membre du groupe !");
+ $page->kill("$prenom $nom est déjà membre du groupe !");
return;
}
elseif (Env::has('accept'))
$mailer->setSubject('['.$globals->asso('nom').'] Demande d\'inscription');
$message = "Cher Camarade,\n"
. "\n"
- . " Suite à ta demande d'adhésion à ".$globals->asso('nom').",\n"
- . "j'ai le plaisir de t'annoncer que ton inscription a été validée !\n"
+ . " Suite à ta demande d'adhésion à ".$globals->asso('nom').",\n"
+ . "j'ai le plaisir de t'annoncer que ton inscription a été validée !\n"
. "\n"
. "Bien cordialement,\n"
. "{$_SESSION["prenom"]} {$_SESSION["nom"]}.";
$mailer->setTxtBody($message);
$mailer->send();
- $page->kill("$prenom $nom a bien été inscrit");
+ $page->kill("$prenom $nom a bien été inscrit");
}
elseif (Env::has('refuse'))
{
$mailer->addTo("$u@polytechnique.org");
$mailer->setFrom('"'.S::v('prenom').' '.S::v('nom')
.'" <'.S::v('forlife').'@polytechnique.org>');
- $mailer->setSubject('['.$globals->asso('nom').'] Demande d\'inscription annulée');
+ $mailer->setSubject('['.$globals->asso('nom').'] Demande d\'inscription annulée');
$mailer->setTxtBody(Env::v('motif'));
$mailer->send();
- $page->kill("la demande $prenom $nom a bien été refusée");
+ $page->kill("la demande $prenom $nom a bien été refusée");
} else {
$page->assign('show_form', true);
$page->assign('prenom', $prenom);
}
if (is_member()) {
- $page->kill("tu es déjà membre !");
+ $page->kill("tu es déjà membre !");
return;
}
$append = "\n"
. "-- \n"
- . "Ce message a été envoyé suite à la demande d'inscription de\n"
+ . "Ce message a été envoyé suite à la demande d'inscription de\n"
. S::v('prenom').' '.S::v('nom').' (X'.S::v('promo').")\n"
. "Via le site www.polytechnique.net. Tu peux choisir de valider ou\n"
. "de refuser sa demande d'inscription depuis la page :\n"
"http://www.polytechnique.net/".$globals->asso("diminutif")."/subscribe/"
.S::v('forlife')."\n"
. "\n"
- . "En cas de problème, contacter l'équipe de Polytechnique.org\n"
- . "à l'adresse : support@polytechnique.org\n";
+ . "En cas de problème, contacter l'équipe de Polytechnique.org\n"
+ . "à l'adresse : support@polytechnique.org\n";
if (!$to) {
$to = $globals->asso("mail").", support@polytechnique.org";
$append = "\n-- \nLe groupe ".$globals->asso("nom")
- ." n'a pas d'administrateur, l'équipe de"
- ." Polytechnique.org a été prévenue et va rapidement"
- ." résoudre ce problème.\n";
+ ." n'a pas d'administrateur, l'équipe de"
+ ." Polytechnique.org a été prévenue et va rapidement"
+ ." résoudre ce problème.\n";
}
$mailer = new PlMailer();
{
global $globals;
- require_once 'xnet/mail.inc.php';
+ require_once dirname(__FILE__) . '/xnetgrp/mail.inc.php';
- new_groupadmin_page('xnet/groupe/annuaire-admin.tpl');
+ new_groupadmin_page('xnetgrp/annuaire-admin.tpl');
$mmlist = new MMList(S::v('uid'), S::v('password'),
$globals->asso('mail_domain'));
$lists = $mmlist->get_lists();
{
global $globals;
- new_groupadmin_page('xnet/groupe/membres-add.tpl');
+ new_groupadmin_page('xnetgrp/membres-add.tpl');
$page->addJsLink('ajax.js');
if (is_null($email)) {
return;
}
- list(,$fqdn) = explode('@', $email);
- $fqdn = strtolower($fqdn);
- $x = ($fqdn == 'polytechnique.org' || $fqdn == 'melix.org' ||
- $fqdn == 'm4x.org' || $fqdn == 'melix.net');
-
+ if (strpos($email, '@') === false) {
+ $x = true;
+ } else {
+ list(,$fqdn) = explode('@', $email, 2);
+ $fqdn = strtolower($fqdn);
+ $x = ($fqdn == 'polytechnique.org' || $fqdn == 'melix.org' ||
+ $fqdn == 'm4x.org' || $fqdn == 'melix.net');
+ }
if ($x) {
require_once 'user.func.inc.php';
if ($forlife = get_user_forlife($email)) {
$page->trig($email." n'est pas un alias polytechnique.org valide");
}
} else {
+ require_once 'xorg.misc.inc.php';
if (isvalid_email($email)) {
if (Env::v('x') && Env::has('userid') && Env::i('userid')) {
$uid = Env::i('userid');
pl_redirect("member/$email");
}
} else {
- $page->trig("« <strong>$email</strong> » n'est pas une adresse mail valide");
+ $page->trig("« <strong>$email</strong> » n'est pas une adresse mail valide");
}
}
}
function handler_admin_member_new_ajax(&$page)
{
- header('Content-Type: text/html; charset="iso-8859-15"');
- $page->changeTpl('xnet/groupe/membres-new-search.tpl', NO_SKIN);
+ header('Content-Type: text/html; charset="UTF-8"');
+ $page->changeTpl('xnetgrp/membres-new-search.tpl', NO_SKIN);
list($nom, $prenom) = str_replace(array('-', ' ', "'"), '%', array(Env::v('nom'), Env::v('prenom')));
$where = "perms = 'pending'";
if (!empty($nom)) {
function handler_unsubscribe(&$page)
{
- new_group_page('xnet/groupe/membres-del.tpl');
+ new_group_page('xnetgrp/membres-del.tpl');
$user = get_infos(S::v('forlife'));
if (empty($user)) {
return PL_NOT_FOUND;
}
if ($this->unsubscribe($user)) {
- $page->trig('Vous avez été désinscrit du groupe avec succès');
+ $page->trig('Vous avez été désinscrit du groupe avec succès');
} else {
- $page->trig('Vous avez été désinscrit du groupe, mais des erreurs se sont produites lors des désinscriptions des alias et des mailing-lists.');
+ $page->trig('Vous avez été désinscrit du groupe, mais des erreurs se sont produites lors des désinscriptions des alias et des mailing-lists.');
}
$page->assign('is_member', is_member(true));
}
function handler_admin_member_del(&$page, $user = null)
{
- new_groupadmin_page('xnet/groupe/membres-del.tpl');
+ new_groupadmin_page('xnetgrp/membres-del.tpl');
$user = get_infos($user);
if (empty($user)) {
return PL_NOT_FOUND;
}
if ($this->unsubscribe($user)) {
- $page->trig("{$user['prenom']} {$user['nom']} a été désabonné du groupe !");
+ $page->trig("{$user['prenom']} {$user['nom']} a été désabonné du groupe !");
} else {
- $page->trig("{$user['prenom']} {$user['nom']} a été désabonné du groupe, mais des erreurs subsistent !");
+ $page->trig("{$user['prenom']} {$user['nom']} a été désabonné du groupe, mais des erreurs subsistent !");
}
}
{
global $globals;
- new_groupadmin_page('xnet/groupe/membres-edit.tpl');
+ new_groupadmin_page('xnetgrp/membres-edit.tpl');
$user = get_infos($user);
if (empty($user)) {
$perms ? 'admin' : 'membre',
$user['uid'], $globals->asso('id'));
$user['perms'] = $perms;
- $page->trig('permissions modifiées');
+ $page->trig('permissions modifiées');
}
foreach (Env::v('ml1', array()) as $ml => $state) {
if ($ask == $state) {
if ($state && $email_changed) {
$mmlist->replace_email($ml, $from_email, $user['email2']);
- $page->trig("L'abonnement de {$user['prenom']} {$user['nom']} à $ml@ a été mis à jour");
+ $page->trig("L'abonnement de {$user['prenom']} {$user['nom']} à $ml@ a été mis à jour");
}
continue;
}
."cours sur <strong>$ml@</strong> !!!");
} elseif ($ask) {
$mmlist->mass_subscribe($ml, Array($user['email2']));
- $page->trig("{$user['prenom']} {$user['nom']} a été abonné à $ml@");
+ $page->trig("{$user['prenom']} {$user['nom']} a été abonné à $ml@");
} else {
if ($email_changed) {
$mmlist->mass_unsubscribe($ml, Array($from_email));
} else {
$mmlist->mass_unsubscribe($ml, Array($user['email2']));
}
- $page->trig("{$user['prenom']} {$user['nom']} a été désabonné de $ml@");
+ $page->trig("{$user['prenom']} {$user['nom']} a été désabonné de $ml@");
}
}
XDB::query("INSERT INTO virtual_redirect (vid,redirect)
SELECT vid,{?} FROM virtual WHERE alias={?}",
$user['email'], $ml);
- $page->trig("{$user['prenom']} {$user['nom']} a été abonné à $ml");
+ $page->trig("{$user['prenom']} {$user['nom']} a été abonné à $ml");
} else {
XDB::query("DELETE FROM virtual_redirect
USING virtual_redirect
INNER JOIN virtual USING(vid)
WHERE redirect={?} AND alias={?}",
$user['email'], $ml);
- $page->trig("{$user['prenom']} {$user['nom']} a été désabonné de $ml");
+ $page->trig("{$user['prenom']} {$user['nom']} a été désabonné de $ml");
}
}
}
global $globals;
require_once('rss.inc.php');
require_once('url_catcher.inc.php');
- $uid = init_rss('xnet/groupe/announce-rss.tpl', $user, $hash, false);
+ $uid = init_rss('xnetgrp/announce-rss.tpl', $user, $hash, false);
$page->register_modifier('url_catcher', 'url_catcher');
if ($uid) {
function handler_edit_announce(&$page, $aid = null)
{
global $globals, $platal;
- new_groupadmin_page('xnet/groupe/announce-edit.tpl');
+ new_groupadmin_page('xnetgrp/announce-edit.tpl');
$page->assign('new', is_null($aid));
$art = array();
$page->trig("L'intervalle de promotions est invalide");
Post::kill('valid');
}
+
+ if (!trim($art['titre']) || !trim($art['texte'])) {
+ $page->trig("L'article doit avoir un titre et un contenu");
+ Post::kill('valid');
+ }
}
if (Post::v('valid') == 'Enregistrer') {
$art = $res->fetchOneAssoc();
$art['contact_html'] = $art['contacts'];
} else {
- $page->kill("Aucun article correspond à l'identifiant indiqué");
+ $page->kill("Aucun article correspond à l'identifiant indiqué");
}
}
function handler_admin_announce(&$page)
{
global $globals;
- new_groupadmin_page('xnet/groupe/announce-admin.tpl');
+ new_groupadmin_page('xnetgrp/announce-admin.tpl');
if (Env::has('del')) {
XDB::execute("DELETE FROM groupex.announces
}
}
+// vim:set et sw=4 sts=4 sws=4 foldmethod=marker enc=utf-8:
?>