3
51
2c22405e-3f43-4ca9-8f1b-1806ef2374da
http://putlocker.co
234DF17B-418C-4FDC-9DFE-CD0C586D2E76
4
Putlocker
515
1
700
0
701
-1
702
-1
517
578-720,722-1080,482-576,402-480,322-400,202-320,0-200
518
0
512
0
532
1
553
1
522
0
570
1
245
2c22405e-3f43-4ca9-8f1b-1806ef2374da
93
42778,4301886574
571
char gsUrlBase="http://putlocker.co"; int gnTotalItems=0; TDateTime gTimeStart=Now;
///////////////////////////////////////////////////////////////////////////////
// Создание подкаста или папки
THmsScriptMediaItem CreateItem(THmsScriptMediaItem Parent, char sTitle='', char sLink='') {
THmsScriptMediaItem Item; bool bForceFolder = false;
if (sLink=='') { sLink = sTitle; bForceFolder = true; }
else sLink = HmsExpandLink(sLink, gsUrlBase);
Item = Parent.AddFolder(sLink, bForceFolder);
Item[mpiTitle ] = sTitle;
Item[mpiCreateDate] = VarToStr(IncTime(gTimeStart,0,-gnTotalItems,0,0));
Item[mpiFolderSortOrder] = -mpiCreateDate;
gnTotalItems++;
return Item;
}
///////////////////////////////////////////////////////////////////////////////
{
THmsScriptMediaItem Folder, Item;
FolderItem.DeleteChildItems();
Folder = CreateItem(FolderItem, 'TV series','/tv');
Folder[mpiPodcastParameters] = '--group=alph';
Folder[mpiFolderSortOrder ] = mpiTitle;
HmsLogMessage(1, mpTitle+': Создано ссылок - '+IntToStr(gnTotalItems));
}
572
C++Script
530
///////////////////////////////////////////////////////////////////////////////
// By slim8020 in collaboration with WendyH 2017 //
string gsUrlBase = 'http://putlocker.co'; // База для относительных ссылок
int gnTotalItems = 0; // Счётчик созданных элементов
TDateTime gStart = Now; // Время начала запуска скрипта
string gsTime = "02:30:00.000"; // Продолжительность видео
int gnMaxPages=10, gnMaxInGroup=100; bool gbYearInTitle=false; char gsGroupMode='';
// Регулярные выражения для поиска на странице блоков с информацией о видео
string gsPatternBlock = '(<td\\swidth="2.*?<\\/td>)'; // Искомые блоки
string gsPatternTitle = 'title="([^(]+)\\(\\d*\\)"><b>'; // Название
string gsPatternLink = ';"><a\\shref="(http:\\/\\/putlocker\\.co\\/watch-\\S+-tvshow-online-free-putlocker\\.html)'; // Ссылка
string gsPatternYear = 'title="[^(]+\\((\\d{4})\\)"><b>'; // Год
string gsPatternImage = '(http:\\/\\/image3\\.putlocker\\.co\\/images\\/covers\\/\\S+-tvshow-online-free-putlocker\\.jpg)'; // Обложка
string gsPatternPages = '>(\\d{2,})<\\/a><\\/[^\\/]+\\/\\/putlocker\\.co\\/tv\\/\\d"'; // Регулярное выражение для поиска максимального номера страницы для дозагрузки
string gsPagesParams = 'tv/<PN>'; // Параметр с номером страницы, который добавляется к ссылке
string gsHeaders = 'Referer: '+gsUrlBase+'/\r\n'+ // HTTP заголовки для запросов
'Accept-Encoding: gzip, deflate\r\n'+
'Origin: '+gsUrlBase+'\r\n'+
'User-Agent: Mozilla/5.0 (Windows NT 6.1; WOW64) AppleWebKit/537.36 (KHTML, like Gecko) Chrome/52.0.2743.116 Safari/537.36\r\n';
///////////////////////////////////////////////////////////////////////////////
// Ф У Н К Ц И И //
///////////////////////////////////////////////////////////////////////////////
// Создание ссылки на видео
THmsScriptMediaItem CreateMediaItem(THmsScriptMediaItem Folder, string sTitle,
string sLink, string sImg, string sTime) {
THmsScriptMediaItem Item = HmsCreateMediaItem(sLink, Folder.ItemID);
Item[mpiTitle ] = sTitle; // Присваиваем наименование
Item[mpiThumbnail ] = sImg; // Картинка
Item[mpiCreateDate] = VarToStr(IncTime(gStart,0,-gnTotalItems,0,0));
Item[mpiTimeLength] = sTime; // Продолжительность
gnTotalItems++; // Увеличиваем счетчик созданных элементов
return Item; // Возвращаем созданный объект
}
///////////////////////////////////////////////////////////////////////////////
// Создание папки или подкаста
THmsScriptMediaItem CreateFolder(THmsScriptMediaItem ParentFolder, string sName, string sLink, string sImg='') {
THmsScriptMediaItem Item = ParentFolder.AddFolder(sLink); // Создаём папку с указанной ссылкой
Item[mpiTitle ] = sName; // Присваиваем наименование
Item[mpiThumbnail ] = sImg; // Картинка
Item[mpiCreateDate] = DateTimeToStr(IncTime(gStart, 0, -gnTotalItems, 0, 0)); // Для обратной сортировки по дате создания
gnTotalItems++; // Увеличиваем счетчик созданных элементов
return Item; // Возвращаем созданный объект
}
///////////////////////////////////////////////////////////////////////////////
// Получение имени группировки по имени видео (первая буква, "A..Z" или "#")
string GetGroupName(string sName) {
string sGrp = '#';
if (HmsRegExMatch('([A-ZА-Я0-9])', sName, sGrp, 1, PCRE_CASELESS)) sGrp = UpperCase(sGrp);
// if (HmsRegExMatch('[A-Z]', sGrp, sGrp)) sGrp = 'A..Z';
if (HmsRegExMatch('[0-9]', sGrp, sGrp)) sGrp = '#';
return sGrp;
}
///////////////////////////////////////////////////////////////////////////////
// Загрузка страниц и парсинг
void LoadAndParse() {
string sHtml, sData, sName, sLink, sImg, sYear, sPage, sVal;// sKPID, sTran;
THmsScriptMediaItem Item, Folder = FolderItem; TRegExpr RegEx;
int i, n, nPages=0, iCnt=0, nGrp=0; char sGrp=""; bool bGroup, bJustLinks;
// Проверка установленных дополнительных параметров
if (HmsRegExMatch('--maxingroup=(\\d+)', mpPodcastParameters, sVal)) gnMaxInGroup = StrToInt(sVal);
if (HmsRegExMatch('--maxpages=(\\d+)' , mpPodcastParameters, sVal)) gnMaxPages = StrToInt(sVal);
HmsRegExMatch('--group=(\\w+)', mpPodcastParameters, gsGroupMode);
gbYearInTitle = (Pos('--yearintitle', mpPodcastParameters)>0);
bJustLinks = (Pos('--justlinks' , mpPodcastParameters)>0);
sHtml = HmsDownloadURL(mpFilePath, gsHeaders, true);
sHtml = HmsUtf8Decode(sHtml); // Декодируем страницу из UTF-8
sHtml = HmsRemoveLineBreaks(sHtml); // Удаляем переносы строк, для облегчения работы с регулярными выражениями
// Если указан шаблон поиска максимального номера страницы - применяем
if ((gsPatternPages!='') && HmsRegExMatch(gsPatternPages, sHtml, sVal)) nPages = StrToIntDef(sVal, 0);
// Вырезаем только нужный участок текста HTML, где будем искать блоки.
// Вместо <fromCut> и <toCut> вставляем начало и конец участка HTML, между которыми
// будем искать блоки текста с сылкой, наименованием и проч.
// =========================================================================
// Дозагрузка страниц
//if ((gnMaxPages!=0) && (nPages>gnMaxPages)) nPages = gnMaxPages;
for (i=2; i<=nPages; i++) {
HmsSetProgress(Trunc(i*100/nPages));
HmsShowProgress(Format('%s: Загрузка страницы %d из %d', [mpTitle, i, nPages]));
sLink = ReplaceStr(mpFilePath, '/tv', '/'+ReplaceStr(gsPagesParams, '<PN>', IntToStr(i)));
sPage = HmsDownloadURL(sLink, 'Referer: '+gsUrlBase, true);
sPage = HmsUtf8Decode(sPage);
sHtml += sPage;
if (HmsCancelPressed) break;
}
HmsHideProgress();
// =========================================================================
// Создаём объект для поиска блоков текста по регулярному выражению,
// в которых есть информация: ссылка, наименование, ссылка на картинку и проч.
RegEx = TRegExpr.Create(gsPatternBlock, PCRE_SINGLELINE || PCRE_MULTILINE);
try {
// Определяем, если блоков в загруженном более чем gnMaxInGroup, включаем группировку
if ((gsGroupMode!='alph') && (gsGroupMode!='year')) {
i=0; if (RegEx.Search(sHtml)) do i++; while (RegEx.SearchAgain());
bGroup = (i > gnMaxInGroup);
}
// Главный цикл поиска блоков
if (RegEx.Search(sHtml)) do {
sLink=''; sImg=''; sYear=''; sName='';
HmsRegExMatch(gsPatternTitle, RegEx.Match, sName);
HmsRegExMatch(gsPatternLink , RegEx.Match, sLink);
HmsRegExMatch(gsPatternYear , RegEx.Match, sYear);
HmsRegExMatch(gsPatternImage, RegEx.Match, sImg);
if (gbYearInTitle && (sYear!='') && (Pos(sYear, sName)<1)) sName += ' ('+sYear+')';
// Контроль группировки (создаём папку с именем группы)
if (gsGroupMode=='alph') {
Folder = FolderItem.AddFolder(GetGroupName(sName));
Folder[mpiFolderSortOrder] = "mpTitle";
} else if (gsGroupMode=='year') {
Folder = FolderItem.AddFolder(sYear);
Folder[mpiFolderSortOrder] = "mpTitle";
Folder[mpiYear ] = sYear;
} else if (bGroup) {
iCnt++; if (iCnt>=gnMaxInGroup) { nGrp++; iCnt=0; }
Folder = FolderItem.AddFolder(Format('%.2d', [nGrp]));
}
Item = CreateFolder(Folder, sName, sLink, sImg); // Создание папки с фильмом
Item[mpiSeriesTitle] = sName; // Название сериала
Item[mpiYear ] = sYear; // Запоминаем год выхода
} while (RegEx.SearchAgain);
} finally { RegEx.Free(); }
// Сортируем в базе данных программы созданные элементы
if (gsGroupMode=='alph') {
FolderItem.Sort('mpTitle');
for (i=0; i<FolderItem.ChildCount; i++) FolderItem.ChildItems[i].Sort('mpTitle');
} else if (gsGroupMode=='year') FolderItem.Sort('-mpYear');
HmsLogMessage(1, mpTitle+': создано элементов - '+IntToStr(gnTotalItems));
}
#define mpiFav 100992 // Идентификатор свойства элемента: данные папки "Избранное"
///////////////////////////////////////////////////////////////////////////////
// Создание сериалов избранного (база данных в свойстве mpiFav)
void CreateFavorites() {
THmsScriptMediaItem Item;
string sData = FolderItem[mpiFav];
TRegExpr RE = TRegExpr.Create('<n=(.*?);l=(.*?);i=(.*?);y=(.*?)>');
try {
if (RE.Search(sData)) do {
Item = CreateFolder(FolderItem, RE.Match(1), RE.Match(2), RE.Match(3));
Item[mpiYear ] = RE.Match(3);
Item[mpiSeriesTitle] = RE.Match(1);
} while (RE.SearchAgain());
} finally { RE.Free; }
}
///////////////////////////////////////////////////////////////////////////////
// Г Л А В Н А Я П Р О Ц Е Д У Р А //
{
FolderItem.DeleteChildItems(); // Удаляем созданные ранее элементы в текущей папке
if (LeftCopy(mpFilePath, 4)=='-fav') CreateFavorites(); // Обновляем ибранное
else LoadAndParse(); // Запускаем загрузку страниц и создание папок видео
}
531
C++Script
550
///////////////////////////////////////////////////////////////////////////////
// By slim8020 in collaboration with WendyH 2017 //
string gsUrlBase = 'http://putlocker.co'; // База для относительных ссылок
string gsUrlScript = 'http://image3.putlocker.co/show.js'; // Ссылка на скипт расшифровки
int gnTotalItems = 0; // Счётчик созданных элементов
TDateTime gStart = Now; // Время начала запуска скрипта
string gsTime = "02:30:00.000"; // Продолжительность видео
// Регулярные выражения для поиска на странице блоков с информацией о видео
string gsPatternName = '<h1>\\S+\\s\\S+Watch\\s([^<]+)\\sSeason\\s\\d+\\s\\S+<\\/h1>'; //Название сериала
string gsPatternVLink = 'setup\\(({[^;]+})\\);'; // Ссылка на видео
string gsPatternCrypt = 'doit\\S{2}([^\\)]+)\\)'; // Блок зашифрованных данных
string gsPatternSeason = '<strong>Season\\s(\\d+)<\\/strong>'; // Сезон
string gsPatternELink = '(http:\\/\\/putlocker\\.co\\/watch-'+ // Название серии и ссылка
'\\S+-tvshow-season-\\d+-episode-\\d+-online-free-putlocker\\.html)"'+
'\\stitle="[^"]+\\sSeason\\s\\d+\\sEpisode\\s(\\d+)\\s-\\s([^"]+)"';
string gsPatternSLink = 'http:\\/\\/putlocker\\.co\\/watch-'+ // Номер сезона и ссылка
'\\S+-tvshow-season-(\\d+)-online-free-putlocker\\.html';
string gsHeaders = '/\r\n'+ // HTTP заголовки для запросов
'Accept-Encoding: gzip, deflate\r\n'+
'Origin: '+gsUrlBase+'\r\n'+
'User-Agent: Mozilla/5.0 (Windows NT 6.1; WOW64) AppleWebKit/537.36 (KHTML, like Gecko) Chrome/52.0.2743.116 Safari/537.36\r\n';
///////////////////////////////////////////////////////////////////////////////
// //
// С У Б Т И Т Р Ы № 2 ( A P I ) //
// //
// Константы
#define OSUA 'HMS Putlocker podcast v1' // User-Agent for api.opensubtitles.org
#define mpiSubtitleLink 100510 // Идентификатор свойства элемента: Ссылка для скачивания файла субтиров
///////////////////////////////////////////////////////////////////////////////
// Выполнение команды API на api.opensubtitles.org
string OSAPI(string sMethod, variant aParams, string sNameOfReturnParameter='') {
string sParams='', sHeaders, sPost, sData; int i;
for (i=0; i<Length(aParams); i++) {
if (Pos('<array>', aParams[i])>0) sParams+='<param><value>'+aParams[i]+'</value></param>';
else sParams+='<param><value><string>'+aParams[i]+'</string></value></param>';
}
sHeaders = '/\r\nAccept-Encoding: gzip\r\nAccept: */*\r\nUser-Agent: '+OSUA+'\r\n';
sPost = Format('<?xml version="1.0"?><methodCall><methodName>%s</methodName><params>%s</params></methodCall>', [sMethod, sParams]);
sData = HmsSendRequest('api.opensubtitles.org', '/xml-rpc', 'POST', 'text/xml; charset=utf-8', sHeaders, sPost, 80, true);
if ((Pos('200 OK', sData)>0) && (sNameOfReturnParameter!=''))
if (!HmsRegExMatch('<name>'+sNameOfReturnParameter+'</name><value><string>(.*?)</string>', sData, sData)) sData = '';
return sData;
}
///////////////////////////////////////////////////////////////////////////////
// Загрузка архива субтитров с www.opensubtitles.org (в mpSeriesTitle должно быть имя сериала)
void LoadOpensubtitles(int nSeason=1) {
string sData, sToken, sLangID, sParams, sFile, sLink, sSeason, sEpisode, sVal, sTokenFile=HmsTempDirectory+"\\os.token";
TXMLDocument XML; TXMLItem X, XMLPARAMS, XMLITEMS; TStringList PROPS; int i, n; THmsScriptMediaItem Item;
// Идентификатор языка: rus, eng... Если не установлен - не загружать субтитры
if ((Trim(mpSeriesTitle)=='') || !HmsRegExMatch('--subtitles=(\\w+)', mpPodcastParameters, sLangID)) return;
// Получаем токен для работы с API
if (FileExists(sTokenFile)) sToken = HmsStringFromFile(sTokenFile); // Если есть сохранённый токен, загружаем его
if (sToken=='') sToken = OSAPI('LogIn', ['', '', '', OSUA], 'token'); // Анонимный вход под нашим User-Agent
// Ищем субтитры по имени сериала и номеру сезона
sParams = '<array><data><value><struct>'+
'<member><name>query</name><value><string>'+mpSeriesTitle+'</string></value></member>'+
'<member><name>sublanguageid</name><value><string>'+sLangID+'</string></value></member>'+
'<member><name>season</name><value><double>'+Str(nSeason)+'</double></value></member></struct></value></data></array>';
sData = OSAPI('SearchSubtitles', [sToken, sParams]);
// Если созранённый токен уже перестал действовать, то авторизуемся и делаем поиск заново
if ((sData=='') || (Pos('401 Unauthorized', sData)>0)) {
sToken = OSAPI('LogIn', ['', '', '', OSUA], 'token');
sData = OSAPI('SearchSubtitles', [sToken, sParams]);
if (sToken!='') HmsStringToFile(sToken, sTokenFile); // Если токен получили, сохраняем его
}
if (Pos('200 OK', sData)<1) return;
XML = TXMLDocument.Create(); PROPS = TStringList.Create();
try {
string sSubtitles = '';
XML.LoadFromString(sData);
XMLPARAMS = XML.Root.Find("params\\param\\value\\struct"); if ((XMLPARAMS==nil) || (XMLPARAMS.Count<2)) return;
XMLITEMS = XMLPARAMS.Items[1].Find("value\\array\\data");
if (XMLITEMS!=nil) for (i=0; i<XMLITEMS.Count; i++) {
X = XMLITEMS[i].Find("struct"); if (X==nil) continue;
// Для удобства доступа к значениям, переносим все свойства в TStrings
for (n=0; n<X.Count; n++) if (X[n].Find("value\\string")!=nil) PROPS.Values[X[n].Find("name").Value] = X[n].Find("value\\string").Value;
if (PROPS.Values["SubFormat"]!="srt") continue;
sSeason = PROPS.Values["SeriesSeason" ];
sEpisode = PROPS.Values["SeriesEpisode" ];
sLink = PROPS.Values["ZipDownloadLink"];
sFile = PROPS.Values["SubFileName" ];
sSubtitles += Format('s%de%d=%s;', [StrToIntDef(sSeason, 0), StrToIntDef(sEpisode, 0), sLink]);
}
// Обход всех серий и устрановка ссылок на субтитры для найденных
sFile = HmsSubtitlesDirectory+'\\'+ReplaceStr(mpSeriesTitle, ' ', '_');
for (i=0; i<PodcastItem.ChildCount; i++) {
Item = PodcastItem.ChildItems[i];
sVal = 's'+Str(Item[mpiSeriesSeasonNo])+'e'+Str(Item[mpiSeriesEpisodeNo]);
if (HmsRegExMatch(sVal+'=(.*?);', sSubtitles, sLink)) {
Item[mpiSubtitleLanguage] = sFile+'_'+sVal+'.srt';
Item[mpiSubtitleLink ] = sLink;
Item[mpiTitle ] = Trim(Item[mpiTitle])+' (subs)';
}
}
} finally { XML.Free; PROPS.Free; }
}
///////////////////////////////////////////////////////////////////////////////
// //
// З А Г Р У З К А К А Р Т И Н О К //
// //
// Константы: собственные идентификаторы свойств элемента
#define mpiTVDBInfo 100507 // Информация с thetvdb.com (картинки и названия серий)
#define mpiNumEpisodesNow 100508 // Количество серий подсчитанные в данный момент
#define mpiNumEpisodesPre 100509 // Количество серий подсчитанные в прошлый раз
// Глобальные переменные
string gsSubtitleFiles = ""; // Собранная информация о файлах субтитров к сериям
string gsTVDBInfo = ""; // Загруженная информация с thetvdb.com (картинки и названия серий)
bool gbLoadPictures = false; // Флаг: загружать информацию thetvdb.com (ключ --loadpictures)
bool gbRusTitles = false; // Флаг: использовать названия серий из информации с thetvdb.com (ключ --rusnames)
bool gbSubsAPI = false; // Флаг: использование варианта с API для загрузки субтитров с www.opensubtitles.org
///////////////////////////////////////////////////////////////////////////////
// Загрузка информации сериала с названием и картинками эпизодов
void LoadEpisodesInfo() {
string sName;
if (gsTVDBInfo!='') return; // Если инфа уже есть - зачем её пытаться загружать?
// Проверяем, была ли уже загружена информация для такого количества серий
if ((Trim(PodcastItem[mpiNumEpisodesNow])!='') && (PodcastItem[mpiNumEpisodesNow]==PodcastItem[mpiNumEpisodesPre])) {
// Если есть подсчитанное количество серий и это количество равно сохранённому значению в прошлый раз
gsTVDBInfo = PodcastItem[mpiTVDBInfo]; // То просто достаём сохранённую инфу
return;
}
sName = ReplaceStr(mpSeriesTitle, ' ', '_');
gsTVDBInfo = HmsUtf8Decode(HmsDownloadURL('http://wonky.lostcut.net/tvdb.php?n='+sName+'&y='+Str(mpYear), 'User-Agent: HMS Putlocker.co', true));
if (gsTVDBInfo == '') gsTVDBInfo = '-'; // Если инфы нет - то и не будем потом пытаться
PodcastItem[mpiTVDBInfo ] = gsTVDBInfo; // Запоминаем инфу
PodcastItem[mpiNumEpisodesPre] = PodcastItem[mpiNumEpisodesNow]; // для такого количества серий
}
///////////////////////////////////////////////////////////////////////////////
// Установка реального названия и картинки для эпизода сериала из gsTVDBInfo
void SetEpisodeInfo(THmsScriptMediaItem Item, int nSeason, int nEpisode) {
string sName, sImg;
// Если не установлен флаг загрузки картинок - сваливаем. Если ифнормация ещё не загружена - загружаем.
if (!gbLoadPictures ) return; if (gsTVDBInfo=='') LoadEpisodesInfo();
// Ищем в загруженной информации ссылку на картинку и имя серии
if (HmsRegExMatch2('s'+Str(nSeason)+'e'+Str(nEpisode)+'=(.*?);t=(.*?)\\|', gsTVDBInfo, sImg, sName)) {
if (sImg !="") Item[mpiThumbnail] = sImg; // Если картинка есть, устанавливаем
// Если установлен флаг использования имён серий из информации - устанавливаем название (может быть на русском)
if (gbRusTitles && (sName!="")) Item[mpiTitle] = Format("%.2d %s", [nEpisode, sName]);
Item[mpiSeriesTitle ] = mpSeriesTitle; // Название сериала
Item[mpiSeriesSeasonNo ] = nSeason; // Номер сезона
Item[mpiSeriesEpisodeNo ] = nEpisode; // Номер эпизода
Item[mpiSeriesEpisodeTitle] = sName; // Название серии
}
}
///////////////////////////////////////////////////////////////////////////////
// //
// С У Б Т И Т Р Ы № 1 //
// //
///////////////////////////////////////////////////////////////////////////////
// Загрузка субтитров с opensubtitles.org для конкретного сезона
void LoadSubtitles4Season(int nSeason) {
string sName, sData, sHeaders, sID, sFile, sDir, sVal, sSeason, sEpisode, sLangID;
int n; TStringList LIST; bool bDownloaded;
if (gsSubtitleFiles!="") return; gsSubtitleFiles = '-'; // Если инфа есть - уже загружали, выходим
// Идентификатор языка: rus, eng... Если не установлен - не загружать субтитры
if (!HmsRegExMatch('--subtitles=(\\w+)', mpPodcastParameters, sLangID)) return;
// В имя файла с субтритрами включаем количество серий для случая, когда нужно обновить при выходе новой серии
sFile = Format('%s\\%s_subs_%s_s%dx%s.zip', [HmsTempDirectory, ReplaceStr(mpSeriesTitle, ' ', '_'), sLangID, nSeason, PodcastItem[mpiNumEpisodesNow]]);
sDir = HmsSubtitlesDirectory+'\\'+mpSeriesTitle;
sHeaders = 'Referer: https://www.opensubtitles.org\r\nAccept-Encoding: gzip\r\nUser-Agent: HMS Putlocker podcast v1\r\n';
bDownloaded = FileExists(sFile);
if (!bDownloaded) {
if (!HmsRegExMatch('tt(\\d+)', gsTVDBInfo, sID)) { // Если к этому моменту gsTVDBInfo уже загружен, там может храниться информация imdb
sName = HmsHttpEncode(mpSeriesTitle); // Иначе пытаемся найти ID IMDB
sData = HmsDownloadURL('https://www.opensubtitles.org/libs/suggest.php?format=json3&MovieName='+sName, sHeaders, true);
if (!HmsRegExMatch('"pic":"(.*?)"', sData, sID)) return;
}
sData = HmsDownloadURL('https://www.opensubtitles.org/download/s/sublanguageid-'+sLangID+'/subformat-srt/pimdbid-'+sID+'/season-'+Str(nSeason), sHeaders, true);
bDownloaded = Trim(sData)!='';
HmsStringToFile(sData, sFile);
}
if (bDownloaded) {
if (!HmsExtractFiles(sFile, sDir)) return; // Распаковка скачанного zip архива
LIST = TStringList.Create();
try {
HmsGetFileList(sDir, LIST, "*.srt"); // Получаем список распакованных файлов
for (n=0; n<LIST.Count; n++) {
sFile = LIST[n];
// Пытаемся получить из названия разными способами номер сезона и эпизода
if (!HmsRegExMatch2('s(\\d+)e(\\d+)' , sFile, sSeason, sEpisode, PCRE_CASELESS)) // Внимательно!
if (!HmsRegExMatch2('(\\d+)x(\\d+)' , sFile, sSeason, sEpisode, PCRE_CASELESS)) // Следующий if выполняется только
if (!HmsRegExMatch2('(\\d+)\\w+(\\d+)', sFile, sSeason, sEpisode)) continue; // если неудачный предыдущий
gsSubtitleFiles += Format('s%de%d=%s;', [StrToInt(sSeason), StrToInt(sEpisode), sFile]);
}
} finally { LIST.Free(); }
}
}
///////////////////////////////////////////////////////////////////////////////
// Установка для видео файла субтиров, если он есть для указаной серии
void SetSubtitleFile(THmsScriptMediaItem Item, int nSeason, int nEpisode) {
if (gbSubsAPI) return; // Если установлен флаг использования API (ключ --subsapi), то выходим
if (gsSubtitleFiles=='') LoadSubtitles4Season(nSeason); // Загружаем субтитры, если они ещё не загружены
// Если будет найден файл субтитров для сезона и эпизода в gsSubtitleFiles, то файл будет запомнен в Item[mpiSubtitleLanguage]
if (HmsRegExMatch('s'+Str(nSeason)+'e'+Str(nEpisode)+'=(.*?);', gsSubtitleFiles, Item[mpiSubtitleLanguage]))
Item[mpiTitle] = Trim(Item[mpiTitle])+' (subs)';
}
///////////////////////////////////////////////////////////////////////////////
// //
// Ф У Н К Ц И И П О Д К А С Т А //
// //
///////////////////////////////////////////////////////////////////////////////
// Создание папки или подкаста
THmsScriptMediaItem CreateFolder(THmsScriptMediaItem ParentFolder, string sName, string sLink, string sImg='') {
THmsScriptMediaItem Item = ParentFolder.AddFolder(sLink); // Создаём папку с указанной ссылкой
Item[mpiTitle ] = sName; // Присваиваем наименование
Item[mpiThumbnail ] = sImg; // Картинка
Item[mpiCreateDate] = DateTimeToStr(IncTime(gStart, 0, -gnTotalItems, 0, 0)); // Для обратной сортировки по дате создания
Item[100500 ] = PodcastItem[100500];
gnTotalItems++; // Увеличиваем счетчик созданных элементов
return Item; // Возвращаем созданный объект
}
///////////////////////////////////////////////////////////////////////////////
// Создание ссылки на видео
THmsScriptMediaItem CreateMediaItem(THmsScriptMediaItem Folder, string sTitle, string sLink, string sImg, string sGrp='') {
THmsScriptMediaItem Item = HmsCreateMediaItem(sLink, Folder.ItemID, sGrp);
Item[mpiTitle ] = sTitle;
Item[mpiThumbnail ] = sImg;
Item[mpiCreateDate] = VarToStr(IncTime(gStart,0,-gnTotalItems,0,0));
Item[mpiTimeLength] = gsTime;
gnTotalItems++;
return Item;
}
///////////////////////////////////////////////////////////////////////////////
// Javascript Eval
string jsEval(string sData) {
Variant objScript; string sResult = '';
try { objScript = CreateOleObject('MSScriptControl.ScriptControl'); } except { };
if (VarType(objScript) != varDispatch) {
HmsLogMessage(2, 'Не могу создать ActiveXObject MSScriptControl.ScriptControl');
return '';
}
objScript.Language = 'JavaScript';
try { sResult = objScript.Eval(sData); } except { };
return sResult;
}
///////////////////////////////////////////////////////////////////////////////
/// Получаем прямую ссылку на видео
void GetLink(string sLink) {
String sHtml, sVal, sSubLink, sFile; int i;
TJsonObject JSON; TJsonArray JSONAsources, JSONAsubtitles;
TRegExpr RE;
sHtml = HmsDownloadURL(sLink, 'Referer: '+sLink+gsHeaders, true);
sHtml = HmsRemoveLineBreaks(HmsUtf8Decode(sHtml));
RE = TRegExpr.Create(gsPatternCrypt, PCRE_SINGLELINE ); // блок зашифрованных данных
if (RE.Search(sHtml)) {
RE.SearchAgain; // на странице 2 блока зашфрованных данных соответствующих поиску, нам нужен 2-й
if (Trim(RE.Match(0))=='') {
// Видео не доступно
sVal = HmsDownloadURL("https://studio.stupeflix.com/v/egNpyqrXjAbx", 'Referer: '+gsHeaders, True);
HmsRegExMatch('"(http[^>"]+\.mp4)', sVal, MediaResourceLink);
sVal = PodcastItem.ItemParent.ItemParent[mpiTitle]+' - '+PodcastItem.ItemParent[mpiTitle]+' - '+mpTitle;
HmsLogMessage(2, sVal+': Видео не доступно');
return;
}
sHtml = HmsDownloadURL(gsUrlScript, 'Referer: '+sLink+gsHeaders, true); // загружаем функцию расшифровки
sHtml = HmsRemoveLineBreaks(HmsUtf8Decode(sHtml));
sSubLink = ExtractWord(2, jsEval(sHtml+RE.Match(0)), '"'); // вытащим ссылку из расшифрованного блока
sHtml = HmsDownloadURL(sSubLink, 'Referer: '+sLink+gsHeaders, true);
sHtml = HmsRemoveLineBreaks(HmsUtf8Decode(sHtml));
RE = TRegExpr.Create(gsPatternVLink , PCRE_SINGLELINE ); // ссылки на видео [ заменить а TJson? ]
if (RE.Search(sHtml)) {sVal = RE.Match(1);}
JSON = TJsonObject.Create();
try {
JSON.LoadFromString(sVal);
JSONAsources = JSON.A["sources"];
i = JSONAsources.Length-1;
MediaResourceLink = JSONAsources[i].S["file"];
HmsLogMessage(1, mpTitle+': Качество - '+ JSONAsources[i].S["label"]);
PodcastItem.Properties[mpiTimeLength] = JSON.S["duration"];
// ----------------------------------------------------------------------
// Проверяем, не установлены ли субтитры, скачаны ли они и есть ли ссылка
sFile = Trim(PodcastItem[mpiSubtitleLanguage]);
if ((sFile!='') && !FileExists(sFile) && (Trim(PodcastItem[mpiSubtitleLink])!='')) {
// Если установлены и такого файла ещё нет? то скачиваем файл субтитров по ссылке в PodcastItem[mpiSubtitleLink]
string sDir = HmsTempDirectory+'\\subs';
sVal = HmsDownloadURL(PodcastItem[mpiSubtitleLink]); // HmsDownloadURLToFile в случае ошибки вызывает исключение,
HmsStringToFile(sVal, sDir+'.zip'); // поэтому всё через одно место.
if (HmsExtractFiles(sDir+'.zip', sDir, true)) { // Извлекаем из архива файлы
TStringList FILELIST = TStringList.Create(); // Для функции HmsGetFileList создаём объект TStringList
HmsGetFileList(sDir, FILELIST, "*.srt"); // Получаем список файлов в FILELIST
if (FILELIST.Count>0) CopyFile(FILELIST[0], sFile, false);
FILELIST.Free();
}
}
// ----------------------------------------------------------------------
//JSONAsubtitles = JSON.A["tracks"];
//for (i=0; i<JSONAsubtitles.Length; i++) {
// if (HmsRegExMatch('(English|En|Eng)', JSONAsubtitles[i].S["label"], '')) {
// PodcastItem[mpiSubtitleLanguage] = JSONAsubtitles[i].S["file"];
// }
//}
} finally { JSON.Free(); }
}
RE.Free();
}
///////////////////////////////////////////////////////////////////////////////
// Создание списка серий сериала с putlocker.co
void CreateLinks(string sLink) {
String sHtml, sVal, sSeries ,sName, sSubLink, sSub; int n, nEpisode, intSeason;
TRegExpr RE; THmsScriptMediaItem Item, Folder = PodcastItem;
gbLoadPictures = Pos("--loadpictures" , mpPodcastParameters) > 0; // Флаг загрузки картинок
gbRusTitles = Pos("--rusnames" , mpPodcastParameters) > 0; // Флаг получения русских названий серий (если они есть)
gbSubsAPI = Pos("--subsapi" , mpPodcastParameters) > 0; // Флаг использования API для загрузки субтитров
// Устанавливаем в переменную mpSeriesTitle имя сериала, если оно не установлено (для загрузки картинок и субтитров)
if (Trim(mpSeriesTitle)=='') mpSeriesTitle = IfThen(Pos('Season', mpTitle)>0, PodcastItem.ItemParent[mpiTitle], mpTitle);
sHtml = HmsDownloadURL(sLink, 'Referer: '+sLink+gsHeaders, true);
sHtml = HmsRemoveLineBreaks(HmsUtf8Decode(sHtml));
if (HmsRegExMatch('tvshow', sLink, '')) {
RE = TRegExpr.Create(gsPatternSeason, PCRE_SINGLELINE ); // Сезоны
// Подсчитываем количество сезонов
n = 0; if (RE.Search(sHtml)) do { n++; sVal = RE.Match(1);} while (RE.SearchAgain);
if (n == 1) {
// Если сезон всего один или мы в папке сезона, выкатываем серии
RE = TRegExpr.Create(gsPatternName, PCRE_SINGLELINE );
if (RE.Search(sHtml)) {sSeries = RE.Match(1);}
RE = TRegExpr.Create(gsPatternELink, PCRE_SINGLELINE );
// Подсчитываем количество серий, чтобы запомнить в PodcastItem[mpiNumEpisodesNow] (для обновления субтитров или картинок при выходе новой серии)
n=0; if (RE.Search(sHtml)) do n++; while (RE.SearchAgain); PodcastItem[mpiNumEpisodesNow] = Str(n);
if (RE.Search(sHtml)) do {
sSubLink = RE.Match(1); //Ссылка на серию
nEpisode = StrToInt(RE.Match(2)); //Номер
sName = RE.Match(3); //название серии
Item = CreateMediaItem(Folder, Format("%.2d %s", [nEpisode, sName]), sSubLink, mpThumbnail);
SetEpisodeInfo (Item, StrToInt(sVal), nEpisode); // Устанавливаем картинку для эпизода
SetSubtitleFile(Item, StrToInt(sVal), nEpisode); // Устанавливаем файл субтитров
} while (RE.SearchAgain);
if (gbSubsAPI) LoadOpensubtitles(StrToInt(sVal));
} else {
intSeason = 0;
RE = TRegExpr.Create(gsPatternSLink, PCRE_SINGLELINE );
if (RE.Search(sHtml)) do {
sVal = RE.Match(1); // Номер сезона
sSubLink = RE.Match(0); // Ссылка на страницу сезона
if ((intSeason!=StrToInt(sVal)) && (sSubLink!=sLink)) {
Item = CreateFolder(Folder, 'Season '+sVal, sSubLink, mpThumbnail);
Item[mpiSeriesTitle] = mpTitle;
intSeason = StrToInt(sVal);
}
} while (RE.SearchAgain);
}
RE.Free();
// Если мы не в конкретном сезоне, создаём папку "Добавить в избранное"
if (Pos('Season', mpTitle)<1) CreateAddDelFavoritesFolder();
}
}
///////////////////////////////////////////////////////////////////////////////
// //
// Р А Б О Т А С И З Б Р А Н Н Ы М //
// //
#define mpiFav 100992 // Идентификатор свойства элемента: данные папки "Избранное"
///////////////////////////////////////////////////////////////////////////////
// Получение папки "Избранное"
THmsScriptMediaItem GetFavoritesFolder() {
THmsScriptMediaItem Root = PodcastItem; // Ищем корневой элемент подкаста
while ((Root[mpiFilePath]!='Putlocker') && (Root.ItemParent!=nil)) Root = Root.ItemParent;
return Root.FindItemByProperty(mpiFilePath, "-Fav"); // Ищем папку "Избранное" в корневой папке
}
///////////////////////////////////////////////////////////////////////////////
// Создание специальной папки добавления/удаления в избранное
void CreateAddDelFavoritesFolder() {
string sVal;
THmsScriptMediaItem Folder, FavItem = GetFavoritesFolder(); if (FavItem==nil) return;
if (Pos(mpFilePath, FavItem[mpiFav])<1) sVal = "Добавить в избранное";
else sVal = "Удалить из избранного";
Folder = CreateFolder(PodcastItem, sVal, sVal);
CreateMediaItem(Folder, sVal, '-FavCmd', 'http://wonky.lostcut.net/icons/ok.png');
}
///////////////////////////////////////////////////////////////////////////////
// Зауск команды добавления или удаления сериала в/из избранное
void AddRemoveFavoritesCmd() {
string sData, sName, sLink, sImg, sYear, sID;
THmsScriptMediaItem Item, Folder, FavItem=GetFavoritesFolder(); if (FavItem==nil) return;
HmsRegExMatch('=(.*)', mpFilePath, sID);
Item = PodcastItem.ItemOrigin.ItemParent.ItemParent; // Папка сериала, где находится команда
sName = Item[mpiSeriesTitle];
sLink = Item[mpiFilePath ];
sImg = Item[mpiThumbnail ];
sYear = Item[mpiYear ];
// Проверяем, присутствует ли данный сериал в избранном?
if (Pos(sLink, FavItem[mpiFav])<1) {
// Добавляем в базу данных наш сериал
FavItem[mpiFav] += Format('<n=%s;l=%s;i=%s;y=%s>', [sName, sLink, sImg, sYear]);
Folder = CreateFolder(FavItem, sName, sLink, sImg); // Создаём наш сериал сразу
Folder.CopyProperties(Item, [mpiYear, mpiSeriesTitle]); // Копируем свойства папки
mpTitle = "Удалить из избранного"; // Теперь эта ссылка и папка будет отображаться так
} else {
// Удаляем из базы данных наш сериал
if (HmsRegExMatch('(<n=[^>]+;l='+sLink+'.*?>)', FavItem[mpiFav], sData))
FavItem[mpiFav] = ReplaceStr(FavItem[mpiFav], sData, '');
mpTitle = "Добавить в избранное"; // Теперь эта ссылка и папка будет отображаться так
}
PodcastItem[mpiTitle] = mpTitle;
PodcastItem.ItemOrigin.ItemParent[mpiTitle] = mpTitle;
HmsIncSystemUpdateID(); // Говорим устройству об обновлении содержания
MediaResourceLink = ProgramPath()+'\\Presentation\\Images\\videook.mp4';
}
///////////////////////////////////////////////////////////////////////////////
// Г Л А В Н А Я П Р О Ц Е Д У Р А //
{
if (PodcastItem.IsFolder) {
PodcastItem.DeleteChildItems();
CreateLinks(mpFilePath);
}
else if (LeftCopy(mpFilePath, 4)=='-Fav') AddRemoveFavoritesCmd();
else if (HmsFileMediaType(mpFilePath)==mtVideo) MediaResourceLink = mpFilePath;
else GetLink(mpFilePath);
}
551
C++Script
527
--loadpictures --subtitles=rus --subsapi--group=alph--pages=50
-
53
bd6b610b618178dc00bc4acf16be1f71
http://putlocker.co/tv
2c22405e-3f43-4ca9-8f1b-1806ef2374da
515
2
512
2
532
2
700
2
553
2
42
3
4
TV series
35
42890,5134027778
215
4
527
--group=alph
93
42890,5134208333
525
42890,5280580208
-
51
e8f68203-d3f6-48aa-9975-01b9b3cae9e0
2c22405e-3f43-4ca9-8f1b-1806ef2374da
515
2
512
2
532
2
700
2
553
2
42
3
4
Избранное
701
-1
702
-1
517
578-720,722-1080,482-576,402-480,322-400,202-320,0-200
518
0
522
0
570
0
245
e8f68203-d3f6-48aa-9975-01b9b3cae9e0
93
42890,5248803819