e340d3042564a125591fa09700edde144c57dd61
[lhc/web/clavette_www.git] / www / plugins-dist / medias / metadata / svg.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 include_spip('inc/autoriser');
15
16 /**
17 * Determiner les dimensions d'un svg, et enlever ses scripts si necessaire
18 * on utilise safehtml qui n'est pas apropriee pour ca en attendant mieux
19 * cf http://www.slideshare.net/x00mario/the-image-that-called-me
20 * http://heideri.ch/svgpurifier/SVGPurifier/index.php
21 *
22 * @param string $file
23 * @return array
24 */
25 // http://doc.spip.org/@traite_svg
26 function metadata_svg_dist($file){
27 $meta = array();
28
29 $texte = spip_file_get_contents($file);
30
31 // Securite si pas autorise : virer les scripts et les references externes
32 // sauf si on est en mode javascript 'ok' (1), cf. inc_version
33 if ($GLOBALS['filtrer_javascript']<1
34 AND !autoriser('televerser', 'script')
35 ){
36 include_spip('inc/texte');
37 $new = trim(safehtml($texte));
38 // petit bug safehtml
39 if (substr($new, 0, 2)==']>') $new = ltrim(substr($new, 2));
40 if ($new!=$texte) ecrire_fichier($file, $texte = $new);
41 }
42
43 $width = $height = 150;
44 if (preg_match(',<svg[^>]+>,', $texte, $s)){
45 $s = $s[0];
46 if (preg_match(',\WviewBox\s*=\s*.\s*(\d+)\s+(\d+)\s+(\d+)\s+(\d+),i', $s, $r)){
47 $width = $r[3];
48 $height = $r[4];
49 }
50 else {
51 // si la taille est en centimetre, estimer le pixel a 1/64 de cm
52 if (preg_match(',\Wwidth\s*=\s*.(\d+)([^"\']*),i', $s, $r)){
53 if ($r[2]!='%'){
54 $width = $r[1];
55 if ($r[2]=='cm') $width <<= 6;
56 }
57 }
58 if (preg_match(',\Wheight\s*=\s*.(\d+)([^"\']*),i', $s, $r)){
59 if ($r[2]!='%'){
60 $height = $r[1];
61 if ($r[2]=='cm') $height <<= 6;
62 }
63 }
64 }
65 }
66 $meta['largeur'] = $width;
67 $meta['hauteur'] = $height;
68 return $meta;
69 }