/* CUT */


#define SHABUFLEN (SHA1_DIGEST_LENGTH * 2)

char *sha1_hash(const char *s, size_t size) {

    static char shabuf[SHABUFLEN + 1];
    unsigned char digestbuf[SHA1_DIGEST_LENGTH];
    int i;
    SHA1_CTX digest;

    SHA1Init(&digest);

    SHA1Update(&digest, (unsigned char *) s, size);
    SHA1Update(&digest, (unsigned char *) cloak_key, cloak_key_len);

    SHA1Final(digestbuf, &digest);

    for (i = 0; i < SHA1_DIGEST_LENGTH; i++)
	snprintf(shabuf+2*i, sizeof(shabuf) - 2*i, "%02x", digest[i]);
    shabuf[SHABUFLEN] = '\0';

    return shabuf;
}

/* CUT */