1N/A/*
1N/A * sdbm - ndbm work-alike hashed database library
1N/A * based on Per-Aake Larson's Dynamic Hashing algorithms. BIT 18 (1978).
1N/A * author: oz@nexus.yorku.ca
1N/A * status: public domain. keep it that way.
1N/A *
1N/A * hashing routine
1N/A */
1N/A
1N/A#include "config.h"
1N/A#include "EXTERN.h"
1N/A#include "sdbm.h"
1N/A/*
1N/A * polynomial conversion ignoring overflows
1N/A * [this seems to work remarkably well, in fact better
1N/A * then the ndbm hash function. Replace at your own risk]
1N/A * use: 65599 nice.
1N/A * 65587 even better.
1N/A */
1N/Along
1N/Asdbm_hash(register char *str, register int len)
1N/A{
1N/A register unsigned long n = 0;
1N/A
1N/A#ifdef DUFF
1N/A
1N/A#define HASHC n = *str++ + 65599 * n
1N/A
1N/A if (len > 0) {
1N/A register int loop = (len + 8 - 1) >> 3;
1N/A
1N/A switch(len & (8 - 1)) {
1N/A case 0: do {
1N/A HASHC; case 7: HASHC;
1N/A case 6: HASHC; case 5: HASHC;
1N/A case 4: HASHC; case 3: HASHC;
1N/A case 2: HASHC; case 1: HASHC;
1N/A } while (--loop);
1N/A }
1N/A
1N/A }
1N/A#else
1N/A while (len--)
1N/A n = *str++ + 65599 * n;
1N/A#endif
1N/A return n;
1N/A}