Subversion Repositories aor3000

/*

 * This file is subject to the terms and conditions of the BSD License. See

 * the file "LICENSE" in the main directory of this archive for more details.

 *

 * Copyright (C) 2014 Aleksander Osman

 */

#include <cstdio>

#include <cstdlib>

#include "tests.h"

//------------------------------------------------------------------------------

void put_instruction(uint32 *ptr, bool &was_mul, bool &was_div) {

    uint32 instr_special[] = {

        0b000000, //SSL

        0b000010, //SRL

        0b000011, //SRA

        0b000100, //SLLV

        0b000110, //SRLV

        0b000111, //SRAV

        0b010000, //MFHI

        0b010001, //MTHI     i

        0b010010, //MFLO

        0b010011, //MTLO     i

        0b011000, //MULT     i

        0b011001, //MULTU    i

        0b011010, //DIV

        0b011011, //DIVU

        0b100000, //ADD      e

        0b100001, //ADDU

        0b100010, //SUB      e

        0b100011, //SUBU

        0b100100, //AND

        0b100101, //OR

        0b100110, //XOR

        0b100111, //NOR

        0b101010, //SLT

        0b101011, //SLTU

    };

    uint32 instr_imm[] = {

        0b001000, //ADDI     e

        0b001001, //ADDIU

        0b001010, //SLTI

        0b001011, //SLTIU

        0b001100, //ANDI

        0b001101, //ORI

        0b001110, //XORI

        0b001111, //LUI

    };

    while(true) {

        uint32 instr = rand() & 0x03FFFFFF;

        uint32 count = (sizeof(instr_special) + sizeof(instr_imm)) / sizeof(uint32);

        uint32 index = rand() % count;

        //sequences not generated:

        //mul* -> mt*; mul* -> div*

        //div* -> mt*; div* -> mul*

        //mul* and div* finish after mf*

        if(was_div == false && (index == 10 || index == 11)) was_mul = true;

        if(was_mul == false && (index == 12 || index == 13)) was_div = true;

        if(was_div && (index == 10 || index == 11)) continue;

        if(was_mul && (index == 12 || index == 13)) continue;

        if((was_div || was_mul) && (index == 7 || index == 9)) continue;

        if((index == 6 || index == 8)) was_div = was_mul = false;

        if(index >= (sizeof(instr_special) / sizeof(uint32))) {

            index -= (sizeof(instr_special) / sizeof(uint32));

            instr |= instr_imm[index] << 26;

            if(index == 7 || index == 9 || index == 10 || index == 11) if((rand() % 3) != 0) instr &= 0xFFFF07FF;

        }

        else {

            instr &= 0xFFFFFFC0;

            instr |= instr_special[index];

        }

        (*ptr) = instr;

        break;

    }

}

void arith_logic_till_exc_init(tst_t *tst, shared_mem_t *shared_ptr) {

    for(int i=1; i<32; i++) shared_ptr->initial.reg[i-1] = rand_uint32();

    shared_ptr->initial.pc = 0xA0001000;

    //tlb left zero

    shared_ptr->initial.index_p             = rand() & 0x1;

    shared_ptr->initial.index_index         = rand() & 0x3F;

    shared_ptr->initial.random              = rand() & 0x3F;

    shared_ptr->initial.entrylo_pfn         = rand() & 0xFFFFF;

    shared_ptr->initial.entrylo_n           = rand() & 0x1;

    shared_ptr->initial.entrylo_d           = rand() & 0x1;

    shared_ptr->initial.entrylo_v           = rand() & 0x1;

    shared_ptr->initial.entrylo_g           = rand() & 0x1;

    shared_ptr->initial.context_ptebase     = rand() & 0x7FF;

    shared_ptr->initial.context_badvpn      = rand() & 0x7FFFF;

    shared_ptr->initial.bad_vaddr           = rand_uint32();

    shared_ptr->initial.entryhi_vpn         = rand() & 0xFFFFF;

    shared_ptr->initial.entryhi_asid        = rand() & 0x3F;

    shared_ptr->initial.sr_cp_usable        = rand() & 0xF;

    shared_ptr->initial.sr_rev_endian       = rand() & 0x1;

    shared_ptr->initial.sr_bootstrap_vec    = rand() & 0x1;

    shared_ptr->initial.sr_tlb_shutdown     = rand() & 0x1;

    shared_ptr->initial.sr_parity_err       = rand() & 0x1;

    shared_ptr->initial.sr_cache_miss       = rand() & 0x1;

    shared_ptr->initial.sr_parity_zero      = rand() & 0x1;

    shared_ptr->initial.sr_switch_cache     = rand() & 0x1;

    shared_ptr->initial.sr_isolate_cache    = rand() & 0x1;

    shared_ptr->initial.sr_irq_mask         = rand() & 0xFF;

    shared_ptr->initial.sr_ku_ie            = rand() & 0x3F;

    shared_ptr->initial.cause_branch_delay  = rand() & 0x1;

    shared_ptr->initial.cause_cp_error      = rand() & 0x3;

    shared_ptr->initial.cause_irq_pending   = 0;

    shared_ptr->initial.cause_exc_code      = rand() & 0x1F;

    shared_ptr->initial.epc                 = rand_uint32();

    //

    shared_ptr->irq2_at_event = 0xFFFFFFFF;

    shared_ptr->irq3_at_event = 0xFFFFFFFF;

    //

    bool was_mul = false;

    bool was_div = false;

    //

    uint32 *ptr = &shared_ptr->mem.ints[(shared_ptr->initial.pc & 0x1FFFFFFF) / 4];

    for(int i=0; i<5; i++) {

        put_instruction(ptr, was_mul, was_div);

        ptr++;

    }

    //finish with SYSCALL or BREAK

    (*ptr) = rand() & 0x03FFFFC0;

    if(rand() % 2)  (*ptr) |= 0b001100;

    else            (*ptr) |= 0b001101;

}

//------------------------------------------------------------------------------

//------------------------------------------------------------------------------

//------------------------------------------------------------------------------

//------------------------------------------------------------------------------