2 /***************************************************************************
3 * Copyright (C) 2003-2010 Polytechnique.org *
4 * http://opensource.polytechnique.org/ *
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. *
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. *
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 *
19 * 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA *
20 ***************************************************************************/
22 class ProfileSettingSection
implements ProfileSetting
24 public function value(ProfilePage
&$page, $field, $value, &$success)
27 if (is_null($value)) {
28 $res = XDB
::query("SELECT section
32 return intval($res->fetchOneCell());
34 return intval($value);
37 public function save(ProfilePage
&$page, $field, $value)
39 XDB
::execute("UPDATE profiles
42 $value, $page->pid());
45 public function getText($value) {
46 $sectionsList = DirEnum
::getOptions(DirEnum
::SECTIONS
);
47 return $sectionsList[$value];
51 class ProfileSettingBinets
implements ProfileSetting
53 public function __construct()
57 public function value(ProfilePage
&$page, $field, $value, &$success)
59 if (is_null($value)) {
61 $res = XDB
::iterRow("SELECT g.id, g.text
62 FROM profile_binet_enum AS g
63 INNER JOIN profile_binets AS i ON (i.binet_id = g.id)
66 while (list($gid, $text) = $res->next()) {
67 $value[intval($gid)] = $text;
70 if (!is_array($value)) {
78 public function save(ProfilePage
&$page, $field, $value)
80 XDB
::execute("DELETE FROM profile_binets
87 foreach ($value as $id=>$text) {
88 $insert[] = XDB
::format('({?}, {?})', $page->pid(), $id);
90 XDB
::execute("INSERT INTO profile_binets (pid, binet_id)
91 VALUES " . implode(',', $insert));
94 public function getText($value) {
95 return implode(', ', $value);
99 class ProfileSettingGroups
extends ProfilePage
101 protected $pg_template = 'profile/groups.tpl';
103 public function __construct(PlWizard
&$wiz)
105 parent
::__construct($wiz);
106 $this->settings
['section'] = new ProfileSettingSection();
107 $this->settings
['binets'] = new ProfileSettingBinets();
108 $this->watched
['section'] = $this->watched
['binets'] = true
;
111 public function _prepare(PlPage
&$page, $id)
113 $page->assign('mygroups', XDB
::iterator("SELECT a.nom, a.site, a.diminutif, a.unsub_url, a.pub, m.perms
115 INNER JOIN group_members AS m ON (m.asso_id = a.id)
116 WHERE m.uid = {?} AND (a.cat = 'GroupesX' OR a.cat = 'Institutions')",
118 $page->assign('listgroups', XDB
::iterator("SELECT a.nom, a.diminutif, a.sub_url,
119 IF (a.cat = 'Institutions', a.cat, d.nom) AS dom
121 LEFT JOIN group_dom AS d ON (d.id = a.dom)
122 WHERE a.inscriptible != 0
123 AND (a.cat = 'GroupesX' OR a.cat = 'Institutions')
124 ORDER BY a.cat, a.dom, a.nom"));
125 $page->assign('old', (int) date('Y') >= $this->profile
->grad_year
);
129 // vim:set et sw=4 sts=4 sws=4 foldmethod=marker enc=utf-8: