// Modified by: VZ at 25.02.00: type safe hashes with WX_DECLARE_HASH()
// Created: 01/02/97
// RCS-ID: $Id$
-// Copyright: (c) Julian Smart and Markus Holzem
+// Copyright: (c) Julian Smart
// Licence: wxWindows licence
/////////////////////////////////////////////////////////////////////////////
// headers
// ----------------------------------------------------------------------------
-#ifdef __GNUG__
+#if defined(__GNUG__) && !defined(NO_GCC_PRAGMA)
#pragma implementation "hash.h"
#endif
#include "wx/hash.h"
+#if !wxUSE_STL
+
#include <string.h>
#include <stdarg.h>
wxNodeBase *wxHashTableBase::GetNode(long key, long value) const
{
- size_t slot = (size_t)abs(key % m_hashSize);
+ size_t slot = (size_t)abs((int)(key % (long)m_hashSize));
wxNodeBase *node;
if ( m_hashTable[slot] )
return node;
}
+#if WXWIN_COMPATIBILITY_2_4
+
// ----------------------------------------------------------------------------
// wxHashTableLong
// ----------------------------------------------------------------------------
+wxHashTableLong::~wxHashTableLong()
+{
+ Destroy();
+}
+
void wxHashTableLong::Init(size_t size)
{
m_hashSize = size;
m_count = 0;
}
+void wxHashTableLong::Create(size_t size)
+{
+ Init(size);
+}
+
void wxHashTableLong::Destroy()
{
for ( size_t n = 0; n < m_hashSize; n++ )
{
wxCHECK_RET( m_hashSize, _T("must call Create() first") );
- size_t slot = (size_t)abs(key % m_hashSize);
+ size_t slot = (size_t)abs((int)(key % (long)m_hashSize));
if ( !m_keys[slot] )
{
{
wxCHECK_MSG( m_hashSize, wxNOT_FOUND, _T("must call Create() first") );
- size_t slot = (size_t)abs(key % m_hashSize);
+ size_t slot = (size_t)abs((int)(key % (long)m_hashSize));
wxArrayLong *keys = m_keys[slot];
if ( keys )
{
wxCHECK_MSG( m_hashSize, wxNOT_FOUND, _T("must call Create() first") );
- size_t slot = (size_t)abs(key % m_hashSize);
+ size_t slot = (size_t)abs((int)(key % (long)m_hashSize));
wxArrayLong *keys = m_keys[slot];
if ( keys )
return wxNOT_FOUND;
}
+// ----------------------------------------------------------------------------
+// wxStringHashTable: more efficient than storing strings in a list
+// ----------------------------------------------------------------------------
+
+wxStringHashTable::wxStringHashTable(size_t sizeTable)
+{
+ m_keys = new wxArrayLong *[sizeTable];
+ m_values = new wxArrayString *[sizeTable];
+
+ m_hashSize = sizeTable;
+ for ( size_t n = 0; n < m_hashSize; n++ )
+ {
+ m_values[n] = (wxArrayString *)NULL;
+ m_keys[n] = (wxArrayLong *)NULL;
+ }
+}
+
+wxStringHashTable::~wxStringHashTable()
+{
+ Destroy();
+}
+
+void wxStringHashTable::Destroy()
+{
+ for ( size_t n = 0; n < m_hashSize; n++ )
+ {
+ delete m_values[n];
+ delete m_keys[n];
+ }
+
+ delete [] m_values;
+ delete [] m_keys;
+ m_hashSize = 0;
+}
+
+void wxStringHashTable::Put(long key, const wxString& value)
+{
+ wxCHECK_RET( m_hashSize, _T("must call Create() first") );
+
+ size_t slot = (size_t)abs((int)(key % (long)m_hashSize));
+
+ if ( !m_keys[slot] )
+ {
+ m_keys[slot] = new wxArrayLong;
+ m_values[slot] = new wxArrayString;
+ }
+
+ m_keys[slot]->Add(key);
+ m_values[slot]->Add(value);
+}
+
+wxString wxStringHashTable::Get(long key, bool *wasFound) const
+{
+ wxCHECK_MSG( m_hashSize, _T(""), _T("must call Create() first") );
+
+ size_t slot = (size_t)abs((int)(key % (long)m_hashSize));
+
+ wxArrayLong *keys = m_keys[slot];
+ if ( keys )
+ {
+ size_t count = keys->GetCount();
+ for ( size_t n = 0; n < count; n++ )
+ {
+ if ( keys->Item(n) == key )
+ {
+ if ( wasFound )
+ *wasFound = TRUE;
+
+ return m_values[slot]->Item(n);
+ }
+ }
+ }
+
+ if ( wasFound )
+ *wasFound = FALSE;
+
+ return _T("");
+}
+
+bool wxStringHashTable::Delete(long key) const
+{
+ wxCHECK_MSG( m_hashSize, FALSE, _T("must call Create() first") );
+
+ size_t slot = (size_t)abs((int)(key % (long)m_hashSize));
+
+ wxArrayLong *keys = m_keys[slot];
+ if ( keys )
+ {
+ size_t count = keys->GetCount();
+ for ( size_t n = 0; n < count; n++ )
+ {
+ if ( keys->Item(n) == key )
+ {
+ keys->RemoveAt(n);
+ m_values[slot]->RemoveAt(n);
+ return TRUE;
+ }
+ }
+ }
+
+ return FALSE;
+}
+
+#endif // WXWIN_COMPATIBILITY_2_4
+
// ----------------------------------------------------------------------------
// old not type safe wxHashTable
// ----------------------------------------------------------------------------
void wxHashTable::DoCopy(const wxHashTable& table)
{
n = table.n;
+ m_count = table.m_count;
current_position = table.current_position;
current_node = NULL; // doesn't matter - Next() will reconstruct it
key_type = table.key_type;
if (!hash_table[position])
{
- hash_table[position] = new wxList (wxKEY_INTEGER);
+ hash_table[position] = new wxList (wxKEY_STRING);
if (m_deleteContents) hash_table[position]->DeleteContents(TRUE);
}
{
wxNode *node = hash_table[position]->Find (value);
if (node)
- return node->Data ();
+ return node->GetData ();
else
return (wxObject *) NULL;
}
{
wxNode *node = hash_table[position]->Find (value);
if (node)
- return node->Data ();
+ return node->GetData ();
else
return (wxObject *) NULL;
}
else
{
wxNode *node = hash_table[position]->Find (k);
- return node ? node->Data () : (wxObject*)NULL;
+ return node ? node->GetData () : (wxObject*)NULL;
}
}
else
{
wxNode *node = hash_table[position]->Find (key);
- return node ? node->Data () : (wxObject*)NULL;
+ return node ? node->GetData () : (wxObject*)NULL;
}
}
wxNode *node = hash_table[position]->Find (k);
if (node)
{
- wxObject *data = node->Data ();
+ wxObject *data = node->GetData ();
delete node;
m_count--;
return data;
wxNode *node = hash_table[position]->Find (key);
if (node)
{
- wxObject *data = node->Data ();
+ wxObject *data = node->GetData ();
delete node;
m_count--;
return data;
wxNode *node = hash_table[position]->Find (value);
if (node)
{
- wxObject *data = node->Data ();
+ wxObject *data = node->GetData ();
delete node;
m_count--;
return data;
wxNode *node = hash_table[position]->Find (value);
if (node)
{
- wxObject *data = node->Data ();
+ wxObject *data = node->GetData ();
delete node;
m_count--;
return data;
current_node = (wxNode *) NULL;
}
-wxNode *wxHashTable::Next ()
+wxHashTable::Node* wxHashTable::Next ()
{
wxNode *found = (wxNode *) NULL;
bool end = FALSE;
{
if (hash_table[current_position])
{
- current_node = hash_table[current_position]->First ();
+ current_node = hash_table[current_position]->GetFirst ();
found = current_node;
}
}
}
else
{
- current_node = current_node->Next ();
+ current_node = current_node->GetNext ();
found = current_node;
}
}
void wxHashTable::Clear ()
{
- int i;
- for (i = 0; i < n; i++)
+ int i;
+ if (hash_table)
{
- if (hash_table[i])
- hash_table[i]->Clear ();
+ for (i = 0; i < n; i++)
+ {
+ if (hash_table[i])
+ hash_table[i]->Clear ();
+ }
}
m_count = 0;
}
+#else // if wxUSE_STL
+
+#include "wx/object.h"
+
+wxHashTableBase_Node::wxHashTableBase_Node( long key, void* value,
+ wxHashTableBase* table )
+ : m_value( value ), m_hashPtr( table )
+{
+ m_key.integer = key;
+}
+
+wxHashTableBase_Node::wxHashTableBase_Node( const wxChar* key, void* value,
+ wxHashTableBase* table )
+ : m_value( value ), m_hashPtr( table )
+{
+ m_key.string = wxStrcpy( new wxChar[wxStrlen( key ) + 1], key );
+}
+
+wxHashTableBase_Node::~wxHashTableBase_Node()
+{
+ if( m_hashPtr ) m_hashPtr->DoRemoveNode( this );
+}
+
+//
+
+wxHashTableBase::wxHashTableBase()
+ : m_size( 0 ), m_count( 0 ), m_table( NULL ), m_keyType( wxKEY_NONE ),
+ m_deleteContents( false )
+{
+}
+
+wxHashTableBase::~wxHashTableBase()
+{
+ Destroy();
+}
+
+void wxHashTableBase::Create( wxKeyType keyType, size_t size )
+{
+ m_keyType = keyType;
+ m_size = size;
+ m_table = new wxHashTableBase_Node*[ m_size ];
+
+ for( size_t i = 0; i < m_size; ++i )
+ m_table[i] = NULL;
+}
+
+void wxHashTableBase::Clear()
+{
+ for( size_t i = 0; i < m_size; ++i )
+ {
+ Node* end = m_table[i];
+
+ if( end == NULL )
+ continue;
+
+ Node *curr, *next = end->GetNext();
+
+ do
+ {
+ curr = next;
+ next = curr->GetNext();
+
+ DoDestroyNode( curr );
+
+ delete curr;
+ }
+ while( curr != end );
+
+ m_table[i] = NULL;
+ }
+
+ m_count = 0;
+}
+
+void wxHashTableBase::DoRemoveNode( wxHashTableBase_Node* node )
+{
+ size_t bucket = ( m_keyType == wxKEY_INTEGER ?
+ node->m_key.integer :
+ MakeKey( node->m_key.string ) ) % m_size;
+
+ if( node->GetNext() == node )
+ {
+ // single-node chain (common case)
+ m_table[bucket] = NULL;
+ }
+ else
+ {
+ Node *start = m_table[bucket], *curr;
+ Node* prev = start;
+
+ for( curr = prev->GetNext(); curr != node;
+ prev = curr, curr = curr->GetNext() );
+
+ DoUnlinkNode( bucket, node, prev );
+ }
+
+ DoDestroyNode( node );
+}
+
+void wxHashTableBase::DoDestroyNode( wxHashTableBase_Node* node )
+{
+ // if it is called from DoRemoveNode, node has already been
+ // removed, from other places it does not matter
+ node->m_hashPtr = NULL;
+
+ if( m_keyType == wxKEY_STRING )
+ delete[] node->m_key.string;
+ if( m_deleteContents )
+ DoDeleteContents( node );
+}
+
+void wxHashTableBase::Destroy()
+{
+ Clear();
+
+ delete[] m_table;
+
+ m_table = NULL;
+ m_size = 0;
+}
+
+void wxHashTableBase::DoInsertNode( size_t bucket, wxHashTableBase_Node* node )
+{
+ if( m_table[bucket] == NULL )
+ {
+ m_table[bucket] = node->m_next = node;
+ }
+ else
+ {
+ Node *prev = m_table[bucket];
+ Node *next = prev->m_next;
+
+ prev->m_next = node;
+ node->m_next = next;
+ m_table[bucket] = node;
+ }
+
+ ++m_count;
+}
+
+void wxHashTableBase::DoPut( long key, long hash, void* data )
+{
+ wxASSERT( m_keyType == wxKEY_INTEGER );
+
+ size_t bucket = size_t(hash) % m_size;
+ Node* node = new wxHashTableBase_Node( key, data, this );
+
+ DoInsertNode( bucket, node );
+}
+
+void wxHashTableBase::DoPut( const wxChar* key, long hash, void* data )
+{
+ wxASSERT( m_keyType == wxKEY_STRING );
+
+ size_t bucket = size_t(hash) % m_size;
+ Node* node = new wxHashTableBase_Node( key, data, this );
+
+ DoInsertNode( bucket, node );
+}
+
+void* wxHashTableBase::DoGet( long key, long hash ) const
+{
+ wxASSERT( m_keyType == wxKEY_INTEGER );
+
+ size_t bucket = size_t(hash) % m_size;
+
+ if( m_table[bucket] == NULL )
+ return NULL;
+
+ Node *first = m_table[bucket]->GetNext(),
+ *curr = first;
+
+ do
+ {
+ if( curr->m_key.integer == key )
+ return curr->m_value;
+
+ curr = curr->GetNext();
+ }
+ while( curr != first );
+
+ return NULL;
+}
+
+void* wxHashTableBase::DoGet( const wxChar* key, long hash ) const
+{
+ wxASSERT( m_keyType == wxKEY_STRING );
+
+ size_t bucket = size_t(hash) % m_size;
+
+ if( m_table[bucket] == NULL )
+ return NULL;
+
+ Node *first = m_table[bucket]->GetNext(),
+ *curr = first;
+
+ do
+ {
+ if( wxStrcmp( curr->m_key.string, key ) == 0 )
+ return curr->m_value;
+
+ curr = curr->GetNext();
+ }
+ while( curr != first );
+
+ return NULL;
+}
+
+void wxHashTableBase::DoUnlinkNode( size_t bucket, wxHashTableBase_Node* node,
+ wxHashTableBase_Node* prev )
+{
+ if( node == m_table[bucket] )
+ m_table[bucket] = prev;
+
+ if( prev == node && prev == node->GetNext() )
+ m_table[bucket] = NULL;
+ else
+ prev->m_next = node->m_next;
+
+ DoDestroyNode( node );
+ --m_count;
+}
+
+void* wxHashTableBase::DoDelete( long key, long hash )
+{
+ wxASSERT( m_keyType == wxKEY_INTEGER );
+
+ size_t bucket = size_t(hash) % m_size;
+
+ if( m_table[bucket] == NULL )
+ return NULL;
+
+ Node *first = m_table[bucket]->GetNext(),
+ *curr = first,
+ *prev = m_table[bucket];
+
+ do
+ {
+ if( curr->m_key.integer == key )
+ {
+ void* retval = curr->m_value;
+ curr->m_value = NULL;
+
+ DoUnlinkNode( bucket, curr, prev );
+ delete curr;
+
+ return retval;
+ }
+
+ prev = curr;
+ curr = curr->GetNext();
+ }
+ while( curr != first );
+
+ return NULL;
+}
+
+void* wxHashTableBase::DoDelete( const wxChar* key, long hash )
+{
+ wxASSERT( m_keyType == wxKEY_STRING );
+
+ size_t bucket = size_t(hash) % m_size;
+
+ if( m_table[bucket] == NULL )
+ return NULL;
+
+ Node *first = m_table[bucket]->GetNext(),
+ *curr = first,
+ *prev = m_table[bucket];
+
+ do
+ {
+ if( wxStrcmp( curr->m_key.string, key ) == 0 )
+ {
+ void* retval = curr->m_value;
+ curr->m_value = NULL;
+
+ DoUnlinkNode( bucket, curr, prev );
+ delete curr;
+
+ return retval;
+ }
+
+ prev = curr;
+ curr = curr->GetNext();
+ }
+ while( curr != first );
+
+ return NULL;
+}
+
+long wxHashTableBase::MakeKey( const wxChar *str )
+{
+ long int_key = 0;
+
+ while( *str )
+ int_key += (wxUChar)*str++;
+
+ return int_key;
+}
+
+//
+
+wxHashTable::wxHashTable( const wxHashTable& table )
+{
+ DoCopy( table );
+}
+
+const wxHashTable& wxHashTable::operator=( const wxHashTable& table )
+{
+ Destroy();
+ DoCopy( table );
+
+ return *this;
+}
+
+void wxHashTable::DoCopy( const wxHashTable& table )
+{
+ Create( m_keyType, m_size );
+
+ wxASSERT( false );
+}
+
+void wxHashTable::DoDeleteContents( wxHashTableBase_Node* node )
+{
+ delete ((wxHashTable_Node*)node)->GetData();
+}
+
+void wxHashTable::GetNextNode( size_t bucketStart )
+{
+ for( size_t i = bucketStart; i < m_size; ++i )
+ {
+ if( m_table[i] != NULL )
+ {
+ m_curr = ((Node*)m_table[i])->GetNext();
+ m_currBucket = i;
+ return;
+ }
+ }
+
+ m_curr = NULL;
+ m_currBucket = 0;
+}
+
+wxHashTable::Node* wxHashTable::Next()
+{
+ if( m_curr == NULL )
+ GetNextNode( 0 );
+ else
+ {
+ m_curr = m_curr->GetNext();
+
+ if( m_curr == ( (Node*)m_table[m_currBucket] )->GetNext() )
+ GetNextNode( m_currBucket + 1 );
+ }
+
+ return m_curr;
+}
+
+#endif // wxUSE_STL