OpenCores
URL https://opencores.org/ocsvn/openrisc/openrisc/trunk

Subversion Repositories openrisc

[/] [openrisc/] [trunk/] [rtos/] [ecos-2.0/] [packages/] [cygmon/] [v2_0/] [misc/] [bplist-dynamic.c] - Rev 327

Go to most recent revision | Compare with Previous | Blame | View Log

//==========================================================================
//
//      bplist-dynamic.c
//
//      Breakpoint list using dynamic memory.
//
//==========================================================================
//####ECOSGPLCOPYRIGHTBEGIN####
// -------------------------------------------
// This file is part of eCos, the Embedded Configurable Operating System.
// Copyright (C) 1998, 1999, 2000, 2001, 2002 Red Hat, Inc.
//
// eCos 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 or (at your option) any later version.
//
// eCos 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 eCos; if not, write to the Free Software Foundation, Inc.,
// 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA.
//
// As a special exception, if other files instantiate templates or use macros
// or inline functions from this file, or you compile this file and link it
// with other works to produce a work based on this file, this file does not
// by itself cause the resulting work to be covered by the GNU General Public
// License. However the source code for this file must still be made available
// in accordance with section (3) of the GNU General Public License.
//
// This exception does not invalidate any other reasons why a work based on
// this file might be covered by the GNU General Public License.
//
// Alternative licenses for eCos may be arranged by contacting Red Hat, Inc.
// at http://sources.redhat.com/ecos/ecos-license/
// -------------------------------------------
//####ECOSGPLCOPYRIGHTEND####
//==========================================================================
//#####DESCRIPTIONBEGIN####
//
// Author(s):    
// Contributors: gthomas
// Date:         1999-10-20
// Purpose:      Breakpoint list using dynamic memory.
// Description:  
//               
//
//####DESCRIPTIONEND####
//
//=========================================================================
 
#include "board.h"
 
#ifndef USE_ECOS_HAL_BREAKPOINTS
 
#include <stdlib.h>
 
#ifndef NO_MALLOC
#ifndef NO_MALLOC_H
#include "malloc.h"
#else
void free ();
char *malloc ();
#endif
#endif
 
#ifdef __ECOS__
#include <cyg/hal/plf_stub.h>
#endif /* __ECOS__ */
 
/*
 * A simple target breakpoint list using malloc.
 * To use this package, you must define TRAP_SIZE to be the size
 * in bytes of a trap instruction (max if there's more than one),
 * and export a char array called _breakinst that contains a
 * breakpoint trap.  This package will copy trap instructions
 * from _breakinst into the breakpoint locations.
 */
 
static struct breakpoint_list {
  target_register_t  addr;
  char old_contents [TRAP_SIZE];
  struct breakpoint_list *next;
  char in_memory;
} *breakpoint_list = NULL;
 
#ifdef NO_MALLOC
static struct breakpoint_list bp_list [MAX_BP_NUM];
static struct breakpoint_list *free_bp_list = NULL;
static int curr_bp_num = 0;
#endif
 
#ifndef BREAKINST_DEFINED
#define BREAKINST_DEFINED
extern unsigned char _breakinst[];
#endif
 
int
__set_breakpoint (target_register_t addr)
{
  struct breakpoint_list **addent = &breakpoint_list;
  struct breakpoint_list *l = breakpoint_list;
  struct breakpoint_list *newent;
 
  while (l != NULL && l->addr < addr)
    {
      addent = &l->next;
      l =  l->next;
    }
 
  if (l != NULL && l->addr == addr)
    return 2;
 
#ifdef NO_MALLOC
  if (free_bp_list != NULL)
    {
      newent = free_bp_list;
      free_bp_list = free_bp_list->next;
    }
  else
    {
      if (curr_bp_num < MAX_BP_NUM)
	{
	  newent = &bp_list[curr_bp_num++];
	}
      else
	{
	  return 1;
	}
    }
#else
  newent = (struct breakpoint_list *) malloc (sizeof (struct breakpoint_list));
#endif
  newent->addr = addr;
  newent->in_memory = 0;
  newent->next = l;
  *addent = newent;
  return 0;
}
 
int
__remove_breakpoint (target_register_t addr)
{
  struct breakpoint_list *l = breakpoint_list;
  struct breakpoint_list *prev = NULL;
 
  while (l != NULL && l->addr < addr)
    {
      prev = l;
      l = l->next;
    }
 
  if (l == NULL)
    return 1;
 
  if (l->in_memory)
    {
      __write_mem_safe (&l->old_contents[0],
			(void*)l->addr,
			sizeof (l->old_contents));
    }
 
  if (prev == NULL)
    breakpoint_list = l->next;
  else
    prev->next = l->next;
 
#ifdef NO_MALLOC
  l->next = free_bp_list;
  free_bp_list = l;
#else
  free (l);
#endif
  return 0;
}
 
#include <cyg/hal/generic-stub.h>
#include <cyg/hal/hal_stub.h>
void
__cygmon_install_breakpoints (void)
{
  struct breakpoint_list *l = breakpoint_list;
 
  while (l != NULL)
    {
      if (! l->in_memory)
	{
	  int len = sizeof (l->old_contents);
 
	  if (__read_mem_safe (&l->old_contents[0], (void*)l->addr, len) == len)
	    {
#ifdef WRITE_MEM_IS_MEMCPY
	      if (__write_mem_safe (_breakinst, (void*)l->addr, len) == (void*)l->addr)
#else
	      if (__write_mem_safe (_breakinst, (void*)l->addr, len) == len)
#endif
		{
		  l->in_memory = 1;
		}
	    }
	}
      l = l->next;
    }
  flush_i_cache ();
}
 
void
__cygmon_clear_breakpoints (void)
{
  struct breakpoint_list *l = breakpoint_list;
 
  while (l != NULL)
    {
      if (l->in_memory)
	{
	  int len = sizeof (l->old_contents);
 
#ifdef WRITE_MEM_IS_MEMCPY
      if (__write_mem_safe (_breakinst, (void*)l->addr, len) == (void*)l->addr)
#else
	  if (__write_mem_safe (&l->old_contents[0], (void*)l->addr, len) == len)
#endif
	    {
	      l->in_memory = 0;
	    }
	}
      l = l->next;
    }
  flush_i_cache ();
}
 
#endif // USE_ECOS_HAL_BREAKPOINTS
 

Go to most recent revision | Compare with Previous | Blame | View Log

powered by: WebSVN 2.1.0

© copyright 1999-2024 OpenCores.org, equivalent to Oliscience, all rights reserved. OpenCores®, registered trademark.