URL
https://opencores.org/ocsvn/or1k/or1k/trunk
Subversion Repositories or1k
[/] [or1k/] [trunk/] [gdb-5.3/] [sim/] [ppc/] [cap.c] - Rev 1765
Compare with Previous | Blame | View Log
/* This file is part of the program psim. Copyright (C) 1994-1995,1997, 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. */ #ifndef _CAP_C_ #define _CAP_C_ #include "cap.h" typedef struct _cap_mapping cap_mapping; struct _cap_mapping { unsigned_cell external; void *internal; cap_mapping *next; }; struct _cap { int nr_mappings; cap_mapping *mappings; }; INLINE_CAP\ (cap *) cap_create(const char *key) { return ZALLOC(cap); } INLINE_CAP\ (void) cap_init(cap *db) { cap_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("cap: cap database possibly corrupt"); current_map = current_map->next; } ASSERT(current_map->next == NULL); if (current_map->external != 1) error("cap: cap database possibly currupt"); } else { db->nr_mappings = 0; } } INLINE_CAP\ (void *) cap_internal(cap *db, signed_cell external) { cap_mapping *current_map = db->mappings; while (current_map != NULL) { if (current_map->external == external) return current_map->internal; current_map = current_map->next; } return (void*)0; } INLINE_CAP\ (signed_cell) cap_external(cap *db, void *internal) { cap_mapping *current_map = db->mappings; while (current_map != NULL) { if (current_map->internal == internal) return current_map->external; current_map = current_map->next; } return 0; } INLINE_CAP\ (void) cap_add(cap *db, void *internal) { if (cap_external(db, internal) != 0) { error("cap: attempting to add an object already in the data base"); } else { /* insert at the front making things in decending order */ cap_mapping *new_map = ZALLOC(cap_mapping); new_map->next = db->mappings; new_map->internal = internal; db->nr_mappings += 1; new_map->external = db->nr_mappings; db->mappings = new_map; } } INLINE_CAP\ (void) cap_remove(cap *db, void *internal) { cap_mapping **current_map = &db->mappings; while (*current_map != NULL) { if ((*current_map)->internal == internal) { cap_mapping *delete = *current_map; *current_map = delete->next; zfree(delete); return; } current_map = &(*current_map)->next; } error("cap: attempt to remove nonexistant internal object"); } #endif