Mirrors/Crunchyroll-Downloader-v3.0
2
0
Fork 0
mirror of https://github.com/hama3254/Crunchyroll-Downloader-v3.0.git synced 2024-11-15 04:35:06 +01:00
Code Issues Packages Projects Releases Wiki Activity

aded new beta subdomain

Browse Source 
aded new beta subdomain #481
This commit is contained in:
hama3254 2022-05-16 21:48:16 +02:00
parent 5d8c382ef2
commit 257fd2278c
3 changed files with 48 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

BIN
.vs/Crunchyroll Downloader/v17/.suo
View File

Binary file not shown.

35
Crunchyroll Downloader/CefSharp_Browser.vb
View File

@ -255,6 +255,8 @@ Public Class CefSharp_Browser
End If End If
End If End If
' '
'Debug.WriteLine(e.RequestUrl)
If CBool(InStr(e.RequestUrl, "?deviceType=web")) Then If CBool(InStr(e.RequestUrl, "?deviceType=web")) Then
'Debug.WriteLine(e.RequestUrl) 'Debug.WriteLine(e.RequestUrl)
Dim parms As String() = e.RequestUrl.Split(New String() {"?deviceType="}, System.StringSplitOptions.RemoveEmptyEntries) Dim parms As String() = e.RequestUrl.Split(New String() {"?deviceType="}, System.StringSplitOptions.RemoveEmptyEntries)
@ -298,6 +300,15 @@ Public Class CefSharp_Browser
Exit Sub Exit Sub
End If End If
Debug.WriteLine(e.RequestUrl) Debug.WriteLine(e.RequestUrl)
ElseIf CBool(InStr(e.RequestUrl, "https://beta.crunchyroll.com/")) And CBool(InStr(e.RequestUrl, "streams?")) Then
If (Me.InvokeRequired) Then
Me.Invoke(Sub() Main.LoadedUrls.Add(e.RequestUrl))
Exit Sub
Else
Main.LoadedUrls.Add(e.RequestUrl)
Exit Sub
End If
Debug.WriteLine(e.RequestUrl)
ElseIf CBool(InStr(e.RequestUrl, "https://beta-api.crunchyroll.com/")) And CBool(InStr(e.RequestUrl, "seasons?series_id=")) Then ElseIf CBool(InStr(e.RequestUrl, "https://beta-api.crunchyroll.com/")) And CBool(InStr(e.RequestUrl, "seasons?series_id=")) Then
If (Me.InvokeRequired) Then If (Me.InvokeRequired) Then
Me.Invoke(Sub() Main.LoadedUrls.Add(e.RequestUrl)) Me.Invoke(Sub() Main.LoadedUrls.Add(e.RequestUrl))
@ -307,6 +318,15 @@ Public Class CefSharp_Browser
Exit Sub Exit Sub
End If End If
Debug.WriteLine(e.RequestUrl) Debug.WriteLine(e.RequestUrl)
ElseIf CBool(InStr(e.RequestUrl, "https://beta.crunchyroll.com/")) And CBool(InStr(e.RequestUrl, "seasons?series_id=")) Then
If (Me.InvokeRequired) Then
Me.Invoke(Sub() Main.LoadedUrls.Add(e.RequestUrl))
Exit Sub
Else
Main.LoadedUrls.Add(e.RequestUrl)
Exit Sub
End If
Debug.WriteLine(e.RequestUrl)
ElseIf CBool(InStr(e.RequestUrl, "https://api.vrv.co")) And CBool(InStr(e.RequestUrl, "streams?")) Then ElseIf CBool(InStr(e.RequestUrl, "https://api.vrv.co")) And CBool(InStr(e.RequestUrl, "streams?")) Then
If (Me.InvokeRequired) Then If (Me.InvokeRequired) Then
Me.Invoke(Sub() Main.LoadedUrls.Add(e.RequestUrl)) Me.Invoke(Sub() Main.LoadedUrls.Add(e.RequestUrl))
@ -366,13 +386,26 @@ Public Class CefSharp_Browser
Main.b = True Main.b = True
End If End If
ElseIf CBool(InStr(requesturl, "https://beta-api.crunchyroll.com/")) And CBool(InStr(requesturl, "seasons?series_id=")) Then ElseIf CBool(InStr(requesturl, "https://beta.crunchyroll.com/")) And CBool(InStr(requesturl, "streams?")) Then
If Main.b = False Then
Main.GetBetaVideoProxy(requesturl, Main.WebbrowserURL)
Main.b = True
End If
ElseIf CBool(InStr(requesturl, "https://beta.crunchyroll.com/")) And CBool(InStr(requesturl, "seasons?series_id=")) Then
If Main.b = False Then If Main.b = False Then
Main.GetBetaSeasons(requesturl) Main.GetBetaSeasons(requesturl)
Main.b = True Main.b = True
End If End If
ElseIf CBool(InStr(requesturl, "https://beta-api.crunchyroll.com/")) And CBool(InStr(requesturl, "seasons?series_id=")) Then
If Main.b = False Then
Main.GetBetaSeasons(requesturl)
Main.b = True
End If
End If End If

14
Crunchyroll Downloader/Main.vb
View File

@ -4480,6 +4480,13 @@ Public Class Main
LoadedUrls.Clear() LoadedUrls.Clear()
Exit Sub Exit Sub
End If End If
ElseIf CBool(InStr(requesturl, "https://beta.crunchyroll.com/")) And CBool(InStr(requesturl, "streams?")) Then
If b = False Then
GetBetaVideoProxy(requesturl, WebbrowserURL)
b = True
LoadedUrls.Clear()
Exit Sub
End If
ElseIf CBool(InStr(requesturl, "https://beta-api.crunchyroll.com/")) And CBool(InStr(requesturl, "seasons?series_id=")) Then ElseIf CBool(InStr(requesturl, "https://beta-api.crunchyroll.com/")) And CBool(InStr(requesturl, "seasons?series_id=")) Then
If b = False Then If b = False Then
GetBetaSeasons(requesturl) GetBetaSeasons(requesturl)
@ -4487,6 +4494,13 @@ Public Class Main
LoadedUrls.Clear() LoadedUrls.Clear()
Exit Sub Exit Sub
End If End If
ElseIf CBool(InStr(requesturl, "https://beta.crunchyroll.com/")) And CBool(InStr(requesturl, "seasons?series_id=")) Then
If b = False Then
GetBetaSeasons(requesturl)
b = True
LoadedUrls.Clear()
Exit Sub
End If
End If End If
If CBool(InStr(requesturl, "https://api.vrv.co")) And CBool(InStr(requesturl, "streams?")) Then If CBool(InStr(requesturl, "https://api.vrv.co")) And CBool(InStr(requesturl, "streams?")) Then
Debug.WriteLine("vrv-1 " + requesturl) Debug.WriteLine("vrv-1 " + requesturl)