www/plugins-dist/medias/inc/joindre_document.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
  15
  16 /**
  17  * Recuperer le nom du fichier selon le mode d'upload choisi
  18  * et mettre cela au format $_FILES
  19  *
  20  * Renvoie une liste de fichier ou un message en cas d'erreur
  21  *
  22  * @return string/array
  23  */
  24 function joindre_trouver_fichier_envoye(){
  25         static $files = array();
  26         // on est appele deux fois dans un hit, resservir ce qu'on a trouve a la verif
  27         // lorsqu'on est appelle au traitement
  28
  29         if (count($files))
  30                 return $files;
  31
  32         if (_request('joindre_upload')){
  33                 $post = isset($_FILES) ? $_FILES : $GLOBALS['HTTP_POST_FILES'];
  34                 $files = array();
  35                 if (is_array($post)){
  36                         include_spip('action/ajouter_documents');
  37                   foreach ($post as $file) {
  38                         if (is_array($file['name'])){
  39                                 while (count($file['name'])){
  40                                                 $test=array(
  41                                                         'error'=>array_shift($file['error']),
  42                                                         'name'=>array_shift($file['name']),
  43                                                         'tmp_name'=>array_shift($file['tmp_name']),
  44                                                         'type'=>array_shift($file['type']),
  45                                                         );
  46                                                 if (!($test['error'] == 4)){
  47                                                         if (is_string($err = joindre_upload_error($test['error'])))
  48                                                                 return $err; // un erreur upload
  49                                                         if (!is_array(verifier_upload_autorise($test['name'])))
  50                                                                 return _T('medias:erreur_upload_type_interdit',array('nom'=>$test['name']));
  51                                                         $files[]=$test;
  52                                                 }
  53                                 }
  54                         }
  55                         else {
  56                                 //UPLOAD_ERR_NO_FILE
  57                                         if (!($file['error'] == 4)){
  58                                                 if (is_string($err = joindre_upload_error($file['error'])))
  59                                                         return $err; // un erreur upload
  60                                                 if (!is_array(verifier_upload_autorise($file['name'])))
  61                                                         return _T('medias:erreur_upload_type_interdit',array('nom'=>$file['name']));
  62                                                 $files[]=$file;
  63                                         }
  64                         }
  65                         }
  66                         if (!count($files))
  67                                 return _T('medias:erreur_indiquez_un_fichier');
  68                 }
  69                 return $files;
  70         }
  71         elseif (_request('joindre_distant')){
  72                 $path = _request('url');
  73                 if (!strlen($path) OR $path=='http://')
  74                         return _T('medias:erreur_indiquez_un_fichier');
  75                 include_spip('action/ajouter_documents');
  76                 $infos = renseigner_source_distante($path);
  77                 if (!is_array($infos))
  78                         return $infos; // message d'erreur
  79                 else
  80                         return array(
  81                                 array(
  82                                         'name' => basename($path),
  83                                         'tmp_name' => $path,
  84                                         'distant' => true,
  85                                 )
  86                         );
  87         }
  88         elseif (_request('joindre_ftp')){
  89                 $path = _request('cheminftp');
  90                 if (!$path || strstr($path, '..')) return _T('medias:erreur_indiquez_un_fichier');
  91
  92                 include_spip('inc/documents');
  93                 include_spip('inc/actions');
  94                 $upload = determine_upload();
  95                 if ($path != '/' AND $path != './') $upload .= $path;
  96
  97                 if (!is_dir($upload))
  98                   // seul un fichier est demande
  99                   return array(
 100                         array (
 101                                 'name' => basename($upload),
 102                                         'tmp_name' => $upload
 103                                 )
 104                         );
 105                 else {
 106                   // on upload tout un repertoire
 107                   $files = array();
 108                   foreach (preg_files($upload) as $fichier) {
 109                                 $files[]= array (
 110                                         'name' => basename($fichier),
 111                                         'tmp_name' => $fichier
 112                                 );
 113                   }
 114                   return $files;
 115                 }
 116         }
 117         elseif (_request('joindre_zip') AND $path = _request('chemin_zip')){
 118                 include_spip('inc/documents'); //pour creer_repertoire_documents
 119                 define('_tmp_zip', $path);
 120                 define('_tmp_dir', creer_repertoire_documents(md5($path.$GLOBALS['visiteur_session']['id_auteur'])));
 121                 if (_tmp_dir == _DIR_IMG)
 122                         return _T('avis_operation_impossible');
 123
 124                 $files = array();
 125                 if (_request('options_upload_zip')=='deballe')
 126                         $files = joindre_deballer_lister_zip($path,_tmp_dir);
 127
 128                 // si le zip doit aussi etre conserve, l'ajouter
 129                 if (_request('options_upload_zip')=='upload' OR _request('options_deballe_zip_conserver')){
 130                 $files[] = array(
 131                                 'name' => basename($path),
 132                                 'tmp_name' => $path,
 133                 );
 134           }
 135
 136           return $files;
 137
 138         }
 139
 140         return array();
 141 }
 142
 143
 144 // Erreurs d'upload
 145 // renvoie false si pas d'erreur
 146 // et true si erreur = pas de fichier
 147 // pour les autres erreurs renvoie le message d'erreur
 148 function joindre_upload_error($error) {
 149
 150         if (!$error) return false;
 151         spip_log("Erreur upload $error -- cf. http://php.net/manual/fr/features.file-upload.errors.php");
 152         switch ($error) {
 153
 154                 case 4: /* UPLOAD_ERR_NO_FILE */
 155                         return true;
 156
 157                 # on peut affiner les differents messages d'erreur
 158                 case 1: /* UPLOAD_ERR_INI_SIZE */
 159                         $msg = _T('medias:upload_limit',
 160                         array('max' => ini_get('upload_max_filesize')));
 161                         break;
 162                 case 2: /* UPLOAD_ERR_FORM_SIZE */
 163                         $msg = _T('medias:upload_limit',
 164                         array('max' => ini_get('upload_max_filesize')));
 165                         break;
 166                 case 3: /* UPLOAD_ERR_PARTIAL  */
 167                         $msg = _T('medias:upload_limit',
 168                         array('max' => ini_get('upload_max_filesize')));
 169                         break;
 170                 case 6: /* UPLOAD_ERR_NO_TMP_DIR  */
 171                         $msg = _T('medias:erreur_dossier_tmp_manquant');
 172                         break;
 173                 case 7: /* UPLOAD_ERR_CANT_WRITE */
 174                         $msg = _T('medias:erreur_ecriture_fichier');
 175
 176                 default: /* autre */
 177                         if (!$msg)
 178                         $msg = _T('pass_erreur').' '. $error
 179                         . '<br />' . propre("[->http://php.net/manual/fr/features.file-upload.errors.php]");
 180                         break;
 181         }
 182
 183         spip_log ("erreur upload $error");
 184         return $msg;
 185
 186 }
 187
 188 /**
 189  * Verifier si le fichier poste est un zip
 190  * Si on sait le deballer, proposer les options necessaires
 191  *
 192  * @param array $files
 193  * @return string
 194  */
 195 function joindre_verifier_zip($files){
 196         if (function_exists('gzopen')
 197          AND (count($files) == 1)
 198          AND !isset($files[0]['distant'])
 199          AND
 200           (preg_match('/\.zip$/i', $files[0]['name'])
 201            OR (isset($files[0]['type']) AND $files[0]['type'] == 'application/zip'))
 202           ){
 203
 204           // on pose le fichier dans le repertoire zip
 205           // (nota : copier_document n'ecrase pas un fichier avec lui-meme
 206           // ca autorise a boucler)
 207           include_spip('inc/getdocument');
 208                 $desc = $files[0];
 209                 $zip = copier_document("zip",
 210                                         $desc['name'],
 211                                         $desc['tmp_name']
 212                                 );
 213
 214                 // Est-ce qu'on sait le lire ?
 215                 include_spip('inc/pclzip');
 216                 if ($zip
 217                  AND $archive = new PclZip($zip)
 218                  AND $contenu = joindre_decrire_contenu_zip($archive)
 219                  AND rename($zip, $tmp = _DIR_TMP.basename($zip))
 220                  ){
 221                         $contenu[] = $tmp;
 222                         return $contenu;
 223                  }
 224         }
 225
 226         // ce n'est pas un zip sur lequel il faut demander plus de precisions
 227         return false;
 228 }
 229
 230 /**
 231  * Verifier et decrire les fichiers de l'archive, en deux listes :
 232  * - une liste des noms de fichiers ajoutables
 233  * - une liste des erreurs (fichiers refuses)
 234  *
 235  * @param object $zip
 236  * @return array
 237  */
 238 function joindre_decrire_contenu_zip($zip) {
 239         include_spip('action/ajouter_documents');
 240         // si pas possible de decompacter: installer comme fichier zip joint
 241         if (!$list = $zip->listContent()) return false;
 242
 243         // Verifier si le contenu peut etre uploade (verif extension)
 244         $fichiers = array();
 245         $erreurs = array();
 246         foreach ($list as $file) {
 247                 if (accepte_fichier_upload($f = $file['stored_filename']))
 248                         $fichiers[$f] = $file;
 249                 else
 250                         // pas de message pour les dossiers et fichiers caches
 251                         if (substr($f,-1)!=='/' AND substr(basename($f),0,1)!=='.')
 252                                 $erreurs[] = _T('medias:erreur_upload_type_interdit',array('nom'=>$f));
 253         }
 254
 255         // si aucun fichier uploadable : installer comme fichier zip joint
 256         if (!count($fichiers))
 257                 return false;
 258
 259         ksort($fichiers);
 260         return array($fichiers,$erreurs);
 261 }
 262
 263
 264
 265 // http://doc.spip.org/@joindre_deballes
 266 function joindre_deballer_lister_zip($path,$tmp_dir) {
 267   include_spip('inc/pclzip');
 268         $archive = new PclZip($path);
 269         $archive->extract(
 270                 PCLZIP_OPT_PATH, _tmp_dir,
 271                 PCLZIP_CB_PRE_EXTRACT, 'callback_deballe_fichier'
 272         );
 273         if ($contenu = joindre_decrire_contenu_zip($archive)){
 274                 $files = array();
 275                 $fichiers = reset($contenu);
 276                 foreach($fichiers as $fichier){
 277                         $f = basename($fichier['filename']);
 278                         $files[] = array('tmp_name'=>$tmp_dir. $f,'name'=>$f,'titrer'=>_request('options_deballe_zip_titrer'),'mode'=>_request('options_deballe_zip_mode_document')?'document':null);
 279                 }
 280                 return $files;
 281         }
 282         return _T('avis_operation_impossible');
 283 }
 284
 285 if (!function_exists('fixer_extension_document')){
 286 /**
 287  * Cherche dans la base le type-mime du tableau representant le document
 288  * et corrige le nom du fichier ; retourne array(extension, nom corrige)
 289  * s'il ne trouve pas, retourne '' et le nom inchange
 290  *
 291  * @param unknown_type $doc
 292  * @return unknown
 293  */
 294 // http://doc.spip.org/@fixer_extension_document
 295 function fixer_extension_document($doc) {
 296         $extension = '';
 297         $name = $doc['name'];
 298         if (preg_match(',\.([^.]+)$,', $name, $r)
 299          AND $t = sql_fetsel("extension", "spip_types_documents",       "extension=" . sql_quote(corriger_extension($r[1])))
 300          ) {
 301                 $extension = $t['extension'];
 302                 $name = preg_replace(',\.[^.]*$,', '', $doc['name']).'.'.$extension;
 303         }
 304         else if ($t = sql_fetsel("extension", "spip_types_documents",   "mime_type=" . sql_quote($doc['type']))) {
 305                 $extension = $t['extension'];
 306                 $name = preg_replace(',\.[^.]*$,', '', $doc['name']).'.'.$extension;
 307         }
 308
 309         return array($extension,$name);
 310 }
 311 }
 312
 313 //
 314 // Gestion des fichiers ZIP
 315 //
 316 // http://doc.spip.org/@accepte_fichier_upload
 317
 318 function accepte_fichier_upload ($f) {
 319         if (!preg_match(",.*__MACOSX/,", $f)
 320         AND !preg_match(",^\.,", basename($f))) {
 321         include_spip('action/ajouter_documents');
 322                 $ext = corriger_extension((strtolower(substr(strrchr($f, "."), 1))));
 323                 return sql_countsel('spip_types_documents', "extension=" . sql_quote($ext) . " AND upload='oui'");
 324         }
 325 }
 326
 327 # callback pour le deballage d'un zip telecharge
 328 # http://www.phpconcept.net/pclzip/man/en/?options-pclzip_cb_pre_extractfunction
 329 // http://doc.spip.org/@callback_deballe_fichier
 330
 331 function callback_deballe_fichier($p_event, &$p_header) {
 332         if (accepte_fichier_upload($p_header['filename'])) {
 333                 $p_header['filename'] = _tmp_dir . basename($p_header['filename']);
 334                 return 1;
 335         } else {
 336                 return 0;
 337         }
 338 }
 339
 340 ?>