X-Git-Url: https://git.martlubbers.net/?a=blobdiff_plain;f=int%2Finterpret.c;fp=int%2Finterpret.c;h=0000000000000000000000000000000000000000;hb=34e31d383f1c2315dee254e82c8a8ec482f210c3;hp=bf437ae3add492154cd6aafe3beff0240ed28726;hpb=1383ec4c1733cc6f07fe68e0619446d60fe5277e;p=mTask.git diff --git a/int/interpret.c b/int/interpret.c deleted file mode 100644 index bf437ae..0000000 --- a/int/interpret.c +++ /dev/null @@ -1,134 +0,0 @@ -#include -#include - -#include "mTaskSymbols.h" -#include "interpret.h" -#include "misc.h" -#include "task.h" -#include "sds.h" - -void run_task(struct task *t, int fd) -{ - uint8_t *program = t->bc; - int plen = t->tlen; - int pc = 0; - int sp = 0; - char stack[STACKSIZE] = {0}; - printf("Running task with length: %d\n", plen); - while(pc != plen){ - printf("program: %d\n", program[pc]); - printf("stack: %02x %02x %02x %02x %02x %02x %02x %02x %02x %02x\n", - stack[0], stack[1], stack[2], stack[3], stack[4], - stack[5], stack[6], stack[7], stack[8], stack[9]); - - switch(program[pc++]){ - case BCNOP: trace("nop\n"); - break; - case BCLAB: trace("label: 0x%02x!!!!!!\n", program[pc]); - pc++; - break; - case BCPUSH: trace("push %d\n", program[pc]*265+program[pc+1]); - stack[sp++] = program[pc]*265 + program[pc+1]; - pc+=2; - break; - case BCPOP: trace("pop\n"); - sp--; - break; - case BCSDSSTORE: trace("sds store: %d\n", program[pc]); - sds_store(program[pc++], stack[--sp]); - break; - case BCSDSFETCH: trace("sds fetch: %d\n", program[pc]); - stack[sp++] = sds_fetch(program[pc++]); - break; - case BCSDSPUBLISH: trace("sds publish %d\n", program[pc]); - sds_publish(program[pc++], fd); - break; - case BCNOT: trace("not\n"); - stack[sp] = stack[sp] > 0 ? 0 : 1; - break; - case BCADD: trace("add\n"); - stack[sp-2] = stack[sp-1] + stack[sp-2]; - sp -= 1; - break; - case BCSUB: trace("sub\n"); - stack[sp-2] = stack[sp-1] - stack[sp-2]; - sp -= 1; - break; - case BCMUL: trace("mul\n"); - stack[sp-2] = stack[sp-1] * stack[sp-2]; - sp -= 1; - break; - case BCDIV: trace("div\n"); - stack[sp-2] = stack[sp-1] / stack[sp-2]; - sp -= 1; - break; - case BCAND: trace("and\n"); - stack[sp-2] = stack[sp-1] && stack[sp-2]; - sp -= 1; - break; - case BCOR: trace("or\n"); - stack[sp-2] = stack[sp-1] || stack[sp-2]; - sp -= 1; - break; - case BCEQ: trace("eq\n"); - stack[sp-2] = stack[sp-1] == stack[sp-2]; - sp -= 1; - break; - case BCNEQ: trace("neq\n"); - stack[sp-2] = stack[sp-1] != stack[sp-2]; - sp -= 1; - break; - case BCLES: trace("les\n"); - stack[sp-2] = stack[sp-1] < stack[sp-2]; - sp -= 1; - break; - case BCGRE: trace("gre\n"); - stack[sp-2] = stack[sp-1] > stack[sp-2]; - sp -= 1; - break; - case BCLEQ: trace("leq\n"); - stack[sp-2] = stack[sp-1] <= stack[sp-2]; - sp -= 1; - break; - case BCGEQ: trace("geq\n"); - stack[sp-2] = stack[sp-1] >= stack[sp-2]; - sp -= 1; - break; - case BCJMP: trace("jmp to %d\n", program[pc]); - pc = program[pc]-1; - break; - case BCJMPT: trace("jmpt to %d\n", program[pc]); - pc = stack[--sp] ? program[pc]-1 : pc+1; - break; - case BCJMPF: trace("jmpf to %d\n", program[pc]); - pc = stack[--sp] ? pc+1 : program[pc]-1; - break; - case BCSERIALAVAIL: trace("SerialAvailable()\n"); - break; - case BCSERIALPRINT: trace("SerialPrint()\n"); - break; - case BCSERIALPRINTLN: trace("SerialPrintln()\n"); - break; - case BCSERIALREAD: trace("SerialRead()\n"); - break; - case BCSERIALPARSEINT: trace("SerialParseInt()\n"); - break; - case BCANALOGREAD: trace("AnalogRead(%d)\n", program[pc]); - pc++; - break; - case BCANALOGWRITE: trace("AnalogWrite(%d)\n", program[pc]); - pc++; - break; - case BCDIGITALREAD: trace("DigitalRead(%d)\n", program[pc]); - pc++; - break; - case BCDIGITALWRITE: trace("DigitalWrite(%d)\n", program[pc]); - pc++; - break; - default: - trace("unrecognized\n"); - die("Unrecognized command: %d\n", program[pc-1]); - } - } - debug("Task terminated\n"); -}