1 files changed, 96 insertions, 0 deletions
diff --git a/tests/hash/main.cpp b/tests/hash/main.cpp
new file mode 100644
index 000000000..6c898c9fc
--- /dev/null
+++ b/tests/hash/main.cpp
@@ -0,0 +1,96 @@
+// Copyright (c) 2012-2013 The Cryptonote developers
+// Distributed under the MIT/X11 software license, see the accompanying
+// file COPYING or http://www.opensource.org/licenses/mit-license.php.
+
+#include <cstddef>
+#include <fstream>
+#include <iomanip>
+#include <ios>
+#include <string>
+
+#include "warnings.h"
+#include "crypto/hash.h"
+#include "../io.h"
+
+using namespace std;
+using namespace crypto;
+typedef crypto::hash chash;
+
+PUSH_WARNINGS
+DISABLE_VS_WARNINGS(4297)
+extern "C" {
+  static void hash_tree(const void *data, size_t length, char *hash) {
+    if ((length & 31) != 0) {
+      throw ios_base::failure("Invalid input length for tree_hash");
+    }
+    tree_hash((const char (*)[32]) data, length >> 5, hash);
+  }
+}
+POP_WARNINGS
+
+extern "C" typedef void hash_f(const void *, size_t, char *);
+struct hash_func {
+  const string name;
+  hash_f &f;
+} hashes[] = {{"fast", cn_fast_hash}, {"slow", cn_slow_hash}, {"tree", hash_tree},
+  {"extra-blake", hash_extra_blake}, {"extra-groestl", hash_extra_groestl},
+  {"extra-jh", hash_extra_jh}, {"extra-skein", hash_extra_skein}};
+
+int main(int argc, char *argv[]) {
+  hash_f *f;
+  hash_func *hf;
+  fstream input;
+  vector<char> data;
+  chash expected, actual;
+  size_t test = 0;
+  bool error = false;
+  if (argc != 3) {
+    cerr << "Wrong number of arguments" << endl;
+    return 1;
+  }
+  for (hf = hashes;; hf++) {
+    if (hf >= &hashes[sizeof(hashes) / sizeof(hash_func)]) {
+      cerr << "Unknown function" << endl;
+      return 1;
+    }
+    if (argv[1] == hf->name) {
+      f = &hf->f;
+      break;
+    }
+  }
+  input.open(argv[2], ios_base::in);
+  for (;;) {
+    ++test;
+    input.exceptions(ios_base::badbit);
+    get(input, expected);
+    if (input.rdstate() & ios_base::eofbit) {
+      break;
+    }
+    input.exceptions(ios_base::badbit | ios_base::failbit | ios_base::eofbit);
+    input.clear(input.rdstate());
+    get(input, data);
+    f(data.data(), data.size(), (char *) &actual);
+    if (expected != actual) {
+      size_t i;
+      cerr << "Hash mismatch on test " << test << endl << "Input: ";
+      if (data.size() == 0) {
+        cerr << "empty";
+      } else {
+        for (i = 0; i < data.size(); i++) {
+          cerr << setbase(16) << setw(2) << setfill('0') << int(static_cast<unsigned char>(data[i]));
+        }
+      }
+      cerr << endl << "Expected hash: ";
+      for (i = 0; i < 32; i++) {
+          cerr << setbase(16) << setw(2) << setfill('0') << int(reinterpret_cast<unsigned char *>(&expected)[i]);
+      }
+      cerr << endl << "Actual hash: ";
+      for (i = 0; i < 32; i++) {
+          cerr << setbase(16) << setw(2) << setfill('0') << int(reinterpret_cast<unsigned char *>(&actual)[i]);
+      }
+      cerr << endl;
+      error = true;
+    }
+  }
+  return error ? 1 : 0;
+}