Subversion Repositories Sites.tela-botanica.org

<?php
/*vim: set expandtab tabstop=4 shiftwidth=4: */ 
// +------------------------------------------------------------------------------------------------------+
// | PHP version 4.1                                                                                      |
// +------------------------------------------------------------------------------------------------------+
// | Copyright (C) 2004 Tela Botanica (accueil@tela-botanica.org)                                         |
// +------------------------------------------------------------------------------------------------------+
// | This library is free software; you can redistribute it and/or                                        |
// | modify it under the terms of the GNU Lesser General Public                                           |
// | License as published by the Free Software Foundation; either                                         |
// | version 2.1 of the License, or (at your option) any later version.                                   |
// |                                                                                                      |
// | This library 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                                    |
// | Lesser General Public License for more details.                                                      |
// |                                                                                                      |
// | You should have received a copy of the GNU Lesser General Public                                     |
// | License along with this library; if not, write to the Free Software                                  |
// | Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307  USA                            |
// +------------------------------------------------------------------------------------------------------+
// CVS : $Id: annuaire_moteur.php,v 1.2 2005/03/24 08:24:39 alex Exp $
/**
* programme principal du module annuaire_moteur
*
* programme principal du module annuaire_moteur
*
*@package annuaire
//Auteur original :
*@author        Alexandre Granier <alexandre@tela-botanica.org>
//Autres auteurs :
*@author        Aucun
*@copyright     Tela-Botanica 2000-2004
*@version       $Revision: 1.2 $
// +------------------------------------------------------------------------------------------------------+
*/

// +------------------------------------------------------------------------------------------------------+
// |                                            ENTETE du PROGRAMME                                       |
// +------------------------------------------------------------------------------------------------------+

include_once 'client/annuaire/configuration/ann_config.inc.php' ;
include_once 'api/fragmenteur/FRAG_Fragmenteur_Session.class.php' ;
//include_once (ANN_CHEMIN_LIBRAIRIE."pack.lib.gen.php") ;
include_once (ANN_CHEMIN_APPLI."annuaire_moteur_fonction.php");
include_once (ANN_CHEMIN_LIBRAIRIE."annuaire.fonct.php") ;

if (isset($lang)) {
    include_once ANN_CHEMIN_APPLI."/langues/ann_langue_$lang.inc.php" ;
} else {
    include_once ANN_CHEMIN_APPLI.'/langues/ann_langue_fr.inc.php' ;
}

define ("ANN_MAIL_TOUS", 1) ;
define ("ANN_MAIL_TOUS_ENVOIE", 2) ;


function afficherContenuCorps () {
    global $statut ;

    if (!$GLOBALS['AUTH']->getAuth())  {
        $res = AUTH_formulaire_login() ;
    } else {
        if (isset($_GET['u_id'])) {
            include_once (ANN_CHEMIN_APPLI.'admin_annu.php');
            $GLOBALS['ann_url']->addQueryString ('u_id', $_GET['u_id']) ;
            return putFrame() ;
        }
        if (isset ($_GET['action'])) {
            include_once (ANN_CHEMIN_APPLI.'mail_tous.php') ;
            return putFrame() ;
        }
        $res = "<div>".mkengine()."</div>\n" ;
        //mkquery() ;
        $res .= "<div>".mkresu()."</div>\n" ;
    
    }
    return $res ;
}

?>