Adds MapView.
[platal.git] / include / userset.inc.php
index 8c6040f..55521c7 100644 (file)
@@ -1,6 +1,6 @@
 <?php
 /***************************************************************************
- *  Copyright (C) 2003-2009 Polytechnique.org                              *
+ *  Copyright (C) 2003-2011 Polytechnique.org                              *
  *  http://opensource.polytechnique.org/                                   *
  *                                                                         *
  *  This program is free software; you can redistribute it and/or modify   *
 
 class UserSet extends PlSet
 {
-    private $cond;
-
-    public function __construct($cond = null)
+    public function __construct(PlFilterCondition $cond, $orders = null)
     {
-        $this->cond = new UFC_And();
-        if (!is_null($cond)) {
-            $this->cond->addChild($cond);
-        }
+        parent::__construct($cond, $orders);
     }
 
-    public function &get($fields, $joins, $where, $groupby, $order, $limitcount = null, $limitfrom = null)
+    protected function buildFilter(PlFilterCondition $cond, $orders)
     {
-        $uf = new UserFilter($this->cond);
-        $users = $uf->getUsers($limitcount, $limitfrom);
-        $this->count = $uf->getTotalCount();
-        return $users;
+        return new UserFilter($cond, $orders);
     }
 }
 
-class SearchSet extends UserSet
+class ProfileSet extends PlSet
 {
-    public  $advanced = false;
-    private $score = null;
-    private $order = null;
-    private $quick = false;
-
-    public function __construct($quick = false, $no_search = false, $join = '', $where = '')
+    public function __construct(PlFilterCondition $cond, $orders = null)
     {
-        Platal::load('search', 'search.inc.php');
-        if ($no_search) {
-            return;
-        }
+        parent::__construct($cond, $orders);
+    }
 
-        $this->quick = $quick;
-        if ($quick) {
-            $this->getQuick($join, $where);
-        } else {
-            $this->getAdvanced($join, $where);
-        }
+    protected function buildFilter(PlFilterCondition $cond, $orders)
+    {
+        return new ProfileFilter($cond, $orders);
     }
+}
 
-    private function getQuick($join, $where)
+require_once "ufbuilder.inc.php";
+
+class SearchSet extends ProfileSet
+{
+    protected $score    = null;
+    protected $valid    = true;
+
+    public function __construct(UserFilterBuilder $ufb, PlFilterCondition $cond = null)
     {
-        Platal::load('search', 'search.inc.php');
-        global $globals;
-        if (!S::logged()) {
-            Env::kill('with_soundex');
-        }
-        $qSearch = new QuickSearch('quick');
-        $fields  = new SFieldGroup(true, array($qSearch));
-        if ($qSearch->isEmpty()) {
-            new ThrowError('Aucun critère de recherche n\'est spécifié.');
-        }
-        $this->score = $qSearch->get_score_statement();
-        $pwhere = $fields->get_where_statement();
-        if (trim($pwhere)) {
-            if (trim($where)) {
-                $where .= ' AND ';
-            }
-            $where .= $pwhere;
+        if (is_null($cond)) {
+            $conds = new PFC_And();
+        } else if ($cond instanceof PFC_And) {
+            $conds = $cond;
+        } else {
+            $conds = new PFC_And($cond);
         }
-        if (S::logged() && Env::has('nonins')) {
-            if (trim($where)) {
-                $where .= ' AND ';
-            }
-            $where .= 'u.perms="pending" AND u.deces=0';
+
+        if (!$ufb->isValid()) {
+            $this->valid = false;
+            return;
         }
-        parent::__construct($join . ' ' . $fields->get_select_statement(), $where);
 
-        $this->order = implode(',',array_filter(array($fields->get_order_statement(),
-                                                      'u.promo DESC, NomSortKey, prenom')));
-    }
+        $ufc = $ufb->getUFC();
+        $conds->addChild($ufc);
 
-    private function getAdvanced($join, $where)
-    {
-        global $globals;
-        $this->advanced = true;
-        $fields = new SFieldGroup(true, advancedSearchFromInput());
-        if ($fields->too_large()) {
-            new ThrowError('Recherche trop générale.');
-        }
-        parent::__construct(@$join . ' ' . $fields->get_select_statement(),
-                            @$where . ' ' . $fields->get_where_statement());
-        $this->order = implode(',',array_filter(array($fields->get_order_statement(),
-                                                      'promo DESC, NomSortKey, prenom')));
+        $orders = $ufb->getOrders();
+
+        parent::__construct($conds, $orders);
     }
 
-    public function &get($fields, $joins, $where, $groupby, $order, $limitcount = null, $limitfrom = null)
+    public function isValid()
     {
-        if ($this->score) {
-            $fields .= ', ' . $this->score;
-        }
-        return parent::get($fields, $joins, $where, $groupby, $order, $limitcount, $limitfrom);
+        return $this->valid;
     }
-}
 
-class ArraySet extends UserSet
-{
-    public function __construct(array $users)
+    /** Add a "rechercher=Chercher" field to the query to simulate the POST
+     * behaviour.
+     */
+    public function args()
     {
-        $where = $this->getUids($users);
-        if ($where) {
-            $where = "u.hruid IN ($where)";
-        } else {
-            $where = " 0 ";
+        $args = parent::args();
+        if (!isset($args['rechercher'])) {
+            $args['rechercher'] = 'Chercher';
         }
-        parent::__construct('', $where);
+        return $args;
     }
 
-    private function getUids(array $users)
+    protected function &getFilterResults(PlFilter $pf, PlLimit $limit)
     {
-        $users = User::getBulkHruid($users, array('User', '_silent_user_callback'));
-        if (is_null($users)) {
-            return '';
-        }
-        return '\'' . implode('\', \'', $users) . '\'';
+        $profiles = $pf->getProfiles($limit, Profile::FETCH_MINIFICHES);
+        return $profiles;
     }
 }
 
-class MinificheView extends MultipageView
+// Specialized SearchSet for quick search.
+class QuickSearchSet extends SearchSet
 {
-    public function __construct(PlSet &$set, $data, array $params)
+    public function __construct(PlFilterCondition $cond = null)
     {
-        require_once 'education.func.inc.php';
-        global $globals;
-        $this->entriesPerPage = $globals->search->per_page;
-        if (@$params['with_score']) {
-            $this->addSortKey('score', array('-score', '-date', '-d.promo', 'sort_name'), 'pertinence');
+        if (!S::logged()) {
+            Env::kill('with_soundex');
         }
-        $this->addSortKey('name', array('sort_name'), 'nom');
-        $this->addSortKey('promo', array('-d.promo', 'sort_name'), 'promotion');
-        $this->addSortKey('date_mod', array('-date', '-d.promo', 'sort_name'), 'dernière modification');
-        parent::__construct($set, $data, $params);
-    }
 
-    public function bounds()
-    {
-        return null;
+        parent::__construct(new UFB_QuickSearch(), $cond);
     }
+}
 
-    public function fields()
+// Specialized SearchSet for advanced search.
+class AdvancedSearchSet extends SearchSet
+{
+    public function __construct($xorg_admin_fields, $ax_admin_fields,
+                                PlFilterCondition $cond = null)
     {
-        return null;
+        parent::__construct(new UFB_AdvancedSearch($xorg_admin_fields, $ax_admin_fields),
+                            $cond);
     }
+}
 
-    public function templateName()
+/** Simple set based on an array of User emails
+ */
+class UserArraySet extends UserSet
+{
+    public function __construct(array $emails)
     {
-        return 'include/plview.minifiche.tpl';
+        parent::__construct(new UFC_Email($emails));
     }
 }
 
-class MentorView extends MultipageView
+/** Simple set based on an array of Profile emails
+ */
+class ProfileArraySet extends ProfileSet
 {
-    public function __construct(PlSet &$set, $data, array $params)
+    public function __construct(array $emails)
     {
-        $this->entriesPerPage = 10;
-        $this->addSortKey('rand', array('RAND(' . S::i('uid') . ')'), 'aléatoirement');
-        $this->addSortKey('name', array('sort_name'), 'nom');
-        $this->addSortKey('promo', array('-d.promo', 'sort_name'), 'promotion');
-        $this->addSortKey('date_mod', array('-date', '-d.promo', 'sort_name'), 'dernière modification');
-        parent::__construct($set, $data, $params);
+        parent::__construct(new UFC_Email($emails));
     }
+}
 
-    public function fields()
-    {
-        return "m.uid, d.promo, u.hruid,
-                m.expertise, mp.country, ms.sectorid, ms.subsectorid,
-                d.directory_name, d.sort_name";
-    }
 
-    public function joins()
+/** A multipage view for profiles or users
+ * Allows the display of bounds when sorting by name or promo.
+ */
+abstract class MixedView extends MultipageView
+{
+    protected function getBoundValue($obj)
     {
-        return "INNER JOIN  profile_display AS d ON (d.pid = u.user_id)";
+        if ($obj instanceof Profile) {
+            switch ($this->bound_field) {
+            case 'name':
+                $name = $obj->name('%l');
+                return strtoupper($name);
+            case 'promo':
+                return $obj->promo();
+            default:
+                return null;
+            }
+        } elseif ($obj instanceof User) {
+            switch ($this->bound_field) {
+            case 'name':
+                $name = $obj->lastName();
+                return strtoupper($name);
+            case 'promo':
+                if ($obj->hasProfile()) {
+                    return $obj->profile()->promo();
+                } else {
+                    return 'ext';
+                }
+            default:
+                return null;
+            }
+        }
+        return null;
     }
 
     public function bounds()
@@ -201,7 +184,7 @@ class MentorView extends MultipageView
         $order = Env::v('order', $this->defaultkey);
         $show_bounds = 0;
         if (($order == "name") || ($order == "-name")) {
-            $this->bound_field = "nom";
+            $this->bound_field = "name";
             $show_bounds = 1;
         } elseif (($order == "promo") || ($order == "-promo")) {
             $this->bound_field = "promo";
@@ -212,6 +195,87 @@ class MentorView extends MultipageView
         }
         return $show_bounds;
     }
+}
+
+/** An extended multipage view for profiles, as minifiches.
+ * Allows to sort by:
+ * - score (for a search query)
+ * - name
+ * - promo
+ * - latest modification
+ *
+ * Paramaters for this view are:
+ * - with_score: whether to allow ordering by score (set only for a quick search)
+ * - starts_with: show only names beginning with the given letter
+ */
+class MinificheView extends MixedView
+{
+    public function __construct(PlSet $set, array $params)
+    {
+        global $globals;
+        $this->entriesPerPage = $globals->search->per_page;
+        if (@$params['with_score']) {
+            $this->addSort(new PlViewOrder('score', array(
+                    new UFO_Score(true),
+                    new UFO_ProfileUpdate(true),
+                    new UFO_Promo(UserFilter::DISPLAY, true),
+                    new UFO_Name(Profile::DN_SORT),
+                ), 'pertinence'));
+        }
+        $this->addSort(new PlViewOrder(
+                            'name',
+                            array(new UFO_Name(Profile::DN_SORT)),
+                            'nom'));
+        $this->addSort(new PlViewOrder('promo', array(
+                    new UFO_Promo(UserFilter::DISPLAY, true),
+                    new UFO_Name(Profile::DN_SORT),
+                ), 'promotion'));
+        $this->addSort(new PlViewOrder('date_mod', array(
+                    new UFO_ProfileUpdate(true),
+                    new UFO_Promo(UserFilter::DISPLAY, true),
+                    new UFO_Name(Profile::DN_SORT),
+                ), 'dernière modification'));
+        parent::__construct($set, $params);
+    }
+
+    public function apply(PlPage $page)
+    {
+        if (array_key_exists('starts_with', $this->params)
+            && $this->params['starts_with'] != ""
+            && $this->params['starts_with'] != null) {
+
+            $this->set->addCond(
+                new UFC_Name(Profile::LASTNAME,
+                    $this->params['starts_with'], UFC_Name::PREFIX)
+            );
+        }
+        return parent::apply($page);
+    }
+
+    public function templateName()
+    {
+        return 'include/plview.minifiche.tpl';
+    }
+}
+
+class MentorView extends MixedView
+{
+    public function __construct(PlSet $set, array $params)
+    {
+        $this->entriesPerPage = 10;
+        $this->addSort(new PlViewOrder('rand', array(new PFO_Random(S::i('uid'))), 'aléatoirement'));
+        $this->addSort(new PlViewOrder('name', array(new UFO_Name(Profile::DN_SORT)), 'nom'));
+        $this->addSort(new PlViewOrder('promo', array(
+                    new UFO_Promo(UserFilter::DISPLAY, true),
+                    new UFO_Name(Profile::DN_SORT),
+                ), 'promotion'));
+        $this->addSort(new PlViewOrder('date_mod', array(
+                    new UFO_ProfileUpdate(true),
+                    new UFO_Promo(UserFilter::DISPLAY, true),
+                    new UFO_Name(Profile::DN_SORT),
+                ), 'dernière modification'));
+        parent::__construct($set, $params);
+    }
 
     public function templateName()
     {
@@ -219,46 +283,65 @@ class MentorView extends MultipageView
     }
 }
 
-class TrombiView extends MultipageView
+class GroupMemberView extends MixedView
 {
-    public function __construct(PlSet &$set, $data, array $params)
+    public function __construct(PlSet $set, array $params)
     {
-        $this->entriesPerPage = 24;
-        $this->order = explode(',', Env::v('order', 'sort_name'));
-        if (@$params['with_score']) {
-            $this->addSortKey('score', array('-score', '-watch_last', '-d.promo', 'sort_name'), 'pertinence');
-        }
-        $this->addSortKey('name', array('sort_name'), 'nom');
-        $this->addSortKey('promo', array('-d.promo', 'sort_name'), 'promotion');
-        parent::__construct($set, $data, $params);
+        $this->entriesPerPage = 20;
+        $this->addSort(new PlViewOrder('name', array(new UFO_Name(Profile::DN_SORT)), 'nom'));
+        $this->addSort(new PlViewOrder('promo', array(
+                    new UFO_Promo(UserFilter::DISPLAY, true),
+                    new UFO_Name(Profile::DN_SORT),
+                ), 'promotion'));
+        parent::__construct($set, $params);
     }
 
-    public function fields()
+    public function templateName()
     {
-        return "u.user_id, d.directory_name, d.sort_name, u.promo, d.promo, u.hruid ";
+        return 'include/plview.groupmember.tpl';
     }
+}
 
-    public function joins()
+class ListMemberView extends MixedView
+{
+    public function __construct(PlSet $set, array $params)
     {
-        return "INNER JOIN  photo           AS p  ON (p.uid = u.user_id)
-                INNER JOIN  profile_display AS d  ON (d.pid = u.user_id)";
+        $this->entriesPerPage = 100;
+        $this->addSort(new PlViewOrder('name', array(new UFO_Name(Profile::DN_SORT)), 'nom'));
+        $this->addSort(new PlViewOrder('promo', array(
+                    new UFO_Promo(UserFilter::DISPLAY, true),
+                    new UFO_Name(Profile::DN_SORT),
+                ), 'promotion'));
+        parent::__construct($set, $params);
     }
 
-    public function bounds()
+    public function templateName()
     {
-        $order = Env::v('order', $this->defaultkey);
-        $show_bounds = 0;
-        if (($order == "name") || ($order == "-name")) {
-            $this->bound_field = "nom";
-            $show_bounds = 1;
-        } elseif (($order == "promo") || ($order == "-promo")) {
-            $this->bound_field = "promo";
-            $show_bounds = -1;
-        }
-        if ($order{0} == '-') {
-            $show_bounds = -$show_bounds;
+        return 'include/plview.listmember.tpl';
+    }
+}
+
+class TrombiView extends MixedView
+{
+    public function __construct(PlSet $set, array $params)
+    {
+        $this->entriesPerPage = 24;
+        $this->defaultkey = 'name';
+        if (@$params['with_score']) {
+            $this->addSort(new PlViewOrder('score', array(
+                            new UFO_Score(true),
+                            new UFO_ProfileUpdate(true),
+                            new UFO_Promo(UserFilter::DISPLAY, true),
+                            new UFO_Name(Profile::DN_SORT),
+            ), 'pertinence'));
         }
-        return $show_bounds;
+        $set->addCond(new UFC_Photo());
+        $this->addSort(new PlViewOrder('name', array(new UFO_Name(Profile::DN_SORT)), 'nom'));
+        $this->addSort(new PlViewOrder('promo', array(
+                        new UFO_Promo(UserFilter::DISPLAY, true),
+                        new UFO_Name(Profile::DN_SORT),
+                    ), 'promotion'));
+        parent::__construct($set, $params);
     }
 
     public function templateName()
@@ -266,7 +349,7 @@ class TrombiView extends MultipageView
         return 'include/plview.trombi.tpl';
     }
 
-    public function apply(PlPage &$page)
+    public function apply(PlPage $page)
     {
         if (!empty($GLOBALS['IS_XNET_SITE'])) {
             global $globals;
@@ -276,47 +359,117 @@ class TrombiView extends MultipageView
     }
 }
 
+class MapView implements PlView
+{
+    private $set;
+
+    public function __construct(PlSet $set, array $params)
+    {
+        $this->set = $set;
+    }
+
+    public function apply(PlPage $page)
+    {
+        Platal::load('geoloc');
+
+        if (Get::b('ajax')) {
+            $pids = $this->set->getIds(new PlLimit());
+            GeolocModule::assign_json_to_map($page, $pids);
+            $page->runJSON();
+            exit;
+        } else {
+            $this->set->getIds(new PlLimit());
+            GeolocModule::prepare_map($page);
+            return 'geoloc/index.tpl';
+        }
+    }
+
+    public function args()
+    {
+        return $this->set->args();
+    }
+}
+
 class GadgetView implements PlView
 {
-    public function __construct(PlSet &$set, $data, array $params)
+    public function __construct(PlSet $set, array $params)
     {
         $this->set =& $set;
     }
 
-    public function fields()
+    public function apply(PlPage $page)
     {
-        return "u.user_id AS id, u.*," .
-               "u.perms != 'pending' AS inscrit,
-                u.perms != 'pending' AS wasinscrit,
-                u.deces != 0 AS dcd, u.deces,
-                FIND_IN_SET('femme', u.flags) AS sexe,
-                " // adr.city, gr.name AS region
-              . "gc.iso_3166_1_a2, gc.countryFR AS countrytxt" .
-                (S::logged() ? ", c.contact AS contact" : '');
+        $page->assign_by_ref('set', $this->set->get(new PlLimit(5, 0)));
     }
 
-    public function joins()
+    public function args()
     {
-        return "LEFT JOIN  profile_addresses          AS adr ON (u.user_id = adr.pid AND
-                                                                 FIND_IN_SET('current', adr.flags)"
-                                                                . (S::logged() ? "" : "AND adr.pub = 'public'") . ")
-                LEFT JOIN  geoloc_countries           AS gc  ON (adr.countryId = gc.iso_3166_1_a2)
-                LEFT JOIN  geoloc_administrativeareas AS gr  ON (adr.countryId = gr.country
-                                                                 AND adr.administrativeAreaId = gr.id)
-               " . (S::logged() ?
-               "LEFT JOIN  contacts                   AS c   ON (c.contact = u.user_id
-                                                                 AND c.uid = " . S::v('uid') . ")" : "");
+        return null;
     }
+}
 
-    public function apply(PlPage &$page)
+class AddressesView implements PlView
+{
+    private $set;
+
+    public function __construct(PlSet $set, array $params)
     {
-        $page->assign_by_ref('set',
-          $this->set->get($this->fields(), $this->joins(), null, null, null, 5, 0));
+        $this->set =& $set;
+    }
+
+    public function apply(PlPage $page)
+    {
+        $pids = $this->set->getIds(new PlLimit());
+        $visibility = new ProfileVisibility(ProfileVisibility::VIS_AX);
+        pl_cached_content_headers('text/x-csv', 1);
+
+        $csv = fopen('php://output', 'w');
+        fputcsv($csv, array('adresses'), ';');
+        $res = XDB::query('SELECT  pd.public_name, pa.postalText
+                             FROM  profile_addresses AS pa
+                       INNER JOIN  profile_display   AS pd ON (pd.pid = pa.pid)
+                            WHERE  pa.type = \'home\' AND pa.pub IN (\'public\', \'ax\') AND FIND_IN_SET(\'mail\', pa.flags) AND pa.pid IN {?}
+                         GROUP BY  pa.pid', $pids);
+        foreach ($res->fetchAllAssoc() as $item) {
+            fputcsv($csv, $item, ';');
+        }
+        fclose($csv);
+        exit();
     }
 
     public function args()
     {
-        return null;
+        return $this->set->args();
+    }
+}
+
+class JSonView implements PlView
+{
+    private $set;
+    private $params;
+
+    public function __construct(PlSet $set, array $params)
+    {
+        $this->set    = $set;
+        $this->params = $params;
+    }
+
+    public function apply(PlPage $page)
+    {
+        $export = array();
+        $start  = isset($this->params['offset']) ? $this->params['offset'] : 0;
+        $count  = isset($this->params['count'])  ? $this->params['count']  : 10;
+        $profiles = $this->set->get(new PlLimit($start, $count));
+        foreach ($profiles as $profile) {
+            $export[] = $profile->export();
+        }
+        $page->jsonAssign('profile_count', $this->set->count());
+        $page->jsonAssign('profiles', $export);
+    }
+
+    public function args()
+    {
+        return $this->set->args();
     }
 }