Subversion Repositories or1k

/* branch_predict.c -- branch prediction simulation

   Copyright (C) 1999 Damjan Lampret, lampret@opencores.org

This file is part of OpenRISC 1000 Architectural Simulator.

This program is free software; you can redistribute it and/or modify

it under the terms of the GNU General Public License as published by

the Free Software Foundation; either version 2 of the License, or

(at your option) any later version.

This program is distributed in the hope that it will be useful,

but WITHOUT ANY WARRANTY; without even the implied warranty of

MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the

GNU General Public License for more details.

You should have received a copy of the GNU General Public License

along with this program; if not, write to the Free Software

Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA. */

/* Branch prediction functions.

   At the moment this functions only simulate functionality of branch

   prediction and do not influence on fetche/decode/execute stages.

   They are here only to verify performance of various branch

   prediction configurations.

 */

#include <stdio.h>

#include <string.h>

#include <errno.h>

#include <stdarg.h>

#include "config.h"

#ifdef HAVE_INTTYPES_H

#include <inttypes.h>

#endif

#include "port.h"

#include "arch.h"

#include "branch_predict.h"

#include "abstract.h"

#include "opcode/or32.h"

#include "stats.h"

#include "sim-config.h"

/* Branch prediction buffer */

/* Length of BPB */

#define BPB_LEN 64

/* Number of BPB ways (1, 2, 3 etc.). */

#define BPB_WAYS 1

/* Number of prediction states (2, 4, 8 etc.). */

#define BPB_PSTATES 2

/* Number of usage states (2, 3, 4 etc.). */

#define BPB_USTATES 2

/* branch prediction buffer entry */

struct bpb_entry {

        struct {

                oraddr_t addr;          /* address of a branch insn */

                int taken;              /* taken == 1, not taken == 0  OR */

                                        /* strongly taken == 3, taken == 2,

                                           not taken == 1, strongly not taken == 0 */

                int lru;                /* least recently == 0 */

        } way[BPB_WAYS];

} bpb[BPB_LEN];

void bpb_info()

{

        if (!config.bpb.enabled) {

                PRINTF("BPB not simulated. Check -bpb option.\n");

                return;

        }

        PRINTF("BPB %d bytes: ", BPB_LEN * BPB_WAYS * (BPB_PSTATES + BPB_USTATES) / 8);

        PRINTF("%d ways, %d sets, %d bits/prediction\n", BPB_WAYS, BPB_LEN, BPB_PSTATES + BPB_USTATES);

}

/* First check if branch is already in the cache and if it is:

    - increment BPB hit stats,

    - set 'lru' at this way to BPB_USTATES - 1 and

      decrement 'lru' of other ways unless they have reached 0,

    - increment correct/incorrect stats according to BPB 'taken' field

      and 'taken' variable,

    - increment or decrement BPB taken field according to 'taken' variable

   and if not:

    - increment BPB miss stats

    - find lru way and entry and replace old address with 'addr' and

      'taken' field with (BPB_PSTATES/2 - 1) + 'taken'

    - set 'lru' with BPB_USTATES - 1 and decrement 'lru' of other

      ways unless they have reached 0

*/

void bpb_update(oraddr_t addr, int taken)

{

        int entry, way = -1;

        int i;

        /* BPB simulation enabled/disabled. */

        if (!config.bpb.enabled)

                return;

        /* Calc entry. */

        entry = addr % BPB_LEN;

        /* Scan all ways and try to find our addr. */

        for (i = 0; i < BPB_WAYS; i++)

                if (bpb[entry].way[i].addr == addr)

                        way = i;

        /* Did we find our cached branch? */

        if (way >= 0) { /* Yes, we did. */

                or1k_mstats.bpb.hit++;

                for (i = 0; i < BPB_WAYS; i++)

                        if (bpb[entry].way[i].lru)

                                bpb[entry].way[i].lru--;

                bpb[entry].way[way].lru = BPB_USTATES - 1;

                if (bpb[entry].way[way].taken / (BPB_PSTATES / 2) == taken)

                        or1k_mstats.bpb.correct++;

                else

                        or1k_mstats.bpb.incorrect++;

                if (taken && (bpb[entry].way[way].taken < BPB_PSTATES - 1))

                        bpb[entry].way[way].taken++;

                else

                if (!taken && (bpb[entry].way[way].taken))

                        bpb[entry].way[way].taken--;

        }

        else {  /* No, we didn't. */

                int minlru = BPB_USTATES - 1;

                int minway = 0;

                or1k_mstats.bpb.miss++;

                for (i = 0; i < BPB_WAYS; i++)

                        if (bpb[entry].way[i].lru < minlru)

                                minway = i;

                bpb[entry].way[minway].addr = addr;

                bpb[entry].way[minway].taken = (BPB_PSTATES / 2 - 1) + taken;

                for (i = 0; i < BPB_WAYS; i++)

                        if (bpb[entry].way[i].lru)

                                bpb[entry].way[i].lru--;

                bpb[entry].way[minway].lru = BPB_USTATES - 1;

        }

}

/* Branch target instruction cache */

/* Length of BTIC */

#define BTIC_LEN 128

/* Number of BTIC ways (1, 2, 3 etc.). */

#define BTIC_WAYS 2

/* Number of usage states (2, 3, 4 etc.). */

#define BTIC_USTATES 2

/* Target block size in bytes. */

#define BTIC_BLOCKSIZE 4

struct btic_entry {

        struct {

                oraddr_t addr;          /* cached target address of a branch */

                int lru;                /* least recently used */

                char *insn;             /* cached insn at target address (not used currently) */

        } way[BTIC_WAYS];

} btic[BTIC_LEN];

void btic_info()

{

        if (!config.bpb.btic) {

                PRINTF("BTIC not simulated. Check --btic option.\n");

                return;

        }

        PRINTF("BTIC %d bytes: ", BTIC_LEN * BTIC_WAYS * (BTIC_USTATES + BTIC_BLOCKSIZE * 8) / 8);

        PRINTF("%d ways, %d sets, %d bits/target\n", BTIC_WAYS, BTIC_LEN, BTIC_USTATES + BTIC_BLOCKSIZE * 8);

}

/* First check if target addr is already in the cache and if it is:

    - increment BTIC hit stats,

    - set 'lru' at this way to BTIC_USTATES - 1 and

      decrement 'lru' of other ways unless they have reached 0,

   and if not:

    - increment BTIC miss stats

    - find lru way and entry and replace old address with 'addr' and

      'insn' with NULL

    - set 'lru' with BTIC_USTATES - 1 and decrement 'lru' of other

      ways unless they have reached 0

*/

void btic_update(oraddr_t targetaddr)

{

        int entry, way = -1;

        int i;

        /* BTIC simulation enabled/disabled. */

        if (!config.bpb.btic)

                return;

        /* Calc entry. */

        entry = targetaddr % BTIC_LEN;

        /* Scan all ways and try to find our addr. */

        for (i = 0; i < BTIC_WAYS; i++)

                if (btic[entry].way[i].addr == targetaddr)

                        way = i;

        /* Did we find our cached branch? */

        if (way >= 0) { /* Yes, we did. */

                or1k_mstats.btic.hit++;

                for (i = 0; i < BTIC_WAYS; i++)

                        if (btic[entry].way[i].lru)

                                btic[entry].way[i].lru--;

                btic[entry].way[way].lru = BTIC_USTATES - 1;

        }

        else {  /* No, we didn't. */

                int minlru = BTIC_USTATES - 1;

                int minway = 0;

                or1k_mstats.btic.miss++;

                for (i = 0; i < BTIC_WAYS; i++)

                        if (btic[entry].way[i].lru < minlru)

                                minway = i;

                btic[entry].way[minway].addr = targetaddr;

                btic[entry].way[minway].insn = NULL;

                for (i = 0; i < BTIC_WAYS; i++)

                        if (btic[entry].way[i].lru)

                                btic[entry].way[i].lru--;

                btic[entry].way[minway].lru = BTIC_USTATES - 1;

        }

}

/*----------------------------------------------------[ BPB configuration ]---*/

void bpb_enabled(union param_val val, void *dat)

{

  config.bpb.enabled = val.int_val;

}

void bpb_btic(union param_val val, void *dat)

{

  config.bpb.btic = val.int_val;

}

void bpb_sbp_bnf_fwd(union param_val val, void *dat)

{

  config.bpb.sbp_bnf_fwd = val.int_val;

}

void bpb_sbp_bf_fwd(union param_val val, void *dat)

{

  config.bpb.sbp_bf_fwd = val.int_val;

}

void bpb_missdelay(union param_val val, void *dat)

{

  config.bpb.missdelay = val.int_val;

}

void bpb_hitdelay(union param_val val, void *dat)

{

  config.bpb.hitdelay = val.int_val;

}

void reg_bpb_sec(void)

{

  struct config_section *sec = reg_config_sec("bpb", NULL, NULL);

  reg_config_param(sec, "enabled", paramt_int, bpb_enabled);

  reg_config_param(sec, "btic", paramt_int, bpb_btic);

  reg_config_param(sec, "sbp_bnf_fwd", paramt_int, bpb_sbp_bnf_fwd);

  reg_config_param(sec, "sbp_bf_fwd", paramt_int, bpb_sbp_bf_fwd);

  reg_config_param(sec, "missdelay", paramt_int, bpb_missdelay);

  reg_config_param(sec, "hitdelay", paramt_int, bpb_hitdelay);

}