#include "game_types.h"

/* Coroutine dispatcher, short skeleton (HandleType shape, 4 args): like
   Collision_InitResult but the exit block also stores d (r8-spilled 4th arg)
   at x[3]. Block live-ins on the first pass are (a, fr). */
/* Collision_InitResultFlags @ 0x080179A4 (real 320B) -- init-result threading (b, c, d). Mirrors src/matched/Collision_InitResultFlags.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 Collision_InitResultFlags(int *a, int *b, int c, int d)
{
    int *fr = Mem_GetStackFrame();
    Frame blk;
    int *fr2;
    int *x = a, *y = fr; /* block-3 live-ins on the first pass */
    (void)b;
    /* block 0, resumes at 0x080179DC */
    blk.link = fr[1];
    blk.zero = 0;
    blk.self = (int *)&blk;
    blk.resume = 0x080179DC;
    blk.sp = (int *)&blk;
    fr[1] = (int)&blk;
    fr[1] = *(int *)fr[1];
    /* block 1 (second frame), resumes at 0x08017A0C */
    fr2 = Mem_GetStackFrame_08015DC8();
    blk.link = fr[1];
    blk.zero = 0;
    blk.self = (int *)&blk;
    blk.resume = 0x08017A0C;
    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 0x08017A38 */
    blk.link = fr[1];
    blk.zero = 0;
    blk.self = (int *)&blk;
    blk.resume = 0x08017A38;
    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: data word + b through (x, y), resumes at 0x08017A84 */
    x[1] = 0x02000BE0;
    x[0] = (int)b;
    blk.link = fr[1];
    blk.zero = 0;
    blk.self = (int *)&blk;
    blk.resume = 0x08017A84;
    blk.sp = (int *)&blk;
    y[1] = (int)&blk;
    /* Ldo5: store (c, d) pair and exit */
    x[1] = 0x02000C40;
    x[2] = d;
    x[3] = c;
    fr[1] = *(int *)fr[1];
    /* resume-only tail, resumes at 0x08017ABC: frees x, then exits */
    blk.link = fr[1];
    blk.zero = 0;
    blk.self = (int *)&blk;
    blk.resume = 0x08017ABC;
    blk.sp = (int *)&blk;
    fr[1] = (int)&blk + 24;
    Mem_FreeObject3((int)x, 0);
    fr[1] = *(int *)fr[1];
    Mem_PopStack();
    Mem_PushStack();
}