summaryrefslogtreecommitdiff
path: root/server/common.c
blob: 1d1b7c195fd29e060b1a06637edcd29b81e3d263 (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
/* This file is part of the Project Athena Zephyr Notification System.
 * It contains functions for general use within the Zephyr server.
 *
 *	Created by:	John T. Kohl
 *
 *	$Source$
 *	$Author$
 *
 *	Copyright (c) 1987 by the Massachusetts Institute of Technology.
 *	For copying and distribution information, see the file
 *	"mit-copyright.h". 
 */

#include <zephyr/mit-copyright.h>

#ifndef lint
#ifndef SABER
static const char rcsid_common_c[] =
    "$Header$";
#endif SABER
#endif lint

#include <stdio.h>
#include <assert.h>
#include <ctype.h>
#include "zserver.h"

/* common routines for the server */

/* copy the string into newly allocated area */

char *
strsave (const char *sp)
{
    register char *ret;

    if((ret = (char *) xmalloc((unsigned) strlen(sp)+1)) == NULL) {
	    syslog(LOG_ERR, "no mem strdup'ing");
	    abort();
    }
    (void) strcpy(ret,sp);
    return(ret);
}

/* generic string hash function */

unsigned long
hash (const char *string)
{
	register int hval = 0;
	register char cp;

	while (1) {
	    cp = *string++;
	    if (!cp)
		break;
	    hval += cp;

	    cp = *string++;
	    if (!cp)
		break;
	    hval += cp * 9;

	    cp = *string++;
	    if (!cp)
		break;
	    hval += cp * 17;

	    cp = *string++;
	    if (!cp)
		break;
	    hval += cp * 65;

	    cp = *string++;
	    if (!cp)
		break;
	    hval += cp * 129;

	    hval += (hval & 0x7fffff) * 256;
	    hval &= 0x7fffffff;
	}
	return hval;
}