include/validations/listes.inc.php

   1 <?php
   2 /***************************************************************************
   3  *  Copyright (C) 2003-2007 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 // {{{ class ListeReq
  23
  24 class ListeReq extends Validate
  25 {
  26     // {{{ properties
  27
  28     public $liste;
  29     public $desc;
  30
  31     public $advertise;
  32     public $modlevel;
  33     public $inslevel;
  34
  35     public $owners;
  36     public $members;
  37
  38     public $rules = "Refuser les listes de binets si elles ne sont pas datées (oui : apv2002@, non : apv@).
  39         Refuser également des listes qui pourraient nous servir (admin, postmaster,...)";
  40     // }}}
  41     // {{{ constructor
  42
  43     public function __construct($_uid, $_liste, $_desc, $_advertise, $_modlevel,
  44                                 $_inslevel, $_owners, $_members, $_stamp=0)
  45     {
  46         parent::__construct($_uid, true, 'liste', $_stamp);
  47
  48         $this->liste     = $_liste;
  49         $this->desc      = $_desc;
  50         $this->advertise = $_advertise;
  51         $this->modlevel  = $_modlevel;
  52         $this->inslevel  = $_inslevel;
  53         $this->owners    = $_owners;
  54         $this->members   = $_members;
  55     }
  56
  57     // }}}
  58     // {{{ function formu()
  59
  60     public function formu()
  61     {
  62         return 'include/form.valid.listes.tpl';
  63     }
  64
  65     // }}}
  66     // {{{ function editor()
  67
  68     public function editor()
  69     {
  70         return 'include/form.valid.edit-listes.tpl';
  71     }
  72
  73     // }}}
  74     // {{{ function handle_editor()
  75
  76     protected function handle_editor()
  77     {
  78         if (Env::has('listname')) {
  79             $this->liste = trim(Env::v('listname'));
  80         }
  81         return true;
  82     }
  83
  84     // }}}
  85     // {{{ function _mail_subj
  86
  87     protected function _mail_subj()
  88     {
  89         return "[Polytechnique.org/LISTES] Demande de la liste {$this->liste}";
  90     }
  91
  92     // }}}
  93     // {{{ function _mail_body
  94
  95     protected function _mail_body($isok)
  96     {
  97         if ($isok) {
  98             return "  La mailing list {$this->liste} que tu avais demandée vient d'être créée.";
  99         } else {
 100             return "  La demande que tu avais faite pour la mailing list {$this->liste} a été refusée.";
 101         }
 102     }
 103
 104     // }}}
 105     // {{{ function commit()
 106
 107     public function commit()
 108     {
 109         $list = new MMList(S::v('uid'), S::v('password'));
 110         $ret = $list->create_list($this->liste, $this->desc, $this->advertise,
 111                                   $this->modlevel, $this->inslevel,
 112                                   $this->owners, $this->members);
 113         $liste = strtolower($this->liste);
 114         if ($ret) {
 115             foreach(Array($liste, $liste."-owner", $liste."-admin", $liste."-bounces") as $l) {
 116                 XDB::execute("INSERT INTO aliases (alias,type) VALUES({?}, 'liste')", $l);
 117             }
 118         }
 119         return $ret;
 120     }
 121
 122     // }}}
 123 }
 124
 125 // }}}
 126
 127 // vim:set et sw=4 sts=4 sws=4 foldmethod=marker enc=utf-8:
 128 ?>