Update test.php

This commit is contained in:
Mario 2023-05-22 13:20:03 +03:00 committed by GitHub
parent df96461ca0
commit 7e0bf54cba
No known key found for this signature in database
GPG Key ID: 4AEE18F83AFDEB23
1 changed files with 196 additions and 199 deletions

365
test.php
View File

@ -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://" .'"
$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://"
-----------------------------------"CUSTOM" SHARED CODE----------------------------------
-----------------------------------"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)
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)
settings().Network.PhysicsSend = Enum.PhysicsSendMethod.TopNErrors
settings().Network.ExperimentalPhysicsEnabled = true
settings().Network.WaitingForCharacterLogRate = 100
pcall(function() settings().Diagnostics:LegacyScriptMode() end)
-----------------------------------START GAME SHARED SCRIPT------------------------------
-----------------------------------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
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: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:SetPlaceID(assetId, false)
pcall(function () if universeId ~= nil then game:SetUniverseId(universeId) end end)
game:GetService("ChangeHistoryService"):SetEnabled(false)
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")
-- 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
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
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")
pcall(function()
if access then
loadfile(assetGameUrl .. "/Game/PlaceSpecificScript.ashx?PlaceId=" .. placeId)()
end
end)
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")
pcall(function() game:GetService("NetworkServer"):SetIsPlayerAuthenticationRequired(true) end)
settings().Diagnostics.LuaRamLimit = 0
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")
game:GetService("Players").PlayerAdded:connect(function(player)
print("Player " .. player.userId .. " added")
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
if assetGameUrl and access and placeId and player and player.userId then
local didTeleportIn = "False"
if player.TeleportedIn then didTeleportIn = "True" 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 --
-- 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>';