modules/axletter/axletter.inc.php

   1 <?php
   2 /***************************************************************************
   3  *  Copyright (C) 2003-2010 Polytechnique.org                              *
   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("massmailer.inc.php");
  23
  24 class AXLetter extends MassMailer
  25 {
  26     public $_body;
  27     public $_signature;
  28     public $_promo_min;
  29     public $_promo_max;
  30     public $_subset;
  31     public $_subset_to;
  32     public $_subset_rm;
  33     public $_echeance;
  34     public $_date;
  35     public $_bits;
  36
  37     function __construct($id)
  38     {
  39         parent::__construct('axletter/letter.mail.tpl', 'ax.css', 'ax/show', 'axletter', 'axletter_ins');
  40         $this->_head = '<cher> <prenom>,';
  41
  42         if (!is_array($id)) {
  43             if ($id == 'last') {
  44                 $res = XDB::query("SELECT  *
  45                                      FROM  axletter
  46                                     WHERE  FIND_IN_SET('sent', bits)
  47                                  ORDER BY  id DESC");
  48             } else {
  49                 $res = XDB::query("SELECT  *
  50                                      FROM  axletter
  51                                     WHERE  id = {?} OR short_name = {?}", $id, $id);
  52             }
  53             if (!$res->numRows()) {
  54                 throw new MailNotFound();
  55             }
  56             $id = $res->fetchOneRow();
  57         }
  58         list($this->_id, $this->_shortname, $this->_title_mail, $this->_title,
  59              $this->_body, $this->_signature, $this->_promo_min, $this->_promo_max,
  60              $this->_subset_to, $this->_subset_rm, $this->_echeance, $this->_date, $this->_bits) = $id;
  61         if ($this->_date == '0000-00-00') {
  62             $this->_date = 0;
  63         }
  64         $this->_subset_to = ($this->_subset_to ? explode("\n", $this->_subset_to) : null);
  65         $this->_subset = (count($this->_subset_to) > 0);
  66     }
  67
  68     protected function assignData(&$smarty)
  69     {
  70         $smarty->assign_by_ref('am', $this);
  71     }
  72
  73     public function body($format)
  74     {
  75         return format_text($this->_body, $format);
  76     }
  77
  78     public function signature($format)
  79     {
  80         return format_text($this->_signature, $format, 10);
  81     }
  82
  83     public function valid()
  84     {
  85         return XDB::execute("UPDATE  axletter
  86                                 SET  echeance = NOW()
  87                               WHERE  id = {?}", $this->_id);
  88     }
  89
  90     public function invalid()
  91     {
  92         return XDB::execute("UPDATE  axletter
  93                                 SET  bits = 'invalid', date = CURDATE()
  94                               WHERE  id = {?}", $this->_id);
  95     }
  96
  97     protected function setSent()
  98     {
  99         XDB::execute("UPDATE  axletter
 100                          SET  bits='sent', date=CURDATE()
 101                        WHERE  id={?}", $this->_id);
 102     }
 103
 104     static public function subscriptionState($uid = null)
 105     {
 106         $user = is_null($uid) ? S::v('uid') : $uid;
 107         $res = XDB::query("SELECT  1
 108                              FROM  axletter_ins
 109                             WHERE  uid={?}", $user);
 110         return $res->fetchOneCell();
 111     }
 112
 113     static public function unsubscribe($uid = null, $hash = false)
 114     {
 115         $user = is_null($uid) ? S::v('uid') : $uid;
 116         $field = !$hash ? 'uid' : 'hash';
 117         if (is_null($uid) && $hash) {
 118             return false;
 119         }
 120         $res = XDB::query("SELECT uid
 121                              FROM axletter_ins
 122                             WHERE $field={?}", $user);
 123         if ($res->numRows() != 1) {
 124             return false;
 125         }
 126         XDB::execute("DELETE FROM  axletter_ins
 127                             WHERE  $field = {?}", $user);
 128         return true;
 129     }
 130
 131     static public function subscribe($uid = null)
 132     {
 133         $user = is_null($uid) ? S::v('uid') : $uid;
 134         XDB::execute("REPLACE INTO  axletter_ins (uid,last)
 135                             VALUES  ({?}, 0)", $user);
 136     }
 137
 138     static public function hasPerms()
 139     {
 140         if (S::admin()) {
 141             return true;
 142         }
 143         $res = XDB::query("SELECT  COUNT(*)
 144                              FROM  axletter_rights
 145                             WHERE  uid = {?}", S::i('uid'));
 146         return ($res->fetchOneCell() > 0);
 147     }
 148
 149     static public function grantPerms($uid)
 150     {
 151         if (!is_numeric($uid)) {
 152             $res = XDB::query("SELECT uid FROM aliases WHERE alias = {?}", $uid);
 153             $uid = $res->fetchOneCell();
 154         }
 155         if (!$uid) {
 156             return false;
 157         }
 158         return XDB::execute("INSERT IGNORE INTO axletter_rights SET uid = {?}", $uid);
 159     }
 160
 161     static public function revokePerms($uid)
 162     {
 163         if (!is_numeric($uid)) {
 164             $res = XDB::query("SELECT uid FROM aliases WHERE alias = {?}", $uid);
 165             $uid = $res->fetchOneCell();
 166         }
 167         if (!$uid) {
 168             return false;
 169         }
 170         return XDB::execute("DELETE FROM axletter_rights WHERE uid = {?}", $uid);
 171     }
 172
 173     protected function subscriptionWhere()
 174     {
 175         if (!$this->_promo_min && !$this->_promo_max && !$this->_subset) {
 176             return '1';
 177         }
 178         /* TODO: refines this filter on promotions by using userfilter. */
 179         $where = array();
 180         if ($this->_promo_min) {
 181             $where[] = "((ni.uid = 0 AND ni.promo >= {$this->_promo_min}) OR (ni.uid != 0 AND pd.promo >= 'X{$this->_promo_min}'))";
 182         }
 183         if ($this->_promo_max) {
 184             $where[] = "((ni.uid = 0 AND ni.promo <= {$this->_promo_max}) OR (ni.uid != 0 AND pd.promo <= 'X{$this->_promo_max}'))";
 185         }
 186         if ($this->_subset) {
 187             require_once("emails.inc.php");
 188             $ids = ids_from_mails($this->_subset_to);
 189             $ids_list = implode(',', $ids);
 190             if(count($ids) > 0) {
 191                 if ($this->_subset_rm) {
 192                     $where[] = "ni.uid NOT IN ($ids_list)";
 193                 } else {
 194                     $where[] = "ni.uid IN ($ids_list)";
 195                 }
 196             } else {
 197                 // No valid email
 198                 $where[] = "0";
 199             }
 200         }
 201         return implode(' AND ', $where);
 202     }
 203
 204     static public function awaiting()
 205     {
 206         $res = XDB::query("SELECT  *
 207                              FROM  axletter
 208                             WHERE  FIND_IN_SET('new', bits)");
 209         if ($res->numRows()) {
 210             return new AXLetter($res->fetchOneRow());
 211         }
 212         return null;
 213     }
 214
 215     static public function toSend()
 216     {
 217         $res = XDB::query("SELECT  *
 218                              FROM  axletter
 219                             WHERE  FIND_IN_SET('new', bits) AND echeance <= NOW() AND echeance != 0");
 220         if ($res->numRows()) {
 221             return new AXLetter($res->fetchOneRow());
 222         }
 223         return null;
 224     }
 225
 226     static public function listSent()
 227     {
 228         $res = XDB::query("SELECT  IF(short_name IS NULL, id, short_name) as id, date, subject AS titre
 229                              FROM  axletter
 230                             WHERE  NOT FIND_IN_SET('new', bits) AND NOT FIND_IN_SET('invalid', bits)
 231                          ORDER BY  date DESC");
 232         return $res->fetchAllAssoc();
 233     }
 234
 235     static public function listAll()
 236     {
 237         $res = XDB::query("SELECT  IF(short_name IS NULL, id, short_name) as id, date, subject AS titre
 238                              FROM  axletter
 239                          ORDER BY  date DESC");
 240         return $res->fetchAllAssoc();
 241     }
 242 }
 243
 244 // vim:set et sw=4 sts=4 sws=4 enc=utf-8:
 245 ?>