mirror of
https://sourceware.org/git/binutils-gdb.git
synced 2024-12-09 04:21:49 +08:00
238 lines
5.6 KiB
C
238 lines
5.6 KiB
C
/* This file is part of the program psim.
|
|
|
|
Copyright (C) 1994-1995,1997-1998, Andrew Cagney <cagney@highland.com.au>
|
|
|
|
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., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA.
|
|
|
|
*/
|
|
|
|
|
|
#include "hw-main.h"
|
|
#include "hw-base.h"
|
|
|
|
|
|
struct hw_handle_mapping {
|
|
cell_word external;
|
|
struct hw *phandle;
|
|
struct hw_instance *ihandle;
|
|
struct hw_handle_mapping *next;
|
|
};
|
|
|
|
|
|
struct hw_handle_data {
|
|
int nr_mappings;
|
|
struct hw_handle_mapping *mappings;
|
|
};
|
|
|
|
void
|
|
create_hw_handle_data (struct hw *hw)
|
|
{
|
|
if (hw_parent (hw) == NULL)
|
|
{
|
|
hw->handles_of_hw = HW_ZALLOC (hw, struct hw_handle_data);
|
|
}
|
|
else
|
|
{
|
|
hw->handles_of_hw = hw_root (hw)->handles_of_hw;
|
|
}
|
|
}
|
|
|
|
void
|
|
delete_hw_handle_data (struct hw *hw)
|
|
{
|
|
/* NULL */
|
|
}
|
|
|
|
|
|
|
|
#if 0
|
|
void
|
|
hw_handle_init (struct hw *hw)
|
|
{
|
|
struct hw_handle_mapping *current_map = db->mappings;
|
|
if (current_map != NULL)
|
|
{
|
|
db->nr_mappings = db->mappings->external;
|
|
/* verify that the mappings that were not removed are in
|
|
sequence down to nr 1 */
|
|
while (current_map->next != NULL)
|
|
{
|
|
if (current_map->external != current_map->next->external + 1)
|
|
error ("hw_handle: hw_handle database possibly corrupt");
|
|
current_map = current_map->next;
|
|
}
|
|
ASSERT (current_map->next == NULL);
|
|
if (current_map->external != 1)
|
|
error ("hw_handle: hw_handle database possibly corrupt");
|
|
}
|
|
else
|
|
{
|
|
db->nr_mappings = 0;
|
|
}
|
|
}
|
|
#endif
|
|
|
|
|
|
struct hw_instance *
|
|
hw_handle_ihandle2 (struct hw *hw,
|
|
cell_word external)
|
|
{
|
|
struct hw_handle_data *db = hw->handles_of_hw;
|
|
struct hw_handle_mapping *current_map = db->mappings;
|
|
while (current_map != NULL)
|
|
{
|
|
if (current_map->external == external)
|
|
return current_map->ihandle;
|
|
current_map = current_map->next;
|
|
}
|
|
return (void*)0;
|
|
}
|
|
|
|
|
|
struct hw *
|
|
hw_handle_phandle2 (struct hw *hw,
|
|
cell_word external)
|
|
{
|
|
struct hw_handle_data *db = hw->handles_of_hw;
|
|
struct hw_handle_mapping *current_map = db->mappings;
|
|
while (current_map != NULL)
|
|
{
|
|
if (current_map->external == external)
|
|
return current_map->phandle;
|
|
current_map = current_map->next;
|
|
}
|
|
return (void*)0;
|
|
}
|
|
|
|
|
|
cell_word
|
|
hw_handle_2ihandle (struct hw *hw,
|
|
struct hw_instance *internal)
|
|
{
|
|
struct hw_handle_data *db = hw->handles_of_hw;
|
|
struct hw_handle_mapping *current_map = db->mappings;
|
|
while (current_map != NULL)
|
|
{
|
|
if (current_map->ihandle == internal)
|
|
return current_map->external;
|
|
current_map = current_map->next;
|
|
}
|
|
return 0;
|
|
}
|
|
|
|
|
|
cell_word
|
|
hw_handle_2phandle (struct hw *hw,
|
|
struct hw *internal)
|
|
{
|
|
struct hw_handle_data *db = hw->handles_of_hw;
|
|
struct hw_handle_mapping *current_map = db->mappings;
|
|
while (current_map != NULL)
|
|
{
|
|
if (current_map->phandle == internal)
|
|
return current_map->external;
|
|
current_map = current_map->next;
|
|
}
|
|
return 0;
|
|
}
|
|
|
|
|
|
void
|
|
hw_handle_add_ihandle (struct hw *hw,
|
|
struct hw_instance *internal)
|
|
{
|
|
struct hw_handle_data *db = hw->handles_of_hw;
|
|
if (hw_handle_2ihandle (hw, internal) != 0)
|
|
{
|
|
hw_abort (hw, "attempting to add an ihandle already in the data base");
|
|
}
|
|
else
|
|
{
|
|
/* insert at the front making things in decending order */
|
|
struct hw_handle_mapping *new_map = ZALLOC (struct hw_handle_mapping);
|
|
new_map->next = db->mappings;
|
|
new_map->ihandle = internal;
|
|
db->nr_mappings += 1;
|
|
new_map->external = db->nr_mappings;
|
|
db->mappings = new_map;
|
|
}
|
|
}
|
|
|
|
|
|
void
|
|
hw_handle_add_phandle (struct hw *hw,
|
|
struct hw *internal)
|
|
{
|
|
struct hw_handle_data *db = hw->handles_of_hw;
|
|
if (hw_handle_2phandle (hw, internal) != 0)
|
|
{
|
|
hw_abort (hw, "attempting to add a phandle already in the data base");
|
|
}
|
|
else
|
|
{
|
|
/* insert at the front making things in decending order */
|
|
struct hw_handle_mapping *new_map = ZALLOC (struct hw_handle_mapping);
|
|
new_map->next = db->mappings;
|
|
new_map->phandle = internal;
|
|
db->nr_mappings += 1;
|
|
new_map->external = db->nr_mappings;
|
|
db->mappings = new_map;
|
|
}
|
|
}
|
|
|
|
|
|
void
|
|
hw_handle_remove_ihandle (struct hw *hw,
|
|
struct hw_instance *internal)
|
|
{
|
|
struct hw_handle_data *db = hw->handles_of_hw;
|
|
struct hw_handle_mapping **current_map = &db->mappings;
|
|
while (*current_map != NULL)
|
|
{
|
|
if ((*current_map)->ihandle == internal)
|
|
{
|
|
struct hw_handle_mapping *delete = *current_map;
|
|
*current_map = delete->next;
|
|
zfree (delete);
|
|
return;
|
|
}
|
|
current_map = &(*current_map)->next;
|
|
}
|
|
hw_abort (hw, "attempt to remove nonexistant ihandle");
|
|
}
|
|
|
|
|
|
void
|
|
hw_handle_remove_phandle (struct hw *hw,
|
|
struct hw *internal)
|
|
{
|
|
struct hw_handle_data *db = hw->handles_of_hw;
|
|
struct hw_handle_mapping **current_map = &db->mappings;
|
|
while (*current_map != NULL)
|
|
{
|
|
if ((*current_map)->phandle == internal)
|
|
{
|
|
struct hw_handle_mapping *delete = *current_map;
|
|
*current_map = delete->next;
|
|
zfree (delete);
|
|
return;
|
|
}
|
|
current_map = &(*current_map)->next;
|
|
}
|
|
hw_abort (hw, "attempt to remove nonexistant phandle");
|
|
}
|
|
|
|
|