diff options
author | Dan Albert <danalbert@google.com> | 2015-06-17 11:09:54 -0700 |
---|---|---|
committer | Dan Albert <danalbert@google.com> | 2015-06-17 14:15:22 -0700 |
commit | f378ebf14df0952eae870c9865bab8326aa8f137 (patch) | |
tree | 31794503eb2a8c64ea5f313b93100f1163afcffb /gcc-4.4.3/gcc/pointer-set.c | |
parent | 2c58169824949d3a597d9fa81931e001ef9b1bd0 (diff) | |
download | toolchain_gcc-f378ebf14df0952eae870c9865bab8326aa8f137.tar.gz toolchain_gcc-f378ebf14df0952eae870c9865bab8326aa8f137.tar.bz2 toolchain_gcc-f378ebf14df0952eae870c9865bab8326aa8f137.zip |
Delete old versions of GCC.
Change-Id: I710f125d905290e1024cbd67f48299861790c66c
Diffstat (limited to 'gcc-4.4.3/gcc/pointer-set.c')
-rw-r--r-- | gcc-4.4.3/gcc/pointer-set.c | 408 |
1 files changed, 0 insertions, 408 deletions
diff --git a/gcc-4.4.3/gcc/pointer-set.c b/gcc-4.4.3/gcc/pointer-set.c deleted file mode 100644 index d5585c68b..000000000 --- a/gcc-4.4.3/gcc/pointer-set.c +++ /dev/null @@ -1,408 +0,0 @@ -/* Set operations on pointers - Copyright (C) 2004, 2006, 2007 Free Software Foundation, Inc. - -This file is part of GCC. - -GCC 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 3, or (at your option) -any later version. - -GCC 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 GCC; see the file COPYING3. If not see -<http://www.gnu.org/licenses/>. */ - -#include "config.h" -#include "system.h" -#include "pointer-set.h" - -/* A pointer set is represented as a simple open-addressing hash - table. Simplifications: The hash code is based on the value of the - pointer, not what it points to. The number of buckets is always a - power of 2. Null pointers are a reserved value. Deletion is not - supported (yet). There is no mechanism for user control of hash - function, equality comparison, initial size, or resizing policy. */ - -struct pointer_set_t -{ - size_t log_slots; - size_t n_slots; /* n_slots = 2^log_slots */ - size_t n_elements; - - const void **slots; -}; - -/* Use the multiplicative method, as described in Knuth 6.4, to obtain - a hash code for P in the range [0, MAX). MAX == 2^LOGMAX. - - Summary of this method: Multiply p by some number A that's - relatively prime to 2^sizeof(size_t). The result is two words. - Discard the most significant word, and return the most significant - N bits of the least significant word. As suggested by Knuth, our - choice for A is the integer part of (ULONG_MAX + 1.0) / phi, where phi - is the golden ratio. - - We don't need to do anything special for full-width multiplication - because we're only interested in the least significant word of the - product, and unsigned arithmetic in C is modulo the word size. */ - -static inline size_t -hash1 (const void *p, unsigned long max, unsigned long logmax) -{ -#if HOST_BITS_PER_LONG == 32 - const unsigned long A = 0x9e3779b9u; -#elif HOST_BITS_PER_LONG == 64 - const unsigned long A = 0x9e3779b97f4a7c16ul; -#else - const unsigned long A - = (ULONG_MAX + 1.0L) * 0.6180339887498948482045868343656381177203L; -#endif - const unsigned long shift = HOST_BITS_PER_LONG - logmax; - - return ((A * (unsigned long) p) >> shift) & (max - 1); -} - -/* Allocate an empty pointer set. */ -struct pointer_set_t * -pointer_set_create (void) -{ - struct pointer_set_t *result = XNEW (struct pointer_set_t); - - result->n_elements = 0; - result->log_slots = 8; - result->n_slots = (size_t) 1 << result->log_slots; - - result->slots = XCNEWVEC (const void *, result->n_slots); - return result; -} - -/* Reclaims all memory associated with PSET. */ -void -pointer_set_destroy (struct pointer_set_t *pset) -{ - XDELETEVEC (pset->slots); - XDELETE (pset); -} - -/* Create a copy of PSET. */ -struct pointer_set_t * -pointer_set_copy (const struct pointer_set_t *pset) -{ - struct pointer_set_t *result = XNEW (struct pointer_set_t); - - result->n_elements = pset->n_elements; - result->log_slots = pset->log_slots; - result->n_slots = pset->n_slots; - result->slots = XCNEWVEC (const void *, result->n_slots); - - /* Now copy the members of the set */ - memcpy(result->slots, pset->slots, pset->n_slots * sizeof(void *)); - - return result; -} - -/* Returns nonzero if PSET contains P. P must be nonnull. - - Collisions are resolved by linear probing. */ -int -pointer_set_contains (const struct pointer_set_t *pset, const void *p) -{ - size_t n = hash1 (p, pset->n_slots, pset->log_slots); - - while (true) - { - if (pset->slots[n] == p) - return 1; - else if (pset->slots[n] == 0) - return 0; - else - { - ++n; - if (n == pset->n_slots) - n = 0; - } - } -} - -/* Subroutine of pointer_set_insert. Return the insertion slot for P into - an empty element of SLOTS, an array of length N_SLOTS. */ -static inline size_t -insert_aux (const void *p, const void **slots, size_t n_slots, size_t log_slots) -{ - size_t n = hash1 (p, n_slots, log_slots); - while (true) - { - if (slots[n] == p || slots[n] == 0) - return n; - else - { - ++n; - if (n == n_slots) - n = 0; - } - } -} - -/* Inserts P into PSET if it wasn't already there. Returns nonzero - if it was already there. P must be nonnull. */ -int -pointer_set_insert (struct pointer_set_t *pset, const void *p) -{ - size_t n; - - /* For simplicity, expand the set even if P is already there. This can be - superfluous but can happen at most once. */ - if (pset->n_elements > pset->n_slots / 4) - { - size_t new_log_slots = pset->log_slots + 1; - size_t new_n_slots = pset->n_slots * 2; - const void **new_slots = XCNEWVEC (const void *, new_n_slots); - size_t i; - - for (i = 0; i < pset->n_slots; ++i) - { - const void *value = pset->slots[i]; - n = insert_aux (value, new_slots, new_n_slots, new_log_slots); - new_slots[n] = value; - } - - XDELETEVEC (pset->slots); - pset->n_slots = new_n_slots; - pset->log_slots = new_log_slots; - pset->slots = new_slots; - } - - n = insert_aux (p, pset->slots, pset->n_slots, pset->log_slots); - if (pset->slots[n]) - return 1; - - pset->slots[n] = p; - ++pset->n_elements; - return 0; -} - -/* Delete P from PSET if PSET contains P. Returns nonzero if P is in the set. - P must be nonnull. */ -int -pointer_set_delete (struct pointer_set_t *pset, const void *p) -{ - size_t n = hash1 (p, pset->n_slots, pset->log_slots); - - while (true) - { - if (pset->slots[n] == p) - { - pset->slots[n] = 0; - --pset->n_elements; - return 1; - } - else if (pset->slots[n] == 0) - { - return 0; - } - else - { - ++n; - if (n == pset->n_slots) - n = 0; - } - } -} - -/* Pass each pointer in PSET to the function in FN, together with the fixed - parameter DATA. If FN returns false, the iteration stops. */ - -void pointer_set_traverse (const struct pointer_set_t *pset, - bool (*fn) (const void *, void *), void *data) -{ - size_t i; - for (i = 0; i < pset->n_slots; ++i) - if (pset->slots[i] && !fn (pset->slots[i], data)) - break; -} - -/* Intersect DST_PSET with SRC_PSET and return the intersection set in - DST_PSET, i.e., - - DST_PSET = DST_PSET ^ SRC_PSET - - Also, if CMPL_PSET is not NULL, calculate the complement set that - contains elements not in the intersection, i.e., - - CMPL_PSET = (DST_PSET U SRC_PSET) - (DST_PSET ^ SRC_PSET) */ -void -pointer_set_intersection_complement(struct pointer_set_t *dst_pset, - const struct pointer_set_t *src_pset, - struct pointer_set_t *cmpl_pset) -{ - size_t i; - for (i = 0; i < dst_pset->n_slots; ++i) - { - const void *p = dst_pset->slots[i]; - if (p && !pointer_set_contains(src_pset, p)) - { - dst_pset->slots[i] = 0; - --dst_pset->n_elements; - if (cmpl_pset) - pointer_set_insert (cmpl_pset, p); - } - } - - if (cmpl_pset) - { - for (i = 0; i < src_pset->n_slots; ++i) - { - const void *p = src_pset->slots[i]; - if (p && !pointer_set_contains(dst_pset, p)) - pointer_set_insert (cmpl_pset, p); - } - } -} - -/* Take the union of DST_PSET and SRC_PSET and return the union in DST_PSET. */ -void -pointer_set_union_inplace (struct pointer_set_t *dst_pset, - const struct pointer_set_t *src_pset) -{ - size_t i; - for (i = 0; i < src_pset->n_slots; ++i) - { - const void *p = src_pset->slots[i]; - if (p) - pointer_set_insert (dst_pset, p); - } -} - -/* Return the number of elements in PSET. */ -size_t -pointer_set_cardinality (const struct pointer_set_t *pset) -{ - return pset->n_elements; -} - - - -/* A pointer map is represented the same way as a pointer_set, so - the hash code is based on the address of the key, rather than - its contents. Null keys are a reserved value. Deletion is not - supported (yet). There is no mechanism for user control of hash - function, equality comparison, initial size, or resizing policy. */ - -struct pointer_map_t -{ - size_t log_slots; - size_t n_slots; /* n_slots = 2^log_slots */ - size_t n_elements; - - const void **keys; - void **values; -}; - -/* Allocate an empty pointer map. */ -struct pointer_map_t * -pointer_map_create (void) -{ - struct pointer_map_t *result = XNEW (struct pointer_map_t); - - result->n_elements = 0; - result->log_slots = 8; - result->n_slots = (size_t) 1 << result->log_slots; - - result->keys = XCNEWVEC (const void *, result->n_slots); - result->values = XCNEWVEC (void *, result->n_slots); - return result; -} - -/* Reclaims all memory associated with PMAP. */ -void pointer_map_destroy (struct pointer_map_t *pmap) -{ - XDELETEVEC (pmap->keys); - XDELETEVEC (pmap->values); - XDELETE (pmap); -} - -/* Returns a pointer to the value to which P maps, if PMAP contains P. P - must be nonnull. Return NULL if PMAP does not contain P. - - Collisions are resolved by linear probing. */ -void ** -pointer_map_contains (const struct pointer_map_t *pmap, const void *p) -{ - size_t n = hash1 (p, pmap->n_slots, pmap->log_slots); - - while (true) - { - if (pmap->keys[n] == p) - return &pmap->values[n]; - else if (pmap->keys[n] == 0) - return NULL; - else - { - ++n; - if (n == pmap->n_slots) - n = 0; - } - } -} - -/* Inserts P into PMAP if it wasn't already there. Returns a pointer - to the value. P must be nonnull. */ -void ** -pointer_map_insert (struct pointer_map_t *pmap, const void *p) -{ - size_t n; - - /* For simplicity, expand the map even if P is already there. This can be - superfluous but can happen at most once. */ - if (pmap->n_elements > pmap->n_slots / 4) - { - size_t new_log_slots = pmap->log_slots + 1; - size_t new_n_slots = pmap->n_slots * 2; - const void **new_keys = XCNEWVEC (const void *, new_n_slots); - void **new_values = XCNEWVEC (void *, new_n_slots); - size_t i; - - for (i = 0; i < pmap->n_slots; ++i) - if (pmap->keys[i]) - { - const void *key = pmap->keys[i]; - n = insert_aux (key, new_keys, new_n_slots, new_log_slots); - new_keys[n] = key; - new_values[n] = pmap->values[i]; - } - - XDELETEVEC (pmap->keys); - XDELETEVEC (pmap->values); - pmap->n_slots = new_n_slots; - pmap->log_slots = new_log_slots; - pmap->keys = new_keys; - pmap->values = new_values; - } - - n = insert_aux (p, pmap->keys, pmap->n_slots, pmap->log_slots); - if (!pmap->keys[n]) - { - ++pmap->n_elements; - pmap->keys[n] = p; - } - - return &pmap->values[n]; -} - -/* Pass each pointer in PMAP to the function in FN, together with the pointer - to the value and the fixed parameter DATA. If FN returns false, the - iteration stops. */ - -void pointer_map_traverse (const struct pointer_map_t *pmap, - bool (*fn) (const void *, void **, void *), void *data) -{ - size_t i; - for (i = 0; i < pmap->n_slots; ++i) - if (pmap->keys[i] && !fn (pmap->keys[i], &pmap->values[i], data)) - break; -} |