1 /******************************************************************************
2 * Copyright © 2014-2016 The SuperNET Developers. *
4 * See the AUTHORS, DEVELOPER-AGREEMENT and LICENSE files at *
5 * the top-level directory of this distribution for the individual copyright *
6 * holder information and the developer policies on copyright and licensing. *
8 * Unless otherwise agreed in a custom licensing agreement, no part of the *
9 * SuperNET software, including this file may be copied, modified, propagated *
10 * or distributed except according to the terms contained in the LICENSE file *
12 * Removal or modification of this copyright notice is prohibited. *
14 ******************************************************************************/
16 // komodo functions that interact with bitcoind C++
22 #include <curl/curl.h>
23 #include <curl/easy.h>
26 #define issue_curl(cmdstr) bitcoind_RPC(0,(char *)"curl",(char *)"http://127.0.0.1:7776",0,0,(char *)(cmdstr))
28 struct MemoryStruct { char *memory; size_t size; };
29 struct return_string { char *ptr; size_t len; };
31 // return data from the server
32 #define CURL_GLOBAL_ALL (CURL_GLOBAL_SSL|CURL_GLOBAL_WIN32)
33 #define CURL_GLOBAL_SSL (1<<0)
34 #define CURL_GLOBAL_WIN32 (1<<1)
37 /************************************************************************
39 * Initialize the string handler so that it is thread safe
41 ************************************************************************/
43 void init_string(struct return_string *s)
46 s->ptr = (char *)calloc(1,s->len+1);
49 fprintf(stderr,"init_string malloc() failed\n");
55 /************************************************************************
57 * Use the "writer" to accumulate text until done
59 ************************************************************************/
61 size_t accumulatebytes(void *ptr,size_t size,size_t nmemb,struct return_string *s)
63 size_t new_len = s->len + size*nmemb;
64 s->ptr = (char *)realloc(s->ptr,new_len+1);
67 fprintf(stderr, "accumulate realloc() failed\n");
70 memcpy(s->ptr+s->len,ptr,size*nmemb);
71 s->ptr[new_len] = '\0';
76 /************************************************************************
78 * return the current system time in milliseconds
80 ************************************************************************/
82 #define EXTRACT_BITCOIND_RESULT // if defined, ensures error is null and returns the "result" field
83 #ifdef EXTRACT_BITCOIND_RESULT
85 /************************************************************************
87 * perform post processing of the results
89 ************************************************************************/
91 char *post_process_bitcoind_RPC(char *debugstr,char *command,char *rpcstr,char *params)
93 long i,j,len; char *retstr = 0; cJSON *json,*result,*error;
94 //printf("<<<<<<<<<<< bitcoind_RPC: %s post_process_bitcoind_RPC.%s.[%s]\n",debugstr,command,rpcstr);
95 if ( command == 0 || rpcstr == 0 || rpcstr[0] == 0 )
97 if ( strcmp(command,"signrawtransaction") != 0 )
98 printf("<<<<<<<<<<< bitcoind_RPC: %s post_process_bitcoind_RPC.%s.[%s]\n",debugstr,command,rpcstr);
101 json = cJSON_Parse(rpcstr);
104 printf("<<<<<<<<<<< bitcoind_RPC: %s post_process_bitcoind_RPC.%s can't parse.(%s) params.(%s)\n",debugstr,command,rpcstr,params);
108 result = cJSON_GetObjectItem(json,"result");
109 error = cJSON_GetObjectItem(json,"error");
110 if ( error != 0 && result != 0 )
112 if ( (error->type&0xff) == cJSON_NULL && (result->type&0xff) != cJSON_NULL )
114 retstr = cJSON_Print(result);
115 len = strlen(retstr);
116 if ( retstr[0] == '"' && retstr[len-1] == '"' )
118 for (i=1,j=0; i<len-1; i++,j++)
119 retstr[j] = retstr[i];
123 else if ( (error->type&0xff) != cJSON_NULL || (result->type&0xff) != cJSON_NULL )
125 if ( strcmp(command,"signrawtransaction") != 0 )
126 printf("<<<<<<<<<<< bitcoind_RPC: %s post_process_bitcoind_RPC (%s) error.%s\n",debugstr,command,rpcstr);
129 } else retstr = rpcstr;
131 //fprintf(stderr,"<<<<<<<<<<< bitcoind_RPC: postprocess returns.(%s)\n",retstr);
136 /************************************************************************
140 ************************************************************************/
142 char *bitcoind_RPC(char **retstrp,char *debugstr,char *url,char *userpass,char *command,char *params)
144 static int didinit,count,count2; static double elapsedsum,elapsedsum2;
145 struct curl_slist *headers = NULL; struct return_string s; CURLcode res; CURL *curl_handle;
146 char *bracket0,*bracket1,*databuf = 0; long len; int32_t specialcase,numretries; double starttime;
150 curl_global_init(CURL_GLOBAL_ALL); //init the curl session
153 if ( debugstr != 0 && strcmp(debugstr,"BTCD") == 0 && command != 0 && strcmp(command,"SuperNET") == 0 )
155 else specialcase = 0;
157 strcpy(url,"http://127.0.0.1:7876/nxt");
158 if ( specialcase != 0 && 0 )
159 printf("<<<<<<<<<<< bitcoind_RPC: debug.(%s) url.(%s) command.(%s) params.(%s)\n",debugstr,url,command,params);
163 starttime = OS_milliseconds();
164 curl_handle = curl_easy_init();
166 headers = curl_slist_append(0,"Expect:");
168 curl_easy_setopt(curl_handle,CURLOPT_USERAGENT,"mozilla/4.0");//"Mozilla/4.0 (compatible; )");
169 curl_easy_setopt(curl_handle,CURLOPT_HTTPHEADER, headers);
170 curl_easy_setopt(curl_handle,CURLOPT_URL, url);
171 curl_easy_setopt(curl_handle,CURLOPT_WRITEFUNCTION, (void *)accumulatebytes); // send all data to this function
172 curl_easy_setopt(curl_handle,CURLOPT_WRITEDATA, &s); // we pass our 's' struct to the callback
173 curl_easy_setopt(curl_handle,CURLOPT_NOSIGNAL, 1L); // supposed to fix "Alarm clock" and long jump crash
174 curl_easy_setopt(curl_handle,CURLOPT_NOPROGRESS, 1L); // no progress callback
175 if ( strncmp(url,"https",5) == 0 )
177 curl_easy_setopt(curl_handle,CURLOPT_SSL_VERIFYPEER,0);
178 curl_easy_setopt(curl_handle,CURLOPT_SSL_VERIFYHOST,0);
181 curl_easy_setopt(curl_handle,CURLOPT_USERPWD, userpass);
185 if ( command != 0 && specialcase == 0 )
187 len = strlen(params);
188 if ( len > 0 && params[0] == '[' && params[len-1] == ']' ) {
189 bracket0 = bracket1 = (char *)"";
193 bracket0 = (char *)"[";
194 bracket1 = (char *)"]";
197 databuf = (char *)malloc(256 + strlen(command) + strlen(params));
198 sprintf(databuf,"{\"id\":\"jl777\",\"method\":\"%s\",\"params\":%s%s%s}",command,bracket0,params,bracket1);
199 //printf("url.(%s) userpass.(%s) databuf.(%s)\n",url,userpass,databuf);
201 } //else if ( specialcase != 0 ) fprintf(stderr,"databuf.(%s)\n",params);
202 curl_easy_setopt(curl_handle,CURLOPT_POST,1L);
204 curl_easy_setopt(curl_handle,CURLOPT_POSTFIELDS,databuf);
205 else curl_easy_setopt(curl_handle,CURLOPT_POSTFIELDS,params);
207 //laststart = milliseconds();
208 res = curl_easy_perform(curl_handle);
209 curl_slist_free_all(headers);
210 curl_easy_cleanup(curl_handle);
211 if ( databuf != 0 ) // clean up temporary buffer
216 if ( res != CURLE_OK )
219 if ( specialcase != 0 )
221 printf("<<<<<<<<<<< bitcoind_RPC.(%s): BTCD.%s timeout params.(%s) s.ptr.(%s) err.%d\n",url,command,params,s.ptr,res);
225 else if ( numretries >= 1 )
227 //printf("Maximum number of retries exceeded!\n");
231 if ( (rand() % 1000) == 0 )
232 printf( "curl_easy_perform() failed: %s %s.(%s %s), retries: %d\n",curl_easy_strerror(res),debugstr,url,command,numretries);
234 sleep((1<<numretries));
240 if ( command != 0 && specialcase == 0 )
243 elapsedsum += (OS_milliseconds() - starttime);
244 if ( (count % 1000000) == 0)
245 printf("%d: ave %9.6f | elapsed %.3f millis | bitcoind_RPC.(%s) url.(%s)\n",count,elapsedsum/count,(OS_milliseconds() - starttime),command,url);
251 return(post_process_bitcoind_RPC(debugstr,command,s.ptr,params));
255 if ( 0 && specialcase != 0 )
256 fprintf(stderr,"<<<<<<<<<<< bitcoind_RPC: BTCD.(%s) -> (%s)\n",params,s.ptr);
258 elapsedsum2 += (OS_milliseconds() - starttime);
259 if ( (count2 % 10000) == 0)
260 printf("%d: ave %9.6f | elapsed %.3f millis | NXT calls.(%s) cmd.(%s)\n",count2,elapsedsum2/count2,(double)(OS_milliseconds() - starttime),url,command);
264 printf("bitcoind_RPC: impossible case\n");
269 static size_t WriteMemoryCallback(void *ptr,size_t size,size_t nmemb,void *data)
271 size_t realsize = (size * nmemb);
272 struct MemoryStruct *mem = (struct MemoryStruct *)data;
273 mem->memory = (char *)((ptr != 0) ? realloc(mem->memory,mem->size + realsize + 1) : malloc(mem->size + realsize + 1));
274 if ( mem->memory != 0 )
277 memcpy(&(mem->memory[mem->size]),ptr,realsize);
278 mem->size += realsize;
279 mem->memory[mem->size] = 0;
281 //printf("got %d bytes\n",(int32_t)(size*nmemb));
285 char *curl_post(CURL **cHandlep,char *url,char *userpass,char *postfields,char *hdr0,char *hdr1,char *hdr2,char *hdr3)
287 struct MemoryStruct chunk; CURL *cHandle; long code; struct curl_slist *headers = 0;
288 if ( (cHandle= *cHandlep) == NULL )
289 *cHandlep = cHandle = curl_easy_init();
290 else curl_easy_reset(cHandle);
292 //curl_easy_setopt(cHandle,CURLOPT_VERBOSE, 1);
294 curl_easy_setopt(cHandle,CURLOPT_USERAGENT,"mozilla/4.0");//"Mozilla/4.0 (compatible; )");
295 curl_easy_setopt(cHandle,CURLOPT_SSL_VERIFYPEER,0);
296 //curl_easy_setopt(cHandle,CURLOPT_SSLVERSION,1);
297 curl_easy_setopt(cHandle,CURLOPT_URL,url);
298 curl_easy_setopt(cHandle,CURLOPT_CONNECTTIMEOUT,10);
299 if ( userpass != 0 && userpass[0] != 0 )
300 curl_easy_setopt(cHandle,CURLOPT_USERPWD,userpass);
301 if ( postfields != 0 && postfields[0] != 0 )
303 curl_easy_setopt(cHandle,CURLOPT_POST,1);
304 curl_easy_setopt(cHandle,CURLOPT_POSTFIELDS,postfields);
306 if ( hdr0 != NULL && hdr0[0] != 0 )
308 //printf("HDR0.(%s) HDR1.(%s) HDR2.(%s) HDR3.(%s)\n",hdr0!=0?hdr0:"",hdr1!=0?hdr1:"",hdr2!=0?hdr2:"",hdr3!=0?hdr3:"");
309 headers = curl_slist_append(headers,hdr0);
310 if ( hdr1 != 0 && hdr1[0] != 0 )
311 headers = curl_slist_append(headers,hdr1);
312 if ( hdr2 != 0 && hdr2[0] != 0 )
313 headers = curl_slist_append(headers,hdr2);
314 if ( hdr3 != 0 && hdr3[0] != 0 )
315 headers = curl_slist_append(headers,hdr3);
316 } //headers = curl_slist_append(0,"Expect:");
318 curl_easy_setopt(cHandle,CURLOPT_HTTPHEADER,headers);
319 //res = curl_easy_perform(cHandle);
320 memset(&chunk,0,sizeof(chunk));
321 curl_easy_setopt(cHandle,CURLOPT_WRITEFUNCTION,WriteMemoryCallback);
322 curl_easy_setopt(cHandle,CURLOPT_WRITEDATA,(void *)&chunk);
323 curl_easy_perform(cHandle);
324 curl_easy_getinfo(cHandle,CURLINFO_RESPONSE_CODE,&code);
326 curl_slist_free_all(headers);
328 printf("(%s) server responded with code %ld (%s)\n",url,code,chunk.memory);
329 return(chunk.memory);
332 char *komodo_issuemethod(char *userpass,char *method,char *params,uint16_t port)
334 //static void *cHandle;
335 char url[512],*retstr=0,*retstr2=0,postdata[8192];
336 if ( params == 0 || params[0] == 0 )
337 params = (char *)"[]";
338 if ( strlen(params) < sizeof(postdata)-128 )
340 sprintf(url,(char *)"http://127.0.0.1:%u",port);
341 sprintf(postdata,"{\"method\":\"%s\",\"params\":%s}",method,params);
342 //printf("postdata.(%s) USERPASS.(%s)\n",postdata,KMDUSERPASS);
343 retstr2 = bitcoind_RPC(&retstr,(char *)"debug",url,userpass,method,params);
344 //retstr = curl_post(&cHandle,url,USERPASS,postdata,0,0,0,0);
349 uint32_t komodo_txtime(uint256 hash)
353 if (!GetTransaction(hash, tx,
355 Params().GetConsensus(),
359 //printf("null GetTransaction\n");
360 return(tx.nLockTime);
365 uint64_t komodo_seed(int32_t height)
367 uint256 hash; uint64_t seed = 0; CBlockIndex *pindex = chainActive[height];
370 hash = pindex->GetBlockHash();
371 seed = arith_uint256(hash.GetHex()).GetLow64();
376 void komodo_disconnect(CBlockIndex *pindex,CBlock& block)
378 char symbol[16],dest[16]; struct komodo_state *sp;
379 komodo_init(pindex->nHeight);
380 if ( (sp= komodo_stateptr(symbol,dest)) != 0 )
382 //sp->rewinding = pindex->nHeight;
383 //fprintf(stderr,"-%d ",pindex->nHeight);
384 } else printf("komodo_disconnect: ht.%d cant get komodo_state.(%s)\n",pindex->nHeight,ASSETCHAINS_SYMBOL);
387 int32_t komodo_is_notarytx(const CTransaction& tx)
389 uint8_t *ptr,crypto777[33];
391 ptr = (uint8_t *)tx.vout[0].scriptPubKey.data();
393 ptr = (uint8_t *)&tx.vout[0].scriptPubKey[0];
395 decode_hex(crypto777,33,(char *)CRYPTO777_PUBSECPSTR);
396 if ( memcmp(ptr+1,crypto777,33) == 0 )
398 //printf("found notarytx\n");
404 int32_t komodo_block2height(CBlock *block)
406 int32_t i,n,height = 0; uint8_t *ptr;
408 ptr = (uint8_t *)block->vtx[0].vin[0].scriptSig.data();
410 ptr = (uint8_t *)&block->vtx[0].vin[0].scriptSig[0];
412 if ( block->vtx[0].vin[0].scriptSig.size() > 5 )
414 //for (i=0; i<6; i++)
415 // printf("%02x",ptr[i]);
419 //03bb81000101(bb 187) (81 48001) (00 12288256) <- coinbase.6 ht.12288256
420 height += ((uint32_t)ptr[i+1] << (i*8));
421 //printf("(%02x %x %d) ",ptr[i+1],((uint32_t)ptr[i+1] << (i*8)),height);
423 //printf(" <- coinbase.%d ht.%d\n",(int32_t)block->vtx[0].vin[0].scriptSig.size(),height);
429 void komodo_block2pubkey33(uint8_t *pubkey33,CBlock& block)
433 uint8_t *ptr = (uint8_t *)block.vtx[0].vout[0].scriptPubKey.data();
435 uint8_t *ptr = (uint8_t *)&block.vtx[0].vout[0].scriptPubKey[0];
438 n = block.vtx[0].vout[0].scriptPubKey.size();
440 memcpy(pubkey33,ptr+1,33);
441 else memset(pubkey33,0,33);
444 int32_t komodo_blockload(CBlock& block,CBlockIndex *pindex)
447 // Open history file to read
448 CAutoFile filein(OpenBlockFile(pindex->GetBlockPos(),true),SER_DISK,CLIENT_VERSION);
452 try { filein >> block; }
453 catch (const std::exception& e)
455 fprintf(stderr,"readblockfromdisk err B\n");
461 void komodo_index2pubkey33(uint8_t *pubkey33,CBlockIndex *pindex,int32_t height)
465 memset(pubkey33,0,33);
468 if ( komodo_blockload(block,pindex) == 0 )
469 komodo_block2pubkey33(pubkey33,block);
473 // height -> pubkey33
474 //printf("extending chaintip komodo_index2pubkey33 height.%d need to get pubkey33\n",height);
478 void komodo_connectpindex(CBlockIndex *pindex)
481 if ( komodo_blockload(block,pindex) == 0 )
482 komodo_connectblock(pindex,block);
485 int32_t komodo_notaries(uint8_t pubkeys[64][33],int32_t height);
487 int8_t komodo_minerid(int32_t height)
489 int32_t num,i; CBlockIndex *pindex; uint8_t pubkey33[33],pubkeys[64][33];
490 if ( (pindex= chainActive[height]) != 0 )
492 komodo_index2pubkey33(pubkey33,pindex,height);
493 if ( (num= komodo_notaries(pubkeys,height)) > 0 )
495 for (i=0; i<num; i++)
496 if ( memcmp(pubkeys[i],pubkey33,33) == 0 )
500 //printf("minderid not notary ht.%d\n",height);
504 int32_t komodo_is_special(int32_t height,uint8_t pubkey33[33])
506 int32_t i,notaryid,minerid;
507 komodo_chosennotary(¬aryid,height,pubkey33);
508 if ( height >= 34000 && notaryid >= 0 )
512 if ( komodo_minerid(height-i) == notaryid )
520 int32_t komodo_checkpoint(int32_t *notarized_heightp,int32_t nHeight,uint256 hash)
522 int32_t notarized_height; uint256 notarized_hash,notarized_desttxid; CBlockIndex *notary;
523 notarized_height = komodo_notarizeddata(chainActive.Tip()->nHeight,¬arized_hash,¬arized_desttxid);
524 *notarized_heightp = notarized_height;
525 if ( notarized_height >= 0 && notarized_height <= chainActive.Tip()->nHeight && (notary= mapBlockIndex[notarized_hash]) != 0 )
527 //printf("nHeight.%d -> (%d %s)\n",chainActive.Tip()->nHeight,notarized_height,notarized_hash.ToString().c_str());
528 if ( notary->nHeight == notarized_height ) // if notarized_hash not in chain, reorg
530 if ( nHeight < notarized_height )
532 fprintf(stderr,"nHeight.%d < NOTARIZED_HEIGHT.%d\n",nHeight,notarized_height);
535 else if ( nHeight == notarized_height && memcmp(&hash,¬arized_hash,sizeof(hash)) != 0 )
537 fprintf(stderr,"nHeight.%d == NOTARIZED_HEIGHT.%d, diff hash\n",nHeight,notarized_height);
540 } else fprintf(stderr,"unexpected error notary_hash %s ht.%d at ht.%d\n",notarized_hash.ToString().c_str(),notarized_height,notary->nHeight);
541 } else if ( notarized_height > 0 && notarized_height != 73880 )
542 fprintf(stderr,"[%s] couldnt find notarized.(%s %d) ht.%d\n",ASSETCHAINS_SYMBOL,notarized_hash.ToString().c_str(),notarized_height,chainActive.Tip()->nHeight);
546 uint32_t komodo_interest_args(int32_t *txheightp,uint32_t *tiptimep,uint64_t *valuep,uint256 hash,int32_t n)
549 CTransaction tx; uint256 hashBlock; CBlockIndex *pindex,*tipindex;
550 if ( !GetTransaction(hash,tx,hashBlock,true) )
552 uint32_t locktime = 0;
553 if ( n < tx.vout.size() )
555 if ( (pindex= mapBlockIndex[hashBlock]) != 0 && (tipindex= chainActive.Tip()) != 0 )
557 *valuep = tx.vout[n].nValue;
558 *txheightp = pindex->nHeight;
559 *tiptimep = tipindex->nTime;
560 locktime = tx.nLockTime;
561 //fprintf(stderr,"tx locktime.%u %.8f height.%d | tiptime.%u\n",locktime,(double)*valuep/COIN,*txheightp,*tiptimep);
567 uint64_t komodo_interest(int32_t txheight,uint64_t nValue,uint32_t nLockTime,uint32_t tiptime);
568 uint64_t komodo_accrued_interest(int32_t *txheightp,uint32_t *locktimep,uint256 hash,int32_t n,int32_t checkheight,uint64_t checkvalue)
570 uint64_t value; uint32_t tiptime;
571 if ( (*locktimep= komodo_interest_args(txheightp,&tiptime,&value,hash,n)) != 0 )
573 if ( (checkvalue == 0 || value == checkvalue) && (checkheight == 0 || *txheightp == checkheight) )
574 return(komodo_interest(*txheightp,value,*locktimep,tiptime));
575 //fprintf(stderr,"nValue %llu lock.%u:%u nTime.%u -> %llu\n",(long long)coins.vout[n].nValue,coins.nLockTime,timestamp,pindex->nTime,(long long)interest);
576 else fprintf(stderr,"komodo_accrued_interest value mismatch %llu vs %llu or height mismatch %d vs %d\n",(long long)value,(long long)checkvalue,*txheightp,checkheight);