summaryrefslogtreecommitdiffstats
path: root/c/src/lib/libbsp/sparc/shared/l2c/l2c.c
diff options
context:
space:
mode:
Diffstat (limited to 'c/src/lib/libbsp/sparc/shared/l2c/l2c.c')
-rw-r--r--c/src/lib/libbsp/sparc/shared/l2c/l2c.c2110
1 files changed, 0 insertions, 2110 deletions
diff --git a/c/src/lib/libbsp/sparc/shared/l2c/l2c.c b/c/src/lib/libbsp/sparc/shared/l2c/l2c.c
deleted file mode 100644
index 0c577f360d..0000000000
--- a/c/src/lib/libbsp/sparc/shared/l2c/l2c.c
+++ /dev/null
@@ -1,2110 +0,0 @@
-/*
- * GRLIB L2CACHE Driver
- *
- * COPYRIGHT (c) 2017
- * Cobham Gaisler AB
- *
- * The license and distribution terms for this file may be
- * found in the file LICENSE in this distribution or at
- * http://www.rtems.org/license/LICENSE.
- */
-
-#include <stdlib.h>
-#include <string.h>
-#include <drvmgr/drvmgr.h>
-#include <drvmgr/ambapp_bus.h>
-#include <ambapp.h>
-#include <rtems.h>
-#include <rtems/bspIo.h>
-#include <grlib.h>
-#include <bsp.h>
-#include <bsp/l2c.h>
-
-/*#define STATIC*/
-#define STATIC static
-
-/*#define INLINE*/
-#define INLINE inline
-
-#define UNUSED __attribute__((unused))
-
-/*#define DEBUG 1*/
-
-#ifdef DEBUG
-#define DBG(x...) printf(x)
-#else
-#define DBG(x...)
-#endif
-
-/*
- * L2CACHE CTRL register fields
- */
-#define L2C_CTRL_EN (0x1 << L2C_CTRL_EN_BIT)
-#define L2C_CTRL_EDAC (0x1 << L2C_CTRL_EDAC_BIT)
-#define L2C_CTRL_REPL (0x3 << L2C_CTRL_REPL_BIT)
-#define L2C_CTRL_IWAY (0xf << L2C_CTRL_IWAY_BIT)
-#define L2C_CTRL_LOCK (0xf << L2C_CTRL_LOCK_BIT)
-#define L2C_CTRL_HPRHB (0x1 << L2C_CTRL_HPRHB_BIT)
-#define L2C_CTRL_HPB (0x1 << L2C_CTRL_HPB_BIT)
-#define L2C_CTRL_UC (0x1 << L2C_CTRL_UC_BIT)
-#define L2C_CTRL_HC (0x1 << L2C_CTRL_HC_BIT)
-#define L2C_CTRL_WP (0x1 << L2C_CTRL_WP_BIT)
-#define L2C_CTRL_HP (0x1 << L2C_CTRL_HP_BIT)
-
-#define L2C_CTRL_EN_BIT 31
-#define L2C_CTRL_EDAC_BIT 30
-#define L2C_CTRL_REPL_BIT 28
-#define L2C_CTRL_IWAY_BIT 12
-#define L2C_CTRL_LOCK_BIT 8
-#define L2C_CTRL_HPRHB_BIT 5
-#define L2C_CTRL_HPB_BIT 4
-#define L2C_CTRL_UC_BIT 3
-#define L2C_CTRL_HC_BIT 2
-#define L2C_CTRL_WP_BIT 1
-#define L2C_CTRL_HP_BIT 0
-
-/*
- * L2CACHE STATUS register fields
- */
-#define L2C_STAT_LS (0x1 << L2C_STAT_LS_BIT)
-#define L2C_STAT_AT (0x1 << L2C_STAT_AT_BIT)
-#define L2C_STAT_MP (0x1 << L2C_STAT_MP_BIT)
-#define L2C_STAT_MTRR (0x3f << L2C_STAT_MTRR_BIT)
-#define L2C_STAT_BBUSW (0x7 << L2C_STAT_BBUSW_BIT)
-#define L2C_STAT_WAYSIZE (0x7ff << L2C_STAT_WAYSIZE_BIT)
-#define L2C_STAT_WAY (0x3 << L2C_STAT_WAY_BIT)
-
-#define L2C_STAT_LS_BIT 24
-#define L2C_STAT_AT_BIT 23
-#define L2C_STAT_MP_BIT 22
-#define L2C_STAT_MTRR_BIT 16
-#define L2C_STAT_BBUSW_BIT 13
-#define L2C_STAT_WAYSIZE_BIT 2
-#define L2C_STAT_WAY_BIT 0
-
-/*
- * L2CACHE MTRR register fields
- */
-#define L2C_MTRR_ADDR (0x3fff << L2C_MTRR_ADDR_BIT)
-#define L2C_MTRR_ACC (0x3 << L2C_MTRR_ACC_BIT)
-#define L2C_MTRR_MASK (0x3fff << L2C_MTRR_MASK_BIT)
-#define L2C_MTRR_WP (0x1 << L2C_MTRR_WP_BIT)
-#define L2C_MTRR_AC (0x1 << L2C_MTRR_AC_BIT)
-
-#define L2C_MTRR_ADDR_BIT 18
-#define L2C_MTRR_ACC_BIT 16
-#define L2C_MTRR_MASK_BIT 2
-#define L2C_MTRR_WP_BIT 1
-#define L2C_MTRR_AC_BIT 0
-
-#define L2C_MTRR_UNCACHED 0
-#define L2C_MTRR_WRITETHROUGH (0x1 << L2C_MTRR_ACC_BIT)
-#define L2C_MTRR_WRITEPROT_ENABLE L2C_MTRR_WP
-#define L2C_MTRR_WRITEPROT_DISABLE 0
-#define L2C_MTRR_ACCESSCONTROL_ENABLE L2C_MTRR_AC
-#define L2C_MTRR_ACCESSCONTROL_DISABLE 0
-
-#define REG_WRITE(addr, val) (*(volatile unsigned int *)(addr) = (unsigned int)(val))
-#define REG_READ(addr) (*(volatile unsigned int *)(addr))
-
-/*
- * L2CACHE FLUSHMEM register fields
- */
-#define L2C_FLUSH_ADDR (0x7ffffff << L2C_FLUSH_ADDR_BIT)
-#define L2C_FLUSH_DI (0x1 << L2C_FLUSH_DI_BIT)
-#define L2C_FLUSH_FMODE (0x7 << L2C_FLUSH_FMODE_BIT)
-
-#define L2C_FLUSH_ADDR_BIT 5
-#define L2C_FLUSH_DI_BIT 3
-#define L2C_FLUSH_FMODE_BIT 0
-
-#define L2C_FLUSH_FMODE_INV_ONE (0x1 << L2C_FLUSH_FMODE_BIT)
-#define L2C_FLUSH_FMODE_WB_ONE (0x2 << L2C_FLUSH_FMODE_BIT)
-#define L2C_FLUSH_FMODE_INV_WB_ONE (0x3 << L2C_FLUSH_FMODE_BIT)
-#define L2C_FLUSH_FMODE_INV_ALL (0x5 << L2C_FLUSH_FMODE_BIT)
-#define L2C_FLUSH_FMODE_WB_ALL (0x6 << L2C_FLUSH_FMODE_BIT)
-#define L2C_FLUSH_FMODE_INV_WB_ALL (0x7 << L2C_FLUSH_FMODE_BIT)
-
-/*
- * L2CACHE FLUSSETINDEX register fields
- */
-#define L2C_FLUSHSI_INDEX (0xffff << L2C_FLUSHSI_INDEX_BIT)
-#define L2C_FLUSHSI_TAG (0x3fffff << L2C_FLUSHSI_TAG_BIT)
-#define L2C_FLUSHSI_FL (0x1 << L2C_FLUSHSI_FL_BIT)
-#define L2C_FLUSHSI_VB (0x1 << L2C_FLUSHSI_VB_BIT)
-#define L2C_FLUSHSI_DB (0x1 << L2C_FLUSHSI_DB_BIT)
-#define L2C_FLUSHSI_WAY (0x3 << L2C_FLUSHSI_WAY_BIT)
-#define L2C_FLUSHSI_DI (0x1 << L2C_FLUSHSI_DI_BIT)
-#define L2C_FLUSHSI_WF (0x1 << L2C_FLUSHSI_WF_BIT)
-#define L2C_FLUSHSI_FMODE (0x3 << L2C_FLUSHSI_FMODE_BIT)
-
-#define L2C_FLUSHSI_INDEX_BIT 16
-#define L2C_FLUSHSI_TAG_BIT 10
-#define L2C_FLUSHSI_FL_BIT 9
-#define L2C_FLUSHSI_VB_BIT 8
-#define L2C_FLUSHSI_DB_BIT 7
-#define L2C_FLUSHSI_WAY_BIT 4
-#define L2C_FLUSHSI_DI_BIT 3
-#define L2C_FLUSHSI_WF_BIT 2
-#define L2C_FLUSHSI_FMODE_BIT 0
-
-#define L2C_FLUSHSI_FMODE_SET_INV_ONE (0x1 << L2C_FLUSHSI_FMODE_BIT)
-#define L2C_FLUSHSI_FMODE_SET_WB_ONE (0x2 << L2C_FLUSHSI_FMODE_BIT)
-#define L2C_FLUSHSI_FMODE_SET_INV_WB_ONE (0x3 << L2C_FLUSHSI_FMODE_BIT)
-#define L2C_FLUSHSI_FMODE_WAY_UPDATE (0x1 << L2C_FLUSHSI_FMODE_BIT)
-#define L2C_FLUSHSI_FMODE_WAY_WB (0x2 << L2C_FLUSHSI_FMODE_BIT)
-#define L2C_FLUSHSI_FMODE_WAY_UPDATE_WB_ALL (0x3 << L2C_FLUSHSI_FMODE_BIT)
-
-/*
- * L2CACHE ERROR register fields
- */
-#define L2C_ERROR_AHBM (0xf << L2C_ERROR_AHBM_BIT)
-#define L2C_ERROR_SCRUB (0x1 << L2C_ERROR_SCRUB_BIT)
-#define L2C_ERROR_TYPE (0x7 << L2C_ERROR_TYPE_BIT)
-#define L2C_ERROR_TAG (0x1 << L2C_ERROR_TAG_BIT)
-#define L2C_ERROR_COR (0x1 << L2C_ERROR_COR_BIT)
-#define L2C_ERROR_MULTI (0x1 << L2C_ERROR_MULTI_BIT)
-#define L2C_ERROR_VALID (0x1 << L2C_ERROR_VALID_BIT)
-#define L2C_ERROR_DISERESP (0x1 << L2C_ERROR_DISERESP_BIT)
-#define L2C_ERROR_CEC (0x7 << L2C_ERROR_CEC_BIT)
-#define L2C_ERROR_IRQP (0xf << L2C_ERROR_IRQP_BIT)
-#define L2C_ERROR_IRQM (0xf << L2C_ERROR_IRQM_BIT)
-#define L2C_ERROR_IRQM_BCKEND (0x1 << L2C_ERROR_IRQM_BCKEND_BIT)
-#define L2C_ERROR_IRQM_WPROT (0x1 << L2C_ERROR_IRQM_WPROT_BIT)
-#define L2C_ERROR_IRQM_UNCORR (0x1 << L2C_ERROR_IRQM_UNCORR_BIT)
-#define L2C_ERROR_IRQM_CORR (0x1 << L2C_ERROR_IRQM_CORR_BIT)
-#define L2C_ERROR_SCB (0x3 << L2C_ERROR_SCB_BIT)
-#define L2C_ERROR_STCB (0x3 << L2C_ERROR_STCB_BIT)
-#define L2C_ERROR_XCB (0x1 << L2C_ERROR_XCB_BIT)
-#define L2C_ERROR_RCB (0x1 << L2C_ERROR_RCB_BIT)
-#define L2C_ERROR_COMP (0x1 << L2C_ERROR_COMP_BIT)
-#define L2C_ERROR_RST (0x1 << L2C_ERROR_RST_BIT)
-
-#define L2C_ERROR_AHBM_BIT 28
-#define L2C_ERROR_SCRUB_BIT 27
-#define L2C_ERROR_TYPE_BIT 24
-#define L2C_ERROR_TAG_BIT 23
-#define L2C_ERROR_COR_BIT 22
-#define L2C_ERROR_MULTI_BIT 21
-#define L2C_ERROR_VALID_BIT 20
-#define L2C_ERROR_DISERESP_BIT 19
-#define L2C_ERROR_CEC_BIT 16
-#define L2C_ERROR_IRQP_BIT 12
-#define L2C_ERROR_IRQM_BCKEND_BIT 11
-#define L2C_ERROR_IRQM_WPROT_BIT 10
-#define L2C_ERROR_IRQM_UNCORR_BIT 9
-#define L2C_ERROR_IRQM_CORR_BIT 8
-#define L2C_ERROR_IRQM_BIT 8
-#define L2C_ERROR_SCB_BIT 6
-#define L2C_ERROR_STCB_BIT 4
-#define L2C_ERROR_XCB_BIT 3
-#define L2C_ERROR_RCB_BIT 2
-#define L2C_ERROR_COMP_BIT 1
-#define L2C_ERROR_RST_BIT 0
-
-/*
- * L2CACHE DATA CHECK BITS register fields
- */
-#define L2C_DCB_CB (0xfffffff << L2C_DCB_CB_BIT)
-
-#define L2C_DCB_CB_BIT 0
-
-/*
- * L2CACHE SCRUB register fields
- */
-#define L2C_SCRUB_INDEX (0xffff << L2C_SCRUB_INDEX_BIT)
-#define L2C_SCRUB_WAY (0x3 << L2C_SCRUB_WAY_BIT)
-#define L2C_SCRUB_PEN (0x1 << L2C_SCRUB_PEN_BIT)
-#define L2C_SCRUB_EN (0x1 << L2C_SCRUB_EN_BIT)
-
-#define L2C_SCRUB_INDEX_BIT 16
-#define L2C_SCRUB_WAY_BIT 2
-#define L2C_SCRUB_PEN_BIT 1
-#define L2C_SCRUB_EN_BIT 0
-
-/*
- * L2CACHE SCRUBDELAY register fields
- */
-#define L2C_SCRUB_DEL (0xffff << L2C_SCRUB_DEL_BIT)
-
-#define L2C_SCRUB_DEL_BIT 0
-
-/*
- * L2CACHE ERROR INJECT register fields
- */
-#define L2C_ERRINJ_ADDR (0x3fffffff << L2C_ERRINJ_ADDR_BIT)
-#define L2C_ERRINJ_EN (0x1 << L2C_ERRINJ_EN_BIT)
-
-#define L2C_ERRINJ_ADDR_BIT 2
-#define L2C_ERRINJ_EN_BIT 0
-
-/*
- * L2CACHE ACCESS CONTROL register fields
- */
-#define L2C_ACCCTRL_SPLITQ (0x1 << L2C_ACCCTRL_SPLITQ_BIT)
-#define L2C_ACCCTRL_NHM (0x1 << L2C_ACCCTRL_NHM_BIT)
-#define L2C_ACCCTRL_BERR (0x1 << L2C_ACCCTRL_BERR_BIT)
-#define L2C_ACCCTRL_OAPM (0x1 << L2C_ACCCTRL_OAPM_BIT)
-#define L2C_ACCCTRL_FLINE (0x1 << L2C_ACCCTRL_FLINE_BIT)
-#define L2C_ACCCTRL_DBPF (0x1 << L2C_ACCCTRL_DBPF_BIT)
-#define L2C_ACCCTRL_128WF (0x1 << L2C_ACCCTRL_128WF_BIT)
-#define L2C_ACCCTRL_DBPWS (0x1 << L2C_ACCCTRL_DBPWS_BIT)
-#define L2C_ACCCTRL_SPLIT (0x1 << L2C_ACCCTRL_SPLIT_BIT)
-
-#define L2C_ACCCTRL_SPLITQ_BIT 10
-#define L2C_ACCCTRL_NHM_BIT 9
-#define L2C_ACCCTRL_BERR_BIT 8
-#define L2C_ACCCTRL_OAPM_BIT 7
-#define L2C_ACCCTRL_FLINE_BIT 6
-#define L2C_ACCCTRL_DBPF_BIT 5
-#define L2C_ACCCTRL_128WF_BIT 4
-#define L2C_ACCCTRL_DBPWS_BIT 2
-#define L2C_ACCCTRL_SPLIT_BIT 1
-
-#ifdef TEST_L2CACHE
-/*
- * L2CACHE TAG fields
- */
-#define L2C_TAG_TAG (0xfffffc << L2C_TAG_TAG_BIT)
-#define L2C_TAG_VALID (0x3 << L2C_TAG_VALID_BIT)
-#define L2C_TAG_DIRTY (0x3 << L2C_TAG_DIRTY_BIT)
-#define L2C_TAG_LRU (0x3 << L2C_TAG_LRU_BIT)
-
-#define L2C_TAG_TAG_BIT 10
-#define L2C_TAG_VALID_BIT 8
-#define L2C_TAG_DIRTY_BIT 6
-#define L2C_TAG_LRU_BIT 0
-
-#endif /* TEST_L2CACHE */
-
-#define DEVNAME_LEN 9
-/*
- * L2CACHE Driver private data struture
- */
-struct l2cache_priv {
- struct drvmgr_dev *dev;
- char devname[DEVNAME_LEN];
-
- /* L2CACHE control registers */
- struct l2c_regs *regs;
-
- /* L2CACHE status */
- int ways;
- int waysize;
- int linesize;
- int index;
- int mtrr;
- int ft_support;
- int split_support;
-
- /* User defined ISR */
- l2cache_isr_t isr;
- void *isr_arg;
-};
-
-/*
- * L2CACHE internal prototypes
- */
-/* -Register access functions */
-STATIC INLINE int l2cache_reg_ctrl_enable(void);
-STATIC INLINE int l2cache_reg_ctrl_disable(void);
-STATIC INLINE int l2cache_reg_ctrl_locked_set(int locked);
-STATIC INLINE int l2cache_reg_ctrl_edac_set(int edac);
-STATIC INLINE int l2cache_reg_ctrl_repl(int policy);
-STATIC INLINE int l2cache_reg_ctrl_iway(int way);
-STATIC INLINE int l2cache_reg_ctrl_writep(int policy);
-STATIC INLINE unsigned int l2cache_reg_ctrl(void);
-STATIC INLINE unsigned int l2cache_reg_status(void);
-STATIC INLINE int l2cache_reg_mtrr_set(int index, unsigned int addr,
- unsigned int mask, int options);
-UNUSED STATIC INLINE unsigned int l2cache_reg_mtrr_get(int index);
-STATIC INLINE int l2cache_reg_flushmem(unsigned int addr, int options);
-STATIC INLINE int l2cache_reg_flushline(int way, int index, int options);
-STATIC INLINE int l2cache_reg_flushway(unsigned int tag, int way, int options);
-STATIC INLINE unsigned int l2cache_reg_error(void);
-STATIC INLINE int l2cache_reg_error_reset(void);
-STATIC INLINE int l2cache_reg_error_irqmask(int mask);
-STATIC INLINE unsigned int l2cache_reg_error_addr(void);
-STATIC INLINE unsigned int l2cache_reg_scrub(void);
-STATIC INLINE int l2cache_reg_scrub_enable(int delay);
-STATIC INLINE int l2cache_reg_scrub_disable(void);
-STATIC INLINE unsigned int l2cache_reg_scrub_delay(void);
-STATIC INLINE int l2cache_reg_scrub_line(int way, int index);
-STATIC INLINE unsigned int l2cache_reg_accctrl(void);
-STATIC INLINE int l2cache_reg_accctrl_split_disable(void);
-STATIC INLINE int l2cache_reg_accctrl_split_enable(void);
-#ifdef TEST_L2CACHE
-STATIC INLINE int l2cache_reg_error_dcb(unsigned int cb);
-STATIC INLINE int l2cache_reg_error_inject(unsigned int addr);
-STATIC INLINE unsigned int l2cache_reg_diagtag(int way, int index);
-STATIC INLINE unsigned int l2cache_reg_diagdata(int way, int index, int word);
-STATIC unsigned int log2int(unsigned int v);
-#endif /* TEST_L2CACHE */
-
-/* -Control functions */
-STATIC int l2cache_ctrl_status(void);
-STATIC void l2cache_flushwait(void);
-
-/* -Init function */
-STATIC int l2cache_init(struct l2cache_priv *priv);
-
-/* -Init function called by drvmgr */
-int l2cache_init1(struct drvmgr_dev *dev);
-
-/* -IRQ handler */
-void l2cache_isr(void *arg);
-
-/*
- * L2CACHE static members
- */
-static struct l2cache_priv *l2cachepriv = NULL;
-#ifdef DEBUG
-static char * repl_names[4] = {"LRU","Random","Master-Idx-1","Master-IDx-2"};
-#endif
-
-/* L2CACHE DRIVER */
-
-struct drvmgr_drv_ops l2cache_ops =
-{
- .init = {l2cache_init1, NULL, NULL, NULL},
- .remove = NULL,
- .info = NULL
-};
-
-struct amba_dev_id l2cache_ids[] =
-{
- {VENDOR_GAISLER, GAISLER_L2CACHE},
- {0, 0} /* Mark end of table */
-};
-
-struct amba_drv_info l2cache_info =
-{
- {
- DRVMGR_OBJ_DRV, /* Driver */
- NULL, /* Next driver */
- NULL, /* Device list */
- DRIVER_AMBAPP_GAISLER_L2CACHE_ID,/* Driver ID */
- "L2CACHE_DRV", /* Driver Name */
- DRVMGR_BUS_TYPE_AMBAPP, /* Bus Type */
- &l2cache_ops,
- NULL, /* Funcs */
- 0, /* No devices yet */
- sizeof(struct l2cache_priv), /* Make drvmgr alloc private */
- },
- &l2cache_ids[0]
-};
-
-void l2cache_register_drv(void)
-{
- DBG("Registering L2CACHE driver\n");
- drvmgr_drv_register(&l2cache_info.general);
-}
-
-/* Initializes the L2CACHE core and driver
- *
- * Return values
- * 0 Successful initalization
- */
-STATIC int l2cache_init(struct l2cache_priv *priv)
-{
- struct ambapp_ahb_info *ahb;
- struct amba_dev_info *ainfo = priv->dev->businfo;
-
- /* Find L2CACHE core from Plug&Play information */
- ahb = ainfo->info.ahb_slv;
-
- /* Found L2CACHE core, init private structure */
- priv->regs = (struct l2c_regs *)ahb->start[1];
-
- /* Initialize L2CACHE status */
- unsigned int status = l2cache_reg_status();
- priv->ways = (status & L2C_STAT_WAY) + 1;
- priv->waysize =
- ((status & L2C_STAT_WAYSIZE) >> L2C_STAT_WAYSIZE_BIT) * 1024;
- priv->linesize = ((status & L2C_STAT_LS)? 64 : 32);
- priv->index = ((priv->waysize)/(priv->linesize));
- priv->mtrr = (status & L2C_STAT_MTRR) >> L2C_STAT_MTRR_BIT;
- priv->ft_support = (status & L2C_STAT_MP) >> L2C_STAT_MP_BIT;
-
- /* Probe split support. */
- int split_old = 0;
- int split_new = 0;
- split_old = (l2cache_reg_accctrl() & L2C_ACCCTRL_SPLIT);
- if (split_old){
- l2cache_reg_accctrl_split_disable();
- }else{
- l2cache_reg_accctrl_split_enable();
- }
- split_new = (l2cache_reg_accctrl() & L2C_ACCCTRL_SPLIT);
- if (split_old){
- l2cache_reg_accctrl_split_enable();
- }else{
- l2cache_reg_accctrl_split_disable();
- }
- priv->split_support =
- ((split_new ^ split_old) >> L2C_ACCCTRL_SPLIT_BIT) & 1;
-
- DBG("L2CACHE driver initialized\n");
-
- return 0;
-}
-
-/* Called when a core is found with the AMBA device and vendor ID
- * given in l2cache_ids[]. IRQ, Console does not work here
- */
-int l2cache_init1(struct drvmgr_dev *dev)
-{
- int status;
- struct l2cache_priv *priv;
-
- DBG("L2CACHE[%d] on bus %s\n", dev->minor_drv, dev->parent->dev->name);
-
- if (l2cachepriv) {
- DBG("Driver only supports one L2CACHE core\n");
- return DRVMGR_FAIL;
- }
-
- priv = dev->priv;
- if (!priv)
- return DRVMGR_NOMEM;
-
- priv->dev = dev;
- strncpy(&priv->devname[0], "l2cache0", DEVNAME_LEN);
- l2cachepriv = priv;
-
- /* Initialize L2CACHE Hardware */
- status = l2cache_init(priv);
- if (status) {
- printf("Failed to initialize l2cache driver %d\n", status);
- return -1;
- }
-
- return DRVMGR_OK;
-}
-
-STATIC INLINE int l2cache_reg_ctrl_enable(void)
-{
- struct l2cache_priv *priv = l2cachepriv;
-
- unsigned int ctrl = REG_READ(&priv->regs->control);
- REG_WRITE(&priv->regs->control, (ctrl | L2C_CTRL_EN));
- return 0;
-}
-
-STATIC INLINE int l2cache_reg_ctrl_disable(void)
-{
- struct l2cache_priv *priv = l2cachepriv;
-
- unsigned int ctrl = REG_READ(&priv->regs->control);
- REG_WRITE(&priv->regs->control, (ctrl & ~(L2C_CTRL_EN)));
- return 0;
-}
-
-STATIC INLINE int l2cache_reg_ctrl_repl(int policy)
-{
- struct l2cache_priv *priv = l2cachepriv;
-
- unsigned int ctrl = REG_READ(&priv->regs->control);
- REG_WRITE(&priv->regs->control,
- ((ctrl & ~(L2C_CTRL_REPL)) |
- ((policy << L2C_CTRL_REPL_BIT) & L2C_CTRL_REPL))
- );
- return 0;
-}
-
-STATIC INLINE int l2cache_reg_ctrl_iway(int way)
-{
- struct l2cache_priv *priv = l2cachepriv;
-
- unsigned int ctrl = REG_READ(&priv->regs->control);
- REG_WRITE(&priv->regs->control,
- ((ctrl & ~(L2C_CTRL_IWAY)) |
- ((way << L2C_CTRL_IWAY_BIT) & L2C_CTRL_IWAY))
- );
- return 0;
-}
-
-STATIC INLINE int l2cache_reg_ctrl_writep(int policy)
-{
- struct l2cache_priv *priv = l2cachepriv;
-
- unsigned int ctrl = REG_READ(&priv->regs->control);
- REG_WRITE(&priv->regs->control,
- ((ctrl & ~(L2C_CTRL_WP)) | ((policy << L2C_CTRL_WP_BIT) & L2C_CTRL_WP))
- );
- return 0;
-}
-
-STATIC INLINE int l2cache_reg_ctrl_locked_set(int locked)
-{
- struct l2cache_priv *priv = l2cachepriv;
-
- unsigned int ctrl = REG_READ(&priv->regs->control);
- ctrl = (ctrl & ~(L2C_CTRL_LOCK));
- REG_WRITE(&priv->regs->control,
- ctrl |
- ((locked << L2C_CTRL_LOCK_BIT) & L2C_CTRL_LOCK));
- return 0;
-}
-
-STATIC INLINE int l2cache_reg_ctrl_edac_set(int edac)
-{
- struct l2cache_priv *priv = l2cachepriv;
-
- unsigned int ctrl = REG_READ(&priv->regs->control);
- REG_WRITE(&priv->regs->control,
- (ctrl & ~(L2C_CTRL_EDAC)) |
- (edac? L2C_CTRL_EDAC:0));
- return 0;
-}
-
-STATIC INLINE unsigned int l2cache_reg_ctrl(void)
-{
- struct l2cache_priv *priv = l2cachepriv;
-
- return REG_READ(&priv->regs->control);
-}
-
-STATIC INLINE unsigned int l2cache_reg_status(void)
-{
- struct l2cache_priv *priv = l2cachepriv;
-
- return REG_READ(&priv->regs->status);
-}
-
-STATIC INLINE int l2cache_reg_mtrr_set(int index, unsigned int addr,
- unsigned int mask, int options)
-{
- struct l2cache_priv *priv = l2cachepriv;
-
- /* Set mtrr */
- addr = addr & L2C_MTRR_ADDR;
- mask = (mask >> 16) & L2C_MTRR_MASK;
- options = ((options & ~(L2C_MTRR_ADDR)) & ~(L2C_MTRR_MASK));
- unsigned int mtrr = 0 | addr | mask | options;
- REG_WRITE(&priv->regs->mtrr[index], mtrr);
- return 0;
-}
-
-UNUSED STATIC INLINE unsigned int l2cache_reg_mtrr_get(int index)
-{
- struct l2cache_priv *priv = l2cachepriv;
-
- return REG_READ(&priv->regs->mtrr[index]);
-}
-
-STATIC INLINE int l2cache_reg_flushmem(unsigned int addr, int options)
-{
- struct l2cache_priv *priv = l2cachepriv;
-
- options = (options & ~(L2C_FLUSH_ADDR));
- REG_WRITE(&priv->regs->flush_mem_addr, (addr & L2C_FLUSH_ADDR) | options);
- return 0;
-}
-
-STATIC INLINE int l2cache_reg_flushline(int way, int index, int options)
-{
- struct l2cache_priv *priv = l2cachepriv;
-
- options = 0 | (options & (L2C_FLUSHSI_FMODE));
- REG_WRITE(&priv->regs->flush_set_index,
- ((index << L2C_FLUSHSI_INDEX_BIT) & L2C_FLUSHSI_INDEX) |
- ((way << L2C_FLUSHSI_WAY_BIT) & L2C_FLUSHSI_WAY) |
- options
- );
- return 0;
-}
-
-STATIC INLINE int l2cache_reg_flushway(unsigned int tag, int way, int options)
-{
- struct l2cache_priv *priv = l2cachepriv;
-
- options = (options & ~(L2C_FLUSHSI_TAG | L2C_FLUSHSI_WAY))
- | L2C_FLUSHSI_WF;
- REG_WRITE(&priv->regs->flush_set_index,
- (tag & L2C_FLUSHSI_TAG) |
- ( (way << L2C_FLUSHSI_WAY_BIT) & L2C_FLUSHSI_WAY) |
- options);
- return 0;
-}
-
-STATIC INLINE unsigned int l2cache_reg_error(void)
-{
- struct l2cache_priv *priv = l2cachepriv;
-
- return REG_READ(&priv->regs->error_status_control);
-}
-
-STATIC INLINE int l2cache_reg_error_reset(void)
-{
- struct l2cache_priv *priv = l2cachepriv;
-
- unsigned int ctrl = REG_READ(&priv->regs->error_status_control);
- REG_WRITE(&priv->regs->error_status_control, ctrl | L2C_ERROR_RST);
- return 0;
-}
-
-STATIC INLINE int l2cache_reg_error_irqmask(int mask)
-{
- struct l2cache_priv *priv = l2cachepriv;
-
- unsigned int ctrl = REG_READ(&priv->regs->error_status_control);
- REG_WRITE(&priv->regs->error_status_control,
- (ctrl & ~(L2C_ERROR_IRQM)) | (mask & L2C_ERROR_IRQM));
- return 0;
-}
-
-STATIC INLINE unsigned int l2cache_reg_error_addr(void)
-{
- struct l2cache_priv *priv = l2cachepriv;
-
- return REG_READ(&priv->regs->error_addr);
-}
-
-STATIC INLINE unsigned int l2cache_reg_scrub(void)
-{
- struct l2cache_priv *priv = l2cachepriv;
-
- return REG_READ(&priv->regs->scrub_control_status);
-}
-
-STATIC INLINE int l2cache_reg_scrub_enable(int delay)
-{
- struct l2cache_priv *priv = l2cachepriv;
-
- unsigned int ctrl = REG_READ(&priv->regs->scrub_control_status);
- REG_WRITE(&priv->regs->scrub_delay,
- (delay << L2C_SCRUB_DEL_BIT) & L2C_SCRUB_DEL);
- REG_WRITE(&priv->regs->scrub_control_status, ctrl | L2C_SCRUB_EN);
- return 0;
-}
-
-STATIC INLINE int l2cache_reg_scrub_disable(void)
-{
- struct l2cache_priv *priv = l2cachepriv;
-
- unsigned int ctrl = REG_READ(&priv->regs->scrub_control_status);
- REG_WRITE(&priv->regs->scrub_control_status, ctrl & ~(L2C_SCRUB_EN));
- return 0;
-}
-
-STATIC INLINE int l2cache_reg_scrub_line(int way, int index)
-{
- struct l2cache_priv *priv = l2cachepriv;
-
- REG_WRITE(&priv->regs->scrub_control_status,
- ((index << L2C_SCRUB_INDEX_BIT) & L2C_SCRUB_INDEX) |
- ((way << L2C_SCRUB_WAY_BIT) & L2C_SCRUB_WAY) |
- L2C_SCRUB_PEN);
- return 0;
-}
-
-STATIC INLINE unsigned int l2cache_reg_scrub_delay(void)
-{
- struct l2cache_priv *priv = l2cachepriv;
-
- return REG_READ(&priv->regs->scrub_delay);
-}
-
-STATIC INLINE unsigned int l2cache_reg_accctrl(void){
- struct l2cache_priv *priv = l2cachepriv;
-
- return REG_READ(&priv->regs->access_control);
-}
-
-STATIC INLINE int l2cache_reg_accctrl_split_disable(void)
-{
- struct l2cache_priv *priv = l2cachepriv;
-
- /* Disable split */
- unsigned int ctrl = REG_READ(&priv->regs->access_control);
- REG_WRITE(&priv->regs->access_control, (ctrl & ~(L2C_ACCCTRL_SPLIT)));
- return 0;
-}
-
-STATIC INLINE int l2cache_reg_accctrl_split_enable(void)
-{
- struct l2cache_priv *priv = l2cachepriv;
-
- /* Enable split */
- unsigned int ctrl = REG_READ(&priv->regs->access_control);
- REG_WRITE(&priv->regs->access_control, (ctrl | (L2C_ACCCTRL_SPLIT)));
- return 0;
-}
-
-STATIC INLINE int l2cache_ctrl_status(void)
-{
- return ((l2cache_reg_ctrl() >> L2C_CTRL_EN_BIT) & 0x1);
-}
-
-STATIC void l2cache_flushwait(void)
-{
- /* Read any L2cache register to wait until flush is done */
- /* The L2 will block any access until the flush is done */
- /* Force read operation */
- //asm volatile ("" : : "r" (l2cache_reg_status()));
- (void) l2cache_reg_status();
- return;
-}
-
-#ifdef TEST_L2CACHE
-STATIC INLINE int l2cache_reg_error_dcb(unsigned int cb)
-{
- struct l2cache_priv *priv = l2cachepriv;
-
- REG_WRITE(&priv->regs->data_check_bit, (cb & L2C_DCB_CB));
- return 0;
-}
-
-STATIC INLINE int l2cache_reg_error_inject(unsigned int addr)
-{
- struct l2cache_priv *priv = l2cachepriv;
-
- REG_WRITE(&priv->regs->error_injection,
- (addr & L2C_ERRINJ_ADDR) | L2C_ERRINJ_EN);
- return 0;
-}
-
-STATIC INLINE unsigned int l2cache_reg_diagtag(int way, int index)
-{
- struct l2cache_priv *priv = l2cachepriv;
-
- int offset = (index*8 + way);
- return REG_READ(&priv->regs->diag_iface_tag[offset]);
-}
-
-STATIC INLINE unsigned int l2cache_reg_diagdata(int way, int index, int word)
-{
- struct l2cache_priv *priv = l2cachepriv;
-
- int offset = (index*(priv->linesize/4) + way*0x20000 + word);
- return REG_READ(&priv->regs->diag_iface_data[offset]);
-}
-
-STATIC unsigned int log2int(unsigned int v)
-{
- unsigned r = 0;
- while (v >>= 1) {
- r++;
- }
- return r;
-}
-
-/* Return the index for a given addr */
-int l2cache_get_index( uint32_t addr)
-{
- struct l2cache_priv * priv = l2cachepriv;
-
- if (priv == NULL){
- DBG("L2CACHE not initialized.\n");
- return L2CACHE_ERR_NOINIT;
- }
-
- return (addr % priv->waysize)/(priv->linesize);
-}
-
-/* Return the tag for a given addr */
-uint32_t l2cache_get_tag( uint32_t addr)
-{
- struct l2cache_priv * priv = l2cachepriv;
-
- if (priv == NULL){
- DBG("L2CACHE not initialized.\n");
- return L2CACHE_ERR_NOINIT;
- }
-
- uint32_t tmp;
- int i = log2int(priv->waysize);
- tmp = (addr >> i);
- tmp = (tmp << i);
- return tmp;
-}
-
-int l2cache_lookup(uint32_t addr, int * way)
-{
- struct l2cache_priv * priv = l2cachepriv;
- int i;
- struct l2cache_tag gottag;
- int ret;
-
- if (priv == NULL){
- DBG("L2CACHE not initialized.\n");
- return L2CACHE_ERR_NOINIT;
- }
-
- uint32_t exptag = l2cache_get_tag(addr);
- int index = l2cache_get_index(addr);
-
- /* Check all tags in the set */
- for(i=0; i< priv->ways; i++){
- ret = l2cache_diag_tag(i, index, &gottag);
- if (ret != L2CACHE_ERR_OK){
- return ret;
- }
- /*DBG("L2CACHE gottag: way=%d, valid=%d, tag=0x%08x.\n",
- * i, gottag.valid, gottag.tag);*/
- /* Check if valid */
- if (gottag.valid){
- /* Check if they are the same */
- if (gottag.tag == exptag){
- /* HIT! */
- if (way){
- *way = i;
- }
- DBG("L2CACHE lookup: index=%d, tag=0x%08x HIT way=%d.\n",
- index, (unsigned int) exptag, i);
- return L2CACHE_HIT;
- }
- }
- }
- DBG("L2CACHE lookup: index=%d, tag=0x%08x MISS.\n",
- index, (unsigned int) exptag);
- /* MISS! */
- return L2CACHE_MISS;
-}
-
-/* Diagnostic Accesses */
-#define l2cache_tag_valid(val) ((val & L2C_TAG_VALID) >> L2C_TAG_VALID_BIT)
-#define l2cache_tag_dirty(val) ((val & L2C_TAG_DIRTY) >> L2C_TAG_DIRTY_BIT)
-#define l2cache_tag_lru(val) ((val & L2C_TAG_LRU) >> L2C_TAG_LRU_BIT)
-int l2cache_diag_tag( int way, int index, struct l2cache_tag * tag)
-{
- struct l2cache_priv * priv = l2cachepriv;
-
- if (priv == NULL){
- DBG("L2CACHE not initialized.\n");
- return L2CACHE_ERR_NOINIT;
- }
-
- if (way >= priv->ways){
- DBG("L2CACHE has only %d ways.\n", priv->ways);
- return L2CACHE_ERR_EINVAL;
- }
-
- if (index >= priv->index){
- DBG("L2CACHE has only %d lines.\n", priv->index);
- return L2CACHE_ERR_EINVAL;
- }
-
- unsigned int val = l2cache_reg_diagtag(way,index);
-
- if (tag){
- tag->tag = l2cache_get_tag(val);
- tag->valid = l2cache_tag_valid(val);
- tag->dirty = l2cache_tag_dirty(val);
- tag->lru = l2cache_tag_lru(val);
- }else{
- return L2CACHE_ERR_EINVAL;
- }
- return L2CACHE_ERR_OK;
-}
-
-int l2cache_diag_line( int way, int index, struct l2cache_dataline * dataline)
-{
- struct l2cache_priv * priv = l2cachepriv;
- int i;
-
- if (priv == NULL){
- DBG("L2CACHE not initialized.\n");
- return L2CACHE_ERR_NOINIT;
- }
-
- if (way >= priv->ways){
- DBG("L2CACHE has only %d ways.\n", priv->ways);
- return L2CACHE_ERR_EINVAL;
- }
-
- if (index >= priv->index){
- DBG("L2CACHE has only %d lines.\n", priv->index);
- return L2CACHE_ERR_EINVAL;
- }
-
- if (dataline){
- dataline->words = (priv->linesize/4);
- for (i=0; i< (priv->linesize/4); i++){
- dataline->data[i] = l2cache_reg_diagdata(way,index,i);
- }
- }else{
- return L2CACHE_ERR_EINVAL;
- }
- return L2CACHE_ERR_OK;
-}
-
-/* Inject an error on a given addr */
-int l2cache_error_inject_address( uint32_t addr, uint32_t mask)
-{
- struct l2cache_priv * priv = l2cachepriv;
- int word;
-
- if (priv == NULL){
- DBG("L2CACHE not initialized.\n");
- return L2CACHE_ERR_NOINIT;
- }
-
- if (!priv->ft_support){
- DBG("L2CACHE does not have EDAC support.\n");
- return L2CACHE_ERR_ERROR;
- }
-
- if (addr & 0x3){
- DBG("Address not aligned to 32-bit.\n");
- return L2CACHE_ERR_EINVAL;
- }
-
- /* Get word index */
- word = (addr % priv->linesize)/4;
-
- /* Shift mask to proper word */
- mask = (mask << (7*(priv->ways - word - 1)));
-
- /* Write DCB mask to XOR */
- l2cache_reg_error_dcb(mask);
-
- /* Inject error */
- l2cache_reg_error_inject(addr);
-
- DBG("L2CACHE error injected in 0x%08x (0x%08x).\n",
- (unsigned int) addr, (unsigned int) mask);
-
- return L2CACHE_ERR_OK;
-}
-
-#endif /* TEST_L2CACHE */
-
-/* L2CACHE Interrupt handler, called when there may be a L2CACHE interrupt.
- */
-void l2cache_isr(void *arg)
-{
- struct l2cache_priv *priv = arg;
- unsigned int sts = l2cache_reg_error();
- unsigned int addr = l2cache_reg_error_addr();
-
- /* Make sure that the interrupt is pending and unmasked,
- * otherwise it migth have been other core
- * sharing the same interrupt line */
- if ( ((sts & L2C_ERROR_IRQP) >> L2C_ERROR_IRQP_BIT) &
- ((sts & L2C_ERROR_IRQM) >> L2C_ERROR_IRQM_BIT)){
- /* Reset error status */
- l2cache_reg_error_reset();
- /* Execute user IRQ (ther will always be one ISR */
- /* Give cacheline address */
- (priv->isr)(priv->isr_arg, (addr & ~(0x1f)), sts);
- }
-}
-
-/* Enable L2CACHE:
- */
-int l2cache_enable(int flush)
-{
- int ret;
-
- /* Flush checks flus parameter and INIT state */
- ret = l2cache_flush(flush);
- if (ret < 0){
- return ret;
- }
-
- l2cache_reg_ctrl_enable();
-
- DBG("L2CACHE enabled\n");
- return L2CACHE_ERR_OK;
-}
-
-/* Disable L2CACHE:
- */
-int l2cache_disable(int flush)
-{
- struct l2cache_priv * priv = l2cachepriv;
-
- if (priv == NULL){
- DBG("L2CACHE not initialized.\n");
- return L2CACHE_ERR_NOINIT;
- }
-
- if ((flush < 0) ||
- (flush >
- (L2CACHE_OPTIONS_FLUSH_INVALIDATE | L2CACHE_OPTIONS_FLUSH_WAIT))
- ){
- DBG("L2CACHE wrong flush option.\n");
- return L2CACHE_ERR_EINVAL;
- }
-
- /* Flush & invalidate all cache. Also disable L2C */
- switch(flush & 0x3){
- case L2CACHE_OPTIONS_FLUSH_NONE:
- l2cache_reg_ctrl_disable();
- break;
- case L2CACHE_OPTIONS_FLUSH_INV_WBACK:
- l2cache_reg_flushmem(0, L2C_FLUSH_FMODE_INV_WB_ALL | L2C_FLUSH_DI);
- break;
- case L2CACHE_OPTIONS_FLUSH_WRITEBACK:
- l2cache_reg_flushmem(0, L2C_FLUSH_FMODE_WB_ALL | L2C_FLUSH_DI);
- break;
- case L2CACHE_OPTIONS_FLUSH_INVALIDATE:
- default:
- l2cache_reg_flushmem(0, L2C_FLUSH_FMODE_INV_ALL | L2C_FLUSH_DI);
- break;
- }
-
- if (flush & L2CACHE_OPTIONS_FLUSH_WAIT){
- l2cache_flushwait();
- }
-
- DBG("L2CACHE disabled\n");
- return L2CACHE_ERR_OK;
-}
-
-/* Status L2CACHE:
- */
-int l2cache_status(void)
-{
- struct l2cache_priv * priv = l2cachepriv;
- int status;
-
- if (priv == NULL){
- DBG("L2CACHE not initialized.\n");
- return L2CACHE_ERR_NOINIT;
- }
-
- unsigned int ctrl = l2cache_reg_ctrl();
- int locked = (ctrl & L2C_CTRL_LOCK) >> L2C_CTRL_LOCK_BIT;
- int enabled = ((ctrl & L2C_CTRL_EN) >> L2C_CTRL_EN_BIT) & 0x1;
- int edac = (ctrl & L2C_CTRL_EDAC) >> L2C_CTRL_EDAC_BIT;
- int repl = (ctrl & L2C_CTRL_REPL) >> L2C_CTRL_REPL_BIT;
- int writep = (ctrl & L2C_CTRL_WP) >> L2C_CTRL_WP_BIT;
-
- unsigned int acc = l2cache_reg_accctrl();
- int split = (acc & L2C_ACCCTRL_SPLIT) >> L2C_ACCCTRL_SPLIT_BIT;
-
- unsigned int err = l2cache_reg_error();
- int interrupts = (err & L2C_ERROR_IRQM) >> L2C_ERROR_IRQM_BIT;
-
- unsigned int scr = l2cache_reg_scrub();
- int scrub = (scr & L2C_SCRUB_EN) >> L2C_SCRUB_EN_BIT;
-
- unsigned int dly = l2cache_reg_scrub_delay();
- int delay = (dly & L2C_SCRUB_DEL) >> L2C_SCRUB_DEL_BIT;
-
- status = 0|
- (enabled? L2CACHE_STATUS_ENABLED: 0) |
- (split? L2CACHE_STATUS_SPLIT_ENABLED: 0) |
- (edac? L2CACHE_STATUS_EDAC_ENABLED: 0) |
- ((repl & 0x3) << L2CACHE_STATUS_REPL_BIT) |
- (writep? L2CACHE_STATUS_WRITETHROUGH: 0) |
- ((locked & 0xf) << L2CACHE_STATUS_LOCK_BIT) |
- ((interrupts & 0xf) << L2CACHE_STATUS_INT_BIT) |
- (scrub? L2CACHE_STATUS_SCRUB_ENABLED: 0) |
- ((delay & 0xffff) << L2CACHE_STATUS_SCRUB_DELAY_BIT);
-
- return status;
-}
-
-/* Flush L2CACHE:
- */
-int l2cache_flush(int flush)
-{
- struct l2cache_priv * priv = l2cachepriv;
-
- if (priv == NULL){
- DBG("L2CACHE not initialized.\n");
- return L2CACHE_ERR_NOINIT;
- }
-
- if ((flush < 0) ||
- (flush >
- (L2CACHE_OPTIONS_FLUSH_INVALIDATE | L2CACHE_OPTIONS_FLUSH_WAIT))
- ){
- DBG("L2CACHE wrong flush option.\n");
- return L2CACHE_ERR_EINVAL;
- }
-
- switch(flush & 0x3){
- case L2CACHE_OPTIONS_FLUSH_NONE:
- break;
- case L2CACHE_OPTIONS_FLUSH_INV_WBACK:
- l2cache_reg_flushmem(0, L2C_FLUSH_FMODE_INV_WB_ALL);
- break;
- case L2CACHE_OPTIONS_FLUSH_WRITEBACK:
- l2cache_reg_flushmem(0, L2C_FLUSH_FMODE_WB_ALL);
- break;
- case L2CACHE_OPTIONS_FLUSH_INVALIDATE:
- default:
- l2cache_reg_flushmem(0, L2C_FLUSH_FMODE_INV_ALL);
- break;
- }
-
- if (flush & L2CACHE_OPTIONS_FLUSH_WAIT){
- l2cache_flushwait();
- }
-
- DBG("L2CACHE flushed\n");
- return L2CACHE_ERR_OK;
-}
-
-/* Flush L2CACHE address:
- */
-int l2cache_flush_address(uint32_t addr, int size, int flush)
-{
- struct l2cache_priv * priv = l2cachepriv;
- uint32_t endaddr;
- int options;
-
- if (priv == NULL){
- DBG("L2CACHE not initialized.\n");
- return L2CACHE_ERR_NOINIT;
- }
-
- if ((flush < 0) ||
- (flush >
- (L2CACHE_OPTIONS_FLUSH_INVALIDATE | L2CACHE_OPTIONS_FLUSH_WAIT))
- ){
- DBG("L2CACHE wrong flush option.\n");
- return L2CACHE_ERR_EINVAL;
- }
-
- if (size <= 0){
- DBG("L2CACHE wrong size.\n");
- return L2CACHE_ERR_EINVAL;
- }
-
- switch(flush & 0x3){
- case L2CACHE_OPTIONS_FLUSH_NONE:
- break;
- case L2CACHE_OPTIONS_FLUSH_INV_WBACK:
- options=L2C_FLUSH_FMODE_INV_WB_ONE;
- break;
- case L2CACHE_OPTIONS_FLUSH_WRITEBACK:
- options=L2C_FLUSH_FMODE_WB_ONE;
- break;
- case L2CACHE_OPTIONS_FLUSH_INVALIDATE:
- default:
- options=L2C_FLUSH_FMODE_INV_ONE;
- break;
- }
-
- if ( (flush & 0x3) == L2CACHE_OPTIONS_FLUSH_NONE){
- return L2CACHE_ERR_OK;
- }
-
- /* Get the end address */
- endaddr = (addr + size);
-
- /* Start on first cacheline address */
- addr = addr - (addr % priv->linesize);
- while( addr < endaddr){
- /* Flush address */
- l2cache_reg_flushmem(addr, options);
- /* Update next line */
- addr += priv->linesize;
- }
-
- if (flush & L2CACHE_OPTIONS_FLUSH_WAIT){
- l2cache_flushwait();
- }
-
- DBG("L2CACHE address range flushed\n");
- return L2CACHE_ERR_OK;
-}
-
-/* Flush L2CACHE line:
- */
-int l2cache_flush_line(int way, int index, int flush)
-{
- struct l2cache_priv * priv = l2cachepriv;
-
- if (priv == NULL){
- DBG("L2CACHE not initialized.\n");
- return L2CACHE_ERR_NOINIT;
- }
-
- if ((flush < 0) ||
- (flush >
- (L2CACHE_OPTIONS_FLUSH_INVALIDATE | L2CACHE_OPTIONS_FLUSH_WAIT))
- ){
- DBG("L2CACHE wrong flush option.\n");
- return L2CACHE_ERR_EINVAL;
- }
-
- if ((index < 0) || (index >= priv->index)){
- DBG("L2CACHE only has %d lines.\n", priv->index);
- return L2CACHE_ERR_EINVAL;
- }
-
- if ((way < 0 ) || (way >= priv->ways)){
- DBG("L2CACHE only has %d ways.\n", priv->ways);
- return L2CACHE_ERR_EINVAL;
- }
-
- switch(flush & 0x3){
- case L2CACHE_OPTIONS_FLUSH_NONE:
- break;
- case L2CACHE_OPTIONS_FLUSH_INV_WBACK:
- l2cache_reg_flushline(way, index,
- L2C_FLUSHSI_FMODE_SET_INV_WB_ONE);
- break;
- case L2CACHE_OPTIONS_FLUSH_WRITEBACK:
- l2cache_reg_flushline(way, index, L2C_FLUSHSI_FMODE_SET_WB_ONE);
- break;
- case L2CACHE_OPTIONS_FLUSH_INVALIDATE:
- default:
- l2cache_reg_flushline(way, index, L2C_FLUSHSI_FMODE_SET_INV_ONE);
- break;
- }
-
- if (flush & L2CACHE_OPTIONS_FLUSH_WAIT){
- l2cache_flushwait();
- }
-
- DBG("L2CACHE line [%d,%d] flushed\n", way, index);
- return L2CACHE_ERR_OK;
-}
-
-/* Flush L2CACHE way:
- */
-int l2cache_flush_way(int way, int flush)
-{
- struct l2cache_priv * priv = l2cachepriv;
-
- if (priv == NULL){
- DBG("L2CACHE not initialized.\n");
- return L2CACHE_ERR_NOINIT;
- }
-
- if ((flush < 0) ||
- (flush >
- (L2CACHE_OPTIONS_FLUSH_INVALIDATE | L2CACHE_OPTIONS_FLUSH_WAIT))
- ){
- DBG("L2CACHE wrong flush option.\n");
- return L2CACHE_ERR_EINVAL;
- }
-
- if ((way < 0 ) || (way >= priv->ways)){
- DBG("L2CACHE only has %d ways.\n", priv->ways);
- return L2CACHE_ERR_EINVAL;
- }
-
- switch(flush & 0x3){
- case L2CACHE_OPTIONS_FLUSH_NONE:
- break;
- case L2CACHE_OPTIONS_FLUSH_INVALIDATE:
- l2cache_reg_flushway(0, way, L2C_FLUSHSI_FMODE_WAY_UPDATE);
- break;
- case L2CACHE_OPTIONS_FLUSH_WRITEBACK:
- l2cache_reg_flushway(0, way, L2C_FLUSHSI_FMODE_WAY_WB);
- break;
- case L2CACHE_OPTIONS_FLUSH_INV_WBACK:
- default:
- l2cache_reg_flushway(0, way, L2C_FLUSHSI_FMODE_WAY_UPDATE_WB_ALL);
- break;
- }
-
- if (flush & L2CACHE_OPTIONS_FLUSH_WAIT){
- l2cache_flushwait();
- }
-
- DBG("L2CACHE way [%d] flushed\n",way);
- return L2CACHE_ERR_OK;
-}
-
-/* Fill L2CACHE way:
- */
-int l2cache_fill_way(int way, uint32_t tag, int options, int flush)
-{
- struct l2cache_priv * priv = l2cachepriv;
- int flags;
-
- if (priv == NULL){
- DBG("L2CACHE not initialized.\n");
- return L2CACHE_ERR_NOINIT;
- }
-
- if ((way < 0 ) || (way >= priv->ways)){
- DBG("L2CACHE only has %d ways.\n", priv->ways);
- return L2CACHE_ERR_EINVAL;
- }
-
- /* Check input parameters */
- if (tag & 0x000003ff){
- DBG("Only using bits 31:10 of Addr/Mask\n");
- return L2CACHE_ERR_EINVAL;
- }
-
- /* Perform the Way-flush */
- flags = ((options & L2CACHE_OPTIONS_FETCH)? L2C_FLUSHSI_FL:0) |
- ((options & L2CACHE_OPTIONS_VALID)? L2C_FLUSHSI_VB:0) |
- ((options & L2CACHE_OPTIONS_DIRTY)? L2C_FLUSHSI_DB:0);
-
- /*DBG("L2CACHE lock way: Locked=%d, way=%d, option=0x%04x\n",
- * locked, way, flags);*/
-
- switch(flush & 0x3){
- case L2CACHE_OPTIONS_FLUSH_NONE:
- break;
- case L2CACHE_OPTIONS_FLUSH_INVALIDATE:
- l2cache_reg_flushway(tag, way,
- flags | L2C_FLUSHSI_FMODE_WAY_UPDATE);
- break;
- case L2CACHE_OPTIONS_FLUSH_WRITEBACK:
- l2cache_reg_flushway(tag, way, flags | L2C_FLUSHSI_FMODE_WAY_WB);
- break;
- case L2CACHE_OPTIONS_FLUSH_INV_WBACK:
- default:
- l2cache_reg_flushway(tag, way,
- flags | L2C_FLUSHSI_FMODE_WAY_UPDATE_WB_ALL);
- break;
- }
-
- if (flush & L2CACHE_OPTIONS_FLUSH_WAIT){
- l2cache_flushwait();
- }
-
- DBG("Way[%d] filled with Tag 0x%08x\n", way, (unsigned int) tag);
-
- return L2CACHE_ERR_OK;
-}
-
-/* Lock L2CACHE way:
- */
-int l2cache_lock_way(uint32_t tag, int options, int flush, int enable)
-{
- struct l2cache_priv * priv = l2cachepriv;
- int enabled;
- int way;
- int locked;
- int flags;
- int ret;
-
- if (priv == NULL){
- DBG("L2CACHE not initialized.\n");
- return L2CACHE_ERR_NOINIT;
- }
-
- locked = L2CACHE_LOCKED_WAYS(l2cache_status());
- if (locked >= priv->ways){
- DBG("L2CACHE only has %d ways.\n", priv->ways);
- return L2CACHE_ERR_TOOMANY;
- }
-
- /* Check input parameters */
- if (tag & 0x000003ff){
- DBG("Only using bits 31:10 of Addr/Mask\n");
- return L2CACHE_ERR_EINVAL;
- }
-
- /* Check L2C status */
- enabled = l2cache_ctrl_status();
-
- /* Disable L2C */
- ret = l2cache_disable(flush);
- if (ret < 0){
- return ret;
- }
-
- /* Increase number of locked ways */
- locked++;
- way = priv->ways - locked;
- l2cache_reg_ctrl_locked_set(locked);
-
- /* Perform the Way-flush */
- flags = ((options & L2CACHE_OPTIONS_FETCH)? L2C_FLUSHSI_FL:0) |
- ((options & L2CACHE_OPTIONS_VALID)? L2C_FLUSHSI_VB:0) |
- ((options & L2CACHE_OPTIONS_DIRTY)? L2C_FLUSHSI_DB:0);
-
- /*DBG("L2CACHE lock way: Locked=%d, way=%d, option=0x%04x\n",
- * locked, way, flags);*/
-
- switch(flush & 0x3){
- case L2CACHE_OPTIONS_FLUSH_NONE:
- break;
- case L2CACHE_OPTIONS_FLUSH_INVALIDATE:
- l2cache_reg_flushway(tag, way,
- flags | L2C_FLUSHSI_FMODE_WAY_UPDATE);
- break;
- case L2CACHE_OPTIONS_FLUSH_WRITEBACK:
- l2cache_reg_flushway(tag, way, flags | L2C_FLUSHSI_FMODE_WAY_WB);
- break;
- case L2CACHE_OPTIONS_FLUSH_INV_WBACK:
- default:
- l2cache_reg_flushway(tag, way,
- flags | L2C_FLUSHSI_FMODE_WAY_UPDATE_WB_ALL);
- break;
- }
-
- /* Reenable L2C if required */
- switch(enable){
- case L2CACHE_OPTIONS_ENABLE:
- l2cache_reg_ctrl_enable();
- break;
- case L2CACHE_OPTIONS_DISABLE:
- break;
- case L2CACHE_OPTIONS_NONE:
- default:
- if (enabled) {
- l2cache_reg_ctrl_enable();
- }
- break;
- }
-
- if (flush & L2CACHE_OPTIONS_FLUSH_WAIT){
- l2cache_flushwait();
- }
-
- DBG("Way[%d] locked with Tag 0x%08x\n", way, (unsigned int) tag);
-
- return L2CACHE_ERR_OK;
-}
-
-/* Unlock L2CACHE waw:
- */
-int l2cache_unlock()
-{
- struct l2cache_priv * priv = l2cachepriv;
-
- if (priv == NULL){
- DBG("L2CACHE not initialized.\n");
- return L2CACHE_ERR_NOINIT;
- }
-
- /* Set number of locked ways to 0*/
- l2cache_reg_ctrl_locked_set(0);
-
- DBG("L2CACHE ways unlocked\n");
-
- return L2CACHE_ERR_OK;
-}
-
-/* Setup L2CACHE:
- * Parameters:
- * -options: Can be:
- */
-int l2cache_mtrr_enable(int index, uint32_t addr, uint32_t mask, int options,
- int flush)
-{
- struct l2cache_priv * priv = l2cachepriv;
- int enabled;
- int flags;
- int ret;
-
- if (priv == NULL){
- DBG("L2CACHE not initialized.\n");
- return L2CACHE_ERR_NOINIT;
- }
-
- if (index < 0){
- DBG("Wrong index\n");
- return L2CACHE_ERR_EINVAL;
- }
-
- if (index >= priv->mtrr){
- DBG("Not enough MTRR registers\n");
- return L2CACHE_ERR_TOOMANY;
- }
-
- /* Check input parameters */
- if ((addr & 0x0003ffff) || (mask & 0x0003ffff)){
- DBG("Only using bits 31:18 of Addr/Mask\n");
- return L2CACHE_ERR_EINVAL;
- }
-
- /* Check L2C status */
- enabled = l2cache_ctrl_status();
-
- /* Disable L2C */
- ret = l2cache_disable(flush);
- if (ret < 0){
- return ret;
- }
-
- /* Decode options */
- flags = 0 |
- (options & L2CACHE_OPTIONS_MTRR_ACCESS_WRITETHROUGH?
- L2C_MTRR_WRITETHROUGH :
- L2C_MTRR_UNCACHED) |
- (options & L2CACHE_OPTIONS_MTRR_WRITEPROT_ENABLE?
- L2C_MTRR_WRITEPROT_ENABLE :
- L2C_MTRR_WRITEPROT_DISABLE) |
- L2C_MTRR_ACCESSCONTROL_ENABLE;
-
- /* Configure mtrr */
- l2cache_reg_mtrr_set(index, addr, mask, flags);
-
- /* Enable cache again (if needed) */
- if (enabled){
- l2cache_reg_ctrl_enable();
- }
-
- DBG("MTRR[%d] succesfully configured for 0x%08x (mask 0x%08x), "
- "access=%s, wprot=%s\n",
- index, (unsigned int) addr, (unsigned int) mask,
- (options & L2CACHE_OPTIONS_MTRR_ACCESS_WRITETHROUGH?
- "WRITETHROUGH":"UNCACHED"),
- (options & L2CACHE_OPTIONS_MTRR_WRITEPROT_ENABLE? "ENABLE":"DISABLE")
- );
-
- return L2CACHE_ERR_OK;
-}
-
-/* Setup L2CACHE:
- * Parameters:
- * -options: Can be:
- */
-int l2cache_mtrr_disable(int index)
-{
- struct l2cache_priv * priv = l2cachepriv;
-
- if (priv == NULL){
- DBG("L2CACHE not initialized.\n");
- return L2CACHE_ERR_NOINIT;
- }
-
- if (index < 0){
- DBG("Wrong index\n");
- return L2CACHE_ERR_EINVAL;
- }
-
- if (index >= priv->mtrr){
- DBG("Not enough MTRR registers\n");
- return L2CACHE_ERR_TOOMANY;
- }
-
- /* Configure mtrr */
- l2cache_reg_mtrr_set(index, 0, 0, L2C_MTRR_ACCESSCONTROL_DISABLE);
-
- DBG("MTRR[%d] disabled\n", index);
-
- return L2CACHE_ERR_OK;
-}
-
-/* Print L2CACHE status
- * DEBUG function
- */
-int l2cache_print(void)
-{
- struct l2cache_priv * priv = l2cachepriv;
-
- if (priv == NULL){
- DBG("L2CACHE not initialized.\n");
- return L2CACHE_ERR_NOINIT;
- }
-
- #ifdef DEBUG
- int status = l2cache_status();
- if (status < 0){
- return status;
- }
- printf("L2cache: Ways:%d. Waysize:%d, Linesize:%d, Lines:%d\n"
- " MTRR:%d, FT:%s, Locked:%d, Split:%s\n"
- " REPL:%s, WP:%s, EDAC:%s, Enabled:%s\n"
- " Scrub:%s, S-Delay:%d\n",
- priv->ways,
- priv->waysize,
- priv->linesize,
- (priv->index * priv->ways),
- priv->mtrr,
- (priv->ft_support? "Available":"N/A"),
- L2CACHE_LOCKED_WAYS(status),
- (priv->split_support? (L2CACHE_SPLIT_ENABLED(status)?
- "Enabled":"Disabled"):"N/A"),
- repl_names[L2CACHE_REPL(status)],
- (L2CACHE_WRITETHROUGH(status)? "Write-through":"Write-back"),
- (L2CACHE_EDAC_ENABLED(status)? "Enabled":"Disabled"),
- (L2CACHE_ENABLED(status)? "Yes":"No"),
- (L2CACHE_SCRUB_ENABLED(status)? "Enabled":"Disabled"),
- L2CACHE_SCRUB_DELAY(status)
- );
- if (l2cache_ctrl_status()){
- printf("L2cache enabled.\n");
- }else{
- printf("L2cache disabled.\n");
- }
- #endif
- return L2CACHE_ERR_OK;
-}
-
-int l2cache_split_enable(void)
-{
- struct l2cache_priv * priv = l2cachepriv;
-
- if (priv == NULL){
- DBG("L2CACHE not initialized.\n");
- return L2CACHE_ERR_NOINIT;
- }
-
- if (!priv->split_support){
- DBG("L2CACHE does not have split support.\n");
- return L2CACHE_ERR_ERROR;
- }
-
- l2cache_reg_accctrl_split_enable();
- DBG("L2CACHE split is now enabled\n");
-
- return L2CACHE_ERR_OK;
-}
-
-int l2cache_split_disable(void)
-{
- struct l2cache_priv * priv = l2cachepriv;
-
- if (priv == NULL){
- DBG("L2CACHE not initialized.\n");
- return L2CACHE_ERR_NOINIT;
- }
-
- if (!priv->split_support){
- DBG("L2CACHE does not have split support.\n");
- return L2CACHE_ERR_ERROR;
- }
-
- l2cache_reg_accctrl_split_disable();
- DBG("L2CACHE split is now disabled\n");
-
- return L2CACHE_ERR_OK;
-}
-
-int l2cache_edac_enable(int flush)
-{
- struct l2cache_priv * priv = l2cachepriv;
- int enabled;
- int ret;
-
- if (priv == NULL){
- DBG("L2CACHE not initialized.\n");
- return L2CACHE_ERR_NOINIT;
- }
-
- if (!priv->ft_support){
- DBG("L2CACHE does not have EDAC support.\n");
- return L2CACHE_ERR_ERROR;
- }
-
- /* Check that L2C is enabled */
- enabled = l2cache_ctrl_status();
-
- /* Disable&Flush L2C */
- ret = l2cache_disable(flush);
- if (ret < 0){
- return ret;
- }
-
- /* Clear error register */
- l2cache_reg_error_reset();
-
- /* Enable EDAC */
- l2cache_reg_ctrl_edac_set(1);
-
- /* Enable cache again */
- if (enabled){
- l2cache_reg_ctrl_enable();
- }
-
- DBG("L2CACHE EDAC is now enabled\n");
-
- return L2CACHE_ERR_OK;
-}
-
-int l2cache_edac_disable(int flush)
-{
- struct l2cache_priv * priv = l2cachepriv;
- int enabled;
- int ret;
-
- if (priv == NULL){
- DBG("L2CACHE not initialized.\n");
- return L2CACHE_ERR_NOINIT;
- }
-
- if (!priv->ft_support){
- DBG("L2CACHE does not have EDAC support.\n");
- return L2CACHE_ERR_ERROR;
- }
-
- /* Check that L2C is enabled */
- enabled = l2cache_ctrl_status();
-
- /* Disable&Flush L2C */
- ret = l2cache_disable(flush);
- if (ret < 0){
- return ret;
- }
-
- /* Disable EDAC */
- l2cache_reg_ctrl_edac_set(0);
-
- /* Clear error register */
- l2cache_reg_error_reset();
-
- /* Enable cache again */
- if (enabled){
- l2cache_reg_ctrl_enable();
- }
-
- DBG("L2CACHE EDAC is now disabled\n");
-
- return L2CACHE_ERR_OK;
-}
-
-int l2cache_scrub_enable(int delay)
-{
- struct l2cache_priv * priv = l2cachepriv;
-
- if (priv == NULL){
- DBG("L2CACHE not initialized.\n");
- return L2CACHE_ERR_NOINIT;
- }
-
- if (!priv->ft_support){
- DBG("L2CACHE does not have EDAC support.\n");
- return L2CACHE_ERR_ERROR;
- }
-
- /* Enable Scrub */
- l2cache_reg_scrub_enable(delay);
-
- DBG("L2CACHE Scrub is now enabled\n");
-
- return L2CACHE_ERR_OK;
-}
-
-int l2cache_scrub_disable(void)
-{
- struct l2cache_priv * priv = l2cachepriv;
-
- if (priv == NULL){
- DBG("L2CACHE not initialized.\n");
- return L2CACHE_ERR_NOINIT;
- }
-
- if (!priv->ft_support){
- DBG("L2CACHE does not have EDAC support.\n");
- return L2CACHE_ERR_ERROR;
- }
-
- /* Disable Scrub */
- l2cache_reg_scrub_disable();
-
- DBG("L2CACHE Scrub is now disabled\n");
-
- return L2CACHE_ERR_OK;
-}
-
-int l2cache_scrub_line(int way, int index)
-{
- struct l2cache_priv * priv = l2cachepriv;
- unsigned int scrub;
-
- if (priv == NULL){
- DBG("L2CACHE not initialized.\n");
- return L2CACHE_ERR_NOINIT;
- }
-
- if (!priv->ft_support){
- DBG("L2CACHE does not have EDAC support.\n");
- return L2CACHE_ERR_ERROR;
- }
-
- if ((index < 0) || (index >= priv->index)){
- DBG("L2CACHE only has %d lines.\n", priv->index);
- return L2CACHE_ERR_EINVAL;
- }
-
- if ((way < 0) || (way >= priv->ways)){
- DBG("L2CACHE only has %d ways.\n", priv->ways);
- return L2CACHE_ERR_EINVAL;
- }
-
- /* Check pending bit */
- scrub = l2cache_reg_scrub();
- if ( (scrub & L2C_SCRUB_PEN) || (scrub & L2C_SCRUB_EN) ){
- DBG("L2CACHE already scrubbing.\n");
- return L2CACHE_ERR_ERROR;
- }
-
- /* Scrub line */
- l2cache_reg_scrub_line(way, index);
-
- DBG("L2CACHE Scrub line [%d,%d]\n",way,index);
-
- return L2CACHE_ERR_OK;
-}
-
-int l2cache_writethrough(int flush)
-{
- struct l2cache_priv * priv = l2cachepriv;
- int enabled;
- int ret;
-
- if (priv == NULL){
- DBG("L2CACHE not initialized.\n");
- return L2CACHE_ERR_NOINIT;
- }
-
- /* Check that L2C is enabled */
- enabled = l2cache_ctrl_status();
-
- /* Disable&Flush L2C */
- ret = l2cache_disable(flush);
- if (ret < 0){
- return ret;
- }
-
- /* Configure writethrough */
- l2cache_reg_ctrl_writep(1);
-
- /* Enable cache again */
- if (enabled){
- l2cache_reg_ctrl_enable();
- }
-
- DBG("L2CACHE now is writethrough\n");
-
- return L2CACHE_ERR_OK;
-}
-
-int l2cache_writeback(int flush)
-{
- struct l2cache_priv * priv = l2cachepriv;
- int enabled;
- int ret;
-
- if (priv == NULL){
- DBG("L2CACHE not initialized.\n");
- return L2CACHE_ERR_NOINIT;
- }
-
- /* Check that L2C is enabled */
- enabled = l2cache_ctrl_status();
-
- /* Disable&Flush L2C */
- ret = l2cache_disable(flush);
- if (ret < 0){
- return ret;
- }
-
- /* Configure writeback */
- l2cache_reg_ctrl_writep(0);
-
- /* Enable cache again */
- if (enabled){
- l2cache_reg_ctrl_enable();
- }
-
- DBG("L2CACHE now is writeback\n");
-
- return L2CACHE_ERR_OK;
-}
-
-int l2cache_replacement(int options, int flush)
-{
- struct l2cache_priv * priv = l2cachepriv;
- int enabled;
- int ret;
- int way;
-
- if (priv == NULL){
- DBG("L2CACHE not initialized.\n");
- return L2CACHE_ERR_NOINIT;
- }
-
- /* Check that L2C is enabled */
- enabled = l2cache_ctrl_status();
-
- /* Disable&Flush L2C */
- ret = l2cache_disable(flush);
- if (ret < 0){
- return ret;
- }
-
- if ( (options & 0x3) == L2CACHE_OPTIONS_REPL_MASTERIDX_IDX){
- /* Set iway */
- way = (options >> 2) & 0x3;
- l2cache_reg_ctrl_iway(way);
- }
-
- /* Configure writeback */
- l2cache_reg_ctrl_repl(options & 0x3);
-
- /* Enable cache again */
- if (enabled){
- l2cache_reg_ctrl_enable();
- }
-
- DBG("L2CACHE replacement set to %d\n", (options & 0x3));
-
- return L2CACHE_ERR_OK;
-
-}
-
-int l2cache_isr_register(l2cache_isr_t isr, void * arg, int options)
-{
- struct l2cache_priv *priv = l2cachepriv;
- unsigned int mask;
-
- if (priv == NULL){
- DBG("L2CACHE not initialized.\n");
- return L2CACHE_ERR_NOINIT;
- }
-
- if (isr == NULL){
- DBG("L2CACHE wrong isr.\n");
- return L2CACHE_ERR_EINVAL;
- }
-
- /* Get mask */
- mask = 0 |
- ((options & L2CACHE_INTERRUPT_BACKENDERROR)? L2C_ERROR_IRQM_BCKEND:0) |
- ((options & L2CACHE_INTERRUPT_WPROTHIT)? L2C_ERROR_IRQM_WPROT:0) |
- ((options & L2CACHE_INTERRUPT_CORRERROR)? L2C_ERROR_IRQM_CORR:0) |
- ((options & L2CACHE_INTERRUPT_UNCORRERROR)? L2C_ERROR_IRQM_UNCORR:0);
-
- /* Clear previous interrupts and mask them*/
- l2cache_reg_error_reset();
- l2cache_reg_error_irqmask(0);
-
- /* First time registering an ISR */
- if (priv->isr == NULL){
- /* Install and Enable L2CACHE interrupt handler */
- drvmgr_interrupt_register(priv->dev, 0, priv->devname, l2cache_isr,
- priv);
- }
-
- /* Install user ISR */
- priv->isr=isr;
- priv->isr_arg=arg;
-
- /* Now it is safe to unmask interrupts */
- l2cache_reg_error_irqmask(mask);
-
- return L2CACHE_ERR_OK;
-}
-
-int l2cache_isr_unregister(void)
-{
- struct l2cache_priv *priv = l2cachepriv;
-
- if (priv == NULL){
- DBG("L2CACHE not initialized.\n");
- return L2CACHE_ERR_NOINIT;
- }
-
- if (priv->isr == NULL){
- DBG("L2CACHE wrong isr.\n");
- return L2CACHE_ERR_EINVAL;
- }
-
- /* Clear previous interrupts and mask them*/
- l2cache_reg_error_reset();
- l2cache_reg_error_irqmask(0);
-
- /* Uninstall and disable L2CACHE interrupt handler */
- drvmgr_interrupt_unregister(priv->dev, 0, l2cache_isr, priv);
-
- /* Uninstall user ISR */
- priv->isr=NULL;
- priv->isr_arg=NULL;
-
- return L2CACHE_ERR_OK;
-}
-
-int l2cache_interrupt_unmask(int options)
-{
- struct l2cache_priv *priv = l2cachepriv;
- unsigned int mask, irq;
-
- if (priv == NULL){
- DBG("L2CACHE not initialized.\n");
- return L2CACHE_ERR_NOINIT;
- }
-
- if (priv->isr == NULL){
- DBG("L2CACHE wrong isr.\n");
- return L2CACHE_ERR_EINVAL;
- }
-
- /* Unmask interrupts in L2CACHE */
- mask = 0 |
- ((options & L2CACHE_INTERRUPT_BACKENDERROR)? L2C_ERROR_IRQM_BCKEND:0) |
- ((options & L2CACHE_INTERRUPT_WPROTHIT)? L2C_ERROR_IRQM_WPROT:0) |
- ((options & L2CACHE_INTERRUPT_CORRERROR)? L2C_ERROR_IRQM_CORR:0) |
- ((options & L2CACHE_INTERRUPT_UNCORRERROR)? L2C_ERROR_IRQM_UNCORR:0);
-
- /* Clear previous interrupts*/
- l2cache_reg_error_reset();
-
- /* Get previous mask */
- irq = ((l2cache_reg_error() & L2C_ERROR_IRQM) >> L2C_ERROR_IRQM_BIT);
-
- /* Set new mask */
- l2cache_reg_error_irqmask(irq | mask);
-
- return L2CACHE_ERR_OK;
-}
-
-int l2cache_interrupt_mask(int options)
-{
- struct l2cache_priv *priv = l2cachepriv;
- unsigned int mask, irq;
-
- if (priv == NULL){
- DBG("L2CACHE not initialized.\n");
- return L2CACHE_ERR_NOINIT;
- }
-
- /* Mask interrupts in L2CACHE */
- mask = 0 |
- ((options & L2CACHE_INTERRUPT_BACKENDERROR)? L2C_ERROR_IRQM_BCKEND:0) |
- ((options & L2CACHE_INTERRUPT_WPROTHIT)? L2C_ERROR_IRQM_WPROT:0) |
- ((options & L2CACHE_INTERRUPT_CORRERROR)? L2C_ERROR_IRQM_CORR:0) |
- ((options & L2CACHE_INTERRUPT_UNCORRERROR)? L2C_ERROR_IRQM_UNCORR:0);
-
- /* Clear previous interrupts */
- l2cache_reg_error_reset();
-
- /* Get previous mask */
- irq = ((l2cache_reg_error() & L2C_ERROR_IRQM) >> L2C_ERROR_IRQM_BIT);
-
- /* Set new mask */
- l2cache_reg_error_irqmask(irq & ~(mask));
-
- return L2CACHE_ERR_OK;
-}
-
-int l2cache_error_status(uint32_t * addr, uint32_t * status)
-{
- struct l2cache_priv *priv = l2cachepriv;
- unsigned int sts;
- unsigned int erraddr;
-
- if (priv == NULL){
- DBG("L2CACHE not initialized.\n");
- return L2CACHE_ERR_NOINIT;
- }
-
- /* Get error register */
- sts = priv->regs->error_status_control;
- erraddr = priv->regs->error_addr;
-
- /* Check if an error occurred */
- if (sts & L2C_ERROR_VALID){
- /* Reset error register */
- l2cache_reg_error_reset();
-
- /* Update user variables if needed */
- if (addr != NULL){
- *addr = (erraddr & ~(0x1f));
- }
-
- if(status != NULL){
- *status = sts;
- }
-
- /* Return status */
- if (sts & L2C_ERROR_MULTI){
- return L2CACHE_STATUS_MULTIPLEERRORS;
- }else{
- return L2CACHE_STATUS_NEWERROR;
- }
- }else{
- /* Return status */
- return L2CACHE_STATUS_NOERROR;
- }
-}