xref: /plan9/sys/src/libsec/port/hmac.c (revision ff55b41d4e9d2c13b36de2101465a357b4133185)
180ee5cbfSDavid du Colombier #include "os.h"
280ee5cbfSDavid du Colombier #include <libsec.h>
380ee5cbfSDavid du Colombier 
480ee5cbfSDavid du Colombier /* rfc2104 */
5*ff55b41dSDavid du Colombier DigestState*
hmac_x(uchar * p,ulong len,uchar * key,ulong klen,uchar * digest,DigestState * s,DigestState * (* x)(uchar *,ulong,uchar *,DigestState *),int xlen)680ee5cbfSDavid du Colombier hmac_x(uchar *p, ulong len, uchar *key, ulong klen, uchar *digest, DigestState *s,
780ee5cbfSDavid du Colombier 	DigestState*(*x)(uchar*, ulong, uchar*, DigestState*), int xlen)
880ee5cbfSDavid du Colombier {
980ee5cbfSDavid du Colombier 	int i;
10*ff55b41dSDavid du Colombier 	uchar pad[Hmacblksz+1], innerdigest[256];
1180ee5cbfSDavid du Colombier 
1280ee5cbfSDavid du Colombier 	if(xlen > sizeof(innerdigest))
1380ee5cbfSDavid du Colombier 		return nil;
14*ff55b41dSDavid du Colombier 	if(klen > Hmacblksz)
1580ee5cbfSDavid du Colombier 		return nil;
1680ee5cbfSDavid du Colombier 
1780ee5cbfSDavid du Colombier 	/* first time through */
185ab4dd4cSDavid du Colombier 	if(s == nil || s->seeded == 0){
19*ff55b41dSDavid du Colombier 		memset(pad, 0x36, Hmacblksz);
20*ff55b41dSDavid du Colombier 		pad[Hmacblksz] = 0;
2180ee5cbfSDavid du Colombier 		for(i = 0; i < klen; i++)
2280ee5cbfSDavid du Colombier 			pad[i] ^= key[i];
23*ff55b41dSDavid du Colombier 		s = (*x)(pad, Hmacblksz, nil, s);
2480ee5cbfSDavid du Colombier 		if(s == nil)
2580ee5cbfSDavid du Colombier 			return nil;
2680ee5cbfSDavid du Colombier 	}
2780ee5cbfSDavid du Colombier 
2880ee5cbfSDavid du Colombier 	s = (*x)(p, len, nil, s);
2980ee5cbfSDavid du Colombier 	if(digest == nil)
3080ee5cbfSDavid du Colombier 		return s;
3180ee5cbfSDavid du Colombier 
3280ee5cbfSDavid du Colombier 	/* last time through */
33*ff55b41dSDavid du Colombier 	memset(pad, 0x5c, Hmacblksz);
34*ff55b41dSDavid du Colombier 	pad[Hmacblksz] = 0;
3580ee5cbfSDavid du Colombier 	for(i = 0; i < klen; i++)
3680ee5cbfSDavid du Colombier 		pad[i] ^= key[i];
3780ee5cbfSDavid du Colombier 	(*x)(nil, 0, innerdigest, s);
38*ff55b41dSDavid du Colombier 	s = (*x)(pad, Hmacblksz, nil, nil);
3980ee5cbfSDavid du Colombier 	(*x)(innerdigest, xlen, digest, s);
4080ee5cbfSDavid du Colombier 	return nil;
4180ee5cbfSDavid du Colombier }
42