Subversion Repositories Sites.tela-botanica.org

Rev

Rev 4 | Blame | Last modification | View Log | RSS feed

<?php

/***************************************************************************\
 *  SPIP, Systeme de publication pour l'internet                           *
 *                                                                         *
 *  Copyright (c) 2001-2005                                                *
 *  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.   *
\***************************************************************************/


if (!defined('_ECRIRE_INC_VERSION')) {
        include ("inc_version.php3");
}

include_ecrire('inc_meta.php3');
include_ecrire("inc_auth.php3");
include_ecrire("inc_presentation.php3");
include_ecrire("inc_calendrier.php");
include_ecrire("inc_texte.php3");
include_ecrire("inc_filtres.php3");
include_ecrire("inc_urls.php3");
include_ecrire("inc_layer.php3");
include_ecrire("inc_rubriques.php3");
include_ecrire("inc_forum.php3");
include_ecrire('inc_admin.php3');


//
// Preferences de presentation
//

if ($spip_lang_ecrire = $GLOBALS['_COOKIE']['spip_lang_ecrire']
AND $spip_lang_ecrire <> $auteur_session['lang']
AND changer_langue($spip_lang_ecrire)) {
        spip_query ("UPDATE spip_auteurs SET lang = '".addslashes($spip_lang_ecrire)
        ."' WHERE id_auteur = $connect_id_auteur");
        $auteur_session['lang'] = $spip_lang_ecrire;
        ajouter_session($auteur_session, $spip_session);
}

if ($set_couleur) {
        $prefs['couleur'] = floor($set_couleur);
        $prefs_mod = true;
}
if ($set_disp) {
        $prefs['display'] = floor($set_disp);
        $prefs_mod = true;
}
if ($set_options == 'avancees' OR $set_options == 'basiques') {
        $prefs['options'] = $set_options;
        $prefs_mod = true;
}
if ($prefs_mod) {
        spip_query ("UPDATE spip_auteurs SET prefs = '".addslashes(serialize($prefs))."' WHERE id_auteur = $connect_id_auteur");
}

if ($set_ecran) {
        // Poser un cookie, car ce reglage depend plus du navigateur que de l'utilisateur
        spip_setcookie('spip_ecran', $set_ecran, time() + 365 * 24 * 3600);
        $spip_ecran = $set_ecran;
}
if (!$spip_ecran) $spip_ecran = "etroit";


// Debloquer articles
if ($debloquer_article) {
        if ($debloquer_article <> 'tous')
                $where_id = "AND id_article=".intval($debloquer_article);
        $query = "UPDATE spip_articles SET auteur_modif='0' WHERE auteur_modif=$connect_id_auteur $where_id";
        spip_query ($query);
}

// deux globales (compatibilite ascendante)
$options      = $prefs['options'];
$spip_display = $prefs['display'];


// Vert
if (!$couleurs_spip[1]) $couleurs_spip[1] = array (
                "couleur_foncee" => "#9DBA00",
                "couleur_claire" => "#C5E41C",
                "couleur_lien" => "#657701",
                "couleur_lien_off" => "#A6C113"
);
// Violet clair
if (!$couleurs_spip[2]) $couleurs_spip[2] = array (
                "couleur_foncee" => "#eb68b3",
                "couleur_claire" => "#ffa9e6",
                "couleur_lien" => "#8F004D",
                "couleur_lien_off" => "#BE6B97"
);
// Orange
if (!$couleurs_spip[3]) $couleurs_spip[3] = array (
                "couleur_foncee" => "#fa9a00",
                "couleur_claire" => "#ffc000",
                "couleur_lien" => "#FF5B00",
                "couleur_lien_off" => "#B49280"
);
// Saumon
if (!$couleurs_spip[4]) $couleurs_spip[4] = array (
                "couleur_foncee" => "#CDA261",
                "couleur_claire" => "#FFDDAA",
                "couleur_lien" => "#AA6A09",
                "couleur_lien_off" => "#B79562"
);
//  Bleu pastelle
if (!$couleurs_spip[5]) $couleurs_spip[5] = array (
                "couleur_foncee" => "#5da7c5",
                "couleur_claire" => "#97d2e1",
                "couleur_lien" => "#116587",
                "couleur_lien_off" => "#81B7CD"
);
//  Gris
if (!$couleurs_spip[6]) $couleurs_spip[6] = array (
                "couleur_foncee" => "#85909A",
                "couleur_claire" => "#C0CAD4",
                "couleur_lien" => "#3B5063",
                "couleur_lien_off" => "#6D8499"
);


$choix_couleur = $prefs['couleur'];
if (strlen($couleurs_spip[$choix_couleur]['couleur_foncee']) < 7) $choix_couleur = 1;

$couleur_foncee = $couleurs_spip[$choix_couleur]['couleur_foncee'];
$couleur_claire = $couleurs_spip[$choix_couleur]['couleur_claire'];
$couleur_lien = $couleurs_spip[$choix_couleur]['couleur_lien'];
$couleur_lien_off = $couleurs_spip[$choix_couleur]['couleur_lien_off'];

//
// Gestion de version
//

$version_installee = (double) str_replace(',','.',lire_meta('version_installee'));
if ($version_installee <> $spip_version) {
        debut_page();
        if (!$version_installee) $version_installee = _T('info_anterieur');
        echo "<blockquote><blockquote><h4><font color='red'>"._T('info_message_technique')."</font><br> "._T('info_procedure_maj_version')."</h4>
        "._T('info_administrateur_site_01')." <a href='upgrade.php3'>"._T('info_administrateur_site_02')."</a></blockquote></blockquote><p>";
        fin_page();
        exit;
}


//
// Gestion de la configuration globale du site
//

if (!$adresse_site) {
        $nom_site_spip = lire_meta("nom_site");
        $adresse_site = lire_meta("adresse_site");
}
if (!$activer_breves){
        $activer_breves = lire_meta("activer_breves");
        $articles_mots = lire_meta("articles_mots");
}

if (!$activer_statistiques){
        $activer_statistiques = lire_meta("activer_statistiques");
}

if (!$nom_site_spip) {
        $nom_site_spip = _T('info_mon_site_spip');
        ecrire_meta("nom_site", $nom_site_spip);
        ecrire_metas();
}

if (!$adresse_site) {
        $adresse_site = "http://$HTTP_HOST".substr($REQUEST_URI, 0, strpos($REQUEST_URI, "/ecrire"));
        ecrire_meta("adresse_site", $adresse_site);
        ecrire_metas();
}


function tester_rubrique_vide($id_rubrique) {
        $query = "SELECT id_rubrique FROM spip_rubriques WHERE id_parent='$id_rubrique' LIMIT 0,1";
        list($n) = spip_fetch_array(spip_query($query));
        if ($n > 0) return false;

        $query = "SELECT id_article FROM spip_articles WHERE id_rubrique='$id_rubrique' AND (statut='publie' OR statut='prepa' OR statut='prop') LIMIT 0,1";
        list($n) = spip_fetch_array(spip_query($query));
        if ($n > 0) return false;

        $query = "SELECT id_breve FROM spip_breves WHERE id_rubrique='$id_rubrique' AND (statut='publie' OR statut='prop') LIMIT 0,1";
        list($n) = spip_fetch_array(spip_query($query));
        if ($n > 0) return false;

        $query = "SELECT id_syndic FROM spip_syndic WHERE id_rubrique='$id_rubrique' AND (statut='publie' OR statut='prop') LIMIT 0,1";
        list($n) = spip_fetch_array(spip_query($query));
        if ($n > 0) return false;

        $query = "SELECT id_document FROM spip_documents_rubriques WHERE id_rubrique='$id_rubrique' LIMIT 0,1";
        list($n) = spip_fetch_array(spip_query($query));
        if ($n > 0) return false;

        return true;
}


//
// Recuperation du cookie
//

$cookie_admin = $_COOKIE['spip_admin'];

// Supprimer rubrique
if ($supp_rubrique = intval($supp_rubrique) AND $connect_statut == '0minirezo' AND acces_rubrique($supp_rubrique)) {
        $query = "DELETE FROM spip_rubriques WHERE id_rubrique=$supp_rubrique";
        $result = spip_query($query);

        calculer_rubriques();
}

// Modifs forum
if ($controle_forum AND $id_controle_forum) {
        controler_statut_forum($controle_forum, $id_controle_forum);
        if ($redirect)
                redirige_par_entete($redirect);
}

?>