1 files changed, 70 insertions, 0 deletions
diff --git a/utils/cert_hash/cert_hash.c b/utils/cert_hash/cert_hash.c
new file mode 100644
index 00000000..bb498996
--- /dev/null
+++ b/utils/cert_hash/cert_hash.c
@@ -0,0 +1,70 @@
+/*
+ * Copyright (C) 2008  American Registry for Internet Numbers ("ARIN")
+ *
+ * Permission to use, copy, modify, and distribute this software for any
+ * purpose with or without fee is hereby granted, provided that the above
+ * copyright notice and this permission notice appear in all copies.
+ *
+ * THE SOFTWARE IS PROVIDED "AS IS" AND ARIN DISCLAIMS ALL WARRANTIES WITH
+ * REGARD TO THIS SOFTWARE INCLUDING ALL IMPLIED WARRANTIES OF MERCHANTABILITY
+ * AND FITNESS.  IN NO EVENT SHALL ARIN BE LIABLE FOR ANY SPECIAL, DIRECT,
+ * INDIRECT, OR CONSEQUENTIAL DAMAGES OR ANY DAMAGES WHATSOEVER RESULTING FROM
+ * LOSS OF USE, DATA OR PROFITS, WHETHER IN AN ACTION OF CONTRACT, NEGLIGENCE
+ * OR OTHER TORTIOUS ACTION, ARISING OUT OF OR IN CONNECTION WITH THE USE OR
+ * PERFORMANCE OF THIS SOFTWARE.
+ */
+
+/* $Id$ */
+
+/*
+ * Test of using BIO_f_md() filter BIO to calculate hash while reading.
+ */
+
+#include <stdio.h>
+#include <stdlib.h>
+#include <stdarg.h>
+#include <unistd.h>
+
+#include <openssl/bio.h>
+#include <openssl/evp.h>
+#include <openssl/x509.h>
+
+int main (int argc, char *argv[])
+{
+  BIO *b1 = NULL, *b2 = NULL;
+  X509 *x = NULL;
+  unsigned char buf[EVP_MAX_MD_SIZE];
+  unsigned i, n;
+
+  if ((b1 = BIO_new_file(argv[1], "rb")) == NULL)
+    goto done;
+
+  if ((b2 = BIO_new(BIO_f_md())) == NULL)
+    goto done;
+
+  if (!BIO_set_md(b2, EVP_sha256()))
+    goto done;
+
+  BIO_push(b2, b1);
+  
+  if ((x = d2i_X509_bio(b2, NULL)) == NULL)
+    goto done;
+
+  if (X509_print_fp(stdout, x) < 0)
+    goto done;
+
+  if ((n = BIO_gets(b2, buf, sizeof(buf))) > 0) {
+    printf("\nsha26[%u]: ", n);
+    for (i = 0; i < n; i++) {
+      printf("%02x%s", buf[i], i == n - 1 ? "\n" : ":");
+    }
+  }
+  
+ done:
+  if (ERR_peek_error())
+    ERR_print_errors_fp(stderr);
+
+  BIO_free_all(b2);
+
+  return 0;
+}