1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
|
/*
* nanowasm, a tiny WebAssembly/Wasm interpreter
* Copyright (C) 2023-2024 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 <nw/log.h>
#include <nw/ops.h>
#include <nanowasm/nw.h>
#include <nw/types.h>
#include <nw/interp.h>
#include <stdint.h>
#include <stddef.h>
#include <stdio.h>
static int store(struct nw_interp *const i, const varuint32 flags,
const varuint32 offset)
{
enum {ALIGN = 2};
if (flags != ALIGN)
{
LOG("%s: expected 32-bit alignment (%d), got %lu\n",
__func__, ALIGN, (unsigned long)flags);
i->exception = "unaligned access";
return -1;
}
int32_t value, addr;
if (interp_stack_pop(i, &value, sizeof value))
{
LOG("%s: inter_stack_pop value failed\n", __func__);
return -1;
}
else if (interp_stack_pop(i, &addr, sizeof addr))
{
LOG("%s: inter_stack_pop addr failed\n", __func__);
return -1;
}
else if (offset > SIZE_MAX - addr)
{
static const char exc[] = "offset address overflow";
LOG("%s: %s\n", __func__, exc);
i->exception = exc;
return -1;
}
const int32_t value_le = htoni32(value);
if (interp_heap_store(i, offset + addr, &value_le, sizeof value_le))
{
LOG("%s: interp_heap_store failed\n", __func__);
return -1;
}
return 0;
#if 0
stack_i -= sizeof addr;
if (max < addr || offset >= max - addr)
{
LOG("%s: heap overflow\n", __func__);
i->exception = "heap overflow";
return -1;
}
const size_t raddr = offset + addr;
if (raddr % sizeof addr)
{
LOG("%s: unaligned memory address\n", __func__);
i->exception = "unaligned access";
return -1;
}
else if (stack_i < sizeof (uint32_t))
{
LOG("%s: stack underflow (value)\n", __func__);
i->exception = "stack underflow";
return -1;
}
const int32_t value = htoni32(*stackptr);
void *dst = &((char *)i->cfg.heap.buf)[raddr];
*(int32_t *)dst = value;
stack_i -= sizeof addr;
i->stack_i = stack_i;
return 0;
#endif
}
static int op(struct nw_interp *const i, FILE *const f)
{
varuint32 flags, offset;
if (varuint32_read(f, &flags))
{
LOG("%s: varint32_read flags failed\n", __func__);
return -1;
}
else if (varuint32_read(f, &offset))
{
LOG("%s: varint32_read offset failed\n", __func__);
return -1;
}
else if (i && store(i, flags, offset))
{
LOG("%s: store failed\n", __func__);
return -1;
}
return 0;
}
int op_i32_store(struct nw_interp *const i)
{
return op(i, i->f);
}
int check_i32_store(FILE *const f)
{
return op(NULL, f);
}
|
