1 /* $NetBSD: mdXhl.c,v 1.1 1997/01/30 01:01:44 thorpej Exp $ */ 2 3 /* mdXhl.c 4 * ---------------------------------------------------------------------------- 5 * "THE BEER-WARE LICENSE" (Revision 42): 6 * <phk@login.dkuug.dk> wrote this file. As long as you retain this notice you 7 * can do whatever you want with this stuff. If we meet some day, and you think 8 * this stuff is worth it, you can buy me a beer in return. Poul-Henning Kamp 9 * ---------------------------------------------------------------------------- 10 * 11 * from FreeBSD Id: mdXhl.c,v 1.8 1996/10/25 06:48:12 bde Exp 12 * 13 */ 14 15 #include <sys/types.h> 16 #include <fcntl.h> 17 #include <unistd.h> 18 19 #include <errno.h> 20 #include <stdio.h> 21 #include <stdlib.h> 22 23 #include "mdX.h" 24 25 char * 26 MDXEnd(MDX_CTX *ctx, char *buf) 27 { 28 int i; 29 unsigned char digest[16]; 30 static const char hex[]="0123456789abcdef"; 31 32 if (!buf) 33 buf = malloc(33); 34 if (!buf) 35 return 0; 36 MDXFinal(digest,ctx); 37 for (i=0;i<16;i++) { 38 buf[i+i] = hex[digest[i] >> 4]; 39 buf[i+i+1] = hex[digest[i] & 0x0f]; 40 } 41 buf[i+i] = '\0'; 42 return buf; 43 } 44 45 char * 46 MDXFile (char *filename, char *buf) 47 { 48 unsigned char buffer[BUFSIZ]; 49 MDX_CTX ctx; 50 int f,i,j; 51 52 MDXInit(&ctx); 53 f = open(filename,O_RDONLY); 54 if (f < 0) return 0; 55 while ((i = read(f,buffer,sizeof buffer)) > 0) { 56 MDXUpdate(&ctx,buffer,i); 57 } 58 j = errno; 59 close(f); 60 errno = j; 61 if (i < 0) return 0; 62 return MDXEnd(&ctx, buf); 63 } 64 65 char * 66 MDXData (const unsigned char *data, unsigned int len, char *buf) 67 { 68 MDX_CTX ctx; 69 70 MDXInit(&ctx); 71 MDXUpdate(&ctx,data,len); 72 return MDXEnd(&ctx, buf); 73 } 74