[aidenligne_francais_universite.git] / ecrire / prive.php

<?php

/***************************************************************************\
 *  SPIP, Systeme de publication pour l'internet                           *
 *                                                                         *
 *  Copyright (c) 2001-2007                                                *
 *  Arnaud Martin, Antoine Pitrou, Philippe Riviere, Emmanuel Saint-James  *
 *                                                                         *
 *  Ce programme est un logiciel libre distribue sous licence GNU/GPL.     *
 *  Pour plus de details voir le fichier COPYING.txt ou l'aide en ligne.   *
\***************************************************************************/

  // Script pour appeler un squelette apres s'etre authentifie

include_once 'inc_version.php';

include_spip('inc/cookie');

$auth = charger_fonction('auth', 'inc');
$auth = $auth();

if ($auth) {
	if ($auth===-1) exit();
	include_spip('inc/headers');
	if ($auth == '6forum') {
		$auth = '../?' . $_SERVER['QUERY_STRING'];
		preg_match(',^[^/]*//[^/]*(.*)/.*/$,',
				   url_de_base(),
				   $r);
		spip_setcookie('spip_session', $spip_session, time() + 3600 * 24 * 14, $r[1]);
	} else
	  $auth = generer_url_public('login',
			"url=" . 
			rawurlencode(str_replace('/./', '/',
				(_DIR_RESTREINT ? "" : _DIR_RESTREINT_ABS)
						 . str_replace('&amp;', '&', self()))), true);
	redirige_par_entete($auth);
 }

// En somme, est prive' ce qui est publiquement nomme'...

include_once 'public.php';
?>
Commit	Line	Data
	1	<?php
	2
	3	/***************************************************************************\
	4	* SPIP, Systeme de publication pour l'internet *
	5	* *
	6	* Copyright (c) 2001-2007 *
	7	* Arnaud Martin, Antoine Pitrou, Philippe Riviere, Emmanuel Saint-James *
	8	* *
	9	* Ce programme est un logiciel libre distribue sous licence GNU/GPL. *
	10	* Pour plus de details voir le fichier COPYING.txt ou l'aide en ligne. *
	11	\***************************************************************************/
	12
	13	// Script pour appeler un squelette apres s'etre authentifie
	14
	15	include_once 'inc_version.php';
	16
	17	include_spip('inc/cookie');
	18
	19	$auth = charger_fonction('auth', 'inc');
	20	$auth = $auth();
	21
	22	if ($auth) {
	23	if ($auth===-1) exit();
	24	include_spip('inc/headers');
	25	if ($auth == '6forum') {
	26	$auth = '../?' . $_SERVER['QUERY_STRING'];
	27	preg_match(',^[^/]//[^/](.)/./$,',
	28	url_de_base(),
	29	$r);
	30	spip_setcookie('spip_session', $spip_session, time() + 3600 * 24 * 14, $r[1]);
	31	} else
	32	$auth = generer_url_public('login',
	33	"url=" .
	34	rawurlencode(str_replace('/./', '/',
	35	(_DIR_RESTREINT ? "" : _DIR_RESTREINT_ABS)
	36	. str_replace('&', '&', self()))), true);
	37	redirige_par_entete($auth);
	38	}
	39
	40	// En somme, est prive' ce qui est publiquement nomme'...
	41
	42	include_once 'public.php';
	43	?>