Utility for generating hash of A1 for authentication module.

utils/gen_ha1/Makefile

@@ -0,0 +1,16 @@
+
+all: gen_ha1
+
+gen_ha1: gen_ha1.o calc.o ../../md5.o
+	gcc -o gen_ha1 gen_ha1.o calc.o ../../md5.o
+
+gen_ha1.o: gen_ha1.c
+	gcc -c gen_ha1.c
+
+calc.o: calc.c calc.h
+	gcc -c calc.c
+
+
+clean:
+	rm -f *~ *.o gen_ha1
+

utils/gen_ha1/calc.c

@@ -0,0 +1,115 @@
+/*
+ * $Id$
+ */
+
+#include <sys/types.h>
+#include <stdlib.h>
+#include <string.h>
+
+#include "calc.h"
+#include "../../md5global.h"
+#include "../../md5.h"
+
+
+void CvtHex(HASH Bin, HASHHEX Hex)
+{
+	unsigned short i;
+	unsigned char j;
+    
+	for (i = 0; i < HASHLEN; i++) {
+		j = (Bin[i] >> 4) & 0xf;
+		if (j <= 9)
+			Hex[i*2] = (j + '0');
+		else
+			Hex[i*2] = (j + 'a' - 10);
+		j = Bin[i] & 0xf;
+		if (j <= 9)
+			Hex[i*2+1] = (j + '0');
+		else
+			Hex[i*2+1] = (j + 'a' - 10);
+	};
+	Hex[HASHHEXLEN] = '\0';
+}
+
+
+/* 
+ * calculate H(A1) as per spec 
+ */
+void DigestCalcHA1(const char * pszAlg, const char * pszUserName,
+		   const char * pszRealm, const char * pszPassword,
+		   const char * pszNonce, const char * pszCNonce,
+		   HASHHEX SessionKey)
+{
+	MD5_CTX Md5Ctx;
+	HASH HA1;
+	
+	MD5Init(&Md5Ctx);
+	MD5Update(&Md5Ctx, pszUserName, strlen(pszUserName));
+	MD5Update(&Md5Ctx, ":", 1);
+	MD5Update(&Md5Ctx, pszRealm, strlen(pszRealm));
+	MD5Update(&Md5Ctx, ":", 1);
+	MD5Update(&Md5Ctx, pszPassword, strlen(pszPassword));
+	MD5Final(HA1, &Md5Ctx);
+	if (strcmp(pszAlg, "md5-sess") == 0) {
+		MD5Init(&Md5Ctx);
+		MD5Update(&Md5Ctx, HA1, HASHLEN);
+		MD5Update(&Md5Ctx, ":", 1);
+		MD5Update(&Md5Ctx, pszNonce, strlen(pszNonce));
+		MD5Update(&Md5Ctx, ":", 1);
+		MD5Update(&Md5Ctx, pszCNonce, strlen(pszCNonce));
+		MD5Final(HA1, &Md5Ctx);
+	};
+	CvtHex(HA1, SessionKey);
+}
+
+
+/* 
+ * calculate request-digest/response-digest as per HTTP Digest spec 
+ */
+void DigestCalcResponse(
+			HASHHEX HA1,                 /* H(A1) */
+			const char * pszNonce,       /* nonce from server */
+			const char * pszNonceCount,  /* 8 hex digits */
+			const char * pszCNonce,      /* client nonce */
+			const char * pszQop,         /* qop-value: "", "auth", "auth-int" */
+			const char * pszMethod,      /* method from the request */
+			const char * pszDigestUri,   /* requested URL */
+			HASHHEX HEntity,             /* H(entity body) if qop="auth-int" */
+			HASHHEX Response             /* request-digest or response-digest */)
+{
+	MD5_CTX Md5Ctx;
+	HASH HA2;
+	HASH RespHash;
+	HASHHEX HA2Hex;
+	
+	     /* calculate H(A2) */
+	MD5Init(&Md5Ctx);
+	MD5Update(&Md5Ctx, pszMethod, strlen(pszMethod));
+	MD5Update(&Md5Ctx, ":", 1);
+	MD5Update(&Md5Ctx, pszDigestUri, strlen(pszDigestUri));
+	if (strcmp(pszQop, "auth-int") == 0) {
+		MD5Update(&Md5Ctx, ":", 1);
+		MD5Update(&Md5Ctx, HEntity, HASHHEXLEN);
+	};
+	MD5Final(HA2, &Md5Ctx);
+	CvtHex(HA2, HA2Hex);
+	
+	     /* calculate response */
+	MD5Init(&Md5Ctx);
+	MD5Update(&Md5Ctx, HA1, HASHHEXLEN);
+	MD5Update(&Md5Ctx, ":", 1);
+	MD5Update(&Md5Ctx, pszNonce, strlen(pszNonce));
+	MD5Update(&Md5Ctx, ":", 1);
+	if (*pszQop) {
+		MD5Update(&Md5Ctx, pszNonceCount, strlen(pszNonceCount));
+		MD5Update(&Md5Ctx, ":", 1);
+		MD5Update(&Md5Ctx, pszCNonce, strlen(pszCNonce));
+		MD5Update(&Md5Ctx, ":", 1);
+		MD5Update(&Md5Ctx, pszQop, strlen(pszQop));
+		MD5Update(&Md5Ctx, ":", 1);
+	};
+	MD5Update(&Md5Ctx, HA2Hex, HASHHEXLEN);
+	MD5Final(RespHash, &Md5Ctx);
+	CvtHex(RespHash, Response);
+}
+

utils/gen_ha1/calc.h

@@ -0,0 +1,38 @@
+/*
+ * $Id$
+ */
+
+#ifndef CALC_H
+#define CALC_H
+
+
+#define HASHLEN 16
+typedef char HASH[HASHLEN];
+
+
+#define HASHHEXLEN 32
+typedef char HASHHEX[HASHHEXLEN+1];
+
+
+void CvtHex(HASH Bin, HASHHEX Hex);
+
+/* 
+ * calculate H(A1) as per HTTP Digest spec 
+ */
+void DigestCalcHA1(const char * pszAlg, const char * pszUserName, const char * pszRealm,
+		   const char * pszPassword, const char * pszNonce, const char * pszCNonce,
+		   HASHHEX SessionKey);
+
+/* calculate request-digest/response-digest as per HTTP Digest spec */
+void DigestCalcResponse(HASHHEX HA1,           /* H(A1) */
+			const char * pszNonce,       /* nonce from server */
+			const char * pszNonceCount,  /* 8 hex digits */
+			const char * pszCNonce,      /* client nonce */
+			const char * pszQop,         /* qop-value: "", "auth", "auth-int" */
+			const char * pszMethod,      /* method from the request */
+			const char * pszDigestUri,   /* requested URL */
+			HASHHEX HEntity,       /* H(entity body) if qop="auth-int" */
+			HASHHEX Response      /* request-digest or response-digest */);
+
+
+#endif

utils/gen_ha1/gen_ha1.c

@@ -0,0 +1,22 @@
+#include <stdio.h>
+#include <stdlib.h>
+#include "../../md5global.h"
+#include "../../md5.h"
+#include "calc.h"
+
+
+
+int main(int argc, char** argv)
+{
+	HASHHEX ha1;
+
+	if (argc != 4) {
+		printf("Usage: gen_ha1 <username> <realm> <password> \n");
+		return EXIT_SUCCESS;
+	}
+
+	DigestCalcHA1("md5", argv[1], argv[2], argv[3], "", "", ha1);
+	printf("%s\n", ha1);
+	
+	return EXIT_SUCCESS;
+}