<?php
/* Copyright (C) 2003-2004 Rodolphe Quiedeville <rodolphe@quiedeville.org>
 * Copyright (C) 2004-2005 Laurent Destailleur  <eldy@users.sourceforge.net>
 * Copyright (C) 2004      Eric Seigne          <eric.seigne@ryxeo.com>
 * Copyright (C) 2006      Andre Cianfarani     <acianfa@free.fr>
 *
 * 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.
 * or see http://www.gnu.org/
 *
 * $Id$
 * $Source$
 *
 */

/**
	    \file       htdocs/includes/modules/commande/modules_commande.php
		\ingroup    commande
		\brief      Fichier contenant la classe mère de generation des commandes en PDF
		            et la classe mère de numérotation des commandes
		\version    $Revision$
*/

require_once(FPDF_PATH.'fpdf.php');


/**
	    \class      ModelePDFCommandes
		\brief      Classe mère des modèles de commandes
*/

class ModelePDFCommandes extends FPDF
{
    var $error='';

   /** 
        \brief Renvoi le dernier message d'erreur de création de PDF de commande
    */
    function pdferror()
    {
        return $this->error;
    }

    /** 
     *      \brief      Renvoi la liste des modèles actifs
     */
    function liste_modeles()
    {
        $liste=array();
       	$dir = "../includes/modules/commande/";
		$handle = opendir($dir);
		$var=True;
		while (($file = readdir($handle))!==false)
		{
			 if (eregi('\.modules\.php$',$file) && substr($file,0,4) == 'pdf_')
    		{
				$name = substr($file, 4, strlen($file) -16);
				$liste[$name] = $name;
        	// $classname = substr($file, 0, strlen($file) -12);
			}
		}
        return $liste;
    }

}


/**
        \class      ModeleNumRefCommandes
	    \brief      Classe mère des modèles de numérotation des références de commandes
*/

class ModeleNumRefCommandes
{
    var $error='';

    /**     \brief      Renvoi la description par defaut du modele de numérotation
     *      \return     string      Texte descripif
     */
    function info()
    {
        global $langs;
        $langs->load("orders");
        return $langs->trans("NoDescription");
    }

    /**     \brief      Renvoi un exemple de numérotation
     *      \return     string      Example
     */
    function getExample()
    {
        global $langs;
        $langs->load("orders");
        return $langs->trans("NoExample");
    }

    /**     \brief      Test si les numéros déjà en vigueur dans la base ne provoquent pas de
     *                  de conflits qui empechera cette numérotation de fonctionner.
     *      \return     boolean     false si conflit, true si ok
     */
    function canBeActivated()
    {
        return true;
    }

    /**     \brief      Renvoi prochaine valeur attribuée
     *      \return     string      Valeur
     */
    function getNextValue()
    {
        global $langs;
        return $langs->trans("NotAvailable");
    }
    
}
function commande_pdf_create($db, $comid, $modele='')
{
  global $langs;
  $langs->load("orders");
 
  $dir = DOL_DOCUMENT_ROOT."/includes/modules/commande/";

  // Positionne modele sur le nom du modele de facture à utiliser
  if (! strlen($modele))
    {
      if (defined("COMMANDE_ADDON_PDF") && COMMANDE_ADDON_PDF)
	{
	  $modele = COMMANDE_ADDON_PDF;
	}
      else
	{
      print $langs->trans("Error")." ".$langs->trans("Error_PROPALE_ADDON_PDF_NotDefined");
	  return 0;
	}
    }
  // Charge le modele
  $file = "pdf_".$modele.".modules.php";
  if (file_exists($dir.$file))
    {
      $classname = "pdf_".$modele;
      require_once($dir.$file);
  
      $obj = new $classname($db);

      if ( $obj->write_pdf_file($comid) > 0)
	{
	  // on supprime l'image correspondant au preview
	   commande_delete_preview($db, $comid);
	  return 1;
	}
      else
	{
	  dolibarr_syslog("Erreur dans commande_pdf_create");
	  dolibarr_print_error($db,$obj->pdferror());
	  return 0;
	}
    }
  else
    {
      print $langs->trans("Error")." ".$langs->trans("ErrorFileDoesNotExists",$dir.$file);
      return 0;
    }
}
function commande_delete_preview($db, $propalid)
{
	global $langs,$conf;

	$com = new Commande($db,"",$propalid);
	$com->fetch($propalid);  
	$client = new Societe($db);
    $client->fetch($com->soc_id);

	if ($conf->commande->dir_output)
		{
		$comref = sanitize_string($com->ref); 
		$dir = $conf->commande->dir_output . "/" . $comref ; 
		$file = $dir . "/" . $comref . ".pdf.png";

		if ( file_exists( $file ) && is_writable( $file ) )
			{
			if ( ! unlink($file) )
				{
				$this->error=$langs->trans("ErrorFailedToOpenFile",$file);
				return 0;
				}
			}
		}
}
?>