/* 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 char rcsid_common_c[] =
    "$Id$";
#endif /* SABER */
#endif /* lint */

#include <zephyr/zephyr.h>
#include <stdio.h>
#include <ctype.h>
#include <syslog.h>
#include <string.h>
#include "unix.h"

/* common routines for the server */

/* copy the string into newly allocated area */

char *
#ifdef __STDC__
strsave (Zconst char *sp)
#else
strsave (sp)
     Zconst char *sp;
#endif
{
    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);
}

/* The "& 0x5f" provides case-insensitivity for ASCII. */

unsigned long
#ifdef __STDC__
hash (Zconst char *string)
#else
hash (string)
     Zconst char *string;
#endif
{
	register unsigned long hval = 0;
	register char cp;

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

	    cp = *string++;
	    if (!cp)
		break;
	    hval += (cp & 0x5f) * (3 + (1 << 16));

	    cp = *string++;
	    if (!cp)
		break;
	    hval += (cp & 0x5f) * (1 + (1 << 8));

	    cp = *string++;
	    if (!cp)
		break;
	    hval += (cp & 0x5f) * (1 + (1 << 12));

	    cp = *string++;
	    if (!cp)
		break;
	    hval += (cp & 0x5f) * (1 + (1 << 4));

	    hval += ((long) hval) >> 18;
	}
	hval &= 0x7fffffff;
	return hval;
}

/* Output a name, replacing newlines with \n and single quotes with \q. */
void subscr_quote(p, fp)
    char *p;
    FILE *fp;
{
    for (; *p; p++) {
	if (*p == '\'') {
	    putc('\\', fp);
	    putc('q', fp);
	} else if (*p == '\n') {
	    putc('\\', fp);
	    putc('n', fp);
	} else {
	    putc(*p, fp);
	}
    }
}