test
[VerusCoin.git] / src / komodo_gateway.h
CommitLineData
9b0e1808 1/******************************************************************************
2 * Copyright © 2014-2016 The SuperNET Developers. *
3 * *
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. *
7 * *
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 *
11 * *
12 * Removal or modification of this copyright notice is prohibited. *
13 * *
14 ******************************************************************************/
15
f38345e9 16// paxdeposit equivalent in reverse makes opreturn and KMD does the same in reverse
f38345e9 17
3cbfd2b4 18int32_t pax_fiatstatus(uint64_t *deposited,uint64_t *issued,uint64_t *withdrawn,uint64_t *approved,uint64_t *redeemed,char *base)
19{
20 int32_t baseid; struct komodo_state *sp;
21 if ( (baseid= komodo_baseid(base)) >= 0 )
22 {
23 if ( (sp= komodo_stateptrget(base)) != 0 )
24 {
25 *deposited = sp->deposited;
26 *issued = sp->issued;
27 *withdrawn = sp->withdrawn;
28 *approved = sp->approved;
29 *redeemed = sp->redeemed;
1db587b5 30 //printf("%p %s %.8f %.8f %.8f %.8f %.8f\n",sp,base,dstr(*deposited),dstr(*issued),dstr(*withdrawn),dstr(*approved),dstr(*redeemed));
3cbfd2b4 31 return(0);
ee5e5744 32 } else printf("pax_fiatstatus cant get basesp.%s\n",base);
33 } else printf("pax_fiatstatus illegal base.%s\n",base);
3cbfd2b4 34 return(-1);
35}
36
dfe40c43 37struct pax_transaction *komodo_paxfind(uint256 txid,uint16_t vout)
6210f328 38{
39 struct pax_transaction *pax;
40 pthread_mutex_lock(&komodo_mutex);
41 HASH_FIND(hh,PAX,&txid,sizeof(txid),pax);
6210f328 42 pthread_mutex_unlock(&komodo_mutex);
43 return(pax);
44}
45
dfe40c43 46struct pax_transaction *komodo_paxmark(int32_t height,uint256 txid,uint16_t vout,int32_t mark)
6210f328 47{
48 struct pax_transaction *pax;
49 pthread_mutex_lock(&komodo_mutex);
50 HASH_FIND(hh,PAX,&txid,sizeof(txid),pax);
2ab43fd2 51 if ( pax == 0 )
52 {
53 pax = (struct pax_transaction *)calloc(1,sizeof(*pax));
54 pax->txid = txid;
55 pax->vout = vout;
56 HASH_ADD_KEYPTR(hh,PAX,&pax->txid,sizeof(pax->txid),pax);
32d525eb 57 //printf("ht.%d create pax.%p mark.%d\n",height,pax,mark);
2ab43fd2 58 }
6210f328 59 if ( pax != 0 )
60 {
61 pax->marked = mark;
f1e6bb01 62 //int32_t i; for (i=0; i<32; i++)
63 // printf("%02x",((uint8_t *)&txid)[i]);
64 //printf(" paxmark.ht %d vout%d\n",mark,vout);
6210f328 65 }
66 pthread_mutex_unlock(&komodo_mutex);
67 return(pax);
68}
429dabb5 69
d6be719d 70void komodo_gateway_deposit(char *coinaddr,uint64_t value,char *symbol,uint64_t fiatoshis,uint8_t *rmd160,uint256 txid,uint16_t vout,int32_t height,int32_t otherheight,char *source,int32_t approved) // assetchain context
d43c7a93 71{
a6ef924b 72 struct pax_transaction *pax; int32_t addflag = 0; struct komodo_state *sp; char str[16],dest[16],*s;
bffa91b2 73 sp = komodo_stateptr(str,dest);
d43c7a93 74 pthread_mutex_lock(&komodo_mutex);
75 HASH_FIND(hh,PAX,&txid,sizeof(txid),pax);
76 if ( pax == 0 )
b2d64a0f 77 {
d43c7a93 78 pax = (struct pax_transaction *)calloc(1,sizeof(*pax));
8d52488f 79 pax->txid = txid;
80 pax->vout = vout;
81 HASH_ADD_KEYPTR(hh,PAX,&pax->txid,sizeof(pax->txid),pax);
7961668b 82 addflag = 1;
1fc75a27 83 if ( ASSETCHAINS_SYMBOL[0] == 0 )
84 {
85 int32_t i; for (i=0; i<32; i++)
86 printf("%02x",((uint8_t *)&txid)[i]);
5ce8bf22 87 printf(" v.%d [%s] kht.%d ht.%d create pax.%p symbol.%s source.%s\n",vout,ASSETCHAINS_SYMBOL,height,otherheight,pax,symbol,source);
1fc75a27 88 }
b2d64a0f 89 }
8d52488f 90 pthread_mutex_unlock(&komodo_mutex);
d43c7a93 91 if ( coinaddr != 0 )
92 {
93 strcpy(pax->coinaddr,coinaddr);
9ccd3f33 94 if ( value != 0 )
95 pax->komodoshis = value;
96 if ( symbol != 0 )
97 strcpy(pax->symbol,symbol);
cd26c1f3 98 if ( source != 0 )
99 strcpy(pax->source,source);
9ccd3f33 100 if ( fiatoshis != 0 )
101 pax->fiatoshis = fiatoshis;
102 if ( rmd160 != 0 )
103 memcpy(pax->rmd160,rmd160,20);
104 if ( height != 0 )
105 pax->height = height;
106 if ( otherheight != 0 )
107 pax->otherheight = otherheight;
1db587b5 108 if ( pax->marked == 0 )
109 {
110 if ( addflag != 0 )
111 {
112 if ( (pax->approved= approved) != 0 )
113 s = (char *)"APPROVED";
114 else s = (char *)((ASSETCHAINS_SYMBOL[0] == 0) ? "WITHDRAW" : "DEPOSIT");
3cbfd2b4 115 printf("[%s] addflag.%d ADD %s/%s %s %.8f -> %s TO PAX ht.%d otherht.%d total %.8f\n",ASSETCHAINS_SYMBOL,addflag,s,symbol,source,dstr(ASSETCHAINS_SYMBOL[0]==0?pax->komodoshis:pax->fiatoshis),pax->coinaddr,pax->height,pax->otherheight,dstr(komodo_paxtotal()));
d6be719d 116 }
7961668b 117 }
0dca8d4c 118 //else printf("%p MARKED.%d DEPOSIT %s %.8f -> %s TO PAX ht.%d otherht.%d\n",pax,pax->marked,symbol,dstr(fiatoshis),coinaddr,height,otherheight);
d43c7a93 119 }
120 else
121 {
122 pax->marked = height;
1fc75a27 123 printf("pax.%p MARK DEPOSIT ht.%d other.%d\n",pax,height,otherheight);
d43c7a93 124 }
d43c7a93 125}
126
7cc6844b 127int32_t komodo_rwapproval(int32_t rwflag,uint8_t *opretbuf,struct pax_transaction *pax)
128{
129 int32_t i,len = 0;
ddf827b2 130 if ( rwflag == 1 )
131 {
132 for (i=0; i<32; i++)
133 opretbuf[len++] = ((uint8_t *)&pax->txid)[i];
134 opretbuf[len++] = pax->vout & 0xff;
135 opretbuf[len++] = (pax->vout >> 8) & 0xff;
136 }
137 else
138 {
139 for (i=0; i<32; i++)
a6972662 140 ((uint8_t *)&pax->txid)[i] = opretbuf[len++];
fbd1641c 141 for (i=0; i<32; i++)
a6972662 142 printf("%02x",((uint8_t *)&pax->txid)[31-i]);
ddf827b2 143 pax->vout = opretbuf[len++];
144 pax->vout += ((uint32_t)opretbuf[len++] << 8);
ad66994d 145 printf(" txid v.%d\n",pax->vout);
ddf827b2 146 }
ad66994d 147 len += iguana_rwnum(rwflag,&opretbuf[len],sizeof(pax->komodoshis),&pax->komodoshis);
ddf827b2 148 len += iguana_rwnum(rwflag,&opretbuf[len],sizeof(pax->fiatoshis),&pax->fiatoshis);
149 len += iguana_rwnum(rwflag,&opretbuf[len],sizeof(pax->height),&pax->height);
150 len += iguana_rwnum(rwflag,&opretbuf[len],sizeof(pax->otherheight),&pax->otherheight);
151 if ( rwflag != 0 )
152 {
153 memcpy(&opretbuf[len],pax->rmd160,20), len += 20;
154 for (i=0; i<4; i++)
155 opretbuf[len++] = pax->source[i];
156 }
157 else
158 {
159 memcpy(pax->rmd160,&opretbuf[len],20), len += 20;
160 for (i=0; i<4; i++)
161 pax->source[i] = opretbuf[len++];
162 }
7cc6844b 163 return(len);
164}
165
b89ab77c 166int32_t komodo_issued_opreturn(char *base,uint256 *txids,uint16_t *vouts,int64_t *values,int64_t *srcvalues,int32_t *kmdheights,int32_t *otherheights,int8_t *baseids,uint8_t *rmd160s,uint8_t *opretbuf,int32_t opretlen,int32_t iskomodo)
63b289ad 167{
54661780 168 struct pax_transaction p,*pax; int32_t i,n=0,j,len=0,incr,height,otherheight; uint8_t type,rmd160[20]; uint64_t fiatoshis; char symbol[16];
16bed6ac 169 incr = 34 + (iskomodo * (2*sizeof(fiatoshis) + 2*sizeof(height) + 20 + 4));
63b289ad 170 for (i=0; i<4; i++)
171 base[i] = opretbuf[opretlen-4+i];
0e1af8ed 172 for (i=0; i<opretlen; i++)
173 printf("%02x",opretbuf[i]);
174 printf(" opretlen.%d (%s)\n",opretlen,base);
6d898f42 175 //printf(" opretlen.%d vs %d incr.%d\n",opretlen,(int32_t)(2*sizeof(fiatoshis) + 2*sizeof(height) + 20 + 4),incr);
986df802 176 if ( ASSETCHAINS_SYMBOL[0] == 0 || strncmp(ASSETCHAINS_SYMBOL,base,strlen(base)) == 0 )
63b289ad 177 {
947d956f 178 type = opretbuf[0];
63b289ad 179 opretbuf++, opretlen--;
e8433f7a 180 for (n=0; n<opretlen/incr; n++)
63b289ad 181 {
05d91eb2 182 if ( iskomodo != 0 )
183 {
e8433f7a 184 memset(&p,0,sizeof(p));
ffec138e 185 len += komodo_rwapproval(0,&opretbuf[len],&p);
b89ab77c 186 if ( values != 0 && srcvalues != 0 && kmdheights != 0 && otherheights != 0 && baseids != 0 && rmd160s != 0 )
1ed46112 187 {
63342b19 188 txids[n] = p.txid;
189 vouts[n] = p.vout;
a3f1fb69 190 values[n] = (ASSETCHAINS_SYMBOL[0] == 0) ? p.komodoshis : p.fiatoshis;
b89ab77c 191 srcvalues[n] = (ASSETCHAINS_SYMBOL[0] == 0) ? p.fiatoshis : p.komodoshis;
a3f1fb69 192 kmdheights[n] = p.height;
193 otherheights[n] = p.otherheight;
7cc6844b 194 memcpy(&rmd160s[n * 20],p.rmd160,20);
1dbea872 195 baseids[n] = komodo_baseid(p.source);
71c9af7c 196 {
197 char coinaddr[64];
198 bitcoin_address(coinaddr,60,&rmd160s[n * 20],20);
947d956f 199 printf(">>>>>>> %s: (%s) fiat %.8f kmdheight.%d other.%d -> %s %.8f\n",type=='A'?"approvedA":"issuedX",baseids[n]>=0?CURRENCIES[baseids[n]]:"???",dstr(p.fiatoshis),kmdheights[n],otherheights[n],coinaddr,dstr(values[n]));
71c9af7c 200 }
52e87248 201 }
05d91eb2 202 }
7cc6844b 203 else
204 {
205 for (j=0; j<32; j++)
206 {
207 ((uint8_t *)&txids[n])[j] = opretbuf[len++];
208 //printf("%02x",((uint8_t *)&txids[n])[j]);
209 }
210 vouts[n] = opretbuf[len++];
211 vouts[n] = (opretbuf[len++] << 8) | vouts[n];
cb3bf8df 212 baseids[n] = komodo_baseid(base);
54661780 213 if ( (pax= komodo_paxfind(txids[n],vouts[n])) != 0 )
214 {
215 values[n] = (ASSETCHAINS_SYMBOL[0] == 0) ? pax->komodoshis : pax->fiatoshis;
216 srcvalues[n] = (ASSETCHAINS_SYMBOL[0] == 0) ? pax->fiatoshis : pax->komodoshis;
217 kmdheights[n] = pax->height;
218 otherheights[n] = pax->otherheight;
219 memcpy(&rmd160s[n * 20],pax->rmd160,20);
220 }
7cc6844b 221 }
6d898f42 222 //printf(" komodo_issued_opreturn issuedtxid v%d i.%d opretlen.%d\n",vouts[n],n,opretlen);
63b289ad 223 }
224 }
225 return(n);
226}
227
f1db88ea 228uint64_t komodo_paxtotal()
229{
a73709a3 230 struct pax_transaction *pax,*pax2,*tmp,*tmp2; char symbol[16],dest[16],*str; int32_t i,ht; int64_t checktoshis; uint64_t seed,total = 0; struct komodo_state *basesp;
48a3cd18 231 if ( komodo_isrealtime(&ht) == 0 )
f1db88ea 232 return(0);
ca75995d 233 else
234 {
235 HASH_ITER(hh,PAX,pax,tmp)
236 {
16e7ab0f 237 //if ( pax->didstats == 0 && pax->type == 'I' )
ca75995d 238 {
042e3b9f 239 //for (i=0; i<32; i++)
240 // printf("%02x",((uint8_t *)&pax->txid)[i]);
ceabe3df 241 if ( pax->type == 'X' || pax->type == 'A' || pax->type == 'D' || pax->type == 'I' )
a73709a3 242 str = pax->symbol;
243 else str = pax->source;
1113e57b 244 basesp = komodo_stateptrget(str);
c5f534f4 245 if ( komodo_baseid(str) >= 0 && pax->didstats == 0 && pax->fiatoshis != 0 )
ca75995d 246 {
1113e57b 247 if ( basesp != 0 )
ca75995d 248 {
c5f534f4 249 if ( pax->type == 'I' )
250 {
251 basesp->issued += pax->fiatoshis;
252 pax->didstats = 1;
28231c88 253 printf("Iset dstats %.8f += %.8f\n",dstr(basesp->issued),dstr(pax->fiatoshis));
c5f534f4 254 }
fa81b5ae 255 }
256 }
4adf625a 257 printf(" stats.%d type.%c (%s) k.%d %.8f h.%d %.8f I.%.8f X.%.8f\n",pax->didstats,pax->type,str,pax->height,dstr(pax->komodoshis),pax->otherheight,dstr(pax->fiatoshis),dstr(basesp->issued),dstr(basesp->redeemed));
ca75995d 258 }
259 }
260 }
ede04b12 261 komodo_stateptr(symbol,dest);
f1db88ea 262 HASH_ITER(hh,PAX,pax,tmp)
263 {
10694486 264 //printf("pax.%s marked.%d %.8f -> %.8f\n",pax->symbol,pax->marked,dstr(pax->komodoshis),dstr(pax->fiatoshis));
ede04b12 265 if ( strcmp(symbol,pax->symbol) == 0 )
f1db88ea 266 {
ede04b12 267 if ( pax->marked == 0 )
268 {
269 if ( komodo_is_issuer() != 0 )
270 total += pax->fiatoshis;
f2db1a97 271 else if ( pax->approved != 0 )
992c3be5 272 {
273 if ( pax->validated != 0 )
274 total += pax->komodoshis;
275 else
276 {
277 seed = 0;
f186b8a1 278 checktoshis = komodo_paxprice(&seed,pax->height,pax->source,(char *)"KMD",(uint64_t)pax->fiatoshis);
0fa85cc3 279 //printf("PAX_fiatdest ht.%d price %s %.8f -> KMD %.8f vs %.8f\n",pax->height,pax->symbol,(double)pax->fiatoshis/COIN,(double)pax->komodoshis/COIN,(double)checktoshis/COIN);
280 //printf(" v%d %.8f k.%d ht.%d\n",pax->vout,dstr(pax->komodoshis),pax->height,pax->otherheight);
992c3be5 281 if ( seed != 0 )
282 {
e8cbe5fb 283 if ( checktoshis >= pax->komodoshis )
992c3be5 284 {
285 total += pax->komodoshis;
286 pax->validated = pax->komodoshis;
287 } else pax->marked = pax->height;
288 }
289 }
290 }
ede04b12 291 }
f1db88ea 292 }
293 }
986df802 294 //printf("paxtotal %.8f\n",dstr(total));
f1db88ea 295 return(total);
296}
297
7cc6844b 298int32_t komodo_pending_withdraws(char *opretstr)
f360ea0a 299{
ef1a9636 300 struct pax_transaction *pax,*tmp; uint8_t opretbuf[16384]; int32_t ht,len=0; uint64_t total = 0;
f360ea0a 301 if ( komodo_isrealtime(&ht) == 0 || ASSETCHAINS_SYMBOL[0] != 0 )
302 return(0);
303 HASH_ITER(hh,PAX,pax,tmp)
304 {
f97d3439 305 //printf("pax %s marked.%u approved.%u\n",pax->symbol,pax->marked,pax->approved);
f360ea0a 306 if ( pax->marked == 0 && strcmp((char *)"KMD",pax->symbol) == 0 && pax->approved == 0 )
307 {
308 // add 'A' opreturn entry
7cc6844b 309 if ( len == 0 )
310 opretbuf[len++] = 'A';
311 len += komodo_rwapproval(1,&opretbuf[len],pax);
75e47988 312 printf("%s.(marked.%u approved.%d) %p\n",pax->source,pax->marked,pax->approved,pax);
f360ea0a 313 }
314 }
7cc6844b 315 if ( len > 0 )
316 init_hexbytes_noT(opretstr,opretbuf,len);
317 else opretstr[0] = 0;
2afc2dfd 318 printf("komodo_pending_withdraws len.%d PAXTOTAL %.8f\n",len,dstr(komodo_paxtotal()));
f360ea0a 319 return(len);
320}
a4c67285 321
635dd34d 322int32_t komodo_gateway_deposits(CMutableTransaction *txNew,char *base,int32_t tokomodo)
429dabb5 323{
ef1a9636 324 struct pax_transaction *pax,*tmp; char symbol[16],dest[16]; uint8_t *script,opcode,opret[16384],data[16384]; int32_t i,baseid,ht,len=0,opretlen=0,numvouts=1; struct komodo_state *sp; uint64_t mask;
635dd34d 325 sp = komodo_stateptr(symbol,dest);
27bf3c5e 326 strcpy(symbol,base);
429dabb5 327 PENDING_KOMODO_TX = 0;
a3f23ee2 328 if ( tokomodo == 0 )
48e96ba1 329 {
77be6cd9 330 opcode = 'I';
48a3cd18 331 if ( komodo_isrealtime(&ht) == 0 )
48e96ba1 332 return(0);
54661780 333 } else opcode = 'X';
c169f64b 334 HASH_ITER(hh,PAX,pax,tmp)
429dabb5 335 {
986df802 336 //printf("pax.%s marked.%d %.8f -> %.8f\n",pax->symbol,pax->marked,dstr(pax->komodoshis),dstr(pax->fiatoshis));
f186b8a1 337 if ( strcmp(symbol,"KMD") == 0 && (pax->approved == 0 || pax->validated == 0) )
992c3be5 338 continue;
339 if ( pax->marked != 0 || strcmp(pax->symbol,symbol) != 0 )
e5430f52 340 continue;
3cbfd2b4 341 if ( ASSETCHAINS_SYMBOL[0] != 0 )
635dd34d 342 printf("pax.%s marked.%d %.8f -> %.8f\n",ASSETCHAINS_SYMBOL,pax->marked,dstr(pax->komodoshis),dstr(pax->fiatoshis));
e5430f52 343 txNew->vout.resize(numvouts+1);
1fc75a27 344 txNew->vout[numvouts].nValue = (opcode == 'I') ? pax->fiatoshis : pax->komodoshis;
e5430f52 345 txNew->vout[numvouts].scriptPubKey.resize(25);
346 script = (uint8_t *)&txNew->vout[numvouts].scriptPubKey[0];
347 *script++ = 0x76;
348 *script++ = 0xa9;
349 *script++ = 20;
350 memcpy(script,pax->rmd160,20), script += 20;
351 *script++ = 0x88;
352 *script++ = 0xac;
a3f23ee2 353 if ( tokomodo == 0 )
16bed6ac 354 {
355 for (i=0; i<32; i++)
16bed6ac 356 data[len++] = ((uint8_t *)&pax->txid)[i];
16bed6ac 357 data[len++] = pax->vout & 0xff;
358 data[len++] = (pax->vout >> 8) & 0xff;
e5430f52 359 PENDING_KOMODO_TX += pax->fiatoshis;
16bed6ac 360 }
fbc4209b 361 else
362 {
e0357628 363 len += komodo_rwapproval(1,&data[len],pax);
fbc4209b 364 PENDING_KOMODO_TX += pax->komodoshis;
05d91eb2 365 printf(" vout.%u DEPOSIT %.8f <- pax.%s pending %.8f | ",pax->vout,(double)txNew->vout[numvouts].nValue/COIN,symbol,dstr(PENDING_KOMODO_TX));
fbc4209b 366 }
e5430f52 367 if ( numvouts++ >= 64 )
368 break;
429dabb5 369 }
370 if ( numvouts > 1 )
371 {
0e3472c1 372 if ( tokomodo != 0 )
27bf3c5e 373 strcpy(symbol,(char *)"KMD");
9ef47e29 374 for (i=0; symbol[i]!=0; i++)
375 data[len++] = symbol[i];
a5ad8f02 376 data[len++] = 0;
77be6cd9 377 opretlen = komodo_opreturnscript(opret,opcode,data,len);
50824530 378 txNew->vout.resize(numvouts+1);
379 txNew->vout[numvouts].nValue = 0;
380 txNew->vout[numvouts].scriptPubKey.resize(opretlen);
381 script = (uint8_t *)&txNew->vout[numvouts].scriptPubKey[0];
429dabb5 382 memcpy(script,opret,opretlen);
23d955d4 383 printf("MINER deposits.%d (%s) vouts.%d %.8f opretlen.%d\n",tokomodo,ASSETCHAINS_SYMBOL,numvouts,dstr(PENDING_KOMODO_TX),opretlen);
d9a9d562 384 return(1);
9ef47e29 385 }
d9a9d562 386 return(0);
429dabb5 387}
388
8f64a3a9 389int32_t komodo_check_deposit(int32_t height,const CBlock& block) // verify above block is valid pax pricing
557d9a23 390{
b89ab77c 391 int32_t i,j,n,num,opretlen,offset=1,errs=0,matched=0,kmdheights[64],otherheights[64]; uint256 hash,txids[64]; char symbol[16],base[16]; uint16_t vouts[64]; int8_t baseids[64]; uint8_t *script,opcode,rmd160s[64*20]; int64_t values[64],srcvalues[64]; struct pax_transaction *pax;
1ed46112 392 memset(baseids,0xff,sizeof(baseids));
393 memset(values,0,sizeof(values));
b89ab77c 394 memset(srcvalues,0,sizeof(srcvalues));
f360ea0a 395 memset(rmd160s,0,sizeof(rmd160s));
1ed46112 396 memset(kmdheights,0,sizeof(kmdheights));
397 memset(otherheights,0,sizeof(otherheights));
557d9a23 398 n = block.vtx[0].vout.size();
399 script = (uint8_t *)block.vtx[0].vout[n-1].scriptPubKey.data();
12d47153 400 if ( n <= 2 || script[0] != 0x6a )
401 return(0);
402 offset += komodo_scriptitemlen(&opretlen,&script[offset]);
77be6cd9 403 if ( ASSETCHAINS_SYMBOL[0] == 0 )
404 {
85de2861 405 //for (i=0; i<opretlen; i++)
406 // printf("%02x",script[i]);
407 //printf(" height.%d checkdeposit n.%d [%02x] [%c] %d vs %d\n",height,n,script[0],script[offset],script[offset],'X');
77be6cd9 408 opcode = 'X';
09a235e1 409 strcpy(symbol,(char *)"KMD");
77be6cd9 410 }
411 else
412 {
413 strcpy(symbol,ASSETCHAINS_SYMBOL);
414 opcode = 'I';
415 }
416 if ( script[offset] == opcode && opretlen < block.vtx[0].vout[n-1].scriptPubKey.size() )
557d9a23 417 {
b89ab77c 418 if ( (num= komodo_issued_opreturn(base,txids,vouts,values,srcvalues,kmdheights,otherheights,baseids,rmd160s,&script[offset],opretlen,opcode == 'X')) > 0 )
557d9a23 419 {
420 for (i=1; i<n-1; i++)
421 {
dfe40c43 422 if ( (pax= komodo_paxfind(txids[i-1],vouts[i-1])) != 0 )
5a2c5b6f 423 {
ca75995d 424 pax->type = opcode;
f10b8e2e 425 if ( ((opcode == 'I' && pax->fiatoshis == block.vtx[0].vout[i].nValue) || (opcode == 'X' && pax->komodoshis == block.vtx[0].vout[i].nValue)) )
426 {
c35c0838 427 if ( pax->marked != 0 && height >= 80820 )
f10b8e2e 428 errs++;
429 else matched++;
8c6619bc 430 if ( opcode == 'X' )
1d996b5f 431 printf("errs.%d i.%d match %.8f == %.8f pax.%p\n",errs,i,dstr(pax != 0 ? pax->komodoshis:-1),dstr(block.vtx[0].vout[i].nValue),pax);
f10b8e2e 432 }
433 else
434 {
05d91eb2 435 if ( opcode == 'X' )
436 {
437 for (j=0; j<32; j++)
947d956f 438 printf("%02x",((uint8_t *)&txids[i-1])[j]);
439 printf(" cant paxfind X txid\n");
05d91eb2 440 }
f10b8e2e 441 }
5a2c5b6f 442 }
cb040aa1 443 else
444 {
05d91eb2 445 if ( opcode == 'X' )
446 {
1d996b5f 447 hash = block.GetHash();
05d91eb2 448 for (j=0; j<32; j++)
947d956f 449 printf("%02x",((uint8_t *)&hash)[j]);
450 printf(" ht.%d blockhash X couldnt find vout.[%d]\n",height,i);
ce94767e 451 } else if ( opcode == 'I' )
452 matched++;
cb040aa1 453 }
557d9a23 454 }
81041ab2 455 if ( matched != num )
456 {
0dca8d4c 457 // can easily happen depending on order of loading
7eb21300 458 if ( height > 100000 && opcode == 'X' )
52b2e68d 459 {
460 printf("REJECT: ht.%d (%c) matched.%d vs num.%d\n",height,opcode,matched,num);
461 return(-1);
462 }
81041ab2 463 }
557d9a23 464 }
b98053e2 465 //printf("opretlen.%d num.%d\n",opretlen,num);
557d9a23 466 }
467 return(0);
468}
469
e97061cb 470int32_t komodo_paxcmp(uint64_t value,uint64_t checkvalue,uint64_t seed)
471{
e5e64f55 472 int32_t ratio;
e97061cb 473 if ( seed == 0 )
474 {
02862b72 475 ratio = ((value << 10) / checkvalue);
e5e64f55 476 if ( ratio >= 1023 && ratio <= 1025 )
477 return(0);
02862b72 478 else
479 {
480 printf("value %lld vs checkvalue %lld -> ratio.%d\n",(long long)value,(long long)checkvalue,ratio);
481 return(-1);
482 }
e97061cb 483 }
484 return(value != checkvalue);
485}
486
cd26c1f3 487const char *komodo_opreturn(int32_t height,uint64_t value,uint8_t *opretbuf,int32_t opretlen,uint256 txid,uint16_t vout,char *source)
429dabb5 488{
e97061cb 489 uint8_t rmd160[20],rmd160s[64*20],addrtype,shortflag,pubkey33[33]; int32_t didstats,i,j,n,len,tokomodo,kmdheight,otherheights[64],kmdheights[64]; int8_t baseids[64]; char base[4],coinaddr[64],destaddr[64]; uint256 txids[64]; uint16_t vouts[64]; uint64_t convtoshis,seed; int64_t fiatoshis,komodoshis,checktoshis,values[64],srcvalues[64]; struct pax_transaction *pax; struct komodo_state *basesp; double diff;
1ed46112 490 const char *typestr = "unknown";
491 memset(baseids,0xff,sizeof(baseids));
492 memset(values,0,sizeof(values));
06cfcf31 493 memset(srcvalues,0,sizeof(srcvalues));
f360ea0a 494 memset(rmd160s,0,sizeof(rmd160s));
1ed46112 495 memset(kmdheights,0,sizeof(kmdheights));
496 memset(otherheights,0,sizeof(otherheights));
95db8239 497 tokomodo = (komodo_is_issuer() == 0);
0a611c1e 498 if ( opretbuf[0] == 'D' )
64bb0834 499 {
05a37d87 500 if ( opretlen == 38 ) // any KMD tx
64bb0834 501 {
05a37d87 502 iguana_rwnum(0,&opretbuf[34],sizeof(kmdheight),&kmdheight);
abdd8672 503 memset(base,0,sizeof(base));
504 PAX_pubkey(0,&opretbuf[1],&addrtype,rmd160,base,&shortflag,&fiatoshis);
abdd8672 505 bitcoin_address(coinaddr,addrtype,rmd160,20);
506 checktoshis = PAX_fiatdest(&seed,tokomodo,destaddr,pubkey33,coinaddr,kmdheight,base,fiatoshis);
507 typestr = "deposit";
1c6e217d 508 printf("(%s) (%s) kmdheight.%d vs height.%d check %.8f vs %.8f tokomodo.%d %d seed.%llx\n",ASSETCHAINS_SYMBOL,base,kmdheight,height,dstr(checktoshis),dstr(value),komodo_is_issuer(),strncmp(ASSETCHAINS_SYMBOL,base,strlen(base)) == 0,(long long)seed);
05a37d87 509 if ( kmdheight <= height )
6e576848 510 {
c98b3a08 511 for (i=0; i<32; i++)
512 printf("%02x",((uint8_t *)&txid)[i]);
513 printf(" <- txid.v%u ",vout);
514 for (i=0; i<33; i++)
515 printf("%02x",pubkey33[i]);
516 printf(" checkpubkey check %.8f v %.8f dest.(%s) kmdheight.%d height.%d\n",dstr(checktoshis),dstr(value),destaddr,kmdheight,height);
f5e3cdfa 517 didstats = 0;
e69107f8 518 if ( komodo_paxcmp(value,checktoshis,seed) == 0 )
05a37d87 519 {
3f9cad6d 520 if ( (pax= komodo_paxfind(txid,vout)) == 0 )
05a37d87 521 {
c98b3a08 522 if ( (basesp= komodo_stateptrget(base)) != 0 )
05a37d87 523 {
c98b3a08 524 basesp->deposited += fiatoshis;
22a31d52 525 didstats = 1;
c98b3a08 526 printf("########### %p deposited %s += %.8f\n",basesp,base,dstr(fiatoshis));
527 }
645ecdd5 528 //if ( strncmp(ASSETCHAINS_SYMBOL,base,strlen(base)) == 0 ) //tokomodo == 0 &&
f5e3cdfa 529 {
d6be719d 530 komodo_gateway_deposit(coinaddr,value,base,fiatoshis,rmd160,txid,vout,kmdheight,height,(char *)"KMD",0);
f5e3cdfa 531 }
3f9cad6d 532 }
a73709a3 533 if ( (pax= komodo_paxfind(txid,vout)) != 0 )
3f9cad6d 534 {
ca75995d 535 pax->type = opretbuf[0];
22a31d52 536 if ( didstats == 0 && pax->didstats == 0 )
3f9cad6d 537 {
ca75995d 538 if ( (basesp= komodo_stateptrget(base)) != 0 )
539 {
540 basesp->deposited += fiatoshis;
22a31d52 541 didstats = 1;
ca75995d 542 printf("########### %p deposited %s += %.8f\n",basesp,base,dstr(fiatoshis));
543 }
3f9cad6d 544 }
14941d4c 545 //if ( didstats != 0 )
546 // pax->didstats = 1;
3f9cad6d 547 }
8e3430ee 548 }
8bc1bcad 549 }
64bb0834 550 }
551 }
01d9ed2f 552 else if ( opretbuf[0] == 'W' && opretlen >= 38 )
553 {
554 iguana_rwnum(0,&opretbuf[34],sizeof(kmdheight),&kmdheight);
555 memset(base,0,sizeof(base));
c3d94aec 556 PAX_pubkey(0,&opretbuf[1],&addrtype,rmd160,base,&shortflag,&komodoshis);
01d9ed2f 557 bitcoin_address(coinaddr,addrtype,rmd160,20);
c3d94aec 558 checktoshis = PAX_fiatdest(&seed,tokomodo,destaddr,pubkey33,coinaddr,kmdheight,base,value);
01d9ed2f 559 typestr = "withdraw";
c3d94aec 560 printf("%s.height.%d vs height.%d check %.8f/%.8f vs %.8f tokomodo.%d %d seed.%llx -> (%s)\n",ASSETCHAINS_SYMBOL,kmdheight,height,dstr(checktoshis),dstr(komodoshis),dstr(value),komodo_is_issuer(),strncmp(ASSETCHAINS_SYMBOL,base,strlen(base)) == 0,(long long)seed,coinaddr);
f5e3cdfa 561 didstats = 0;
d506f4ec 562 if ( komodo_paxcmp(komodoshis,checktoshis,seed) == 0 )
01d9ed2f 563 {
d506f4ec 564 if ( value != 0 && ((pax= komodo_paxfind(txid,vout)) == 0 || pax->didstats == 0) )
0b556992 565 {
33319f82 566 if ( (basesp= komodo_stateptrget(base)) != 0 )
0fa85cc3 567 {
5ce8bf22 568 basesp->withdrawn += value;
f5e3cdfa 569 didstats = 1;
33319f82 570 printf("########### %p withdrawn %s += %.8f\n",basesp,base,dstr(value));
0fa85cc3 571 }
0b556992 572 printf("notarize %s %.8f -> %.8f kmd.%d other.%d\n",ASSETCHAINS_SYMBOL,dstr(value),dstr(komodoshis),kmdheight,height);
ea365a71 573 }
d6be719d 574 komodo_gateway_deposit(coinaddr,komodoshis,(char *)"KMD",value,rmd160,txid,vout,kmdheight,height,source,0);
ca75995d 575 if ( (pax= komodo_paxfind(txid,vout)) != 0 )
576 {
14941d4c 577 //if ( didstats != 0 )
578 // pax->didstats = 1;
ca75995d 579 pax->type = opretbuf[0];
580 }
a4c67285 581 }
582 }
583 else if ( tokomodo != 0 && opretbuf[0] == 'A' )
584 {
52b2e68d 585 if ( ASSETCHAINS_SYMBOL[0] != 0 )
826bfe51 586 {
587 for (i=0; i<opretlen; i++)
588 printf("%02x",opretbuf[i]);
74a9722e 589 printf(" opret[%c] else path tokomodo.%d ht.%d before %.8f\n",opretbuf[0],tokomodo,height,dstr(komodo_paxtotal()));
826bfe51 590 }
b89ab77c 591 if ( (n= komodo_issued_opreturn(base,txids,vouts,values,srcvalues,kmdheights,otherheights,baseids,rmd160s,opretbuf,opretlen,1)) > 0 )
a4c67285 592 {
593 for (i=0; i<n; i++)
594 {
b89ab77c 595 if ( baseids[i] < 0 )
596 continue;
f5e3cdfa 597 didstats = 0;
0cc6ad81 598 seed = 0;
992c3be5 599 checktoshis = komodo_paxprice(&seed,kmdheights[i],CURRENCIES[baseids[i]],(char *)"KMD",(uint64_t)srcvalues[i]);
600 printf("PAX_fiatdest ht.%d price %s %.8f -> KMD %.8f vs %.8f\n",kmdheights[i],CURRENCIES[baseids[i]],(double)srcvalues[i]/COIN,(double)values[i]/COIN,(double)checktoshis/COIN);
26ffac88 601 for (j=0; j<32; j++)
602 printf("%02x",((uint8_t *)&txids[i])[j]);
71c9af7c 603 printf(" v%d %.8f k.%d ht.%d base.%d\n",vouts[i],dstr(values[i]),kmdheights[i],otherheights[i],baseids[i]);
b89ab77c 604 if ( (pax= komodo_paxfind(txids[i],vouts[i])) == 0 )
a4c67285 605 {
f360ea0a 606 bitcoin_address(coinaddr,60,&rmd160s[i*20],20);
0cc6ad81 607 komodo_gateway_deposit(coinaddr,values[i],CURRENCIES[baseids[i]],srcvalues[i],&rmd160s[i*20],txids[i],vouts[i],kmdheights[i],otherheights[i],CURRENCIES[baseids[i]],kmdheights[i]);
042e3b9f 608 if ( srcvalues[i] != 0 && (basesp= komodo_stateptrget(CURRENCIES[baseids[i]])) != 0 )
0fa85cc3 609 {
3cbfd2b4 610 basesp->approved += srcvalues[i];
f5e3cdfa 611 didstats = 1;
ad16127c 612 printf("########### %p approved %s += %.8f\n",basesp,CURRENCIES[baseids[i]],dstr(srcvalues[i]));
0fa85cc3 613 }
3cbfd2b4 614 printf(" i.%d (%s) <- %.8f ADDFLAG APPROVED\n",i,coinaddr,dstr(values[i]));
3f9cad6d 615 }
042e3b9f 616 else if ( pax->didstats == 0 && srcvalues[i] != 0 )
3f9cad6d 617 {
618 if ( (basesp= komodo_stateptrget(CURRENCIES[baseids[i]])) != 0 )
619 {
620 basesp->approved += srcvalues[i];
621 didstats = 1;
622 printf("########### %p approved %s += %.8f\n",basesp,CURRENCIES[baseids[i]],dstr(srcvalues[i]));
623 }
624 }
625 else printf(" i.%d of n.%d pax.%p baseids[] %d\n",i,n,pax,baseids[i]);
dfe40c43 626 if ( (pax= komodo_paxfind(txids[i],vouts[i])) != 0 )
06d1a655 627 {
ca75995d 628 pax->type = opretbuf[0];
f97d3439 629 pax->approved = kmdheights[i];
14941d4c 630 //if ( didstats != 0 )
631 // pax->didstats = 1;
dfe40c43 632 printf(" i.%d approved.%d <<<<<<<<<<<<< APPROVED %p\n",i,kmdheights[i],pax);
06d1a655 633 }
ea365a71 634 }
0b556992 635 }
ecfc4f44 636 printf("extra.[%d] after %.8f\n",n,dstr(komodo_paxtotal()));
01d9ed2f 637 }
20e09846 638 else if ( opretbuf[0] == 'I' )
429dabb5 639 {
f5e3cdfa 640 if ( strncmp((char *)"KMD",(char *)&opretbuf[opretlen-4],3) != 0 )
429dabb5 641 {
b89ab77c 642 if ( (n= komodo_issued_opreturn(base,txids,vouts,values,srcvalues,kmdheights,otherheights,baseids,rmd160s,opretbuf,opretlen,0)) > 0 )
429dabb5 643 {
63b289ad 644 for (i=0; i<n; i++)
ec35af90 645 {
f5e3cdfa 646 if ( baseids[i] < 0 )
b971ca89 647 {
648 printf("%d of %d illegal baseid.%d\n",i,n,baseids[i]);
f5e3cdfa 649 continue;
b971ca89 650 }
9ccd3f33 651 bitcoin_address(coinaddr,60,&rmd160s[i*20],20);
c6eca157 652 printf("ISSUE %s %.8f %.8f\n",CURRENCIES[baseids[i]],dstr(values[i]),dstr(srcvalues[i]));
653 komodo_gateway_deposit(coinaddr,0,0,0,0,txids[i],vouts[i],height,0,CURRENCIES[baseids[i]],0);
f5e3cdfa 654 if ( komodo_paxmark(height,txids[i],vouts[i],height) == 0 )
655 {
3cbfd2b4 656 }
ca75995d 657 if ( (pax= komodo_paxfind(txids[i],vouts[i])) != 0 )
658 {
659 pax->type = opretbuf[0];
3f2d5618 660 strcpy(pax->source,(char *)&opretbuf[opretlen-4]);
ca75995d 661 }
ec35af90 662 }
c1bc1804 663 } else printf("opreturn none issued?\n");
b971ca89 664 } else printf("opreturn matches KMD? %s\n",(char *)&opretbuf[opretlen-4]);
429dabb5 665 }
ca3c6549 666 else if ( opretbuf[0] == 'X' )
667 {
4c58b338 668 printf("got X opreturn height.%d\n",height);
669 if ( (n= komodo_issued_opreturn(base,txids,vouts,values,srcvalues,kmdheights,otherheights,baseids,rmd160s,opretbuf,opretlen,1)) > 0 )
670 {
671 for (i=0; i<n; i++)
672 {
3f9cad6d 673 if ( baseids[i] < 0 )
674 continue;
4c58b338 675 bitcoin_address(coinaddr,60,&rmd160s[i*20],20);
19cba879 676 printf("X i.%d of %d: %.8f -> %s\n",i,n,dstr(values[i]),coinaddr);
c6eca157 677 komodo_gateway_deposit(coinaddr,0,0,0,0,txids[i],vouts[i],height,0,(char *)"KMD",0);
f5e3cdfa 678 if ( komodo_paxmark(height,txids[i],vouts[i],height) == 0 )
c6eca157 679 ;
ca75995d 680 if ( (pax= komodo_paxfind(txids[i],vouts[i])) != 0 )
681 {
682 pax->type = opretbuf[0];
e649b292 683 if ( baseids[i] >= 0 && srcvalues[i] != 0 && (basesp= komodo_stateptrget(CURRENCIES[baseids[i]])) != 0 )
c6eca157 684 {
e649b292 685 basesp->redeemed += srcvalues[i];
14941d4c 686 //pax->didstats = 1;
c6eca157 687 }
ca75995d 688 }
4c58b338 689 }
e988a431 690 } else printf("komodo_issued_opreturn returned %d\n",n);
ca3c6549 691 }
64bb0834 692 return(typestr);
693}
694
30d79208 695void komodo_passport_iteration()
ab918767 696{
635dd34d 697 static long lastpos[34]; static char userpass[33][1024];
698 FILE *fp; int32_t baseid,isrealtime,refid,blocks,longest; struct komodo_state *sp,*refsp; char *retstr,fname[512],*base,symbol[16],dest[16]; uint32_t buf[3]; cJSON *infoobj,*result; uint64_t RTmask = 0;
17899df4 699 while ( KOMODO_INITDONE == 0 )
700 {
701 fprintf(stderr,"PASSPORT iteration waiting for KOMODO_INITDONE\n");
702 sleep(3);
703 }
635dd34d 704 refsp = komodo_stateptr(symbol,dest);
ab918767 705 if ( ASSETCHAINS_SYMBOL[0] == 0 )
67cd296f 706 refid = 33;
635dd34d 707 else refid = komodo_baseid(ASSETCHAINS_SYMBOL)+1; // illegal base -> baseid.-1 -> 0
3085016b 708 //printf("PASSPORT %s refid.%d\n",ASSETCHAINS_SYMBOL,refid);
52f1d788 709 for (baseid=0; baseid<=32; baseid++)
508b0d3c 710 {
ecf6256c 711 sp = 0;
712 isrealtime = 0;
f789edde 713 base = (char *)CURRENCIES[baseid];
c1bc1804 714if ( strcmp("EUR",base) != 0 && baseid < 32 )
715 continue;
95a6016d 716 if ( baseid+1 != refid )
ab918767 717 {
055db9b6 718 komodo_statefname(fname,baseid<32?base:(char *)"",(char *)"komodostate");
52f1d788 719 komodo_nameset(symbol,dest,base);
30376a70 720 //port = komodo_port(base,10,&magic) + 1;
52f1d788 721 if ( (fp= fopen(fname,"rb")) != 0 && (sp= komodo_stateptrget(symbol)) != 0 )
ab918767 722 {
52f1d788 723 fseek(fp,0,SEEK_END);
724 if ( ftell(fp) > lastpos[baseid] )
ab918767 725 {
c7caa0da 726 //printf("passport refid.%d %s fname.(%s) base.%s\n",refid,symbol,fname,base);
52f1d788 727 fseek(fp,lastpos[baseid],SEEK_SET);
9534c87a 728 while ( komodo_parsestatefile(sp,fp,symbol,dest) >= 0 )
52f1d788 729 ;
730 lastpos[baseid] = ftell(fp);
a9bb99d2 731 //printf("from.(%s) lastpos[%s] %ld\n",ASSETCHAINS_SYMBOL,CURRENCIES[baseid],lastpos[baseid]);
52f1d788 732 } //else fprintf(stderr,"%s.%ld ",CURRENCIES[baseid],ftell(fp));
733 fclose(fp);
ecf6256c 734 }
a7ef556c 735 komodo_statefname(fname,baseid<32?base:(char *)"",(char *)"realtime");
736 if ( (fp= fopen(fname,"rb")) != 0 )
737 {
738 if ( fread(buf,1,sizeof(buf),fp) == sizeof(buf) )
739 {
f1db88ea 740 sp->CURRENT_HEIGHT = buf[0];
fe0210c0 741 if ( buf[0] != 0 && buf[0] == buf[1] && buf[2] > time(NULL)-60 )
6eb41a2f 742 {
a7ef556c 743 isrealtime = 1;
6eb41a2f 744 RTmask |= (1LL << baseid);
635dd34d 745 memcpy(refsp->RTbufs[baseid+1],buf,sizeof(refsp->RTbufs[baseid+1]));
140fccf8 746 } //else fprintf(stderr,"%s not RT\n",base);
bffa91b2 747 } //else fprintf(stderr,"%s size error RT\n",base);
a7ef556c 748 fclose(fp);
209dc96c 749 } else fprintf(stderr,"%s open error RT\n",base);
a7ef556c 750 }
635dd34d 751 else
a7ef556c 752 {
753 komodo_statefname(fname,baseid<32?base:(char *)"",(char *)"realtime");
754 if ( (fp= fopen(fname,"wb")) != 0 )
755 {
30376a70 756 buf[0] = (uint32_t)chainActive.Tip()->nHeight;
a7ef556c 757 buf[1] = (uint32_t)komodo_longestchain();
758 if ( buf[0] != 0 && buf[0] == buf[1] )
6eb41a2f 759 {
a7ef556c 760 buf[2] = (uint32_t)time(NULL);
48a3cd18 761 RTmask |= (1LL << baseid) | 1;
635dd34d 762 memcpy(refsp->RTbufs[baseid+1],buf,sizeof(refsp->RTbufs[baseid+1]));
763 if ( refid != 0 )
764 memcpy(refsp->RTbufs[0],buf,sizeof(refsp->RTbufs[0]));
6eb41a2f 765 }
a7ef556c 766 if ( fwrite(buf,1,sizeof(buf),fp) != sizeof(buf) )
767 fprintf(stderr,"[%s] %s error writing realtime\n",ASSETCHAINS_SYMBOL,base);
768 fclose(fp);
f789edde 769 } else fprintf(stderr,"%s create error RT\n",base);
ecf6256c 770 }
f1db88ea 771 if ( sp != 0 && isrealtime == 0 )
772 refsp->RTbufs[0][2] = 0;
52f1d788 773 }
635dd34d 774 refsp->RTmask = RTmask;
4767f1fc 775 KOMODO_PASSPORT_INITDONE = 1;
ab918767 776}
ab918767 777
This page took 0.273045 seconds and 4 git commands to generate.