<?php
namespace App\Http\Controllers;

use App\Http\Traits\ArcadiaLink;
use Illuminate\Support\Facades\Auth;
use Illuminate\Support\Facades\Log;
use Illuminate\Support\Facades\Storage;
use Illuminate\Http\Request;
use App\Models\Media;
use App\Models\Site;
use App\Models\Historique;
use App\Http\Traits\MediaTools;


class UploadController extends Controller
{

    use MediaTools;

    public function index(Request $request)
    {
        // ---- Vérification du token de sécurité
        $token = $request->get('token');
        if($token != env('TOKEN_DEPOT', "c8c4613a-236c-4b06-95f6-a9c9c6c18861")) { return  abort(404);
        }

        $sites = Site::orderBy('libelle')->get();
        return view('upload.show')->with(
            [
            'sites'=> $sites,
            ]
        );
    }

    public function storeMedia(Request $request)
    {
        $uid = $request->input('uid');
        $sujet_id = $request->input('sujet_id');
        $dossier_id = $request->input('dossier_id');
        $replaceMediaId = $request->input('replaceMediaId');
        if($dossier_id == 0) { $dossier_id = null;
        }

        $headers = $request->headers->all();
        $acceptFileTypes = array('gif','jpeg', 'jpg','png','mp4','mp3','psd','ai','svg','pdf');

        if ($request->hasFile('files')) {
            $filesa = [];
            $file = $request->file('files');

            foreach($file as $files){
                $is_last_chunk = false;
                $is_chunked_upload = !empty($headers['content-range']);
                if ($is_chunked_upload) {
                    if (preg_match('|(\d+)/(\d+)|', $headers['content-range'][0], $range)) {
                        if ($range[1] == $range[2] - 1) {
                            $is_last_chunk = true;
                        }
                    }
                }

                $extension = strtolower($files->getClientOriginalExtension());
                $originalName = str_replace(".".$extension, "", $files->getClientOriginalName());
                if (!in_array($extension, $acceptFileTypes)) { return array("false");
                }

                if($is_chunked_upload) {
                    $filename = $uid."_".$range[1].".".$extension;
                }else{
                    $filename = $uid.'.'.$extension;
                }

                $uploadPath = public_path() . '/uploads/';
                $files->move($uploadPath, $filename);

                // si c'est le dernier morceux d'un fichier
                if($is_last_chunk) {
                    if($dossier = opendir($uploadPath)) {
                        $dirFiles = array();
                        // on compile tous les chunk du fichier
                        while(false !== ($fichier = readdir($dossier))){
                            if($fichier != '.' && $fichier != '..' ) {
                                if(strpos($fichier, $uid) !== false) {
                                    $dirFiles[$fichier] = str_replace(".".$extension, "", str_replace($uid."_", "", $fichier));
                                }
                            }
                        }
                        closedir($dossier);
                        // on les trie pour les assembler dans le bon ordre
                        asort($dirFiles, SORT_NUMERIC);
                        // on les assemble dans un fichier final
                        $filename = $uid . '.' . $extension;
                        foreach($dirFiles as $key => $fichier)    {
                               $file = fopen($uploadPath.$key, 'rb');
                               $buff = fread($file, filesize($uploadPath.$key));
                               fclose($file);

                               $final = fopen($uploadPath.$filename, 'a');
                               $write = fwrite($final, $buff);
                               fclose($final);

                               unlink($uploadPath.$key);
                        }


                    }
                }

                // si c'est le dernier morceau d'un fichier ou que c'est un envoi simple
                if($is_last_chunk || !$is_chunked_upload ) {

                    $destinationPath = $this->get_mediaFolder()."/";

                    // si on upload un média pour remplacer un fichier par un autre
                    if($replaceMediaId != 0) {
                        // on récupère le média à modifier
                        $media= Media::where('id', $replaceMediaId)->first();

                        // On déplace le fichier dans le répertoire des médias
                        Storage::move("uploads/".$filename, $destinationPath.$filename);

                        // supprime les fichiers médias stockés sur disque
                        $filesfF= Storage::files($media->folder."/");
                        $filepath = preg_quote($media->folder.$media->uid, '/');
                        $matchingFiles = preg_grep('/^'.$filepath.'/', $filesfF);
                        Storage::delete($matchingFiles);

                        $media->isDefault = 0;
                        $media->save();

                    }else{
                        // On déplace le fichier dans le répertoire des médias
                        Storage::move("uploads/".$filename, $destinationPath.$filename);

                        // on créé un média en bdd
                        $media = new Media();
                        $media->dossier_id = $dossier_id;
                        $media->sujet_id = $sujet_id;
                        // Par défaut FR
                        $media->langue_id = 1;
                        // Par défaut propriété de la marque
                        $media->copyright_id = 3;
                    }

                    $media->extension = $extension;
                    $media->folder = $destinationPath;
                    if($replaceMediaId == 0) {
                        $media->libelle = mb_substr($originalName, 0, 50, "UTF-8");
                        $media->created_by= Auth::user()->id;
                    }
                    $media->uid = $uid;
                    $media->taille = $this->formatBytes($this->get_file_size($destinationPath.$filename));

                    switch ($extension) {
                        // Photo (1)
                    case 'gif':
                    case 'jpeg':
                    case 'jpg':
                    case 'png':
                    case 'ai':
                    case 'pdf':
                    case 'psd':
                        $media->typemedia_id = 1;
                        $im = new \imagick($destinationPath.$filename);

                        if(in_array($extension, array("pdf", "ai", "psd", "gif")) ) {
                               $im->setIteratorIndex(0);
                        }

                        $resolutions = $im->getImageResolution();
                        $media->resolution = round($resolutions['x'] * 2.54);
                        $imageprops = $im->getImageGeometry();
                        $media->largeur = $imageprops['width'];
                        $media->hauteur = $imageprops['height'];

                        if($media->resolution != 0) {
                            $media->largeur_mm = ceil(($media->largeur * 2.54 / $media->resolution)*10);
                            $media->hauteur_mm = ceil(($media->hauteur * 2.54 / $media->resolution)*10);
                        }else{
                            $media->largeur_mm = "";
                            $media->hauteur_mm = "";
                        }
                        $media->save();
                        $im->destroy();

                        // ---- Creation des vignettes de base
                        $this->create_sys_thumb($media);
                        // ---- Creation des vignettes en lien avec le sujet du média
                        if(isset($sujet_id) ) {
                            $this->create_thumb($media);
                        }
                        break;
                        // Illustration/Vectorielle (2)
                    case 'svg':
                        $media->typemedia_id = 2;
                        $media->save();
                        break;
                        // Vidéo (3)
                    case 'mp4':
                        $media->typemedia_id =3 ;
                        $getID3 = new \getID3;
                        if($fileInfo = $getID3->analyze($destinationPath.$filename)) {
                            $media->largeur = $fileInfo['video']['resolution_x'];
                            $media->hauteur = $fileInfo['video']['resolution_y'];
                            $media->duree = $fileInfo['playtime_string'];
                        }
                        $media->save();
                        break;
                        // Audio (4)
                    case 'mp3':
                        $media->typemedia_id = 4;
                        $getID3 = new \getID3;
                        if($fileInfo = $getID3->analyze($destinationPath.$filename)) {
                            $media->duree= $fileInfo['playtime_string'];
                        }
                        $media->save();
                        break;
                    }

                    $id = $media->id;
                    $media = Media::find($id);
                    // ---- Index dans Elasticsearch
                    $media = Media::where('id', $media->id)->first();
                    $media->addToIndex();

                    // ---- Historique des actions
                    $historique = new historique();
                    if($user = Auth::user()) {
                        $historique->user_id = $user->id;
                    }
                    $historique->media_id = $media->id;
                    if($replaceMediaId == 0) {
                        $historique->type = "Création";
                        $historique->description = "Média ajouté";
                    }else{
                        $historique->type = "Modification";
                        $historique->description = "Le média a été remplacé";
                    }
                    $historique->save();

                    $filest = array();
                    $filest['name'] = $filename;
                    $filest['uid'] = $uid;
                    $filest['libelle'] = $media->libelle;
                    $filest['id'] = $media->id;
                    $filest['folder'] = $media->folder;
                    $filest['extension'] = $media->extension;
                    $filest['typemedia_id'] = $media->typemedia_id;

                    $filesa['files'][]=$filest;
                }
            }
            return  $filesa;
        }
    }

    public function storeMediaV2(Request $request)
    {
        $uid = $request->input('uid');
        $sujet_id = $request->input('sujet_id');
        $dossier_id = $request->input('dossier_id');
        $replaceMediaId = $request->input('replaceMediaId');
        if($dossier_id == 0) { $dossier_id = null;
        }

        $filesa = [];
        $acceptFileTypes = array('gif','jpeg', 'jpg','png','mp4','mp3','psd','ai','svg','pdf');

        if (!$uid) {
            $uid = sprintf('%04x%04x-%04x-%04x-%04x-%04x%04x%04x', mt_rand(0, 0xffff), mt_rand(0, 0xffff), mt_rand(0, 0xffff), mt_rand(0, 0x0fff) | 0x4000, mt_rand(0, 0x3fff) | 0x8000, mt_rand(0, 0xffff), mt_rand(0, 0xffff), mt_rand(0, 0xffff));
        }

        $file = $request->file('files');
        if (!empty($file)) {
            $extension = strtolower($file->getClientOriginalExtension());
            $originalName = str_replace(".".$extension, "", $file->getClientOriginalName());
            if (!in_array($extension, $acceptFileTypes)) { return array("false");
            }

            if (!in_array($extension, $acceptFileTypes)) { return array("error" => "Ce type de fichier n'est pas accepté.");
            }

            // check the error status
            if ($file->getError() != 0) {
                Log::error('error ' . $file->getError() . ' in file ' . $request->resumableFilename);
            }

            // init the destination file (format <filename.ext>.part<#chunk>
            // the file is stored in a temporary directory
            if(isset($request->resumableIdentifier) && trim($request->resumableIdentifier)!='') {
                $temp_dir = 'uploads/' . $request->resumableIdentifier;
            }
            $dest_file = $temp_dir . '/' . $request->resumableFilename . '.part' . $request->resumableChunkNumber;

            // create the temporary directory
            if (!is_dir($temp_dir)) {
                mkdir($temp_dir, 0777, true);
            }

            // move the temporary file
            if (!move_uploaded_file($file->getPathname(), $dest_file)) {
                Log::error('Error saving (move_uploaded_file) chunk ' . $request->resumableChunkNumber.' for file ' . $request->resumableFilename);
            } else {
                $filename = $uid . '.' . $extension;
                // check if all the parts present, and create the final destination file
                $isLast = $this->createFileFromChunks($temp_dir, $request->resumableFilename, $request->resumableChunkSize, $request->resumableTotalSize, $request->resumableTotalChunks, $filename);
                if ($isLast) {

                    $destinationPath = $this->get_mediaFolder()."/";

                    // si on upload un média pour remplacer un fichier par un autre
                    if($replaceMediaId != 0) {
                        // on récupère le média à modifier
                        $media= Media::where('id', $replaceMediaId)->first();

                        // On déplace le fichier dans le répertoire des médias
                        Storage::move("uploads/".$filename, $destinationPath.$filename);

                        // supprime les fichiers médias stockés sur disque
                        $filesfF= Storage::files($media->folder."/");
                        $filepath = preg_quote($media->folder.$media->uid, '/');
                        $matchingFiles = preg_grep('/^'.$filepath.'/', $filesfF);
                        Storage::delete($matchingFiles);

                        $media->isDefault = 0;
                        $media->save();

                    }else{
                        // On déplace le fichier dans le répertoire des médias
                        Storage::move("uploads/".$filename, $destinationPath.$filename);

                        // on créé un média en bdd
                        $media = new Media();
                        $media->dossier_id = $dossier_id;
                        $media->sujet_id = $sujet_id;
                        // Par défaut FR
                        $media->langue_id = 1;
                        // Par défaut propriété de la marque
                        $media->copyright_id = 3;
                    }

                    $media->extension = $extension;
                    $media->folder = $destinationPath;
                    if($replaceMediaId == 0) {
                        $media->libelle = mb_substr($originalName, 0, 50, "UTF-8");
                        $media->created_by= Auth::user()->id;
                    }
                    $media->uid = $uid;
                    $media->taille = $this->formatBytes($this->get_file_size($destinationPath.$filename));

                    switch ($extension) {
                        // Photo (1)
                    case 'gif':
                    case 'jpeg':
                    case 'jpg':
                    case 'png':
                    case 'ai':
                    case 'pdf':
                    case 'psd':
                        $media->typemedia_id = 1;
                        $im = new \imagick($destinationPath . $filename);
                        //$im = new \imagick(realpath($destinationPath.$filename));

                        if(in_array($extension, array("pdf", "ai", "psd", "gif")) ) {
                            $im->setIteratorIndex(0);
                        }

                        $resolutions = $im->getImageResolution();
                        $media->resolution = round($resolutions['x'] * 2.54);
                        $imageprops = $im->getImageGeometry();
                        $media->largeur = $imageprops['width'];
                        $media->hauteur = $imageprops['height'];

                        if($media->resolution != 0) {
                            $media->largeur_mm = ceil(($media->largeur * 2.54 / $media->resolution)*10);
                            $media->hauteur_mm = ceil(($media->hauteur * 2.54 / $media->resolution)*10);
                        }else{
                            $media->largeur_mm = "";
                            $media->hauteur_mm = "";
                        }
                        $media->save();
                        $im->destroy();

                        // ---- Creation des vignettes de base
                        $this->create_sys_thumb($media);
                        // ---- Creation des vignettes en lien avec le sujet du média
                        if(isset($sujet_id) ) {
                            $this->create_thumb($media);
                        }
                        break;
                        // Illustration/Vectorielle (2)
                    case 'svg':
                        $media->typemedia_id = 2;
                        $media->save();
                        break;
                        // Vidéo (3)
                    case 'mp4':
                        $media->typemedia_id =3 ;
                        $getID3 = new \getID3;
                        if($fileInfo = $getID3->analyze($destinationPath.$filename)) {
                            $media->largeur = $fileInfo['video']['resolution_x'];
                            $media->hauteur = $fileInfo['video']['resolution_y'];
                            $media->duree = $fileInfo['playtime_string'];
                        }
                        $media->save();
                        break;
                        // Audio (4)
                    case 'mp3':
                        $media->typemedia_id = 4;
                        $getID3 = new \getID3;
                        if($fileInfo = $getID3->analyze($destinationPath.$filename)) {
                            $media->duree= $fileInfo['playtime_string'];
                        }
                        $media->save();
                        break;
                    }

                    $id = $media->id;
                    $media = Media::find($id);
                    // ---- Index dans Elasticsearch
                    $media = Media::where('id', $media->id)->first();
                    $media->addToIndex();

                    // ---- Historique des actions
                    $historique = new historique();
                    if($user = Auth::user()) {
                        $historique->user_id = $user->id;
                    }
                    $historique->media_id = $media->id;
                    if($replaceMediaId == 0) {
                        $historique->type = "Création";
                        $historique->description = "Média ajouté";
                    }else{
                        $historique->type = "Modification";
                        $historique->description = "Le média a été remplacé";
                    }
                    $historique->save();

                    return response()->json($media);
                }
            }
        }
    }

    /**
     * Check if all the parts exist, and
     * gather all the parts of the file together
     *
     * @param  string $temp_dir  - the temporary directory holding all the parts of the file
     * @param  string $fileName  - the original file name
     * @param  string $chunkSize - each chunk size (in bytes)
     * @param  string $totalSize - original file size (in bytes)
     * @return bool
     */
    private function createFileFromChunks($temp_dir, $fileName, $chunkSize, $totalSize, $total_files, $finalName)
    {

        // count all the parts of this file
        $total_files_on_server_size = 0;
        $temp_total = 0;
        foreach(scandir($temp_dir) as $file) {
            $temp_total = $total_files_on_server_size;
            $tempfilesize = filesize($temp_dir.'/'.$file);
            $total_files_on_server_size = $temp_total + $tempfilesize;
        }
        // check that all the parts are present
        // If the Size of all the chunks on the server is equal to the size of the file uploaded.
        if ($total_files_on_server_size >= $totalSize) {
            // create the final destination file
            if (($fp = fopen('uploads/'.$finalName, 'w')) !== false) {
                for ($i=1; $i<=$total_files; $i++) {
                    fwrite($fp, file_get_contents($temp_dir.'/'.$fileName.'.part'.$i));
                    //Log::info('writing chunk '.$i);
                }
                fclose($fp);
            } else {
                Log::error('cannot create the destination file');
                return false;
            }

            // rename the temporary directory (to avoid access from other
            // concurrent chunks uploads) and than delete it
            if (rename($temp_dir, $temp_dir.'_UNUSED')) {
                $this->rrmdir($temp_dir.'_UNUSED');
            } else {
                $this->rrmdir($temp_dir);
            }
            return true;
        }
        return false;
    }

    /**
     * Delete a directory RECURSIVELY
     *
     * @param string $dir - directory path
     * @link  http://php.net/manual/en/function.rmdir.php
     */
    private function rrmdir($dir)
    {
        if (is_dir($dir)) {
            $objects = scandir($dir);
            foreach ($objects as $object) {
                if ($object != "." && $object != "..") {
                    if (filetype($dir . "/" . $object) == "dir") {
                        $this->rrmdir($dir . "/" . $object);
                    } else {
                        unlink($dir . "/" . $object);
                    }
                }
            }
            reset($objects);
            rmdir($dir);
        }
    }
}