* Copyright (C) 2003 Xavier Dutoit * Copyright (C) 2004-2005 Laurent Destailleur * Copyright (C) 2004 Sebastien Di Cintio * Copyright (C) 2004 Benoit Mortier * * This program 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. * * This program 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 this program; if not, write to the Free Software * Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA. * * $Id$ * $Source$ * */ /** \file htdocs/main.inc.php \brief Fichier de formatage générique des ecrans Dolibarr \version $Revision$ */ require("master.inc.php"); // Verification du login. // Cette verification est faite pour chaque accès. Après l'authentification, // l'objet $user est initialisée. Notament $user->id, $user->login et $user->nom, $user->prenom // \todo : Stocker les infos de $user en session persistente php et ajouter recup dans le fetch // depuis la sessions pour ne pas avoir a acceder a la base a chaque acces de page. // \todo : Utiliser $user->id pour stocker l'id de l'auteur dans les tables plutot que $_SERVER["REMOTE_USER"] if (!empty ($_SERVER["REMOTE_USER"])) { // Authentification Apache OK, on va chercher les infos du user $user->fetch($_SERVER["REMOTE_USER"]); //print "REMOTE_USER:".$_SERVER["REMOTE_USER"]; //exit; } else { // Authentification Apache KO ou non active if (!empty ($dolibarr_auto_user)) { // Mode forcé sur un utilisateur (pour debug, demo, ...) $user->fetch($dolibarr_auto_user); } else { // Pas d'authentification Apache ni de mode forcé, on demande le login require_once DOL_DOCUMENT_ROOT."/includes/pear/Auth/Auth.php"; $pear = $dolibarr_main_db_type.'://'.$dolibarr_main_db_user.':'.$dolibarr_main_db_pass.'@'.$dolibarr_main_db_host.'/'.$dolibarr_main_db_name; $params = array( "dsn" =>$pear, "table" => MAIN_DB_PREFIX."user", "usernamecol" => "login", "passwordcol" => "pass", "cryptType" => "none", ); $aDol = new DOLIAuth("DB", $params, "loginfunction"); $aDol->setSessionName("DOLSESSID_".$dolibarr_main_db_name); $aDol->start(); $result = $aDol->getAuth(); if ($result) { // Authentification Auth OK, on va chercher les infos du user dolibarr_syslog ("Authentification ok pour $dolibarr_main_db_user"); $user->fetch($aDol->getUsername()); } else { // Le début de la page a été affiché par loginfunction. On ferme juste la page print "\n\n\n"; exit; } } } // Si le login n'a pu être récupéré, on est identifié avec un compte qui n'existe pas. // Tentative de hacking ? if (! $user->login) accessforbidden(); if (! defined('MAIN_INFO_SOCIETE_PAYS')) { define('MAIN_INFO_SOCIETE_PAYS','1'); } // On charge le fichier lang principal $langs->load("main"); /* * */ if (defined("MAIN_NOT_INSTALLED")) { Header("Location: ".DOL_URL_ROOT."/install/index.php"); } /** * \brief Affiche en-tête html + la barre de menu supérieure * \param head lignes d'en-tete head * \param title titre page web * \param target target du menu Accueil */ function top_menu($head, $title="", $target="") { global $user, $conf, $langs, $db; print ''; print "\n"; print $langs->lang_header(); print $head; // Affiche meta print ''."\n"; // Evite indexation par robots print ''."\n"; // Affiche title if (strlen($title) > 0) { print 'Dolibarr - '.$title.''; } else { if (defined("MAIN_TITLE")) { print "".MAIN_TITLE.""; } else { print 'Dolibarr'; } } print "\n"; // Affiche style sheets et link print ''."\n"; print ''."\n"; // Definition en alternate style sheet des feuilles de styles les plus maintenues print ''."\n"; print ''."\n"; print ''."\n"; print ''."\n"; print ''."\n"; print ''."\n"; print ''."\n"; print "\n"; print ''; print '
'; /* * Si la constante MAIN_NEED_UPDATE est définie (par le script de migration sql en général), c'est que * les données ont besoin d'un remaniement. Il faut passer le update.php */ if (defined("MAIN_NEED_UPDATE") && MAIN_NEED_UPDATE) { $langs->load("admin"); print '
'."\n"; print ''; print ''; print "
'; print $langs->trans("UpdateRequired",DOL_URL_ROOT.'/admin/system/update.php'); print '
"; llxFooter(); exit; } /* * Barre de menu supérieure * */ print '
'."\n"; // Charge le gestionnaire des entrées de menu du haut require_once(DOL_DOCUMENT_ROOT ."/includes/menus/barre_top/".$conf->top_menu); $menutop = new MenuTop($db); $menutop->atarget=$target; // Affiche le menu $menutop->showmenu(); // Lien sur fiche du login print ''; // Lien logout if (! isset($_SERVER["REMOTE_USER"]) || ! $_SERVER["REMOTE_USER"]) { print 'atarget?(' target="'.$menutop->atarget.'"'):''; print '>'; print ''; } print "
\n"; } /** * \brief Affiche barre de menu gauche * \param menu_array Tableau des entrée de menu * \param help_url Url pour le lien aide ('' par defaut) * \param form_search Formulaire de recherche permanant supplémentaire */ function left_menu($menu_array, $help_url='', $form_search='') { global $user, $conf, $langs, $db; print '
'."\n"; // Colonne de gauche print "\n\n"; print '
'."\n"; // Autres entrées du menu par le gestionnaire require_once(DOL_DOCUMENT_ROOT ."/includes/menus/barre_left/".$conf->left_menu); $menu=new MenuLeft($db,$menu_array); $menu->showmenu(); // Affichage des zones de recherche permanantes $addzonerecherche=0; if ($conf->societe->enabled && defined("MAIN_SEARCHFORM_SOCIETE") && MAIN_SEARCHFORM_SOCIETE > 0) $addzonerecherche=1; if ($conf->societe->enabled && defined("MAIN_SEARCHFORM_CONTACT") && MAIN_SEARCHFORM_CONTACT > 0) $addzonerecherche=1; if (($conf->produit->enabled || $conf->service->enabled) && defined("MAIN_SEARCHFORM_PRODUITSERVICE") && MAIN_SEARCHFORM_PRODUITSERVICE > 0) $addzonerecherche=1; if ($addzonerecherche) { print '
'; if ($conf->societe->enabled && defined("MAIN_SEARCHFORM_SOCIETE") && MAIN_SEARCHFORM_SOCIETE > 0) { $langs->load("companies"); printSearchForm(DOL_URL_ROOT.'/societe.php',DOL_URL_ROOT.'/societe.php',$langs->trans("Companies"),'soc','socname'); } if ($conf->societe->enabled && defined("MAIN_SEARCHFORM_CONTACT") && MAIN_SEARCHFORM_CONTACT > 0) { $langs->load("companies"); printSearchForm(DOL_URL_ROOT.'/contact/index.php',DOL_URL_ROOT.'/contact/index.php',$langs->trans("Contacts"),'contact','contactname'); } if (($conf->produit->enabled || $conf->service->enabled) && defined("MAIN_SEARCHFORM_PRODUITSERVICE") && MAIN_SEARCHFORM_PRODUITSERVICE > 0) { $langs->load("products"); printSearchForm(DOL_URL_ROOT.'/product/liste.php',DOL_URL_ROOT.'/product/',$langs->trans("Products")."/".$langs->trans("Services"),'products','sall'); } /* if ($conf->categorie->enabled) { $langs->load("categories"); printSearchForm(DOL_URL_ROOT.'/categories/search.php',DOL_URL_ROOT.'/categories/',$langs->trans("Categories"),'categories','catname'); } */ print '
'; } // Zone de recherche supplémentaire if ($form_search) { print $form_search; } // Lien vers l'aide en ligne (uniquement si langue fr_FR) if ($help_url && $langs->defaultlang == "fr_FR") { define('MAIN_AIDE_URL','http://www.dolibarr.com/wikidev/index.php'); print '
'.$langs->trans("Help").'
'; } print "\n"; print "
\n"; print "
\n"; print "\n"; print '
'."\n"; print '
'."\n"; } /** * \brief Affiche une zone de recherche * \param urlaction url du post * \param urlobject url du lien sur titre de la zone de recherche * \param title titre de la zone de recherche * \param htmlmodesearch 'search' * \param htmlinputname nom du champ input du formulaire */ function printSearchForm($urlaction,$urlobject,$title,$htmlmodesearch='search',$htmlinputname) { global $langs; print '
'; print ''.$title.'
'; print ''; print ''; print ' '; print ''; print "
"; } /** * \brief Impression du pied de page * \param foot Non utilisé */ function llxFooter($foot='') { global $dolibarr_auto_user; print "\n".'
'."\n"; print "\n".'
'; print "\n".'
'."\n"; print "\n\n"; } ?>