Subversion Repositories Sites.tela-botanica.org

Rev

Details | Last modification | View Log | RSS feed

Rev Author Line No. Line
4 david 1
<?php
2
 
3
/***************************************************************************\
4
 *  SPIP, Systeme de publication pour l'internet                           *
5
 *                                                                         *
6
 *  Copyright (c) 2001-2005                                                *
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
 
14
include ("inc_version.php3");
15
 
16
include_ecrire ("inc_auth.php3");
17
include_ecrire ("inc_import.php3");
18
include_ecrire ("inc_admin.php3");
19
include_ecrire ("inc_meta.php3");
20
include_ecrire("inc_texte.php3");
21
include_ecrire("inc_filtres.php3");
22
 
23
 
24
//
25
// Preferences de presentation
26
//
27
 
28
include_ecrire ("inc_lang.php3");
29
utiliser_langue_visiteur();
30
 
31
/* pourquoi rajouter une session ? Je remplace par les 2 lignes ci-dessus
32
 
33
if ($spip_lang_ecrire = $GLOBALS['_COOKIE']['spip_lang_ecrire']
34
AND $spip_lang_ecrire <> $auteur_session['lang']
35
AND changer_langue($spip_lang_ecrire)) {
36
	spip_query ("UPDATE spip_auteurs SET lang = '".addslashes($spip_lang_ecrire)
37
	."' WHERE id_auteur = $connect_id_auteur");
38
	$auteur_session['lang'] = $spip_lang_ecrire;
39
	ajouter_session($auteur_session, $spip_session);
40
}
41
*/
42
 
43
function verifier_version_sauvegarde ($archive) {
44
	global $spip_version;
45
	global $flag_gz;
46
 
47
	$ok = @file_exists(_DIR_SESSIONS . $archive);
48
	$gz = $flag_gz;
49
	$_fopen = ($gz) ? gzopen : fopen;
50
	$_fread = ($gz) ? gzread : fread;
51
	$buf_len = 1024; // la version doit etre dans le premier ko
52
 
53
	if ($ok) {
54
		$f = $_fopen(_DIR_SESSIONS . $archive, "rb");
55
		$buf = $_fread($f, $buf_len);
56
 
57
		if (ereg("<SPIP [^>]* version_base=\"([0-9\.]+)\" ", $buf, $regs)
58
			AND $regs[1] == $spip_version)
59
			return false; // c'est bon
60
		else
61
			return _T('avis_erreur_version_archive', array('archive' => $archive));
62
	} else
63
		return _T('avis_probleme_archive', array('archive' => $archive));
64
}
65
 
66
if ($archive) {
67
	$action = _T('info_restauration_sauvegarde', array('archive' => $archive));
68
	$commentaire = verifier_version_sauvegarde ($archive);
69
}
70
 
71
debut_admin($action, $commentaire);
72
 
73
 
74
$archive = _DIR_SESSIONS . $archive;
75
 
76
ecrire_meta("debut_restauration", "debut");
77
ecrire_meta("fichier_restauration", $archive);
78
ecrire_meta("status_restauration", "0");
79
ecrire_metas();
80
 
81
fin_admin($action);
82
 
83
redirige_par_entete("index.php3");
84
?>