@echo off

echo Chaturbate
set /p "line=Enter URL or nickname: "

if "%line:~-1%"=="?" set "line=%line:~0,-1%"
if "%line:~-1%"=="/" set "line=%line:~0,-1%"
for %%a in ("%line:/=" "%") do set "name=%%~a"

set "user_agent=Mozilla/5.0 (Windows NT 10.0; Win64; x64; rv:147.0) Gecko/20100101 Firefox/147.0"
set "header=X-Requested-With: XMLHttpRequest"
set "data=room_slug=%name%&bandwidth=high"
set "url_target=https://www.redcams.com"
set "url_api=https://www.redcams.com/get_edge_hls_url_ajax/"
set "url_api_proxy=https://chaturbate.com/get_edge_hls_url_ajax/"
set "chars=0123456789ABCDEF"

set quality=1080p,best
set dir=D:\Records
set waiting=30

::Throne - NekoRay - NekoBox
set proxy=127.0.0.1:2080

:start
cls
title Request...

curl -ksS --url %url_target%/%name%/ -o %name%.html

if %errorlevel% neq 0 (
    echo no response
    del %name%.html 2>nul
    timeout %waiting%
    goto start
)

findstr /c:"HTTP 404 - Page Not Found" %name%.html > nul

if %errorlevel% equ 0 (
    echo Chaturbate - %name%
    title nickname invalid
    echo nickname invalid
    del %name%.html 2>nul
    timeout %waiting%
    goto start
)

findstr /c:"u0022homepage" %name%.html > nul

if %errorlevel% equ 0 (
    echo Chaturbate - %name%
    title nickname invalid
    echo nickname invalid
    del %name%.html 2>nul
    timeout %waiting%
    goto start
)

findstr /c:"This room has been banned" %name%.html > nul

if %errorlevel% equ 0 (
    echo Chaturbate - %name%
    title %name% is banned
    echo BANNED
    del %name%.html 2>nul
    timeout %waiting%
    goto start
)

for %%a in (%name%.html) do if %%~za equ 0 (
    set "geo_status=not defined"
    del %name%.html 2>nul
    goto loop_proxy
)

findstr /c:"This room is not available to your region or gender" %name%.html > nul

if %errorlevel% equ 0 (
    set "geo_status=*** GEOBLOCK ***"
    del %name%.html 2>nul
    goto loop_proxy
)

set "geo_status=free"
del %name%.html 2>nul

:loop_free
cls
title Request...
streamlink --version
echo ===========================
echo Chaturbate - %name%
echo %geo_status%
echo.

set "room_status="
set "hls_source="

setlocal enabledelayedexpansion

set "token="
for /l %%i in (1,1,32) do (
    set /a "n=!random! %% 16"
    for %%j in (!n!) do set "token=!token!!chars:~%%j,1!"
)

curl -ksS --url %url_api% -H "User-Agent: %user_agent%" -H "X-CSRFToken: %token%" -H "Cookie: csrftoken=%token%" -H "%header%" -d "%data%" -o %name%.json

if %errorlevel% neq 0 (
    echo no response from API
    del %name%.json 2>nul
    timeout %waiting%
    goto start
)

endlocal

for /f %%a in ('jq ".success" -r ^< %name%.json') do set "success=%%a"
for /f %%a in ('jq ".room_status" -r ^< %name%.json') do set "room_status=%%a"
for /f %%a in ('jq ".url" -r ^< %name%.json') do set "hls_source=%%a"

del %name%.json 2>nul

if "%success%"=="false" (
    cls
    echo Chaturbate - %name%
    title nickname invalid
    echo nickname invalid
    timeout %waiting%
    goto start
)

if "%room_status%"=="offline" (
    title %name% is offline
    echo OFFLINE
    timeout %waiting%
    goto loop_free
)

if "%hls_source%"=="" (
    title %name% is %room_status%
    echo %room_status%
    timeout %waiting%
    goto loop_free
)

goto work

:loop_proxy
cls
title Request...
streamlink --version
echo ===========================
echo Chaturbate - %name%
echo %geo_status%
echo.

set "room_status="
set "hls_source="

setlocal enabledelayedexpansion

set "token="
for /l %%i in (1,1,32) do (
    set /a "n=!random! %% 16"
    for %%j in (!n!) do set "token=!token!!chars:~%%j,1!"
)

curl -x %proxy% -ksS --url %url_api_proxy% -H "User-Agent: %user_agent%" -H "X-CSRFToken: %token%" -H "Cookie: csrftoken=%token%" -H "%header%" -d "%data%" -o %name%.json

if %errorlevel% neq 0 (
    title problem
    echo no response from API
    del %name%.json 2>nul
    timeout %waiting%
    goto start
)

findstr /c:"Just a moment" %name%.json > nul

if %errorlevel% equ 0 (
    title problem
    echo proxy - problem - captcha
    del %name%.json 2>nul
    timeout %waiting%
    goto start
)

endlocal

for /f %%a in ('jq ".success" -r ^< %name%.json') do set "success=%%a"
for /f %%a in ('jq ".room_status" -r ^< %name%.json') do set "room_status=%%a"
for /f %%a in ('jq ".url" -r ^< %name%.json') do set "hls_source=%%a"

del %name%.json 2>nul

if "%success%"=="false" (
    cls
    echo Chaturbate - %name%
    title nickname invalid
    echo nickname invalid
    timeout %waiting%
    goto start
)

if "%room_status%"=="offline" (
    title %name% is offline
    echo OFFLINE
    timeout %waiting%
    goto loop_proxy
)

if "%hls_source%"=="" if "%room_status%"=="public" (
    title problem
    echo public
    echo.
    echo model blocks your proxy:
    curl -ksS -x %proxy% "http://ip-api.com/line?fields=country"
    timeout %waiting%
    goto loop_proxy
)

if "%hls_source%"=="" (
    title %name% is %room_status%
    echo %room_status%
    timeout %waiting%
    goto loop_proxy
)

:work

echo Room: %room_status%

set datetime=%date:~6,4%-%date:~3,2%-%date:~0,2%_%time:~0,2%-%time:~3,2%-%time:~6,2%
set datetime=%datetime: =0%
set file=%name%_CB_%datetime%.ts
title %name% - rec

streamlink --stream-segment-threads 3 %hls_source% %quality% -o "%dir%\%file%"

timeout %waiting%

if "%geo_status%"=="free" (
    goto loop_free
) else (
    goto loop_proxy
)