#include "game_types.h"

/* Object_Copy3 @ 0x08017354 (real 164B) -- coroutine copy with resume-PC pools (clone family). Mirrors src/matched/Object_Copy3.c. */
/* Coroutine-style copy: stores the opcode word 0x02000B38 then 0x02000BB0 into
   p[0] across passes, with the resume-PC pool words (self addresses 0x08017394 /
   0x080173CC) doubling as code after the bl returns. Chains GetStackFrame ->
   PopStack -> PushStack. Siblings differ only in pools. Returns p. */
extern int *Mem_GetStackFrame(void);
extern void Mem_PopStack(void);
extern void Mem_PushStack(void);

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

int *Object_Copy3(int *p)
{
    int *fr = Mem_GetStackFrame();
    Frame blk;
    p[0] = 0x02000B38;
    /* block 0, resumes at 0x08017394 */
    blk.link = fr[1];
    blk.zero = 0;
    blk.self = (int *)&blk;
    blk.resume = 0x08017394;
    blk.sp = (int *)&blk;
    fr[1] = (int)&blk;
    p[0] = 0x02000BB0;
    fr[1] = *(int *)fr[1];
    /* block 1, resumes at 0x080173CC */
    blk.link = fr[1];
    blk.zero = 0;
    blk.self = (int *)&blk;
    blk.resume = 0x080173CC;
    blk.sp = (int *)&blk;
    fr[1] = (int)&blk + 24;
    p[0] = 0x02000B38;
    fr[1] = *(int *)fr[1];
    Mem_PopStack();
    Mem_PushStack();
    return p;
}