#include "game_types.h"

/* Coroutine-dispatch family (CircleAABB + InitSingle x4): identical shape,
   pools differ per member. Fragments bracketed by resume PCs chain:
   GetStackFrame -> GetStackFrame_08015DC8 -> Collision_Resolve ->
   Mem_Swap (+Pop/PushStack) -> second-half setup -> resume-only
   FreeObject3 tail (+Pop/PushStack). The scheduler resumes fragments with
   live registers (mov sp / mov pc tails); the C below follows the first
   pass, whose block-3 live-ins are (a, fr). */
/* Object_InitSingle3 @ 0x08017D44 (real 302B) -- single-object init (clone 3). Mirrors src/matched/Object_InitSingle3.c. */
extern int *Mem_GetStackFrame(void);
extern int *Mem_GetStackFrame_08015DC8(void);
extern int Collision_Resolve(int *a, int b);
extern void Mem_Swap(int *a, int *b);
extern void Mem_PopStack(void);
extern void Mem_PushStack(void);
extern void Mem_FreeObject3(int a, int b);

typedef struct {
    int link;
    int zero;
    int *self;
    int resume;
    int *sp;
} Frame;

void Object_InitSingle3(int *a, int *b)
{
    int *fr = Mem_GetStackFrame();
    Frame blk;
    int *fr2;
    int *x = a, *y = fr; /* block-3 live-ins on the first pass */
    /* block 0, resumes at 0x08017D78 */
    blk.link = fr[1];
    blk.zero = 0;
    blk.self = (int *)&blk;
    blk.resume = 0x08017D78;
    blk.sp = (int *)&blk;
    fr[1] = (int)&blk;
    fr[1] = *(int *)fr[1];
    /* block 1 (second frame), resumes at 0x08017DA8 */
    fr2 = Mem_GetStackFrame_08015DC8();
    blk.link = fr[1];
    blk.zero = 0;
    blk.self = (int *)&blk;
    blk.resume = 0x08017DA8;
    blk.sp = (int *)&blk;
    fr[1] = (int)&blk + 24;
    {
        int slot[6];
        slot[0] = (int)&blk + 48;
        Collision_Resolve(slot, 0);
    }
    /* block 2, resumes at 0x08017DD4 */
    blk.link = fr[1];
    blk.zero = 0;
    blk.self = (int *)&blk;
    blk.resume = 0x08017DD4;
    blk.sp = (int *)&blk;
    fr[1] = (int)&blk + 48;
    Mem_Swap(fr2, fr + 1);
    fr[1] = *(int *)fr[1];
    Mem_PopStack();
    Mem_PushStack();
    if (a == 0)
        return;
    /* block 3: store the data word and b through (x, y), relink the frame
       block, resumes at 0x08017E1C */
    x[1] = 0x02000BE0;
    x[0] = (int)b;
    blk.link = fr[1];
    blk.zero = 0;
    blk.self = (int *)&blk;
    blk.resume = 0x08017E1C;
    blk.sp = (int *)&blk;
    y[1] = (int)&blk;
    fr2[1] = 0x02000C00; /* Lp5 data word into the second frame */
    fr[1] = *(int *)fr[1];
    /* resume-only tail, resumes at 0x08017E4C: frees x through the +24 slot */
    blk.link = fr[1];
    blk.zero = 0;
    blk.self = (int *)&blk;
    blk.resume = 0x08017E4C;
    blk.sp = (int *)&blk;
    fr[1] = (int)&blk + 24;
    Mem_FreeObject3((int)x, 0);
    fr[1] = *(int *)fr[1];
    Mem_PopStack();
    Mem_PushStack();
}