www/ecrire/exec/documents_liste.php

   1 <?php
   2
   3 /***************************************************************************\
   4  *  SPIP, Systeme de publication pour l'internet                           *
   5  *                                                                         *
   6  *  Copyright (c) 2001-2014                                                *
   7  *  Arnaud Martin, Antoine Pitrou, Philippe Riviere, Emmanuel Saint-James  *
   8  *                                                                         *
   9  *  Ce programme est un logiciel libre distribue sous licence GNU/GPL.     *
  10  *  Pour plus de details voir le fichier COPYING.txt ou l'aide en ligne.   *
  11 \***************************************************************************/
  12
  13 if (!defined('_ECRIRE_INC_VERSION')) return;
  14
  15 include_spip('inc/presentation');
  16
  17 // http://doc.spip.org/@exec_documents_liste_dist
  18 function exec_documents_liste_dist()
  19 {
  20
  21 //
  22 // Recupere les donnees
  23 //
  24
  25 $commencer_page = charger_fonction('commencer_page', 'inc');
  26 echo $commencer_page(_T('titre_page_documents_liste'), "naviguer", "documents");
  27 echo debut_gauche('', true);
  28
  29
  30 //////////////////////////////////////////////////////
  31 // Boite "voir en ligne"
  32 //
  33
  34 echo debut_boite_info(true);
  35
  36 echo propre(_T('texte_recapitiule_liste_documents'));
  37
  38 echo fin_boite_info(true);
  39
  40
  41
  42 echo debut_droite('', true);
  43
  44         // recupere les titres des types
  45         $res = sql_select('extension, titre', "spip_types_documents");
  46         while ($row = sql_fetch($res))
  47                 $types[$row['extension']] = $row;
  48
  49         $result = sql_select("docs.id_document AS id_doc, docs.extension AS extension, docs.fichier AS fichier, docs.date AS date, docs.titre AS titre, docs.descriptif AS descriptif, R.id_rubrique AS id_rub, R.titre AS titre_rub", "spip_documents AS docs, spip_documents_liens AS lien, spip_rubriques AS R", "docs.id_document = lien.id_document AND R.id_rubrique = lien.id_objet AND lien.objet='rubrique' AND docs.mode = 'document'", "", "docs.date DESC");
  50
  51         while ($row=sql_fetch($result)){
  52                 $titre=$row['titre'];
  53                 $descriptif=$row['descriptif'];
  54                 $date=$row['date'];
  55                 $id_document=$row['id_doc'];
  56                 $id_rubrique=$row['id_rub'];
  57                 $titre_rub = typo($row['titre_rub']);
  58                 $fichier = $row['fichier'];
  59
  60                 if (!$titre) $titre = _T('info_document').' '.$id_document;
  61
  62                 debut_cadre_relief("doc-24.gif");
  63                 echo "<b>$titre</b> (" . $types[$row['extension']]['titre'] . ', ' . affdate($date) . ")";
  64                 if ($descriptif)
  65                         echo propre($descriptif);
  66                 else
  67                         echo "<p><tt>$fichier</tt>" . '</p>';
  68
  69                 echo "<p>"._T('info_dans_rubrique')." <a href='" . generer_url_ecrire("naviguer","id_rubrique=$id_rubrique") . "'>$titre_rub</a></p>";
  70                 echo fin_cadre_relief(true);
  71         }
  72
  73         echo fin_gauche(), fin_page();
  74 }
  75
  76 ?>