Tanguy Pruvot
9 years ago
12 changed files with 441 additions and 5 deletions
@ -0,0 +1,412 @@
@@ -0,0 +1,412 @@
|
||||
/** |
||||
* X11EVO algo implementation |
||||
* Cuda implementation by tpruvot@github - May 2016 |
||||
*/ |
||||
#include <stdio.h> |
||||
#include <memory.h> |
||||
|
||||
extern "C" { |
||||
#include "sph/sph_blake.h" |
||||
#include "sph/sph_bmw.h" |
||||
#include "sph/sph_groestl.h" |
||||
#include "sph/sph_skein.h" |
||||
#include "sph/sph_jh.h" |
||||
#include "sph/sph_keccak.h" |
||||
#include "sph/sph_luffa.h" |
||||
#include "sph/sph_cubehash.h" |
||||
#include "sph/sph_shavite.h" |
||||
#include "sph/sph_simd.h" |
||||
#include "sph/sph_echo.h" |
||||
} |
||||
|
||||
#include "miner.h" |
||||
#include "cuda_helper.h" |
||||
#include "cuda_x11.h" |
||||
|
||||
static uint32_t *d_hash[MAX_GPUS]; |
||||
|
||||
enum Algo { |
||||
BLAKE = 0, |
||||
BMW, |
||||
GROESTL, |
||||
SKEIN, |
||||
JH, |
||||
KECCAK, |
||||
LUFFA, |
||||
CUBEHASH, |
||||
SHAVITE, |
||||
SIMD, |
||||
ECHO, |
||||
HASH_FUNC_COUNT |
||||
}; |
||||
|
||||
static void swap8(uint8_t *a, uint8_t *b) |
||||
{ |
||||
uint8_t t = *a; |
||||
*a = *b; |
||||
*b = t; |
||||
} |
||||
|
||||
static void initPerm(uint8_t n[], int count) |
||||
{ |
||||
for (int i = 0; i < count; i++) |
||||
n[i] = i; |
||||
} |
||||
|
||||
static int nextPerm(uint8_t n[], int count) |
||||
{ |
||||
int tail, i, j; |
||||
|
||||
if (count <= 1) |
||||
return 0; |
||||
|
||||
for (i = count - 1; i>0 && n[i - 1] >= n[i]; i--); |
||||
tail = i; |
||||
|
||||
if (tail > 0) { |
||||
for (j = count - 1; j>tail && n[j] <= n[tail - 1]; j--); |
||||
swap8(&n[tail - 1], &n[j]); |
||||
} |
||||
|
||||
for (i = tail, j = count - 1; i<j; i++, j--) |
||||
swap8(&n[i], &n[j]); |
||||
|
||||
return (tail != 0); |
||||
} |
||||
|
||||
static void getAlgoString(char *str, int seq) |
||||
{ |
||||
uint8_t algoList[HASH_FUNC_COUNT]; |
||||
char *sptr; |
||||
|
||||
initPerm(algoList, HASH_FUNC_COUNT); |
||||
|
||||
for (int k = 0; k < seq; k++) { |
||||
nextPerm(algoList, HASH_FUNC_COUNT); |
||||
} |
||||
|
||||
sptr = str; |
||||
for (int j = 0; j < HASH_FUNC_COUNT; j++) { |
||||
if (algoList[j] >= 10) |
||||
sprintf(sptr, "%c", 'A' + (algoList[j] - 10)); |
||||
else |
||||
sprintf(sptr, "%u", (uint32_t) algoList[j]); |
||||
sptr++; |
||||
} |
||||
*sptr = '\0'; |
||||
//applog(LOG_DEBUG, "nextPerm %s", str); |
||||
} |
||||
|
||||
static __thread uint32_t s_ntime = 0; |
||||
static char hashOrder[HASH_FUNC_COUNT + 1] = { 0 }; |
||||
static int s_sequence = -1; |
||||
|
||||
#define INITIAL_DATE 0x57254700 |
||||
static inline int getCurrentAlgoSeq(uint32_t current_time) |
||||
{ |
||||
// change once per day |
||||
return (int) (current_time - INITIAL_DATE) / (60 * 60 * 24); |
||||
} |
||||
|
||||
static void evo_twisted_code(uint32_t ntime, char *permstr) |
||||
{ |
||||
int seq = getCurrentAlgoSeq(ntime); |
||||
if (s_sequence != seq) { |
||||
getAlgoString(permstr, seq); |
||||
s_sequence = seq; |
||||
} |
||||
} |
||||
|
||||
// X11evo CPU Hash |
||||
extern "C" void x11evo_hash(void *output, const void *input) |
||||
{ |
||||
uint32_t _ALIGN(64) hash[64/4] = { 0 }; |
||||
|
||||
sph_blake512_context ctx_blake; |
||||
sph_bmw512_context ctx_bmw; |
||||
sph_groestl512_context ctx_groestl; |
||||
sph_skein512_context ctx_skein; |
||||
sph_jh512_context ctx_jh; |
||||
sph_keccak512_context ctx_keccak; |
||||
sph_luffa512_context ctx_luffa1; |
||||
sph_cubehash512_context ctx_cubehash1; |
||||
sph_shavite512_context ctx_shavite1; |
||||
sph_simd512_context ctx_simd1; |
||||
sph_echo512_context ctx_echo1; |
||||
|
||||
if (s_sequence == -1) { |
||||
uint32_t *data = (uint32_t*) input; |
||||
const uint32_t ntime = data[17]; |
||||
evo_twisted_code(ntime, hashOrder); |
||||
} |
||||
|
||||
void *in = (void*) input; |
||||
int size = 80; |
||||
|
||||
const int hashes = (int) strlen(hashOrder); |
||||
|
||||
for (int i = 0; i < hashes; i++) |
||||
{ |
||||
const char elem = hashOrder[i]; |
||||
uint8_t algo = elem >= 'A' ? elem - 'A' + 10 : elem - '0'; |
||||
|
||||
if (i > 0) { |
||||
in = (void*) hash; |
||||
size = 64; |
||||
} |
||||
|
||||
switch (algo) { |
||||
case BLAKE: |
||||
sph_blake512_init(&ctx_blake); |
||||
sph_blake512(&ctx_blake, in, size); |
||||
sph_blake512_close(&ctx_blake, hash); |
||||
break; |
||||
case BMW: |
||||
sph_bmw512_init(&ctx_bmw); |
||||
sph_bmw512(&ctx_bmw, in, size); |
||||
sph_bmw512_close(&ctx_bmw, hash); |
||||
break; |
||||
case GROESTL: |
||||
sph_groestl512_init(&ctx_groestl); |
||||
sph_groestl512(&ctx_groestl, in, size); |
||||
sph_groestl512_close(&ctx_groestl, hash); |
||||
break; |
||||
case SKEIN: |
||||
sph_skein512_init(&ctx_skein); |
||||
sph_skein512(&ctx_skein, in, size); |
||||
sph_skein512_close(&ctx_skein, hash); |
||||
break; |
||||
case JH: |
||||
sph_jh512_init(&ctx_jh); |
||||
sph_jh512(&ctx_jh, in, size); |
||||
sph_jh512_close(&ctx_jh, hash); |
||||
break; |
||||
case KECCAK: |
||||
sph_keccak512_init(&ctx_keccak); |
||||
sph_keccak512(&ctx_keccak, in, size); |
||||
sph_keccak512_close(&ctx_keccak, hash); |
||||
break; |
||||
case LUFFA: |
||||
sph_luffa512_init(&ctx_luffa1); |
||||
sph_luffa512(&ctx_luffa1, in, size); |
||||
sph_luffa512_close(&ctx_luffa1, hash); |
||||
break; |
||||
case CUBEHASH: |
||||
sph_cubehash512_init(&ctx_cubehash1); |
||||
sph_cubehash512(&ctx_cubehash1, in, size); |
||||
sph_cubehash512_close(&ctx_cubehash1, hash); |
||||
break; |
||||
case SHAVITE: |
||||
sph_shavite512_init(&ctx_shavite1); |
||||
sph_shavite512(&ctx_shavite1, in, size); |
||||
sph_shavite512_close(&ctx_shavite1, hash); |
||||
break; |
||||
case SIMD: |
||||
sph_simd512_init(&ctx_simd1); |
||||
sph_simd512(&ctx_simd1, in, size); |
||||
sph_simd512_close(&ctx_simd1, hash); |
||||
break; |
||||
case ECHO: |
||||
sph_echo512_init(&ctx_echo1); |
||||
sph_echo512(&ctx_echo1, in, size); |
||||
sph_echo512_close(&ctx_echo1, hash); |
||||
break; |
||||
} |
||||
} |
||||
|
||||
memcpy(output, hash, 32); |
||||
} |
||||
|
||||
//#define _DEBUG |
||||
#define _DEBUG_PREFIX "evo" |
||||
#include "cuda_debug.cuh" |
||||
|
||||
static bool init[MAX_GPUS] = { 0 }; |
||||
|
||||
extern void quark_blake512_cpu_hash_64(int thr_id, uint32_t threads, uint32_t startNounce, uint32_t *d_nonceVector, uint32_t *d_outputHash, int order); |
||||
|
||||
extern "C" int scanhash_x11evo(int thr_id, struct work* work, uint32_t max_nonce, unsigned long *hashes_done) |
||||
{ |
||||
uint32_t *pdata = work->data; |
||||
uint32_t *ptarget = work->target; |
||||
const uint32_t first_nonce = pdata[19]; |
||||
int intensity = (device_sm[device_map[thr_id]] >= 500 && !is_windows()) ? 20 : 19; |
||||
uint32_t throughput = cuda_default_throughput(thr_id, 1U << intensity); // 19=256*256*8; |
||||
if (init[thr_id]) throughput = min(throughput, max_nonce - first_nonce); |
||||
|
||||
if (opt_debug || s_ntime != pdata[17] || s_sequence == -1) { |
||||
uint32_t ntime = swab32(work->data[17]); |
||||
evo_twisted_code(ntime, hashOrder); |
||||
s_ntime = pdata[17]; |
||||
if (opt_debug) { |
||||
int secs = (int) (ntime - INITIAL_DATE) % (60 * 60 * 24); |
||||
secs = (60 * 60 * 24) - secs; |
||||
applog(LOG_DEBUG, "evo hash order %s, next in %d mn", hashOrder, secs/60); |
||||
} |
||||
} |
||||
|
||||
if (opt_benchmark) |
||||
ptarget[7] = 0x5; |
||||
|
||||
if (!init[thr_id]) |
||||
{ |
||||
cudaSetDevice(device_map[thr_id]); |
||||
if (opt_cudaschedule == -1 && gpu_threads == 1) { |
||||
cudaDeviceReset(); |
||||
// reduce cpu usage |
||||
cudaSetDeviceFlags(cudaDeviceScheduleBlockingSync); |
||||
CUDA_LOG_ERROR(); |
||||
} |
||||
|
||||
quark_blake512_cpu_init(thr_id, throughput); |
||||
quark_bmw512_cpu_init(thr_id, throughput); |
||||
quark_groestl512_cpu_init(thr_id, throughput); |
||||
quark_skein512_cpu_init(thr_id, throughput); |
||||
quark_keccak512_cpu_init(thr_id, throughput); |
||||
quark_jh512_cpu_init(thr_id, throughput); |
||||
x11_luffa512_cpu_init(thr_id, throughput); |
||||
x11_cubehash512_cpu_init(thr_id, throughput); |
||||
x11_shavite512_cpu_init(thr_id, throughput); |
||||
x11_echo512_cpu_init(thr_id, throughput); |
||||
if (x11_simd512_cpu_init(thr_id, throughput) != 0) { |
||||
return 0; |
||||
} |
||||
CUDA_CALL_OR_RET_X(cudaMalloc(&d_hash[thr_id], (size_t) 64 * throughput), 0); |
||||
|
||||
cuda_check_cpu_init(thr_id, throughput); |
||||
|
||||
init[thr_id] = true; |
||||
} |
||||
|
||||
uint32_t endiandata[20]; |
||||
for (int k=0; k < 19; k++) |
||||
be32enc(&endiandata[k], pdata[k]); |
||||
|
||||
cuda_check_cpu_setTarget(ptarget); |
||||
quark_blake512_cpu_setBlock_80(thr_id, endiandata); |
||||
|
||||
const int hashes = (int) strlen(hashOrder); |
||||
|
||||
do { |
||||
int order = 1; |
||||
uint32_t foundNonce; |
||||
|
||||
// Hash with CUDA |
||||
quark_blake512_cpu_hash_80(thr_id, throughput, pdata[19], d_hash[thr_id]); |
||||
TRACE("blake80:"); |
||||
|
||||
for (int i = 1; i < hashes; i++) |
||||
{ |
||||
const char elem = hashOrder[i]; |
||||
const uint8_t algo64 = elem >= 'A' ? elem - 'A' + 10 : elem - '0'; |
||||
|
||||
switch (algo64) { |
||||
case BLAKE: |
||||
quark_blake512_cpu_hash_64(thr_id, throughput, pdata[19], NULL, d_hash[thr_id], order++); |
||||
TRACE("blake :"); |
||||
break; |
||||
case BMW: |
||||
quark_bmw512_cpu_hash_64(thr_id, throughput, pdata[19], NULL, d_hash[thr_id], order++); |
||||
TRACE("bmw :"); |
||||
break; |
||||
case GROESTL: |
||||
quark_groestl512_cpu_hash_64(thr_id, throughput, pdata[19], NULL, d_hash[thr_id], order++); |
||||
TRACE("groestl:"); |
||||
break; |
||||
case SKEIN: |
||||
quark_skein512_cpu_hash_64(thr_id, throughput, pdata[19], NULL, d_hash[thr_id], order++); |
||||
TRACE("skein :"); |
||||
break; |
||||
case JH: |
||||
quark_jh512_cpu_hash_64(thr_id, throughput, pdata[19], NULL, d_hash[thr_id], order++); |
||||
TRACE("jh512 :"); |
||||
break; |
||||
case KECCAK: |
||||
quark_keccak512_cpu_hash_64(thr_id, throughput, pdata[19], NULL, d_hash[thr_id], order++); |
||||
TRACE("keccak :"); |
||||
break; |
||||
case LUFFA: |
||||
x11_luffa512_cpu_hash_64(thr_id, throughput, pdata[19], NULL, d_hash[thr_id], order++); |
||||
TRACE("luffa :"); |
||||
break; |
||||
case CUBEHASH: |
||||
x11_cubehash512_cpu_hash_64(thr_id, throughput, pdata[19], NULL, d_hash[thr_id], order++); |
||||
TRACE("cube :"); |
||||
break; |
||||
case SHAVITE: |
||||
x11_shavite512_cpu_hash_64(thr_id, throughput, pdata[19], NULL, d_hash[thr_id], order++); |
||||
TRACE("shavite:"); |
||||
break; |
||||
case SIMD: |
||||
x11_simd512_cpu_hash_64(thr_id, throughput, pdata[19], NULL, d_hash[thr_id], order++); |
||||
TRACE("simd :"); |
||||
break; |
||||
case ECHO: |
||||
x11_echo512_cpu_hash_64(thr_id, throughput, pdata[19], NULL, d_hash[thr_id], order++); |
||||
TRACE("echo => "); |
||||
break; |
||||
} |
||||
} |
||||
|
||||
foundNonce = cuda_check_hash(thr_id, throughput, pdata[19], d_hash[thr_id]); |
||||
if (foundNonce != UINT32_MAX) |
||||
{ |
||||
uint32_t _ALIGN(64) vhash64[8]; |
||||
const uint32_t Htarg = ptarget[7]; |
||||
be32enc(&endiandata[19], foundNonce); |
||||
x11evo_hash(vhash64, endiandata); |
||||
|
||||
if (vhash64[7] <= Htarg && fulltest(vhash64, ptarget)) { |
||||
int res = 1; |
||||
// check if there was some other ones... |
||||
uint32_t secNonce = cuda_check_hash_suppl(thr_id, throughput, pdata[19], d_hash[thr_id], 1); |
||||
work_set_target_ratio(work, vhash64); |
||||
*hashes_done = pdata[19] - first_nonce + throughput; |
||||
if (secNonce != 0) { |
||||
be32enc(&endiandata[19], secNonce); |
||||
x11evo_hash(vhash64, endiandata); |
||||
if (bn_hash_target_ratio(vhash64, ptarget) > work->shareratio) |
||||
work_set_target_ratio(work, vhash64); |
||||
pdata[21] = secNonce; |
||||
res++; |
||||
} |
||||
pdata[19] = foundNonce; |
||||
return res; |
||||
} else { |
||||
gpulog(LOG_WARNING, thr_id, "result for %08x does not validate on CPU!", foundNonce); |
||||
pdata[19] = foundNonce + 1; |
||||
continue; |
||||
} |
||||
} |
||||
|
||||
if ((uint64_t) throughput + pdata[19] >= max_nonce) { |
||||
pdata[19] = max_nonce; |
||||
break; |
||||
} |
||||
pdata[19] += throughput; |
||||
|
||||
} while (!work_restart[thr_id].restart); |
||||
|
||||
*hashes_done = pdata[19] - first_nonce; |
||||
return 0; |
||||
} |
||||
|
||||
// cleanup |
||||
extern "C" void free_x11evo(int thr_id) |
||||
{ |
||||
if (!init[thr_id]) |
||||
return; |
||||
|
||||
cudaThreadSynchronize(); |
||||
|
||||
cudaFree(d_hash[thr_id]); |
||||
|
||||
quark_blake512_cpu_free(thr_id); |
||||
quark_groestl512_cpu_free(thr_id); |
||||
x11_simd512_cpu_free(thr_id); |
||||
|
||||
cuda_check_cpu_free(thr_id); |
||||
init[thr_id] = false; |
||||
|
||||
cudaDeviceSynchronize(); |
||||
} |
||||
Loading…
Reference in new issue