/*
 * nanowasm, a tiny WebAssembly/Wasm interpreter
 * Copyright (C) 2023-2025  Xavier Del Campo Romero
 *
 * This Source Code Form is subject to the terms of the Mozilla Public
 * License, v. 2.0. If a copy of the MPL was not distributed with this
 * file, You can obtain one at https://mozilla.org/MPL/2.0/.
 */

#include <nanowasm/nw.h>
#include <nanowasm/dbg.h>
#include <nw/linear.h>
#include <nw/types.h>

static enum nw_state load_mem(struct nw_interp *const i)
{
    struct nw_dbg *const d = i->args;
    struct nw_dbg_sm_mem_load *const pm = &d->sm.mem_load;
    const enum nw_state n = nwp_linear_load(i, &pm->io, pm->offset);

    if (n)
        return n;

    i->next = pm->inext;
    return NW_AGAIN;
}

void nw_dbg_mem_load(struct nw_dbg *const d, const enum nw_type t,
    const unsigned long offset)
{
    const struct nw_dbg_sm_mem_load ml = {0};
    struct nw_dbg_sm_mem_load *const pm = &d->sm.mem_load;
    struct nw_sm_io *const io = &pm->io;
    struct nw_interp *const i = &d->cfg.inst->interp;
    struct nw_dbg_value *const v = &d->v;
    size_t sz;

    nwp_type_sz(t, &sz);
    *pm = ml;
    pm->inext = i->next;
    pm->offset = offset;
    v->type = t;
    io->buf = &v->value;
    io->n = sz;
    i->args = d;
    i->next = load_mem;
}