libs/dbprim/_smat_hash.c

   1 /*
   2 ** Copyright (C) 2002 by Kevin L. Mitchell <klmitch@mit.edu>
   3 **
   4 ** This library is free software; you can redistribute it and/or
   5 ** modify it under the terms of the GNU Library General Public
   6 ** License as published by the Free Software Foundation; either
   7 ** version 2 of the License, or (at your option) any later version.
   8 **
   9 ** This library is distributed in the hope that it will be useful,
  10 ** but WITHOUT ANY WARRANTY; without even the implied warranty of
  11 ** MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
  12 ** Library General Public License for more details.
  13 **
  14 ** You should have received a copy of the GNU Library General Public
  15 ** License along with this library; if not, write to the Free
  16 ** Software Foundation, Inc., 59 Temple Place - Suite 330, Boston,
  17 ** MA 02111-1307, USA
  18 **
  19 ** @(#)$Id$
  20 */
  21 #include "dbprim.h"
  22 #include "dbprim_int.h"
  23
  24 RCSTAG("@(#)$Id$");
  25
  26 unsigned long
  27 _smat_hash(hash_table_t *table, db_key_t *key)
  28 {
  29   int i, j;
  30   unsigned int hash = 0;
  31   void **objects;
  32   unsigned char *c;
  33
  34   if (!key || !dk_key(key)) /* if the key's invalid, return 0 */
  35     return 0;
  36
  37   objects = dk_key(key); /* get the key--a pair of pointers */
  38
  39   /* walk through both elements in the array... */
  40   for (i = SMAT_LOC_FIRST; i < SMAT_LOC_SECOND; i++) {
  41     c = objects[i]; /* get a char pointer to the pointer value */
  42     for (j = 0; j < sizeof(void *); j++) /* step through each character */
  43       hash = (hash * 257) + c[j];
  44   }
  45
  46   return hash; /* return the hash value */
  47 }