[Netadm-devel] gwc/gwclib syscrypto.c,NONE,1.1

[linuxpark <lin...@us...>]

Update of /cvsroot/netadm/gwc/gwclib
In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv20772

Added Files:
	syscrypto.c 
Log Message:
Initial-checkin

int gwc_get32uid_by_md4 (char *string)
desc: this function return uniqeue 4 byte integer for a given string (max 32byte)

@string: any string
return: uniqueue integer



--- NEW FILE: syscrypto.c ---
/*

    Title           : syscrypto.c
    Author          : Jeho-Park <lin...@gm...> or <de...@sk...>
    Created date    : 2006. 04. 23. (SUN) 15:31:33 KST
    Description     : gwc crypto library
 
*/
#ident  "@(#) $Header: /cvsroot/netadm/gwc/gwclib/syscrypto.c,v 1.1 2006/04/23 06:49:16 linuxpark Exp $"

/*
 * This program is non-GPL but follows the BSD license
 * so If you want to use this code, you must not cut this comment.
 *
 * The half_md4_transform() was ported from linux/lib/halfmd4.c and made for more extensible
 * to get a unique id  with more long string.
 * 
 * jeho-park <lin...@ga...> or <de...@sk...> 2006. 4
 */

#include <stdio.h>
#include <string.h>
#include <unistd.h>

/* F, G and H are basic MD4 functions: selection, majority, parity */
#define F(x, y, z) ((z) ^ ((x) & ((y) ^ (z))))
#define G(x, y, z) (((x) & (y)) + (((x) ^ (y)) & (z)))
#define H(x, y, z) ((x) ^ (y) ^ (z))

/*
 * The generic round function.  The application is so specific that
 * we don't bother protecting all the arguments with parens, as is generally
 * good macro practice, in favor of extra legibility.
 * Rotation is separate from addition to prevent recomputation
 */
#define ROUND(f, a, b, c, d, x, s)	\
	(a += f(b, c, d) + x, a = (a << s) | (a >> (32 - s)))
#define K1 0
#define K2 013240474631UL
#define K3 015666365641UL

/*
 * Basic cut-down MD4 transform.  Returns only 32 bits of result.
 */
static int half_md4_transform(int buf[4], int const in[32])
{
	int a = buf[0], b = buf[1], c = buf[2], d = buf[3];

	/* Round 1 */
	ROUND(F, a, b, c, d, in[0] + K1,  3);
	ROUND(F, d, a, b, c, in[1] + K1,  7);
	ROUND(F, c, d, a, b, in[2] + K1, 11);
	ROUND(F, b, c, d, a, in[3] + K1, 19);
	ROUND(F, a, b, c, d, in[4] + K1,  3);
	ROUND(F, d, a, b, c, in[5] + K1,  7);
	ROUND(F, c, d, a, b, in[6] + K1, 11);
	ROUND(F, b, c, d, a, in[7] + K1, 19);

	/* Round 2 */
	ROUND(G, a, b, c, d, in[1] + K2,  3);
	ROUND(G, d, a, b, c, in[3] + K2,  5);
	ROUND(G, c, d, a, b, in[5] + K2,  9);
	ROUND(G, b, c, d, a, in[7] + K2, 13);
	ROUND(G, a, b, c, d, in[0] + K2,  3);
	ROUND(G, d, a, b, c, in[2] + K2,  5);
	ROUND(G, c, d, a, b, in[4] + K2,  9);
	ROUND(G, b, c, d, a, in[6] + K2, 13);

	/* Round 3 */
	ROUND(H, a, b, c, d, in[3] + K3,  3);
	ROUND(H, d, a, b, c, in[7] + K3,  9);
	ROUND(H, c, d, a, b, in[2] + K3, 11);
	ROUND(H, b, c, d, a, in[6] + K3, 15);
	ROUND(H, a, b, c, d, in[1] + K3,  3);
	ROUND(H, d, a, b, c, in[5] + K3,  9);
	ROUND(H, c, d, a, b, in[0] + K3, 11);
	ROUND(H, b, c, d, a, in[4] + K3, 15);
	
	/* Round 4 --LP */
	ROUND(H, a, b, c, d, in[12] + K3,  3);
	ROUND(H, d, a, b, c, in[19] + K3,  9);
	ROUND(H, c, d, a, b, in[4] + K3, 11);
	ROUND(H, b, c, d, a, in[7] + K3, 15);
	ROUND(H, a, b, c, d, in[29] + K3,  3);
	ROUND(H, d, a, b, c, in[13] + K3,  9);
	ROUND(H, c, d, a, b, in[16] + K3, 11);
	ROUND(H, b, c, d, a, in[9] + K3, 15);
	
	/* Round 5 --LP */
	ROUND(H, a, b, c, d, in[13] + K3,  3);
	ROUND(H, d, a, b, c, in[19] + K3,  9);
	ROUND(H, c, d, a, b, in[26] + K3, 11);
	ROUND(H, b, c, d, a, in[19] + K3, 15);
	ROUND(H, a, b, c, d, in[21] + K3,  3);
	ROUND(H, d, a, b, c, in[24] + K3,  9);
	ROUND(H, c, d, a, b, in[31] + K3, 11);
	ROUND(H, b, c, d, a, in[7] + K3, 15);

	buf[0] += a;
	buf[1] += b;
	buf[2] += c;
	buf[3] += d;

	return buf[1]; /* "most hashed" word */
}

/*
 * gwc_get32uid_by_md4
 * @string: any random string (max 32 byte)
 * @return: uniqueue 32bit integer ( not fully tested )
 */
int gwc_get32uid_by_md4 (char *string) {
	int i = 0;
	int max = strlen(string);
	int buf [4] = { 15733, 337534321, 1369311751, 73951137 };
	int in [8 * 4] = {
		34243, 454331, 34381, 32332, 34095, 13225, 1241, 3221,
		33215, 11231, 3237,  43111, 13425, 97723, 36631, 5467,
		45411, 24333, 5307, 28871, 2457, 43261, 34457, 5473,
		33321, 45347, 739421, 23227, 3323, 3326, 33311, 33697
	}; 
	int md4;

	while (i < max) {
		printf("?\n");
		if ( i < 4 ) {
			buf [i] = (int)string[i];
		}

		in [i] = 0x789ABCDE & (int)string[i];
		++i;
	}

	md4 = half_md4_transform(buf, in);
	if (md4 <= 0 )
		md4 = 0xFFFFFFFF ^ md4;

	return md4;
}