Universal Machine VM

#include <cstring>
#include <cstdio>
#include <vector>
#include "./getch.h"
#define Ar reg[cr[0]]
#define Br reg[cr[1]]
#define Cr reg[cr[2]]
#define ui32 unsigned int
using namespace std;
void resize(ui32** op,ui32 os, ui32 &ms){
    ui32** tmp;
    tmp = new ui32*[os];
    memcpy(tmp, op, os*sizeof(ui32*));
    delete[] op;
    op = new ui32*[os*2];
    memcpy(op, tmp, (os*2)*sizeof(ui32*));
    delete[] tmp;
    ms*=2;
}
int main(int argc, char** argv){
    bool created = false;
    int startsz = 1024;
    ui32** arrays;
    vector<int> sz;
    ui32 masz = 32;
    ui32 asz = 1;
    arrays = new ui32*[32];
    unsigned int reg[8];
    memset(reg,0,32);
    unsigned int cr[3];
    unsigned char buf[4];
    FILE * fp = fopen(argv[1],"rb");
    int count = 0;
    arrays[0]=new ui32[startsz];
    sz.push_back(startsz);
    while(fread(buf, 4, 1, fp)){
        unsigned int c = 0;
        for(int i = 0; i < 4; i++){
            c = (c<<8)|buf[i];
        }
        arrays[0][count]=c;
        count++;
        sz[0]=count;
        if(count>=startsz){
            ui32 * tmp = new ui32[startsz];
            memcpy(tmp,arrays[0],sz[0]*4);
            delete[] arrays[0];
            arrays[0] = new ui32[startsz*2];
            memcpy(arrays[0],tmp,sz[0]*4);
            if(memcmp(tmp,arrays[0],startsz*4)){
                printf("fix your expand code!\n");
            }
            delete[] tmp;
            startsz*=2;
            //printf("sz[0] %i\n",sz[0]);
        }
    }
    //printf("sz[0] %i\n",sz[0]);
    int expos = 0;
    int op=0;
    while(expos < sz[0]){
        memset(cr,0,12);
        op = (arrays[0][expos]>>28);
        if(op>13 || op<0){
            printf("Invalid OPCODE %d\n",op);
            return 1;
        }
        if(op<13){
            cr[0] = (arrays[0][expos]>>6)&7;
            cr[1] = (arrays[0][expos]>>3)&7;
            cr[2] = (arrays[0][expos]>>0)&7;
            expos++;
            switch(op){
                case 0:
                    if(Cr)
                        Ar = Br;
                    break;
                case 1:
                    Ar = arrays[Br][Cr];
                    break;
                case 2:
                    if (Br>sz[Ar]){
                        printf("\nInvalid Access, point to reach: %u, size of array: %u\n", Br, sz[Ar]);
                        for(int i = 0; i < asz; i++){
                            printf("I: %d, sz: %u\n",i,sz[i]);
                        }
                        return 1;
                    }
                    arrays[Ar][Br]=Cr;
                    break;
                case 3:
                    Ar = Br+Cr;
                    break;
                case 4:
                    Ar = Br*Cr;
                    break;
                case 5:
                    Ar = Br/Cr;
                    break;
                case 6:
                    Ar = ~(Br&Cr);
                    break;
                case 7:
                    return 0;
                    break;
                case 8:
                    //printf("Old size: %u ",asz);
                    created=false;
                    for(int i = 0; i < asz;i++){
                        if(sz[i]==0&&!created){
                            created = true;
                            arrays[i] = new ui32[Cr];
                            memset(arrays[i],0,Cr*4);
                            Br = i;
                            sz[i]=Cr;
                        }
                    }
                    if(!created){
                        Br = asz;
                        arrays[asz] = new ui32[Cr];
                        memset(arrays[asz],0,Cr*4);
                        sz.push_back(Cr);
                        asz++;
                        if(asz >= masz){
                            resize(arrays, asz, masz);
                        }
                    }
                    /*printf("New size: %u, Cr: %u\n",asz, Cr);
                    for(int i = 0; i < asz; i++){
                            printf("I: %d, sz: %u\n",i,sz[i]);
                        }*/

                    break;
                case 9:
                    delete[] arrays[Cr];
                    sz[Cr]=0;
                    break;
                case 10:
                    printf("%c",(unsigned char)Cr);
                    break;
                case 11:
                    Cr = mygetch();
                    break;
                case 12:
                    expos=Cr;
                    sz[0] = sz[Br];
                    if(Br==0)
                        break;
                    delete[] arrays[0];
                    arrays[0] = new ui32[sz[Br]];
                    memcpy(arrays[0],arrays[Br],sz[Br]*4);
                    break;
            }
            //printf("Op: %d\n",op);
        }
        else{
           cr[0] = (arrays[0][expos]>>25)&7;
           Ar    = (arrays[0][expos]&0x01ffffff);
           expos++;
        }
    }
}