initial commit
This commit is contained in:
commit
fdd1ee61b5
24 changed files with 5284 additions and 0 deletions
4128
vendor/mpc.c
vendored
Normal file
4128
vendor/mpc.c
vendored
Normal file
File diff suppressed because it is too large
Load diff
391
vendor/mpc.h
vendored
Normal file
391
vendor/mpc.h
vendored
Normal file
|
|
@ -0,0 +1,391 @@
|
|||
/*
|
||||
** mpc - Micro Parser Combinator library for C
|
||||
**
|
||||
** https://github.com/orangeduck/mpc
|
||||
**
|
||||
** Daniel Holden - contact@daniel-holden.com
|
||||
** Licensed under BSD3
|
||||
*/
|
||||
|
||||
#ifndef mpc_h
|
||||
#define mpc_h
|
||||
|
||||
#ifdef __cplusplus
|
||||
extern "C" {
|
||||
#endif
|
||||
|
||||
#include <stdlib.h>
|
||||
#include <stdio.h>
|
||||
#include <stdarg.h>
|
||||
#include <string.h>
|
||||
#include <math.h>
|
||||
#include <errno.h>
|
||||
#include <ctype.h>
|
||||
|
||||
/*
|
||||
** State Type
|
||||
*/
|
||||
|
||||
typedef struct {
|
||||
long pos;
|
||||
long row;
|
||||
long col;
|
||||
int term;
|
||||
} mpc_state_t;
|
||||
|
||||
/*
|
||||
** Error Type
|
||||
*/
|
||||
|
||||
typedef struct {
|
||||
mpc_state_t state;
|
||||
int expected_num;
|
||||
char *filename;
|
||||
char *failure;
|
||||
char **expected;
|
||||
char received;
|
||||
} mpc_err_t;
|
||||
|
||||
void mpc_err_delete(mpc_err_t *e);
|
||||
char *mpc_err_string(mpc_err_t *e);
|
||||
void mpc_err_print(mpc_err_t *e);
|
||||
void mpc_err_print_to(mpc_err_t *e, FILE *f);
|
||||
|
||||
/*
|
||||
** Parsing
|
||||
*/
|
||||
|
||||
typedef void mpc_val_t;
|
||||
|
||||
typedef union {
|
||||
mpc_err_t *error;
|
||||
mpc_val_t *output;
|
||||
} mpc_result_t;
|
||||
|
||||
struct mpc_parser_t;
|
||||
typedef struct mpc_parser_t mpc_parser_t;
|
||||
|
||||
int mpc_parse(const char *filename, const char *string, mpc_parser_t *p, mpc_result_t *r);
|
||||
int mpc_nparse(const char *filename, const char *string, size_t length, mpc_parser_t *p, mpc_result_t *r);
|
||||
int mpc_parse_file(const char *filename, FILE *file, mpc_parser_t *p, mpc_result_t *r);
|
||||
int mpc_parse_pipe(const char *filename, FILE *pipe, mpc_parser_t *p, mpc_result_t *r);
|
||||
int mpc_parse_contents(const char *filename, mpc_parser_t *p, mpc_result_t *r);
|
||||
|
||||
/*
|
||||
** Function Types
|
||||
*/
|
||||
|
||||
typedef void(*mpc_dtor_t)(mpc_val_t*);
|
||||
typedef mpc_val_t*(*mpc_ctor_t)(void);
|
||||
|
||||
typedef mpc_val_t*(*mpc_apply_t)(mpc_val_t*);
|
||||
typedef mpc_val_t*(*mpc_apply_to_t)(mpc_val_t*,void*);
|
||||
typedef mpc_val_t*(*mpc_fold_t)(int,mpc_val_t**);
|
||||
|
||||
typedef int(*mpc_check_t)(mpc_val_t**);
|
||||
typedef int(*mpc_check_with_t)(mpc_val_t**,void*);
|
||||
|
||||
/*
|
||||
** Building a Parser
|
||||
*/
|
||||
|
||||
mpc_parser_t *mpc_new(const char *name);
|
||||
mpc_parser_t *mpc_copy(mpc_parser_t *a);
|
||||
mpc_parser_t *mpc_define(mpc_parser_t *p, mpc_parser_t *a);
|
||||
mpc_parser_t *mpc_undefine(mpc_parser_t *p);
|
||||
|
||||
void mpc_delete(mpc_parser_t *p);
|
||||
void mpc_cleanup(int n, ...);
|
||||
|
||||
/*
|
||||
** Basic Parsers
|
||||
*/
|
||||
|
||||
mpc_parser_t *mpc_any(void);
|
||||
mpc_parser_t *mpc_char(char c);
|
||||
mpc_parser_t *mpc_range(char s, char e);
|
||||
mpc_parser_t *mpc_oneof(const char *s);
|
||||
mpc_parser_t *mpc_noneof(const char *s);
|
||||
mpc_parser_t *mpc_satisfy(int(*f)(char));
|
||||
mpc_parser_t *mpc_string(const char *s);
|
||||
|
||||
/*
|
||||
** Other Parsers
|
||||
*/
|
||||
|
||||
mpc_parser_t *mpc_pass(void);
|
||||
mpc_parser_t *mpc_fail(const char *m);
|
||||
mpc_parser_t *mpc_failf(const char *fmt, ...);
|
||||
mpc_parser_t *mpc_lift(mpc_ctor_t f);
|
||||
mpc_parser_t *mpc_lift_val(mpc_val_t *x);
|
||||
mpc_parser_t *mpc_anchor(int(*f)(char,char));
|
||||
mpc_parser_t *mpc_state(void);
|
||||
|
||||
/*
|
||||
** Combinator Parsers
|
||||
*/
|
||||
|
||||
mpc_parser_t *mpc_expect(mpc_parser_t *a, const char *e);
|
||||
mpc_parser_t *mpc_expectf(mpc_parser_t *a, const char *fmt, ...);
|
||||
mpc_parser_t *mpc_apply(mpc_parser_t *a, mpc_apply_t f);
|
||||
mpc_parser_t *mpc_apply_to(mpc_parser_t *a, mpc_apply_to_t f, void *x);
|
||||
mpc_parser_t *mpc_check(mpc_parser_t *a, mpc_dtor_t da, mpc_check_t f, const char *e);
|
||||
mpc_parser_t *mpc_check_with(mpc_parser_t *a, mpc_dtor_t da, mpc_check_with_t f, void *x, const char *e);
|
||||
mpc_parser_t *mpc_checkf(mpc_parser_t *a, mpc_dtor_t da, mpc_check_t f, const char *fmt, ...);
|
||||
mpc_parser_t *mpc_check_withf(mpc_parser_t *a, mpc_dtor_t da, mpc_check_with_t f, void *x, const char *fmt, ...);
|
||||
|
||||
mpc_parser_t *mpc_not(mpc_parser_t *a, mpc_dtor_t da);
|
||||
mpc_parser_t *mpc_not_lift(mpc_parser_t *a, mpc_dtor_t da, mpc_ctor_t lf);
|
||||
mpc_parser_t *mpc_maybe(mpc_parser_t *a);
|
||||
mpc_parser_t *mpc_maybe_lift(mpc_parser_t *a, mpc_ctor_t lf);
|
||||
|
||||
mpc_parser_t *mpc_many(mpc_fold_t f, mpc_parser_t *a);
|
||||
mpc_parser_t *mpc_many1(mpc_fold_t f, mpc_parser_t *a);
|
||||
mpc_parser_t *mpc_count(int n, mpc_fold_t f, mpc_parser_t *a, mpc_dtor_t da);
|
||||
|
||||
mpc_parser_t *mpc_or(int n, ...);
|
||||
mpc_parser_t *mpc_and(int n, mpc_fold_t f, ...);
|
||||
|
||||
mpc_parser_t *mpc_predictive(mpc_parser_t *a);
|
||||
|
||||
/*
|
||||
** Common Parsers
|
||||
*/
|
||||
|
||||
mpc_parser_t *mpc_eoi(void);
|
||||
mpc_parser_t *mpc_soi(void);
|
||||
|
||||
mpc_parser_t *mpc_boundary(void);
|
||||
mpc_parser_t *mpc_boundary_newline(void);
|
||||
|
||||
mpc_parser_t *mpc_whitespace(void);
|
||||
mpc_parser_t *mpc_whitespaces(void);
|
||||
mpc_parser_t *mpc_blank(void);
|
||||
|
||||
mpc_parser_t *mpc_newline(void);
|
||||
mpc_parser_t *mpc_tab(void);
|
||||
mpc_parser_t *mpc_escape(void);
|
||||
|
||||
mpc_parser_t *mpc_digit(void);
|
||||
mpc_parser_t *mpc_hexdigit(void);
|
||||
mpc_parser_t *mpc_octdigit(void);
|
||||
mpc_parser_t *mpc_digits(void);
|
||||
mpc_parser_t *mpc_hexdigits(void);
|
||||
mpc_parser_t *mpc_octdigits(void);
|
||||
|
||||
mpc_parser_t *mpc_lower(void);
|
||||
mpc_parser_t *mpc_upper(void);
|
||||
mpc_parser_t *mpc_alpha(void);
|
||||
mpc_parser_t *mpc_underscore(void);
|
||||
mpc_parser_t *mpc_alphanum(void);
|
||||
|
||||
mpc_parser_t *mpc_int(void);
|
||||
mpc_parser_t *mpc_hex(void);
|
||||
mpc_parser_t *mpc_oct(void);
|
||||
mpc_parser_t *mpc_number(void);
|
||||
|
||||
mpc_parser_t *mpc_real(void);
|
||||
mpc_parser_t *mpc_float(void);
|
||||
|
||||
mpc_parser_t *mpc_char_lit(void);
|
||||
mpc_parser_t *mpc_string_lit(void);
|
||||
mpc_parser_t *mpc_regex_lit(void);
|
||||
|
||||
mpc_parser_t *mpc_ident(void);
|
||||
|
||||
/*
|
||||
** Useful Parsers
|
||||
*/
|
||||
|
||||
mpc_parser_t *mpc_startwith(mpc_parser_t *a);
|
||||
mpc_parser_t *mpc_endwith(mpc_parser_t *a, mpc_dtor_t da);
|
||||
mpc_parser_t *mpc_whole(mpc_parser_t *a, mpc_dtor_t da);
|
||||
|
||||
mpc_parser_t *mpc_stripl(mpc_parser_t *a);
|
||||
mpc_parser_t *mpc_stripr(mpc_parser_t *a);
|
||||
mpc_parser_t *mpc_strip(mpc_parser_t *a);
|
||||
mpc_parser_t *mpc_tok(mpc_parser_t *a);
|
||||
mpc_parser_t *mpc_sym(const char *s);
|
||||
mpc_parser_t *mpc_total(mpc_parser_t *a, mpc_dtor_t da);
|
||||
|
||||
mpc_parser_t *mpc_between(mpc_parser_t *a, mpc_dtor_t ad, const char *o, const char *c);
|
||||
mpc_parser_t *mpc_parens(mpc_parser_t *a, mpc_dtor_t ad);
|
||||
mpc_parser_t *mpc_braces(mpc_parser_t *a, mpc_dtor_t ad);
|
||||
mpc_parser_t *mpc_brackets(mpc_parser_t *a, mpc_dtor_t ad);
|
||||
mpc_parser_t *mpc_squares(mpc_parser_t *a, mpc_dtor_t ad);
|
||||
|
||||
mpc_parser_t *mpc_tok_between(mpc_parser_t *a, mpc_dtor_t ad, const char *o, const char *c);
|
||||
mpc_parser_t *mpc_tok_parens(mpc_parser_t *a, mpc_dtor_t ad);
|
||||
mpc_parser_t *mpc_tok_braces(mpc_parser_t *a, mpc_dtor_t ad);
|
||||
mpc_parser_t *mpc_tok_brackets(mpc_parser_t *a, mpc_dtor_t ad);
|
||||
mpc_parser_t *mpc_tok_squares(mpc_parser_t *a, mpc_dtor_t ad);
|
||||
|
||||
mpc_parser_t *mpc_sepby1(mpc_fold_t f, mpc_parser_t *sep, mpc_parser_t *a);
|
||||
|
||||
/*
|
||||
** Common Function Parameters
|
||||
*/
|
||||
|
||||
void mpcf_dtor_null(mpc_val_t *x);
|
||||
|
||||
mpc_val_t *mpcf_ctor_null(void);
|
||||
mpc_val_t *mpcf_ctor_str(void);
|
||||
|
||||
mpc_val_t *mpcf_free(mpc_val_t *x);
|
||||
mpc_val_t *mpcf_int(mpc_val_t *x);
|
||||
mpc_val_t *mpcf_hex(mpc_val_t *x);
|
||||
mpc_val_t *mpcf_oct(mpc_val_t *x);
|
||||
mpc_val_t *mpcf_float(mpc_val_t *x);
|
||||
mpc_val_t *mpcf_strtriml(mpc_val_t *x);
|
||||
mpc_val_t *mpcf_strtrimr(mpc_val_t *x);
|
||||
mpc_val_t *mpcf_strtrim(mpc_val_t *x);
|
||||
|
||||
mpc_val_t *mpcf_escape(mpc_val_t *x);
|
||||
mpc_val_t *mpcf_escape_regex(mpc_val_t *x);
|
||||
mpc_val_t *mpcf_escape_string_raw(mpc_val_t *x);
|
||||
mpc_val_t *mpcf_escape_char_raw(mpc_val_t *x);
|
||||
|
||||
mpc_val_t *mpcf_unescape(mpc_val_t *x);
|
||||
mpc_val_t *mpcf_unescape_regex(mpc_val_t *x);
|
||||
mpc_val_t *mpcf_unescape_string_raw(mpc_val_t *x);
|
||||
mpc_val_t *mpcf_unescape_char_raw(mpc_val_t *x);
|
||||
|
||||
mpc_val_t *mpcf_null(int n, mpc_val_t** xs);
|
||||
mpc_val_t *mpcf_fst(int n, mpc_val_t** xs);
|
||||
mpc_val_t *mpcf_snd(int n, mpc_val_t** xs);
|
||||
mpc_val_t *mpcf_trd(int n, mpc_val_t** xs);
|
||||
|
||||
mpc_val_t *mpcf_fst_free(int n, mpc_val_t** xs);
|
||||
mpc_val_t *mpcf_snd_free(int n, mpc_val_t** xs);
|
||||
mpc_val_t *mpcf_trd_free(int n, mpc_val_t** xs);
|
||||
mpc_val_t *mpcf_all_free(int n, mpc_val_t** xs);
|
||||
|
||||
mpc_val_t *mpcf_freefold(int n, mpc_val_t** xs);
|
||||
mpc_val_t *mpcf_strfold(int n, mpc_val_t** xs);
|
||||
|
||||
/*
|
||||
** Regular Expression Parsers
|
||||
*/
|
||||
|
||||
enum {
|
||||
MPC_RE_DEFAULT = 0,
|
||||
MPC_RE_M = 1,
|
||||
MPC_RE_S = 2,
|
||||
MPC_RE_MULTILINE = 1,
|
||||
MPC_RE_DOTALL = 2
|
||||
};
|
||||
|
||||
mpc_parser_t *mpc_re(const char *re);
|
||||
mpc_parser_t *mpc_re_mode(const char *re, int mode);
|
||||
|
||||
/*
|
||||
** AST
|
||||
*/
|
||||
|
||||
typedef struct mpc_ast_t {
|
||||
char *tag;
|
||||
char *contents;
|
||||
mpc_state_t state;
|
||||
int children_num;
|
||||
struct mpc_ast_t** children;
|
||||
} mpc_ast_t;
|
||||
|
||||
mpc_ast_t *mpc_ast_new(const char *tag, const char *contents);
|
||||
mpc_ast_t *mpc_ast_build(int n, const char *tag, ...);
|
||||
mpc_ast_t *mpc_ast_add_root(mpc_ast_t *a);
|
||||
mpc_ast_t *mpc_ast_add_child(mpc_ast_t *r, mpc_ast_t *a);
|
||||
mpc_ast_t *mpc_ast_add_tag(mpc_ast_t *a, const char *t);
|
||||
mpc_ast_t *mpc_ast_add_root_tag(mpc_ast_t *a, const char *t);
|
||||
mpc_ast_t *mpc_ast_tag(mpc_ast_t *a, const char *t);
|
||||
mpc_ast_t *mpc_ast_state(mpc_ast_t *a, mpc_state_t s);
|
||||
|
||||
void mpc_ast_delete(mpc_ast_t *a);
|
||||
void mpc_ast_print(mpc_ast_t *a);
|
||||
void mpc_ast_print_to(mpc_ast_t *a, FILE *fp);
|
||||
|
||||
int mpc_ast_get_index(mpc_ast_t *ast, const char *tag);
|
||||
int mpc_ast_get_index_lb(mpc_ast_t *ast, const char *tag, int lb);
|
||||
mpc_ast_t *mpc_ast_get_child(mpc_ast_t *ast, const char *tag);
|
||||
mpc_ast_t *mpc_ast_get_child_lb(mpc_ast_t *ast, const char *tag, int lb);
|
||||
|
||||
typedef enum {
|
||||
mpc_ast_trav_order_pre,
|
||||
mpc_ast_trav_order_post
|
||||
} mpc_ast_trav_order_t;
|
||||
|
||||
typedef struct mpc_ast_trav_t {
|
||||
mpc_ast_t *curr_node;
|
||||
struct mpc_ast_trav_t *parent;
|
||||
int curr_child;
|
||||
mpc_ast_trav_order_t order;
|
||||
} mpc_ast_trav_t;
|
||||
|
||||
mpc_ast_trav_t *mpc_ast_traverse_start(mpc_ast_t *ast,
|
||||
mpc_ast_trav_order_t order);
|
||||
|
||||
mpc_ast_t *mpc_ast_traverse_next(mpc_ast_trav_t **trav);
|
||||
|
||||
void mpc_ast_traverse_free(mpc_ast_trav_t **trav);
|
||||
|
||||
/*
|
||||
** Warning: This function currently doesn't test for equality of the `state` member!
|
||||
*/
|
||||
int mpc_ast_eq(mpc_ast_t *a, mpc_ast_t *b);
|
||||
|
||||
mpc_val_t *mpcf_fold_ast(int n, mpc_val_t **as);
|
||||
mpc_val_t *mpcf_str_ast(mpc_val_t *c);
|
||||
mpc_val_t *mpcf_state_ast(int n, mpc_val_t **xs);
|
||||
|
||||
mpc_parser_t *mpca_tag(mpc_parser_t *a, const char *t);
|
||||
mpc_parser_t *mpca_add_tag(mpc_parser_t *a, const char *t);
|
||||
mpc_parser_t *mpca_root(mpc_parser_t *a);
|
||||
mpc_parser_t *mpca_state(mpc_parser_t *a);
|
||||
mpc_parser_t *mpca_total(mpc_parser_t *a);
|
||||
|
||||
mpc_parser_t *mpca_not(mpc_parser_t *a);
|
||||
mpc_parser_t *mpca_maybe(mpc_parser_t *a);
|
||||
|
||||
mpc_parser_t *mpca_many(mpc_parser_t *a);
|
||||
mpc_parser_t *mpca_many1(mpc_parser_t *a);
|
||||
mpc_parser_t *mpca_count(int n, mpc_parser_t *a);
|
||||
|
||||
mpc_parser_t *mpca_or(int n, ...);
|
||||
mpc_parser_t *mpca_and(int n, ...);
|
||||
|
||||
enum {
|
||||
MPCA_LANG_DEFAULT = 0,
|
||||
MPCA_LANG_PREDICTIVE = 1,
|
||||
MPCA_LANG_WHITESPACE_SENSITIVE = 2
|
||||
};
|
||||
|
||||
mpc_parser_t *mpca_grammar(int flags, const char *grammar, ...);
|
||||
|
||||
mpc_err_t *mpca_lang(int flags, const char *language, ...);
|
||||
mpc_err_t *mpca_lang_file(int flags, FILE *f, ...);
|
||||
mpc_err_t *mpca_lang_pipe(int flags, FILE *f, ...);
|
||||
mpc_err_t *mpca_lang_contents(int flags, const char *filename, ...);
|
||||
|
||||
/*
|
||||
** Misc
|
||||
*/
|
||||
|
||||
|
||||
void mpc_print(mpc_parser_t *p);
|
||||
void mpc_optimise(mpc_parser_t *p);
|
||||
void mpc_stats(mpc_parser_t *p);
|
||||
|
||||
int mpc_test_pass(mpc_parser_t *p, const char *s, const void *d,
|
||||
int(*tester)(const void*, const void*),
|
||||
mpc_dtor_t destructor,
|
||||
void(*printer)(const void*));
|
||||
|
||||
int mpc_test_fail(mpc_parser_t *p, const char *s, const void *d,
|
||||
int(*tester)(const void*, const void*),
|
||||
mpc_dtor_t destructor,
|
||||
void(*printer)(const void*));
|
||||
|
||||
#ifdef __cplusplus
|
||||
}
|
||||
#endif
|
||||
|
||||
#endif
|
||||
2
vendor/yar.c
vendored
Normal file
2
vendor/yar.c
vendored
Normal file
|
|
@ -0,0 +1,2 @@
|
|||
#define YAR_IMPLEMENTATION
|
||||
#include "yar.h"
|
||||
229
vendor/yar.h
vendored
Normal file
229
vendor/yar.h
vendored
Normal file
|
|
@ -0,0 +1,229 @@
|
|||
/* yar - dynamic arrays in C - public domain Nicholas Rixson 2025
|
||||
*
|
||||
* https://github.com/segcore/yar
|
||||
*
|
||||
* Licence: see end of file
|
||||
|
||||
Sample usage:
|
||||
#define YAR_IMPLEMENTATION
|
||||
#include "yar.h"
|
||||
|
||||
int main() {
|
||||
// struct { double *items; size_t count; size_t capacity; } numbers = {0};
|
||||
yar(double) numbers = {0};
|
||||
*yar_append(&numbers) = 3.14159;
|
||||
*yar_append(&numbers) = 2.71828;
|
||||
*yar_append(&numbers) = 1.61803;
|
||||
|
||||
for(size_t i = 0; i < numbers.count; i++) {
|
||||
printf("%f\n", numbers.items[i]);
|
||||
}
|
||||
|
||||
yar_free(&numbers);
|
||||
}
|
||||
*/
|
||||
#ifndef YAR_H
|
||||
#define YAR_H
|
||||
|
||||
#include <stddef.h> // size_t
|
||||
#include <string.h> // strlen
|
||||
|
||||
/*
|
||||
* yar(type) - Declare a new basic dynamic array
|
||||
*
|
||||
* yar_append(array) - Add a new item at the end of the array, and return a pointer to it
|
||||
*
|
||||
* yar_reserve(array, extra) - Reserve space for `extra` count of items
|
||||
*
|
||||
* yar_append_many(array, data, num) - Append a copy of existing data
|
||||
*
|
||||
* yar_append_cstr(array, data) - Append a C string (nul-terminated char array)
|
||||
*
|
||||
* yar_insert(array, index, num) - Insert items somewhere within the array. Moves items to higher indexes as required. Returns &array[index]
|
||||
*
|
||||
* yar_remove(array, index, num) - Remove items from somewhere within the array. Moves items to lower indexes as required.
|
||||
*
|
||||
* yar_reset(array) - Reset the count of elements to 0, to re-use the memory. Does not free the memory.
|
||||
*
|
||||
* yar_init(array) - Set items, count, and capacity to 0. Can usually be avoided with <declaration> = {0};
|
||||
*
|
||||
* yar_free(array) - Free items memory, and set the items, count, and capacity to 0.
|
||||
*/
|
||||
|
||||
#define yar(type) struct { type *items; size_t count; size_t capacity; }
|
||||
#define yar_append(array) ((_yar_append((void**)&(array)->items, &(array)->count, &(array)->capacity, sizeof((array)->items[0])) ? \
|
||||
&(array)->items[(array)->count - 1] : NULL))
|
||||
#define yar_reserve(array, extra) ((_yar_reserve((void**)&(array)->items, &(array)->count, &(array)->capacity, sizeof((array)->items[0]), (extra)) ? \
|
||||
&(array)->items[(array)->count] : NULL))
|
||||
#define yar_append_many(array, data, num) ((_yar_append_many((void**)&(array)->items, &(array)->count, &(array)->capacity, sizeof((array)->items[0]), 1 ? (data) : ((array)->items), (num)) ))
|
||||
#define yar_append_cstr(array, data) yar_append_many(array, data, strlen(data))
|
||||
#define yar_insert(array, index, num) ((_yar_insert((void**)&(array)->items, &(array)->count, &(array)->capacity, sizeof((array)->items[0]), index, num) ))
|
||||
#define yar_remove(array, index, num) ((_yar_remove((void**)&(array)->items, &(array)->count, sizeof((array)->items[0]), index, num) ))
|
||||
#define yar_reset(array) (((array)->count = 0))
|
||||
#define yar_init(array) ((array)->items = NULL, (array)->count = 0, (array)->capacity = 0)
|
||||
#define yar_free(array) ((_yar_free((array)->items)), (array)->items = NULL, (array)->count = 0, (array)->capacity = 0)
|
||||
|
||||
#ifndef YARAPI
|
||||
#define YARAPI // nothing; overridable if needed.
|
||||
#endif
|
||||
|
||||
#ifdef __cplusplus
|
||||
extern "C" {
|
||||
#endif
|
||||
|
||||
// Implementation functions
|
||||
YARAPI void* _yar_append(void** items_pointer, size_t* count, size_t* capacity, size_t item_size);
|
||||
YARAPI void* _yar_append_many(void** items_pointer, size_t* count, size_t* capacity, size_t item_size, void* data, size_t extra);
|
||||
YARAPI void* _yar_reserve(void** items_pointer, size_t* count, size_t* capacity, size_t item_size, size_t extra);
|
||||
YARAPI void* _yar_insert(void** items_pointer, size_t* count, size_t* capacity, size_t item_size, size_t index, size_t extra);
|
||||
YARAPI void* _yar_remove(void** items_pointer, size_t* count, size_t item_size, size_t index, size_t remove);
|
||||
YARAPI void* _yar_realloc(void* p, size_t new_size);
|
||||
YARAPI void _yar_free(void* p);
|
||||
|
||||
#ifdef __cplusplus
|
||||
}
|
||||
#endif
|
||||
|
||||
#endif // YAR_H
|
||||
|
||||
#if defined(YAR_IMPLEMENTATION)
|
||||
|
||||
#ifndef YAR_MIN_CAP
|
||||
#define YAR_MIN_CAP 16
|
||||
#endif
|
||||
|
||||
#ifndef YAR_REALLOC
|
||||
#define YAR_REALLOC realloc
|
||||
#endif
|
||||
|
||||
#ifndef YAR_FREE
|
||||
#define YAR_FREE free
|
||||
#endif
|
||||
|
||||
#include <string.h> // mem* functions
|
||||
YARAPI void* _yar_append(void** items_pointer, size_t* count, size_t* capacity, size_t item_size)
|
||||
{
|
||||
void* result = _yar_reserve(items_pointer, count, capacity, item_size, 1);
|
||||
if (result != NULL) *count += 1;
|
||||
return result;
|
||||
}
|
||||
|
||||
YARAPI void* _yar_append_many(void** items_pointer, size_t* count, size_t* capacity, size_t item_size, void* data, size_t extra)
|
||||
{
|
||||
void* result = _yar_reserve(items_pointer, count, capacity, item_size, extra);
|
||||
if (result != NULL) {
|
||||
memcpy(result, data, item_size * extra);
|
||||
*count += extra;
|
||||
}
|
||||
return result;
|
||||
}
|
||||
|
||||
YARAPI void* _yar_reserve(void** items_pointer, size_t* count, size_t* capacity, size_t item_size, size_t extra)
|
||||
{
|
||||
char* items = *items_pointer;
|
||||
size_t newcount = *count + extra;
|
||||
if (newcount > *capacity) {
|
||||
size_t newcap = (*capacity < YAR_MIN_CAP) ? YAR_MIN_CAP : *capacity * 8 / 5;
|
||||
if (newcap < newcount) newcap = newcount;
|
||||
void* next = _yar_realloc(items, newcap * item_size);
|
||||
if (next == NULL) return NULL;
|
||||
items = next;
|
||||
*items_pointer = next;
|
||||
*capacity = newcap;
|
||||
}
|
||||
void* result = items + (*count * item_size);
|
||||
if (extra && result) memset(result, 0, item_size * extra);
|
||||
return result;
|
||||
}
|
||||
|
||||
YARAPI void* _yar_insert(void** items_pointer, size_t* count, size_t* capacity, size_t item_size, size_t index, size_t extra)
|
||||
{
|
||||
void* next = _yar_reserve(items_pointer, count, capacity, item_size, extra);
|
||||
if(next == NULL) return NULL;
|
||||
|
||||
char* items = *items_pointer;
|
||||
if (index < *count)
|
||||
{
|
||||
memmove(&items[item_size * (index + extra)], &items[item_size * index], (*count - index) * item_size);
|
||||
memset(&items[item_size * index], 0, extra * item_size);
|
||||
}
|
||||
*count += extra;
|
||||
return items + index * item_size;
|
||||
}
|
||||
|
||||
YARAPI void* _yar_remove(void** items_pointer, size_t* count, size_t item_size, size_t index, size_t remove)
|
||||
{
|
||||
if(remove >= *count) {
|
||||
*count = 0;
|
||||
return *items_pointer;
|
||||
}
|
||||
if (index >= *count) {
|
||||
return *items_pointer;
|
||||
}
|
||||
char* items = *items_pointer;
|
||||
memmove(&items[item_size * index], &items[item_size * (index + remove)], item_size * (*count - (index + remove)));
|
||||
*count -= remove;
|
||||
return items + item_size * index;
|
||||
}
|
||||
|
||||
YARAPI void* _yar_realloc(void* p, size_t new_size)
|
||||
{
|
||||
// Declaration, so we can call it if the definition is overridden
|
||||
extern void* YAR_REALLOC(void *ptr, size_t size);
|
||||
return YAR_REALLOC(p, new_size);
|
||||
}
|
||||
|
||||
YARAPI void _yar_free(void* p)
|
||||
{
|
||||
extern void YAR_FREE(void *ptr);
|
||||
YAR_FREE(p);
|
||||
}
|
||||
|
||||
#endif // YAR_IMPLEMENTATION
|
||||
/*
|
||||
------------------------------------------------------------------------------
|
||||
This software is available under 2 licenses -- choose whichever you prefer.
|
||||
------------------------------------------------------------------------------
|
||||
ALTERNATIVE A - MIT License
|
||||
|
||||
Copyright (c) 2025 Nicholas Rixson
|
||||
|
||||
Permission is hereby granted, free of charge, to any person obtaining a copy
|
||||
of this software and associated documentation files (the "Software"), to deal
|
||||
in the Software without restriction, including without limitation the rights
|
||||
to use, copy, modify, merge, publish, distribute, sublicense, and/or sell
|
||||
copies of the Software, and to permit persons to whom the Software is
|
||||
furnished to do so, subject to the following conditions:
|
||||
|
||||
The above copyright notice and this permission notice shall be included in all
|
||||
copies or substantial portions of the Software.
|
||||
|
||||
THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR
|
||||
IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY,
|
||||
FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE
|
||||
AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER
|
||||
LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM,
|
||||
OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE
|
||||
SOFTWARE.
|
||||
------------------------------------------------------------------------------
|
||||
ALTERNATIVE B - Public Domain (www.unlicense.org)
|
||||
This is free and unencumbered software released into the public domain.
|
||||
Anyone is free to copy, modify, publish, use, compile, sell, or distribute this
|
||||
software, either in source code form or as a compiled binary, for any purpose,
|
||||
commercial or non-commercial, and by any means.
|
||||
|
||||
In jurisdictions that recognize copyright laws, the author or authors of this
|
||||
software dedicate any and all copyright interest in the software to the public
|
||||
domain. We make this dedication for the benefit of the public at large and to
|
||||
the detriment of our heirs and successors. We intend this dedication to be an
|
||||
overt act of relinquishment in perpetuity of all present and future rights to
|
||||
this software under copyright law.
|
||||
|
||||
THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR
|
||||
IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY,
|
||||
FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE
|
||||
AUTHORS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER LIABILITY, WHETHER IN AN
|
||||
ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, OUT OF OR IN CONNECTION
|
||||
WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE SOFTWARE.
|
||||
------------------------------------------------------------------------------
|
||||
*/
|
||||
Loading…
Add table
Add a link
Reference in a new issue