@@ -15,17 +15,20 @@ try {
1515 " User-Agent" = " Mozilla/5.0 (Windows NT 10.0; Win64; x64) AppleWebKit/537.36 (KHTML, like Gecko) Chrome/91.0.4472.124 Safari/537.36"
1616 }
1717
18+ $apiBase = " https://api.tunnelflight.com/api"
19+
1820 $loginBody = @ {
19- username = $Username.ToLower ()
20- password = $Password
21- passcode = " "
22- enable2fa = $false
21+ username = $Username
22+ password = $Password
23+ passcode = " "
24+ enable2fa = $false
2325 checkTwoFactor = $true
2426 passcodeOption = " email"
27+ device_platform = " web"
2528 } | ConvertTo-Json
2629
27- Write-Host " Logging in to Tunnelflight..."
28- $loginResponse = Invoke-WebRequest - Uri " https://www.tunnelflight.com /login" - Method Post - Headers $browserHeaders - Body $loginBody - ContentType " application/json" - WebSession $session - ErrorAction Stop
30+ Write-Host " Logging in to Tunnelflight API ..."
31+ $loginResponse = Invoke-WebRequest - UseBasicParsing - Uri " $apiBase /auth /login" - Method Post - Headers $browserHeaders - Body $loginBody - ContentType " application/json" - WebSession $session - ErrorAction Stop
2932
3033 Write-Host " Login status code: $ ( $loginResponse.StatusCode ) "
3134 Write-Host " Login headers:\n$ ( $loginResponse.Headers | Format-Table - AutoSize | Out-String ) "
@@ -47,15 +50,20 @@ try {
4750
4851 $headers = $browserHeaders.Clone ()
4952 if ($token ) {
50- $headers [" Authorization " ] = " Bearer $token "
53+ $headers [" token " ] = $token
5154 }
5255
53- Write-Host " Requesting protected endpoint..."
54- $checkResponse = Invoke-WebRequest - Uri " https://www.tunnelflight.com/user/module-type/flyer-card/" - Headers $headers - WebSession $session - ErrorAction Stop
56+ Write-Host " Requesting profile endpoint..."
57+ $profileResponse = Invoke-WebRequest - UseBasicParsing - Uri " $apiBase /account/profile/user" - Headers $headers - WebSession $session - ErrorAction Stop
58+ Write-Host " Profile status code: $ ( $profileResponse.StatusCode ) "
59+ Write-Host " Profile headers:\n$ ( $profileResponse.Headers | Format-Table - AutoSize | Out-String ) "
60+ Write-Host " Profile content:\n$ ( $profileResponse.Content ) "
5561
56- Write-Host " Check status code: $ ( $checkResponse.StatusCode ) "
57- Write-Host " Check headers:\n$ ( $checkResponse.Headers | Format-Table - AutoSize | Out-String ) "
58- Write-Host " Check content:\n$ ( $checkResponse.Content ) "
62+ Write-Host " Requesting certificate list endpoint..."
63+ $certResponse = Invoke-WebRequest - UseBasicParsing - Uri " $apiBase /account/profile/certificate-list" - Headers $headers - WebSession $session - ErrorAction Stop
64+ Write-Host " Cert status code: $ ( $certResponse.StatusCode ) "
65+ Write-Host " Cert headers:\n$ ( $certResponse.Headers | Format-Table - AutoSize | Out-String ) "
66+ Write-Host " Cert content:\n$ ( $certResponse.Content ) "
5967}
6068catch {
6169 Write-Error $_
0 commit comments