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