X-Git-Url: http://git.polytechnique.org/?a=blobdiff_plain;f=include%2Fnewsletter.inc.php;h=9e1a59bc3f0fbc6edc04046e6b86ecd56109cd8a;hb=f70f2bcdc077c220e40ecebaf569e097f6028743;hp=6528a60dbf0926b5d8ecd4a0ef017463314c1bb8;hpb=0983dc41068685891bd275926391b6648cd5a6c7;p=platal.git diff --git a/include/newsletter.inc.php b/include/newsletter.inc.php index 6528a60..9e1a59b 100644 --- a/include/newsletter.inc.php +++ b/include/newsletter.inc.php @@ -1,6 +1,6 @@ addCssLink('css/nl.css'); -} - -define('FEMME', 1); -define('HOMME', 0); - -// }}} // {{{ class NewsLetter -class NewsLetter +class NewsLetter extends MassMailer { - // {{{ properties - - var $_id; - var $_date; - var $_title; - var $_head; - var $_cats = Array(); - var $_arts = Array(); + public $_date; + public $_cats = Array(); + public $_arts = Array(); - // }}} - // {{{ constructor - - function NewsLetter($id=null) + function __construct($id = null) { - global $globals; - - if (isset($id)) { - if ($id == 'last') { - $res = $globals->xdb->query("SELECT MAX(id) FROM newsletter WHERE bits!='new'"); + parent::__construct('newsletter/nl.mail.tpl', 'nl.css', 'nl/show', 'newsletter', 'newsletter_ins'); + if (isset($id)) { + if ($id == 'last') { + $res = XDB::query("SELECT MAX(id) FROM newsletter WHERE bits!='new'"); $id = $res->fetchOneCell(); - } - $res = $globals->xdb->query("SELECT * FROM newsletter WHERE id={?}", $id); - } else { - $res = $globals->xdb->query("SELECT * FROM newsletter WHERE bits='new'"); - } - $nl = $res->fetchOneAssoc(); - - $this->_id = $nl['id']; - $this->_date = $nl['date']; - $this->_title = $nl['titre']; - $this->_head = $nl['head']; - - $res = $globals->xdb->iterRow("SELECT cid,titre FROM newsletter_cat ORDER BY pos"); - while (list($cid, $title) = $res->next()) { - $this->_cats[$cid] = $title; - } - - $res = $globals->xdb->iterRow( + } + $res = XDB::query("SELECT * FROM newsletter WHERE id={?} OR short_name={?} LIMIT 1", $id, $id); + } else { + $res = XDB::query("SELECT * FROM newsletter WHERE bits='new'"); + if (!$res->numRows()) { + Newsletter::create(); + } + $res = XDB::query("SELECT * FROM newsletter WHERE bits='new'"); + } + $nl = $res->fetchOneAssoc(); + + $this->_id = $nl['id']; + $this->_shortname = $nl['short_name']; + $this->_date = $nl['date']; + $this->_title = $nl['titre']; + $this->_title_mail = $nl['titre_mail']; + $this->_head = $nl['head']; + + $res = XDB::iterRow("SELECT cid,titre FROM newsletter_cat ORDER BY pos"); + while (list($cid, $title) = $res->next()) { + $this->_cats[$cid] = $title; + } + + $res = XDB::iterRow( "SELECT a.title,a.body,a.append,a.aid,a.cid,a.pos FROM newsletter_art AS a INNER JOIN newsletter AS n USING(id) LEFT JOIN newsletter_cat AS c ON(a.cid=c.cid) WHERE a.id={?} ORDER BY c.pos,a.pos", $this->_id); - while (list($title, $body, $append, $aid, $cid, $pos) = $res->next()) { - $this->_arts[$cid]["a$aid"] = new NLArticle($title, $body, $append, $aid, $cid, $pos); - } - } - - // }}} - // {{{ function setSent() - - function setSent() - { - global $globals; - $globals->xdb->execute("UPDATE newsletter SET bits='sent' WHERE id={?}", $this->_id); + while (list($title, $body, $append, $aid, $cid, $pos) = $res->next()) { + $this->_arts[$cid]["a$aid"] = new NLArticle($title, $body, $append, $aid, $cid, $pos); + } } - // }}} - // {{{ function save() - - function save() + public function save() { - global $globals; - $globals->xdb->execute('UPDATE newsletter SET date={?},titre={?},head={?} WHERE id={?}', - $this->_date, $this->_title, $this->_head, $this->_id); + XDB::execute('UPDATE newsletter SET date={?},titre={?},titre_mail={?},head={?},short_name={?} WHERE id={?}', + $this->_date, $this->_title, $this->_title_mail, $this->_head, $this->_shortname,$this->_id); } - // }}} - // {{{ function title() - - function title() - { return $this->_title; } - - // }}} - // {{{ function head() - - function head() - { return $this->_head; } - - // }}} - // {{{ function getArt() - - function getArt($aid) + public function getArt($aid) { - foreach ($this->_arts as $key=>$artlist) { - if (isset($artlist["a$aid"])) { + foreach ($this->_arts as $key=>$artlist) { + if (isset($artlist["a$aid"])) { return $artlist["a$aid"]; } - } - return null; + } + return null; } - // }}} - // {{{ function saveArticle() - - function saveArticle(&$a) + public function saveArticle(&$a) { - global $globals; - if ($a->_aid>=0) { - $globals->xdb->execute('REPLACE INTO newsletter_art (id,aid,cid,pos,title,body,append) - VALUES ({?},{?},{?},{?},{?},{?},{?})', - $this->_id, $a->_aid, $a->_cid, $a->_pos, - $a->_title, $a->_body, $a->_append); - $this->_arts['a'.$a->_aid] = $a; - } else { - $globals->xdb->execute( - 'INSERT INTO newsletter_art - SELECT {?},MAX(aid)+1,{?},'.($a->_pos ? intval($a->_pos) : 'MAX(pos)+1').',{?},{?},{?} - FROM newsletter_art AS a - WHERE a.id={?}', - $this->_id, $a->_cid, $a->_title, $a->_body, $a->_append, $this->_id); - $this->_arts['a'.$a->_aid] = $a; - } + if ($a->_aid>=0) { + XDB::execute('REPLACE INTO newsletter_art (id,aid,cid,pos,title,body,append) + VALUES ({?},{?},{?},{?},{?},{?},{?})', + $this->_id, $a->_aid, $a->_cid, $a->_pos, + $a->_title, $a->_body, $a->_append); + $this->_arts['a'.$a->_aid] = $a; + } else { + XDB::execute('INSERT INTO newsletter_art + SELECT {?},MAX(aid)+1,{?},'.($a->_pos ? intval($a->_pos) : 'MAX(pos)+1').',{?},{?},{?} + FROM newsletter_art AS a + WHERE a.id={?}', + $this->_id, $a->_cid, $a->_title, $a->_body, $a->_append, $this->_id); + $this->_arts['a'.$a->_aid] = $a; + } } - // }}} - // {{{ function delArticle() - - function delArticle($aid) + public function delArticle($aid) { - global $globals; - $globals->xdb->execute('DELETE FROM newsletter_art WHERE id={?} AND aid={?}', $this->_id, $aid); - foreach ($this->_arts as $key=>$art) { - unset($this->_arts[$key]["a$aid"]); - } + XDB::execute('DELETE FROM newsletter_art WHERE id={?} AND aid={?}', $this->_id, $aid); + foreach ($this->_arts as $key=>$art) { + unset($this->_arts[$key]["a$aid"]); + } } - // }}} - // {{{ function footer + protected function assignData(&$smarty) + { + $smarty->assign_by_ref('nl', $this); + } - function footer($html) + protected function setSent() { - global $globals; - $url = $globals->baseurl; - - if ($html) { - return '
Cette lettre est envoyée à tous les Polytechniciens sur Internet par l\'intermédiaire de Polytechnique.org.
' - . '
' - . "[archives | " - . "écrire dans la NL | " - . "ne plus recevoir]" - . '
'; - } else { - return "\n\n--------------------------------------------------------------------\n" - . "Cette lettre est envoyée à tous les Polytechniciens sur Internet par\n" - . "l'intermédiaire de Polytechnique.org.\n" - . "\n" - . "archives : [$url/newsletter/]\n" - . "écrire : [$url/newsletter/submit.php]\n" - . "ne plus recevoir: [$url/newsletter/?out=1]\n"; - } + XDB::execute("UPDATE newsletter SET bits='sent' WHERE id={?}", $this->_id); } - // }}} - // {{{ function toText() + static public function subscriptionState($uid = null) + { + $user = is_null($uid) ? S::v('uid') : $uid; + $res = XDB::query("SELECT 1 + FROM newsletter_ins + WHERE user_id={?}", $user); + return $res->fetchOneCell(); + } - function toText($prenom,$nom,$sexe) + static public function unsubscribe($uid = null) { - $res = "====================================================================\n"; - $res .= ' '.$this->title()."\n"; - $res .= "====================================================================\n\n"; - - $head = $this->head(); - $head = str_replace('', $sexe ? 'Chère' : 'Cher', $head); - $head = str_replace('', $prenom, $head); - $head = str_replace('', $nom, $head); - $head = enriched_to_text($head,false,true,2,64); - - if ($head) { - $res .= "\n$head\n\n\n"; - } + $user = is_null($uid) ? S::v('uid') : $uid; + XDB::execute("DELETE FROM newsletter_ins + WHERE user_id={?}", $user); + } - $i = 1; - foreach ($this->_arts as $cid=>$arts) { - $res .= "\n$i *{$this->_cats[$cid]}*\n"; - foreach ($arts as $art) { - $res .= '- '.$art->title()."\n"; - } - $i ++; - } - $res .= "\n\n"; - - foreach ($this->_arts as $cid=>$arts) { - $res .= "--------------------------------------------------------------------\n"; - $res .= "*{$this->_cats[$cid]}*\n"; - $res .= "--------------------------------------------------------------------\n\n"; - foreach ($arts as $art) { - $res .= $art->toText(); - $res .= "\n\n"; - } - } - - $res .= $this->footer(false); - - return $res; + static public function subscribe($uid = null) + { + $user = is_null($uid) ? S::v('uid') : $uid; + XDB::execute("REPLACE INTO newsletter_ins (user_id,last) + VALUES ({?}, 0)", $user); } - // }}} - // {{{ function toHtml() - - function toHtml($prenom,$nom,$sexe,$body=false) + protected function subscriptionWhere() { - $res = '
'.$this->title().'
'; - - $head = $this->head(); - $head = str_replace('', $sexe ? 'Chère' : 'Cher', $head); - $head = str_replace('', $prenom, $head); - $head = str_replace('', $nom, $head); - $head = enriched_to_text($head,true); - - if($head) { - $res .= "
$head
"; - } + return '1'; + } - $i = 1; - $res .= ""; - foreach ($this->_arts as $cid=>$arts) { - $res .= "
$i. {$this->_cats[$cid]}"; - foreach ($arts as $art) { - $res .= "  - ".htmlentities($art->title()).""; - } - $res .= '
'; - $i ++; - } - - foreach ($this->_arts as $cid=>$arts) { - $res .= "

".$this->_cats[$cid].'

'; - foreach($arts as $art) { - $res .= $art->toHtml(); - $res .= "

Revenir au sommaire

"; - } - } - - $res .= $this->footer(true); - - if ($body) { - $res = << - - - - -
- $res -
- - -EOF; - } - return $res; + static public function create() + { + XDB::execute("INSERT INTO newsletter + SET bits='new',date=NOW(),titre='to be continued',titre_mail='to be continued'"); } - // }}} - // {{{ function sendTo() - - function sendTo($prenom, $nom, $login, $sex, $html) + static public function listSent() { - global $globals; - require_once('diogenes/diogenes.hermes.inc.php'); - - $mailer = new HermesMailer(); - $mailer->setFrom($globals->newsletter->from); - $mailer->setSubject($this->title()); - $mailer->addTo("\"$prenom $nom\" <$login@{$globals->mail->domain}>"); - if (!empty($globals->newsletter->replyto)) { - $mailer->addHeader('Reply-To',$globals->newsletter->replyto); - } - if (!empty($globals->newsletter->retpath)) { - $mailer->addHeader('Return-Path',$globals->newsletter->retpath); - } - $mailer->setTxtBody($this->toText($prenom,$nom,$sex)); - if ($html) { - $mailer->setHTMLBody($this->toHtml($prenom,$nom,$sex,true)); - } - $mailer->send(); + $res = XDB::query("SELECT IF(short_name IS NULL, id,short_name) as id,date,titre_mail AS titre + FROM newsletter + WHERE bits!='new' + ORDER BY date DESC"); + return $res->fetchAllAssoc(); } - // }}} + static public function listAll() + { + $res = XDB::query("SELECT IF(short_name IS NULL, id,short_name) as id,date,titre_mail AS titre + FROM newsletter + ORDER BY date DESC"); + return $res->fetchAllAssoc(); + } } // }}} @@ -347,7 +181,7 @@ EOF; class NLArticle { // {{{ properties - + var $_aid; var $_cid; var $_pos; @@ -357,202 +191,96 @@ class NLArticle // }}} // {{{ constructor - - function NLArticle($title='', $body='', $append='', $aid=-1, $cid=0, $pos=0) + + function __construct($title='', $body='', $append='', $aid=-1, $cid=0, $pos=0) { - $this->_body = $body; - $this->_title = $title; - $this->_append = $append; - $this->_aid = $aid; - $this->_cid = $cid; - $this->_pos = $pos; + $this->_body = $body; + $this->_title = $title; + $this->_append = $append; + $this->_aid = $aid; + $this->_cid = $cid; + $this->_pos = $pos; } // }}} // {{{ function title() - function title() + public function title() { return trim($this->_title); } // }}} // {{{ function body() - - function body() + + public function body() { return trim($this->_body); } - + // }}} // {{{ function append() - - function append() + + public function append() { return trim($this->_append); } // }}} // {{{ function toText() - function toText() + public function toText($hash = null, $login = null) { - $title = '*'.$this->title().'*'; - $body = enriched_to_text($this->_body,false,true); - $app = enriched_to_text($this->_append,false,false,4); - return trim("$title\n\n$body\n\n$app")."\n"; + $title = '*'.$this->title().'*'; + $body = MiniWiki::WikiToText($this->_body, true); + $app = MiniWiki::WikiToText($this->_append,false,4); + $text = trim("$title\n\n$body\n\n$app")."\n"; + if (!is_null($hash) && !is_null($login)) { + $text = str_replace('%HASH%', "$hash/$login", $text); + } else { + $text = str_replace('%HASH%', '', $text); + } + return $text; } // }}} // {{{ function toHtml() - function toHtml() + public function toHtml($hash = null, $login = null) { - $title = "

".htmlentities($this->title()).'

'; - $body = enriched_to_text($this->_body,true); - $app = enriched_to_text($this->_append,true); - - $art = "$title\n"; - $art .= "
\n$body\n"; - if ($app) { + $title = "

".pl_entities($this->title()).'

'; + $body = MiniWiki::WikiToHTML($this->_body); + $app = MiniWiki::WikiToHTML($this->_append); + + $art = "$title\n"; + $art .= "
\n$body\n"; + if ($app) { $art .= "
$app
"; } - $art .= "
\n"; - - return $art; + $art .= "
\n"; + if (!is_null($hash) && !is_null($login)) { + $art = str_replace('%HASH%', "$hash/$login", $art); + } else { + $art = str_replace('%HASH%', '', $art); + } + + return $art; } // }}} // {{{ function check() - function check() + public function check() { - $text = enriched_to_text($this->_body); - $arr = explode("\n",wordwrap($text,68)); - $c = 0; - foreach ($arr as $line) { + $text = MiniWiki::WikiToText($this->_body); + $arr = explode("\n",wordwrap($text,68)); + $c = 0; + foreach ($arr as $line) { if (trim($line)) { $c++; } } - return $c<9; + return $c<9; } // }}} } // }}} -// {{{ Functions - -function insert_new_nl() -{ - global $globals; - $globals->xdb->execute("INSERT INTO newsletter SET bits='new',date=NOW(),titre='to be continued'"); -} - -function get_nl_slist() -{ - global $globals; - $res = $globals->xdb->query("SELECT id,date,titre FROM newsletter ORDER BY date DESC"); - return $res->fetchAllAssoc(); -} - -function get_nl_list() -{ - global $globals; - $res = $globals->xdb->query("SELECT id,date,titre FROM newsletter WHERE bits!='new' ORDER BY date DESC"); - return $res->fetchAllAssoc(); -} - -function get_nl_state() -{ - global $globals; - $res = $globals->xdb->query('SELECT 1 FROM newsletter_ins WHERE user_id={?}', Session::getInt('uid')); - return $res->fetchOneCell(); -} - -function unsubscribe_nl() -{ - global $globals; - $globals->xdb->execute('DELETE FROM newsletter_ins WHERE user_id={?}', Session::getInt('uid')); -} - -function subscribe_nl($uid=-1) -{ - global $globals; - $user = ($uid == -1) ? Session::getInt('uid') : $uid; - $globals->xdb->execute('REPLACE INTO newsletter_ins (user_id,last) - VALUES ({?}, 0)', $user); -} - -function justify($text,$n) -{ - $arr = explode("\n",wordwrap($text,$n)); - $arr = array_map('trim',$arr); - $res = ''; - foreach ($arr as $key => $line) { - $nxl = isset($arr[$key+1]) ? trim($arr[$key+1]) : ''; - $nxl_split = preg_split('! +!',$nxl); - $nxw_len = count($nxl_split) ? strlen($nxl_split[0]) : 0; - $line = trim($line); - - if (strlen($line)+1+$nxw_len < $n) { - $res .= "$line\n"; - continue; - } - - if (preg_match('![.:;]$!',$line)) { - $res .= "$line\n"; - continue; - } - - $tmp = preg_split('! +!',trim($line)); - $words = count($tmp); - if ($words <= 1) { - $res .= "$line\n"; - continue; - } - - $len = array_sum(array_map('strlen',$tmp)); - $empty = $n - $len; - $sw = floatval($empty) / floatval($words-1); - - $cur = 0; - $l = ''; - foreach ($tmp as $word) { - $l .= $word; - $cur += $sw + strlen($word); - $l = str_pad($l,intval($cur+0.5)); - } - $res .= trim($l)."\n"; - } - return trim($res); -} - -function enriched_to_text($input,$html=false,$just=false,$indent=0,$width=68) -{ - $text = trim($input); - if ($html) { - $text = htmlspecialchars($text); - $text = str_replace('[b]','', $text); - $text = str_replace('[/b]','', $text); - $text = str_replace('[i]','', $text); - $text = str_replace('[/i]','', $text); - $text = str_replace('[u]','', $text); - $text = str_replace('[/u]','', $text); - $text = preg_replace('!((https?|ftp)://[^\r\n\t ]*)!','\1', $text); - $text = preg_replace('!(([a-zA-Z0-9\-_+.]*@[a-zA-Z0-9\-_+.]*)(?:\?[^\r\n\t ]*)?)!','\2', $text); - return nl2br($text); - } else { - $text = preg_replace('!\[\/?b\]!','*',$text); - $text = preg_replace('!\[\/?u\]!','_',$text); - $text = preg_replace('!\[\/?i\]!','/',$text); - $text = preg_replace('!((https?|ftp)://[^\r\n\t ]*)!','[\1]', $text); - $text = preg_replace('!(([a-zA-Z0-9\-_+.]*@[a-zA-Z0-9\-_+.]*)(?:\?[^\r\n\t ]*)?)!','[mailto:\1]', $text); - $text = $just ? justify($text,$width-$indent) : wordwrap($text,$width-$indent); - if($indent) { - $ind = str_pad('',$indent); - $text = $ind.str_replace("\n","\n$ind",$text); - } - return $text; - } -} - -// }}} -// vim:set et sw=4 sts=4 sws=4: +// vim:set et sw=4 sts=4 sws=4 enc=utf-8: ?>