#include <time.h>

#include <unistd.h>

#include <assert.h>

#include <stdlib.h>

#include <stdint.h>

#include <string.h>

#include <signal.h>

#include <stdio.h>

#include <fcntl.h>

#include <errno.h>

#include <openssl/evp.h>

#include <openssl/sha.h>

#include <openssl/crypto.h>

#include "scrypt-jane/scrypt-jane.h"

#define _PBKDF2_i (1<<16)

#define _SCRYPT_N (1<<18)

#define _SCRYPT_r 8

#define _SCRYPT_p 1

#define openssl_pbkdf2(p, pl, s, ss, k, ks) \

PKCS5_PBKDF2_HMAC(p, pl, s, ss, _PBKDF2_i, EVP_sha256(), ks, k)

#define jane_scrypt(p, pl, s, ss, k, ks) \

scrypt(p, pl, s, ss, 17, 3, 0, k, ks)

int warpwallet(unsigned char *pass, size_t pass_sz,

unsigned char *salt, size_t salt_sz,

unsigned char *out) {

unsigned char seed1[32], seed2[32];

int i, seed_sz = 32;

pass[pass_sz] = salt[salt_sz] = 1;

//if ((ret = libscrypt(pass, pass_sz+1, salt, salt_sz+1, seed1, seed_sz)) != 0) return ret;

jane_scrypt(pass, pass_sz+1, salt, salt_sz+1, seed1, seed_sz);

pass[pass_sz] = salt[salt_sz] = 2;

openssl_pbkdf2(pass, pass_sz+1, salt, salt_sz+1, seed2, seed_sz);

// xor the scrypt and pbkdf2 output together

for (i = 0; i < 32; ++i) { out[i] = seed1[i] ^ seed2[i]; }

return 0;

}