autocomplete improvements: can find pierre-yves when looking for yves
[platal.git] / modules / banana.php
index 6ffbda5..8193a43 100644 (file)
@@ -1,6 +1,6 @@
 <?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   *
@@ -26,30 +26,49 @@ class BananaModule extends PLModule
         return array(
             'banana'              => $this->make_hook('banana', AUTH_COOKIE),
             'banana/profile'      => $this->make_hook('profile', AUTH_MDP),
-                       'banana/subscription' => $this->make_hook('subscription', AUTH_COOKIE),
-                       'banana/updateall'    => $this->make_hook('updateall', AUTH_COOKIE),
-               );
+            'banana/subscription' => $this->make_hook('subscription', AUTH_COOKIE),
+            'banana/rss'          => $this->make_hook('rss', AUTH_PUBLIC),
+        );
+    }
+
+    function on_subscribe($forlife, $uid, $promo, $password)
+    {
+        $cible = array('xorg.general', 'xorg.pa.divers', 'xorg.pa.logements');
+        $p_for = "xorg.promo.x$promo";
+
+        // récupération de l'id du forum promo
+        $res = XDB::query("SELECT fid FROM forums.list WHERE nom={?}", $p_for);
+        if ($res->numRows()) {
+            $cible[] = $p_for;
+        } else { // pas de forum promo, il faut le créer
+            $res = XDB::query("SELECT  SUM(perms IN ('admin','user') AND deces=0),COUNT(*)
+                                 FROM  auth_user_md5 WHERE promo={?}", $promo);
+            list($effau, $effid) = $res->fetchOneRow();
+            if (5*$effau>$effid) { // + de 20% d'inscrits
+                $mymail = new PlMailer('mails/forums.promo.tpl');
+                $mymail->assign('promo', $promo);
+                $mymail->send();
+            }
+        }
+
+        while (list ($key, $val) = each ($cible)) {
+            XDB::execute("INSERT INTO  forums.abos (fid,uid)
+                               SELECT  fid,{?} FROM forums.list WHERE nom={?}", $uid, $val);
+        }
     }
 
     function handler_banana(&$page, $group = null, $action = null, $artid = null)
     {
-               $get = Array();
-               if (!is_null($group)) {
-                       $get['group'] = $group;
-               }
-               if (!is_null($action)) {
-                       if ($action == 'new') {
-                               $get['action'] = 'new';
-                       } elseif (($action == 'reply' || $action == 'cancel') && !is_null($artid)) {
-                               $get['action'] = $action;
-                               $get['artid']  = $artid;
-                       } elseif ($action == 'from' && !is_null($artid)) {
-                               $get['first'] = $artid;
-                       } elseif ($action == 'read' && !is_null($artid)) {
-                               $get['artid'] = $artid;
-                       }
-               }
-               return BananaModule::run_banana($page, $get);
+        $page->changeTpl('banana/index.tpl');
+        $page->assign('xorg_title','Polytechnique.org - Forums & PA');
+
+        $get = Array();
+        if (Post::has('updateall')) {
+            $get['updateall'] = Post::v('updateall');
+        }
+        require_once 'banana/forum.inc.php';
+        get_banana_params($get, $group, $action, $artid);
+        run_banana($page, 'ForumsBanana', $get);
     }
 
     function handler_profile(&$page, $action = null)
@@ -60,17 +79,17 @@ class BananaModule extends PLModule
 
         if (!(Post::has('action') && Post::has('banananame') && Post::has('bananasig')
         && Post::has('bananadisplay') && Post::has('bananamail')
-        && Post::has('bananaupdate') && Post::get('action')=="OK" ))
+        && Post::has('bananaupdate') && Post::v('action')=="OK" ))
         {
-            $req = $globals->xdb->query("
+            $req = XDB::query("
                 SELECT  nom,mail,sig,if(FIND_IN_SET('threads',flags),'1','0'),
                         IF(FIND_IN_SET('automaj',flags),'1','0') 
                   FROM  forums.profils
-                 WHERE  uid = {?}", Session::getInt('uid'));
+                 WHERE  uid = {?}", S::v('uid'));
             if (!(list($nom,$mail,$sig,$disp,$maj) = $req->fetchOneRow())) {
-                $nom  = Session::get('prenom').' '.Session::get('nom');
-                $mail = Session::get('forlife').'@'.$globals->mail->domain;
-                $sig  = $nom.' ('.Session::getInt('promo').')';
+                $nom  = S::v('prenom').' '.S::v('nom');
+                $mail = S::v('forlife').'@'.$globals->mail->domain;
+                $sig  = $nom.' ('.S::v('promo').')';
                 $disp = 0;
                 $maj  = 0;
             }
@@ -80,41 +99,60 @@ class BananaModule extends PLModule
             $page->assign('disp', $disp);
             $page->assign('maj' , $maj);
         } else {
-            $globals->xdb->execute(
+            XDB::execute(
                 'REPLACE INTO  forums.profils (uid,sig,mail,nom,flags)
                        VALUES  ({?},{?},{?},{?},{?})',
-                       Session::getInt('uid'), Post::get('bananasig'), Post::get('bananamail'), Post::get('banananame'),
-                       (Post::getBool('bananadisplay') ? 'threads,' : '') . (Post::getBool('bananaupdate') ? 'automaj' : '')
+                S::v('uid'), Post::v('bananasig'),
+                Post::v('bananamail'), Post::v('banananame'),
+                (Post::b('bananadisplay') ? 'threads,' : '') .
+                (Post::b('bananaupdate') ? 'automaj' : '')
             );
         }
+    }
 
-        return PL_OK;
+    function handler_subscription(&$page)
+    {
+        $page->changeTpl('banana/index.tpl');
+        $page->assign('xorg_title','Polytechnique.org - Forums & PA');
+
+        require_once 'banana/forum.inc.php';
+        run_banana($page, 'ForumsBanana', Array('action' => 'subscribe'));
     }
 
-       function handler_updateall(&$page)
-       {
-               return BananaModule::run_banana($page, Array('banana' => 'updateall'));
-       }
+    function handler_rss(&$page, $group, $alias, $hash, $file = null)
+    {
+        if (is_null($file)) {
+            if (is_null($hash)) {
+                exit;
+            }
+            $this->handler_rss($page, null, $group, $alias, $hash);
+        }
+        require_once('rss.inc.php');
+        $uid = init_rss(null, $alias, $hash);
+        if (!$uid) {
+            exit;
+        }
+        $res = XDB::query("SELECT id AS uid, alias AS forlife
+                             FROM aliases
+                            WHERE type = 'a_vie' AND id = {?}", $uid);
+        $row = $res->fetchOneAssoc();
+        $_SESSION = array_merge($row, $_SESSION);
 
-       function handler_subscription(&$page)
-       {
-               return $this->run_banana($page, Array('subscribe' => 1));
-       }
+        require_once 'banana/forum.inc.php';
+        $banana = new ForumsBanana(S::v('forlife'), array('group' => $group, 'action' => 'rss2'));
+        $banana->run();
+        exit;
+    }
 
-       function run_banana(&$page, $params = null)
-       {
+    static function run_banana(&$page, $params = null)
+    {
         $page->changeTpl('banana/index.tpl');
-        $page->addCssLink('css/banana.css');
         $page->assign('xorg_title','Polytechnique.org - Forums & PA');
 
-        require_once('banana.inc.php');
-
-        $res = PlatalBanana::run($params);
-        $page->assign_by_ref('banana', $banana);
-        $page->assign('banana_res', $res);
-
-        return PL_OK;
-       }       
+        require_once 'banana/forum.inc.php';
+        run_banana($page, 'ForumsBanana', $params);
+    }
 }
 
+// vim:set et sw=4 sts=4 sws=4 foldmethod=marker enc=utf-8:
 ?>