searchload.php

<?php

require_once 'Libs/library.php';
define('VIDEO_EXTS', 'mp4|mkv|avi');
define('SUBEXTS', 'ass|ssa|srt'); // Часть регекспа с расширениями файлов субтитров
define('LINKSUFFIX', 'https://www.nyaa.se/?page=search&cats=0_0&filter=0&term='); // Страница поиска субтитров
// %appdata%\uTorrent\uTorrent.exe
// http://forum.utorrent.com/topic/46012-utorrent-command-line-options/
define('TMPDIR', sys_get_temp_dir()); // Папка для временных файлов
define('TMPPRFX', 'vknkk-nytdl'); // Префикс для наших временных файлов
$jsonConfigPath = 'config.json';
// Удаляем временные файлы, оставшиеся с прошлого раза
if ($tmpFiles = glob(TMPDIR . '/' . TMPPRFX . '*.*'))
    foreach ($tmpFiles as $tmpFl)
        unlink($tmpFl);

// Получаем список файлов субтитров, для которых в папке, из который был вызван скрипт, отсутствуют видеофайлы
$subtitlesList = array();
$dirname = null;
if (isset($argv[1])) {
    $path = $argv[1];
    initConfig($jsonConfigPath);
    if (!file_exists(getPathWithEnv(TORCLI))) {
        echo TORCLI . " file not found, please check config.json";
        sleep(10);
        return;
    }
    $dirname = is_dir($path) ? $path : dirname($path);
    $subtitlesList = initSubtitlesList($dirname);
}
$dirInfo = array("dirnameRaw" => $dirname, "dirname" => escapeshellarg($dirname));
if ($subtitlesList) {
    $tmpSearchHTML = '';

    foreach ($subtitlesList as $sub) {
        $tmpSearchHTML.= handleSubtitleFile($dirInfo, $sub);
    }
    if ($tmpSearchHTML) {
        // Вывод ссылок на поиск для файлов, которые небыли найдены
        file_put_contents($tmpFl = mktmpfile('htm'), $tmpSearchHTML);
        system($tmpFl);
    }
}

function tryGetNameFromASS($path) {
    if (file_exists($path)) {
        $content = file_get_contents($path);
        if (preg_match("/^Video File:\s*(.*)\s*$/m", $content, $match)) {
            $name = get_basename($match[1]);
            return $name;
        }
    }
    return null;
}

function mktmpfile($ext) {
    $name = tempnam(TMPDIR, TMPPRFX);
    if (substr($name, -4) == '.tmp' && rename($name, $newname = substr($name, 0, -4)))
        $name = $newname;
    if (rename($name, $newname = "$name.$ext"))
        $name = $newname;
    return $name;
}

function initSubtitlesList($dirname) {
    $subtitlesList = null;
    if ($dirname) {
        if ($files = scandir($dirname)) {
            foreach ($files as $fileName) {
                if (preg_match('/^(.*)\.(' . SUBEXTS . ')$/', $fileName, $subsMatch)) {
                    $videoFound = false;

                    foreach (explode('|', VIDEO_EXTS) as $ext) {
                        if (in_array($subsMatch[1] . ".$ext", $files)) {
                            $videoFound = true;
                            break;
                        }
                    }
                    if (!$videoFound) {
                        $subtitlesList[] = array("name" => $subsMatch[1], "ext" => $subsMatch[2]);
                    }
                }
            }
        }
    }
    return $subtitlesList;
}

function initConfig($jsonConfigPath) {
    $json_config = file_get_contents($jsonConfigPath);
    $config = json_decode($json_config);
    $torrentPath = $config->{"TorrentPath"} or $torrentPath = $config["TorrentPath"];
    define('TORCLI', $torrentPath); // Путь к торрент-клиенту
}

function getLinkName($name) {
    return LINKSUFFIX . rawurlencode($name);
}

function hasFoundAnime($dirInfo, $torname, &$linkmath, &$html) {
    $linkname = getLinkName($torname["name"]);
    $html = downloadString($linkname);
    return preg_match('~<div class="viewdownloadbutton">\s*<a href="([^"]*tid=(\d+)[^"]*)~', $html, $linkmath);
}

function renameAndDownload($dirInfo, $torname, $linkmath, $html) {
    $dirnameRaw = $dirInfo["dirnameRaw"];
    $dirname = $dirInfo["dirname"];
    // Найдена ссылка на загрузку файла - качаем
    $tmpFl = mktmpfile($linkmath[2] . '.torrent');
    $dwnUrl = fixUrl(html_entity_decode($linkmath[1]));

    downloadFile($tmpFl, strtr($dwnUrl, array("&#38;" => "&")));
    $runComand = TORCLI . ' /DIRECTORY ' . $dirname . ' ' . escapeshellarg($tmpFl);

    if (preg_match('~<td class="viewtorrentname">(.*?)</td>~', $html, $torFileName)) {
        $torFileName = htmlentities2utf8($torFileName[1]);
        $torFileNameWithoutExt = get_path_without_ext($torFileName);
        removeQutes($torname);
        if (strcasecmp($torname["name"], $torFileNameWithoutExt) != 0) {
            if (!isset($torname["oldname"])) {
                $torname["oldname"] = $dirnameRaw . "/" . $torname["name"] . "." . $torname["ext"];
            }
            $torname["name"] = $torFileNameWithoutExt;
        }
    }
    if (isset($torname["oldname"])) {
        my_rename($torname["oldname"], $dirnameRaw . "/" . trim($torname["name"] . ".$torname[ext]"));
    }

    sendToTorrent($runComand);
}

function HasFoundAndDownloaded($dirInfo, $torname) {
    $linkmath = null;
    $html = null;
    if (hasFoundAnime($dirInfo, $torname, $linkmath, $html)) {
        renameAndDownload($dirInfo, $torname, $linkmath, $html);
        return true;
    }
    return false;
}

function renameWithNameFromSub($dirInfo, &$torname) {
    $dirnameRaw = $dirInfo["dirnameRaw"];
    $fullname = $dirnameRaw . "/$torname[name].ass";
    $nameFromAss = get_path_without_ext(tryGetNameFromASS($fullname));
    if ($nameFromAss != null && $nameFromAss != $torname['name']) {
        $torname = array("name" => $nameFromAss, "oldname" => $fullname, "ext" => $torname["ext"]);
        return true;
    }
    return false;
}

function handleSubtitleFile($dirInfo, $torname) {

    if (!HasFoundAndDownloaded($dirInfo, $torname)) { //general
        addQuotes($torname);
        if (!HasFoundAndDownloaded($dirInfo, $torname)) { //with quotes
            removeQutes($torname);
            $torname["name"] = preg_replace("|\(.*?\).*|", "", $torname["name"]);
            if (!HasFoundAndDownloaded($dirInfo, $torname)) { //with quotes
                $foundInSub = renameWithNameFromSub($dirInfo, $torname);
                if ($foundInSub && !HasFoundAndDownloaded($dirInfo, $torname)) { //with name from sub
                    addQuotes($torname);
                    if (!HasFoundAndDownloaded($dirInfo, $torname)) { //with name from sub with quotes
// Файл не найден - будем выводить ссылку на поиск       
                        removeQutes($torname);
                        return getSearchLink($torname["name"]);
                    }
                } else {
                    // Файл не найден - будем выводить ссылку на поиск 
                    return getSearchLink($torname["name"]);
                }
            }
        }
    }
}

function getSearchLink($name) {
    return '<p><a target="_blank" href="' . getLinkName($name) . '">' . $name . '</a></p>';
}

function addQuotes(&$torname) {
    $torname["name"] = '"' . $torname["name"] . '"';
}

function removeQutes(&$torname) {
    $torname["name"] = trim($torname["name"], '"');
}

function pathWithEnv_callback($match) {
    return getenv($match[1]);
}

function getPathWithEnv($path) {
    return preg_replace_callback("|%(.*?)%|", 'pathWithEnv_callback', $path);
}

function sendToTorrent($runComand) {
    if (defined('EXEC_PROC')) {
        $func = EXEC_PROC;
        $func($runComand);
    } else {
        exec($runComand);
    }
}