source: spip-zone/_plugins_/article_pdf/article_pdf.html @ 49023

#CACHE{0}
<?php

        //au choix, selon le cas (voir les avantages et les inconvéniants de chaque selon le site):
//      $path_pdf = sous_repertoire(_DIR_CACHE, "article_PDF"); // stockage dans le cache SPIP
        $path_pdf = sous_repertoire(_DIR_IMG, "article_PDF"); //stockage sous le dossier IMG
        
        // Mode release => $debug=0
        // Mode debug => $debug=1 (ne fonctionne pas sous Internet Explorer)=> ??? si, ça fonctionne !
        $debug=1;
        
        <B_principale>
        <BOUCLE_principale(ARTICLES){id_article}>
        
        $conf_url_site = '[(#URL_ARTICLE|url_absolue|texte_script)]' ;
        $conf_nom_site = '[(#NOM_SITE_SPIP|pdf_first_clean|supprimer_tags|texte_script)]' ;
        
        // Recuperation et definition des differents elements
        
        $site='[(#NOM_SITE_SPIP|pdf_first_clean|supprimer_tags|texte_script)]';
        $rubrique='<B_rubrique_mere><BOUCLE_rubrique_mere(RUBRIQUES){id_rubrique}>[(#TITRE|supprimer_numero|pdf_first_clean|supprimer_tags|texte_script)]</BOUCLE_rubrique_mere></B_rubrique_mere>[(#NOM_SITE_SPIP|pdf_first_clean|supprimer_tags|texte_script)]<//B_rubrique_mere>';
        $DateParution='[(#DATE_REDAC|affdate|pdf_first_clean|texte_script)]';
        $DateMiseEnLigne='[(#DATE|nom_jour|texte_script)] [(#DATE|affdate|pdf_first_clean|texte_script)]';
        
        /*$auteur='<BOUCLE_auteurs(AUTEURS){id_article}{", "}>[(#NOM|pdf_first_clean|texte_script)]</BOUCLE_auteurs>';*/
        $motsclef='<BOUCLE_keywords(MOTS){id_article}{", "}>[(#TITRE|pdf_first_clean|supprimer_tags|texte_script)]</BOUCLE_keywords>';
        $yahoo='-<BOUCLE_yahoo(HIERARCHIE){id_article}> [(#TITRE|supprimer_numero|pdf_first_clean|supprimer_tags|texte_script)] - </BOUCLE_yahoo>';

        $logo_site='[(#LOGO_SITE_SPIP|extraire_attribut{src}|texte_script)]';
        $logo_site = preg_replace(',[?][0-9]+$,','',$logo_site);
        // attention à l'ordre des filtres SPIP
//      [$logo_fichier='(#LOGO_ARTICLE_RUBRIQUE|extraire_attribut{src}|texte_script)';] ne fonctionne pas
        $logo_fichier='[(#LOGO_ARTICLE_RUBRIQUE|texte_script|extraire_attribut{src})]'; //fonctionne correctement
        $logo_fichier = preg_replace(',[?][0-9]+$,','',$logo_fichier);
//  [$logo_lien="(#URL_ARTICLE)";]
                
        [$surtitre='(#SURTITRE|pdf_first_clean|supprimer_tags|texte_script)';]
        [$titre='(#TITRE|supprimer_numero|pdf_first_clean|supprimer_tags|texte_script)';]
        [$soustitre='(#SOUSTITRE|pdf_first_clean|supprimer_tags|texte_script)';]
        [$chapo='(#CHAPO|pdf_first_clean|texte_script)';]
        [$descriptif='(#DESCRIPTIF|pdf_first_clean|texte_script)';]
        [$texte= '(#TEXTE*|pdf_first_clean_prepropre|pdf_first_clean|texte_script)';]
        [$ps='(#PS|pdf_first_clean|texte_script)';]
        [$notes='(#NOTES|pdf_first_clean|texte_script)';]
        
        $copyright = '[(#REM|texte{'Copyright (c) '}|pdf_first_clean|texte_script)][(#NOM_SITE_SPIP|pdf_first_clean|supprimer_tags|texte_script)][(#REM|texte{'\nTous droits réservés'}|pdf_first_clean|texte_script)]';
        
        $id_article = "#ID_ARTICLE";
        
        $titre_article = translitteration(corriger_caracteres('[(#TITRE|supprimer_numero|pdf_first_clean|supprimer_tags|texte_script)]'));
        // Reprise du code de urls/propres.php (pourquoi c'est pas une fonction de l'API de SPIP ?)
        
        // on va convertir tous les caracteres de ponctuation et espaces
        // a l'exception de l'underscore (_), car on veut le conserver dans l'url
        $titre_article = str_replace('_', chr(7), $titre_article);
        $titre_article = @preg_replace(',[[:punct:][:space:]]+,u', ' ', $titre_article);
        $titre_article = str_replace(chr(7), '_', $titre_article);

        // S'il reste trop de caracteres non latins, les gerer comme wikipedia
        // avec rawurlencode :
        if (preg_match_all(",[^a-zA-Z0-9 _]+,", $titre_article, $r, PREG_SET_ORDER)) {
                foreach ($r as $regs) {
                        $titre_article = substr_replace($titre_article, rawurlencode($regs[0]),
                                strpos($titre_article, $regs[0]), strlen($regs[0]));
                }
        }

        // S'il reste trop peu, on retombe sur article12
        if (strlen($titre_article) == 0 ) {
                $titre_article = "article";
        }

        // Sinon couper les mots et les relier par des tirets
        else {
                $mots = preg_split(",[^a-zA-Z0-9_%]+,", $titre_article);
                $titre_article = '';
                foreach ($mots as $mot) {
                        if (!strlen($mot)) continue;
                        $titre_article2 = $titre_article.'-'.$mot;

                        // Si on depasse _URLS_PROPRES_MAX caracteres, s'arreter
                        // ne pas compter 3 caracteres pour %E9 mais un seul
                        $long = preg_replace(',%.,', '', $titre_article2);
                        if (strlen($long) > _URLS_PROPRES_MAX) {
                                break;
                        }

                        $titre_article = $titre_article2;
                }
                $titre_article = substr($titre_article, 1);

                // On enregistre en utf-8 dans la base
                $titre_article = rawurldecode($titre_article);

                if (strlen($titre_article) == 0)
                        $titre_article = "article";
        }

        $files_pdf = $titre_article."_a".$id_article.".pdf";
        $file_out = $path_pdf . $files_pdf ;
        
        if (file_exists($file_out)) 
        {
                clearstatcache;
                $damo = date(YmdHi , strtotime("#DATE_MODIF")) ;
                $dage = date(YmdHi , filemtime($file_out)) ;
                if ($damo > $dage)
                {
                        unlink($file_out);
                }
        }
        
        </BOUCLE_principale>
        </B_principale>
        header("Location: index.php");
        exit; 
        <//B_principale>
        
        if ($debug == 1 && file_exists($file_out)) 
        {
                unlink($file_out);
        }
        
        if (!file_exists($file_out)) 
        {
        
                //define('FPDF_FONTPATH',_DIR_PLUGIN_ARTICLE_PDF.'/font/');
                include_spip('pdf/fpdf');
                include_spip('pdf/lib_pdf_global');
                include_spip('pdf/lib_pdf_spip');
        
                //--------------------------------
                // Debut génération du PDF
                //--------------------------------
                $pdf->debug=$debug;
                $pdf=new PDF_SPIP();
                
                $pdf->SetCompression(false);
                $pdf->SetDisplayMode(fullpage, single );        
                
                // haut, gauche,  bas, droite
                $pdf->SetAllMargins(12,15,12,10);
        
                $pdf->SetTitle($titre);
                $pdf->SetCreator($site);
                $pdf->SetCopyright($copyright);
                $pdf->SetSubject($rubrique);
                $pdf->SetKeywords($motsclef);
        
                $pdf->Build($file_out);
                
        }

                // Vous voulez afficher un pdf
                header("Content-type: application/pdf");
        //Si on est en mutualisé avec masquages des vraies urls d'images
        if (stripos($GLOBALS['spip_pipeline']['affichage_final'],'mutualisation_url_img_courtes')){
                $file_out = str_replace(_DIR_IMG,_DIR_RACINE . _NOM_PERMANENTS_ACCESSIBLES,$file_out);
        }
        if ($debug==1)
        {
                // Affiche le PDF directement dans l'onglet de Firefox
                // Ne fonctionne pas sous IE 6 SP2 : le pdf n'est pas reconnu (pris pour un fichier texte)
                header("location: ". url_de_base() . $file_out);
        }
        else
        {
                // Il sera nommé $files_pdf
                // ATTENTION : pour "filename", mettre un nom de fichier court (<nom>.<extension>)
                // sinon IE 6 SP2 ne reconnaîtra pas le type de fichier
                // Semble poser problème sous IE6 SP1
                // Ah,  Microsoft, je vous jure !
                header('Content-Disposition: attachment; filename=' . $files_pdf);

                // Le source du PDF original.pdf
                readfile($file_out);
        }

        exit; 
?>