home *** CD-ROM | disk | FTP | other *** search
/ OS/2 Professional / OS2PRO194.ISO / os2 / prgramer / rcs / sources / hash.c < prev    next >
C/C++ Source or Header  |  1991-05-23  |  2KB  |  58 lines
  1. /* hash.c - The gdbm hash function. */
  2.  
  3. /*  This file is part of GDBM, the GNU data base manager, by Philip A. Nelson.
  4.     Copyright (C) 1990, 1991  Free Software Foundation, Inc.
  5.  
  6.     GDBM is free software; you can redistribute it and/or modify
  7.     it under the terms of the GNU General Public License as published by
  8.     the Free Software Foundation; either version 1, or (at your option)
  9.     any later version.
  10.  
  11.     GDBM is distributed in the hope that it will be useful,
  12.     but WITHOUT ANY WARRANTY; without even the implied warranty of
  13.     MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  14.     GNU General Public License for more details.
  15.  
  16.     You should have received a copy of the GNU General Public License
  17.     along with GDBM; see the file COPYING.  If not, write to
  18.     the Free Software Foundation, 675 Mass Ave, Cambridge, MA 02139, USA.
  19.  
  20.     You may contact the author by:
  21.        e-mail:  phil@cs.wwu.edu
  22.       us-mail:  Philip A. Nelson
  23.                 Computer Science Department
  24.                 Western Washington University
  25.                 Bellingham, WA 98226
  26.         phone:  (206) 676-3035
  27.  
  28. *************************************************************************/
  29.  
  30.  
  31.  
  32. #include "gdbmdefs.h"
  33.  
  34.  
  35. /* This hash function computes a 31 bit value.  The value is used to index
  36.    the hash directory using the top n bits.  It is also used in a hash bucket
  37.    to find the home position of the element by taking the value modulo the
  38.    bucket hash table size. */
  39.  
  40. long
  41. _gdbm_hash (key)
  42.      datum key;
  43. {
  44.   long  value;        /* Used to compute the hash value.  */
  45.   int   index;        /* Used to cycle through random values. */
  46.  
  47.  
  48.   /* Set the initial value from key. */
  49.   value = 0x238F13AF * key.dsize;
  50.   for (index = 0; index < key.dsize; index++)
  51.     value = (value + (key.dptr[index] << (index*5 % 24))) & 0x7FFFFFFF;
  52.  
  53.   value = (1103515243 * value + 12345) & 0x7FFFFFFF;
  54.  
  55.   /* Return the value. */
  56.   return value;
  57. }
  58.