mirror of
https://github.com/nunuhara/xsystem4.git
synced 2026-10-11 08:48:16 +03:00
Nunuhara Cabbage
fd57ca7845
Array rank can't be inferred from JSON data since arrays and structs are indistinguishable. So we get it from the ain file instead. Sengoku Rance is mostly playable as of this commit.
106 lines
3.5 KiB
C
106 lines
3.5 KiB
C
/* Copyright (C) 2019 Nunuhara Cabbage <nunuhara@haniwa.technology>
|
|
*
|
|
* This program is free software; you can redistribute it and/or modify
|
|
* it under the terms of the GNU General Public License as published by
|
|
* the Free Software Foundation; either version 2 of the License, or
|
|
* (at your option) any later version.
|
|
*
|
|
* This program is distributed in the hope that it will be useful,
|
|
* but WITHOUT ANY WARRANTY; without even the implied warranty of
|
|
* MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
|
|
* GNU General Public License for more details.
|
|
*
|
|
* You should have received a copy of the GNU General Public License
|
|
* along with this program; if not, see <http://gnu.org/licenses/>.
|
|
*/
|
|
|
|
#ifndef SYSTEM4_PAGE_H
|
|
#define SYSTEM4_PAGE_H
|
|
|
|
#include <stdbool.h>
|
|
#include <stdint.h>
|
|
#include "vm.h"
|
|
#include "ain.h"
|
|
|
|
struct ain_variable;
|
|
enum ain_data_type;
|
|
|
|
enum page_type {
|
|
GLOBAL_PAGE,
|
|
LOCAL_PAGE,
|
|
STRUCT_PAGE,
|
|
ARRAY_PAGE
|
|
};
|
|
|
|
#define NR_PAGE_TYPES (ARRAY_PAGE+1)
|
|
|
|
/*
|
|
* A page is an ordered collection of variables. Pages are used to implement
|
|
* global and local variables, structures and arrays as follows,
|
|
*
|
|
* Global variables: all global variables are stored in a single global page.
|
|
*
|
|
* Local variables: each function invocation is backed by a page storing its
|
|
* local variables.
|
|
*
|
|
* Structures: each struct object is backed by a page storing its members.
|
|
*
|
|
* Arrays: each array object is backed by a page storing its members.
|
|
* Multi-dimensional arrays are implemented as a tree of pages (meaning the
|
|
* whole array is NOT contiguous in memory).
|
|
*/
|
|
struct page {
|
|
enum page_type type;
|
|
union {
|
|
int index;
|
|
enum ain_data_type a_type;
|
|
};
|
|
int struct_type; // for array pages
|
|
int rank; // for array pages
|
|
int nr_vars;
|
|
union vm_value values[];
|
|
};
|
|
|
|
static inline union vm_value page_get(int pageno, int varno)
|
|
{
|
|
return heap[pageno].page->values[varno];
|
|
}
|
|
|
|
static inline void page_set(int pageno, int varno, union vm_value v)
|
|
{
|
|
heap[pageno].page->values[varno] = v;
|
|
}
|
|
|
|
// variables
|
|
union vm_value variable_initval(enum ain_data_type type);
|
|
void variable_fini(union vm_value v, enum ain_data_type type);
|
|
enum ain_data_type variable_type(struct page *page, int varno, int *struct_type, int *array_rank);
|
|
|
|
// pages
|
|
struct page *alloc_page(enum page_type type, int type_index, int nr_vars);
|
|
void free_page(struct page *page);
|
|
struct page *copy_page(struct page *page);
|
|
void delete_page(struct page *page);
|
|
|
|
// structs
|
|
int alloc_struct(int no);
|
|
void init_struct(int no, int slot);
|
|
void create_struct(int no, union vm_value *var);
|
|
|
|
// arrays
|
|
enum ain_data_type array_type(enum ain_data_type type);
|
|
struct page *alloc_array(int rank, union vm_value *dimensions, enum ain_data_type data_type, int struct_type, bool init_structs);
|
|
struct page *realloc_array(struct page *src, int rank, union vm_value *dimensions, enum ain_data_type data_type, int struct_type, bool init_structs);
|
|
int array_numof(struct page *page, int rank);
|
|
void array_copy(struct page *dst, int dst_i, struct page *src, int src_i, int n);
|
|
int array_fill(struct page *dst, int dst_i, int n, union vm_value v);
|
|
void array_pushback(struct page **dst, union vm_value v, enum ain_data_type data_type, int struct_type);
|
|
void array_popback(struct page **dst);
|
|
bool array_erase(struct page **page, int i);
|
|
void array_insert(struct page **_page, int i, union vm_value v, enum ain_data_type data_type, int struct_type);
|
|
void array_sort(struct page *page, int compare_fno);
|
|
int array_find(struct page *page, int start, int end, union vm_value v, int compare_fno);
|
|
void array_reverse(struct page *page);
|
|
|
|
#endif /* SYSTEM4_PAGE_H */
|