Unconditionally include string.h
[libfirm] / ir / adt / pmap.c
index 89bbda9..1395361 100644 (file)
 /*
- * Project:     libFIRM
- * File name:   ir/adt/eset.c
- * Purpose:     Datentyp: Vereinfachte Map (hash-map) zum Speichern von
- *              Zeigern/Adressen -> Zeigern/Adressen.
- * Author:      Hubert Schmid
- * Modified by:
- * Created:     09.06.2002
- * CVS-ID:      $Id$
- * Copyright:   (c) 2002 Universität Karlsruhe
- * Licence:     This file protected by GPL -  GNU GENERAL PUBLIC LICENSE.
+ * Copyright (C) 1995-2008 University of Karlsruhe.  All right reserved.
+ *
+ * This file is part of libFirm.
+ *
+ * This file may be distributed and/or modified under the terms of the
+ * GNU General Public License version 2 as published by the Free Software
+ * Foundation and appearing in the file LICENSE.GPL included in the
+ * packaging of this file.
+ *
+ * Licensees holding valid libFirm Professional Edition licenses may use
+ * this file in accordance with the libFirm Commercial License.
+ * Agreement provided with the Software.
+ *
+ * This file is provided AS IS with NO WARRANTY OF ANY KIND, INCLUDING THE
+ * WARRANTY OF DESIGN, MERCHANTABILITY AND FITNESS FOR A PARTICULAR
+ * PURPOSE.
  */
 
+/**
+ * @file
+ * @brief       simplified hashmap for pointer -> pointer mappings
+ * @author      Hubert Schmid
+ * @date        09.06.2002
+ * @version     $Id$
+ */
+#include "config.h"
+
 #include "pmap.h"
 
 #include <assert.h>
 #include "set.h"
+#include "hashptr.h"
 
 
 struct pmap {
-  int dummy; /* dummy entry */
+       int dummy; /* dummy entry */
 };
 
 
-static const int INITIAL_SLOTS = 64;
+#define INITIAL_SLOTS 64
 
+/** map a pmap into a set */
+#define M2S(map)  (set *)(map)
 
-static int pmap_entry_cmp(const pmap_entry * entry1, const pmap_entry * entry2, size_t size) {
-  return entry1->key == entry2->key ? 0 : 1;
-}
-
+/**
+ * compare the keys of two entry pairs
+ */
+static int pmap_entry_cmp(const void *p1, const void *p2, size_t size) {
+       const pmap_entry *entry1 = p1;
+       const pmap_entry *entry2 = p2;
+       (void) size;
 
-pmap * pmap_create(void) {
-  return (pmap *) new_set((set_cmp_fun) pmap_entry_cmp, INITIAL_SLOTS);
+       return entry1->key != entry2->key;
 }
 
-
-void pmap_destroy(pmap * map) {
-  del_set((set *) map);
+/* Creates a new empty map with an initial number of slots. */
+pmap *pmap_create_ex(int slots) {
+       return (pmap *)new_set(pmap_entry_cmp, slots);
 }
 
+pmap *pmap_create(void) {
+       return pmap_create_ex(INITIAL_SLOTS);
+}
 
-void pmap_insert(pmap * map, void * key, void * value) {
-  if (pmap_contains(map, key)) {
-    pmap_entry * entry = pmap_find(map, key);
-    entry->value = value;
-  } else {
-    pmap_entry entry;
-    entry.key = key;
-    entry.value = value;
-    set_insert((set *) map, &entry, sizeof(pmap_entry), (unsigned) key);
-  }
+void pmap_destroy(pmap *map) {
+       del_set(M2S(map));
 }
 
+void pmap_insert(pmap *map, const void *key, void *value) {
+       pmap_entry entry, *p;
 
-bool pmap_contains(pmap * map, void * key) {
-  return set_find((set *) map, &key, sizeof(pmap_entry), (unsigned) key) != NULL;
+       entry.key = key;
+       p = set_insert(M2S(map), &entry, sizeof(pmap_entry), HASH_PTR(key));
+       p->value = value;
 }
 
+int pmap_contains(pmap *map, const void *key) {
+       return set_find(M2S(map), &key, sizeof(pmap_entry), HASH_PTR(key)) != NULL;
+}
 
-pmap_entry * pmap_find(pmap * map, void * key) {
-  return (pmap_entry *) set_find((set *) map, &key, sizeof(pmap_entry), (unsigned) key);
+pmap_entry * pmap_find(pmap *map, const void *key) {
+       return (pmap_entry *)set_find(M2S(map), &key, sizeof(pmap_entry), HASH_PTR(key));
 }
 
 
-void * pmap_get(pmap * map, void * key) {
-  pmap_entry * entry = pmap_find(map, key);
-  return entry == NULL ? NULL : entry->value;
+void * pmap_get(pmap *map, const void *key) {
+       pmap_entry * entry = pmap_find(map, key);
+       return entry == NULL ? NULL : entry->value;
 }
 
+int pmap_count(pmap *map) {
+       return set_count(M2S(map));
+}
 
-pmap_entry * pmap_first(pmap * map) {
-  return (pmap_entry *) set_first((set *) map);
+pmap_entry *pmap_first(pmap *map) {
+       return (pmap_entry *) set_first(M2S(map));
 }
 
+pmap_entry *pmap_next(pmap *map) {
+       return (pmap_entry *) set_next(M2S(map));
+}
 
-pmap_entry * pmap_next(pmap * map) {
-  return (pmap_entry *) set_next((set *) map);
+void pmap_break(pmap *map) {
+       set_break(M2S(map));
 }