Skip to content
Snippets Groups Projects
Select Git revision
  • aacc526de4b2327396daeaff203e97c85f4548a0
  • develop default protected
2 results

ChartInfo.java

Blame
  • user.class.php 56.09 KiB
    <?php
    /* Copyright (c) 2002-2007 Rodolphe Quiedeville <rodolphe@quiedeville.org>
     * Copyright (c) 2002-2003 Jean-Louis Bergamo   <jlb@j1b.org>
     * Copyright (c) 2004-2012 Laurent Destailleur  <eldy@users.sourceforge.net>
     * Copyright (C) 2004      Sebastien Di Cintio  <sdicintio@ressource-toi.org>
     * Copyright (C) 2004      Benoit Mortier       <benoit.mortier@opensides.be>
     * Copyright (C) 2005-2012 Regis Houssin        <regis@dolibarr.fr>
     * Copyright (C) 2005      Lionel Cousteix      <etm_ltd@tiscali.co.uk>
     * Copyright (C) 2011      Herve Prot           <herve.prot@symeos.com>
     *
     * 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, see <http://www.gnu.org/licenses/>.
     */
    
    /**
     *  \file       htdocs/user/class/user.class.php
     *	\brief      File of class to manage users
     */
    
    require_once(DOL_DOCUMENT_ROOT ."/core/class/commonobject.class.php");
    
    
    /**
     *	\class      User
     *	\brief      Class to manage users
     */
    class User extends CommonObject
    {
    	public $element='user';
    	public $table_element='user';
    	protected $ismultientitymanaged = 1;	// 0=No test on entity, 1=Test with field entity, 2=Test with link by societe
    
    	var $id=0;
    	var $ldap_sid;
    	var $search_sid;
    	var $nom;		// TODO deprecated
    	var $prenom;	// TODO deprecated
    	var $lastname;
    	var $firstname;
    	var $note;
    	var $email;
    	var $signature;
    	var $office_phone;
    	var $office_fax;
    	var $user_mobile;
    	var $admin;
    	var $login;
    	var $entity;
    
    	//! Clear password in memory
    	var $pass;
    	//! Clear password in database (defined if DATABASE_PWD_ENCRYPTED=0)
    	var $pass_indatabase;
    	//! Encrypted password in database (always defined)
    	var $pass_indatabase_crypted;
    
    	var $datec;
    	var $datem;
    	//! If this is defined, it is an external user
    	var $societe_id;
    	var $fk_member;
    
    	var $webcal_login;
    	var $phenix_login;
    	var $phenix_pass;
    	var $phenix_pass_crypted;
    
    	var $datelastlogin;
    	var $datepreviouslogin;
    	var $statut;
    	var $photo;
    	var $lang;
    
    	//! Liste des entrepots auquel a acces l'utilisateur
    	var $entrepots;
    
    	var $rights;                        // Array of permissions user->rights->permx
    	var $all_permissions_are_loaded;	/**< \private all_permissions_are_loaded */
    	private $_tab_loaded=array();		// Array of cache of already loaded permissions
    
    	var $conf;           // To store personal config
    	var $oldcopy;        // To contains a clone of this when we need to save old properties of object
    
    
    
    	/**
    	 *    Constructor de la classe
    	 *
    	 *    @param   DoliDb  $db     Database handler
    	 */
    	function __construct($db)
    	{
    		$this->db = $db;
    
    		// Preference utilisateur
    		$this->liste_limit = 0;
    		$this->clicktodial_loaded = 0;
    
    		$this->all_permissions_are_loaded = 0;
    		$this->admin=0;
    	}
    
    	/**
    	 *	Load a user from database with its id or ref (login)
    	 *
    	 *	@param	int		$id		       		Si defini, id a utiliser pour recherche
    	 * 	@param  string	$login       		Si defini, login a utiliser pour recherche
    	 *	@param  strinf	$sid				Si defini, sid a utiliser pour recherche
    	 * 	@param	int		$loadpersonalconf	Also load personal conf of user (in $user->conf->xxx)
    	 * 	@return	int							<0 if KO, 0 not found, >0 if OK
    	 */
    	function fetch($id='', $login='',$sid='',$loadpersonalconf=1)
    	{
    		global $conf, $user;
    
    		// Clean parameters
    		$login=trim($login);
    
    		// Get user
    		$sql = "SELECT u.rowid, u.name, u.firstname, u.email, u.signature, u.office_phone, u.office_fax, u.user_mobile,";
    		$sql.= " u.admin, u.login, u.webcal_login, u.phenix_login, u.phenix_pass, u.note,";
    		$sql.= " u.pass, u.pass_crypted, u.pass_temp,";
    		$sql.= " u.fk_societe, u.fk_socpeople, u.fk_member, u.ldap_sid,";
    		$sql.= " u.statut, u.lang, u.entity,";
    		$sql.= " u.datec as datec,";
    		$sql.= " u.tms as datem,";
    		$sql.= " u.datelastlogin as datel,";
    		$sql.= " u.datepreviouslogin as datep,";
    		$sql.= " u.photo as photo,";
    		$sql.= " u.openid as openid,";
    		$sql.= " u.ref_int, u.ref_ext";
    		$sql.= " FROM ".MAIN_DB_PREFIX."user as u";
    
    		if(! empty($conf->multicompany->enabled) && $conf->entity == 1)
    		{
    			$sql.= " WHERE u.entity IS NOT NULL";
    		}
    		else
    		{
    			$sql.= " WHERE u.entity IN (0,".$conf->entity.")";
    		}
    
    		if ($sid)    // permet une recherche du user par son SID ActiveDirectory ou Samba
    		{
    			$sql.= " AND (u.ldap_sid = '".$sid."' OR u.login = '".$this->db->escape($login)."') LIMIT 1";
    		}
    		else if ($login)
    		{
    			$sql.= " AND u.login = '".$this->db->escape($login)."'";
    		}
    		else
    		{
    			$sql.= " AND u.rowid = ".$id;
    		}
    
    		dol_syslog(get_class($this)."::fetch sql=".$sql, LOG_DEBUG);
    		$result = $this->db->query($sql);
    		if ($result)
    		{
    			$obj = $this->db->fetch_object($result);
    			if ($obj)
    			{
    				$this->id 			= $obj->rowid;
    				$this->ref 			= $obj->rowid;
    
    				$this->ref_int 		= $obj->ref_int;
    				$this->ref_ext 		= $obj->ref_ext;
    
    				$this->ldap_sid 	= $obj->ldap_sid;
    				$this->nom 			= $obj->name;		// TODO deprecated
    				$this->lastname		= $obj->name;
    				$this->prenom 		= $obj->firstname;	// TODO deprecated
    				$this->firstname 	= $obj->firstname;
    
    				$this->login = $obj->login;
    				$this->pass_indatabase = $obj->pass;
    				$this->pass_indatabase_crypted = $obj->pass_crypted;
    				$this->pass = $obj->pass;
    				$this->pass_temp = $obj->pass_temp;
    				$this->office_phone = $obj->office_phone;
    				$this->office_fax   = $obj->office_fax;
    				$this->user_mobile  = $obj->user_mobile;
    				$this->email = $obj->email;
    				$this->signature = $obj->signature;
    				$this->admin = $obj->admin;
    				$this->note = $obj->note;
    				$this->statut = $obj->statut;
    				$this->photo = $obj->photo;
    				$this->openid = $obj->openid;
    				$this->lang = $obj->lang;
    				$this->entity = $obj->entity;
    
    				$this->datec  = $this->db->jdate($obj->datec);
    				$this->datem  = $this->db->jdate($obj->datem);
    				$this->datelastlogin     = $this->db->jdate($obj->datel);
    				$this->datepreviouslogin = $this->db->jdate($obj->datep);
    
    				$this->webcal_login         = $obj->webcal_login;
    				$this->phenix_login         = $obj->phenix_login;
    				$this->phenix_pass_crypted  = $obj->phenix_pass;
    				$this->societe_id           = $obj->fk_societe;
    				$this->contact_id           = $obj->fk_socpeople;
    				$this->fk_member            = $obj->fk_member;
    
    				if (! $this->lang) $this->lang='fr_FR';
    
    				$this->db->free($result);
    			}
    			else
    			{
    				$this->error="USERNOTFOUND";
    				dol_syslog(get_class($this)."::fetch user not found", LOG_DEBUG);
    
    				$this->db->free($result);
    				return 0;
    			}
    		}
    		else
    		{
    			$this->error=$this->db->error();
    			dol_syslog(get_class($this)."::fetch Error -1, fails to get user - ".$this->error." - sql=".$sql, LOG_ERR);
    			return -1;
    		}
    
    		// Recupere parametrage global propre a l'utilisateur
    		if ($loadpersonalconf)
    		{
    			$sql = "SELECT param, value FROM ".MAIN_DB_PREFIX."user_param";
    			$sql.= " WHERE fk_user = ".$this->id;
    			$sql.= " AND entity = ".$conf->entity;
    			$result=$this->db->query($sql);
    			if ($result)
    			{
    				$num = $this->db->num_rows($result);
    				$i = 0;
    				while ($i < $num)
    				{
    					$obj = $this->db->fetch_object($result);
    					$p=$obj->param;
    					if ($p) $this->conf->$p = $obj->value;
    					$i++;
    				}
    				$this->db->free($result);
    			}
    			else
    			{
    				$this->error=$this->db->error();
    				dol_syslog(get_class($this)."::fetch Error -2, fails to get setup user - ".$this->error." - sql=".$sql, LOG_ERR);
    				return -2;
    			}
    		}
    
    		return 1;
    	}
    
    	/**
    	 *  Ajoute un droit a l'utilisateur
    	 *
    	 * 	@param	int		$rid         id du droit a ajouter
    	 *  @param  string	$allmodule   Ajouter tous les droits du module allmodule
    	 *  @param  string	$allperms    Ajouter tous les droits du module allmodule, perms allperms
    	 *  @return int   			     > 0 if OK, < 0 if KO
    	 */
    	function addrights($rid,$allmodule='',$allperms='')
    	{
    		global $conf;
    
    		dol_syslog(get_class($this)."::addrights $rid, $allmodule, $allperms");
    		$err=0;
    		$whereforadd='';
    
    		$this->db->begin();
    
    		if ($rid)
    		{
    			// Si on a demande ajout d'un droit en particulier, on recupere
    			// les caracteristiques (module, perms et subperms) de ce droit.
    			$sql = "SELECT module, perms, subperms";
    			$sql.= " FROM ".MAIN_DB_PREFIX."rights_def";
    			$sql.= " WHERE id = '".$rid."'";
    			$sql.= " AND entity = ".$conf->entity;
    
    			$result=$this->db->query($sql);
    			if ($result) {
    				$obj = $this->db->fetch_object($result);
    				$module=$obj->module;
    				$perms=$obj->perms;
    				$subperms=$obj->subperms;
    			}
    			else {
    				$err++;
    				dol_print_error($this->db);
    			}
    
    			// Where pour la liste des droits a ajouter
    			$whereforadd="id=".$rid;
    			// Ajout des droits induits
    			if ($subperms)   $whereforadd.=" OR (module='$module' AND perms='$perms' AND (subperms='lire' OR subperms='read'))";
    			else if ($perms) $whereforadd.=" OR (module='$module' AND (perms='lire' OR perms='read') AND subperms IS NULL)";
    		}
    		else {
    			// On a pas demande un droit en particulier mais une liste de droits
    			// sur la base d'un nom de module de de perms
    			// Where pour la liste des droits a ajouter
    			if ($allmodule) $whereforadd="module='$allmodule'";
    			if ($allperms)  $whereforadd=" AND perms='$allperms'";
    		}
    
    		// Ajout des droits trouves grace au critere whereforadd
    		if ($whereforadd)
    		{
    			//print "$module-$perms-$subperms";
    			$sql = "SELECT id";
    			$sql.= " FROM ".MAIN_DB_PREFIX."rights_def";
    			$sql.= " WHERE ".$whereforadd;
    			$sql.= " AND entity = ".$conf->entity;
    
    			$result=$this->db->query($sql);
    			if ($result)
    			{
    				$num = $this->db->num_rows($result);
    				$i = 0;
    				while ($i < $num)
    				{
    					$obj = $this->db->fetch_object($result);
    					$nid = $obj->id;
    
    					$sql = "DELETE FROM ".MAIN_DB_PREFIX."user_rights WHERE fk_user = ".$this->id." AND fk_id=".$nid;
    					if (! $this->db->query($sql)) $err++;
    					$sql = "INSERT INTO ".MAIN_DB_PREFIX."user_rights (fk_user, fk_id) VALUES (".$this->id.", ".$nid.")";
    					if (! $this->db->query($sql)) $err++;
    
    					$i++;
    				}
    			}
    			else
    			{
    				$err++;
    				dol_print_error($this->db);
    			}
    		}
    
    		if ($err) {
    			$this->db->rollback();
    			return -$err;
    		}
    		else {
    			$this->db->commit();
    			return 1;
    		}
    
    	}
    
    
    	/**
    	 *  Retire un droit a l'utilisateur
    	 *
    	 *  @param	int		$rid        Id du droit a retirer
    	 *  @param  string	$allmodule  Retirer tous les droits du module allmodule
    	 *  @param  string	$allperms   Retirer tous les droits du module allmodule, perms allperms
    	 *  @return int         		> 0 if OK, < 0 if OK
    	 */
    	function delrights($rid,$allmodule='',$allperms='')
    	{
    		global $conf;
    
    		$err=0;
    		$wherefordel='';
    
    		$this->db->begin();
    
    		if ($rid)
    		{
    			// Si on a demande supression d'un droit en particulier, on recupere
    			// les caracteristiques module, perms et subperms de ce droit.
    			$sql = "SELECT module, perms, subperms";
    			$sql.= " FROM ".MAIN_DB_PREFIX."rights_def";
    			$sql.= " WHERE id = '".$rid."'";
    			$sql.= " AND entity = ".$conf->entity;
    
    			$result=$this->db->query($sql);
    			if ($result) {
    				$obj = $this->db->fetch_object($result);
    				$module=$obj->module;
    				$perms=$obj->perms;
    				$subperms=$obj->subperms;
    			}
    			else {
    				$err++;
    				dol_print_error($this->db);
    			}
    
    			// Where pour la liste des droits a supprimer
    			$wherefordel="id=".$rid;
    			// Suppression des droits induits
    			if ($subperms=='lire' || $subperms=='read') $wherefordel.=" OR (module='$module' AND perms='$perms' AND subperms IS NOT NULL)";
    			if ($perms=='lire' || $perms=='read')       $wherefordel.=" OR (module='$module')";
    		}
    		else {
    			// On a demande suppression d'un droit sur la base d'un nom de module ou perms
    			// Where pour la liste des droits a supprimer
    			if ($allmodule) $wherefordel="module='$allmodule'";
    			if ($allperms)  $wherefordel=" AND perms='$allperms'";
    		}
    
    		// Suppression des droits selon critere defini dans wherefordel
    		if ($wherefordel)
    		{
    			//print "$module-$perms-$subperms";
    			$sql = "SELECT id";
    			$sql.= " FROM ".MAIN_DB_PREFIX."rights_def";
    			$sql.= " WHERE $wherefordel";
    			$sql.= " AND entity = ".$conf->entity;
    
    			$result=$this->db->query($sql);
    			if ($result)
    			{
    				$num = $this->db->num_rows($result);
    				$i = 0;
    				while ($i < $num)
    				{
    					$obj = $this->db->fetch_object($result);
    					$nid = $obj->id;
    
    					$sql = "DELETE FROM ".MAIN_DB_PREFIX."user_rights";
    					$sql.= " WHERE fk_user = ".$this->id." AND fk_id=".$nid;
    					if (! $this->db->query($sql)) $err++;
    
    					$i++;
    				}
    			}
    			else
    			{
    				$err++;
    				dol_print_error($this->db);
    			}
    		}
    
    		if ($err) {
    			$this->db->rollback();
    			return -$err;
    		}
    		else {
    			$this->db->commit();
    			return 1;
    		}
    
    	}
    
    
    	/**
    	 *  Clear all permissions array of user
    	 *
    	 *  @return	void
    	 */
    	function clearrights()
    	{
    		dol_syslog(get_class($this)."::clearrights reset user->rights");
    		$this->rights='';
    		$this->all_permissions_are_loaded=false;
    		$this->_tab_loaded=array();
    	}
    
    
    	/**
    	 *	Load permissions granted to user into object user
    	 *
    	 *	@param  string	$moduletag    Limit permission for a particular module ('' by default means load all permissions)
    	 *	@return	void
    	 */
    	function getrights($moduletag='')
    	{
    		global $conf;
    
    		if ($moduletag && isset($this->_tab_loaded[$moduletag]) && $this->_tab_loaded[$moduletag])
    		{
    			// Le fichier de ce module est deja charge
    			return;
    		}
    
    		if ($this->all_permissions_are_loaded)
    		{
    			// Si les permissions ont deja ete charge pour ce user, on quitte
    			return;
    		}
    
    		// Recuperation des droits utilisateurs + recuperation des droits groupes
    
    		// D'abord les droits utilisateurs
    		$sql = "SELECT r.module, r.perms, r.subperms";
    		$sql.= " FROM ".MAIN_DB_PREFIX."user_rights as ur";
    		$sql.= ", ".MAIN_DB_PREFIX."rights_def as r";
    		$sql.= " WHERE r.id = ur.fk_id";
    		$sql.= " AND r.entity in (0,".(!empty($conf->multicompany->transverse_mode)?"1,":"").$conf->entity.")";
    		$sql.= " AND ur.fk_user= ".$this->id;
    		$sql.= " AND r.perms IS NOT NULL";
    		if ($moduletag) $sql.= " AND r.module = '".$this->db->escape($moduletag)."'";
    
    		dol_syslog(get_class($this).'::getrights sql='.$sql, LOG_DEBUG);
    		$resql = $this->db->query($sql);
    		if ($resql)
    		{
    			$num = $this->db->num_rows($resql);
    			$i = 0;
    			while ($i < $num)
    			{
    				$obj = $this->db->fetch_object($resql);
    
    				$module=$obj->module;
    				$perms=$obj->perms;
    				$subperms=$obj->subperms;
    
    				if ($perms)
    				{
    					if ($subperms)
    					{
    						if (! isset($this->rights->$module) ||
    						(is_object($this->rights->$module) && ! isset($this->rights->$module->$perms)) ||
    						(is_object($this->rights->$module->$perms)) )
    						{
    							$this->rights->$module->$perms->$subperms = 1;
    						}
    					}
    					else
    					{
    						$this->rights->$module->$perms = 1;
    					}
    
    				}
    				$i++;
    			}
    			$this->db->free($resql);
    		}
    
    		// Maintenant les droits groupes
    		$sql = "SELECT r.module, r.perms, r.subperms";
    		$sql.= " FROM ".MAIN_DB_PREFIX."usergroup_rights as gr,";
    		$sql.= " ".MAIN_DB_PREFIX."usergroup_user as gu,";
    		$sql.= " ".MAIN_DB_PREFIX."rights_def as r";
    		$sql.= " WHERE r.id = gr.fk_id";
    		$sql.= " AND gr.fk_usergroup = gu.fk_usergroup";
    		$sql.= " AND gu.fk_user = ".$this->id;
    		$sql.= " AND r.perms IS NOT NULL";
    		$sql.= " AND r.entity = ".$conf->entity;
    		$sql.= " AND gu.entity IN (0,".$conf->entity.")";
    		if ($moduletag) $sql.= " AND r.module = '".$this->db->escape($moduletag)."'";
    
    		dol_syslog(get_class($this).'::getrights sql='.$sql, LOG_DEBUG);
    		$resql = $this->db->query($sql);
    		if ($resql)
    		{
    			$num = $this->db->num_rows($resql);
    			$i = 0;
    			while ($i < $num)
    			{
    				$obj = $this->db->fetch_object($resql);
    
    				$module=$obj->module;
    				$perms=$obj->perms;
    				$subperms=$obj->subperms;
    
    				if ($perms)
    				{
    					if ($subperms)
    					{
    						$this->rights->$module->$perms->$subperms = 1;
    					}
    					else
    					{
    						$this->rights->$module->$perms = 1;
    					}
    
    				}
    				$i++;
    			}
    			$this->db->free($resql);
    		}
    
    		if (! $moduletag)
    		{
    			// Si module etait non defini, alors on a tout charge, on peut donc considerer
    			// que les droits sont en cache (car tous charges) pour cet instance de user
    			$this->all_permissions_are_loaded=1;
    		}
    		else
    		{
    			// Si module defini, on le marque comme charge en cache
    			$this->_tab_loaded[$moduletag]=1;
    		}
    	}
    
    	/**
    	 *  Change status of a user
    	 *
    	 *	@param	int		$statut		Status to set
    	 *  @return int     			<0 if KO, 0 if nothing is done, >0 if OK
    	 */
    	function setstatus($statut)
    	{
    		global $conf,$langs,$user;
    
    		$error=0;
    
    		// Check parameters
    		if ($this->statut == $statut) return 0;
    		else $this->statut = $statut;
    
    		$this->db->begin();
    
    		// Desactive utilisateur
    		$sql = "UPDATE ".MAIN_DB_PREFIX."user";
    		$sql.= " SET statut = ".$this->statut;
    		$sql.= " WHERE rowid = ".$this->id;
    		$result = $this->db->query($sql);
    
    		dol_syslog(get_class($this)."::setstatus sql=".$sql);
    		if ($result)
    		{
    			// Appel des triggers
    			include_once(DOL_DOCUMENT_ROOT . "/core/class/interfaces.class.php");
    			$interface=new Interfaces($this->db);
    			$result=$interface->run_triggers('USER_ENABLEDISABLE',$this,$user,$langs,$conf);
    			if ($result < 0) { $error++; $this->errors=$interface->errors; }
    			// Fin appel triggers
    		}
    
    		if ($error)
    		{
    			$this->db->rollback();
    			return -$error;
    		}
    		else
    		{
    			$this->db->commit();
    			return 1;
    		}
    	}
    
    
    	/**
    	 *    	Delete the user
    	 *
    	 * 		@return		int		<0 if KO, >0 if OK
    	 */
    	function delete()
    	{
    		global $user,$conf,$langs;
    
    		$error=0;
    
    		$this->db->begin();
    
    		$this->fetch($this->id);
    
    		// Supprime droits
    		$sql = "DELETE FROM ".MAIN_DB_PREFIX."user_rights WHERE fk_user = ".$this->id;
    		if ($this->db->query($sql))
    		{
    
    		}
    
    		// Remove group
    		$sql = "DELETE FROM ".MAIN_DB_PREFIX."usergroup_user WHERE fk_user  = ".$this->id;
    		if ($this->db->query($sql))
    		{
    
    		}
    
    		// Si contact, supprime lien
    		if ($this->contact_id)
    		{
    			$sql = "UPDATE ".MAIN_DB_PREFIX."socpeople SET fk_user_creat = null WHERE rowid = ".$this->contact_id;
    			if ($this->db->query($sql))
    			{
    
    			}
    		}
    
    		// Supprime utilisateur
    		$sql = "DELETE FROM ".MAIN_DB_PREFIX."user WHERE rowid = $this->id";
    		$result = $this->db->query($sql);
    
    		if ($result)
    		{
    			// Appel des triggers
    			include_once(DOL_DOCUMENT_ROOT . "/core/class/interfaces.class.php");
    			$interface=new Interfaces($this->db);
    			$result=$interface->run_triggers('USER_DELETE',$this,$user,$langs,$conf);
    			if ($result < 0) { $error++; $this->errors=$interface->errors; }
    			// Fin appel triggers
    
    			$this->db->commit();
    			return 1;
    		}
    		else
    		{
    			$this->db->rollback();
    			return -1;
    		}
    	}
    
    	/**
    	 *  Create a user into database
    	 *
    	 *  @param	User	$user        	Objet user qui demande la creation
    	 *  @param  int		$notrigger		1 ne declenche pas les triggers, 0 sinon
    	 *  @return int			         	<0 si KO, id compte cree si OK
    	 */
    	function create($user,$notrigger=0)
    	{
    		global $conf,$langs;
    
    		// Clean parameters
    		$this->login = trim($this->login);
    		if (! isset($this->entity)) $this->entity=$conf->entity;	// If not defined, we use default value
    
    		dol_syslog(get_class($this)."::create login=".$this->login.", user=".(is_object($user)?$user->id:''), LOG_DEBUG);
    
    		// Check parameters
    		if (! empty($conf->global->USER_MAIL_REQUIRED) && ! isValidEMail($this->email))
    		{
    			$langs->load("errors");
    			$this->error = $langs->trans("ErrorBadEMail",$this->email);
    			return -1;
    		}
    
    		$this->datec = dol_now();
    
    		$error=0;
    		$this->db->begin();
    
    		$sql = "SELECT login FROM ".MAIN_DB_PREFIX."user";
    		$sql.= " WHERE login ='".$this->db->escape($this->login)."'";
    		$sql.= " AND entity IN (0,".$conf->entity.")";
    
    		dol_syslog("User::Create sql=".$sql, LOG_DEBUG);
    		$resql=$this->db->query($sql);
    		if ($resql)
    		{
    			$num = $this->db->num_rows($resql);
    			$this->db->free($resql);
    
    			if ($num)
    			{
    				$this->error = 'ErrorLoginAlreadyExists';
    				dol_syslog(get_class($this)."::create ".$this->error, LOG_WARNING);
    				$this->db->rollback();
    				return -6;
    			}
    			else
    			{
    				$sql = "INSERT INTO ".MAIN_DB_PREFIX."user (datec,login,ldap_sid,entity)";
    				$sql.= " VALUES('".$this->db->idate($this->datec)."','".$this->db->escape($this->login)."','".$this->ldap_sid."',".$this->entity.")";
    				$result=$this->db->query($sql);
    
    				dol_syslog(get_class($this)."::create sql=".$sql, LOG_DEBUG);
    				if ($result)
    				{
    					$this->id = $this->db->last_insert_id(MAIN_DB_PREFIX."user");
    
    					// Set default rights
    					if ($this->set_default_rights() < 0)
    					{
    						$this->error=$this->db->error();
    						$this->db->rollback();
    						return -5;
    					}
    
    					// Update minor fields
    					$result = $this->update($user,1,1);
    					if ($result < 0)
    					{
    						$this->db->rollback();
    						return -4;
    					}
    
    					if (! empty($conf->global->STOCK_USERSTOCK_AUTOCREATE))
    					{
    						require_once(DOL_DOCUMENT_ROOT."/product/stock/class/entrepot.class.php");
    						$langs->load("stocks");
    						$entrepot = new Entrepot($this->db);
    						$entrepot->libelle = $langs->trans("PersonalStock",$this->nom);
    						$entrepot->description = $langs->trans("ThisWarehouseIsPersonalStock",$this->prenom,$this->nom);
    						$entrepot->statut = 1;
    						$entrepot->create($user);
    					}
    
    					if (! $notrigger)
    					{
    						// Appel des triggers
    						include_once(DOL_DOCUMENT_ROOT . "/core/class/interfaces.class.php");
    						$interface = new Interfaces($this->db);
    						$result = $interface->run_triggers('USER_CREATE',$this,$user,$langs,$conf);
    						if ($result < 0) { $error++; $this->errors=$interface->errors; }
    						// Fin appel triggers
    					}
    
    					if (! $error)
    					{
    						$this->db->commit();
    						return $this->id;
    					}
    					else
    					{
    						$this->error=$interface->error;
    						dol_syslog(get_class($this)."::create ".$this->error, LOG_ERR);
    						$this->db->rollback();
    						return -3;
    					}
    				}
    				else
    				{
    					$this->error=$this->db->lasterror();
    					dol_syslog(get_class($this)."::create ".$this->error, LOG_ERR);
    					$this->db->rollback();
    					return -2;
    				}
    			}
    		}
    		else
    		{
    			$this->error=$this->db->lasterror();
    			dol_syslog(get_class($this)."::create ".$this->error, LOG_ERR);
    			$this->db->rollback();
    			return -1;
    		}
    	}
    
    
    	/**
    	 *  Create a user from a contact object. User will be internal but if contact is linked to a third party, user will be external
    	 *
    	 *  @param	Contact	$contact    Object for source contact
    	 * 	@param  string	$login      Login to force
    	 *  @param  string	$password   Password to force
    	 *  @return int 				<0 if error, if OK returns id of created user
    	 */
    	function create_from_contact($contact,$login='',$password='')
    	{
    		global $conf,$user,$langs;
    
    		$error=0;
    
    		// Positionne parametres
    		$this->admin		= 0;
    		$this->nom			= $contact->nom;			// TODO deprecated
    		$this->prenom		= $contact->prenom;	// TODO deprecated
    		$this->lastname		= $contact->nom;
    		$this->firstname	= $contact->prenom;
    		$this->email		= $contact->email;
    		$this->office_phone	= $contact->phone_pro;
    		$this->office_fax	= $contact->fax;
    		$this->user_mobile	= $contact->phone_mobile;
    
    		if (empty($login)) $login=strtolower(substr($contact->prenom, 0, 4)) . strtolower(substr($contact->nom, 0, 4));
    		$this->login = $login;
    
    		$this->db->begin();
    
    		// Cree et positionne $this->id
    		$result=$this->create($user);
    		if ($result > 0)
    		{
    			$sql = "UPDATE ".MAIN_DB_PREFIX."user";
    			$sql.= " SET fk_socpeople=".$contact->id;
    			if ($contact->socid) $sql.=", fk_societe=".$contact->socid;
    			$sql.= " WHERE rowid=".$this->id;
    			$resql=$this->db->query($sql);
    
    			dol_syslog(get_class($this)."::create_from_contact sql=".$sql, LOG_DEBUG);
    			if ($resql)
    			{
    				// Appel des triggers
    				include_once(DOL_DOCUMENT_ROOT . "/core/class/interfaces.class.php");
    				$interface = new Interfaces($this->db);
    				$result = $interface->run_triggers('USER_CREATE_FROM_CONTACT',$this,$user,$langs,$conf);
    				if ($result < 0) { $error++; $this->errors=$interface->errors; }
    				// Fin appel triggers
    
    				$this->db->commit();
    				return $this->id;
    			}
    			else
    			{
    				$this->error=$this->db->error();
    				dol_syslog(get_class($this)."::create_from_contact ".$this->error, LOG_ERR);
    
    				$this->db->rollback();
    				return -1;
    			}
    		}
    		else
    		{
    			// $this->error deja positionne
    			dol_syslog(get_class($this)."::create_from_contact - 0");
    
    			$this->db->rollback();
    			return $result;
    		}
    
    	}
    
    	/**
    	 *  Create a user into database from a member object
    	 *
    	 *  @param	Adherent	$member		Object member source
    	 * 	@param	string		$login		Login to force
    	 *  @return int						<0 if KO, if OK, return id of created account
    	 */
    	function create_from_member($member,$login='')
    	{
    		global $conf,$user,$langs;
    
    		// Positionne parametres
    		$this->admin = 0;
    		$this->nom = $member->nom;
    		$this->prenom = $member->prenom;
    		$this->email = $member->email;
    		$this->pass = $member->pass;
    
    		if (empty($login)) $login=strtolower(substr($member->prenom, 0, 4)) . strtolower(substr($member->nom, 0, 4));
    		$this->login = $login;
    
    		$this->db->begin();
    
    		// Cree et positionne $this->id
    		$result=$this->create($user);
    		if ($result > 0)
    		{
    			$result=$this->setPassword($user,$this->pass);
    
    			$sql = "UPDATE ".MAIN_DB_PREFIX."user";
    			$sql.= " SET fk_member=".$member->id;
    			if ($member->fk_soc) $sql.= ", fk_societe=".$member->fk_soc;
    			$sql.= " WHERE rowid=".$this->id;
    
    			dol_syslog(get_class($this)."::create_from_member sql=".$sql, LOG_DEBUG);
    			$resql=$this->db->query($sql);
    			if ($resql)
    			{
    				$this->db->commit();
    				return $this->id;
    			}
    			else
    			{
    				$this->error=$this->db->error();
    				dol_syslog(get_class($this)."::create_from_member - 1 - ".$this->error, LOG_ERR);
    
    				$this->db->rollback();
    				return -1;
    			}
    		}
    		else
    		{
    			// $this->error deja positionne
    			dol_syslog(get_class($this)."::create_from_member - 2 - ".$this->error, LOG_ERR);
    
    			$this->db->rollback();
    			return $result;
    		}
    	}
    
    	/**
    	 *    Affectation des permissions par defaut
    	 *
    	 *    @return     Si erreur <0, si ok renvoi le nbre de droits par defaut positionnes
    	 */
    	function set_default_rights()
    	{
    		global $conf;
    
    		$sql = "SELECT id FROM ".MAIN_DB_PREFIX."rights_def";
    		$sql.= " WHERE bydefault = 1";
    		$sql.= " AND entity = ".$conf->entity;
    
    		$resql=$this->db->query($sql);
    		if ($resql)
    		{
    			$num = $this->db->num_rows($resql);
    			$i = 0;
    			$rd = array();
    			while ($i < $num)
    			{
    				$row = $this->db->fetch_row($resql);
    				$rd[$i] = $row[0];
    				$i++;
    			}
    			$this->db->free($resql);
    		}
    		$i = 0;
    		while ($i < $num)
    		{
    
    			$sql = "DELETE FROM ".MAIN_DB_PREFIX."user_rights WHERE fk_user = $this->id AND fk_id=$rd[$i]";
    			$result=$this->db->query($sql);
    
    			$sql = "INSERT INTO ".MAIN_DB_PREFIX."user_rights (fk_user, fk_id) VALUES ($this->id, $rd[$i])";
    			$result=$this->db->query($sql);
    			if (! $result) return -1;
    			$i++;
    		}
    
    		return $i;
    	}
    
    	/**
    	 *  	Update a user into databse (and also password if this->pass is defined)
    	 *
    	 *		@param	User	$user				User qui fait la mise a jour
    	 *    	@param  int		$notrigger			1 ne declenche pas les triggers, 0 sinon
    	 *		@param	int		$nosyncmember		0=Synchronize linked member (standard info), 1=Do not synchronize linked member
    	 *		@param	int		$nosyncmemberpass	0=Synchronize linked member (password), 1=Do not synchronize linked member
    	 *    	@return int 		        		<0 si KO, >=0 si OK
    	 */
    	function update($user,$notrigger=0,$nosyncmember=0,$nosyncmemberpass=0)
    	{
    		global $conf, $langs;
    
    		$nbrowsaffected=0;
    		$error=0;
    
    		dol_syslog(get_class($this)."::update notrigger=".$notrigger.", nosyncmember=".$nosyncmember.", nosyncmemberpass=".$nosyncmemberpass);
    
    		// Clean parameters
    		$this->nom          = trim($this->nom);		// TODO deprecated
    		$this->prenom       = trim($this->prenom);  // TODO deprecated
    		$this->lastname     = trim($this->lastname);
    		$this->firstname    = trim($this->firstname);
    		$this->login        = trim($this->login);
    		$this->pass         = trim($this->pass);
    		$this->office_phone = trim($this->office_phone);
    		$this->office_fax   = trim($this->office_fax);
    		$this->user_mobile  = trim($this->user_mobile);
    		$this->email        = trim($this->email);
    		$this->signature    = trim($this->signature);
    		$this->note         = trim($this->note);
    		$this->openid       = trim(empty($this->openid)?'':$this->openid);    // Avoid warning
    		$this->webcal_login = trim($this->webcal_login);
    		$this->phenix_login = trim($this->phenix_login);
    		if ($this->phenix_pass != $this->phenix_pass_crypted)
    		{
    			$this->phenix_pass  = dol_hash(trim($this->phenix_pass));
    		}
    		$this->admin        = $this->admin?$this->admin:0;
    
    		// Check parameters
    		if (! empty($conf->global->USER_MAIL_REQUIRED) && ! isValidEMail($this->email))
    		{
    			$langs->load("errors");
    			$this->error = $langs->trans("ErrorBadEMail",$this->email);
    			return -1;
    		}
    
    		$this->db->begin();
    
    		// Mise a jour autres infos
    		$sql = "UPDATE ".MAIN_DB_PREFIX."user SET";
    		$sql.= " name = '".$this->db->escape($this->lastname)."'";
    		$sql.= ", firstname = '".$this->db->escape($this->firstname)."'";
    		$sql.= ", login = '".$this->db->escape($this->login)."'";
    		$sql.= ", admin = ".$this->admin;
    		$sql.= ", office_phone = '".$this->db->escape($this->office_phone)."'";
    		$sql.= ", office_fax = '".$this->db->escape($this->office_fax)."'";
    		$sql.= ", user_mobile = '".$this->db->escape($this->user_mobile)."'";
    		$sql.= ", email = '".$this->db->escape($this->email)."'";
    		$sql.= ", signature = '".addslashes($this->signature)."'";
    		$sql.= ", webcal_login = '".$this->db->escape($this->webcal_login)."'";
    		$sql.= ", phenix_login = '".$this->db->escape($this->phenix_login)."'";
    		$sql.= ", phenix_pass = '".$this->db->escape($this->phenix_pass)."'";
    		$sql.= ", note = '".$this->db->escape($this->note)."'";
    		$sql.= ", photo = ".($this->photo?"'".$this->db->escape($this->photo)."'":"null");
    		$sql.= ", openid = ".($this->openid?"'".$this->db->escape($this->openid)."'":"null");
    		$sql.= ", entity = '".$this->entity."'";
    		$sql.= " WHERE rowid = ".$this->id;
    
    		dol_syslog(get_class($this)."::update sql=".$sql, LOG_DEBUG);
    		$resql = $this->db->query($sql);
    		if ($resql)
    		{
    			$nbrowsaffected+=$this->db->affected_rows($resql);
    
    			// Update password
    			if ($this->pass)
    			{
    				if ($this->pass != $this->pass_indatabase && $this->pass != $this->pass_indatabase_crypted)
    				{
    					// Si mot de passe saisi et different de celui en base
    					$result=$this->setPassword($user,$this->pass,0,$notrigger,$nosyncmemberpass);
    					if (! $nbrowsaffected) $nbrowsaffected++;
    				}
    			}
    
    			// If user is linked to a member, remove old link to this member
    			if ($this->fk_member > 0)
    			{
    				$sql = "UPDATE ".MAIN_DB_PREFIX."user SET fk_member = NULL where fk_member = ".$this->fk_member;
    				dol_syslog(get_class($this)."::update sql=".$sql, LOG_DEBUG);
    				$resql = $this->db->query($sql);
    				if (! $resql) { $this->error=$this->db->error(); $this->db->rollback(); return -5; }
    			}
    			// Set link to user
    			$sql = "UPDATE ".MAIN_DB_PREFIX."user SET fk_member =".($this->fk_member>0?$this->fk_member:'null')." where rowid = ".$this->id;
    			dol_syslog(get_class($this)."::update sql=".$sql, LOG_DEBUG);
    			$resql = $this->db->query($sql);
    			if (! $resql) { $this->error=$this->db->error(); $this->db->rollback(); return -5; }
    
    			if ($nbrowsaffected)	// If something has changed in data
    			{
    				if ($this->fk_member > 0 && ! $nosyncmember)
    				{
    					require_once(DOL_DOCUMENT_ROOT."/adherents/class/adherent.class.php");
    
    					// This user is linked with a member, so we also update members informations
    					// if this is an update.
    					$adh=new Adherent($this->db);
    					$result=$adh->fetch($this->fk_member);
    
    					if ($result >= 0)
    					{
    						$adh->prenom=$this->firstname;
    						$adh->nom=$this->lastname;
    						$adh->login=$this->login;
    						$adh->pass=$this->pass;
    						$adh->societe=(empty($adh->societe) && $this->societe_id ? $this->societe_id : $adh->societe);
    
    						$adh->email=$this->email;
    						$adh->phone=$this->office_phone;
    						$adh->phone_mobile=$this->user_mobile;
    
    						$adh->note=$this->note;
    
    						$adh->user_id=$this->id;
    						$adh->user_login=$this->login;
    
    						$result=$adh->update($user,0,1);
    						if ($result < 0)
    						{
    							$this->error=$luser->error;
    							dol_syslog(get_class($this)."::update ".$this->error,LOG_ERR);
    							$error++;
    						}
    					}
    					else
    					{
    						$this->error=$adh->error;
    						$error++;
    					}
    				}
    			}
    
    			if (! $error && ! $notrigger)
    			{
    				// Appel des triggers
    				include_once(DOL_DOCUMENT_ROOT . "/core/class/interfaces.class.php");
    				$interface=new Interfaces($this->db);
    				$result=$interface->run_triggers('USER_MODIFY',$this,$user,$langs,$conf);
    				if ($result < 0) { $error++; $this->errors=$interface->errors; }
    				// Fin appel triggers
    			}
    
    			if (! $error)
    			{
    				$this->db->commit();
    				return $nbrowsaffected;
    			}
    			else
    			{
    				$this->error=$this->db->lasterror();
    				dol_syslog(get_class($this)."::update error=".$this->error,LOG_ERR);
    				$this->db->rollback();
    				return -1;
    			}
    		}
    		else
    		{
    			$this->error=$this->db->lasterror();
    			dol_syslog(get_class($this)."::update error=".$this->error,LOG_ERR);
    			$this->db->rollback();
    			return -2;
    		}
    
    	}
    
    	/**
    	 *    Mise e jour en base de la date de deniere connexion d'un utilisateur
    	 *	  Fonction appelee lors d'une nouvelle connexion
    	 *
    	 *    @return     <0 si echec, >=0 si ok
    	 */
    	function update_last_login_date()
    	{
    		$now=dol_now();
    
    		$sql = "UPDATE ".MAIN_DB_PREFIX."user SET";
    		$sql.= " datepreviouslogin = datelastlogin,";
    		$sql.= " datelastlogin = ".$this->db->idate($now).",";
    		$sql.= " tms = tms";    // La date de derniere modif doit changer sauf pour la mise a jour de date de derniere connexion
    		$sql.= " WHERE rowid = ".$this->id;
    
    		dol_syslog(get_class($this)."::update_last_login_date user->id=".$this->id." ".$sql, LOG_DEBUG);
    		$resql = $this->db->query($sql);
    		if ($resql)
    		{
    			$this->datepreviouslogin=$this->datelastlogin;
    			$this->datelastlogin=$now;
    			return 1;
    		}
    		else
    		{
    			$this->error=$this->db->lasterror().' sql='.$sql;
    			return -1;
    		}
    	}
    
    
    	/**
    	 *  Change password of a user
    	 *
    	 *  @param	User	$user             		Object user of user making change
    	 *  @param  string	$password         		New password in clear text (to generate if not provided)
    	 *	@param	int		$changelater			1=Change password only after clicking on confirm email
    	 *	@param	int		$notrigger				1=Does not launch triggers
    	 *	@param	int		$nosyncmember	        Do not synchronize linked member
    	 *  @return string 			          		If OK return clear password, 0 if no change, < 0 if error
    	 */
    	function setPassword($user, $password='', $changelater=0, $notrigger=0, $nosyncmember=0)
    	{
    		global $conf, $langs;
    		require_once(DOL_DOCUMENT_ROOT ."/core/lib/security.lib.php");
    
    		$error=0;
    
    		dol_syslog(get_class($this)."::setPassword user=".$user->id." password=".preg_replace('/./i','*',$password)." changelater=".$changelater." notrigger=".$notrigger." nosyncmember=".$nosyncmember, LOG_DEBUG);
    
    		// If new password not provided, we generate one
    		if (! $password)
    		{
    			$password=getRandomPassword('');
    		}
    
    		// Crypte avec md5
    		$password_crypted = dol_hash($password);
    
    		// Mise a jour
    		if (! $changelater)
    		{
    		    if (! is_object($this->oldcopy)) $this->oldcopy=dol_clone($this);
    
    		    $sql = "UPDATE ".MAIN_DB_PREFIX."user";
    			$sql.= " SET pass_crypted = '".$this->db->escape($password_crypted)."',";
    			$sql.= " pass_temp = null";
    			if (! empty($conf->global->DATABASE_PWD_ENCRYPTED))
    			{
    				$sql.= ", pass = null";
    			}
    			else
    			{
    				$sql.= ", pass = '".$this->db->escape($password)."'";
    			}
    			$sql.= " WHERE rowid = ".$this->id;
    
    			dol_syslog(get_class($this)."::setPassword sql=hidden", LOG_DEBUG);
    			//dol_syslog("User::Password sql=".$sql);
    			$result = $this->db->query($sql);
    			if ($result)
    			{
    				if ($this->db->affected_rows($result))
    				{
    					$this->pass=$password;
    					$this->pass_indatabase=$password;
    					$this->pass_indatabase_crypted=$password_crypted;
    
    					if ($this->fk_member && ! $nosyncmember)
    					{
    						require_once(DOL_DOCUMENT_ROOT."/adherents/class/adherent.class.php");
    
    						// This user is linked with a member, so we also update members informations
    						// if this is an update.
    						$adh=new Adherent($this->db);
    						$result=$adh->fetch($this->fk_member);
    
    						if ($result >= 0)
    						{
    							$result=$adh->setPassword($user,$this->pass,0,1);	// Cryptage non gere dans module adherent
    							if ($result < 0)
    							{
    								$this->error=$adh->error;
    								dol_syslog(get_class($this)."::setPassword ".$this->error,LOG_ERR);
    								$error++;
    							}
    						}
    						else
    						{
    							$this->error=$adh->error;
    							$error++;
    						}
    					}
    
    					dol_syslog(get_class($this)."::setPassword notrigger=".$notrigger." error=".$error,LOG_DEBUG);
    
    					if (! $error && ! $notrigger)
    					{
    						// Appel des triggers
    						include_once(DOL_DOCUMENT_ROOT . "/core/class/interfaces.class.php");
    						$interface=new Interfaces($this->db);
    						$result=$interface->run_triggers('USER_NEW_PASSWORD',$this,$user,$langs,$conf);
    						if ($result < 0) $this->errors=$interface->errors;
    						// Fin appel triggers
    					}
    
    					return $this->pass;
    				}
    				else
    				{
    					return 0;
    				}
    			}
    			else
    			{
    				dol_print_error($this->db);
    				return -1;
    			}
    		}
    		else
    		{
    			// We store clear password in password temporary field.
    			// After receiving confirmation link, we will crypt it and store it in pass_crypted
    			$sql = "UPDATE ".MAIN_DB_PREFIX."user";
    			$sql.= " SET pass_temp = '".$this->db->escape($password)."'";
    			$sql.= " WHERE rowid = ".$this->id;
    
    			dol_syslog(get_class($this)."::setPassword sql=hidden", LOG_DEBUG);	// No log
    			$result = $this->db->query($sql);
    			if ($result)
    			{
    				return $password;
    			}
    			else
    			{
    				dol_print_error($this->db);
    				return -3;
    			}
    		}
    	}
    
    
    	/**
    	 *  Envoie mot de passe par mail
    	 *
    	 *  @param	User	$user           Object user de l'utilisateur qui fait l'envoi
    	 *  @param	string	$password       Nouveau mot de passe
    	 *	@param	int		$changelater	1=Change password only after clicking on confirm email
    	 *  @return int 		            < 0 si erreur, > 0 si ok
    	 */
    	function send_password($user, $password='', $changelater=0)
    	{
    		global $conf,$langs;
    		global $dolibarr_main_url_root;
    
    		require_once DOL_DOCUMENT_ROOT."/core/class/CMailFile.class.php";
    
    		$subject = $langs->trans("SubjectNewPassword");
    		$msgishtml=0;
    
    		// Define $msg
    		$mesg = '';
    
    		$outputlangs=new Translate("",$conf);
    		if (isset($this->conf->MAIN_LANG_DEFAULT)
    		&& $this->conf->MAIN_LANG_DEFAULT != 'auto')
    		{	// If user has defined its own language (rare because in most cases, auto is used)
    			$outputlangs->getDefaultLang($this->conf->MAIN_LANG_DEFAULT);
    		}
    		else
    		{	// If user has not defined its own language, we used current language
    			$outputlangs=$langs;
    		}
    
    		// Define urlwithouturlroot
    		if (! empty($_SERVER["HTTP_HOST"])) // Autodetect main url root
    		{
    			$urlwithouturlroot='http://'.preg_replace('/'.preg_quote(DOL_URL_ROOT,'/').'$/i','',$_SERVER["HTTP_HOST"]);
    		}
    		else
    		{
    			$urlwithouturlroot=preg_replace('/'.preg_quote(DOL_URL_ROOT,'/').'$/i','',$dolibarr_main_url_root);
    		}
    		if (! empty($dolibarr_main_force_https)) $urlwithouturlroot=preg_replace('/http:/i','https:',$urlwithouturlroot);
    
    		// TODO Use outputlangs to translate messages
    		if (! $changelater)
    		{
    			$mesg.= "A request to change your Dolibarr password has been received.\n";
    			$mesg.= "This is your new keys to login:\n\n";
    			$mesg.= $langs->trans("Login")." : $this->login\n";
    			$mesg.= $langs->trans("Password")." : $password\n\n";
    			$mesg.= "\n";
    			$url = $urlwithouturlroot.DOL_URL_ROOT;
    			$mesg.= 'Click here to go to Dolibarr: '.$url."\n\n";
    			$mesg.= "--\n";
    			$mesg.= $user->getFullName($langs);	// Username that make then sending
    		}
    		else
    		{
    			$mesg.= "A request to change your Dolibarr password has been received.\n";
    			$mesg.= "Your new key to login will be:\n\n";
    			$mesg.= $langs->trans("Login")." : $this->login\n";
    			$mesg.= $langs->trans("Password")." : $password\n\n";
    			$mesg.= "\n";
    			$mesg.= "You must click on the folowing link to validate its change.\n";
    			$url = $urlwithouturlroot.DOL_URL_ROOT.'/user/passwordforgotten.php?action=validatenewpassword&username='.$this->login."&passwordmd5=".dol_hash($password);
    			$mesg.= $url."\n\n";
    			$mesg.= "If you didn't ask anything, just forget this email\n\n";
    			dol_syslog("User::send_password url=".$url);
    		}
    		$mailfile = new CMailFile(
    			$subject,
    			$this->email,
    			$conf->notification->email_from,
    			$mesg,
    			array(),
    			array(),
    			array(),
    		    '',
    		    '',
    			0,
    			$msgishtml
    		);
    
    		if ($mailfile->sendfile())
    		{
    			return 1;
    		}
    		else
    		{
    			$langs->trans("errors");
    			$this->error=$langs->trans("ErrorFailedToSendPassword").' '.$mailfile->error;
    			return -1;
    		}
    	}
    
    	/**
    	 * 		Renvoie la derniere erreur fonctionnelle de manipulation de l'objet
    	 *
    	 * 		@return    string      chaine erreur
    	 */
    	function error()
    	{
    		return $this->error;
    	}
    
    
    	/**
    	 *    	Read clicktodial information for user
    	 *
    	 * 		@return		<0 if KO, >0 if OK
    	 */
    	function fetch_clicktodial()
    	{
    		$sql = "SELECT login, pass, poste ";
    		$sql.= " FROM ".MAIN_DB_PREFIX."user_clicktodial as u";
    		$sql.= " WHERE u.fk_user = ".$this->id;
    
    		$resql = $this->db->query($sql);
    		if ($resql)
    		{
    			if ($this->db->num_rows($resql))
    			{
    				$obj = $this->db->fetch_object($resql);
    
    				$this->clicktodial_login = $obj->login;
    				$this->clicktodial_password = $obj->pass;
    				$this->clicktodial_poste = $obj->poste;
    			}
    
    			$this->clicktodial_loaded = 1;	// Data loaded (found or not)
    
    			$this->db->free($resql);
    			return 1;
    		}
    		else
    		{
    			$this->error=$this->db->error();
    			return -1;
    		}
    	}
    
    	/**
    	 *  Update clicktodial info
    	 *
    	 *  @return	void
    	 */
    	function update_clicktodial()
    	{
    		$this->db->begin();
    
    		$sql = "DELETE FROM ".MAIN_DB_PREFIX."user_clicktodial";
    		$sql .= " WHERE fk_user = ".$this->id;
    
    		$result = $this->db->query($sql);
    
    		$sql = "INSERT INTO ".MAIN_DB_PREFIX."user_clicktodial";
    		$sql .= " (fk_user,login,pass,poste)";
    		$sql .= " VALUES (".$this->id;
    		$sql .= ", '". $this->clicktodial_login ."'";
    		$sql .= ", '". $this->clicktodial_password ."'";
    		$sql .= ", '". $this->clicktodial_poste."')";
    
    		$result = $this->db->query($sql);
    
    		if ($result)
    		{
    			$this->db->commit();
    			return 0;
    		}
    		else
    		{
    			$this->db->rollback();
    			$this->error=$this->db->error();
    			return -1;
    		}
    	}
    
    
    	/**
    	 *  Add user into a group
    	 *
    	 *  @param	Group	$group      Id of group
    	 *  @param  int		$entity     Entity
    	 *  @param  int		$notrigger  Disable triggers
    	 *  @return int  				<0 if KO, >0 if OK
    	 */
    	function SetInGroup($group, $entity, $notrigger=0)
    	{
    		global $conf, $langs, $user;
    
    		$error=0;
    
    		$this->db->begin();
    
    		$sql = "DELETE FROM ".MAIN_DB_PREFIX."usergroup_user";
    		$sql.= " WHERE fk_user  = ".$this->id;
    		$sql.= " AND fk_usergroup = ".$group;
    		$sql.= " AND entity = ".$entity;
    
    		$result = $this->db->query($sql);
    
    		$sql = "INSERT INTO ".MAIN_DB_PREFIX."usergroup_user (entity, fk_user, fk_usergroup)";
    		$sql.= " VALUES (".$entity.",".$this->id.",".$group.")";
    
    		$result = $this->db->query($sql);
    		if ($result)
    		{
    			if (! $error && ! $notrigger)
    			{
    				// Appel des triggers
    				include_once(DOL_DOCUMENT_ROOT . "/core/class/interfaces.class.php");
    				$interface=new Interfaces($this->db);
    				$result=$interface->run_triggers('USER_SETINGROUP',$this,$user,$langs,$conf);
    				if ($result < 0) { $error++; $this->errors=$interface->errors; }
    				// Fin appel triggers
    			}
    
    			if (! $error)
    			{
    				$this->db->commit();
    				return 1;
    			}
    			else
    			{
    				$this->error=$interface->error;
    				dol_syslog(get_class($this)."::SetInGroup ".$this->error, LOG_ERR);
    				$this->db->rollback();
    				return -2;
    			}
    		}
    		else
    		{
    			$this->error=$this->db->lasterror();
    			dol_syslog(get_class($this)."::SetInGroup ".$this->error, LOG_ERR);
    			$this->db->rollback();
    			return -1;
    		}
    	}
    
    	/**
    	 *  Remove a user from a group
    	 *
    	 *  @param	Group   $group       Id of group
    	 *  @param  int		$entity      Entity
    	 *  @param  int		$notrigger   Disable triggers
    	 *  @return int  			     <0 if KO, >0 if OK
    	 */
    	function RemoveFromGroup($group, $entity, $notrigger=0)
    	{
    		global $conf,$langs,$user;
    
    		$error=0;
    
    		$this->db->begin();
    
    		$sql = "DELETE FROM ".MAIN_DB_PREFIX."usergroup_user";
    		$sql.= " WHERE fk_user  = ".$this->id;
    		$sql.= " AND fk_usergroup = ".$group;
    		$sql.= " AND entity = ".$entity;
    
    		$result = $this->db->query($sql);
    		if ($result)
    		{
    			if (! $error && ! $notrigger)
    			{
    				// Appel des triggers
    				include_once(DOL_DOCUMENT_ROOT . "/core/class/interfaces.class.php");
    				$interface=new Interfaces($this->db);
    				$result=$interface->run_triggers('USER_REMOVEFROMGROUP',$this,$user,$langs,$conf);
    				if ($result < 0) { $error++; $this->errors=$interface->errors; }
    				// Fin appel triggers
    			}
    
    			if (! $error)
    			{
    				$this->db->commit();
    				return 1;
    			}
    			else
    			{
    				$this->error=$interface->error;
    				dol_syslog(get_class($this)."::RemoveFromGroup ".$this->error, LOG_ERR);
    				$this->db->rollback();
    				return -2;
    			}
    		}
    		else
    		{
    			$this->error=$this->db->lasterror();
    			dol_syslog(get_class($this)."::RemoveFromGroup ".$this->error, LOG_ERR);
    			$this->db->rollback();
    			return -1;
    		}
    	}
    
    	/**
    	 *  Return a link to the user card (with optionnaly the picto)
    	 * 	Use this->id,this->nom, this->prenom
    	 *
    	 *	@param	int		$withpicto		Include picto in link (0=No picto, 1=Inclut le picto dans le lien, 2=Picto seul)
    	 *	@param	string	$option			On what the link point to
    	 *	@return	string					String with URL
    	 */
    	function getNomUrl($withpicto=0,$option='')
    	{
    		global $langs;
    
    		$result='';
    
    		$lien = '<a href="'.DOL_URL_ROOT.'/user/fiche.php?id='.$this->id.'">';
    		$lienfin='</a>';
    
    		if ($option == 'xxx')
    		{
    			$lien = '<a href="'.DOL_URL_ROOT.'/user/fiche.php?id='.$this->id.'">';
    			$lienfin='</a>';
    		}
    
    		if ($withpicto) $result.=($lien.img_object($langs->trans("ShowUser"),'user').$lienfin);
    		if ($withpicto && $withpicto != 2) $result.=' ';
    		$result.=$lien.$this->getFullName($langs).$lienfin;
    		return $result;
    	}
    
    	/**
    	 *  Renvoie login clicable (avec eventuellement le picto)
    	 *
    	 *	@param	int		$withpicto		Inclut le picto dans le lien
    	 *	@param	string	$option			Sur quoi pointe le lien
    	 *	@return	string					Chaine avec URL
    	 */
    	function getLoginUrl($withpicto=0,$option='')
    	{
    		global $langs;
    
    		$result='';
    
    		$lien = '<a href="'.DOL_URL_ROOT.'/user/fiche.php?id='.$this->id.'">';
    		$lienfin='</a>';
    
    		if ($option == 'xxx')
    		{
    			$lien = '<a href="'.DOL_URL_ROOT.'/user/fiche.php?id='.$this->id.'">';
    			$lienfin='</a>';
    		}
    
    		if ($withpicto) $result.=($lien.img_object($langs->trans("ShowUser"),'user').$lienfin.' ');
    		$result.=$lien.$this->login.$lienfin;
    		return $result;
    	}
    
    	/**
    	 *  Return full name (civility+' '+name+' '+lastname)
    	 *
    	 *	@param	Translate	$langs			Language object for translation of civility
    	 *	@param	int			$option			0=No option, 1=Add civility
    	 * 	@param	int			$nameorder		-1=Auto, 0=Lastname+Firstname, 1=Firstname+Lastname
    	 * 	@return	string						String with full name
    	 */
    	function getFullName($langs,$option=0,$nameorder=-1)
    	{
    		global $conf;
    
    		$ret='';
    		if ($option && $this->civilite_id)
    		{
    			if ($langs->transnoentitiesnoconv("Civility".$this->civilite_id)!="Civility".$this->civilite_id) $ret.=$langs->transnoentitiesnoconv("Civility".$this->civilite_id).' ';
    			else $ret.=$this->civilite_id.' ';
    		}
    
    		// If order not defined, we use the setup
    		if ($nameorder < 0) $nameorder=(! $conf->global->MAIN_FIRSTNAME_NAME_POSITION);
    
    		if ($nameorder)
    		{
    			if ($this->firstname) $ret.=$this->firstname;
    			if ($this->firstname && $this->lastname) $ret.=' ';
    			if ($this->lastname)      $ret.=$this->lastname;
    		}
    		else
    		{
    			if ($this->lastname)      $ret.=$this->lastname;
    			if ($this->firstname && $this->lastname) $ret.=' ';
    			if ($this->firstname) $ret.=$this->firstname;
    		}
    
    		return trim($ret);
    	}
    
    
    	/**
    	 *  Retourne le libelle du statut d'un user (actif, inactif)
    	 *
    	 *  @param	int		$mode          0=libelle long, 1=libelle court, 2=Picto + Libelle court, 3=Picto, 4=Picto + Libelle long
    	 *  @return	string 			       Label of status
    	 */
    	function getLibStatut($mode=0)
    	{
    		return $this->LibStatut($this->statut,$mode);
    	}
    
    	/**
    	 *  Renvoi le libelle d'un statut donne
    	 *
    	 *  @param	int		$statut        	Id statut
    	 *  @param  int		$mode          	0=libelle long, 1=libelle court, 2=Picto + Libelle court, 3=Picto, 4=Picto + Libelle long, 5=Libelle court + Picto
    	 *  @return string 			       	Label of status
    	 */
    	function LibStatut($statut,$mode=0)
    	{
    		global $langs;
    		$langs->load('users');
    
    		if ($mode == 0)
    		{
    			$prefix='';
    			if ($statut == 1) return $langs->trans('Enabled');
    			if ($statut == 0) return $langs->trans('Disabled');
    		}
    		if ($mode == 1)
    		{
    			if ($statut == 1) return $langs->trans('Enabled');
    			if ($statut == 0) return $langs->trans('Disabled');
    		}
    		if ($mode == 2)
    		{
    			if ($statut == 1) return img_picto($langs->trans('Enabled'),'statut4').' '.$langs->trans('Enabled');
    			if ($statut == 0) return img_picto($langs->trans('Disabled'),'statut5').' '.$langs->trans('Disabled');
    		}
    		if ($mode == 3)
    		{
    			if ($statut == 1) return img_picto($langs->trans('Enabled'),'statut4');
    			if ($statut == 0) return img_picto($langs->trans('Disabled'),'statut5');
    		}
    		if ($mode == 4)
    		{
    			if ($statut == 1) return img_picto($langs->trans('Enabled'),'statut4').' '.$langs->trans('Enabled');
    			if ($statut == 0) return img_picto($langs->trans('Disabled'),'statut5').' '.$langs->trans('Disabled');
    		}
    		if ($mode == 5)
    		{
    			if ($statut == 1) return $langs->trans('Enabled').' '.img_picto($langs->trans('Enabled'),'statut4');
    			if ($statut == 0) return $langs->trans('Disabled').' '.img_picto($langs->trans('Disabled'),'statut5');
    		}
    	}
    
    
    	/**
    	 *	Retourne chaine DN complete dans l'annuaire LDAP pour l'objet
    	 *
    	 *	@param	string	$info		Info string loaded by _load_ldap_info
    	 *	@param	int		$mode		0=Return full DN (uid=qqq,ou=xxx,dc=aaa,dc=bbb)
    	 *								1=
    	 *								2=Return key only (uid=qqq)
    	 *	@return	string				DN
    	 */
    	function _load_ldap_dn($info,$mode=0)
    	{
    		global $conf;
    		$dn='';
    		if ($mode==0) $dn=$conf->global->LDAP_KEY_USERS."=".$info[$conf->global->LDAP_KEY_USERS].",".$conf->global->LDAP_USER_DN;
    		if ($mode==1) $dn=$conf->global->LDAP_USER_DN;
    		if ($mode==2) $dn=$conf->global->LDAP_KEY_USERS."=".$info[$conf->global->LDAP_KEY_USERS];
    		return $dn;
    	}
    
    	/**
    	 *	Initialize the info array (array of LDAP values) that will be used to call LDAP functions
    	 *
    	 *	@return		array		Tableau info des attributs
    	 */
    	function _load_ldap_info()
    	{
    		global $conf,$langs;
    
    		$info=array();
    
    		// Object classes
    		$info["objectclass"]=explode(',',$conf->global->LDAP_USER_OBJECT_CLASS);
    
    		$this->fullname=$this->getFullName($langs);
    
    		// Champs
    		if ($this->fullname && $conf->global->LDAP_FIELD_FULLNAME)   $info[$conf->global->LDAP_FIELD_FULLNAME] = $this->fullname;
    		if ($this->lastname && $conf->global->LDAP_FIELD_NAME)       $info[$conf->global->LDAP_FIELD_NAME] = $this->lastname;
    		if ($this->firstname && $conf->global->LDAP_FIELD_FIRSTNAME) $info[$conf->global->LDAP_FIELD_FIRSTNAME] = $this->firstname;
    		if ($this->login && $conf->global->LDAP_FIELD_LOGIN)         $info[$conf->global->LDAP_FIELD_LOGIN] = $this->login;
    		if ($this->login && $conf->global->LDAP_FIELD_LOGIN_SAMBA)   $info[$conf->global->LDAP_FIELD_LOGIN_SAMBA] = $this->login;
    		if ($this->pass && $conf->global->LDAP_FIELD_PASSWORD)       $info[$conf->global->LDAP_FIELD_PASSWORD] = $this->pass;	// this->pass = mot de passe non crypte
    		if ($this->ldap_sid && $conf->global->LDAP_FIELD_SID)        $info[$conf->global->LDAP_FIELD_SID] = $this->ldap_sid;
    		if ($this->societe_id > 0)
    		{
    			$soc = new Societe($this->db);
    			$soc->fetch($this->societe_id);
    
    			$info["o"] = $soc->nom;
    			if ($soc->client == 1)      $info["businessCategory"] = "Customers";
    			if ($soc->client == 2)      $info["businessCategory"] = "Prospects";
    			if ($soc->fournisseur == 1) $info["businessCategory"] = "Suppliers";
    		}
    		if ($this->address && $conf->global->LDAP_FIELD_ADDRESS)     $info[$conf->global->LDAP_FIELD_ADDRESS] = $this->address;
    		if ($this->zip && $conf->global->LDAP_FIELD_ZIP)             $info[$conf->global->LDAP_FIELD_ZIP] = $this->zip;
    		if ($this->town && $conf->global->LDAP_FIELD_TOWN)           $info[$conf->global->LDAP_FIELD_TOWN] = $this->town;
    		if ($this->office_phone && $conf->global->LDAP_FIELD_PHONE)  $info[$conf->global->LDAP_FIELD_PHONE] = $this->office_phone;
    		if ($this->user_mobile && $conf->global->LDAP_FIELD_MOBILE)  $info[$conf->global->LDAP_FIELD_MOBILE] = $this->user_mobile;
    		if ($this->office_fax && $conf->global->LDAP_FIELD_FAX)	     $info[$conf->global->LDAP_FIELD_FAX] = $this->office_fax;
    		if ($this->note && $conf->global->LDAP_FIELD_DESCRIPTION)    $info[$conf->global->LDAP_FIELD_DESCRIPTION] = $this->note;
    		if ($this->email && $conf->global->LDAP_FIELD_MAIL)          $info[$conf->global->LDAP_FIELD_MAIL] = $this->email;
    
    		if ($conf->global->LDAP_SERVER_TYPE == 'egroupware')
    		{
    			$info["objectclass"][4] = "phpgwContact"; // compatibilite egroupware
    
    			$info['uidnumber'] = $this->id;
    
    			$info['phpgwTz']      = 0;
    			$info['phpgwMailType'] = 'INTERNET';
    			$info['phpgwMailHomeType'] = 'INTERNET';
    
    			$info["phpgwContactTypeId"] = 'n';
    			$info["phpgwContactCatId"] = 0;
    			$info["phpgwContactAccess"] = "public";
    
    			if (dol_strlen($this->egroupware_id) == 0)
    			{
    				$this->egroupware_id = 1;
    			}
    
    			$info["phpgwContactOwner"] = $this->egroupware_id;
    
    			if ($this->email) $info["rfc822Mailbox"] = $this->email;
    			if ($this->phone_mobile) $info["phpgwCellTelephoneNumber"] = $this->phone_mobile;
    		}
    
    		return $info;
    	}
    
    
    	/**
    	 *  Initialise an instance with random values.
    	 *  Used to build previews or test instances.
    	 *	id must be 0 if object instance is a specimen.
    	 *
    	 *  @return	void
    	 */
    	function initAsSpecimen()
    	{
    		global $user,$langs;
    
    		// Initialise parametres
    		$this->id=0;
    		$this->ref = 'SPECIMEN';
    		$this->specimen=1;
    
    		$this->nom='DOLIBARR';
    		$this->prenom='SPECIMEN';
    		$this->note='This is a note';
    		$this->email='email@specimen.com';
    		$this->office_phone='0999999999';
    		$this->office_fax='0999999998';
    		$this->user_mobile='0999999997';
    		$this->admin=0;
    		$this->login='dolibspec';
    		$this->pass='dolibspec';
    		$this->datec=time();
    		$this->datem=time();
    		$this->webcal_login='dolibspec';
    
    		$this->datelastlogin=time();
    		$this->datepreviouslogin=time();
    		$this->statut=1;
    
    		$this->societe_id = 1;
    	}
    
    	/**
    	 *  Load info of user object
    	 *
    	 *  @param  int		$id     Id of user to load
    	 *  @return	void
    	 */
    	function info($id)
    	{
    		$sql = "SELECT u.rowid, u.login as ref, u.datec,";
    		$sql.= " u.tms as date_modification, u.entity";
    		$sql.= " FROM ".MAIN_DB_PREFIX."user as u";
    		$sql.= " WHERE u.rowid = ".$id;
    
    		$result=$this->db->query($sql);
    		if ($result)
    		{
    			if ($this->db->num_rows($result))
    			{
    				$obj = $this->db->fetch_object($result);
    
    				$this->id = $obj->rowid;
    
    				$this->ref			     = (! $obj->ref) ? $obj->rowid : $obj->ref;
    				$this->date_creation     = $this->db->jdate($obj->datec);
    				$this->date_modification = $this->db->jdate($obj->date_modification);
    				$this->entity            = $obj->entity;
    			}
    
    			$this->db->free($result);
    
    		}
    		else
    		{
    			dol_print_error($this->db);
    		}
    	}
    
    
    	/**
    	 *    Return number of mass Emailing received by this contacts with its email
    	 *
    	 *    @return       int     Number of EMailings
    	 */
    	function getNbOfEMailings()
    	{
    		$sql = "SELECT count(mc.email) as nb";
    		$sql.= " FROM ".MAIN_DB_PREFIX."mailing_cibles as mc";
    		$sql.= " WHERE mc.email = '".$this->db->escape($this->email)."'";
    		$sql.= " AND mc.statut=1";      // -1 erreur, 0 non envoye, 1 envoye avec succes
    		$resql=$this->db->query($sql);
    		if ($resql)
    		{
    			$obj = $this->db->fetch_object($resql);
    			$nb=$obj->nb;
    
    			$this->db->free($resql);
    			return $nb;
    		}
    		else
    		{
    			$this->error=$this->db->error();
    			return -1;
    		}
    	}
    
    	/**
    	 *  Return number of existing users
    	 *
    	 *  @param	string	$limitTo	Limit to 'active' or 'superadmin' users
    	 *  @param	int		$all		Return for all entities
    	 *  @return int  				Number of users
    	 */
    	function getNbOfUsers($limitTo='',$all=0)
    	{
    		global $conf;
    
    		$sql = "SELECT count(rowid) as nb";
    		$sql.= " FROM ".MAIN_DB_PREFIX."user";
    		if ($limitTo == 'superadmin')
    		{
    			$sql.= " WHERE entity = 0";
    		}
    		else
    		{
    			if ($all) $sql.= " WHERE entity = is not null";
    			else $sql.= " WHERE entity = ".$conf->entity;
    			if ($limitTo == 'active') $sql.= " AND statut = 1";
    		}
    
    		$resql=$this->db->query($sql);
    		if ($resql)
    		{
    			$obj = $this->db->fetch_object($resql);
    			$nb=$obj->nb;
    
    			$this->db->free($resql);
    			return $nb;
    		}
    		else
    		{
    			$this->error=$this->db->error();
    			return -1;
    		}
    	}
    
    }
    
    ?>