diff options
Diffstat (limited to 'tests/simple_grid3d')
| -rw-r--r-- | tests/simple_grid3d/sim.c | 142 | ||||
| -rw-r--r-- | tests/simple_grid3d/source.mk | 18 | ||||
| -rw-r--r-- | tests/simple_grid3d/test.c | 61 |
3 files changed, 221 insertions, 0 deletions
diff --git a/tests/simple_grid3d/sim.c b/tests/simple_grid3d/sim.c new file mode 100644 index 0000000..6df29dd --- /dev/null +++ b/tests/simple_grid3d/sim.c @@ -0,0 +1,142 @@ +#include <assert.h> + +#include <gran/root.h> +#include <gran/mem/simple_mem.h> +#include <gran/bus/simple_bus.h> +#include <gran/uart/simple_uart.h> +#include <gran/grid/node3d.h> +#include <gran/cpu/riscv/simple_riscv64.h> + +#include "../build/tests/simple_grid3d/test.inc" + +static size_t idx_1d(int x, int y, int z, uint8_t xw, uint8_t yw, uint8_t zw) +{ + (void)xw; /* maybe unused */ + assert(0 <= x && x < xw); + assert(0 <= y && y < yw); + assert(0 <= z && z < zw); + return (x * yw * zw) + (y * zw) + z; +} + +static struct component *grid_at(struct component **grid, + int x, int y, int z, + uint8_t xw, uint8_t yw, uint8_t zw) +{ + if (x < 0) + return NULL; + + if (y < 0) + return NULL; + + if (z < 0) + return NULL; + + if (x >= xw) + return NULL; + + if (y >= yw) + return NULL; + + if (z >= zw) + return NULL; + + return grid[idx_1d(x, y, z, xw, yw, zw)]; +} + +static void connect_grid3d(struct component **grid, struct component *c, + uint8_t x, uint8_t y, uint8_t z, + uint8_t xw, uint8_t yw, uint8_t zw) +{ + grid_node3d_connect(grid_at(grid, x, y, z, xw, yw, zw), + grid_at(grid, x , y+1, z , xw, yw, zw), + grid_at(grid, x , y-1, z , xw, yw, zw), + grid_at(grid, x-1, y , z , xw, yw, zw), + grid_at(grid, x+1, y , z , xw, yw, zw), + grid_at(grid, x , y , z+1, xw, yw, zw), + grid_at(grid, x , y , z-1, xw, yw, zw), + c); +} + +static stat build_torus3d(struct clock_domain *clk, uint8_t x, uint8_t y, uint8_t z) +{ + struct component **grid = calloc(x * y * z, sizeof(struct component *)); + assert(grid); + + struct component **pes = calloc(x * y * z, sizeof(struct component *)); + assert(pes); + + for (size_t i = 0; i < x; ++i) + for (size_t j = 0; j < y; ++j) + for (size_t k = 0; k < z; ++k) { + struct component *node = create_grid_node3d(i, j, k); + clock_domain_add(clk, node); + grid[idx_1d(i, j, k, x, y, z)] = node; + + if (i == 0 && j == 0 && k == 0) + continue; + + if (i == 0 && j == 0 && k == 1) + continue; + + struct component *imem = create_simple_mem(4096); + init_simple_mem(imem, 0, + build_tests_simple_grid3d_test_bin_len, + build_tests_simple_grid3d_test_bin); + + uint64_t rcv = grid3d_addr(i, j, k, 0); + struct component *rv64 = create_simple_riscv64(rcv, 0, imem, node); + simple_riscv64_set_reg(rv64, 10, i); /* a0 */ + simple_riscv64_set_reg(rv64, 11, j); /* a1 */ + simple_riscv64_set_reg(rv64, 12, k); /* a2 */ + simple_riscv64_set_reg(rv64, 13, x); /* a3 */ + simple_riscv64_set_reg(rv64, 14, y); /* a4 */ + simple_riscv64_set_reg(rv64, 15, z); /* a5 */ + + clock_domain_add(clk, rv64); + clock_domain_add(clk, imem); + + pes[idx_1d(i, j, k, x, y, z)] = rv64; + } + + struct component *uart = create_simple_uart(); + clock_domain_add(clk, uart); + connect_grid3d(grid, uart, 0, 0, 0, x, y, z); + + struct component *dmem = create_simple_mem(4096); + clock_domain_add(clk, dmem); + connect_grid3d(grid, dmem, 0, 0, 1, x, y, z); + + for (int i = 0; i < x; ++i) + for (int j = 0; j < y; ++j) + for (int k = 0; k < z; ++k) { + if (i == 0 && j == 0 && k == 0) + continue; + + if (i == 0 && j == 0 && k == 1) + continue; + + connect_grid3d(grid, + pes[idx_1d(i, j, k, x, y, z)], + i, j, k, x, y, z); + } + + free(grid); + free(pes); + return OK; +} + +int main() +{ + struct clock_domain *clk = create_clock_domain(NS(1)); + + stat r = build_torus3d(clk, 4, 4, 4); + assert(r == OK); + + struct gran_root *root = create_root(); + root_add_clock(root, clk); + + r = root_run(root); + assert(r == OK); + + destroy_root(root); +} diff --git a/tests/simple_grid3d/source.mk b/tests/simple_grid3d/source.mk new file mode 100644 index 0000000..4c19568 --- /dev/null +++ b/tests/simple_grid3d/source.mk @@ -0,0 +1,18 @@ +GRID3D_TEST_OBJ != ./scripts/gen-deps --sources "tests/simple_grid3d/sim.c" +TEST_PROGS += build/tests/simple_grid3d/sim + +build/tests/simple_grid3d/test.inc: tests/simple_grid3d/test.c + riscv64-unknown-elf-gcc -O2 -Wall -Wextra -ffreestanding -nostdlib \ + -march=rv64i -mabi=lp64 \ + -o build/tests/simple_grid3d/test \ + tests/simple_grid3d/test.c + riscv64-unknown-elf-objcopy -Obinary \ + build/tests/simple_grid3d/test \ + build/tests/simple_grid3d/test.bin + xxd -i build/tests/simple_grid3d/test.bin \ + > build/tests/simple_grid3d/test.inc + +build/tests/simple_grid3d/sim.o: build/tests/simple_grid3d/test.inc + +build/tests/simple_grid3d/sim: $(GRID3D_TEST_OBJ) $(OBJS) + $(COMPILE) $(GRID3D_TEST_OBJ) $(OBJS) -o $@ diff --git a/tests/simple_grid3d/test.c b/tests/simple_grid3d/test.c new file mode 100644 index 0000000..2953d41 --- /dev/null +++ b/tests/simple_grid3d/test.c @@ -0,0 +1,61 @@ +__attribute__((always_inline)) +static inline void print_int8(volatile char *uart, unsigned x) +{ + *uart = ((x >> 4) & 0xf) + '0'; + *uart = ((x >> 0) & 0xf) + '0'; +} + +__attribute__((always_inline)) +static inline void print_addr(volatile char *uart, unsigned x, unsigned y, unsigned z) +{ + *uart = '('; + print_int8(uart, x); + *uart = ','; + *uart = ' '; + print_int8(uart, y); + *uart = ','; + *uart = ' '; + print_int8(uart, z); + *uart = ')'; + *uart = '\n'; +} + +__attribute__((always_inline)) +static inline unsigned wrap(unsigned x, unsigned X) +{ + return x + 1 >= X ? 0 : x + 1; +} + +__attribute__((always_inline)) +static inline unsigned next_idx(unsigned x, unsigned y, unsigned z, unsigned X, unsigned Y, unsigned Z) +{ + unsigned zi = wrap(z, Z); + unsigned yi = zi < z ? wrap(y, Y) : y; + unsigned xi = yi < y ? wrap(x, X) : x; + + return (xi << 16) | (yi << 8) | zi; +} + +void _start(unsigned x, unsigned y, unsigned z, unsigned X, unsigned Y, unsigned Z) +{ + volatile char *uart = (char *)4096; + /* x = 1ULL << 32, y = 1ULL << 40, z = 1ULL << 48 I guess */ + volatile unsigned *control = (unsigned *)(1ULL << 48); + + + if (x == 0 && y == 0 && z == 2) { + goto do_work; + } else { + while (*control != ((x << 16) | (y << 8) | z)) {} + } + +do_work: + print_addr(uart, x, y, z); + *control = next_idx(x, y, z, X, Y, Z); + + if (x == X - 1 && y == Y - 1 && z == Z - 1) + asm("ebreak"); + + /* otherwise just loop */ + while (1) {} +} |
