<?php
/**
 * @copyright (C) 2013 iJoomla, Inc. - All rights reserved.
 * @license GNU General Public License, version 2 (http://www.gnu.org/licenses/gpl-2.0.html)
 * @author iJoomla.com <webmaster@ijoomla.com>
 * @url https://www.jomsocial.com/license-agreement
 * The PHP code portions are distributed under the GPL license. If not otherwise stated, all images, manuals, cascading style sheets, and included JavaScript *are NOT GPL, and are released under the IJOOMLA Proprietary Use License v1.0
 * More info at https://www.jomsocial.com/license-agreement
 */

use Joomla\CMS\Factory;
use Joomla\CMS\Uri\Uri;
use Joomla\Filesystem\File;
use Joomla\Filesystem\Path;

defined('_JEXEC') or die('Restricted access');

define('_JEXEC', 1);
define('DS', DIRECTORY_SEPARATOR);
define('JPATH_BASE', dirname(dirname(dirname(dirname(__FILE__)))));

if (!defined('JPATH_PLATFORM')) {
    define('JPATH_PLATFORM', dirname(__FILE__));
}
require_once( JPATH_BASE . '/includes/defines.php' );

/* JObject */
if (file_exists(JPATH_LIBRARIES . '/joomla/base/object.php')) {
    require_once( JPATH_LIBRARIES . '/joomla/base/object.php' );
} else {
    require_once( JPATH_LIBRARIES . '/joomla/object/object.php' );
}

/* Determine Joomla! version */
if (file_exists(JPATH_LIBRARIES . '/cms/version/version.php')) {
    $joomla_ver = '0.25';
}

require_once( JPATH_LIBRARIES . '/loader.php' );

$mainframe = Factory::getApplication();
$jinput = $mainframe->input;

if ($joomla_ver >= '0.25') {
    require_once( JPATH_LIBRARIES . '/joomla/string/string.php' );
    require_once( JPATH_LIBRARIES . '/joomla/filesystem/path.php' );
    $post_string = $jinput->get('target',0,'NONE');
} else {

    require_once( JPATH_LIBRARIES . '/joomla/environment/request.php' );
    require_once( JPATH_LIBRARIES . '/joomla/filter/filterinput.php' );

    $post_string = $jinput->get('target', 0, 'NONE');
}

require_once( JPATH_LIBRARIES . '/joomla/factory.php' );

/* We copied these libraries into our own library to prevent Joomla! version conflict */
require_once( JPATH_ROOT . '/components/com_community/libraries/joomla/response.php' );
require_once( JPATH_ROOT . '/components/com_community/libraries/joomla/date.php' );

if (file_exists(JPATH_LIBRARIES . '/joomla/environment/uri.php')) {
    require_once( JPATH_LIBRARIES . '/joomla/environment/uri.php' );
} else {
    require_once( JPATH_LIBRARIES . '/joomla/uri/uri.php' );
}
require_once( JPATH_LIBRARIES . '/joomla/filesystem/file.php' );
require_once( JPATH_LIBRARIES . '/joomla/log/log.php' );
require_once( JPATH_LIBRARIES . '/joomla/log/entry.php' );


$pos = $post_string;
$file = Uri::getInstance()->toString();

$pieces = explode('/', $file);
$count = count($pieces);
$file = $pieces[$count - 1];

$pieces = explode('?', $file);
$file = $pieces[0];

//$file	= str_replace( JURI::root() , '', $file); var_dump($file);
$file = (JPATH_BASE . '/' . urldecode($file));
$fileName = basename($file);

if (!is_file($file)) {
    echo 'file not found: ' . $fileName;
    exit;
}

$fh = fopen($file, 'rb') or die('cannot open file: ' . $fileName);
$fileSize = filesize($file) - (($pos > 0) ? $pos + 1 : 0);
fseek($fh, $pos);

$binary_header = strtoupper(File::getExt($file)) . pack('C', 1) . pack('C', 1) . pack('N', 9) . pack('N', 9);

session_cache_limiter('none');
JResponse::clearHeaders();
JResponse::setHeader('Expires', 'Mon, 26 Jul 1997 05:00:00 GMT', true);
JResponse::setHeader('Last-Modified', gmdate("D, d M Y H:i:s") . ' GMT', true);
JResponse::setHeader('Cache-Control', 'no-store, no-cache, must-revalidate, post-check=0, pre-check=0', true);
JResponse::setHeader('Pragma', 'no-cache', true);
JResponse::setHeader('Content-Disposition', 'attachment; filename="' . $fileName . '"', true);
JResponse::setHeader('Content-Length', ($pos > 0) ? $fileSize + 13 : $fileSize, true);
JResponse::setHeader('Content-Type', 'video/x-flv', true);
JResponse::sendHeaders();

if ($pos > 0) {
    print $binary_header;
}

$limit_bw = true;
$packet_size = 90 * 1024;
$packet_interval = 0.3;

while (!feof($fh)) {
    if (!$limit_bw) {
        print(fread($fh, filesize($file)));
    } else {
        $time_start = microtime(true);
        print(fread($fh, $packet_size));
        $time_stop = microtime(true);
        $time_difference = $time_stop - $time_start;
        if ($time_difference < $packet_interval) {
            usleep($packet_interval * 1000000 - $time_difference * 1000000);
        }
    }
}

exit;