3 /***************************************************************************\
4 * SPIP, Systeme de publication pour l'internet *
6 * Copyright (c) 2001-2020 *
7 * Arnaud Martin, Antoine Pitrou, Philippe Riviere, Emmanuel Saint-James *
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 \***************************************************************************/
14 * Fonctions utiles pour les squelettes et déclarations de boucle
17 * @package SPIP\Medias\Fonctions
21 if (!defined('_ECRIRE_INC_VERSION')) {
25 // nettoyer les zip abandonnes par l'utilisateur
26 if (isset($GLOBALS['visiteur_session']['zip_to_clean'])
27 and test_espace_prive()
28 and isset($_SERVER['REQUEST_METHOD'])
29 and $_SERVER['REQUEST_METHOD'] !== 'POST'
31 $zip_to_clean = unserialize($GLOBALS['visiteur_session']['zip_to_clean']);
33 foreach ($zip_to_clean as $zip) {
34 if (@file_exists
($zip)) {
39 session_set('zip_to_clean');
42 // capturer un formulaire POST plus grand que post_max_size
43 // on genere un minipres car on ne peut rien faire de mieux
44 if (isset($_SERVER['REQUEST_METHOD'])
45 and $_SERVER['REQUEST_METHOD'] == 'POST'
47 and strlen($_SERVER['CONTENT_TYPE']) > 0
48 and strncmp($_SERVER['CONTENT_TYPE'], 'multipart/form-data', 19) == 0
49 and $_SERVER['CONTENT_LENGTH'] > medias_inigetoctets('post_max_size')
51 include_spip('inc/minipres');
52 echo minipres(_T('medias:upload_limit', array('max' => ini_get('post_max_size'))));
57 * Retourne la taille en octet d'une valeur de configuration php
60 * Clé de configuration ; valeur récupérée par `ini_get()`. Exemple `post_max_size`
62 * Taille en octet, sinon chaine vide.
64 function medias_inigetoctets($var) {
66 $val = trim(@ini_get
($var));
67 if (is_numeric($val)) {
72 $last = strtolower($val[strlen($val) - 1]);
73 $val = substr($val, 0, -1);
75 switch ($last) { // The 'G' modifier is available since PHP 5.1.0
77 $val *= 1024 * 1024 * 1024;
91 * Afficher la puce de statut pour les documents
93 * @param int $id_document
94 * Identifiant du document
95 * @param string $statut
98 * Code HTML de l'image de puce
100 function medias_puce_statut_document($id_document, $statut) {
101 if ($statut == 'publie') {
102 $puce = 'puce-verte.gif';
104 if ($statut == 'prepa') {
105 $puce = 'puce-blanche.gif';
107 if ($statut == 'poubelle') {
108 $puce = 'puce-poubelle.gif';
110 $puce = 'puce-blanche.gif';
115 return http_img_pack($puce, $statut, "class='puce'");
120 * Compile la boucle `DOCUMENTS` qui retourne une liste de documents multimédia
122 * `<BOUCLE(DOCUMENTS)>`
124 * @param string $id_boucle
125 * Identifiant de la boucle
126 * @param array $boucles
129 * Code PHP compilé de la boucle
131 function boucle_DOCUMENTS($id_boucle, &$boucles) {
132 $boucle = &$boucles[$id_boucle];
133 $id_table = $boucle->id_table
;
135 // on ne veut pas des fichiers de taille nulle,
136 // sauf s'ils sont distants (taille inconnue)
137 array_unshift($boucle->where
, array("'($id_table.taille > 0 OR $id_table.distant=\\'oui\\')'"));
140 * N'afficher que les modes de documents que l'on accepte
141 * Utiliser le "pipeline medias_documents_visibles" pour en ajouter
143 if (!isset($boucle->modificateur
['criteres']['mode'])
144 and !isset($boucle->modificateur
['tout'])
146 $modes = pipeline('medias_documents_visibles', array('image', 'document'));
147 $f = sql_serveur('quote', $boucle->sql_serveur
, true);
148 $modes = addslashes(join(',', array_map($f, array_unique($modes))));
149 array_unshift($boucle->where
, array("'IN'", "'$id_table.mode'", "'($modes)'"));
152 return calculer_boucle($id_boucle, $boucles);
157 * Pour compat uniquement, utiliser generer_lien_entite
160 * @uses generer_lien_entite()
163 * @param string $type
164 * @param int $longueur
165 * @param null $connect
168 function lien_objet($id, $type, $longueur = 80, $connect = null) {
169 return generer_lien_entite($id, $type, $longueur, $connect);
173 * critere {orphelins} selectionne les documents sans liens avec un objet editorial
176 * @param object $boucles
177 * @param object $crit
179 function critere_DOCUMENTS_orphelins_dist($idb, &$boucles, $crit) {
181 $boucle = &$boucles[$idb];
183 $not = $crit->not ?
'' : 'NOT';
185 $select = sql_get_select('DISTINCT id_document', 'spip_documents_liens as oooo');
186 $where = "'" . $boucle->id_table
. ".id_document $not IN ($select)'";
188 $_quoi = '@$Pile[0]["orphelins"]';
189 $where = "($_quoi)?$where:''";
192 $boucle->where
[] = $where;
196 * critere {portrait} qui selectionne
197 * - les documents dont les dimensions sont connues
198 * - les documents dont la hauteur est superieure a la largeur
200 * {!portrait} exclus ces documents
203 * @param object $boucles
204 * @param object $crit
206 function critere_DOCUMENTS_portrait_dist($idb, &$boucles, $crit) {
207 $boucle = &$boucles[$idb];
208 $table = $boucle->id_table
;
209 $not = ($crit->not ?
'NOT ' : '');
210 $boucle->where
[] = "'$not($table.largeur>0 AND $table.hauteur > $table.largeur)'";
214 * critere {paysage} qui selectionne
215 * - les documents dont les dimensions sont connues
216 * - les documents dont la hauteur est inferieure a la largeur
218 * {!paysage} exclus ces documents
221 * @param object $boucles
222 * @param object $crit
224 function critere_DOCUMENTS_paysage_dist($idb, &$boucles, $crit) {
225 $boucle = &$boucles[$idb];
226 $table = $boucle->id_table
;
227 $not = ($crit->not ?
'NOT ' : '');
228 $boucle->where
[] = "'$not($table.largeur>0 AND $table.largeur > $table.hauteur)'";
232 * critere {carre} qui selectionne
233 * - les documents dont les dimensions sont connues
234 * - les documents dont la hauteur est egale a la largeur
236 * {!carre} exclus ces documents
239 * @param object $boucles
240 * @param object $crit
242 function critere_DOCUMENTS_carre_dist($idb, &$boucles, $crit) {
243 $boucle = &$boucles[$idb];
244 $table = $boucle->id_table
;
245 $not = ($crit->not ?
'NOT ' : '');
246 $boucle->where
[] = "'$not($table.largeur>0 AND $table.largeur = $table.hauteur)'";
251 * Calcule la vignette d'une extension (l'image du type de fichier)
253 * Utile dans une boucle DOCUMENTS pour afficher une vignette du type
254 * du document (balise `#EXTENSION`) alors que ce document a déjà une vignette
255 * personnalisée (affichable par `#LOGO_DOCUMENT`).
258 * `[(#EXTENSION|vignette)]` produit une balise `<img ... />`
259 * `[(#EXTENSION|vignette{true})]` retourne le chemin de l'image
261 * @param string $extension
262 * L'extension du fichier, exemple : png ou pdf
263 * @param bool $get_chemin
264 * false pour obtenir une balise img de l'image,
265 * true pour obtenir seulement le chemin du fichier
267 * Balise HTML <img...> ou chemin du fichier
269 function filtre_vignette_dist($extension = 'defaut', $get_chemin = false) {
270 static $vignette = false;
271 static $balise_img = false;
274 $vignette = charger_fonction('vignette', 'inc');
275 $balise_img = charger_filtre('balise_img');
278 $fichier = $vignette($extension, false);
279 // retourne simplement le chemin du fichier
284 // retourne une balise <img ... />
285 return $balise_img($fichier);
289 * Determiner les methodes upload en fonction du env de inc-upload_document
291 * @param string|array $env
294 function medias_lister_methodes_upload($env) {
295 if (is_string($env)) {
296 $env = unserialize($env);
300 // méthodes d'upload disponibles
302 $methodes['upload'] = array('label_lien'=>_T('medias:bouton_download_local'),'label_bouton'=>_T('bouton_upload'));
304 if((isset($env['mediatheque']) and $env['mediatheque'])){
305 $methodes['mediatheque'] = array('label_lien'=>_T('medias:bouton_download_par_mediatheque'),'label_bouton'=>_T('medias:bouton_attacher_document'));
308 if((isset($env['proposer_ftp']) and $env['proposer_ftp'])){
309 $methodes['ftp'] = array('label_lien'=>_T('medias:bouton_download_par_ftp'),'label_bouton'=>_T('bouton_choisir'));
311 $methodes['distant'] = array('label_lien'=>_T('medias:bouton_download_sur_le_web'),'label_bouton'=>_T('bouton_choisir'));
313 // pipeline pour les méthodes d'upload
314 $objet = isset($env['objet']) ?
$env['objet'] : '';
315 $id_objet = isset($env['id_objet']) ?
$env['id_objet'] : '';
317 $methodes = pipeline('medias_methodes_upload',
319 'args' => array('objet' => $objet, 'id_objet' => $id_objet),
327 function duree_en_secondes($duree, $precis = false) {
329 $heures = $minutes = 0;
331 $heures = intval(floor($duree/3600));
332 $duree -= $heures * 3600;
335 $minutes = intval(floor($duree/60));
336 $duree -= $minutes * 60;
339 if ($heures>0 or $minutes>0) {
340 $out = _T('date_fmt_heures_minutes', array('h' => $heures, 'm' => $minutes));
342 $out = preg_replace(',^0[^\d]+,Uims', '', $out);
346 if (!$heures or $precis) {
347 $out .= intval($duree).'s';