From 7e0bf54cba810fb8876108015be42f966064c1ff Mon Sep 17 00:00:00 2001
From: Mario <100047175+Mariopizza1@users.noreply.github.com>
Date: Mon, 22 May 2023 13:20:03 +0300
Subject: [PATCH] Update test.php

---
 test.php | 395 +++++++++++++++++++++++++++----------------------------
 1 file changed, 196 insertions(+), 199 deletions(-)

diff --git a/test.php b/test.php
index 41bc243..1d6a4a1 100644
--- a/test.php
+++ b/test.php
@@ -1,4 +1,5 @@
 <?php
+// THIS IS A TEST DO NOT INCLUDE IN PRODUCTION
 require_once 'core/config.php';
 require_once 'core/classes.php';
 function generateRandomJobId() {
@@ -24,213 +25,209 @@ function generateRandomString($length = 25) {
     }
     return $randomString;
 }
-$accesstoken = 'test';
+$accesstoken = generateRandomString(70);
 $port = rand(5000,5999);
 $jobid = generateRandomJobId();
-$zero = 0;
-$false = 'false';
-$sixty = '60';
-$address = '192.168.1.130';
-$two = '2';
-$one = '1';
+$placeid = 1818;
+$ip = $AvailableGameservers["1"];
 $RCCServiceSoap = new Roblox\Grid\Rcc\RCCServiceSoap("127.0.0.1", 64989);
-        $script = '
-        -- Start Game Script Arguments
-        local placeId = '. "1818" .'
-		local port = '. $port .'
-        local gameId = "'. $jobid .'"
-		local sleeptime = '. $zero .'
-		local access = "'. $accesstoken .'"
-		local deprecated = '. $false .'
-		local timeout = '. $sixty .'
-		local machineAddress = "'. $address .'"
-		local gsmInterval = '. $two .'
-		local baseUrl = "sierraf.tk"
-		local maxPlayers = '. $sixty .'
-		local maxGameInstances = '. $one .'
-		local injectScriptAssetID = '. $zero .'
-		local apiKey = "'. $accesstoken .'"
-		local libraryRegistrationScriptAssetID = '. $zero .'
-		local deprecated_pingTimesReportInterval = '. $two .'
-		local gameCode = '. "0000" .'
-		local universeId = "'. $jobid .'"
-		local preferredPlayerCapacity = '. $sixty .'
-		local matchmakingContextId = '. $zero .'
-		local placeVisitAccessKey = "'. $accesstoken .'"
-		local assetGameSubdomain = "assetgame"
-		local protocol = "'. "https://" .'"
-        
-        -----------------------------------"CUSTOM" SHARED CODE----------------------------------
-        
+$script = 'print("Starting gameserver at placeid: '. $placeid .' on port: '. $port .' with JobID: '. $jobid .'")
+-- Start Game Script Arguments
+local placeId = '. $placeid .'
+local port = '. $port .'
+local gameId = "'. $jobid .'"
+local sleeptime = 0
+local access = "'. $accesstoken .'"
+local deprecated = false
+local timeout = 60
+local machineAddress = "'. $ip .'"
+local gsmInterval = 2
+local baseUrl = "sierraf.tk"
+local maxPlayers = 60
+local maxGameInstances = 1
+local injectScriptAssetID = 0
+local apiKey = "'. $accesstoken .'"
+local libraryRegistrationScriptAssetID = 0
+local deprecated_pingTimesReportInterval = 2
+local gameCode = 0
+local universeId = "'. $jobid .'"
+local preferredPlayerCapacity = 60
+local matchmakingContextId = 0
+local placeVisitAccessKey = "'. $accesstoken .'"
+local assetGameSubdomain = "assetgame"
+local protocol = "https://"
 
-        pcall(function() settings().Network.UseInstancePacketCache = true end)
-        pcall(function() settings().Network.UsePhysicsPacketCache = true end)
-        pcall(function() settings()["Task Scheduler"].PriorityMethod = Enum.PriorityMethod.AccumulatedError end)
-        
-        
-        settings().Network.PhysicsSend = Enum.PhysicsSendMethod.TopNErrors
-        settings().Network.ExperimentalPhysicsEnabled = true
-        settings().Network.WaitingForCharacterLogRate = 100
-        pcall(function() settings().Diagnostics:LegacyScriptMode() end)
-        
-        -----------------------------------START GAME SHARED SCRIPT------------------------------
-        
-        local assetId = placeId -- might be able to remove this now
-        local url = nil
-        local assetGameUrl = nil
-        if baseUrl~=nil and protocol ~= nil then
-            url = protocol .. "www." .. baseUrl --baseUrl is actually the domain, no leading .
-            assetGameUrl = protocol .. assetGameSubdomain .. "." .. baseUrl
+-----------------------------------"CUSTOM" SHARED CODE----------------------------------
+
+
+pcall(function() settings().Network.UseInstancePacketCache = true end)
+pcall(function() settings().Network.UsePhysicsPacketCache = true end)
+pcall(function() settings()["Task Scheduler"].PriorityMethod = Enum.PriorityMethod.AccumulatedError end)
+
+
+settings().Network.PhysicsSend = Enum.PhysicsSendMethod.TopNErrors
+settings().Network.ExperimentalPhysicsEnabled = true
+settings().Network.WaitingForCharacterLogRate = 100
+pcall(function() settings().Diagnostics:LegacyScriptMode() end)
+
+-----------------------------------START GAME SHARED SCRIPT------------------------------
+
+local assetId = placeId -- might be able to remove this now
+local url = nil
+local assetGameUrl = nil
+local accesstoken = placeVisitAccessKey
+if baseUrl~=nil and protocol ~= nil then
+    url = protocol .. "www." .. baseUrl --baseUrl is actually the domain, no leading .
+    assetGameUrl = protocol .. assetGameSubdomain .. "." .. baseUrl
+end
+
+local scriptContext = game:GetService("ScriptContext")
+pcall(function() scriptContext:AddStarterScript(libraryRegistrationScriptAssetID) end)
+scriptContext.ScriptsDisabled = true
+
+game:SetPlaceID(assetId, false)
+pcall(function () if universeId ~= nil then game:SetUniverseId(universeId) end end)
+game:GetService("ChangeHistoryService"):SetEnabled(false)
+
+-- establish this peer as the Server
+local ns = game:GetService("NetworkServer")
+-- Detect cloud edit mode by checking for the dedicated cloud edit matchmaking context
+local isCloudEdit = matchmakingContextId == 3
+if isCloudEdit then
+    print("Configuring as cloud edit server!")
+    game:SetServerSaveUrl(url .. "/ide/publish/UploadFromCloudEdit")	
+    ns:ConfigureAsCloudEditServer()
+end
+
+local badgeUrlFlagExists, badgeUrlFlagValue = pcall(function () return settings():GetFFlag("NewBadgeServiceUrlEnabled") end)
+local newBadgeUrlEnabled = badgeUrlFlagExists and badgeUrlFlagValue
+if url~=nil then
+    local apiProxyUrl = "https://api." .. baseUrl -- baseUrl is really the domain
+
+    pcall(function() game:GetService("Players"):SetAbuseReportUrl(url .. "/AbuseReport/InGameChatHandler.ashx") end)
+    pcall(function() game:GetService("ScriptInformationProvider"):SetAssetUrl(assetGameUrl .. "/Asset/") end)
+    pcall(function() game:GetService("ContentProvider"):SetBaseUrl(url .. "/") end)
+    -- pcall(function() game:GetService("Players"):SetChatFilterUrl(assetGameUrl .. "/Game/ChatFilter.ashx") end)
+    
+    if gameCode then
+        game:SetVIPServerId(tostring(gameCode))
+    end
+
+    game:GetService("BadgeService"):SetPlaceId(placeId)
+
+    if newBadgeUrlEnabled then
+        game:GetService("BadgeService"):SetAwardBadgeUrl(apiProxyUrl .. "/assets/award-badge?userId=%d&badgeId=%d&placeId=%d")
+    end
+
+    if access ~= nil then
+        if not newBadgeUrlEnabled then
+            game:GetService("BadgeService"):SetAwardBadgeUrl(assetGameUrl .. "/Game/Badge/AwardBadge.ashx?UserID=%d&BadgeID=%d&PlaceID=%d")
         end
-        
-        local scriptContext = game:GetService("ScriptContext")
-        pcall(function() scriptContext:AddStarterScript(libraryRegistrationScriptAssetID) end)
-        scriptContext.ScriptsDisabled = true
-        
-        game:SetPlaceID(assetId, false)
-        pcall(function () if universeId ~= nil then game:SetUniverseId(universeId) end end)
-        game:GetService("ChangeHistoryService"):SetEnabled(false)
-        
-        -- establish this peer as the Server
-        local ns = game:GetService("NetworkServer")
-        -- Detect cloud edit mode by checking for the dedicated cloud edit matchmaking context
-        local isCloudEdit = matchmakingContextId == 3
-        if isCloudEdit then
-            print("Configuring as cloud edit server!")
-            game:SetServerSaveUrl(url .. "/ide/publish/UploadFromCloudEdit")	
-            ns:ConfigureAsCloudEditServer()
-        end
-        
-        local badgeUrlFlagExists, badgeUrlFlagValue = pcall(function () return settings():GetFFlag("NewBadgeServiceUrlEnabled") end)
-        local newBadgeUrlEnabled = badgeUrlFlagExists and badgeUrlFlagValue
-        if url~=nil then
-            local apiProxyUrl = "https://api." .. baseUrl -- baseUrl is really the domain
-        
-            pcall(function() game:GetService("Players"):SetAbuseReportUrl(url .. "/AbuseReport/InGameChatHandler.ashx") end)
-            pcall(function() game:GetService("ScriptInformationProvider"):SetAssetUrl(assetGameUrl .. "/Asset/") end)
-            pcall(function() game:GetService("ContentProvider"):SetBaseUrl(url .. "/") end)
-            pcall(function() game:GetService("Players"):SetChatFilterUrl(assetGameUrl .. "/Game/ChatFilter.ashx") end)
-            
-            if gameCode then
-                game:SetVIPServerId(tostring(gameCode))
-            end
-        
-            game:GetService("BadgeService"):SetPlaceId(placeId)
-        
-            if newBadgeUrlEnabled then
-                game:GetService("BadgeService"):SetAwardBadgeUrl(apiProxyUrl .. "/assets/award-badge?userId=%d&badgeId=%d&placeId=%d")
-            end
-        
-            if access ~= nil then
-                if not newBadgeUrlEnabled then
-                    game:GetService("BadgeService"):SetAwardBadgeUrl(assetGameUrl .. "/Game/Badge/AwardBadge.ashx?UserID=%d&BadgeID=%d&PlaceID=%d")
+
+        game:GetService("BadgeService"):SetHasBadgeUrl(assetGameUrl .. "/Game/Badge/HasBadge.ashx?UserID=%d&BadgeID=%d")
+        game:GetService("BadgeService"):SetIsBadgeDisabledUrl(assetGameUrl .. "/Game/Badge/IsBadgeDisabled.ashx?BadgeID=%d&PlaceID=%d")
+
+        game:GetService("FriendService"):SetMakeFriendUrl(assetGameUrl .. "/Game/CreateFriend?firstUserId=%d&secondUserId=%d")
+        game:GetService("FriendService"):SetBreakFriendUrl(assetGameUrl .. "/Game/BreakFriend?firstUserId=%d&secondUserId=%d")
+        game:GetService("FriendService"):SetGetFriendsUrl(assetGameUrl .. "/Game/AreFriends?userId=%d")
+    end
+    game:GetService("BadgeService"):SetIsBadgeLegalUrl("")
+    game:GetService("InsertService"):SetBaseSetsUrl(assetGameUrl .. "/Game/Tools/InsertAsset.ashx?nsets=10&type=base")
+    game:GetService("InsertService"):SetUserSetsUrl(assetGameUrl .. "/Game/Tools/InsertAsset.ashx?nsets=20&type=user&userid=%d")
+    game:GetService("InsertService"):SetCollectionUrl(assetGameUrl .. "/Game/Tools/InsertAsset.ashx?sid=%d")
+    game:GetService("InsertService"):SetAssetUrl(assetGameUrl .. "/Asset/?id=%d")
+    game:GetService("InsertService"):SetAssetVersionUrl(assetGameUrl .. "/Asset/?assetversionid=%d")
+    
+    if gameCode then
+        pcall(function() loadfile(assetGameUrl .. "/Game/LoadPlaceInfo.ashx?PlaceId=" .. placeId .. "&gameCode=" .. tostring(gameCode))() end)
+    else
+        pcall(function() loadfile(assetGameUrl .. "/Game/LoadPlaceInfo.ashx?PlaceId=" .. placeId)() end)
+    end
+    
+    pcall(function() 
+                if access then
+                    loadfile(assetGameUrl .. "/Game/PlaceSpecificScript.ashx?PlaceId=" .. placeId)()
                 end
-        
-                game:GetService("BadgeService"):SetHasBadgeUrl(assetGameUrl .. "/Game/Badge/HasBadge.ashx?UserID=%d&BadgeID=%d")
-                game:GetService("BadgeService"):SetIsBadgeDisabledUrl(assetGameUrl .. "/Game/Badge/IsBadgeDisabled.ashx?BadgeID=%d&PlaceID=%d")
-        
-                game:GetService("FriendService"):SetMakeFriendUrl(assetGameUrl .. "/Game/CreateFriend?firstUserId=%d&secondUserId=%d")
-                game:GetService("FriendService"):SetBreakFriendUrl(assetGameUrl .. "/Game/BreakFriend?firstUserId=%d&secondUserId=%d")
-                game:GetService("FriendService"):SetGetFriendsUrl(assetGameUrl .. "/Game/AreFriends?userId=%d")
-            end
-            game:GetService("BadgeService"):SetIsBadgeLegalUrl("")
-            game:GetService("InsertService"):SetBaseSetsUrl(assetGameUrl .. "/Game/Tools/InsertAsset.ashx?nsets=10&type=base")
-            game:GetService("InsertService"):SetUserSetsUrl(assetGameUrl .. "/Game/Tools/InsertAsset.ashx?nsets=20&type=user&userid=%d")
-            game:GetService("InsertService"):SetCollectionUrl(assetGameUrl .. "/Game/Tools/InsertAsset.ashx?sid=%d")
-            game:GetService("InsertService"):SetAssetUrl(assetGameUrl .. "/Asset/?id=%d")
-            game:GetService("InsertService"):SetAssetVersionUrl(assetGameUrl .. "/Asset/?assetversionid=%d")
-            
-            if gameCode then
-                pcall(function() loadfile(assetGameUrl .. "/Game/LoadPlaceInfo.ashx?PlaceId=" .. placeId .. "&gameCode=" .. tostring(gameCode))() end)
-            else
-                pcall(function() loadfile(assetGameUrl .. "/Game/LoadPlaceInfo.ashx?PlaceId=" .. placeId)() end)
-            end
-            
-            pcall(function() 
-                        if access then
-                            loadfile(assetGameUrl .. "/Game/PlaceSpecificScript.ashx?PlaceId=" .. placeId)()
-                        end
-                    end)
-        end
-        
-        pcall(function() game:GetService("NetworkServer"):SetIsPlayerAuthenticationRequired(true) end)
-        settings().Diagnostics.LuaRamLimit = 0
-        
-        game:GetService("Players").PlayerAdded:connect(function(player)
-            print("Player " .. player.userId .. " added")
-            
-            if assetGameUrl and access and placeId and player and player.userId then
-                local didTeleportIn = "False"
-                if player.TeleportedIn then didTeleportIn = "True" end
-        
-                -- game:HttpGet(assetGameUrl .. "/Game/ClientPresence.ashx?action=connect&PlaceID=" .. placeId .. "&UserID=" .. player.userId)
-                if not isCloudEdit then
-                    -- game:HttpPost(assetGameUrl .. "/Game/PlaceVisit.ashx?UserID=" .. player.userId .. "&AssociatedPlaceID=" .. placeId .. "&placeVisitAccessKey=" .. placeVisitAccessKey .. "&IsTeleport=" .. didTeleportIn, "")
-                end
-            end
-        end)
-        
-        game:GetService("Players").PlayerRemoving:connect(function(player)
-            print("Player " .. player.userId .. " leaving")	
-        
-            local isTeleportingOut = "False"
-            if player.Teleported then isTeleportingOut = "True" end
-        
-            if assetGameUrl and access and placeId and player and player.userId then
-                -- game:HttpGet(assetGameUrl .. "/Game/ClientPresence.ashx?action=disconnect&PlaceID=" .. placeId .. "&UserID=" .. player.userId .. "&IsTeleport=" .. isTeleportingOut)
-            end
-        end)
-        
-        local onlyCallGameLoadWhenInRccWithAccessKey = newBadgeUrlEnabled
-        if placeId ~= nil and assetGameUrl ~= nil and ((not onlyCallGameLoadWhenInRccWithAccessKey) or access ~= nil) then
-            -- yield so that file load happens in the heartbeat thread
-            wait()
-            
-            -- load the game
-            game:Load(assetGameUrl .. "/asset/?id=" .. placeId)
-        end
-        
-        -- Configure CloudEdit saving after place has been loaded
-        if isCloudEdit then
-            local doPeriodicSaves = true
-            local delayBetweenSavesSeconds = 5 * 60 -- 5 minutes
-            local function periodicSave()
-                if doPeriodicSaves then
-                    game:ServerSave()
-                    delay(delayBetweenSavesSeconds, periodicSave)
-                end
-            end
-            -- Spawn thread to save in the future
-            delay(delayBetweenSavesSeconds, periodicSave)
-            -- Hook into OnClose to save on shutdown
-            game.OnClose = function()
-                doPeriodicSaves = false
-                game:ServerSave()
-            end
-        end
-        
-        -- Now start the connection
-        ns:Start(port, sleeptime) 
-        
-        if timeout then
-            scriptContext:SetTimeout(timeout)
-        end
-        scriptContext.ScriptsDisabled = false
-        
-        
-        -- StartGame --
+            end)
+end
+
+pcall(function() game:GetService("NetworkServer"):SetIsPlayerAuthenticationRequired(true) end)
+settings().Diagnostics.LuaRamLimit = 0
+
+game:GetService("Players").PlayerAdded:connect(function(player)
+    print("Player " .. player.userId .. " added")
+    
+    if assetGameUrl and access and placeId and player and player.userId then
+        local didTeleportIn = "False"
+        if player.TeleportedIn then didTeleportIn = "True" end
+
+        -- game:HttpGet(assetGameUrl .. "/Game/ClientPresence.ashx?action=connect&PlaceID=" .. placeId .. "&UserID=" .. player.userId)
         if not isCloudEdit then
-            if injectScriptAssetID and (injectScriptAssetID < 0) then
-                pcall(function() Game:LoadGame(injectScriptAssetID * -1) end)
-            else
-                pcall(function() Game:GetService("ScriptContext"):AddStarterScript(injectScriptAssetID) end)
-            end
-        
-            Game:GetService("RunService"):Run()
+            game:HttpPost(assetGameUrl .. "/Game/PlaceVisit.ashx?UserID=" .. player.userId .. "&AssociatedPlaceID=" .. placeId .. "&placeVisitAccessKey=" .. placeVisitAccessKey .. "&IsTeleport=" .. didTeleportIn, "")
         end
-        
-        ';
+    end
+end)
+
+game:GetService("Players").PlayerRemoving:connect(function(player)
+    print("Player " .. player.userId .. " leaving")	
+
+    local isTeleportingOut = "False"
+    if player.Teleported then isTeleportingOut = "True" end
+
+    if assetGameUrl and access and placeId and player and player.userId then
+        game:HttpGet(assetGameUrl .. "/Game/ClientPresence.ashx?action=disconnect&PlaceID=" .. placeId .. "&UserID=" .. player.userId .. "&IsTeleport=" .. isTeleportingOut .. "&placeVisitAccessKey=" .. accesstoken)
+    end
+end)
+
+local onlyCallGameLoadWhenInRccWithAccessKey = newBadgeUrlEnabled
+if placeId ~= nil and assetGameUrl ~= nil and ((not onlyCallGameLoadWhenInRccWithAccessKey) or access ~= nil) then
+    -- yield so that file load happens in the heartbeat thread
+    wait()
+    
+    -- load the game
+    game:Load(assetGameUrl .. "/asset/?id=" .. placeId .. "&accesstoken=" .. accesstoken)
+end
+
+-- Configure CloudEdit saving after place has been loaded
+if isCloudEdit then
+    local doPeriodicSaves = true
+    local delayBetweenSavesSeconds = 5 * 60 -- 5 minutes
+    local function periodicSave()
+        if doPeriodicSaves then
+            game:ServerSave()
+            delay(delayBetweenSavesSeconds, periodicSave)
+        end
+    end
+    -- Spawn thread to save in the future
+    delay(delayBetweenSavesSeconds, periodicSave)
+    -- Hook into OnClose to save on shutdown
+    game.OnClose = function()
+        doPeriodicSaves = false
+        game:ServerSave()
+    end
+end
+
+-- Now start the connection
+ns:Start(port, sleeptime) 
+
+if timeout then
+    scriptContext:SetTimeout(timeout)
+end
+scriptContext.ScriptsDisabled = false
+
+
+-- StartGame --
+if not isCloudEdit then
+    if injectScriptAssetID and (injectScriptAssetID < 0) then
+        pcall(function() Game:LoadGame(injectScriptAssetID * -1) end)
+    else
+        pcall(function() Game:GetService("ScriptContext"):AddStarterScript(injectScriptAssetID) end)
+    end
+
+    Game:GetService("RunService"):Run()
+end
+
+';
         $job = new Roblox\Grid\Rcc\Job($jobid, 99999999999); // pls only set to this amount WHEN ur hosting a gameserver when ur rendering do like 10 minutes
         $funny = new Roblox\Grid\Rcc\ScriptExecution("Script".rand(1,getrandmax()), $script);
         $result = $RCCServiceSoap->OpenJob($job, $funny);
-	echo '<pre>' . var_export($RCCServiceSoap, true) . '</pre>';
\ No newline at end of file