@echo off
setlocal enabledelayedexpansion

set name=taanni
set "h1=User-Agent: Mozilla/5.0 (Windows NT 10.0; Win64; x64; rv:140.0) Gecko/20100101 Firefox/140.0"
set "h2=Upgrade-Insecure-Requests: 1"
set "h3=X-Requested-With: XMLHttpRequest"
set "chars=0123456789ABCDEF"

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!"
)
set "h4=Cookie: bonga20120608=%token%"

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 "output_file=BC_check_mirrors_ok_%datetime%.txt"

for %%p in (rt rf rus ru2) do (
    for /l %%d in (27,1,99) do (
        set "url_base=%%p.bongacams%%d.com"
        set "url_prof=https://!url_base!/profile/%name%"
        for /f "delims=" %%a in ('curl -ksS -H "%h1%" -H "%h2%" -H "%h3%" -H "%h4%" --connect-timeout 5 --write-out %%{http_code} --url "!url_prof!" --output nul 2^>nul') do (
            set "http_code=%%a"
        )
        if "!http_code!"=="200" (
            echo 200 - !url_base!
            echo !url_base!>>"%output_file%"
        ) else (
            echo     !http_code! - !url_base!
        )
    )
    echo.
)
pause

@echo off
setlocal enabledelayedexpansion

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

if "%line:~-3%"=="#!/" set "line=%line:~0,-3%"    #for example bongacams.com/milkaff-#!/
if "%line:~-1%"=="/" set "line=%line:~0,-1%"    #for example bongacams.com/profile/milkaff-/
for %%a in ("%line:/=" "%") do set "name=%%~a"

set "h1=User-Agent: Mozilla/5.0 (Windows NT 10.0; Win64; x64; rv:140.0) Gecko/20100101 Firefox/140.0"
set "h2=Upgrade-Insecure-Requests: 1"
set "h3=X-Requested-With: XMLHttpRequest"
set "data=method=getRoomData&args%%5B%%5D=%name%&args%%5B%%5D=false"
set "chars=0123456789ABCDEF"

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

::NekoRay/NekoBox
set proxy=127.0.0.1:2080

::::::::::::::::::::Преобразование (при необходимости) букв в строчные для предотвращения получения кода 301

for %%# in (a b c d e f g h i j k l m n o p q r s t u v w x y z) do set "name=!name:%%#=%%#!"

::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::

:: ВНИМАНИЕ.
:: url_prof должен иметь адрес, доступный с вашего реального IP. Иначе будет ошибка - Error 000
:: url_prof должен иметь адрес, который не редиректит на другой адрес. Иначе переменная 'http_code' будет принимать неверные значения. Например, нельзя такой: https://bongacams.com/profile/%name%

set url_prof=https://ru2.bongacams27.com/profile/%name%
set url_amf=https://bongacams.com/tools/amf.php

:request_free

cls
title Request...
streamlink --version
echo *****************
echo nickname:     %name%

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!"
)

set "h4=Cookie: bonga20120608=%token%"
echo       tk:     %token%

for /f "delims=" %%a in ('curl -ksS -H "%h1%" -H "%h2%" -H "%h3%" -H "%h4%" --connect-timeout 10 --write-out %%{http_code} --url %url_prof% --output %name%_prof.json') do set "http_code=%%a"

if %http_code% neq 200 (
    echo Error %http_code%
    echo %name% - no response
    echo.
    del %name%_prof.json 2>nul
    timeout %waiting%
    goto request_free
)

for /f %%a in ('jq ".status" -r ^< %name%_prof.json') do set "status=%%a"
for /f %%a in ('jq ".data.context.userRole" -r ^< %name%_prof.json') do set "user_role=%%a"
for /f %%a in ('jq ".data.context.username" -r ^< %name%_prof.json') do set "user_name=%%a"
for /f %%a in ('jq ".data.context.displayName" -r ^< %name%_prof.json') do set "display_name=%%a"
for /f %%a in ('jq ".data.context.performerChatStatus" -r ^< %name%_prof.json') do set "chat_status=%%a"
for /f %%a in ('jq ".data.profileHead.profileStatus" -r ^< %name%_prof.json') do set "profile_status=%%a"
for /f "usebackq tokens=*" %%a in (`jq ".data.profileHead.lastBroadcast.phrase.text" -r ^< %name%_prof.json`) do set "last_broadcast=%%a"

if "%last_broadcast%"=="null" (
set "last_broadcast=Last Broadcast: No information found."
)

if "%user_role%"=="member" (
    echo #####
    echo Error. This is member.
    echo.
    del %name%_prof.json 2>nul
    timeout %waiting%
    goto request_free
)

if "%profile_status%"=="deleted" (
    echo #####
    echo deleted
    echo.
    del %name%_prof.json 2>nul
    timeout %waiting%
    goto request_free
)

if "%status%"=="redirect" (
    del %name%_prof.json 2>nul
    goto request_proxy
)

set geo_status=free

if not "%chat_status%"=="public" (
    echo %geo_status%
    echo displayname:  %display_name%
    echo username:     %user_name%
    echo ====================
    title %name% - %chat_status%
    echo               %chat_status%
    echo %last_broadcast%
    del %name%_prof.json 2>nul
    timeout %waiting%
    goto request_free
)

set "page_stream="

for /f "delims=" %%a in ('curl -ksS -H "%h1%" -H "%h3%" --data "%data%" --connect-timeout 10 --url %url_amf%') do set page_stream=%%a

if not defined page_stream (
    echo.
    echo Problem...
    echo.
    timeout %waiting%
    goto request_free
)

echo %geo_status%
echo displayname:  %display_name%
echo username:     %user_name%
echo ====================
echo               %chat_status%
del %name%_prof.json 2>nul

goto work

:request_proxy

cls
title Request...
streamlink --version
echo *****************
echo nickname:     %name%

set "status="
set "user_name="
set "display_name="
set "chat_status="
set "last_broadcast="

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!"
)

set "h4=Cookie: bonga20120608=%token%"
echo     tk_p:     %token%

curl -x %proxy% -ksS -H "%h1%" -H "%h2%" -H "%h3%" -H "%h4%" --connect-timeout 10 --url %url_prof% --output %name%_prof_proxy.json

if !errorlevel! neq 0 (
    echo.
    echo /////   You have a PROXY problem   /////
    echo.
    del %name%_prof_proxy.json 2>nul
    timeout %waiting%
    goto request_proxy
)

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

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

for /f %%a in ('jq ".status" -r ^< %name%_prof_proxy.json') do set "status=%%a"
for /f %%a in ('jq ".data.context.username" -r ^< %name%_prof_proxy.json') do set "user_name=%%a"
for /f %%a in ('jq ".data.context.displayName" -r ^< %name%_prof_proxy.json') do set "display_name=%%a"
for /f %%a in ('jq ".data.context.performerChatStatus" -r ^< %name%_prof_proxy.json') do set "chat_status=%%a"
for /f %%a in ('jq ".data.profileHead.profileStatus" -r ^< %name%_prof_proxy.json') do set "profile_status=%%a"
for /f "usebackq tokens=*" %%a in (`jq ".data.profileHead.lastBroadcast.phrase.text" -r ^< %name%_prof_proxy.json`) do set "last_broadcast=%%a"

if "%last_broadcast%"=="null" (
set "last_broadcast=Last Broadcast: No information found."
)

if "%profile_status%"=="deleted" (
    echo #####
    echo deleted
    echo.
    del %name%_prof_proxy.json 2>nul
    timeout %waiting%
    goto request_proxy
)

if "%status%"=="redirect" (
    echo #####
    echo not found
    echo.
    del %name%_prof_proxy.json 2>nul
    set "code_geo="
    set "blocked_geo="
    for /f "tokens=2 delims=;" %%a in ('curl -x %proxy% -ksS --connect-timeout 10 "https://ip2c.org/s"') do set "code_geo=%%a"
    if not defined code_geo (
        echo no response from ip2c.org
    ) else (
        rem echo Detected country via proxy: !code_geo!
        if "!code_geo!"=="RU" (
            set "blocked_geo=1"
        )
        if "!code_geo!"=="BY" (
            set "blocked_geo=1"
        )
        if "!code_geo!"=="UA" (
            set "blocked_geo=1"
        )
        if defined blocked_geo (
            echo If nickname exists, it can block your proxy geolocation: !code_geo!
        )
    )
    timeout %waiting%
    goto request_proxy
)

set "geo_status=*GEOBLOCK*"

if not "%chat_status%"=="public" (
    echo %geo_status%
    echo displayname:  %display_name%
    echo username:     %user_name%
    echo ====================
    title %name% - %chat_status%
    echo               %chat_status%
    echo %last_broadcast%
    del %name%_prof_proxy.json 2>nul
    timeout %waiting%
    goto request_proxy
)

set "page_stream="

for /f "delims=" %%a in ('curl -x %proxy% -ksS -H "%h1%" -H "%h3%" --data "%data%" --connect-timeout 10 --url %url_amf%') do set page_stream=%%a

if not defined page_stream (
    echo.
    echo -----   You have a PROXY problem   -----
    echo.
    del %name%_prof_proxy.json 2>nul
    timeout %waiting%
    goto request_proxy
)

echo %geo_status%
echo displayname:  %display_name%
echo username:     %user_name%
echo ====================
echo               %chat_status%
del %name%_prof_proxy.json 2>nul

:work

for /f "delims=" %%a in ('echo %%page_stream%% ^| jq -r .localData.videoServerUrl') do set videoServerUrl=%%a

set stream_url=https:%videoServerUrl%/hls/stream_%user_name%/playlist.m3u8

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%_BC_%datetime%.ts
title %name% - rec
echo.

streamlink --stream-segment-threads 3 --url %stream_url% --default-stream %quality% -o "%dir%\%file%"

timeout %waiting%

if "%geo_status%"=="free" (
    goto request_free
) else (
    goto request_proxy
)