<?php
/**
 * NOTICE OF LICENSE.
 *
 * UNIT3D Community Edition is open-sourced software licensed under the GNU Affero General Public License v3.0
 * The details is bundled with this project in the file LICENSE.txt.
 *
 * @project    UNIT3D Community Edition
 *
 * @author     HDVinnie <hdinnovations@protonmail.com>
 * @license    https://www.gnu.org/licenses/agpl-3.0.en.html/ GNU Affero General Public License v3.0
 */

namespace App\Http\Controllers;

use App\Helpers\Bencode;
use App\Models\Movie;
use App\Models\Playlist;
use App\Models\PlaylistTorrent;
use App\Models\Torrent;
use App\Models\Tv;
use App\Repositories\ChatRepository;
use Illuminate\Http\Request;
use Illuminate\Support\Facades\File;
use Intervention\Image\Facades\Image;
use ZipArchive;

/**
 * @see \Tests\Todo\Feature\Http\Controllers\PlaylistControllerTest
 */
class PlaylistController extends Controller
{
    /**
     * @var ChatRepository
     */
    private $chatRepository;

    /**
     * PlaylistController Constructor.
     *
     * @param \App\Repositories\ChatRepository $chatRepository
     */
    public function __construct(ChatRepository $chatRepository)
    {
        $this->chatRepository = $chatRepository;
    }

    /**
     * Display All Playlists.
     *
     * @return \Illuminate\Contracts\View\Factory|\Illuminate\View\View
     */
    public function index()
    {
        $playlists = Playlist::with('user')->withCount('torrents')->where('is_private', '=', 0)->orderBy('name', 'ASC')->paginate(24);

        return \view('playlist.index', ['playlists' => $playlists]);
    }

    /**
     * Show Playlist Create Form.
     *
     * @return \Illuminate\Contracts\View\Factory|\Illuminate\View\View
     */
    public function create()
    {
        return \view('playlist.create');
    }

    /**
     * Store A New Playlist.
     *
     * @param \Illuminate\Http\Request $request
     *
     * @return \Illuminate\Http\RedirectResponse
     */
    public function store(Request $request)
    {
        $user = \auth()->user();

        $playlist = new Playlist();
        $playlist->user_id = $user->id;
        $playlist->name = $request->input('name');
        $playlist->description = $request->input('description');
        $playlist->cover_image = null;

        if ($request->hasFile('cover_image') && $request->file('cover_image')->getError() === 0) {
            $image = $request->file('cover_image');
            $filename = 'playlist-cover_'.\uniqid('', true).'.'.$image->getClientOriginalExtension();
            $path = \public_path('/files/img/'.$filename);
            Image::make($image->getRealPath())->fit(400, 225)->encode('png', 100)->save($path);
            $playlist->cover_image = $filename;
        }

        $playlist->position = $request->input('position');
        $playlist->is_private = $request->input('is_private');

        $v = \validator($playlist->toArray(), [
            'user_id'     => 'required',
            'name'        => 'required',
            'description' => 'required',
            'is_private'  => 'required',
        ]);

        if ($v->fails()) {
            return \redirect()->route('playlists.create')
                ->withInput()
                ->withErrors($v->errors());
        }
        $playlist->save();
        // Announce To Shoutbox
        $appurl = \config('app.url');
        if ($playlist->is_private != 1) {
            $this->chatRepository->systemMessage(
                \sprintf('User [url=%s/', $appurl).$user->username.'.'.$user->id.']'.$user->username.\sprintf('[/url] has created a new playlist [url=%s/playlists/', $appurl).$playlist->id.']'.$playlist->name.'[/url] check it out now! :slight_smile:'
            );
        }

        return \redirect()->route('playlists.show', ['id' => $playlist->id])
            ->withSuccess('Your Playlist Was Created Successfully!');
    }

    /**
     * Show A Playlist.
     *
     * @param \App\Playlist $id
     *
     * @return \Illuminate\Contracts\View\Factory|\Illuminate\View\View
     */
    public function show($id)
    {
        $playlist = Playlist::findOrFail($id);

        $random = PlaylistTorrent::where('playlist_id', '=', $playlist->id)->inRandomOrder()->first();
        if (isset($random)) {
            $torrent = Torrent::where('id', '=', $random->torrent_id)->firstOrFail();
        }

        $meta = null;

        if (isset($random, $torrent)) {
            if ($torrent->category->tv_meta) {
                if ($torrent->tmdb || $torrent->tmdb != 0) {
                    $meta = Tv::with('genres', 'networks', 'seasons')->where('id', '=', $torrent->tmdb)->first();
                }
            }
            if ($torrent->category->movie_meta) {
                if ($torrent->tmdb || $torrent->tmdb != 0) {
                    $meta = Movie::with('genres', 'cast', 'companies', 'collection')->where('id', '=', $torrent->tmdb)->first();
                }
            }
        }

        $torrents = PlaylistTorrent::with(['torrent:id,name,category_id,resolution_id,type_id,tmdb,seeders,leechers,times_completed,size,anon'])
            ->where('playlist_id', '=', $playlist->id)
            ->orderBy(function ($query) {
                $query->select('name')
                    ->from('torrents')
                    ->whereColumn('id', 'playlist_torrents.torrent_id')
                    ->latest()
                    ->limit(1);
            })
            ->paginate(26);

        return \view('playlist.show', ['playlist' => $playlist, 'meta' => $meta, 'torrents' => $torrents]);
    }

    /**
     * Show Playlist Update Form.
     *
     * @param \App\Playlist $id
     *
     * @return \Illuminate\Contracts\View\Factory|\Illuminate\View\View
     */
    public function edit($id)
    {
        $user = \auth()->user();
        $playlist = Playlist::findOrFail($id);

        \abort_unless($user->id == $playlist->user_id || $user->group->is_modo, 403);

        return \view('playlist.edit', ['playlist' => $playlist]);
    }

    /**
     * Update A Playlist.
     *
     * @param \Illuminate\Http\Request $request
     * @param \App\Playlist            $id
     *
     * @return \Illuminate\Http\RedirectResponse
     */
    public function update(Request $request, $id)
    {
        $user = \auth()->user();
        $playlist = Playlist::findOrFail($id);

        \abort_unless($user->id == $playlist->user_id || $user->group->is_modo, 403);

        $playlist->name = $request->input('name');
        $playlist->description = $request->input('description');
        $playlist->cover_image = null;

        if ($request->hasFile('cover_image') && $request->file('cover_image')->getError() === 0) {
            $image = $request->file('cover_image');
            $filename = 'playlist-cover_'.\uniqid('', true).'.'.$image->getClientOriginalExtension();
            $path = \public_path('/files/img/'.$filename);
            Image::make($image->getRealPath())->fit(400, 225)->encode('png', 100)->save($path);
            $playlist->cover_image = $filename;
        }

        $playlist->position = $request->input('position');
        $playlist->is_private = $request->input('is_private');

        $v = \validator($playlist->toArray(), [
            'name'        => 'required',
            'description' => 'required',
            'is_private'  => 'required',
        ]);

        if ($v->fails()) {
            return \redirect()->route('playlists.edit', ['id' => $playlist->id])
                ->withInput()
                ->withErrors($v->errors());
        }
        $playlist->save();

        return \redirect()->route('playlists.show', ['id' => $playlist->id])
            ->withSuccess('Your Playlist Has Successfully Been Updated!');
    }

    /**
     * Delete A Playlist.
     *
     * @param \App\Playlist $id
     *
     * @throws \Exception
     *
     * @return \Illuminate\Http\RedirectResponse
     */
    public function destroy($id)
    {
        $user = \auth()->user();
        $playlist = Playlist::findOrFail($id);

        \abort_unless($user->id == $playlist->user_id || $user->group->is_modo, 403);

        $playlist->delete();

        return \redirect()->route('playlists.index')
            ->withSuccess('Playlist Deleted!');
    }

    /**
     * Download All Playlist Torrents.
     *
     * @param                          $id
     *
     * @return \Illuminate\Http\RedirectResponse|\Symfony\Component\HttpFoundation\BinaryFileResponse
     */
    public function downloadPlaylist($id)
    {
        //  Extend The Maximum Execution Time
        \set_time_limit(300);

        // Playlist
        $playlist = Playlist::with('torrents')->findOrFail($id);

        // Authorized User
        $user = \auth()->user();

        // Define Dir Folder
        $path = \getcwd().'/files/tmp_zip/';

        // Check Directory exists
        if (! File::isDirectory($path)) {
            File::makeDirectory($path, 0755, true, true);
        }

        // Zip File Name
        $zipFileName = \sprintf('[%s]%s.zip', $user->username, $playlist->name);

        // Create ZipArchive Obj
        $zipArchive = new ZipArchive();

        // Get Users History
        $playlist_torrents = PlaylistTorrent::where('playlist_id', '=', $playlist->id)->get();

        if ($zipArchive->open($path.'/'.$zipFileName, ZipArchive::CREATE) === true) {
            $failCSV = '"Name","URL","ID"';
            $failCount = 0;

            foreach ($playlist_torrents as $playlist_torrent) {
                // Get Torrent
                $torrent = Torrent::withAnyStatus()->find($playlist_torrent->torrent_id);

                // Define The Torrent Filename
                $tmpFileName = \sprintf('%s.torrent', $torrent->slug);

                // The Torrent File Exist?
                if (! \file_exists(\getcwd().'/files/torrents/'.$torrent->file_name)) {
                    $failCSV .= '"'.$torrent->name.'","'.\route('torrent', ['id' => $torrent->id]).'","'.$torrent->id.'"
';
                    $failCount++;
                } else {
                    // Delete The Last Torrent Tmp File If Exist
                    if (\file_exists(\getcwd().'/files/tmp/'.$tmpFileName)) {
                        \unlink(\getcwd().'/files/tmp/'.$tmpFileName);
                    }

                    // Get The Content Of The Torrent
                    $dict = Bencode::bdecode(\file_get_contents(\getcwd().'/files/torrents/'.$torrent->file_name));
                    // Set the announce key and add the user passkey
                    $dict['announce'] = \route('announce', ['passkey' => $user->passkey]);
                    // Remove Other announce url
                    unset($dict['announce-list']);

                    $fileToDownload = Bencode::bencode($dict);
                    \file_put_contents(\getcwd().'/files/tmp/'.$tmpFileName, $fileToDownload);

                    // Add Files To ZipArchive
                    $zipArchive->addFile(\getcwd().'/files/tmp/'.$tmpFileName, $tmpFileName);
                }
            }

            if ($failCount > 0) {
                $CSVtmpName = \sprintf('%s.zip', $playlist->name).'-missingTorrentFiles.CSV';
                \file_put_contents(\getcwd().'/files/tmp/'.$CSVtmpName, $failCSV);
                $zipArchive->addFile(\getcwd().'/files/tmp/'.$CSVtmpName, 'missingTorrentFiles.CSV');
            }

            // Close ZipArchive
            $zipArchive->close();

            $zip_file = $path.'/'.$zipFileName;

            if (\file_exists($zip_file)) {
                return \response()->download($zip_file)->deleteFileAfterSend(true);
            }
        }

        return \redirect()->back()->withErrors('Something Went Wrong!');
    }
}