--script for sport1tv.ru/sport/ (28/08/2022)
--https://www.sport1tv.ru/sport/kontrolnye-prokaty-sbornoy-rossii-sredi-yuniorov-2022/proizvolnaya-programma/devushki-proizvolnaya-programma-kontrolnye-prokaty-sbornoy-rossii-po-figurnomu-kataniyu-2022-23

if m_simpleTV.Control.ChangeAddress ~= 'No' then return end
local inAdr =  m_simpleTV.Control.CurrentAddress

if not string.match( inAdr, 'sport1tv%.ru/sport/' )  then return end
m_simpleTV.Control.ChangeAddress = 'Yes'
m_simpleTV.Control.CurrentAddress = 'error'

local userAgent = 'Mozilla/5.0 (Windows NT 10.0; Win64; x64) AppleWebKit/537.36 (KHTML, like Gecko) Chrome/102.0.5005.61 Safari/537.36 OPR/88.0.4412.27'
local session = m_simpleTV.Http.New(userAgent, nil, true)
if session==nil then return end
--------------------------------------------------
local url = inAdr

local rc, answer = m_simpleTV.Http.Request(session, {url = url})
if rc~=200 then return end

local str = string.match(answer , 'data%-playlist%-url="(.-)"')
if str == nil then return end

local str = string.gsub(str, '&', '&')

url = 'https://www.1tv.ru' .. str

rc, answer = m_simpleTV.Http.Request(session, {url = url})
m_simpleTV.Http.Close(session)
if rc~=200 then return end

--debug_in_file(answer .. '\n')

local uid = string.gsub(url, '.-video_id=(%d+)$', '%1')

local pattern = '"uid":' .. uid .. '.-"src":"(.-)"' or ''

local adr = string.match(answer , pattern)
if adr==nil then return end

adr = 'https:'  .. adr

pattern = '"uid":' .. uid .. '.-"title":"(.-)"' or ''
local title = string.match(answer , pattern) or ''

pattern = '"uid":' .. uid .. '.-"poster_thumb":"(.-)"' or ''
local poster = string.match(answer , pattern) or ''

if poster~='' then
 m_simpleTV.Control.ChangeChannelLogo(poster, m_simpleTV.Control.ChannelID)
end

local retAdr = string.gsub(adr, '3800.mp4', ',350,950,3800,.mp4.urlset/master.m3u8')

m_simpleTV.Control.SetTitle(title)
m_simpleTV.Control.CurrentAddress = retAdr