modularization
This commit is contained in:
parent
99a385752f
commit
78b9b99ab3
3
.gitignore
vendored
3
.gitignore
vendored
|
@ -1,2 +1,3 @@
|
||||||
hbas
|
hbas
|
||||||
*.hbf
|
*.hbf
|
||||||
|
build/*
|
||||||
|
|
2
Makefile
2
Makefile
|
@ -5,7 +5,7 @@ CFLAGS = -Wall -Wextra -Wpedantic -std=c17 -O3
|
||||||
.PHONY: clean
|
.PHONY: clean
|
||||||
|
|
||||||
hbas: src/hbas.c
|
hbas: src/hbas.c
|
||||||
${CC} ${CFLAGS} ${CFLAGS_EXTRA} src/hbas.c -o hbas
|
${CC} ${CFLAGS} ${CFLAGS_EXTRA} src/hbas.c -o build/hbas
|
||||||
|
|
||||||
example: hbas example.S
|
example: hbas example.S
|
||||||
./hbas < example.S > example
|
./hbas < example.S > example
|
||||||
|
|
2
run.sh
2
run.sh
|
@ -1,2 +1,2 @@
|
||||||
make CC=clang
|
make CC=clang
|
||||||
./hbas < example.S > example.hbf
|
./build/hbas < examples/example.S > build/example.hbf
|
||||||
|
|
41
src/args.c
Normal file
41
src/args.c
Normal file
|
@ -0,0 +1,41 @@
|
||||||
|
typedef struct ArgMeta_s
|
||||||
|
{
|
||||||
|
char chr;
|
||||||
|
uint8_t size;
|
||||||
|
// This is a bitset of acceptable overflow states,
|
||||||
|
// where accept signed = 1, accept unsigned = 2.
|
||||||
|
// 1 -> signed, 2 -> unsigned, 3 -> whatever
|
||||||
|
uint8_t sign;
|
||||||
|
uint8_t rel;
|
||||||
|
} ArgMeta;
|
||||||
|
const ArgMeta ARGS[] = {
|
||||||
|
{'R', 1, 2, 0},
|
||||||
|
{'1', 1, 3, 0},
|
||||||
|
{'b', 1, 1, 0},
|
||||||
|
{'B', 1, 2, 0},
|
||||||
|
{'2', 2, 3, 0},
|
||||||
|
{'o', 2, 1, 1},
|
||||||
|
{'h', 2, 1, 0},
|
||||||
|
{'H', 2, 2, 0},
|
||||||
|
{'4', 4, 3, 0},
|
||||||
|
{'w', 4, 1, 0},
|
||||||
|
{'O', 4, 1, 1},
|
||||||
|
{'W', 4, 2, 0},
|
||||||
|
{'8', 8, 3, 0},
|
||||||
|
{'d', 8, 1, 0},
|
||||||
|
{'D', 8, 2, 0},
|
||||||
|
{0},
|
||||||
|
};
|
||||||
|
const size_t NARGS = sizeof(ARGS) / sizeof(ARGS[0]);
|
||||||
|
ArgMeta arg_meta(char arg)
|
||||||
|
{
|
||||||
|
for (size_t ii = 0; ii < NARGS; ii += 1)
|
||||||
|
{
|
||||||
|
ArgMeta meta = ARGS[ii];
|
||||||
|
if (meta.chr == arg)
|
||||||
|
{
|
||||||
|
return meta;
|
||||||
|
}
|
||||||
|
}
|
||||||
|
return ARGS[NARGS - 1];
|
||||||
|
}
|
35
src/bytevec.c
Normal file
35
src/bytevec.c
Normal file
|
@ -0,0 +1,35 @@
|
||||||
|
|
||||||
|
typedef struct ByteVec_s
|
||||||
|
{
|
||||||
|
char *buf;
|
||||||
|
size_t cap;
|
||||||
|
size_t len;
|
||||||
|
} ByteVec;
|
||||||
|
|
||||||
|
AsmError ensure_push(ByteVec *vec, size_t el_size, size_t extra)
|
||||||
|
{
|
||||||
|
if (vec->len + extra < vec->len)
|
||||||
|
{
|
||||||
|
return ErrOutOfMemory;
|
||||||
|
}
|
||||||
|
while (vec->len + extra > vec->cap)
|
||||||
|
{
|
||||||
|
if ((~(size_t)0) / 2 < vec->cap)
|
||||||
|
{
|
||||||
|
return ErrOutOfMemory;
|
||||||
|
}
|
||||||
|
vec->cap *= 2;
|
||||||
|
// multiply overflow
|
||||||
|
if ((~(size_t)0) / el_size < vec->cap)
|
||||||
|
{
|
||||||
|
return ErrOutOfMemory;
|
||||||
|
}
|
||||||
|
vec->buf = realloc(vec->buf, el_size * vec->cap);
|
||||||
|
if (vec->buf == NULL)
|
||||||
|
{
|
||||||
|
vec->cap = 0;
|
||||||
|
return ErrOutOfMemory;
|
||||||
|
}
|
||||||
|
}
|
||||||
|
return 0;
|
||||||
|
}
|
79
src/hbas.c
79
src/hbas.c
|
@ -25,6 +25,7 @@ SOFTWARE.
|
||||||
#include <string.h>
|
#include <string.h>
|
||||||
#include <stdint.h>
|
#include <stdint.h>
|
||||||
|
|
||||||
|
#include "args.c"
|
||||||
#include "op.h"
|
#include "op.h"
|
||||||
#include "error.h"
|
#include "error.h"
|
||||||
#include "instructions.c"
|
#include "instructions.c"
|
||||||
|
@ -32,6 +33,7 @@ SOFTWARE.
|
||||||
#include "register.c"
|
#include "register.c"
|
||||||
#include "token.c"
|
#include "token.c"
|
||||||
#include "einfo.h"
|
#include "einfo.h"
|
||||||
|
#include "bytevec.c"
|
||||||
|
|
||||||
void hd(char *data, size_t len)
|
void hd(char *data, size_t len)
|
||||||
{
|
{
|
||||||
|
@ -46,83 +48,6 @@ void hd(char *data, size_t len)
|
||||||
printf("\n");
|
printf("\n");
|
||||||
}
|
}
|
||||||
|
|
||||||
typedef struct ArgMeta_s
|
|
||||||
{
|
|
||||||
char chr;
|
|
||||||
uint8_t size;
|
|
||||||
// This is a bitset of acceptable overflow states,
|
|
||||||
// where accept signed = 1, accept unsigned = 2.
|
|
||||||
// 1 -> signed, 2 -> unsigned, 3 -> whatever
|
|
||||||
uint8_t sign;
|
|
||||||
uint8_t rel;
|
|
||||||
} ArgMeta;
|
|
||||||
const ArgMeta ARGS[] = {
|
|
||||||
{'R', 1, 2, 0},
|
|
||||||
{'1', 1, 3, 0},
|
|
||||||
{'b', 1, 1, 0},
|
|
||||||
{'B', 1, 2, 0},
|
|
||||||
{'2', 2, 3, 0},
|
|
||||||
{'o', 2, 1, 1},
|
|
||||||
{'h', 2, 1, 0},
|
|
||||||
{'H', 2, 2, 0},
|
|
||||||
{'4', 4, 3, 0},
|
|
||||||
{'w', 4, 1, 0},
|
|
||||||
{'O', 4, 1, 1},
|
|
||||||
{'W', 4, 2, 0},
|
|
||||||
{'8', 8, 3, 0},
|
|
||||||
{'d', 8, 1, 0},
|
|
||||||
{'D', 8, 2, 0},
|
|
||||||
{0},
|
|
||||||
};
|
|
||||||
const size_t NARGS = sizeof(ARGS) / sizeof(ARGS[0]);
|
|
||||||
ArgMeta arg_meta(char arg)
|
|
||||||
{
|
|
||||||
for (size_t ii = 0; ii < NARGS; ii += 1)
|
|
||||||
{
|
|
||||||
ArgMeta meta = ARGS[ii];
|
|
||||||
if (meta.chr == arg)
|
|
||||||
{
|
|
||||||
return meta;
|
|
||||||
}
|
|
||||||
}
|
|
||||||
return ARGS[NARGS - 1];
|
|
||||||
}
|
|
||||||
|
|
||||||
typedef struct ByteVec_s
|
|
||||||
{
|
|
||||||
char *buf;
|
|
||||||
size_t cap;
|
|
||||||
size_t len;
|
|
||||||
} ByteVec;
|
|
||||||
|
|
||||||
AsmError ensure_push(ByteVec *vec, size_t el_size, size_t extra)
|
|
||||||
{
|
|
||||||
if (vec->len + extra < vec->len)
|
|
||||||
{
|
|
||||||
return ErrOutOfMemory;
|
|
||||||
}
|
|
||||||
while (vec->len + extra > vec->cap)
|
|
||||||
{
|
|
||||||
if ((~(size_t)0) / 2 < vec->cap)
|
|
||||||
{
|
|
||||||
return ErrOutOfMemory;
|
|
||||||
}
|
|
||||||
vec->cap *= 2;
|
|
||||||
// multiply overflow
|
|
||||||
if ((~(size_t)0) / el_size < vec->cap)
|
|
||||||
{
|
|
||||||
return ErrOutOfMemory;
|
|
||||||
}
|
|
||||||
vec->buf = realloc(vec->buf, el_size * vec->cap);
|
|
||||||
if (vec->buf == NULL)
|
|
||||||
{
|
|
||||||
vec->cap = 0;
|
|
||||||
return ErrOutOfMemory;
|
|
||||||
}
|
|
||||||
}
|
|
||||||
return 0;
|
|
||||||
}
|
|
||||||
|
|
||||||
#define MIN_SIZE 4096
|
#define MIN_SIZE 4096
|
||||||
|
|
||||||
int slurp(FILE *fd, ByteVec *out)
|
int slurp(FILE *fd, ByteVec *out)
|
||||||
|
|
Loading…
Reference in a new issue