[platal.git] / modules / profile / page.inc.php

<?php
/***************************************************************************
 *  Copyright (C) 2003-2007 Polytechnique.org                              *
 *  http://opensource.polytechnique.org/                                   *
 *                                                                         *
 *  This program is free software; you can redistribute it and/or modify   *
 *  it under the terms of the GNU General Public License as published by   *
 *  the Free Software Foundation; either version 2 of the License, or      *
 *  (at your option) any later version.                                    *
 *                                                                         *
 *  This program is distributed in the hope that it will be useful,        *
 *  but WITHOUT ANY WARRANTY; without even the implied warranty of         *
 *  MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the          *
 *  GNU General Public License for more details.                           *
 *                                                                         *
 *  You should have received a copy of the GNU General Public License      *
 *  along with this program; if not, write to the Free Software            *
 *  Foundation, Inc.,                                                      *
 *  59 Temple Place, Suite 330, Boston, MA  02111-1307  USA                *
 ***************************************************************************/

interface ProfileSetting
{
    /** Get a field and a value, check that the given value is
     * valid, if not, return a corrected value. If no valid value can be
     * computed from the input data, the success flag is set to false.
     *
     * If value is null, the default value should be returned.
     * TODO: check this does not conflict with some possible values.
     *
     * Whatever happen, this function must always returns the function to
     * show on the page to the user.
     */
    public function value(ProfilePage &$page, $field, $value, &$success);

    /** Save the new value for the given field.
     */
    public function save(ProfilePage &$page, $field, $new_value);
}

abstract class ProfileNoSave implements ProfileSetting
{
    public function save(ProfilePage &$page, $field, $new_value) { }
}

class ProfileWeb extends ProfileNoSave
{
    public function value(ProfilePage &$page, $field, $value, &$success)
    {
        if (is_null($value)) {
            return isset($page->values[$field]) ? $page->values[$field] : S::v($field);
        }
        $value = trim($value);
        $success = empty($value) || preg_match("{^(https?|ftp)://[a-zA-Z0-9._%#+/?=&~-]+$}i", $value);
        if (!$success) {
            global $page;
            $page->trig('URL Incorrecte : une url doit commencer par http:// ou https:// ou ftp://'
                      . ' et ne pas contenir de caractères interdits');
        }
        return $value;
    }
}

class ProfileEmail extends ProfileNoSave
{
    public function value(ProfilePage &$page, $field, $value, &$success)
    {
        if (is_null($value)) {
            return isset($page->values[$field]) ? $page->values[$field] : S::v($field);
        }
        $value = trim($value);
        require_once 'xorg.misc.inc.php';
        $success = empty($value) || isvalid_email($value);
        if (!$success) {
            global $page;
            $page->trig('Adresse Email invalide');
        }
        return $value;
    }
}


class ProfileTel extends ProfileNoSave
{
    public function value(ProfilePage &$page, $field, $value, &$success)
    {
        if (is_null($value)) {
            return isset($page->values[$field]) ? $page->values[$field] : S::v($field);
        }
        $success = !preg_match('/[<>{}@&#~\/:;?,!§*_`\[\]|%$^=]/', $value, $matches);
        if (!$success) {
            global $page;
            $page->trig('Le numéro de téléphone contient un caractère interdit : ' . pl_entities($matches[0][0]));
        }
        return $value;
    }
}

class ProfilePub extends ProfileNoSave
{
    public function value(ProfilePage &$page, $field, $value, &$success)
    {
        $success = true;
        if (is_null($value)) {
            return isset($page->values[$field]) ? $page->values[$field] : S::v($field);
        }
        if (is_null($value) || !$value) {
            $value = 'private';
        } else if ($value == 'on') { // Checkbox
            $value = 'public';
        }
        return $value;
    }
}

class ProfileBool extends ProfileNoSave
{
    public function value(ProfilePage &$page, $field, $value, &$success)
    {
        $success = true;
        if (is_null($value)) {
            $value = @$page->values[$field];
        }
        return $value ? 1 : 0;
    }
}

abstract class ProfileGeoloc implements ProfileSetting
{
    protected function geolocAddress(array &$address, &$success)
    {
        require_once 'geoloc.inc.php';
        $success = true;
        unset($address['geoloc']);
        unset($address['geoloc_cityid']);
        if (@$address['parsevalid']
            || (@$address['text'] && @$address['changed'])
            || (@$address['text'] && !@$address['cityid'])) {
            $address = array_merge($address, empty_address());
            $new = get_address_infos(@$address['text']);
            if (compare_addresses_text(@$address['text'], $geotxt = get_address_text($new))
                || (@$address['parsevalid'] && @$address['cityid'])) {
                $address = array_merge($address, $new);
                $address['checked'] = true;
            } else if (@$address['parsevalid']) {
                $address = array_merge($address, cut_address(@$address['text']));
                $address['checked'] = true;
                $mailer = new PlMailer('geoloc/mail_geoloc.tpl');
                $mailer->assign('text', get_address_text($address));
                $mailer->assign('geoloc', $geotxt);
                $mailer->send();
            } else if (@$address['changed'] || !@$address['checked']) {
                $success = false;
                $address = array_merge($address, cut_address(@$address['text']));
                $address['checked'] = false;
                $address['geoloc'] = $geotxt;
                $address['geoloc_cityid'] = $new['cityid'];
            } else {
                $address = array_merge($address, cut_address(@$address['text']));
                $address['checked'] = true;
            }
        }
        $address['text'] = get_address_text($address);
    }
}


abstract class ProfilePage implements PlWizardPage
{
    protected $wizard;
    protected $pg_template;
    protected $settings = array();  // A set ProfileSetting objects
    protected $errors   = array();  // A set of boolean with the value check errors
    protected $changed  = array();  // A set of boolean indicating wether the value has been changed

    public $orig     = array();
    public $values   = array();

    public function __construct(PlWizard &$wiz)
    {
        $this->wizard =& $wiz;
    }

    protected function fetchData()
    {
        if (count($this->orig) > 0) {
            $this->values = $this->orig;
            return;
        }
        foreach ($this->settings as $field=>&$setting) {
            $success = false;
            if (!is_null($setting)) {
                $this->values[$field] = $setting->value($this, $field, null, $success);
            } else if (!isset($this->values[$field])) {
                $this->values[$field] = S::v($field);
            }
            $this->errors[$field] = false;
        }
        $this->orig = $this->values;
    }

    protected function saveData()
    {
        foreach ($this->settings as $field=>&$setting) {
            if (!is_null($setting) && $this->changed[$field]) {
                $setting->save($this, $field, $this->values[$field]);
            }
        }

        // Update the last modification date
        XDB::execute('REPLACE INTO  user_changes
                               SET  user_id = {?}', S::v('uid'));
        global $platal;
        $log =& $_SESSION['log'];
        $log->log('profil', $platal->pl_self(1));
    }

    protected function checkChanges()
    {
        $newvalues = $this->values;
        $this->values = array();
        $this->fetchData();
        $this->values = $newvalues;
        $changes = false;
        foreach ($this->settings as $field=>&$setting) {
            if ($this->orig[$field] != $this->values[$field]) {
                $this->changed[$field] = true;
                $changes = true;
            } else {
                $this->changed[$field] = false;
            }
        }
        return $changes;
    }

    protected function markChange()
    {
    }

    public function template()
    {
        return 'profile/base.tpl';
    }

    public function prepare(PlatalPage &$page)
    {
        if (count($this->values) == 0) {
            $this->fetchData();
        }
        foreach ($this->values as $field=>&$value) {
            $page->assign($field, $value);
        }
        $page->assign('profile_page', $this->pg_template);
        $page->assign('errors', $this->errors);
    }

    public function process()
    {
        $global_success = true;
        $this->fetchData();
        foreach ($this->settings as $field=>&$setting) {
            $success = false;
            if (!is_null($setting)) {
                $this->values[$field] = $setting->value($this, $field, Post::v($field, ''), $success);
            } else {
                $success = true;
                $this->values[$field] = Post::v($field, '');
            }
            $this->errors[$field] = !$success;
            $global_success = $global_success && $success;
        }
        if ($global_success) {
            if ($this->checkChanges()) {
                $this->saveData();
                $this->markChange();
            }
            return Post::has('next_page') ? PlWizard::NEXT_PAGE : PlWizard::CURRENT_PAGE;
        }
        global $page;
        $page->trig("Certains champs n'ont pas pu être validés, merci de corriger les informations "
                  . "de ton profil et de revalider ta demande");
        return PlWizard::CURRENT_PAGE;
    }
}

require_once dirname(__FILE__) . '/general.inc.php';
require_once dirname(__FILE__) . '/addresses.inc.php';
require_once dirname(__FILE__) . '/groups.inc.php';
require_once dirname(__FILE__) . '/decos.inc.php';
require_once dirname(__FILE__) . '/jobs.inc.php';
require_once dirname(__FILE__) . '/skills.inc.php';

// vim:set et sw=4 sts=4 sws=4 foldmethod=marker enc=utf-8:
?>
Commit	Line	Data
f118f685 FB	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
fd38b30e FB	22	interface ProfileSetting
	23	{
	24	/** Get a field and a value, check that the given value is
	25	* valid, if not, return a corrected value. If no valid value can be
	26	* computed from the input data, the success flag is set to false.
	27	*
	28	* If value is null, the default value should be returned.
	29	* TODO: check this does not conflict with some possible values.
	30	*
	31	* Whatever happen, this function must always returns the function to
	32	* show on the page to the user.
	33	*/
	34	public function value(ProfilePage &$page, $field, $value, &$success);
	35
	36	/** Save the new value for the given field.
	37	*/
	38	public function save(ProfilePage &$page, $field, $new_value);
	39	}
	40
	41	abstract class ProfileNoSave implements ProfileSetting
	42	{
	43	public function save(ProfilePage &$page, $field, $new_value) { }
	44	}
	45
fd38b30e FB	46	class ProfileWeb extends ProfileNoSave
	47	{
	48	public function value(ProfilePage &$page, $field, $value, &$success)
	49	{
	50	if (is_null($value)) {
	51	return isset($page->values[$field]) ? $page->values[$field] : S::v($field);
	52	}
37d44b3b FB	53	$value = trim($value);
37d44b3b FB	54	$success = empty($value) \|\| preg_match("{^(https?\|ftp)://[a-zA-Z0-9._%#+/?=&~-]+$}i", $value);
fd38b30e FB	55	if (!$success) {
	56	global $page;
	57	$page->trig('URL Incorrecte : une url doit commencer par http:// ou https:// ou ftp://'
	58	. ' et ne pas contenir de caractères interdits');
	59	}
	60	return $value;
	61	}
	62	}
	63
37d44b3b FB	64	class ProfileEmail extends ProfileNoSave
	65	{
	66	public function value(ProfilePage &$page, $field, $value, &$success)
	67	{
	68	if (is_null($value)) {
	69	return isset($page->values[$field]) ? $page->values[$field] : S::v($field);
	70	}
	71	$value = trim($value);
	72	require_once 'xorg.misc.inc.php';
	73	$success = empty($value) \|\| isvalid_email($value);
	74	if (!$success) {
	75	global $page;
	76	$page->trig('Adresse Email invalide');
	77	}
	78	return $value;
	79	}
	80	}
	81
	82
fd38b30e FB	83	class ProfileTel extends ProfileNoSave
	84	{
	85	public function value(ProfilePage &$page, $field, $value, &$success)
	86	{
	87	if (is_null($value)) {
	88	return isset($page->values[$field]) ? $page->values[$field] : S::v($field);
	89	}
a619333a	90	$success = !preg_match('/[<>{}@&#~\/:;?,!§*_`\[\]\|%$^=]/', $value, $matches);
fd38b30e FB	91	if (!$success) {
fd38b30e FB	92	global $page;
a619333a	93	$page->trig('Le numéro de téléphone contient un caractère interdit : ' . pl_entities($matches[0][0]));
fd38b30e FB	94	}
	95	return $value;
	96	}
	97	}
	98
93553cea FB	99	class ProfilePub extends ProfileNoSave
	100	{
	101	public function value(ProfilePage &$page, $field, $value, &$success)
	102	{
	103	$success = true;
	104	if (is_null($value)) {
	105	return isset($page->values[$field]) ? $page->values[$field] : S::v($field);
	106	}
	107	if (is_null($value) \|\| !$value) {
	108	$value = 'private';
	109	} else if ($value == 'on') { // Checkbox
	110	$value = 'public';
	111	}
	112	return $value;
	113	}
	114	}
	115
576777d7 FB	116	class ProfileBool extends ProfileNoSave
	117	{
	118	public function value(ProfilePage &$page, $field, $value, &$success)
	119	{
	120	$success = true;
	121	if (is_null($value)) {
c24a06aa	122	$value = @$page->values[$field];
576777d7 FB	123	}
	124	return $value ? 1 : 0;
	125	}
	126	}
	127
37d44b3b FB	128	abstract class ProfileGeoloc implements ProfileSetting
	129	{
	130	protected function geolocAddress(array &$address, &$success)
	131	{
	132	require_once 'geoloc.inc.php';
	133	$success = true;
	134	unset($address['geoloc']);
	135	unset($address['geoloc_cityid']);
	136	if (@$address['parsevalid']
	137	\|\| (@$address['text'] && @$address['changed'])
	138	\|\| (@$address['text'] && !@$address['cityid'])) {
	139	$address = array_merge($address, empty_address());
	140	$new = get_address_infos(@$address['text']);
1879c7b2 FB	141	if (compare_addresses_text(@$address['text'], $geotxt = get_address_text($new))
1879c7b2 FB	142	\|\| (@$address['parsevalid'] && @$address['cityid'])) {
37d44b3b	143	$address = array_merge($address, $new);
f93fb300	144	$address['checked'] = true;
1879c7b2 FB	145	} else if (@$address['parsevalid']) {
1879c7b2 FB	146	$address = array_merge($address, cut_address(@$address['text']));
f93fb300 FB	147	$address['checked'] = true;
	148	$mailer = new PlMailer('geoloc/mail_geoloc.tpl');
	149	$mailer->assign('text', get_address_text($address));
	150	$mailer->assign('geoloc', $geotxt);
	151	$mailer->send();
	152	} else if (@$address['changed'] \|\| !@$address['checked']) {
37d44b3b FB	153	$success = false;
37d44b3b FB	154	$address = array_merge($address, cut_address(@$address['text']));
f93fb300	155	$address['checked'] = false;
37d44b3b FB	156	$address['geoloc'] = $geotxt;
37d44b3b FB	157	$address['geoloc_cityid'] = $new['cityid'];
f93fb300 FB	158	} else {
	159	$address = array_merge($address, cut_address(@$address['text']));
	160	$address['checked'] = true;
37d44b3b FB	161	}
	162	}
	163	$address['text'] = get_address_text($address);
	164	}
	165	}
	166
	167
fd38b30e	168	abstract class ProfilePage implements PlWizardPage
f118f685 FB	169	{
f118f685 FB	170	protected $wizard;
fd38b30e FB	171	protected $pg_template;
fd38b30e FB	172	protected $settings = array(); // A set ProfileSetting objects
93553cea	173	protected $errors = array(); // A set of boolean with the value check errors
576777d7	174	protected $changed = array(); // A set of boolean indicating wether the value has been changed
fd38b30e	175
93553cea	176	public $orig = array();
fd38b30e	177	public $values = array();
f118f685 FB	178
	179	public function __construct(PlWizard &$wiz)
	180	{
	181	$this->wizard =& $wiz;
	182	}
	183
fd38b30e FB	184	protected function fetchData()
fd38b30e FB	185	{
93553cea FB	186	if (count($this->orig) > 0) {
	187	$this->values = $this->orig;
	188	return;
	189	}
	190	foreach ($this->settings as $field=>&$setting) {
	191	$success = false;
	192	if (!is_null($setting)) {
	193	$this->values[$field] = $setting->value($this, $field, null, $success);
	194	} else if (!isset($this->values[$field])) {
	195	$this->values[$field] = S::v($field);
	196	}
	197	$this->errors[$field] = false;
	198	}
	199	$this->orig = $this->values;
fd38b30e FB	200	}
	201
	202	protected function saveData()
	203	{
93553cea	204	foreach ($this->settings as $field=>&$setting) {
576777d7	205	if (!is_null($setting) && $this->changed[$field]) {
93553cea FB	206	$setting->save($this, $field, $this->values[$field]);
	207	}
	208	}
576777d7 FB	209
	210	// Update the last modification date
	211	XDB::execute('REPLACE INTO user_changes
	212	SET user_id = {?}', S::v('uid'));
	213	global $platal;
	214	$log =& $_SESSION['log'];
	215	$log->log('profil', $platal->pl_self(1));
93553cea FB	216	}
	217
	218	protected function checkChanges()
	219	{
	220	$newvalues = $this->values;
	221	$this->values = array();
	222	$this->fetchData();
	223	$this->values = $newvalues;
576777d7	224	$changes = false;
93553cea FB	225	foreach ($this->settings as $field=>&$setting) {
93553cea FB	226	if ($this->orig[$field] != $this->values[$field]) {
576777d7 FB	227	$this->changed[$field] = true;
	228	$changes = true;
	229	} else {
	230	$this->changed[$field] = false;
93553cea FB	231	}
93553cea FB	232	}
576777d7	233	return $changes;
93553cea FB	234	}
	235
	236	protected function markChange()
	237	{
fd38b30e FB	238	}
fd38b30e FB	239
f118f685 FB	240	public function template()
f118f685 FB	241	{
fd38b30e	242	return 'profile/base.tpl';
f118f685 FB	243	}
	244
	245	public function prepare(PlatalPage &$page)
	246	{
fd38b30e FB	247	if (count($this->values) == 0) {
fd38b30e FB	248	$this->fetchData();
fd38b30e FB	249	}
	250	foreach ($this->values as $field=>&$value) {
	251	$page->assign($field, $value);
	252	}
	253	$page->assign('profile_page', $this->pg_template);
93553cea	254	$page->assign('errors', $this->errors);
f118f685 FB	255	}
	256
	257	public function process()
	258	{
fd38b30e FB	259	$global_success = true;
	260	$this->fetchData();
	261	foreach ($this->settings as $field=>&$setting) {
	262	$success = false;
93553cea	263	if (!is_null($setting)) {
85cc366b	264	$this->values[$field] = $setting->value($this, $field, Post::v($field, ''), $success);
93553cea FB	265	} else {
93553cea FB	266	$success = true;
85cc366b	267	$this->values[$field] = Post::v($field, '');
93553cea FB	268	}
93553cea FB	269	$this->errors[$field] = !$success;
fd38b30e FB	270	$global_success = $global_success && $success;
	271	}
	272	if ($global_success) {
93553cea FB	273	if ($this->checkChanges()) {
	274	$this->saveData();
	275	$this->markChange();
fd38b30e	276	}
93553cea	277	return Post::has('next_page') ? PlWizard::NEXT_PAGE : PlWizard::CURRENT_PAGE;
fd38b30e FB	278	}
fd38b30e FB	279	global $page;
93553cea	280	$page->trig("Certains champs n'ont pas pu être validés, merci de corriger les informations "
fd38b30e	281	. "de ton profil et de revalider ta demande");
f118f685 FB	282	return PlWizard::CURRENT_PAGE;
	283	}
	284	}
	285
fd38b30e	286	require_once dirname(__FILE__) . '/general.inc.php';
0b14f91d	287	require_once dirname(__FILE__) . '/addresses.inc.php';
92412b28	288	require_once dirname(__FILE__) . '/groups.inc.php';
a7c28fff	289	require_once dirname(__FILE__) . '/decos.inc.php';
3950bc21	290	require_once dirname(__FILE__) . '/jobs.inc.php';
f25e1a56	291	require_once dirname(__FILE__) . '/skills.inc.php';
f118f685 FB	292
	293	// vim:set et sw=4 sts=4 sws=4 foldmethod=marker enc=utf-8:
	294	?>