| 12345678910111213141516171819202122232425262728293031323334353637383940414243444546474849505152535455565758596061626364656667686970717273747576777879808182838485 |
- /*
- ugl_bc.h
-
- bytecode interpreter
-
- */
- #ifndef _UGL_BC_H
- #define _UGL_BC_H
- #include <stdint.h>
- #define BC_STACK_SIZE 64
- #define BC_RETURN_STACK_SIZE 6
- struct bc_struct
- {
- uint8_t *code;
- uint16_t code_pos;
-
- uint8_t arg_stack_pointer; /* starts at 0 and grows */
- uint8_t return_stack_pointer; /* starts at 0 and grows */
-
- uint16_t arg_stack[BC_STACK_SIZE]; /* parameter and return value stack */
- uint16_t return_stack[BC_RETURN_STACK_SIZE]; /* return from procedure stack */
- };
- typedef struct bc_struct bc_t;
- typedef void (*bc_buildin_fn)(bc_t *bc);
- extern bc_buildin_fn bc_buildin_list[];
- /* lower 4 bit: 0, upper 4 bit + next byte --> 12 bit value */
- #define BC_CMD_LOAD_12BIT (0x00)
- /* lower 4 bit: 1, upper 4 bit + next byte --> 12 bit value */
- #define BC_CMD_CALL_BUILDIN (0x01)
- /* lower 4 bit: 2, upper 4 bit + next byte --> 12 bit value (toplevel call, return value will be removed) */
- #define BC_CMD_CALL_BUILDIN_POP_STACK (0x02)
- /* lower 4 bit: 3, upper 4 bit + next byte --> 12 bit relative adr */
- #define BC_CMD_BRANCH (0x03)
- /* lower 4 bit: 4, upper 4 bit: 0..15, pop 1..16 bytes from the arg stack */
- /* only used to remove one byte, so could be moved to different section */
- #define BC_CMD_POP_ARG_STACK (0x04)
- /* lower 4 bit: 5, upper 4 bit: 0..15, push 1..16 bytes on the arg stack */
- /* not used any more */
- #define BC_CMD_PUSH_ARG_STACK (0x05)
- /* lower 4 bit: 5, upper 4 bit: 0..15, push 1..16 arguments, then two bytes for destination adr*/
- #define BC_CMD_CALL_PROCEDURE (0x06)
- /* lower 4 bit: 15, upper 4 bit: 0 --> put 0 on stack */
- #define BC_CMD_LOAD_0 (0x0f)
- /* lower 4 bit: 15, upper 4 bit: 1 --> put 1 on stack */
- #define BC_CMD_LOAD_1 (0x1f)
- /* lower 4 bit: 15, upper 4 bit: 2 --> but 16 bit value on stack, order: high byte, low byte */
- #define BC_CMD_LOAD_16BIT (0x2f)
- /* lower 4 bit: 15, upper 4 bit: 3 */
- #define BC_CMD_RETURN_FROM_PROCEDURE (0x3f)
- /* lower 4 bit: 15, upper 4 bit: 4 --> adr are next 16 bit*/
- #define BC_CMD_JUMP_NOT_ZERO (0x4f)
- /* lower 4 bit: 15, upper 4 bit: 5 --> adr are next 16 bit*/
- #define BC_CMD_JUMP_ZERO (0x05f)
- /* lower 4 bit: 15, upper 4 bit: 6 --> adr are next 16 bit */
- //#define BC_CMD_CALL_PROCEDURE (0x06f)
- /* lower 4 bit: 15, upper 4 bit: 7 --> adr are next 16 bit, third byte are the number of arguments */
- //#define BC_CMD_POP_ARG_STACK (0x07f)
- void bc_exec(bc_t *bc, uint8_t *code, uint16_t pos);
- /*======================================================*/
- #endif
|