source: spip-zone/_core_/plugins/medias/medias_fonctions.php

Last change on this file was 113294, checked in by spip.franck@…, 2 months ago

Il parait que le futur c'est maintenant :-D

File size: 9.6 KB
Line 
1<?php
2
3/***************************************************************************\
4 *  SPIP, Systeme de publication pour l'internet                           *
5 *                                                                         *
6 *  Copyright (c) 2001-2019                                                *
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 * Fonctions utiles pour les squelettes et déclarations de boucle
15 * pour le compilateur
16 *
17 * @package SPIP\Medias\Fonctions
18 **/
19
20// sécurité
21if (!defined('_ECRIRE_INC_VERSION')) {
22        return;
23}
24
25// nettoyer les zip abandonnes par l'utilisateur
26if (isset($GLOBALS['visiteur_session']['zip_to_clean'])
27        and test_espace_prive()
28        and isset($_SERVER['REQUEST_METHOD'])
29        and $_SERVER['REQUEST_METHOD'] !== 'POST'
30) {
31        $zip_to_clean = unserialize($GLOBALS['visiteur_session']['zip_to_clean']);
32        if ($zip_to_clean) {
33                foreach ($zip_to_clean as $zip) {
34                        if (@file_exists($zip)) {
35                                @unlink($zip);
36                        }
37                }
38        }
39        session_set('zip_to_clean');
40}
41
42// capturer un formulaire POST plus grand que post_max_size
43// on genere un minipres car on ne peut rien faire de mieux
44if (isset($_SERVER['REQUEST_METHOD'])
45        and $_SERVER['REQUEST_METHOD'] == 'POST'
46        and empty($_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')
50) {
51        include_spip('inc/minipres');
52        echo minipres(_T('medias:upload_limit', array('max' => ini_get('post_max_size'))));
53        exit;
54}
55
56/**
57 * Retourne la taille en octet d'une valeur de configuration php
58 *
59 * @param string $var
60 *     Clé de configuration ; valeur récupérée par `ini_get()`. Exemple `post_max_size`
61 * @return int|string
62 *     Taille en octet, sinon chaine vide.
63 **/
64function medias_inigetoctets($var) {
65        $last = '';
66        $val = trim(@ini_get($var));
67        if (is_numeric($val)) {
68                return $val;
69        }
70        // en octet si "32M"
71        if ($val != '') {
72                $last = strtolower($val[strlen($val) - 1]);
73                $val = substr($val, 0, -1);
74        }
75        switch ($last) { // The 'G' modifier is available since PHP 5.1.0
76                case 'g':
77                        $val *= 1024 * 1024 * 1024;
78                        break;
79                case 'm':
80                        $val *= 1024 * 1024;
81                        break;
82                case 'k':
83                        $val *= 1024;
84                        break;
85        }
86
87        return $val;
88}
89
90/**
91 * Afficher la puce de statut pour les documents
92 *
93 * @param int $id_document
94 *     Identifiant du document
95 * @param string $statut
96 *     Statut du document
97 * @return string
98 *     Code HTML de l'image de puce
99 */
100function medias_puce_statut_document($id_document, $statut) {
101        if ($statut == 'publie') {
102                $puce = 'puce-verte.gif';
103        } else {
104                if ($statut == 'prepa') {
105                        $puce = 'puce-blanche.gif';
106                } else {
107                        if ($statut == 'poubelle') {
108                                $puce = 'puce-poubelle.gif';
109                        } else {
110                                $puce = 'puce-blanche.gif';
111                        }
112                }
113        }
114
115        return http_img_pack($puce, $statut, "class='puce'");
116}
117
118
119/**
120 * Compile la boucle `DOCUMENTS` qui retourne une liste de documents multimédia
121 *
122 * `<BOUCLE(DOCUMENTS)>`
123 *
124 * @param string $id_boucle
125 *     Identifiant de la boucle
126 * @param array $boucles
127 *     AST du squelette
128 * @return string
129 *     Code PHP compilé de la boucle
130 **/
131function boucle_DOCUMENTS($id_boucle, &$boucles) {
132        $boucle = &$boucles[$id_boucle];
133        $id_table = $boucle->id_table;
134
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\\')'"));
138
139        /**
140         * N'afficher que les modes de documents que l'on accepte
141         * Utiliser le "pipeline medias_documents_visibles" pour en ajouter
142         */
143        if (!isset($boucle->modificateur['criteres']['mode'])
144                and !isset($boucle->modificateur['tout'])
145        ) {
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)'"));
150        }
151
152        return calculer_boucle($id_boucle, $boucles);
153}
154
155
156/**
157 * Pour compat uniquement, utiliser generer_lien_entite
158 *
159 * @deprecated
160 * @uses generer_lien_entite()
161 *
162 * @param int $id
163 * @param string $type
164 * @param int $longueur
165 * @param null $connect
166 * @return string
167 */
168function lien_objet($id, $type, $longueur = 80, $connect = null) {
169        return generer_lien_entite($id, $type, $longueur, $connect);
170}
171
172/**
173 * critere {orphelins} selectionne les documents sans liens avec un objet editorial
174 *
175 * @param string $idb
176 * @param object $boucles
177 * @param object $crit
178 */
179function critere_DOCUMENTS_orphelins_dist($idb, &$boucles, $crit) {
180
181        $boucle = &$boucles[$idb];
182        $cond = $crit->cond;
183        $not = $crit->not ? '' : 'NOT';
184
185        $select = sql_get_select('DISTINCT id_document', 'spip_documents_liens as oooo');
186        $where = "'" . $boucle->id_table . ".id_document $not IN ($select)'";
187        if ($cond) {
188                $_quoi = '@$Pile[0]["orphelins"]';
189                $where = "($_quoi)?$where:''";
190        }
191
192        $boucle->where[] = $where;
193}
194
195/**
196 * critere {portrait} qui selectionne
197 * - les documents dont les dimensions sont connues
198 * - les documents dont la hauteur est superieure a la largeur
199 *
200 * {!portrait} exclus ces documents
201 *
202 * @param string $idb
203 * @param object $boucles
204 * @param object $crit
205 */
206function 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)'";
211}
212
213/**
214 * critere {paysage} qui selectionne
215 * - les documents dont les dimensions sont connues
216 * - les documents dont la hauteur est inferieure a la largeur
217 *
218 * {!paysage} exclus ces documents
219 *
220 * @param string $idb
221 * @param object $boucles
222 * @param object $crit
223 */
224function 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)'";
229}
230
231/**
232 * critere {carre} qui selectionne
233 * - les documents dont les dimensions sont connues
234 * - les documents dont la hauteur est egale a la largeur
235 *
236 * {!carre} exclus ces documents
237 *
238 * @param string $idb
239 * @param object $boucles
240 * @param object $crit
241 */
242function 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)'";
247}
248
249
250/**
251 * Calcule la vignette d'une extension (l'image du type de fichier)
252 *
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`).
256 *
257 * @example
258 *     `[(#EXTENSION|vignette)]` produit une balise `<img ... />`
259 *     `[(#EXTENSION|vignette{true})]` retourne le chemin de l'image
260 *
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
266 * @return string
267 *     Balise HTML <img...> ou chemin du fichier
268 **/
269function filtre_vignette_dist($extension = 'defaut', $get_chemin = false) {
270        static $vignette = false;
271        static $balise_img = false;
272
273        if (!$vignette) {
274                $vignette = charger_fonction('vignette', 'inc');
275                $balise_img = charger_filtre('balise_img');
276        }
277
278        $fichier = $vignette($extension, false);
279        // retourne simplement le chemin du fichier
280        if ($get_chemin) {
281                return $fichier;
282        }
283
284        // retourne une balise <img ... />
285        return $balise_img($fichier);
286}
287
288/**
289 * Determiner les methodes upload en fonction du env de inc-upload_document
290 *
291 * @param string|array $env
292 * @return array
293 */
294function medias_lister_methodes_upload($env) {
295        if (is_string($env)) {
296                $env = unserialize($env);
297        }
298
299        $methodes = array();
300        // méthodes d'upload disponibles
301        $methodes = array();
302        $methodes['upload'] = array('label_lien'=>_T('medias:bouton_download_local'),'label_bouton'=>_T('bouton_upload'));
303
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'));
306        }
307       
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'));
310        }
311        $methodes['distant'] = array('label_lien'=>_T('medias:bouton_download_sur_le_web'),'label_bouton'=>_T('bouton_choisir'));
312
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'] : '';
316
317        $methodes = pipeline('medias_methodes_upload',
318                array(
319                        'args' => array('objet' => $objet, 'id_objet' => $id_objet),
320                        'data' => $methodes
321                )
322        );
323
324        return $methodes;
325}
326
327function duree_en_secondes($duree, $precis = false) {
328        $out = "";
329        $heures = $minutes = 0;
330        if ($duree>3600) {
331                $heures = intval(floor($duree/3600));
332                $duree -= $heures * 3600;
333        }
334        if ($duree>60) {
335                $minutes = intval(floor($duree/60));
336                $duree -= $minutes * 60;
337        }
338
339        if ($heures>0 or $minutes>0) {
340                $out = _T('date_fmt_heures_minutes', array('h' => $heures, 'm' => $minutes));
341                if (!$heures) {
342                        $out = preg_replace(',^0[^\d]+,Uims', '', $out);
343                }
344        }
345
346        if (!$heures or $precis) {
347                $out .= intval($duree).'s';
348        }
349        return $out;
350}
Note: See TracBrowser for help on using the repository browser.