d2fef37b7234f9456073d147cec644c54c3da09c
3 /***************************************************************************\
4 * SPIP, Systeme de publication pour l'internet *
6 * Copyright (c) 2001-2014 *
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 \***************************************************************************/
13 if (!defined("_ECRIRE_INC_VERSION")) return;
15 include_spip('inc/getdocument');
16 include_spip('inc/documents');
17 include_spip('inc/choisir_mode_document'); // compat core
18 include_spip('inc/renseigner_document');
21 * Ajouter des documents
23 * @param int $id_document
24 * document a remplacer, ou pour une vignette, l'id_document de maman
25 * 0 ou 'new' pour une insertion
27 * tableau de taleau de propriete pour chaque document a inserer
29 * objet auquel associer le document
33 * mode par defaut si pas precise pour le document
35 * liste des id_documents inseres
37 function action_ajouter_documents_dist($id_document, $files, $objet, $id_objet, $mode){
38 $ajouter_un_document = charger_fonction('ajouter_un_document','action');
41 // on ne peut mettre qu'un seul document a la place d'un autre ou en vignette d'un autre
42 if (intval($id_document)){
43 $ajoutes[] = $ajouter_un_document($id_document, reset($files), $objet, $id_objet, $mode);
46 foreach($files as $file){
47 $ajoutes[] = $ajouter_un_document('new', $file, $objet, $id_objet, $mode);
53 * Ajouter un document (au format $_FILES)
55 * http://doc.spip.org/@ajouter_un_document
57 * @param int $id_document
58 * document a remplacer, ou pour une vignette, l'id_document de maman
59 * 0 ou 'new' pour une insertion
61 * proprietes au format $_FILE etendu :
62 * string tmp_name : source sur le serveur
63 * string name : nom du fichier envoye
64 * bool titrer : donner ou non un titre a partir du nom du fichier
65 * bool distant : pour utiliser une source distante sur internet
66 * string mode : vignette|image|documents|choix
67 * @param string $objet
68 * objet auquel associer le document
69 * @param int $id_objet
72 * mode par defaut si pas precise pour le document
73 * @return array|bool|int|mixed|string|unknown
74 * si int : l'id_document ajouté (opération réussie)
75 * si string : une erreur s'est produit, la chaine est le message d'erreur
78 function action_ajouter_un_document_dist($id_document, $file, $objet, $id_objet, $mode) {
80 $source = $file['tmp_name'];
81 $nom_envoye = $file['name'];
83 // passer en minuscules le nom du fichier, pour eviter les collisions
84 // si le file system fait la difference entre les deux il ne detectera
85 // pas que Toto.pdf et toto.pdf
86 // et on aura une collision en cas de changement de file system
87 $file['name'] = strtolower(translitteration($file['name']));
89 // Pouvoir definir dans mes_options.php que l'on veut titrer tous les documents par d?faut
90 if (!defined('_TITRER_DOCUMENTS')) { define('_TITRER_DOCUMENTS', false); }
92 $titrer = isset($file['titrer'])?
$file['titrer']:_TITRER_DOCUMENTS
;
93 $mode = ((isset($file['mode']) AND $file['mode'])?
$file['mode']:$mode);
95 include_spip('inc/modifier');
96 if (isset($file['distant']) AND $file['distant'] AND !in_array($mode,array('choix','auto','image','document'))) {
97 include_spip('inc/distant');
98 $file['tmp_name'] = _DIR_RACINE
. copie_locale($source);
99 $source = $file['tmp_name'];
100 unset($file['distant']);
103 // Documents distants : pas trop de verifications bloquantes, mais un test
104 // via une requete HEAD pour savoir si la ressource existe (non 404), si le
105 // content-type est connu, et si possible recuperer la taille, voire plus.
106 if (isset($file['distant']) AND $file['distant']) {
107 include_spip('inc/distant');
108 if (is_array($a = renseigner_source_distante($source))) {
111 # NB: dans les bonnes conditions (fichier autorise et pas trop gros)
112 # $a['fichier'] est une copie locale du fichier
114 unset($champs['type_image']);
116 // on ne doit plus arriver ici, car l'url distante a ete verifiee a la saisie !
118 spip_log("Echec du lien vers le document $source, abandon");
119 return $a; // message d'erreur
122 else { // pas distant
128 $type_image = ''; // au pire
129 $champs['titre'] = '';
131 $titre = substr($nom_envoye,0, strrpos($nom_envoye, ".")); // Enlever l'extension du nom du fichier
132 $titre = preg_replace(',[[:punct:][:space:]]+,u', ' ', $titre);
133 $champs['titre'] = preg_replace(',\.([^.]+)$,', '', $titre);
136 if (!is_array($fichier = fixer_fichier_upload($file, $mode)))
137 return is_string($fichier)?
$fichier:_T("medias:erreur_upload_type_interdit",array('nom'=>$file['name']));
139 $champs['inclus'] = $fichier['inclus'];
140 $champs['extension'] = $fichier['extension'];
141 $champs['fichier'] = $fichier['fichier'];
144 * Récupère les informations du fichier
149 * -* ses metadonnées si une fonction de metadatas/ est présente
151 $infos = renseigner_taille_dimension_image($champs['fichier'],$champs['extension']);
152 if (is_string($infos))
153 return $infos; // c'est un message d'erreur !
155 $champs = array_merge($champs,$infos);
157 // Si mode == 'choix', fixer le mode image/document
158 if (in_array($mode,array('choix','auto'))) {
159 $choisir_mode_document = charger_fonction('choisir_mode_document','inc');
160 $mode = $choisir_mode_document($champs, $champs['inclus'] == 'image', $objet);
162 $champs['mode'] = $mode;
164 if (($test = verifier_taille_document_acceptable($champs))!==true){
165 spip_unlink($champs['fichier']);
166 return $test; // erreur sur les dimensions du fichier
169 unset($champs['type_image']);
170 unset($champs['inclus']);
171 $champs['fichier'] = set_spip_doc($champs['fichier']);
174 // si le media est pas renseigne, le faire, en fonction de l'extension
175 if (!isset($champs['media'])){
176 $champs['media'] = sql_getfetsel('media_defaut','spip_types_documents','extension='.sql_quote($champs['extension']));
179 // lier le parent si necessaire
180 if ($id_objet=intval($id_objet) AND $objet)
181 $champs['parents'][] = "$objet|$id_objet";
183 // "mettre a jour un document" si on lui
184 // passe un id_document
185 if ($id_document=intval($id_document)){
186 unset($champs['titre']); // garder le titre d'origine
187 unset($champs['date']); // garder la date d'origine
188 unset($champs['descriptif']); // garder la desc d'origine
189 // unset($a['distant']); # on peut remplacer un doc statique par un doc distant
190 // unset($a['mode']); # on peut remplacer une image par un document ?
193 include_spip('action/editer_document');
194 // Installer le document dans la base
196 if ($id_document = document_inserer())
197 spip_log ("ajout du document ".$file['tmp_name']." ".$file['name']." (M '$mode' T '$objet' L '$id_objet' D '$id_document')",'medias');
199 spip_log ("Echec insert_document() du document ".$file['tmp_name']." ".$file['name']." (M '$mode' T '$objet' L '$id_objet' D '$id_document')",'medias'._LOG_ERREUR
);
202 return _T('medias:erreur_insertion_document_base',array('fichier'=>"<em>".$file['name']."</em>"));
204 document_modifier($id_document,$champs);
206 // permettre aux plugins de faire des modifs a l'ajout initial
207 // ex EXIF qui tourne les images si necessaire
208 // Ce plugin ferait quand même mieux de se placer dans metadata/jpg.php
209 pipeline('post_edition',
212 'table' => 'spip_documents', // compatibilite
213 'table_objet' => 'documents',
214 'spip_table_objet' => 'spip_documents',
216 'id_objet' => $id_document,
217 'champs' => array_keys($champs),
218 'serveur' => '', // serveur par defaut, on ne sait pas faire mieux pour le moment
219 'action' => 'ajouter_document',
220 'operation' => 'ajouter_document', // compat <= v2.0
226 return $id_document ;
231 * Corrige l'extension du fichier dans quelques cas particuliers
232 * (a passer dans ecrire/base/typedoc)
233 * A noter : une extension 'pdf ' passe dans la requete de controle
234 * mysql> SELECT * FROM spip_types_documents WHERE extension="pdf ";
239 function corriger_extension($ext) {
240 $ext = preg_replace(',[^a-z0-9],i', '', $ext);
262 * Verifie la possibilite d'uploader une extension
263 * renvoie un tableau descriptif si l'extension est acceptee
264 * avec un index 'autozip' si il faut zipper
265 * false ou message d'erreur si l'extension est refusee
266 * Verifie aussi si l'extension est autorisee pour le mode demande
267 * si on connait le mode a ce moment la
270 function verifier_upload_autorise($source, $mode=''){
271 $infos = array('fichier'=>$source);
273 if (preg_match(",\.([a-z0-9]+)(\?.*)?$,i", $source, $match)
274 AND $ext = $match[1]){
276 $ext = corriger_extension(strtolower($ext));
277 if ($res = sql_fetsel("extension,inclus,media_defaut as media", "spip_types_documents", "extension=" . sql_quote($ext) . " AND upload='oui'"))
278 $infos = array_merge($infos,$res);
281 if ($res = sql_fetsel("extension,inclus,media_defaut as media", "spip_types_documents", "extension='zip' AND upload='oui'")){
282 $infos = array_merge($infos,$res);
283 $res['autozip'] = true;
287 // verifier en fonction du mode si une fonction est proposee
288 if ($verifier_document_mode = charger_fonction("verifier_document_mode_".$mode,"inc",true)){
289 $check = $verifier_document_mode($infos); // true ou message d'erreur sous forme de chaine
295 if (!$res OR is_string($res)) {
296 spip_log("Upload $source interdit ($res)",_LOG_INFO_IMPORTANTE
);
304 * tester le type de document :
305 * - interdit a l'upload ?
306 * - quelle extension dans spip_types_documents ?
307 * - est-ce "inclus" comme une image ?
309 * le zipper si necessaire
311 * @param array $file //format $_FILES
314 function fixer_fichier_upload($file, $mode=''){
316 if (is_array($row=verifier_upload_autorise($file['name'], $mode))) {
317 if (!isset($row['autozip'])){
318 $row['fichier'] = copier_document($row['extension'], $file['name'], $file['tmp_name']);
321 * On vérifie que le fichier a une taille
322 * si non, on le supprime et on affiche une erreur
324 if($row['fichier'] && (!$taille = @intval
(filesize(get_spip_doc($row['fichier']))))) {
325 spip_log ("Echec copie du fichier ".$file['tmp_name']." (taille de fichier indéfinie)");
326 spip_unlink(get_spip_doc($row['fichier']));
327 return _T('medias:erreur_copie_fichier',array('nom'=> $file['tmp_name']));
331 // creer un zip comme demande
332 // pour encapsuler un fichier dont l'extension n'est pas supportee
335 unset($row['autozip']);
338 if (!$tmp_dir = tempnam(_DIR_TMP
, 'tmp_upload'))
341 spip_unlink($tmp_dir);
344 include_spip('inc/charsets');
345 $tmp = $tmp_dir.'/'.translitteration($file['name']);
347 $file['name'] .= '.'.$ext; # conserver l'extension dans le nom de fichier, par exemple toto.js => toto.js.zip
349 // deplacer le fichier tmp_name dans le dossier tmp
350 deplacer_fichier_upload($file['tmp_name'], $tmp, true);
352 include_spip('inc/pclzip');
353 $source = _DIR_TMP
. basename($tmp_dir) . '.'.$ext;
354 $archive = new PclZip($source);
356 $v_list = $archive->create($tmp,
357 PCLZIP_OPT_REMOVE_PATH
, $tmp_dir,
358 PCLZIP_OPT_ADD_PATH
, '');
360 effacer_repertoire_temporaire($tmp_dir);
362 spip_log("Echec creation du zip ");
366 $row['fichier'] = copier_document($row['extension'], $file['name'], $source);
367 spip_unlink($source);
370 * On vérifie que le fichier zip créé a une taille
371 * si non, on le supprime et on affiche une erreur
373 if($row['fichier'] && (!$taille = @intval
(filesize(get_spip_doc($row['fichier']))))) {
374 spip_log ("Echec copie du fichier ".$file['tmp_name']." (taille de fichier indéfinie)");
375 spip_unlink(get_spip_doc($row['fichier']));
376 return _T('medias:erreur_copie_fichier',array('nom'=> $file['tmp_name']));
382 return $row; // retourner le message d'erreur
386 * Verifier si le fichier respecte les contraintes de tailles
388 * @param array $infos
389 * @return bool|mixed|string
391 function verifier_taille_document_acceptable($infos){
393 // si ce n'est pas une image
394 if (!$infos['type_image']) {
395 if (_DOC_MAX_SIZE
> 0
396 AND $infos['taille'] > _DOC_MAX_SIZE
*1024)
397 return _T('medias:info_doc_max_poids', array('maxi' => taille_en_octets(_DOC_MAX_SIZE
*1024), 'actuel' => taille_en_octets($infos['taille'])));
400 // si c'est une image
403 if (_IMG_MAX_SIZE
> 0
404 AND $infos['taille'] > _IMG_MAX_SIZE
*1024)
405 return _T('medias:info_image_max_poids', array('maxi' => taille_en_octets(_IMG_MAX_SIZE
*1024), 'actuel' => taille_en_octets($infos['taille'])));
407 if (_IMG_MAX_WIDTH
* _IMG_MAX_HEIGHT
408 AND ($infos['largeur'] > _IMG_MAX_WIDTH
409 OR $infos['hauteur'] > _IMG_MAX_HEIGHT
))
411 return _T('medias:info_logo_max_taille',
414 _T('info_largeur_vignette',
415 array('largeur_vignette' => _IMG_MAX_WIDTH
,
416 'hauteur_vignette' => _IMG_MAX_HEIGHT
)),
418 _T('info_largeur_vignette',
419 array('largeur_vignette' => $infos['largeur'],
420 'hauteur_vignette' => $infos['hauteur']))
424 // verifier en fonction du mode si une fonction est proposee
425 if ($verifier_document_mode = charger_fonction("verifier_document_mode_".$infos['mode'],"inc",true))
426 return $verifier_document_mode($infos);