'use strict';

/**
 * Module dependencies.
 */

var CP_translit = require('../lib/CP_translit');

/**
 * Configuration dependencies.
 */

var modules = require('../config/production/modules');
Object.keys(modules).length === 0 &&
  (modules = require('../config/production/modules.backup'));
var modules_md5 = require('md5')(JSON.stringify(modules));

setInterval(function() {
  if (
    modules_md5 &&
    process.env['CP_MODULES_MD5'] &&
    modules_md5 !== process.env['CP_MODULES_MD5']
  ) {
    modules = require('../config/production/modules');
    Object.keys(modules).length === 0 &&
      (modules = require('../config/production/modules.backup'));
    modules_md5 = process.env['CP_MODULES_MD5'];
  }
}, 3333);

/**
 * Node dependencies.
 */

var LRU = require('lru-cache');
var cache = new LRU({ maxAge: 3600000, max: 1000 });
var md5 = require('md5');
var op = require('object-path');
var async = require('async');
var request = require('request');
var express = require('express');
var router = express.Router();

/**
 * Player.
 */

var translations = false;

router.get('/?', function(req, res) {
  if (!cache.has('CP_VER') || cache.get('CP_VER') !== process.env['CP_VER']) {
    cache.reset();
    cache.set('CP_VER', process.env['CP_VER']);
    try {
      if (
        modules.episode &&
        modules.episode.data &&
        modules.episode.data.translations
      ) {
        translations = JSON.parse(modules.episode.data.translations);
      }
    } catch (e) {
      console.error(e);
    }
  }

  var ip = (
    (
      req.headers['x-real-ip'] ||
      req.headers['cf-connecting-ip'] ||
      req.headers['x-forwarded-for'] ||
      ''
    )
      .split(',')
      .pop()
      .trim() ||
    req.ip ||
    req.connection.remoteAddress
  ).replace('::ffff:', '');

  var script =
    '(function() {' +
    "    var y = document.querySelector('#yohoho');" +
    "    var player = document.createElement('div');" +
    '    var attr = Array.prototype.slice.call(y.attributes);' +
    '    while(a = attr.pop()) {player.setAttribute(a.nodeName, a.nodeValue);}' +
    '    player.innerHTML = y.innerHTML;' +
    '    y.parentNode.replaceChild(player, y);' +
    "    i = document.createElement('iframe');" +
    "    i.setAttribute('id', 'yohoho-iframe');" +
    "    i.setAttribute('frameborder', '0');" +
    "    i.setAttribute('allowfullscreen', 'allowfullscreen');" +
    "    i.setAttribute('scrolling', 'no');" +
    '    i.setAttribute("src", decodeURIComponent("iframe-src"));' +
    '    player.appendChild(i);' +
    '    if (parseInt(player.offsetWidth)) {' +
    '        w = parseInt(player.offsetWidth);' +
    '    }' +
    '    else if (player.parentNode && parseInt(player.parentNode.offsetWidth)) {' +
    '        w = parseInt(player.parentNode.offsetWidth);' +
    '    }' +
    '    else {' +
    '        w = 610;' +
    '    }' +
    "    if (player.parentNode && player.parentNode.tagName && player.parentNode.tagName.toLowerCase() === 'body') {" +
    '        h = Math.max(document.body.scrollHeight, document.body.offsetHeight,' +
    '            document.documentElement.clientHeight, document.documentElement.scrollHeight, document.documentElement.offsetHeight);' +
    '    }' +
    '    else if (parseInt(player.offsetHeight) && parseInt(player.offsetHeight) < 370) {' +
    '        if (player.parentNode && parseInt(player.parentNode.offsetHeight) && parseInt(player.parentNode.offsetHeight) >= 370) {' +
    '            h = parseInt(player.parentNode.offsetHeight);' +
    '        }' +
    '        else {' +
    '            h = 370;' +
    '        }' +
    '    }' +
    '    else if (parseInt(player.offsetHeight) && w/3 < parseInt(player.offsetHeight)) {' +
    '        h = parseInt(player.offsetHeight);' +
    '    }' +
    '    else if (player.parentNode && parseInt(player.parentNode.offsetHeight) && w/3 < parseInt(player.parentNode.offsetHeight)) {' +
    '        h = parseInt(player.parentNode.offsetHeight);' +
    '    }' +
    '    else {' +
    '        h = w/2;' +
    '    }' +
    "    var style = 'width:' + w + 'px;height:' + h + 'px;border:0;margin:0;padding:0;overflow:hidden;position:relative';" +
    "    i.setAttribute('style', style);" +
    "    i.setAttribute('width', w);" +
    "    i.setAttribute('height', h);" +
    "    player.setAttribute('style', style);" +
    '    var q = document.querySelector("[data-yo=\\"quality\\"]");' +
    '    if (q && "iframe-"+"quality" !== "iframe-quality") {q.innerHTML="iframe-quality"};' +
    '    var t = document.querySelector("[data-yo=\\"translate\\"]");' +
    '    if (t && "iframe-"+"translate" !== "iframe-translate") {t.innerHTML="iframe-translate"};' +
    '})();';

  if (req.query.player) {
    res.setHeader('Content-Type', 'application/javascript');
    return res.send(
      script.replace(/iframe-src/g, encodeURIComponent(req.query.player))
    );
  }

  if (
    /googlebot|crawler|spider|robot|crawling|bot|Chrome-Lighthouse/i.test(
      req.get('User-Agent')
    )
  ) {
    res.setHeader('Content-Type', 'application/javascript');
    res.send("console.log('Hello CinemaPress!');");
    return;
  }

  var result = false;

  async.eachOfLimit(
    modules.player.data.custom,
    1,
    function(task, index, callback) {
      var parse = task.replace(/\s*~\s*/g, '~').split('~');
      if (task.charAt(0) === '#' || parse.length < 2 || result) {
        return callback();
      }
      var p = {
        url: parse[0],
        iframe: parse[1] && parse[1].split('<>')[0].trim(),
        translate: parse[2] || '',
        quality: parse[3] || '',
        uid: parse[4] || '',
        format:
          parse[1] && parse[1].split('<>')[1]
            ? parse[1].split('<>')[1].trim()
            : ''
      };
      if (req.query.type === '1') {
        req.query.season = req.query.season || '1';
        req.query.episode = req.query.episode || '1';
      }
      if (p.url.indexOf('[imdb_id]') + 1 && !req.query.imdb_id) {
        return callback();
      }
      if (p.url.indexOf('[tmdb_id]') + 1 && !req.query.tmdb_id) {
        return callback();
      }
      if (p.url.indexOf('[douban_id]') + 1 && !req.query.douban_id) {
        return callback();
      }
      if (p.url.indexOf('[tvmaze_id]') + 1 && !req.query.tvmaze_id) {
        return callback();
      }
      if (p.url.indexOf('[wa_id]') + 1 && !req.query.wa_id) {
        return callback();
      }
      if (p.url.indexOf('[movie_id]') + 1 && !req.query.movie_id) {
        return callback();
      }
      if (p.url.indexOf('[season]') + 1 && !req.query.season) {
        return callback();
      }
      if (p.url.indexOf('[episode]') + 1 && !req.query.episode) {
        return callback();
      }
      var ip_hash = '';
      if (p.url.indexOf('[ip]') + 1) {
        p.url = p.url.replace(/\[ip]/gi, ip ? ip : '');
        ip_hash = ip;
      }
      p.url = p.url
        .replace(
          /\[kp_id]/gi,
          req.query.kp_id && parseInt(req.query.kp_id)
            ? '' + (parseInt(req.query.kp_id) % 1000000000)
            : ''
        )
        .replace(/\[imdb_id]/gi, req.query.imdb_id ? req.query.imdb_id : '')
        .replace(/\[tmdb_id]/gi, req.query.tmdb_id ? req.query.tmdb_id : '')
        .replace(
          /\[douban_id]/gi,
          req.query.douban_id ? req.query.douban_id : ''
        )
        .replace(
          /\[tvmaze_id]/gi,
          req.query.tvmaze_id ? req.query.tvmaze_id : ''
        )
        .replace(/\[wa_id]/gi, req.query.wa_id ? req.query.wa_id : '')
        .replace(/\[movie_id]/gi, req.query.movie_id ? req.query.movie_id : '')
        .replace(/\[year]/gi, req.query.year ? req.query.year : '')
        .replace(
          /\[type]/gi,
          p.url.indexOf('[tmdb_id]') + 1
            ? req.query.type
              ? 'tv'
              : 'movie'
            : req.query.type
            ? req.query.type
            : ''
        )
        .replace(/\[season]/gi, req.query.season ? req.query.season : '')
        .replace(/\[episode]/gi, req.query.episode ? req.query.episode : '')
        .replace(
          /\[title]/gi,
          req.query.title ? encodeURIComponent(req.query.title) : ''
        );
      var hash = md5(
        JSON.stringify(p) +
          process.env['CP_VER'] +
          ((req.query.season || '') +
            (req.query.episode || '') +
            (req.query.translate || '')) +
          ip_hash
      );
      if (cache.has(hash)) {
        var c = cache.get(hash);
        if (c.iframe) {
          script = script
            .replace(/iframe-src/gi, c.iframe)
            .replace(/iframe-translate/gi, c.translate.toUpperCase())
            .replace(/iframe-quality/gi, c.quality.toUpperCase());
          result = true;
        }
        return callback();
      }
      if (p.iframe === 'iframe') {
        script = script.replace(
          /iframe-src/gi,
          p.url.replace(/^.*?(http.*?)$/i, '$1')
        );
        result = true;
        cache.set(hash, {
          iframe: p.url,
          translate: '',
          quality: ''
        });
        callback();
      }
      request(
        {
          url: p.url,
          method: 'GET',
          timeout: 15000
        },
        function(error, response, body) {
          if (error || response.statusCode !== 200 || !body) {
            console.error(
              task,
              error && error.code,
              response && response.statusCode
            );
            return callback();
          }
          var json = p.iframe === 'body' ? { body: body } : tryParseJSON(body);
          var iframe = p.iframe ? op.get(json, p.iframe) || '' : '';
          var translate = p.translate ? op.get(json, p.translate) || '' : '';
          var quality = p.quality ? op.get(json, p.quality) || '' : '';
          if (iframe && p.format) {
            iframe = p.format.replace(/_VALUE_/gi, iframe);
          }
          if (iframe && p.uid) {
            iframe += iframe.indexOf('?') + 1 ? '&' + p.uid : '?' + p.uid;
          }
          if (iframe && req.query.autoplay) {
            iframe +=
              iframe.indexOf('?') + 1
                ? '&autoplay=' + req.query.autoplay
                : '?autoplay=' + req.query.autoplay;
          }
          if (iframe && req.query.season) {
            iframe = iframe.replace(/[&?](s|season)=[0-9]{1,4}/gi, '');
            iframe +=
              iframe.indexOf('?') + 1
                ? '&season=' + req.query.season + '&s=' + req.query.season
                : '?season=' + req.query.season + '&s=' + req.query.season;
          }
          if (iframe && req.query.episode) {
            iframe = iframe.replace(/[&?](e|episode)=[0-9]{1,4}/gi, '');
            iframe +=
              iframe.indexOf('?') + 1
                ? '&episode=' + req.query.episode + '&e=' + req.query.episode
                : '?episode=' + req.query.episode + '&e=' + req.query.episode;
          }
          if (iframe && req.query.translate) {
            req.query.translate = decodeURIComponent(
              CP_translit.text(req.query.translate || '', true, 'translate')
            ).replace(/^-/, '');
            if (typeof translations === 'object') {
              if (Array.isArray(translations)) {
                if (translations.length) {
                  var value = '';
                  for (var i = 0, l = translations.length; i < l; i++) {
                    if (
                      translations[i].key
                        .toLowerCase()
                        .indexOf(req.query.translate.toLowerCase()) + 1
                    ) {
                      value = translations[i].value;
                      break;
                    }
                  }
                  iframe += iframe.indexOf('?') + 1 ? '&' + value : '?' + value;
                }
              } else if (translations[req.query.translate]) {
                iframe +=
                  iframe.indexOf('?') + 1
                    ? '&' + translations[req.query.translate]
                    : '?' + translations[req.query.translate];
              }
            } else {
              iframe +=
                iframe.indexOf('?') + 1
                  ? '&translate=' + encodeURIComponent(req.query.translate)
                  : '?translate=' + encodeURIComponent(req.query.translate);
            }
          }
          if (iframe) {
            script = script
              .replace(/iframe-src/gi, iframe)
              .replace(/iframe-translate/gi, translate.toUpperCase())
              .replace(/iframe-quality/gi, quality.toUpperCase());
            result = true;
          }
          cache.set(hash, {
            iframe: iframe,
            translate: translate,
            quality: quality
          });
          callback();
        }
      );
    },
    function() {
      if (result) {
        res.setHeader('Content-Type', 'application/javascript');
        res.send(script);
      } else {
        res.redirect(302, modules.player.data.js);
      }
    }
  );

  /**
   * Valid JSON.
   *
   * @param {String} jsonString
   */

  function tryParseJSON(jsonString) {
    try {
      var o = JSON.parse(jsonString);
      if (o && typeof o === 'object') {
        return o;
      }
    } catch (e) {}
    return null;
  }
});

module.exports = router;