#include "game_types.h"

/* Coroutine threader (3-arg SweepTest shape): threads a[] = {b, BE0 -> B80,
   c}, chains GetStackFrame -> FreeObject3(a) -> Pop/Push -> FreeObject3(a) ->
   Pop/Push. Returns nothing (leftover). Resume PCs differ per member. */
/* Object_InitTwo @ 0x08017148 (real 316B) -- two-object init threading (a, c). Mirrors src/matched/Object_InitTwo.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_InitTwo(int *a, int b, int c)
{
    int *fr = Mem_GetStackFrame();
    Frame blk;
    a[1] = 0x02000BE0;
    a[0] = b;
    /* block 0, resumes at 0x08017194 */
    blk.link = fr[1];
    blk.zero = 0;
    blk.self = (int *)&blk;
    blk.resume = 0x08017194;
    blk.sp = (int *)&blk;
    fr[1] = (int)&blk;
    a[1] = 0x02000B98;
    fr[1] = *(int *)fr[1];
    /* block 1, resumes at 0x080171CC (sp variant in this family) */
    blk.link = fr[1];
    blk.zero = 0;
    blk.self = (int *)&blk;
    blk.resume = 0x080171CC;
    blk.sp = (int *)&blk;
    fr[1] = (int)&blk + 24;
    Mem_FreeObject3((int)a, 0);
    fr[1] = *(int *)fr[1];
    Mem_PopStack();
    Mem_PushStack();
    /* block 2, resumes at 0x08017210 */
    blk.link = fr[1];
    blk.zero = 0;
    blk.self = (int *)&blk;
    blk.resume = 0x08017210;
    blk.sp = (int *)&blk;
    fr[1] = (int)&blk + 48;
    a[1] = 0x02000B80;
    a[2] = c;
    fr[1] = *(int *)fr[1];
    /* block 3, resumes at 0x08017258 */
    blk.link = fr[1];
    blk.zero = 0;
    blk.self = (int *)&blk;
    blk.resume = 0x08017258;
    blk.sp = (int *)&blk;
    fr[1] = (int)&blk + 72;
    Mem_FreeObject3((int)a, 0);
    fr[1] = *(int *)fr[1];
    Mem_PopStack();
    Mem_PushStack();
}