www/plugins-dist/medias/medias_fonctions.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
  14 //
  15 // Ce fichier definit les boucles standard de SPIP
  16 //
  17
  18 if (!defined('_ECRIRE_INC_VERSION')) return;
  19
  20
  21 /**
  22  * Afficher la puce de statut pour les documents
  23  *
  24  * @param unknown_type $id_document
  25  * @param unknown_type $statut
  26  * @param unknown_type $id_rubrique
  27  * @param unknown_type $type
  28  * @param unknown_type $ajax
  29  * @return unknown
  30  */
  31 function medias_puce_statut_document($id_document, $statut){
  32         if ($statut=='publie') {
  33                 $puce='puce-verte.gif';
  34         }
  35         else if ($statut == "prepa") {
  36                 $puce = 'puce-blanche.gif';
  37         }
  38         else if ($statut == "poubelle") {
  39                 $puce = 'puce-poubelle.gif';
  40         }
  41         else
  42                 $puce = 'puce-blanche.gif';
  43
  44         return http_img_pack($puce, $statut, "class='puce'");
  45 }
  46
  47 //
  48 // <BOUCLE(DOCUMENTS)>
  49 //
  50 // http://doc.spip.org/@boucle_DOCUMENTS_dist
  51 function boucle_DOCUMENTS($id_boucle, &$boucles) {
  52         $boucle = &$boucles[$id_boucle];
  53         $id_table = $boucle->id_table;
  54
  55         // on ne veut pas des fichiers de taille nulle,
  56         // sauf s'ils sont distants (taille inconnue)
  57         array_unshift($boucle->where,array("'($id_table.taille > 0 OR $id_table.distant=\\'oui\\')'"));
  58
  59         /**
  60          * N'afficher que les modes de documents que l'on accepte
  61          * Utiliser le "pipeline medias_documents_visibles" pour en ajouter
  62          */
  63         if (!isset($boucle->modificateur['criteres']['mode'])
  64         AND !isset($boucle->modificateur['tout'])) {
  65                 $modes = pipeline('medias_documents_visibles',array('image','document'));
  66                 $f = sql_serveur('quote', $boucle->sql_serveur, true);
  67                 $modes = addslashes(join(',', array_map($f, array_unique($modes))));
  68                 array_unshift($boucle->where,array("'IN'", "'$id_table.mode'", "'($modes)'"));
  69         }
  70
  71         return calculer_boucle($id_boucle, $boucles);
  72 }
  73
  74
  75 function lien_objet($id,$type,$longueur=80,$connect=NULL){
  76         include_spip('inc/liens');
  77         $titre = traiter_raccourci_titre($id, $type, $connect);
  78         // lorsque l'objet n'est plus declare (plugin desactive par exemple)
  79         // le raccourcis n'est plus valide
  80         $titre = isset($titre['titre']) ? typo($titre['titre']) : '';
  81         if (!strlen($titre))
  82                 $titre = _T('info_sans_titre');
  83         $url = generer_url_entite($id,$type);
  84         return "<a href='$url' class='$type'>".couper($titre,$longueur)."</a>";
  85 }
  86
  87 /**
  88  * critere {orphelins} selectionne les documents sans liens avec un objet editorial
  89  *
  90  * @param string $idb
  91  * @param object $boucles
  92  * @param object $crit
  93  */
  94 function critere_DOCUMENTS_orphelins_dist($idb, &$boucles, $crit) {
  95
  96         $boucle = &$boucles[$idb];
  97         $cond = $crit->cond;
  98         $not = $crit->not?"":"NOT";
  99
 100         $select = sql_get_select("DISTINCT id_document","spip_documents_liens as oooo");
 101         $where = "'".$boucle->id_table.".id_document $not IN ($select)'";
 102         if ($cond){
 103                 $_quoi = '@$Pile[0]["orphelins"]';
 104                 $where = "($_quoi)?$where:''";
 105         }
 106
 107         $boucle->where[]= $where;
 108 }
 109
 110 /**
 111  * critere {portrait} qui selectionne
 112  * - les documents dont les dimensions sont connues
 113  * - les documents dont la hauteur est superieure a la largeur
 114  *
 115  * {!portrait} exclus ces documents
 116  *
 117  * @param string $idb
 118  * @param object $boucles
 119  * @param object $crit
 120  */
 121 function critere_DOCUMENTS_portrait_dist($idb, &$boucles, $crit) {
 122         $boucle = &$boucles[$idb];
 123         $table = $boucle->id_table;
 124         $not = ($crit->not?"NOT ":"");
 125         $boucle->where[] = "'$not($table.largeur>0 AND $table.hauteur > $table.largeur)'";
 126 }
 127
 128 /**
 129  * critere {paysage} qui selectionne
 130  * - les documents dont les dimensions sont connues
 131  * - les documents dont la hauteur est inferieure a la largeur
 132  *
 133  * {!paysage} exclus ces documents
 134  *
 135  * @param string $idb
 136  * @param object $boucles
 137  * @param object $crit
 138  */
 139 function critere_DOCUMENTS_paysage_dist($idb, &$boucles, $crit) {
 140         $boucle = &$boucles[$idb];
 141         $table = $boucle->id_table;
 142         $not = ($crit->not?"NOT ":"");
 143         $boucle->where[] = "'$not($table.largeur>0 AND $table.largeur > $table.hauteur)'";
 144 }
 145
 146 /**
 147  * critere {carre} qui selectionne
 148  * - les documents dont les dimensions sont connues
 149  * - les documents dont la hauteur est egale a la largeur
 150  *
 151  * {!carre} exclus ces documents
 152  *
 153  * @param string $idb
 154  * @param object $boucles
 155  * @param object $crit
 156  */
 157 function critere_DOCUMENTS_carre_dist($idb, &$boucles, $crit) {
 158         $boucle = &$boucles[$idb];
 159         $table = $boucle->id_table;
 160         $not = ($crit->not?"NOT ":"");
 161         $boucle->where[] = "'$not($table.largeur>0 AND $table.largeur = $table.hauteur)'";
 162 }
 163 ?>