51b2027a641ccc5d12a60f98efaedfad138af712
3 /***************************************************************************\
4 * SPIP, Systeme de publication pour l'internet *
6 * Copyright (c) 2001-2019 *
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')) {
19 * Recuperer le nom du fichier selon le mode d'upload choisi
20 * et mettre cela au format $_FILES
22 * Renvoie une liste de fichier ou un message en cas d'erreur
24 * @return string/array
26 function joindre_trouver_fichier_envoye() {
27 static $files = array();
28 // on est appele deux fois dans un hit, resservir ce qu'on a trouve a la verif
29 // lorsqu'on est appelle au traitement
35 if (_request('joindre_upload')) {
36 $post = isset($_FILES) ?
$_FILES : $GLOBALS['HTTP_POST_FILES'];
38 if (is_array($post)) {
39 include_spip('action/ajouter_documents');
40 foreach ($post as $file) {
41 if (is_array($file['name'])) {
42 while (count($file['name'])) {
44 'error' => array_shift($file['error']),
45 'name' => array_shift($file['name']),
46 'tmp_name' => array_shift($file['tmp_name']),
47 'type' => array_shift($file['type']),
49 if (!($test['error'] == 4)) {
50 if (is_string($err = joindre_upload_error($test['error']))) {
53 if (!is_array(verifier_upload_autorise($test['name']))) {
54 return _T('medias:erreur_upload_type_interdit', array('nom' => $test['name']));
61 if (!($file['error'] == 4)) {
62 if (is_string($err = joindre_upload_error($file['error']))) {
65 if (!is_array(verifier_upload_autorise($file['name']))) {
66 return _T('medias:erreur_upload_type_interdit', array('nom' => $file['name']));
73 return _T('medias:erreur_indiquez_un_fichier');
78 } elseif (_request('joindre_distant')) {
79 $path = _request('url');
80 if (!strlen($path) or $path == 'http://') {
81 return _T('medias:erreur_indiquez_un_fichier');
83 include_spip('inc/distant');
84 if (!valider_url_distante($path)) {
85 return _T('medias:erreur_upload_type_interdit', array('nom' => $path));
87 include_spip('action/ajouter_documents');
88 $infos = renseigner_source_distante($path);
89 if (!is_array($infos)) {
95 'name' => basename($path),
101 } elseif (_request('joindre_ftp')) {
102 $path = _request('cheminftp');
103 if (!$path ||
strstr($path, '..')) {
104 return _T('medias:erreur_indiquez_un_fichier');
107 include_spip('inc/documents');
108 include_spip('inc/actions');
109 $upload = determine_upload();
110 if ($path != '/' and $path != './') {
114 if (!is_dir($upload)) {
115 // seul un fichier est demande
118 'name' => basename($upload),
119 'tmp_name' => $upload
123 // on upload tout un repertoire
125 foreach (preg_files($upload) as $fichier) {
127 'name' => basename($fichier),
128 'tmp_name' => $fichier
134 } elseif (_request('joindre_zip') and $token_zip = _request('chemin_zip')) {
135 $zip_to_clean = (isset($GLOBALS['visiteur_session']['zip_to_clean']) ?
136 unserialize($GLOBALS['visiteur_session']['zip_to_clean']) : array());
138 or !isset($zip_to_clean[$token_zip])
139 or !$path = $zip_to_clean[$token_zip]) {
140 return _T('avis_operation_impossible');
143 include_spip('inc/documents'); //pour creer_repertoire_documents
144 define('_TMP_ZIP', $path);
145 define('_TMP_DIR', creer_repertoire_documents(md5($path . $GLOBALS['visiteur_session']['id_auteur'])));
146 if (_TMP_DIR
== _DIR_IMG
) {
147 return _T('avis_operation_impossible');
151 if (_request('options_upload_zip') == 'deballe') {
152 $files = joindre_deballer_lister_zip($path, _TMP_DIR
);
155 // si le zip doit aussi etre conserve, l'ajouter
156 if (_request('options_upload_zip') == 'upload' or _request('options_deballe_zip_conserver')) {
158 'name' => basename($path),
170 // renvoie false si pas d'erreur
171 // et true si erreur = pas de fichier
172 // pour les autres erreurs renvoie le message d'erreur
173 function joindre_upload_error($error) {
178 spip_log("Erreur upload $error -- cf. http://php.net/manual/fr/features.file-upload.errors.php");
180 case 4: /* UPLOAD_ERR_NO_FILE */
183 # on peut affiner les differents messages d'erreur
184 case 1: /* UPLOAD_ERR_INI_SIZE */
186 'medias:upload_limit',
187 array('max' => ini_get('upload_max_filesize'))
190 case 2: /* UPLOAD_ERR_FORM_SIZE */
192 'medias:upload_limit',
193 array('max' => ini_get('upload_max_filesize'))
196 case 3: /* UPLOAD_ERR_PARTIAL */
198 'medias:upload_limit',
199 array('max' => ini_get('upload_max_filesize'))
202 case 6: /* UPLOAD_ERR_NO_TMP_DIR */
203 $msg = _T('medias:erreur_dossier_tmp_manquant');
205 case 7: /* UPLOAD_ERR_CANT_WRITE */
206 $msg = _T('medias:erreur_ecriture_fichier');
210 $msg = _T('pass_erreur') . ' ' . $error
211 . '<br />' . propre('[->http://php.net/manual/fr/features.file-upload.errors.php]');
215 spip_log("erreur upload $error");
220 * Verifier si le fichier poste est un zip
221 * Si on sait le deballer, proposer les options necessaires
223 * @param array $files
226 function joindre_verifier_zip($files) {
227 if (function_exists('gzopen')
228 and (count($files) == 1)
229 and !isset($files[0]['distant'])
231 (preg_match('/\.zip$/i', $files[0]['name'])
232 or (isset($files[0]['type']) and $files[0]['type'] == 'application/zip'))
234 // on pose le fichier dans le repertoire zip
235 // (nota : copier_document n'ecrase pas un fichier avec lui-meme
236 // ca autorise a boucler)
237 include_spip('inc/getdocument');
239 $zip = copier_document(
245 // Est-ce qu'on sait le lire ?
246 include_spip('inc/pclzip');
248 and $archive = new PclZip($zip)
249 and $contenu = joindre_decrire_contenu_zip($archive)
250 and $tmp = sous_repertoire(_DIR_TMP
, 'zip')
251 and rename($zip, $tmp = $tmp . basename($zip))
253 $zip_to_clean = (isset($GLOBALS['visiteur_session']['zip_to_clean']) ?
254 unserialize($GLOBALS['visiteur_session']['zip_to_clean']) : array());
255 $zip_to_clean[md5($tmp)] = $tmp;
256 session_set('zip_to_clean', serialize($zip_to_clean));
263 // ce n'est pas un zip sur lequel il faut demander plus de precisions
268 * Verifier et decrire les fichiers de l'archive, en deux listes :
269 * - une liste des noms de fichiers ajoutables
270 * - une liste des erreurs (fichiers refuses)
275 function joindre_decrire_contenu_zip($zip) {
276 include_spip('action/ajouter_documents');
277 // si pas possible de decompacter: installer comme fichier zip joint
278 if (!$list = $zip->listContent()) {
282 // Verifier si le contenu peut etre uploade (verif extension)
285 foreach ($list as $file) {
286 if (accepte_fichier_upload($f = $file['stored_filename'])) {
287 $fichiers[$f] = $file;
288 } else // pas de message pour les dossiers et fichiers caches
290 if (substr($f, -1) !== '/' and substr(basename($f), 0, 1) !== '.') {
291 $erreurs[] = _T('medias:erreur_upload_type_interdit', array('nom' => $f));
296 // si aucun fichier uploadable : installer comme fichier zip joint
297 if (!count($fichiers)) {
303 return array($fichiers, $erreurs);
307 // https://code.spip.net/@joindre_deballes
308 function joindre_deballer_lister_zip($path, $tmp_dir) {
309 include_spip('inc/pclzip');
310 $archive = new PclZip($path);
314 PCLZIP_CB_PRE_EXTRACT
,
315 'callback_deballe_fichier'
317 if ($contenu = joindre_decrire_contenu_zip($archive)) {
319 $fichiers = reset($contenu);
320 foreach ($fichiers as $fichier) {
321 $f = basename($fichier['filename']);
323 'tmp_name' => $tmp_dir . $f,
325 'titrer' => _request('options_deballe_zip_titrer'),
326 'mode' => _request('options_deballe_zip_mode_document') ?
'document' : null
333 return _T('avis_operation_impossible');
336 if (!function_exists('fixer_extension_document')) {
338 * Cherche dans la base le type-mime du tableau representant le document
339 * et corrige le nom du fichier ; retourne array(extension, nom corrige)
340 * s'il ne trouve pas, retourne '' et le nom inchange
342 * @param unknown_type $doc
345 // https://code.spip.net/@fixer_extension_document
346 function fixer_extension_document($doc) {
348 $name = $doc['name'];
349 if (preg_match(',\.([^.]+)$,', $name, $r)
352 'spip_types_documents',
353 'extension=' . sql_quote(corriger_extension($r[1]))
356 $extension = $t['extension'];
357 $name = preg_replace(',\.[^.]*$,', '', $doc['name']) . '.' . $extension;
359 if ($t = sql_fetsel('extension', 'spip_types_documents', 'mime_type=' . sql_quote($doc['type']))) {
360 $extension = $t['extension'];
361 $name = preg_replace(',\.[^.]*$,', '', $doc['name']) . '.' . $extension;
365 return array($extension, $name);
370 // Gestion des fichiers ZIP
372 // https://code.spip.net/@accepte_fichier_upload
374 function accepte_fichier_upload($f) {
375 if (!preg_match(',.*__MACOSX/,', $f)
376 and !preg_match(',^\.,', basename($f))
378 include_spip('action/ajouter_documents');
379 $ext = corriger_extension((strtolower(substr(strrchr($f, '.'), 1))));
382 'spip_types_documents',
383 'extension=' . sql_quote($ext) . " AND upload='oui'"
388 # callback pour le deballage d'un zip telecharge
389 # http://www.phpconcept.net/pclzip/man/en/?options-pclzip_cb_pre_extractfunction
390 // https://code.spip.net/@callback_deballe_fichier
392 function callback_deballe_fichier($p_event, &$p_header) {
393 if (accepte_fichier_upload($p_header['filename'])) {
394 $p_header['filename'] = _TMP_DIR
. basename($p_header['filename']);