"""Fuzz a SINGLE hdcp command id many times; report if/when the TA wedges."""
import ctypes,struct,time,sys,random,collections
from tinygrad import Device
from tinygrad.runtime.autogen.am import am
from tinygrad.helpers import lo32,hi32
CMD=int(sys.argv[1],0); ROUNDS=int(sys.argv[2]) if len(sys.argv)>2 else 400
d=Device["AMD"]; adev=d.iface.dev_impl; psp=adev.psp
SZ=ctypes.sizeof(am.struct_psp_gfx_cmd_resp); P='/Users/user/dev/amd-psp-re/psp_out/'
def stat(): return int.from_bytes(bytes(adev.vram.view(psp.cmd_paddr,SZ)[:])[864:868],"little")
def alloc(n):
    pa=adev.mm.palloc(n,align=0x1000,zero=True); return pa,adev.paddr2mc(pa)
def load(cmd,blob):
    ap,amc=alloc(0x40000); cp,cmc=alloc(0x8000)
    adev.vram.view(ap,len(blob))[:]=blob; adev.gmc.flush_hdp()
    adev.vram.view(psp.cmd_paddr,SZ)[:]=b"\x00"*SZ
    c=am.struct_psp_gfx_cmd_resp(cmd_id=cmd); t=c.cmd.cmd_load_ta
    t.app_phy_addr_hi,t.app_phy_addr_lo=hi32(amc),lo32(amc); t.app_len=len(blob)
    t.cmd_buf_phy_addr_hi,t.cmd_buf_phy_addr_lo=hi32(cmc),lo32(cmc); t.cmd_buf_len=0x8000
    return psp._ring_submit(c).resp.session_id,cp
def inv(sid,shm,buf,tc):
    adev.vram.view(shm,0x8000)[:]=bytes(buf); adev.gmc.flush_hdp()
    adev.vram.view(psp.cmd_paddr,SZ)[:]=b"\x00"*SZ
    ic=am.struct_psp_gfx_cmd_resp(cmd_id=am.GFX_CMD_ID_INVOKE_CMD); iv=ic.cmd.cmd_invoke_cmd
    iv.session_id,iv.ta_cmd_id=sid,tc
    t0=time.time()
    try: psp._ring_submit(ic); return 0,bytes(adev.vram.view(shm,0x40)[:]),time.time()-t0
    except RuntimeError: return stat(),None,time.time()-t0
    except TimeoutError: return "TIMEOUT",None,time.time()-t0
a,_=load(am.GFX_CMD_ID_LOAD_ASD,open(P+'asd_full.bin','rb').read())
ds,dshm=load(am.GFX_CMD_ID_LOAD_TA,open(P+'dtm_full.bin','rb').read())
hs,hshm=load(am.GFX_CMD_ID_LOAD_TA,open(P+'hdcp_full.bin','rb').read())
def topo(h):
    b=bytearray(0x8000); struct.pack_into('<I',b,0,2); struct.pack_into('<10I',b,0x10,h,1,1,0,0,0,0,0,0,0)
    return inv(ds,dshm,b,2)[0]
for h in range(8): topo(h)
rng=random.Random(0x1234+CMD)
EX=[0,1,2,3,0xffffffff,0x7fffffff,0x80000000,0xfffffffe,0xffff,0x10000,255,256,24,25,32,33,62,63,64,0x27b]
hist=collections.Counter(); trace=[]
for i in range(ROUNDS):
    b=bytearray(0x8000); struct.pack_into('<I',b,0,CMD)
    struct.pack_into('<I',b,0x0C,rng.choice([0,1,2,3,62,63,64,255,0xffffffff]))
    struct.pack_into('<I',b,0x10,rng.choice(EX)); struct.pack_into('<I',b,0x14,rng.choice(EX))
    n=rng.choice([8,32,128,512,2048])
    for k in range(0x28,0x28+n): b[k]=rng.randrange(256)
    for _ in range(6):
        off=rng.randrange(0x28,0x28+max(n-4,4))&~3
        struct.pack_into('<I',b,off,rng.choice(EX))
    ps,out,dt=inv(hs,hshm,b,CMD)
    ret=struct.unpack_from('<I',out,4)[0] if out else None
    hist[ret]+=1
    trace.append((i,ret,round(dt*1000,1),struct.unpack_from('<I',b,0x0C)[0],struct.unpack_from('<I',b,0x10)[0],struct.unpack_from('<I',b,0x14)[0]))
    if ps=="TIMEOUT" or dt>0.5:
        print("  last 12 iters (i, ta_ret, ms, slot, p10, p14):")
        for t in trace[-12:]: print("    ",t)
        print("CMD %#04x: HANG at iter %d (ps=%s dt=%.2f) sos_alive=%s"%(CMD,i,ps,dt,psp.is_sos_alive()))
        open('hang_iso_cmd%02x.bin'%CMD,'wb').write(bytes(b))
        print("  hdr:", bytes(b[:0x30]).hex()); sys.exit(7)
print("CMD %#04x: survived %d rounds  hist=%s"%(CMD,ROUNDS,dict(hist)))