-- Separate local custom-game benchmark. Loopback-only capture; no account data.
local function encode(v)
 if type(v)=='number' then return tostring(v) end
 if type(v)=='boolean' then return tostring(v) end
 if type(v)=='string' then return '"'..v:gsub('\\','\\\\'):gsub('"','\\"'):gsub('\n','\\n')..'"' end
 if type(v)=='table' then local list={}; for k,x in pairs(v) do list[#list+1]=encode(tostring(k))..':'..encode(x) end; return '{'..table.concat(list,',')..'}' end
 return 'null'
end
local function read(unit,method,...)
 local args={...};local count=select('#',...);local ok,result=pcall(function() return unit[method](unit,unpack(args,1,count)) end)
 return ok and result or nil
end
local function publish(row)
 local make=CreateHTTPRequestScriptVM or CreateHTTPRequest
 if not make then print('DOTA_COOLDOWN_HTTP_UNAVAILABLE');return end
 local request=make('POST','http://127.0.0.1:5199/native')
 request:SetHTTPRequestRawPostBody('application/json',encode(row))
 request:Send(function(result) if result.StatusCode~=200 then print('DOTA_COOLDOWN_HTTP_ERROR '..tostring(result.StatusCode)) end end)
end
function Precache(context)
 for _,hero in ipairs({'lina','axe','sven'}) do PrecacheUnitByNameSync('npc_dota_hero_'..hero,context) end
end
function Activate()
 GameRules:SetHeroSelectionTime(0);GameRules:SetStrategyTime(0);GameRules:SetShowcaseTime(0);GameRules:SetPreGameTime(0);GameRules:GetGameModeEntity():SetCustomGameForceHero('npc_dota_hero_axe')
 print('DOTA_COOLDOWN_BENCH_START')
 local mode=GameRules:GetGameModeEntity();local queue={}
 for _,hero in ipairs({'lina','axe','sven'}) do
  for _,level in ipairs({1,18,25}) do queue[#queue+1]={hero=hero,level=level} end
  for _,item in ipairs({'item_octarine_core','item_ultimate_scepter','item_power_treads','item_black_king_bar','item_blade_mail'}) do queue[#queue+1]={hero=hero,level=18,item=item} end
 end
 local current=nil;local unit=nil;local phase=0
 mode:SetContextThink('dotacooldown_measure',function()
  if phase==0 then
   if GameRules:State_Get()<DOTA_GAMERULES_STATE_PRE_GAME then return 1 end
   current=table.remove(queue,1);if not current then print('DOTA_COOLDOWN_BENCH_DONE');StartSpellBenchmarks();return nil end
   unit=CreateUnitByName('npc_dota_hero_'..current.hero,Vector(0,0,0),true,nil,nil,DOTA_TEAM_GOODGUYS)
   for i=2,current.level do unit:HeroLevelUp(false) end
   local attr=unit:FindAbilityByName('special_bonus_attributes');if attr then attr:SetLevel(0);unit:RemoveModifierByName('modifier_special_bonus_attributes');unit:CalculateStatBonus(true) end
   if current.item then unit:AddItemByName(current.item) end
   phase=1;return 1
  end
  local row={hero=current.hero,level=unit:GetLevel(),attributePoints=unit:FindAbilityByName('special_bonus_attributes'):GetLevel(),item=current.item or '',source='native_dota2_custom_game',strength=read(unit,'GetStrength'),agility=read(unit,'GetAgility'),intelligence=read(unit,'GetIntellect',false),maxHp=read(unit,'GetMaxHealth'),maxMana=read(unit,'GetMaxMana'),armor=read(unit,'GetPhysicalArmorValue',false),magicResistance=read(unit,'Script_GetMagicalArmorValue',nil),damage=read(unit,'GetAverageTrueAttackDamage',unit),attackInterval=read(unit,'GetSecondsPerAttack',false),attackPoint=read(unit,'GetAttackAnimationPoint'),abilities={}}
  for i=0,23 do local a=unit:GetAbilityByIndex(i);if a then row.abilities[a:GetAbilityName()]={castPoint=read(a,'GetCastPoint'),backswing=read(a,'GetBackswingTime'),cooldown1=read(a,'GetCooldown',0),mana1=read(a,'GetManaCost',0),level=read(a,'GetLevel')} end end
  print('DOTA_COOLDOWN_BENCH_JSON '..encode(row));publish(row);UTIL_Remove(unit);unit=nil;phase=0;return .5
 end,2)
end

LinkLuaModifier('modifier_dotacooldown_bench','addon_game_mode',LUA_MODIFIER_MOTION_NONE)
modifier_dotacooldown_bench=class({})
function modifier_dotacooldown_bench:IsHidden() return true end
function modifier_dotacooldown_bench:IsPurgable() return false end
function modifier_dotacooldown_bench:OnCreated() if IsServer() then self.hp=self:GetParent():GetHealthRegen();self.mp=self:GetParent():GetManaRegen() end end
function modifier_dotacooldown_bench:DeclareFunctions() return {MODIFIER_PROPERTY_HEALTH_REGEN_CONSTANT,MODIFIER_PROPERTY_MANA_REGEN_CONSTANT,MODIFIER_EVENT_ON_TAKEDAMAGE,MODIFIER_EVENT_ON_ABILITY_START,MODIFIER_EVENT_ON_ABILITY_EXECUTED} end
function modifier_dotacooldown_bench:OnAbilityStart(e) if IsServer() and e.unit==DC_CASTER then DC_CASTSTART=Time() end end
function modifier_dotacooldown_bench:OnAbilityExecuted(e) if IsServer() and e.unit==DC_CASTER then DC_CASTRELEASE=Time() end end
function modifier_dotacooldown_bench:OnTakeDamage(e)
 if IsServer() and self:GetParent()==DC_CASTER and e.attacker==DC_CASTER and e.unit==DC_TARGET then
  local key=e.inflictor and e.inflictor:GetAbilityName() or 'attack';DC_HITS[key]=(DC_HITS[key] or 0)+e.damage
 end
end
function modifier_dotacooldown_bench:GetModifierConstantHealthRegen() return -(self.hp or 0) end
function modifier_dotacooldown_bench:GetModifierConstantManaRegen() return -(self.mp or 0) end
function modifier_dotacooldown_bench:CheckState() return {[MODIFIER_STATE_DISARMED]=true,[MODIFIER_STATE_ROOTED]=true} end
function StartSpellBenchmarks()
 local cases={
  {hero='lina',ability='lina_dragon_slave',rank=4,point=true,seconds=5.5},
  {hero='lina',ability='lina_light_strike_array',rank=4,point=true,seconds=6},
  {hero='lina',ability='lina_laguna_blade',rank=3,seconds=6},
  {hero='lina',ability='lina_flame_cloak',rank=1,item='item_ultimate_scepter',self=true,seconds=1},
  {hero='axe',ability='axe_battle_hunger',rank=4,seconds=13},
  {hero='axe',ability='axe_berserkers_call',rank=4,self=true,seconds=1},
  {hero='axe',ability='axe_culling_blade',rank=3,seconds=1.5},
  {hero='axe',ability='axe_counter_helix',rank=4,passive=true,seconds=3},
  {hero='sven',ability='sven_storm_bolt',rank=4,seconds=2.5},
  {hero='sven',ability='sven_warcry',rank=4,self=true,seconds=1},
  {hero='sven',ability='sven_gods_strength',rank=3,self=true,seconds=1.5}
 }
 local current=nil;local caster=nil;local target=nil;local spell=nil;local elapsed=0;local beforeHp=0;local beforeMana=0;local phase=0;local attacks=0;local release=nil;local started=0
 GameRules:GetGameModeEntity():SetContextThink('dotacooldown_spells',function()
  if phase==0 then
   current=table.remove(cases,1);if not current then publish({kind='done'});print('DOTA_COOLDOWN_ALL_DONE');return nil end
   caster=CreateUnitByName('npc_dota_hero_'..current.hero,Vector(0,0,256),true,nil,nil,DOTA_TEAM_GOODGUYS)
   target=CreateUnitByName('npc_dota_hero_sven',Vector(100,0,256),true,nil,nil,DOTA_TEAM_BADGUYS)
   for i=2,18 do caster:HeroLevelUp(false);target:HeroLevelUp(false) end
   for _,u in ipairs({caster,target}) do local attr=u:FindAbilityByName('special_bonus_attributes');if attr then attr:SetLevel(0);u:RemoveModifierByName('modifier_special_bonus_attributes');u:CalculateStatBonus(true) end end
   for _,u in ipairs({caster,target}) do u:SetIdleAcquire(false);u:SetAcquisitionRange(0);u:AddNewModifier(u,nil,'modifier_dotacooldown_bench',{}) end
   if current.item then caster:AddItemByName(current.item) end
   spell=caster:FindAbilityByName(current.ability);spell:SetLevel(current.rank)
   if current.hero=='lina' then caster:FindAbilityByName('lina_fiery_soul'):SetLevel(4) end
   elapsed=0;attacks=0;release=nil;phase=1;return 1
  elseif phase==1 then
   beforeHp=target:GetHealth();beforeMana=caster:GetMana();started=Time();phase=2;DC_CASTER=caster;DC_TARGET=target;DC_HITS={};DC_CASTSTART=nil;DC_CASTRELEASE=nil
   if not current.passive then
    local order={UnitIndex=caster:entindex(),AbilityIndex=spell:entindex(),Queue=false}
    if current.self then order.OrderType=DOTA_UNIT_ORDER_CAST_NO_TARGET elseif current.point then order.OrderType=DOTA_UNIT_ORDER_CAST_POSITION;order.Position=target:GetAbsOrigin() else order.OrderType=DOTA_UNIT_ORDER_CAST_TARGET;order.TargetIndex=target:entindex() end
    ExecuteOrderFromTable(order)
   end
   return .02
  end
  elapsed=Time()-started
  if spell:IsInAbilityPhase() and not DC_CASTSTART then DC_CASTSTART=Time() end
  if not release and spell:GetCooldownTimeRemaining()>0 then release=elapsed;DC_CASTRELEASE=Time() end
  if current.passive and attacks<4 and elapsed>=(attacks+1)*.4 then
   target:RemoveModifierByName('modifier_dotacooldown_bench');target:PerformAttack(caster,true,true,true,false,false,false,true);target:AddNewModifier(target,nil,'modifier_dotacooldown_bench',{});attacks=attacks+1
  end
  if elapsed<current.seconds then return .02 end
  local damage=0;for key,value in pairs(DC_HITS) do if key~='attack' then damage=damage+value end end
  local row={kind='spell',hero=current.hero,level=18,item=current.item or '',ability=current.ability,rank=current.rank,target='sven',targetLevel=18,damage=damage,hpDifference=beforeHp-target:GetHealth(),damageByAbility=DC_HITS,manaSpent=beforeMana-caster:GetMana(),releaseTime=release,seconds=elapsed,targetMagicResistance=read(target,'Script_GetMagicalArmorValue',nil),targetArmor=read(target,'GetPhysicalArmorValue',false),casterArmor=read(caster,'GetPhysicalArmorValue',false),casterStrength=read(caster,'GetStrength'),casterDamage=read(caster,'GetAverageTrueAttackDamage',target),casterAttackInterval=read(caster,'GetSecondsPerAttack',false),source='native_dota2_workshop'}
  row.castPoint=read(spell,'GetCastPoint');row.castPhase=DC_CASTSTART and DC_CASTRELEASE and DC_CASTRELEASE-DC_CASTSTART or row.castPoint==0 and 0 or nil
  print('DOTA_COOLDOWN_SPELL_JSON '..encode(row));publish(row);UTIL_Remove(caster);UTIL_Remove(target);phase=0;return .5
 end,1)
end