3 /***************************************************************************\
4 * SPIP, Systeme de publication pour l'internet *
6 * Copyright (c) 2001-2016 *
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 d'aide pour le compresseur
16 * @package SPIP\Compresseur\Fonctions
18 if (!defined("_ECRIRE_INC_VERSION")) return;
21 * Ecrire la balise javascript pour insérer le fichier compressé
23 * C'est cette fonction qui décide où il est le plus pertinent
24 * d'insérer le fichier, et dans quelle forme d'ecriture
27 * Contenu du head nettoyé des fichiers qui ont été compressé
29 * Position initiale du premier fichier inclu dans le fichier compressé
31 * Nom du fichier compressé
32 * @param string $comments
33 * Commentaires à insérer devant
35 * Code HTML de la balise <script>
37 function compresseur_ecrire_balise_js_dist(&$flux, $pos, $src, $comments = ""){
38 $comments .= "<script type='text/javascript' src='$src'></script>";
39 $flux = substr_replace($flux,$comments,$pos,0);
44 * Ecrire la balise CSS pour insérer le fichier compressé
46 * C'est cette fonction qui décide ou il est le plus pertinent
47 * d'insérer le fichier, et dans quelle forme d'écriture
50 * Contenu du head nettoyé des fichiers qui ont ete compressé
52 * Position initiale du premier fichier inclu dans le fichier compressé
54 * Nom du fichier compressé
55 * @param string $comments
56 * Commentaires à insérer devant
57 * @param string $media
58 * Type de media si précisé (print|screen...)
60 * Code HTML de la balise <link>
62 function compresseur_ecrire_balise_css_dist(&$flux, $pos, $src, $comments = "", $media=""){
63 $comments .= "<link rel='stylesheet'".($media?
" media='$media'":"")." href='$src' type='text/css' />";
64 $flux = substr_replace($flux,$comments,$pos,0);
69 * Extraire les balises CSS à compacter
72 * Contenu HTML dont on extrait les balises CSS
73 * @param string $url_base
75 * Couples (balise => src)
77 function compresseur_extraire_balises_css_dist($flux, $url_base){
78 $balises = extraire_balises($flux,'link');
80 foreach ($balises as $s){
81 if (extraire_attribut($s, 'rel') === 'stylesheet'
82 AND (!($type = extraire_attribut($s, 'type'))
83 OR $type == 'text/css')
84 AND is_null(extraire_attribut($s, 'name')) # css nommee : pas touche
85 AND is_null(extraire_attribut($s, 'id')) # idem
86 AND !strlen(strip_tags($s))
87 AND $src = preg_replace(",^$url_base,",_DIR_RACINE
,extraire_attribut($s, 'href')))
94 * Extraire les balises JS à compacter
97 * Contenu HTML dont on extrait les balises CSS
98 * @param string $url_base
100 * Couples (balise => src)
102 function compresseur_extraire_balises_js_dist($flux, $url_base){
103 $balises = extraire_balises($flux,'script');
105 foreach ($balises as $s){
106 if (extraire_attribut($s, 'type') === 'text/javascript'
107 AND is_null(extraire_attribut($s, 'id')) # script avec un id : pas touche
108 AND $src = extraire_attribut($s, 'src')
109 AND !strlen(strip_tags($s)))
116 * Compacter (concaténer+minifier) les fichiers format CSS ou JS
119 * Repérer fichiers statiques vs. url squelettes
120 * Compacte le tout dans un fichier statique posé dans local/
122 * @param string $flux
123 * Contenu du <head> de la page html
124 * @param string $format
127 * Contenu compressé du <head> de la page html
129 function compacte_head_files($flux,$format) {
130 $url_base = url_de_base();
131 $url_page = substr(generer_url_public('A'), 0, -1);
132 $dir = preg_quote($url_page,',').'|'.preg_quote(preg_replace(",^$url_base,",_DIR_RACINE
,$url_page),',');
134 if (!$extraire_balises = charger_fonction("compresseur_extraire_balises_$format",'',true))
138 $flux_nocomment = preg_replace(",<!--.*-->,Uims","",$flux);
139 foreach ($extraire_balises($flux_nocomment, $url_base) as $s=>$src) {
141 preg_match(',^('.$dir.')(.*)$,', $src, $r)
143 // ou si c'est un fichier
144 $src = preg_replace(',^'.preg_quote(url_de_base(),',').',', '', $src)
145 // enlever un timestamp eventuel derriere un nom de fichier statique
146 AND $src2 = preg_replace(",[.]{$format}[?].+$,",".$format",$src)
147 // verifier qu'il n'y a pas de ../ ni / au debut (securite)
148 AND !preg_match(',(^/|\.\.),', substr($src,strlen(_DIR_RACINE
)))
149 // et si il est lisible
150 AND @is_readable
($src2)
154 $files[$s] = explode('&', str_replace('&', '&', $r[2]), 2);
160 $callbacks = array('each_min'=>'callback_minifier_'.$format.'_file');
163 $callbacks['each_pre'] = 'compresseur_callback_prepare_css';
164 $callbacks['all_min'] = 'css_regroup_atimport';
165 // ce n'est pas une callback, mais en injectant l'url de base ici
166 // on differencie les caches quand l'url de base change
167 // puisque la css compresse inclue l'url courante du site (en url absolue)
168 // on exclue le protocole car la compression se fait en url relative au protocole
169 $callbacks[] = protocole_implicite($url_base);
171 if ($format=='js' AND $GLOBALS['meta']['auto_compress_closure']=='oui'){
172 $callbacks['all_min'] = 'minifier_encore_js';
175 include_spip('inc/compresseur_concatener');
176 include_spip('inc/compresseur_minifier');
177 if (list($src,$comms) = concatener_fichiers($files, $format, $callbacks)
179 $compacte_ecrire_balise = charger_fonction("compresseur_ecrire_balise_$format",'');
180 $files = array_keys($files);
181 // retrouver la position du premier fichier compacte
182 $pos = strpos($flux,reset($files));
183 // supprimer tous les fichiers compactes du flux
184 $flux = str_replace($files,"",$flux);
185 // inserer la balise (deleguer a la fonction, en lui donnant le necessaire)
186 $flux = $compacte_ecrire_balise($flux, $pos, $src, $comms);
194 * Lister les fonctions de préparation des feuilles css
198 * Liste des fonctions à appliquer sur les feuilles CSS
200 function compresseur_liste_fonctions_prepare_css(){
201 static $fonctions = null;
203 if (is_null($fonctions)){
204 $fonctions = array('css_resolve_atimport','urls_absolues_css');
205 // les fonctions de preparation aux CSS peuvent etre personalisees
206 // via la globale $compresseur_filtres_css sous forme de tableau de fonctions ordonnees
207 if (isset($GLOBALS['compresseur_filtres_css']) AND is_array($GLOBALS['compresseur_filtres_css']))
208 $fonctions = $GLOBALS['compresseur_filtres_css'] +
$fonctions;
215 * Préparer un fichier CSS avant sa minification
218 * @param bool|string $is_inline
219 * @param string $fonctions
220 * @return bool|int|null|string
222 function &compresseur_callback_prepare_css(&$css, $is_inline = false, $fonctions=null) {
223 if ($is_inline) return compresseur_callback_prepare_css_inline($css,$is_inline);
224 if (!preg_match(',\.css$,i', $css, $r)) return $css;
226 $url_absolue_css = url_absolue($css);
227 // retirer le protocole de $url_absolue_css
228 $url_absolue_css_implicite = protocole_implicite($url_absolue_css);
230 if (!$fonctions) $fonctions = compresseur_liste_fonctions_prepare_css();
231 elseif (is_string($fonctions)) $fonctions = array($fonctions);
233 $sign = implode(",",$fonctions);
234 $sign = substr(md5("$url_absolue_css_implicite-$sign"), 0,8);
236 $file = basename($css,'.css');
237 $file = sous_repertoire (_DIR_VAR
, 'cache-css')
238 . preg_replace(",(.*?)(_rtl|_ltr)?$,","\\1-f-" . $sign . "\\2",$file)
241 if ((@filemtime
($file) > @filemtime
($css))
242 AND (!defined('_VAR_MODE') OR _VAR_MODE
!= 'recalcul'))
245 if ($url_absolue_css==$css){
246 if (strncmp($GLOBALS['meta']['adresse_site']."/",$css,$l=strlen($GLOBALS['meta']['adresse_site']."/"))!=0
247 OR !lire_fichier(_DIR_RACINE
. substr($css,$l), $contenu)){
248 include_spip('inc/distant');
249 if (!$contenu = recuperer_page($css))
253 elseif (!lire_fichier($css, $contenu))
256 $contenu = compresseur_callback_prepare_css_inline($contenu, $url_absolue_css_implicite, $fonctions);
259 if (!ecrire_fichier($file, $contenu))
266 * Préparer du contenu CSS inline avant minification
268 * @param string $contenu
269 * @param string $url_base
270 * @param array $fonctions
273 function &compresseur_callback_prepare_css_inline(&$contenu, $url_base, $fonctions=null) {
274 if (!$fonctions) $fonctions = compresseur_liste_fonctions_prepare_css();
275 elseif (is_string($fonctions)) $fonctions = array($fonctions);
277 // retirer le protocole de $url_base
278 $url_base = protocole_implicite(url_absolue($url_base));
280 foreach($fonctions as $f)
281 if (function_exists($f))
282 $contenu = $f($contenu, $url_base);
288 * Resoudre et inliner les @import
289 * ceux-ci ne peuvent etre presents qu'en debut de CSS et on ne veut pas changer l'ordre des directives
291 * @param string $contenu
292 * @param string $url_base
295 function css_resolve_atimport($contenu, $url_base){
296 // vite si rien a faire
297 if (strpos($contenu,"@import")===false)
300 $imports_non_resolvables = array();
301 preg_match_all(",@import ([^;]*);,UmsS",$contenu,$matches,PREG_SET_ORDER
);
303 if ($matches AND count($matches)){
304 foreach($matches as $m){
305 $url = $media = $erreur = "";
306 if (preg_match(",^\s*url\s*\(\s*['\"]?([^'\"]*)['\"]?\s*\),Ums",$m[1],$r)){
308 $media = trim(substr($m[1],strlen($r[0])));
310 elseif(preg_match(",^\s*['\"]([^'\"]+)['\"],Ums",$m[1],$r)){
312 $media = trim(substr($m[1],strlen($r[0])));
315 $erreur = "Compresseur : <tt>".$m[0].";</tt> non resolu dans <tt>$url_base</tt>";
318 $url = suivre_lien($url_base,$url);
320 $root = protocole_implicite($GLOBALS['meta']['adresse_site']."/");
321 if (strncmp($url,$root,strlen($root))==0){
322 $url = _DIR_RACINE
. substr($url,strlen($root));
325 // si l'url a un protocole http(s):// on ne considère qu'on ne peut pas
326 // résoudre le stockage. Par exemple
327 // @import url(https://fonts.googleapis.com/css?family=Ubuntu);
328 // retournant un contenu différent en fonction navigateur
329 // tous les @import restant seront remontes en tete de CSS en fin de concatenation
330 if (preg_match(',^https?://,', $url)) {
333 // protocole implicite //
339 // on renvoit dans la boucle pour que le fichier inclus
340 // soit aussi processe (@import, url absolue etc...)
341 $css = compresseur_callback_prepare_css($url);
343 OR !lire_fichier($css,$contenu_imported)){
344 $erreur = "Compresseur : url $url de <tt>".$m[0].";</tt> non resolu dans <tt>$url_base</tt>";
348 $contenu_imported = "@media $media{\n$contenu_imported\n}\n";
350 $contenu = str_replace($m[0],$contenu_imported,$contenu);
356 $contenu = str_replace($m[0],"/* erreur @ import ".$m[1]."*/",$contenu);
357 erreur_squelette($erreur);
366 * Regrouper les @import restants dans la CSS concatenee en debut de celle-ci
368 * @param string $nom_tmp
370 * @return bool|string
372 function css_regroup_atimport($nom_tmp, $nom){
373 lire_fichier($nom_tmp,$contenu);
374 if (!$contenu OR strpos($contenu,"@import")===false) return false; // rien a faire
376 preg_match_all(",@import ([^;]*);,UmsS",$contenu,$matches,PREG_SET_ORDER
);
377 $imports = array_map("reset",$matches);
378 $contenu = str_replace($imports,"",$contenu);
379 $contenu = implode("\n",$imports)."\n".$contenu;
380 ecrire_fichier($nom,$contenu,true);
381 // ecrire une version .gz pour content-negociation par apache, cf. [11539]
382 ecrire_fichier("$nom.gz",$contenu,true);