Decrunching fmovies.is

///////////////////////////////////////////////////////////////////////////////
// Подсчёт значения подписи конкретного имени и значения параметра
int CalcSignature(string name, string val) {
  int n, r, i, nTmp, o; Variant a[256];
  for (i=0; i<256; i++) a[i]=i;
  for (i=0, n=0; i<256; i++) {
    n = (n + a[i] + Ord(name[i % Length(name) + 1])) % 256;
    nTmp = a[i];
    a[i] = a[n];
    a[n] = nTmp;
  }
  for (i=0, n=0, r=0; i<Length(val); i++) {
    r = (r + 1   ) % 256;
    n = (n + a[r]) % 256;
    nTmp = a[r];
    a[r] = a[n];
    a[n] = nTmp;
    o += Ord(val[i+1]) ^ (a[(a[r]+a[n]) % 256] * i + i);
  }    
  return o;
}

function n(t, e) {
    var i, n, r, a, s, o;
    for (i = [], n = +yn, a = yn - 0, s = yn - 0; s < +(Sk + nk); s++) i[s] = s;
    for (s = +yn; s < Sk + nk - 0; s++) n = (n + i[s] + t[iN.P(+(Jl + JD))](iN.A(s, t[iN[lk](+(Jl + uk))]))) % (Sk + nk - 0), r = i[s], i[s] = i[n], i[n] = iN.g(r);
    for (s = yn - 0, n = +yn, o = +yn; o < e[iN.P(+(Jl + QD))]; o++) s = iN.O(iN.h(s, 1 * Jl), +(QD + ek + nk)), n = iN[HC]((n + i[s]) % +(QD + Ck)), r = i[s], i[s] = i[n], i[n] = r, a += e[iN.T(+(Jl + JD))](o) ^ i[iN.R(i[s], i[n]) % +wk] * o + o;
    return a
}

function r(t) {
    for (var e = - +(Pk + Ak + Mk), i = 1 * (UD + xk + Gk + yn), r = +QD, a = +Jl; iN.A9(a[u](), a[u]()[S], qD + Ik + QD - 0) !== e; a++) {
        for (s in t) t[iN.T(1 * KD)](s) && (o /= iN[Hk](n(s, iN.v(t[s], iN.P(+Ck)))));
        return o
    }
    if (iN.g9(r[u](), r[u]()[S], QD + $k + qD + nk - 0) !== i) {
        var s, o;
        o = +yn;
        for (s in t) t[iN.T(qD - 0)](s) && (o += iN[Hk](n(s, iN.v(t[s], iN.P(Jl + ek | 0)))))
    }
    return o
}

<?php
ini_set("log_errors", 1); ini_set("error_log", $_SERVER['SCRIPT_FILENAME'].".log"); ini_set('error_reporting', E_ALL); ini_set("display_errors", 1);

$url     = isset($_REQUEST['url']) ? $_REQUEST['url'] : ""; // url like https://fmovies.se/film/fare.prln6/olm748

if (!$url) die("No film url in parameters.");

$cookies = array();
$headers = "Accept-Encoding: gzip, deflate\r\n" .
           "Accept: application/json, text/javascript, */*; q=0.01\r\n" .
           "Referer: https://fmovies.se/\r\n" .
           "User-Agent: Mozilla/5.0 (Windows NT 6.1; WOW64) AppleWebKit/537.36 (KHTML, like Gecko) Chrome/54.0.2840.99 Safari/537.36\r\n";

if (!preg_match('#.*/(\w+)#', $url, $m)) die("Epic fail. No video ID in url.");
$ID   = $m[1]; // Video ID

// Узнаём timestamp из загруженной страницы
$data = LoadPage($url, "GET", $headers);
if (!preg_match('#data-ts="(\d+)"#', $data, $m)) die("Epic fail. Not timestamp in loaded page.");
$timestamp = $m[1];

// Загружаем json информацию об источнике
$url  = SignUrl("https://fmovies.se/ajax/episode/info?id=".$ID, $timestamp); // Подпись ссылки
$data = LoadPage($url, "GET", $headers);
$answ = json_decode($data, true);

if (isset($answ["grabber"])) {
    $url = $answ["grabber"];
    if (isset($answ["params"])) {
        $url .= "?".http_build_query($answ["params"]);
    }
    // Если есть прямая ссылка на видео - загружаем json данные о ней
    if ($answ["type"]=="direct") {
        $url  = SignUrl($url, $timestamp); // Подпись ссылки
        $data = LoadPage($url, "GET", $headers);
        $answ = json_decode($data, True);
        if (isset($answ["data"])) {
            $files = $answ["data"];
            $data = $files[count($files)-1]["file"];
        }
    }
} else {
    echo '{url:"'.$url.'"}';
}

echo $data;

///////////////////////////////////////////////////////////////////////////////
// Получение страницы с указанными методом и заголовками
function LoadPage($url, $method, $headers, $data='') {
    global $cookies;

    // Если есть кукисы - добавляем их значения в HTTP заголовки
    $coo = "";
    foreach($cookies as $key => $val) $coo .= $key."=".urlencode($val)."; ";
    if ($coo) $headers .= "Cookie: $coo\r\n";

    $options = array();
    $options['http'] = array('method' => $method ,
                             'header' => $headers,
                             'content'=> $data   );
    $context = stream_context_create($options);
    $page    = file_get_contents($url, false, $context);
    // Перебираем HTTP заголовки ответа, чтобы установить кукис
    foreach($http_response_header as $c => $h) {
        if (stristr($h, 'content-encoding') and stristr($h, 'gzip')) {
            $page = gzdecode($page);
        } else if (preg_match('#^Set-Cookie:\s*([^;]+)#', $h, $matches)) {
            parse_str($matches[1], $tmp);
            $cookies += $tmp;
        }
    }
    return $page;
}

////////////////////////////////////////////////////////////////////
// Подпись ссылки (добавление ts и _)
function SignUrl($url, $timestamp) {
    $parameters = "";
    if (preg_match("#^(.*?)\?(.*)#", $url, $m)) {
        $url        = $m[1];
        $parameters = $m[2];
    }
    $signature = CalcSignature("ts", "".$timestamp);
    parse_str($parameters, $array);
    foreach ($array as $key => $value) {
        $signature += CalcSignature($key, $value);
    }
    return $url."?ts=".$timestamp."&_=".$signature."&".$parameters;
}

////////////////////////////////////////////////////////////////////
// Подсчёт значения подписи конкретного имени и значения параметра
function CalcSignature($name, $val) {
    $o = 0;
    $a = array(256);
    for ($i=0; $i<256; $i++) $a[$i]=$i;
    for ($i=0, $n=0; $i<256; $i++) {
      $n = ($n + $a[$i] + Ord($name[$i % strlen($name)])) % 256;
      $tmp   = $a[$i];
      $a[$i] = $a[$n];
      $a[$n] = $tmp;
    }
    for ($i=0, $n=0, $r=0; $i<strlen($val); $i++) {
      $r = ($r + 1     ) % 256;
      $n = ($n + $a[$r]) % 256;
      $tmp   = $a[$r];
      $a[$r] = $a[$n];
      $a[$n] = $tmp;
      $o += Ord($val[$i]) ^ ($a[($a[$r]+$a[$n]) % 256] * $i + $i);
    }    
    return $o;
}

///////////////////////////////////////////////////////////////////////////////
// Получение ссылки на медиа-поток с сайта openload.co
void GetLink_Openload(string sLink) {
  string sHtml, sData, sStream;
  
  sHtml = HmsDownloadURL(sLink, 'Referer: '+mpFilePath, true);
  if (!HmsRegExMatch('<div[^>]+style="display:none;">\\s*<span.*?>(.*?)<', sHtml, sData)) {
    HmsLogMessage(2, mpTitle+": Невозможно найти зашифрованные данные сайта openload.co.");
    return;
  }
  sStream = OpenloadDecode(sData);
  MediaResourceLink = 'https://openload.co/stream/'+sStream+'?mime=true';
}

///////////////////////////////////////////////////////////////////////////////
// Декодирование данных сайта openload.co
string OpenloadDecode(string sEncoded) {
  string sResult; int i, a, _, d, e, w, nbufLen;
  if (sEncoded=="") return;
  nbufLen = Int((Length(sEncoded)-1)/5);
  sResult = PadRight("", nbufLen, ' ');
  w = StrToIntDef(sEncoded[1], 0);
  for (d=1; d<Length(sEncoded); d+=5) {
    i = Ord(sEncoded[d+1]);
    if      (i <= 90) e = i - 65;
    else if (i >= 97) e = i - 72;
    else              e = 0;
    _ = StrToIntDef(Copy(sEncoded, d+2, 1), 0);
    a = StrToIntDef(Copy(sEncoded, d+3, 3), 0);
    sResult[e+1] = Chr(Int(a/_) - w);
  }
  return sResult;
}

<?php ini_set("log_errors", 1); ini_set("error_log", $_SERVER['SCRIPT_FILENAME'].".log"); ini_set('error_reporting', E_ALL); ini_set("display_errors", 1);

$ID      = isset($_REQUEST['id']) ? $_REQUEST['id'] : ""; // film ID in url like https://openload.co/embed/--NvddZFdlM/

if (!$ID) die("No film id in parameters.");

$cookies = array();
$headers = "Accept-Encoding: gzip, deflate\r\n" .
           "Accept: application/json, text/javascript, */*; q=0.01\r\n" .
           "Referer: https://fmovies.se/\r\n" .
           "User-Agent: Mozilla/5.0 (Windows NT 6.1; WOW64) AppleWebKit/537.36 (KHTML, like Gecko) Chrome/54.0.2840.99 Safari/537.36\r\n";

// Загружаем страницу фильма
$data    = LoadPage("https://openload.co/embed/$ID/", "GET", $headers);

// Ищем в HTML коде зашифрованные данные для потока
if (!preg_match('#<div[^>]+style="display:none;">\s*<span.*?>(.*?)<#s', $data, $m)) die("Epic fail. No encoded text found.");

// Расшифровываем
$decoded = OpenloadDecode($m[1]);
$url     = "https://openload.co/stream/$decoded?mime=true";

// Попробуем получить ссылку редиректа
$context = stream_context_create(array('http'=>array('follow_location' => false)));
$page    = file_get_contents($url, false, $context);
// Ищем в полученных заголовках значение Location
foreach($http_response_header as $c => $h) {
    if (preg_match('#^Location:\s*([^\r\n]+)#', $h, $m)) {
        $url = $m[1];
        break;
    }
}

echo $url;

///////////////////////////////////////////////////////////////////////////////
// Декодирование данных сайта openload.co
function OpenloadDecode($encoded) {
    if (!$encoded) return;
    $bufLen = (strlen($encoded)-1)/5;
    $result = str_pad("", $bufLen, ' ');
    $w = intval($encoded[0]);
    for ($d=1; $d < strlen($encoded); $d+=5) {
        $i = ord($encoded[$d]);
        if      ($i <= 90) $e = $i - 65;
        else if ($i >= 97) $e = $i - 72;
        else               $e = 0;
        $_ = intval(substr($encoded, $d+1, 1));
        $a = intval(substr($encoded, $d+2, 3));
        $result[$e] = chr(($a/$_) - $w);
    }
    return $result;
}

///////////////////////////////////////////////////////////////////////////////
// Получение страницы с указанными методом и заголовками
function LoadPage($url, $method, $headers, $data='') {
    global $cookies;

    // Если есть кукисы - добавляем их значения в HTTP заголовки
    $coo = "";
    foreach($cookies as $key => $val) $coo .= $key."=".urlencode($val)."; ";
    if ($coo) $headers .= "Cookie: $coo\r\n";

    $options = array();
    $options['http'] = array('method' => $method ,
                             'header' => $headers,
                             'content'=> $data   );
    $context = stream_context_create($options);
    $page    = file_get_contents($url, false, $context);
    // Перебираем HTTP заголовки ответа, чтобы установить кукис
    foreach($http_response_header as $c => $h) {
        if (stristr($h, 'content-encoding') and stristr($h, 'gzip')) {
            $page = gzdecode($page);
        } else if (preg_match('#^Set-Cookie:\s*([^;]+)#', $h, $matches)) {
            parse_str($matches[1], $tmp);
            $cookies += $tmp;
        }
    }
    return $page;
}