source: spip-zone/_dev_/salvatore/trunk/inc_tradlang.php @ 119589

<?php

/*
    This file is part of Salvatore, the translation robot of Trad-lang (SPIP)

    Salvatore 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.

    Trad-Lang 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 Trad-Lang; if not, write to the Free Software
    Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307  USA

    Copyright 2003-2013
        Florent Jugla <florent.jugla@eledo.com>,
        Philippe Riviere <fil@rezo.net>,
        Chryjs <chryjs!@!free!.!fr>,
                kent1 <kent1@arscenic.info>
*/

// securite : en ligne de commande c tout
if (isset($_SERVER['SERVER_NAME'])) {
        die('en ligne de commande svp');
}

// modules demandes en ligne de commande
//$GLOBALS['modules'] = $_SERVER['argv'];
//array_shift($GLOBALS['modules']);

ini_set('memory_limit', '50M');

define('_DEBUG_TRAD_LANG', 1); // undef si on ne veut pas de messages
define('_SALVATORE', './');
define('_SALVATORE_TRADUCTION', './traductions/');
if (!defined('_DIR_RESTREINT_ABS')) {
        define('_DIR_RESTREINT_ABS', '../ecrire/');
}
define('_DIR_RACINE', '../');

// eviter les notice inutiles si les erreurs sont a un niveau (E_ALL)
// lors de l'inclusion des modules SPIP
$GLOBALS['HTTP_USER_AGENT']='shell';
$_SERVER['QUERY_STRING'] = '';
$_SERVER['HTTP_HOST'] = '';
$_SERVER['REQUEST_METHOD'] = '';
$_SERVER['HTTP_ACCEPT_LANGUAGE'] = 'fr_fr';
$GLOBALS['ip'] = getHostByName(getHostName());
$GLOBALS['SERVER_SOFTWARE'] = $_SERVER['SERVER_SOFTWARE'] = 'system';
$GLOBALS['REQUEST_METHOD']='$';
$GLOBALS['idx_lang']=0;

/* Prepare l'inclusion des modules SPIP */
require_once(_DIR_RESTREINT_ABS.'inc_version.php');


/* fin inclusion */

define('_SALVATORE_TMP', _SALVATORE.'tmp/');
if (!is_dir(_SALVATORE_TMP)) {
        die("\nErreur : le répertoire "._SALVATORE_TMP." n'existe pas\n\n");
}

//
// chargement du fichier traductions.txt
// Construit une liste de modules avec pour chacun un tableau compose de : 0 chemin, 1 nom, 2 langue principale
//
function charger_fichier_traductions($chemin = _SALVATORE_TRADUCTION, $trad_list = 'traductions.txt') {

        if (!is_dir(_SALVATORE_TRADUCTION)) {
                die('Le répertoire ' . _SALVATORE_TRADUCTION . " n'existe pas !!!\n\n");
        }

        if (!file_exists(_SALVATORE_TRADUCTION. $trad_list)) {
                die('Le fichier ' . _SALVATORE_TRADUCTION . "$trad_list n'existe pas !!!\n\n");
        }

        $contenu=file_get_contents($chemin.$trad_list);

        $contenu=preg_replace('/#.*/', '', $contenu); // supprimer les commentaires

        $tab=preg_split("/\r\n|\n\r|\n|\r/", $contenu);

        $liste_trad=array();

        foreach ($tab as $ligne) {
                $liste = explode(';', trim($ligne));
                if (!empty($liste[0])) {
                        if (!isset($liste[1]) or empty($liste[1])) {
                                $liste[1] = preg_replace('#.*/(.*)$#', '$1', $liste[0]);
                        }
                        if (!isset($liste[2]) or empty($liste[2])) {
                                $liste[2] = 'fr';
                        }
                        if (!count($GLOBALS['modules']) or in_array($liste[1], $GLOBALS['modules'])) {
                                $liste_trad[]=$liste;
                        }
                }
        }
        reset($liste_trad);
        return $liste_trad;
} // liste_traductions

//
// Gere les logs
//
function trad_log($msg = '') {
        static $cnt;
        if (defined('_DEBUG_TRAD_LANG')) {
                echo $msg;
                $cnt++;
        }
        if ($cnt>10) {
                $cnt=0;
                flush();
        }
} // trad_log

function trad_sendmail($sujet = 'Erreur', $corps = '') {
        if (defined('_EMAIL_ERREURS') and defined('_EMAIL_SALVATORE')) {
                $envoyer_mail = charger_fonction('envoyer_mail', 'inc');
                $destinataire = _EMAIL_ERREURS;
                $from = _EMAIL_SALVATORE;
                $envoyer_mail($destinataire, $sujet, $corps, $from);
                trad_log("Un email a été envoyé à l'adresse : "._EMAIL_ERREURS."\n");
        }
}