Subversion Repositories eFlore/Applications.cel

<?php

// declare(encoding='UTF-8');

/**

 * Classe de gestion des utilisateurs

 *

 *

 * @internal   Mininum PHP version : 5.2

 * @category   CEL

 * @package    Services

 * @subpackage Bibliothèques

 * @version    0.1

 * @author     Aurelien PERONNET <aurelien@tela-botanica.org>

 * @license    GPL v3 <http://www.gnu.org/licenses/gpl.txt>

 * @license    CECILL v2 <http://www.cecill.info/licences/Licence_CeCILL_V2-en.txt>

 * @copyright  1999-2015 Tela Botanica <accueil@tela-botanica.org>

 */

class GestionUtilisateur extends Cel {

	/** contient le jeton SSO décodé, si une authentification a eu lieu avec succès */

	protected $token_decode;

	public function obtenirIdentiteConnectee() {

		$login_utilisateur = $this->getLoginUtilisateurVerifie();

		if ($login_utilisateur) {

			$utilisateur = $this->chargerInfosUtilisateur($login_utilisateur);

			$utilisateur['connecte'] = true;

		} else {

			$utilisateur = $this->getUtilisateurAnonyme();

		}

		return $utilisateur;

	}

	public function obtenirUtilisateurSiExiste($login_utilisateur) {

		$utilisateur = $this->getUtilisateurAnonyme();

		if ($utilisateur_existe = $this->chargerInfosUtilisateur($login_utilisateur)) {

			$utilisateur = $utilisateur_existe;

			$utilisateur['connecte'] = true;

		}

		return $utilisateur;

	}

	/**

	 * Retourne les informations contenues dans la table cel_utilisateurs_infos,

	 * pour un login (adresse courriel) donné

	 */

	protected function lireCelUtilisateursInfos($login) {

		$requete = 'SELECT * '.

				'FROM cel_utilisateurs_infos AS cu '.

				'WHERE courriel = '.Cel::db()->proteger($login).' '.

				' -- '.__FILE__.':'.__LINE__;

		$resultats = Cel::db()->requeter($requete);

		if (is_array($resultats) && count($resultats) > 0) {

			return $resultats[0];

		} else {

			return false;

		}

	}

	/**

	 * Retourne true si le profil local stocké dans cel_utilisateurs_infos

	 * n'est plus à jour par rapport aux informations du jeton SSO; si le

	 * jeton est vide, retourne false pour éviter de tout casser

	 */

	protected function profilAChange($infosCUI) {

		$aChange = false;

		if ($this->token_decode != null) {

			$aChange = ($this->token_decode['nom'] != $infosCUI['nom'])

				|| ($this->token_decode['intitule'] != $infosCUI['intitule'])

				|| ($this->token_decode['prenom'] != $infosCUI['prenom']);

		}

		//var_dump($aChange);

		return $aChange;

	}

	/**

	 * Met à jour cel_utilisateurs_infos en fonction des informations

	 * contenues par le jeton SSO; si ce dernier est vide, ne fait

	 * rien (boulette-proof)

	 */

	protected function mettreAJourProfilLocal() {

		//echo "Mise à jour profil local !!";

		if ($this->token_decode != null && $this->token_decode['id'] != '') {

			$requete = 'UPDATE cel_utilisateurs_infos SET'

				. ' nom = ' . Cel::db()->proteger($this->token_decode['nom']) . ', '

				. ' intitule = ' . Cel::db()->proteger($this->token_decode['intitule']) . ', '

				. ' prenom = ' . Cel::db()->proteger($this->token_decode['prenom'])

				. ' WHERE id_utilisateur = ' . Cel::db()->proteger($this->token_decode['id'])

				. ' -- '.__FILE__.':'.__LINE__

			;

			//var_dump($requete);

			Cel::db()->executer($requete);

		}

	}

	/**

	 * Répercute le nom et le prénom contenus dans le jeton SSO (si au

	 * moins un des deux n'est pas vide) dans toutes les observations

	 * et images de l'auteur; si le jeton SSO est vide, ne fait rien

	 * (boulette-proof)

	 *

	 * @TODO gérer l'intitulé un jour

	 */

	protected function mettreAJourCoordonneesDansObsEtImages() {

		//echo "Mise à jour obs et images !!";

		if ($this->token_decode != null && $this->token_decode['id'] != '' && ($this->token_decode['nom'] != '' || $this->token_decode['prenom'] != '')) {

			$requete = 'UPDATE cel_obs SET'

				. ' nom_utilisateur = ' . Cel::db()->proteger($this->token_decode['nom']) . ', '

				. ' prenom_utilisateur = ' . Cel::db()->proteger($this->token_decode['prenom'])

				. ' WHERE ce_utilisateur = ' . Cel::db()->proteger($this->token_decode['id']) // s'assurer qu'il y a des ' autour de l'ID sans quoi les hash MD5 matcheront !

				. ' -- '.__FILE__.':'.__LINE__

			;

			//var_dump($requete);

			Cel::db()->executer($requete);

			$requete = 'UPDATE cel_images SET'

				. ' nom_utilisateur = ' . Cel::db()->proteger($this->token_decode['nom']) . ', '

				. ' prenom_utilisateur = ' . Cel::db()->proteger($this->token_decode['prenom'])

				. ' WHERE ce_utilisateur = ' . Cel::db()->proteger($this->token_decode['id']) // s'assurer qu'il y a des ' autour de l'ID sans quoi les hash MD5 matcheront !

				. ' -- '.__FILE__.':'.__LINE__

			;

			//var_dump($requete);

			Cel::db()->executer($requete);

		}

	}

	/**

	 * Charge l'état de l'utilisateur en fonction du jeton SSO avec lequel celui-ci

	 * est identifié; si c'est la première fois que l'utilisateur se connecte au CeL,

	 * crée un profil local dans cel_utilisateurs_infos; si le profil a changé depuis

	 * la dernière connexion, le met à jour ainsi que les coordonnées dans les images

	 * et observations

	 *

	 * @param string $login le login (adresse courriel) de l'utilisateur

	 */

	private function chargerInfosUtilisateur($login) {

		//var_dump($this->token_decode);

		$infosCUI = $this->lireCelUtilisateursInfos($login);

		$retour = false;

		if ($infosCUI !== false) {

			// Les données du profil ont-elles changé depuis la dernière connexion ?

			if ($this->profilAChange($infosCUI)) {

				// mise à jour du profil local

				$this->mettreAJourProfilLocal();

				// mise à jour des obs et images

				$this->mettreAJourCoordonneesDansObsEtImages();

				// re-lecture du nouveau profil local (permet de détecter si la mise à jour s'est mal passée)

				$retour = $this->lireCelUtilisateursInfos($login);

			} else {

				$retour = $infosCUI;

			}

		} else {

			// première connexion au CeL !

			$this->initialiserInfosUtilisateur();

			$this->affecterDonneesWidgetSaisie($login, $retour);

		}

		// booleanisation des valeurs

		$retour['admin'] = ($retour['admin'] == 1);

		$retour['licence_acceptee'] = (isset($retour['licence_acceptee']) && ($retour['licence_acceptee'] == 1));

		return $retour;

	}

	private function utilisateurEstAutorise($id_utilisateur) {

		$autorise = false;

		$token = $this->getToken();

		// TODO: tester si le jeton contient réelement quelque chose ?

		if($token) {

			// On demande à l'annuaire si le jeton est bien valide

			$valide = file_get_contents($this->config['identification']['sso_url'].'/verifierjeton?token='.$token);

			$token_decode = $this->decoderToken($token);

			// Si l'utilisateur du token est bien le même que celui sur lequel on veut agir : OK

			if($token_decode['id'] == $id_utilisateur) {

				$autorise = true;

			} else {

				// Sinon on vérifie que l'utilisateur est admin

				$requete = "SELECT admin FROM cel_utilisateurs_infos WHERE id_utilisateur = ".Cel::db()->proteger($token_decode['id']);

				$resultat = Cel::db()->requeter($requete);

				$admin = false;

				if ($resultat && count($resultat) > 0) {

					$autorise = ($resultat[0]['admin'] == 1);

				}

			}

		} else {

			// pas de token, on vérifie bien qu'il s'agit d'une session temporaire

			$autorise = ($id_utilisateur == session_id());

		}

		return $autorise;

	}

	// renvoie false ou bien le login utilisateur actuel

	private function getLoginUtilisateurVerifie() {

		$token = $this->getToken();

		$login = false;

		if($token) {

			// On demande à l'annuaire si le jeton est bien valide

			// curl avec les options suivantes ignore le pb de certificat (pour tester en local)

			// @TODO CHANGER !

			$ch = curl_init();

			$timeout = 5;

			$url = $this->config['identification']['sso_url'].'/verifierjeton?token='.$token;

			curl_setopt($ch, CURLOPT_URL, $url);

			curl_setopt($ch, CURLOPT_RETURNTRANSFER, 1);

			curl_setopt($ch, CURLOPT_CONNECTTIMEOUT, $timeout);

			// équivalent de "-k"

			curl_setopt($ch, CURLOPT_SSL_VERIFYHOST, false);

			curl_setopt($ch, CURLOPT_SSL_VERIFYPEER, false);

			$valide = curl_exec($ch);

			curl_close($ch);

			//$valide = file_get_contents($this->config['identification']['sso_url'].'/verifierjeton?token='.$token);

			$login = ($valide === "true") ? $this->obtenirLoginParToken($token) : false;

		}

		return $login;

	}

	// @WTF doublon avec la méthode du dessus ? Qu'est-ce que c'est que ce bins ?

	protected function verifierJeton($jeton) {

		$urlServiceVerification = $this->conteneur->getParametre("urlServiceBaseAuth") . "verifierjeton";

		$urlServiceVerification .= "?token=" . $jeton;

		// file_get_contents râle si le certificat HTTPS est auto-signé

		//$retour = file_get_contents($urlServiceVerification);

		// curl avec les options suivantes ignore le pb de certificat (pour tester en local)

		$ch = curl_init();

		$timeout = 5;

		curl_setopt($ch, CURLOPT_URL, $urlServiceVerification);

		curl_setopt($ch, CURLOPT_RETURNTRANSFER, 1);

		curl_setopt($ch, CURLOPT_CONNECTTIMEOUT, $timeout);

		// équivalent de "-k"

		curl_setopt($ch, CURLOPT_SSL_VERIFYHOST, false);

		curl_setopt($ch, CURLOPT_SSL_VERIFYPEER, false);

		$data = curl_exec($ch);

		curl_close($ch);

		$retour = $data;

		$retour = json_decode($retour, true);

		return ($retour === true);

	}

	private function decoderToken($token) {

		$token_parts = explode('.', $token);

		return json_decode($this->urlsafeB64Decode($token_parts[1]), true);

	}

	/**

	 * Decode a string with URL-safe Base64.

	 * copié depuis firebase/jwt

	 *

	 * @param string $input A Base64 encoded string

	 * @return string A decoded string

	 */

	protected function urlsafeB64Decode($input)	{

		$remainder = strlen($input) % 4;

		if ($remainder) {

			$padlen = 4 - $remainder;

			$input .= str_repeat('=', $padlen);

		}

		return base64_decode(strtr($input, '-_', '+/'));

	}

	private function obtenirLoginParToken($token) {

		$this->token_decode = $this->decoderToken($token);

		return $this->token_decode['sub'];

	}

	private function getToken() {

		// Premier essai, dans le header

		$headers = apache_request_headers();

		$token = !empty($headers['Authorization']) ? $headers['Authorization'] : null;

		// Sinon dans $_REQUEST ?

		if($token == null) {

			$token = !empty($_REQUEST['Authorization']) ? $_REQUEST['Authorization'] : null;

		}

		return $token;

	}

	private function getUtilisateurAnonyme() {

		return array('connecte' => false,

				'id_utilisateur' => session_id(),

				'courriel' => '',

				'mot_de_passe' => '',

				'nom' => '',

				'prenom' => '',

				'licence_acceptee' => false,

				'preferences_utilisateur' => '',

				'admin' => false

		);

	}

	/**

	 * Lors de la première connexion au CeL, remplis la table cel_utilisateurs_infos avec

	 * les données du jeton SSO

	 */

	private function initialiserInfosUtilisateur() {

		$requete = 'INSERT INTO cel_utilisateurs_infos'

			. ' (id_utilisateur, intitule, prenom, nom, courriel, admin, licence_acceptee, preferences, date_premiere_utilisation )'

			. ' VALUES ('

			. Cel::db()->proteger($this->token_decode['id']) . ', '

			. Cel::db()->proteger($this->token_decode['intitule']) . ', '

			. Cel::db()->proteger($this->token_decode['prenom']) . ', '

			. Cel::db()->proteger($this->token_decode['nom']) . ', '

			. Cel::db()->proteger($this->token_decode['sub']) . ', '

			. "'0', '0', NULL, NOW()"

			. ' ) ON DUPLICATE KEY UPDATE date_premiere_utilisation = NOW()'

			. ' -- '.__FILE__.':'.__LINE__

		;

		Cel::db()->executer($requete);

	}

	/**

	 * Lors de la première connection au cel d'un utilisateur, affecte à son compte ses observations saisies

	 * dans les widgets de saisie, où seul son mail avait été conservé en attendant

	 * Enter description here ...

	 * @param string $mail_utilisateur

	 * @param array $infos_utilisateur

	 */

	private function affecterDonneesWidgetSaisie($mail_utilisateur, $infos_utilisateur) {

		//TODO tout ceci pourrait être simplifié sans avoir besoin d'instancier quoi que ce soit

		$gestion_obs = new GestionObservation($this->config);

		$gestion_img = new GestionImage($this->config);

		$gestion_obs->migrerObservationsMailVersId($mail_utilisateur, $infos_utilisateur);

		$gestion_img->migrerImagesMailVersId($mail_utilisateur, $infos_utilisateur);

		GestionMotsClesChemin::migrerMotsClesMailVersId($mail_utilisateur, $infos_utilisateur);

	}

}

/**

 * Compatibilité avec nginx - merci http://php.net/manual/fr/function.getallheaders.php

 */

if (! function_exists('apache_request_headers')) {

	function apache_request_headers() {

		$headers = '';

		foreach ($_SERVER as $name => $value) {

			if (substr($name, 0, 5) == 'HTTP_') {

				$headers[str_replace(' ', '-', ucwords(strtolower(str_replace('_', ' ', substr($name, 5)))))] = $value;

			}

		}

		return $headers;

	}

}

?>