Initial commit of OpenSPARC T2 architecture model.

[OpenSPARC-T2-SAM] / sam-t2 / sam / system / tracemod / tm_impl.cc

// ========== Copyright Header Begin ==========================================
// 
// OpenSPARC T2 Processor File: tm_impl.cc
// Copyright (c) 2006 Sun Microsystems, Inc.  All Rights Reserved.
// DO NOT ALTER OR REMOVE COPYRIGHT NOTICES.
// 
// The above named program is free software; you can redistribute it and/or
// modify it under the terms of the GNU General Public
// License version 2 as published by the Free Software Foundation.
// 
// The above named 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 work; if not, write to the Free Software
// Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301, USA.
// 
// ========== Copyright Header End ============================================
/*
* Copyright (C) 1991, 2001 Sun Microsystems, Inc.
* All rights reserved.
*/
#pragma ident "@(#)1.4  01/11/06        tm_impl.cc"

/*
* Copyright (c) 1989, Sun Microsystems, Inc. All Rights Reserved. Sun
* considers its source code as an unpublished, proprietary trade secret, and
* it is available only under strict license provisions. This copyright
* notice is placed here only to protect Sun in the event the source is
* deemed a published work. Disassembly, decompilation, or other means of
* reducing the object code to human readable form is prohibited by the
* license agreement under which this code is provided to the user or company
* in possession of this copy
* 
* RESTRICTED RIGHTS LEGEND: Use, duplication, or disclosure by the 
* Government  is subject to restrictions as set forth in subparagraph 
* (c) (1) (ii) of the Rights in Technical Data and Computer Software clause
* at DFARS 52.227-7013 and in similar clauses in the FAR and NASA FAR 
* Supplement
*/

//
//  tm_impl.c 
//  ---------
//  This module contains an implementation of TRACING in blaze v4
//

#include <sys/types.h>
#include <assert.h>
#include <stdio.h>
#include <stdlib.h>
#include <string.h>
#include <synch.h>
#include <dlfcn.h>

#include "types.h"
#include "blaze_globals.h"
#include "ui.h"

//#include "cpu.h"
#include "cpu_interface.h"

#include "dr.h"
#include "schizo_module.h"
#include "system.h"


typedef void* TM_OPAQUE_DATA;
#include "tracemod.h"

#include "tm_impl.h"
#include <set>

//////////////////////////////////////////////////////////

//////////////////////////////////////////////////////////



void    TM_time_interval (uint64_t time)
{
 LdmNode *pnode;
 for (pnode=head_ldm; pnode != NULL; pnode=pnode->Next()) {
   Ldm * pldm = pnode->GetData();
   if (pldm->ti_action) {
     pldm->ti_action ((TM_OPAQUE_DATA)pldm->client_data, time);
   }
 }    
 tm_time_target += tm_time_interval;
}


void  TM_context (cpuT *sp)
{

}


//////////////////////////////////////////////////////////////////
//////////////////////////////////////////////////////////////////

typedef struct {
   void *obj;
   mmi_access access;
   uint64_t base, size, end;
} PhysioMap;

typedef List1Node<PhysioMap> PhysioMapNode;
PhysioMapNode* headPhysioMap;

static std::set<uint64_t> unmapped_addresses;

int  SYSTEM_physio_access(uint32_t cpu_id, void* /* obj */, uint64_t paddr, bool_t wr, uint32_t size, uint64_t* buf, uint8_t bytemask)
{PhysioMap* pmap;
   uint64_t end = paddr+size;
   for (PhysioMapNode *pnode = headPhysioMap; pnode; pnode = pnode->Next()) {
       pmap = pnode->GetData();
       if (pmap->base <= paddr && end <= pmap->end)
         return pmap->access(cpu_id, pmap->obj, paddr, (mmi_bool_t)wr, size, buf, bytemask);
   }
   
   if (unmapped_addresses.find(paddr) == unmapped_addresses.end())
   {
     ui->warning("unmapped SYSTEM_physio_access: [%llx %llx], %s \n", paddr, end,wr?"write":"read" );
     unmapped_addresses.insert(paddr);
   }

   if(!wr)
       *buf = 0;
   return 0;
}

int  mmi_map_physio(uint64_t base, uint64_t size, void* obj, mmi_access access)
{
   PhysioMapNode *pnode = PhysioMapNode::CreateInstance("physio map");
   PhysioMap     *ph;

   if (pnode == NULL) {
       ui->error("%s(L%d): Unable to create physio map\n", __FILE__, __LINE__);
   } else {
       ph = pnode->GetData ();
       ph->base = base;
       ph->size = size;
       ph->end = base + size;
       ph->obj = obj;
       ph->access = access;
       PhysioMapNode::AddHead (&headPhysioMap, pnode);
   }
   return pnode ? 0 : -1;
}

void mmi_unmap_physio(uint64_t base, uint64_t size, void* obj)
{
   PhysioMapNode *pnode, *prev;
   for (prev = NULL, pnode = headPhysioMap; pnode; pnode = pnode->Next()) {
       PhysioMap* pmap = pnode->GetData();
       if (pmap->obj == obj && pmap->base == base && pmap->size == size) {
           PhysioMapNode::DeleteNode(&headPhysioMap, prev);
           break;
       }
       prev = pnode;
   }
}