]> Git Repo - VerusCoin.git/blame - src/komodo_gateway.h
projects / VerusCoin.git / blame
? search:
summary | shortlog | log | commit | commitdiff | tree
blob | blame (incremental) | history | HEAD
test
[VerusCoin.git] / src / komodo_gateway.h
CommitLineData
9b0e1808 1/******************************************************************************
37fed603 2 * Copyright © 2014-2017 The SuperNET Developers. *
9b0e1808 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
aa114a60 18int32_t pax_fiatstatus(uint64_t *available,uint64_t *deposited,uint64_t *issued,uint64_t *withdrawn,uint64_t *approved,uint64_t *redeemed,char *base)
3cbfd2b4 19{
aa114a60 20 int32_t baseid; struct komodo_state *sp; int64_t netliability,maxallowed;
21 *available = *deposited = *issued = *withdrawn = *approved = *redeemed = 0;
3cbfd2b4 22 if ( (baseid= komodo_baseid(base)) >= 0 )
23 {
24 if ( (sp= komodo_stateptrget(base)) != 0 )
25 {
26 *deposited = sp->deposited;
27 *issued = sp->issued;
28 *withdrawn = sp->withdrawn;
29 *approved = sp->approved;
30 *redeemed = sp->redeemed;
aa114a60 31 netliability = (sp->deposited - sp->withdrawn) - sp->shorted;
32 maxallowed = komodo_maxallowed(baseid);
33 if ( netliability < maxallowed )
34 *available = (maxallowed - netliability);
35 //printf("%p %s %.8f %.8f %.8f %.8f %.8f\n",sp,base,dstr(*deposited),dstr(*issued),dstr(*withdrawn),dstr(*approved),dstr(*redeemed));
3cbfd2b4 36 return(0);
ee5e5744 37 } else printf("pax_fiatstatus cant get basesp.%s\n",base);
38 } else printf("pax_fiatstatus illegal base.%s\n",base);
3cbfd2b4 39 return(-1);
40}
41
51e5d952 42void pax_keyset(uint8_t *buf,uint256 txid,uint16_t vout,uint8_t type)
6210f328 43{
51e5d952 44 memcpy(buf,&txid,32);
45 memcpy(&buf[32],&vout,2);
46 buf[34] = type;
47}
48
49struct pax_transaction *komodo_paxfind(uint256 txid,uint16_t vout,uint8_t type)
50{
51 struct pax_transaction *pax; uint8_t buf[35];
6210f328 52 pthread_mutex_lock(&komodo_mutex);
51e5d952 53 pax_keyset(buf,txid,vout,type);
54 HASH_FIND(hh,PAX,buf,sizeof(buf),pax);
6210f328 55 pthread_mutex_unlock(&komodo_mutex);
56 return(pax);
57}
58
c5c0e527 59struct pax_transaction *komodo_paxfinds(uint256 txid,uint16_t vout)
60{
64120a71 61 struct pax_transaction *pax; int32_t i; uint8_t types[] = { 'D', 'I', 'W', 'A', 'X' };
095dce58 62 for (i=0; i<sizeof(types)/sizeof(*types); i++)
c5c0e527 63 if ( (pax= komodo_paxfind(txid,vout,types[i])) != 0 )
64 return(pax);
65 return(0);
66}
67
51e5d952 68struct pax_transaction *komodo_paxmark(int32_t height,uint256 txid,uint16_t vout,uint8_t type,int32_t mark)
6210f328 69{
51e5d952 70 struct pax_transaction *pax; uint8_t buf[35];
6210f328 71 pthread_mutex_lock(&komodo_mutex);
51e5d952 72 pax_keyset(buf,txid,vout,type);
73 HASH_FIND(hh,PAX,buf,sizeof(buf),pax);
2ab43fd2 74 if ( pax == 0 )
75 {
76 pax = (struct pax_transaction *)calloc(1,sizeof(*pax));
77 pax->txid = txid;
78 pax->vout = vout;
51e5d952 79 pax->type = type;
80 memcpy(pax->buf,buf,sizeof(pax->buf));
81 HASH_ADD_KEYPTR(hh,PAX,pax->buf,sizeof(pax->buf),pax);
32d525eb 82 //printf("ht.%d create pax.%p mark.%d\n",height,pax,mark);
2ab43fd2 83 }
6210f328 84 if ( pax != 0 )
6210f328 85 pax->marked = mark;
6210f328 86 pthread_mutex_unlock(&komodo_mutex);
87 return(pax);
88}
429dabb5 89
57f349cb 90void komodo_paxdelete(struct pax_transaction *pax)
91{
5720de88 92 return; // breaks when out of order
57f349cb 93 pthread_mutex_lock(&komodo_mutex);
94 HASH_DELETE(hh,PAX,pax);
95 pthread_mutex_unlock(&komodo_mutex);
96}
97
51e5d952 98void komodo_gateway_deposit(char *coinaddr,uint64_t value,char *symbol,uint64_t fiatoshis,uint8_t *rmd160,uint256 txid,uint16_t vout,uint8_t type,int32_t height,int32_t otherheight,char *source,int32_t approved) // assetchain context
d43c7a93 99{
51e5d952 100 struct pax_transaction *pax; uint8_t buf[35]; int32_t addflag = 0; struct komodo_state *sp; char str[16],dest[16],*s;
6cd01056 101 if ( KOMODO_PAX == 0 )
102 return;
bffa91b2 103 sp = komodo_stateptr(str,dest);
d43c7a93 104 pthread_mutex_lock(&komodo_mutex);
51e5d952 105 pax_keyset(buf,txid,vout,type);
106 HASH_FIND(hh,PAX,buf,sizeof(buf),pax);
d43c7a93 107 if ( pax == 0 )
b2d64a0f 108 {
d43c7a93 109 pax = (struct pax_transaction *)calloc(1,sizeof(*pax));
8d52488f 110 pax->txid = txid;
111 pax->vout = vout;
51e5d952 112 pax->type = type;
113 memcpy(pax->buf,buf,sizeof(pax->buf));
114 HASH_ADD_KEYPTR(hh,PAX,pax->buf,sizeof(pax->buf),pax);
7961668b 115 addflag = 1;
bff51d67 116 if ( 0 && ASSETCHAINS_SYMBOL[0] == 0 )
1fc75a27 117 {
118 int32_t i; for (i=0; i<32; i++)
119 printf("%02x",((uint8_t *)&txid)[i]);
5ce8bf22 120 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 121 }
b2d64a0f 122 }
8d52488f 123 pthread_mutex_unlock(&komodo_mutex);
d43c7a93 124 if ( coinaddr != 0 )
125 {
126 strcpy(pax->coinaddr,coinaddr);
9ccd3f33 127 if ( value != 0 )
128 pax->komodoshis = value;
129 if ( symbol != 0 )
130 strcpy(pax->symbol,symbol);
cd26c1f3 131 if ( source != 0 )
132 strcpy(pax->source,source);
9ccd3f33 133 if ( fiatoshis != 0 )
134 pax->fiatoshis = fiatoshis;
135 if ( rmd160 != 0 )
136 memcpy(pax->rmd160,rmd160,20);
137 if ( height != 0 )
138 pax->height = height;
139 if ( otherheight != 0 )
140 pax->otherheight = otherheight;
d43c7a93 141 }
142 else
143 {
144 pax->marked = height;
bff51d67 145 //printf("pax.%p MARK DEPOSIT ht.%d other.%d\n",pax,height,otherheight);
d43c7a93 146 }
d43c7a93 147}
148
7cc6844b 149int32_t komodo_rwapproval(int32_t rwflag,uint8_t *opretbuf,struct pax_transaction *pax)
150{
151 int32_t i,len = 0;
ddf827b2 152 if ( rwflag == 1 )
153 {
154 for (i=0; i<32; i++)
155 opretbuf[len++] = ((uint8_t *)&pax->txid)[i];
156 opretbuf[len++] = pax->vout & 0xff;
157 opretbuf[len++] = (pax->vout >> 8) & 0xff;
158 }
159 else
160 {
161 for (i=0; i<32; i++)
a6972662 162 ((uint8_t *)&pax->txid)[i] = opretbuf[len++];
bff51d67 163 //for (i=0; i<32; i++)
164 // printf("%02x",((uint8_t *)&pax->txid)[31-i]);
ddf827b2 165 pax->vout = opretbuf[len++];
166 pax->vout += ((uint32_t)opretbuf[len++] << 8);
bff51d67 167 //printf(" txid v.%d\n",pax->vout);
ddf827b2 168 }
ad66994d 169 len += iguana_rwnum(rwflag,&opretbuf[len],sizeof(pax->komodoshis),&pax->komodoshis);
ddf827b2 170 len += iguana_rwnum(rwflag,&opretbuf[len],sizeof(pax->fiatoshis),&pax->fiatoshis);
171 len += iguana_rwnum(rwflag,&opretbuf[len],sizeof(pax->height),&pax->height);
172 len += iguana_rwnum(rwflag,&opretbuf[len],sizeof(pax->otherheight),&pax->otherheight);
173 if ( rwflag != 0 )
174 {
175 memcpy(&opretbuf[len],pax->rmd160,20), len += 20;
176 for (i=0; i<4; i++)
177 opretbuf[len++] = pax->source[i];
178 }
179 else
180 {
181 memcpy(pax->rmd160,&opretbuf[len],20), len += 20;
182 for (i=0; i<4; i++)
183 pax->source[i] = opretbuf[len++];
184 }
7cc6844b 185 return(len);
186}
187
b89ab77c 188int32_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 189{
54661780 190 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];
6cd01056 191 if ( KOMODO_PAX == 0 )
192 return(0);
5cb9312f 193 incr = 34 + (iskomodo * (2*sizeof(fiatoshis) + 2*sizeof(height) + 20));
085c4ee4 194 //41e77b91cb68dc2aa02fa88550eae6b6d44db676a7e935337b6d1392d9718f03cb0200305c90660400000000fbcbeb1f000000bde801006201000058e7945ad08ddba1eac9c9b6c8e1e97e8016a2d152
40f3d9cc 195 //for (i=0; i<opretlen; i++)
196 // printf("%02x",opretbuf[i]);
b3183e3e 197 //printf(" opretlen.%d (%s)\n",opretlen,base);
40f3d9cc 198 //printf(" opretlen.%d vs %d incr.%d (%d)\n",opretlen,(int32_t)(2*sizeof(fiatoshis) + 2*sizeof(height) + 20 + 2),incr,opretlen/incr);
c3152c23 199 //if ( ASSETCHAINS_SYMBOL[0] == 0 || strncmp(ASSETCHAINS_SYMBOL,base,strlen(base)) == 0 )
63b289ad 200 {
947d956f 201 type = opretbuf[0];
63b289ad 202 opretbuf++, opretlen--;
e8433f7a 203 for (n=0; n<opretlen/incr; n++)
63b289ad 204 {
05d91eb2 205 if ( iskomodo != 0 )
206 {
e8433f7a 207 memset(&p,0,sizeof(p));
ffec138e 208 len += komodo_rwapproval(0,&opretbuf[len],&p);
b89ab77c 209 if ( values != 0 && srcvalues != 0 && kmdheights != 0 && otherheights != 0 && baseids != 0 && rmd160s != 0 )
1ed46112 210 {
63342b19 211 txids[n] = p.txid;
212 vouts[n] = p.vout;
c65d0868 213 values[n] = (strcmp("KMD",base) == 0) ? p.komodoshis : p.fiatoshis;
214 srcvalues[n] = (strcmp("KMD",base) == 0) ? p.fiatoshis : p.komodoshis;
a3f1fb69 215 kmdheights[n] = p.height;
216 otherheights[n] = p.otherheight;
7cc6844b 217 memcpy(&rmd160s[n * 20],p.rmd160,20);
1dbea872 218 baseids[n] = komodo_baseid(p.source);
109afe64 219 if ( 0 )
71c9af7c 220 {
221 char coinaddr[64];
222 bitcoin_address(coinaddr,60,&rmd160s[n * 20],20);
947d956f 223 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 224 }
52e87248 225 }
05d91eb2 226 }
7cc6844b 227 else
228 {
5cb9312f 229 for (i=0; i<4; i++)
230 base[i] = opretbuf[opretlen-4+i];
7cc6844b 231 for (j=0; j<32; j++)
232 {
233 ((uint8_t *)&txids[n])[j] = opretbuf[len++];
234 //printf("%02x",((uint8_t *)&txids[n])[j]);
235 }
236 vouts[n] = opretbuf[len++];
237 vouts[n] = (opretbuf[len++] << 8) | vouts[n];
cb3bf8df 238 baseids[n] = komodo_baseid(base);
c5c0e527 239 if ( (pax= komodo_paxfinds(txids[n],vouts[n])) != 0 )
54661780 240 {
c3152c23 241 values[n] = (strcmp("KMD",base) == 0) ? pax->komodoshis : pax->fiatoshis;
242 srcvalues[n] = (strcmp("KMD",base) == 0) ? pax->fiatoshis : pax->komodoshis;
54661780 243 kmdheights[n] = pax->height;
244 otherheights[n] = pax->otherheight;
245 memcpy(&rmd160s[n * 20],pax->rmd160,20);
246 }
7cc6844b 247 }
6d898f42 248 //printf(" komodo_issued_opreturn issuedtxid v%d i.%d opretlen.%d\n",vouts[n],n,opretlen);
63b289ad 249 }
250 }
251 return(n);
252}
253
865bd972 254int32_t komodo_paxcmp(char *symbol,int32_t kmdheight,uint64_t value,uint64_t checkvalue,uint64_t seed)
255{
256 int32_t ratio;
257 if ( seed == 0 && checkvalue != 0 )
258 {
259 ratio = ((value << 6) / checkvalue);
260 if ( ratio >= 63 && ratio <= 65 )
261 return(0);
262 else
263 {
264 if ( kmdheight >= 86150 )
265 printf("ht.%d ignore mismatched %s value %lld vs checkvalue %lld -> ratio.%d\n",kmdheight,symbol,(long long)value,(long long)checkvalue,ratio);
266 return(-1);
267 }
268 }
269 else if ( checkvalue != 0 )
270 {
271 ratio = ((value << 10) / checkvalue);
272 if ( ratio >= 1023 && ratio <= 1025 )
273 return(0);
274 }
275 return(value != checkvalue);
276}
277
f1db88ea 278uint64_t komodo_paxtotal()
279{
a73709a3 280 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;
6cd01056 281 if ( KOMODO_PAX == 0 )
282 return(0);
48a3cd18 283 if ( komodo_isrealtime(&ht) == 0 )
f1db88ea 284 return(0);
ca75995d 285 else
286 {
287 HASH_ITER(hh,PAX,pax,tmp)
288 {
5ccb222a 289 if ( pax->marked != 0 )
290 continue;
85779087 291 if ( pax->type == 'A' || pax->type == 'D' || pax->type == 'X' )
292 str = pax->symbol;
293 else str = pax->source;
294 basesp = komodo_stateptrget(str);
115e6a5c 295 if ( basesp != 0 && pax->didstats == 0 )
ca75995d 296 {
6e458bf3 297 if ( pax->type == 'I' && (pax2= komodo_paxfind(pax->txid,pax->vout,'D')) != 0 )
ca75995d 298 {
3cfd4837 299 if ( pax2->fiatoshis != 0 )
300 {
301 pax->komodoshis = pax2->komodoshis;
302 pax->fiatoshis = pax2->fiatoshis;
303 basesp->issued += pax->fiatoshis;
304 pax->didstats = 1;
54f87e10 305 if ( strcmp(str,ASSETCHAINS_SYMBOL) == 0 )
306 printf("########### %p issued %s += %.8f kmdheight.%d %.8f other.%d\n",basesp,str,dstr(pax->fiatoshis),pax->height,dstr(pax->komodoshis),pax->otherheight);
c3111e7b 307 pax2->marked = pax->height;
54f87e10 308 pax->marked = pax->height;
3cfd4837 309 }
fa81b5ae 310 }
115e6a5c 311 else if ( pax->type == 'W' )
312 {
431af13e 313 //bitcoin_address(coinaddr,addrtype,rmd160,20);
1bc5fdf8 314 if ( (checktoshis= komodo_paxprice(&seed,pax->height,pax->source,(char *)"KMD",(uint64_t)pax->fiatoshis)) != 0 )
315 {
db7becdc 316 if ( komodo_paxcmp(pax->source,pax->height,pax->komodoshis,checktoshis,seed) != 0 )
772c13de 317 {
1bc5fdf8 318 pax->marked = pax->height;
60cd57df 319 //printf("WITHDRAW.%s mark <- %d %.8f != %.8f\n",pax->source,pax->height,dstr(checktoshis),dstr(pax->komodoshis));
772c13de 320 }
1bc5fdf8 321 else if ( pax->validated == 0 )
322 {
d4003105 323 pax->validated = pax->komodoshis = checktoshis;
109afe64 324 //int32_t j; for (j=0; j<32; j++)
325 // printf("%02x",((uint8_t *)&pax->txid)[j]);
2405bc66 326 //if ( strcmp(str,ASSETCHAINS_SYMBOL) == 0 )
109afe64 327 // printf(" v%d %p got WITHDRAW.%s kmd.%d ht.%d %.8f -> %.8f/%.8f\n",pax->vout,pax,pax->source,pax->height,pax->otherheight,dstr(pax->fiatoshis),dstr(pax->komodoshis),dstr(checktoshis));
1bc5fdf8 328 }
329 }
115e6a5c 330 }
ca75995d 331 }
332 }
333 }
ede04b12 334 komodo_stateptr(symbol,dest);
f1db88ea 335 HASH_ITER(hh,PAX,pax,tmp)
336 {
115e6a5c 337 pax->ready = 0;
cfa1fdda 338 if ( 0 && pax->type == 'A' )
1eb7220f 339 printf("%p pax.%s <- %s marked.%d %.8f -> %.8f validated.%d approved.%d\n",pax,pax->symbol,pax->source,pax->marked,dstr(pax->komodoshis),dstr(pax->fiatoshis),pax->validated != 0,pax->approved != 0);
5ccb222a 340 if ( pax->marked != 0 )
341 continue;
cfa1fdda 342 if ( strcmp(symbol,pax->symbol) == 0 || pax->type == 'A' )
f1db88ea 343 {
ede04b12 344 if ( pax->marked == 0 )
345 {
346 if ( komodo_is_issuer() != 0 )
1bc5fdf8 347 {
0449e3f0 348 if ( pax->validated != 0 && pax->type == 'D' )
1bc5fdf8 349 {
350 total += pax->fiatoshis;
351 pax->ready = 1;
352 }
353 }
371a9c87 354 else if ( pax->approved != 0 && pax->type == 'A' )
992c3be5 355 {
356 if ( pax->validated != 0 )
02c36c15 357 {
992c3be5 358 total += pax->komodoshis;
02c36c15 359 pax->ready = 1;
360 }
992c3be5 361 else
362 {
363 seed = 0;
f186b8a1 364 checktoshis = komodo_paxprice(&seed,pax->height,pax->source,(char *)"KMD",(uint64_t)pax->fiatoshis);
ca1dd28e 365 printf("paxtotal 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);
0fa85cc3 366 //printf(" v%d %.8f k.%d ht.%d\n",pax->vout,dstr(pax->komodoshis),pax->height,pax->otherheight);
6e458bf3 367 if ( seed != 0 && checktoshis != 0 )
992c3be5 368 {
115e6a5c 369 if ( checktoshis == pax->komodoshis )
992c3be5 370 {
371 total += pax->komodoshis;
372 pax->validated = pax->komodoshis;
115e6a5c 373 pax->ready = 1;
992c3be5 374 } else pax->marked = pax->height;
375 }
376 }
377 }
fc40c343 378 if ( 0 && pax->ready != 0 )
cfa1fdda 379 printf("%p (%c) pax.%s marked.%d %.8f -> %.8f validated.%d approved.%d\n",pax,pax->type,pax->symbol,pax->marked,dstr(pax->komodoshis),dstr(pax->fiatoshis),pax->validated != 0,pax->approved != 0);
ede04b12 380 }
f1db88ea 381 }
382 }
5481c677 383 //printf("paxtotal %.8f\n",dstr(total));
f1db88ea 384 return(total);
385}
386
fa1a55cd 387static int _paxorder(const void *a,const void *b)
f360ea0a 388{
fa1a55cd 389#define pax_a (*(struct pax_transaction **)a)
390#define pax_b (*(struct pax_transaction **)b)
391 uint64_t aval,bval;
d936b97f 392 aval = pax_a->fiatoshis + pax_a->komodoshis + pax_a->height;
393 bval = pax_b->fiatoshis + pax_b->komodoshis + pax_b->height;
fa1a55cd 394 if ( bval > aval )
395 return(-1);
396 else if ( bval < aval )
397 return(1);
398 return(0);
399#undef pax_a
400#undef pax_b
401}
402
403int32_t komodo_pending_withdraws(char *opretstr) // todo: enforce deterministic order
404{
6b3eb2c4 405 struct pax_transaction *pax,*pax2,*tmp,*paxes[64]; uint8_t opretbuf[16384]; int32_t i,n,ht,len=0; uint64_t total = 0;
6cd01056 406 if ( KOMODO_PAX == 0 )
407 return(0);
f360ea0a 408 if ( komodo_isrealtime(&ht) == 0 || ASSETCHAINS_SYMBOL[0] != 0 )
409 return(0);
fa1a55cd 410 n = 0;
f360ea0a 411 HASH_ITER(hh,PAX,pax,tmp)
412 {
f1e6a937 413 if ( pax->type == 'W' )
f360ea0a 414 {
6b3eb2c4 415 if ( (pax2= komodo_paxfind(pax->txid,pax->vout,'A')) != 0 )
416 {
417 if ( pax2->approved != 0 )
418 pax->approved = pax2->approved;
419 }
420 else if ( (pax2= komodo_paxfind(pax->txid,pax->vout,'X')) != 0 )
0b262b65 421 pax->approved = pax->height;
7d121b40 422 printf("pending_withdraw: pax %s marked.%u approved.%u validated.%llu\n",pax->symbol,pax->marked,pax->approved,(long long)pax->validated);
423 if ( pax->marked == 0 && pax->approved == 0 && pax->validated != 0 ) //strcmp((char *)"KMD",pax->symbol) == 0 &&
f1e6a937 424 {
fa1a55cd 425 if ( n < sizeof(paxes)/sizeof(*paxes) )
ac4eb454 426 {
fa1a55cd 427 paxes[n++] = pax;
2e575216 428 //int32_t j; for (j=0; j<32; j++)
429 // printf("%02x",((uint8_t *)&pax->txid)[j]);
430 //printf(" %s.(kmdht.%d ht.%d marked.%u approved.%d validated %.8f) %.8f\n",pax->source,pax->height,pax->otherheight,pax->marked,pax->approved,dstr(pax->validated),dstr(pax->komodoshis));
ac4eb454 431 }
f1e6a937 432 }
f360ea0a 433 }
434 }
fa1a55cd 435 opretstr[0] = 0;
436 if ( n > 0 )
437 {
438 opretbuf[len++] = 'A';
439 qsort(paxes,n,sizeof(*paxes),_paxorder);
440 for (i=0; i<n; i++)
441 {
442 if ( len < (sizeof(opretbuf)>>3)*7 )
443 len += komodo_rwapproval(1,&opretbuf[len],paxes[i]);
444 }
445 if ( len > 0 )
446 init_hexbytes_noT(opretstr,opretbuf,len);
447 }
132aea8c 448 //fprintf(stderr,"komodo_pending_withdraws len.%d PAXTOTAL %.8f\n",len,dstr(komodo_paxtotal()));
f360ea0a 449 return(len);
450}
a4c67285 451
635dd34d 452int32_t komodo_gateway_deposits(CMutableTransaction *txNew,char *base,int32_t tokomodo)
429dabb5 453{
1c05f0b5 454 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 available,deposited,issued,withdrawn,approved,redeemed,mask;
6cd01056 455 if ( KOMODO_PAX == 0 )
456 return(0);
76d59c1d 457 struct komodo_state *kmdsp = komodo_stateptrget((char *)"KMD");
635dd34d 458 sp = komodo_stateptr(symbol,dest);
27bf3c5e 459 strcpy(symbol,base);
b27b2877 460 if ( ASSETCHAINS_SYMBOL[0] != 0 && komodo_baseid(ASSETCHAINS_SYMBOL) < 0 )
716fb382 461 return(0);
429dabb5 462 PENDING_KOMODO_TX = 0;
a3f23ee2 463 if ( tokomodo == 0 )
48e96ba1 464 {
77be6cd9 465 opcode = 'I';
48a3cd18 466 if ( komodo_isrealtime(&ht) == 0 )
48e96ba1 467 return(0);
57f349cb 468 }
469 else
470 {
471 opcode = 'X';
57f349cb 472 if ( komodo_paxtotal() == 0 )
473 return(0);
474 }
c169f64b 475 HASH_ITER(hh,PAX,pax,tmp)
429dabb5 476 {
aa114a60 477 {
478#ifdef KOMODO_ASSETCHAINS_WAITNOTARIZE
26ac06c4 479 if ( kmdsp != 0 && (kmdsp->NOTARIZED_HEIGHT >= pax->height || kmdsp->CURRENT_HEIGHT > pax->height+30) ) // assumes same chain as notarize
8bd946ce 480 pax->validated = pax->komodoshis; //kmdsp->NOTARIZED_HEIGHT;
fc40c343 481 else pax->validated = pax->ready = 0;
aa114a60 482#endif
483 }
25d878f4 484 if ( ASSETCHAINS_SYMBOL[0] != 0 && (pax_fiatstatus(&available,&deposited,&issued,&withdrawn,&approved,&redeemed,symbol) != 0 || available < pax->fiatoshis) )
1c05f0b5 485 {
7ad9ed4d 486 if ( strcmp(ASSETCHAINS_SYMBOL,symbol) == 0 )
487 printf("miner.[%s]: skip %s %.8f when avail %.8f\n",ASSETCHAINS_SYMBOL,symbol,dstr(pax->fiatoshis),dstr(available));
1c05f0b5 488 continue;
489 }
274dd7a5 490 /*printf("pax.%s marked.%d %.8f -> %.8f ready.%d validated.%d\n",pax->symbol,pax->marked,dstr(pax->komodoshis),dstr(pax->fiatoshis),pax->ready!=0,pax->validated!=0);
02c36c15 491 if ( pax->marked != 0 || (pax->type != 'D' && pax->type != 'A') || pax->ready == 0 )
a06196fe 492 {
493 printf("reject 2\n");
e5430f52 494 continue;
274dd7a5 495 }*/
496 if ( ASSETCHAINS_SYMBOL[0] != 0 && (strcmp(pax->symbol,symbol) != 0 || pax->validated == 0) )
8bd946ce 497 {
5fc94d71 498 //printf("pax->symbol.%s != %s or null pax->validated %.8f\n",pax->symbol,symbol,dstr(pax->validated));
8bd946ce 499 continue;
500 }
fc40c343 501 if ( pax->ready == 0 )
502 continue;
582c6afe 503 if ( pax->type == 'A' && ASSETCHAINS_SYMBOL[0] == 0 )
504 {
76d59c1d 505 if ( kmdsp != 0 )
582c6afe 506 {
507 if ( (baseid= komodo_baseid(pax->symbol)) < 0 || ((1LL << baseid) & sp->RTmask) == 0 )
508 {
509 printf("not RT for (%s) %llx baseid.%d %llx\n",pax->symbol,(long long)sp->RTmask,baseid,(long long)(1LL<<baseid));
510 continue;
511 }
76d59c1d 512 } else continue;
582c6afe 513 }
514
5481c677 515 //printf("redeem.%d? (%c) %p pax.%s marked.%d %.8f -> %.8f ready.%d validated.%d approved.%d\n",tokomodo,pax->type,pax,pax->symbol,pax->marked,dstr(pax->komodoshis),dstr(pax->fiatoshis),pax->ready!=0,pax->validated!=0,pax->approved!=0);
49058e97 516 if ( 0 && ASSETCHAINS_SYMBOL[0] != 0 )
635dd34d 517 printf("pax.%s marked.%d %.8f -> %.8f\n",ASSETCHAINS_SYMBOL,pax->marked,dstr(pax->komodoshis),dstr(pax->fiatoshis));
e5430f52 518 txNew->vout.resize(numvouts+1);
1fc75a27 519 txNew->vout[numvouts].nValue = (opcode == 'I') ? pax->fiatoshis : pax->komodoshis;
e5430f52 520 txNew->vout[numvouts].scriptPubKey.resize(25);
521 script = (uint8_t *)&txNew->vout[numvouts].scriptPubKey[0];
522 *script++ = 0x76;
523 *script++ = 0xa9;
524 *script++ = 20;
525 memcpy(script,pax->rmd160,20), script += 20;
526 *script++ = 0x88;
527 *script++ = 0xac;
a3f23ee2 528 if ( tokomodo == 0 )
16bed6ac 529 {
530 for (i=0; i<32; i++)
16bed6ac 531 data[len++] = ((uint8_t *)&pax->txid)[i];
16bed6ac 532 data[len++] = pax->vout & 0xff;
533 data[len++] = (pax->vout >> 8) & 0xff;
e5430f52 534 PENDING_KOMODO_TX += pax->fiatoshis;
16bed6ac 535 }
fbc4209b 536 else
537 {
e0357628 538 len += komodo_rwapproval(1,&data[len],pax);
fbc4209b 539 PENDING_KOMODO_TX += pax->komodoshis;
cefb14cd 540 printf(" vout.%u DEPOSIT %.8f <- pax.%s pending %.8f | ",pax->vout,(double)txNew->vout[numvouts].nValue/COIN,symbol,dstr(PENDING_KOMODO_TX));
fbc4209b 541 }
e5430f52 542 if ( numvouts++ >= 64 )
543 break;
429dabb5 544 }
545 if ( numvouts > 1 )
546 {
0e3472c1 547 if ( tokomodo != 0 )
27bf3c5e 548 strcpy(symbol,(char *)"KMD");
9ef47e29 549 for (i=0; symbol[i]!=0; i++)
550 data[len++] = symbol[i];
a5ad8f02 551 data[len++] = 0;
77be6cd9 552 opretlen = komodo_opreturnscript(opret,opcode,data,len);
50824530 553 txNew->vout.resize(numvouts+1);
554 txNew->vout[numvouts].nValue = 0;
555 txNew->vout[numvouts].scriptPubKey.resize(opretlen);
556 script = (uint8_t *)&txNew->vout[numvouts].scriptPubKey[0];
429dabb5 557 memcpy(script,opret,opretlen);
23d955d4 558 printf("MINER deposits.%d (%s) vouts.%d %.8f opretlen.%d\n",tokomodo,ASSETCHAINS_SYMBOL,numvouts,dstr(PENDING_KOMODO_TX),opretlen);
d9a9d562 559 return(1);
9ef47e29 560 }
d9a9d562 561 return(0);
429dabb5 562}
563
8f64a3a9 564int32_t komodo_check_deposit(int32_t height,const CBlock& block) // verify above block is valid pax pricing
557d9a23 565{
1c05f0b5 566 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]; uint64_t available,deposited,issued,withdrawn,approved,redeemed; int64_t values[64],srcvalues[64]; struct pax_transaction *pax;
6cd01056 567 if ( KOMODO_PAX == 0 )
568 return(0);
1ed46112 569 memset(baseids,0xff,sizeof(baseids));
570 memset(values,0,sizeof(values));
b89ab77c 571 memset(srcvalues,0,sizeof(srcvalues));
f360ea0a 572 memset(rmd160s,0,sizeof(rmd160s));
1ed46112 573 memset(kmdheights,0,sizeof(kmdheights));
574 memset(otherheights,0,sizeof(otherheights));
557d9a23 575 n = block.vtx[0].vout.size();
576 script = (uint8_t *)block.vtx[0].vout[n-1].scriptPubKey.data();
12d47153 577 if ( n <= 2 || script[0] != 0x6a )
578 return(0);
579 offset += komodo_scriptitemlen(&opretlen,&script[offset]);
77be6cd9 580 if ( ASSETCHAINS_SYMBOL[0] == 0 )
581 {
85de2861 582 //for (i=0; i<opretlen; i++)
583 // printf("%02x",script[i]);
584 //printf(" height.%d checkdeposit n.%d [%02x] [%c] %d vs %d\n",height,n,script[0],script[offset],script[offset],'X');
77be6cd9 585 opcode = 'X';
09a235e1 586 strcpy(symbol,(char *)"KMD");
77be6cd9 587 }
588 else
589 {
590 strcpy(symbol,ASSETCHAINS_SYMBOL);
591 opcode = 'I';
716fb382 592 if ( komodo_baseid(symbol) < 0 )
593 {
594 if ( block.vtx[0].vout.size() != 1 )
595 {
596 printf("%s has more than one coinbase?\n",symbol);
597 return(-1);
598 }
599 return(0);
600 }
77be6cd9 601 }
602 if ( script[offset] == opcode && opretlen < block.vtx[0].vout[n-1].scriptPubKey.size() )
557d9a23 603 {
b89ab77c 604 if ( (num= komodo_issued_opreturn(base,txids,vouts,values,srcvalues,kmdheights,otherheights,baseids,rmd160s,&script[offset],opretlen,opcode == 'X')) > 0 )
557d9a23 605 {
606 for (i=1; i<n-1; i++)
607 {
1bc5fdf8 608 if ( (pax= komodo_paxfinds(txids[i-1],vouts[i-1])) != 0 ) // finds... make sure right one
5a2c5b6f 609 {
ca75995d 610 pax->type = opcode;
1c05f0b5 611 if ( opcode == 'I' && pax_fiatstatus(&available,&deposited,&issued,&withdrawn,&approved,&redeemed,symbol) != 0 || available < pax->fiatoshis )
612 {
613 printf("checkdeposit: skip %s %.8f when avail %.8f\n",pax->symbol,dstr(pax->fiatoshis),dstr(available));
614 continue;
615 }
784c0112 616 if ( ((opcode == 'I' && (pax->fiatoshis == 0 || pax->fiatoshis == block.vtx[0].vout[i].nValue)) || (opcode == 'X' && (pax->komodoshis == 0 || pax->komodoshis == block.vtx[0].vout[i].nValue))) )
f10b8e2e 617 {
02c36c15 618 if ( pax->marked != 0 && height >= 80820 )
73585700 619 {
76cf8058 620 printf(">>>>>>>>>>> %c errs.%d i.%d match %.8f vs %.8f paxmarked.%d kht.%d ht.%d\n",opcode,errs,i,dstr(opcode == 'I' ? pax->fiatoshis : pax->komodoshis),dstr(block.vtx[0].vout[i].nValue),pax->marked,pax->height,pax->otherheight);
02c36c15 621 errs++;
4eb7c730 622 }
623 else
624 {
625 if ( opcode == 'X' )
626 printf("check deposit validates %s %.8f -> %.8f\n",CURRENCIES[baseids[i]],dstr(srcvalues[i]),dstr(values[i]));
627 matched++;
628 }
f10b8e2e 629 }
630 else
631 {
1c05f0b5 632 for (j=0; j<32; j++)
633 printf("%02x",((uint8_t *)&txids[i-1])[j]);
634 printf(" cant paxfind %c txid\n",opcode);
1bc5fdf8 635 printf(">>>>>>>>>>> %c errs.%d i.%d match %.8f vs %.8f pax.%p\n",opcode,errs,i,dstr(opcode == 'I' ? pax->fiatoshis : pax->komodoshis),dstr(block.vtx[0].vout[i].nValue),pax);
f10b8e2e 636 }
5a2c5b6f 637 }
cb040aa1 638 else
639 {
1c05f0b5 640 hash = block.GetHash();
641 for (j=0; j<32; j++)
642 printf("%02x",((uint8_t *)&hash)[j]);
7ee875e8 643 printf(" kht.%d ht.%d %.8f %.8f blockhash couldnt find vout.[%d]\n",kmdheights[i-1],otherheights[i-1],dstr(values[i-1]),dstr(srcvalues[i]),i);
cb040aa1 644 }
557d9a23 645 }
0ce26ccf 646 if ( height <= chainActive.Tip()->nHeight && matched != num )
81041ab2 647 {
9bd14f97 648 printf("WOULD REJECT %s: ht.%d (%c) matched.%d vs num.%d\n",symbol,height,opcode,matched,num);
0dca8d4c 649 // can easily happen depending on order of loading
6755c2aa 650 if ( height > 200000 )
52b2e68d 651 {
652 printf("REJECT: ht.%d (%c) matched.%d vs num.%d\n",height,opcode,matched,num);
653 return(-1);
654 }
81041ab2 655 }
557d9a23 656 }
b98053e2 657 //printf("opretlen.%d num.%d\n",opretlen,num);
557d9a23 658 }
659 return(0);
660}
661
cd26c1f3 662const char *komodo_opreturn(int32_t height,uint64_t value,uint8_t *opretbuf,int32_t opretlen,uint256 txid,uint16_t vout,char *source)
429dabb5 663{
7ddc4ef7 664 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,*pax2; struct komodo_state *basesp; double diff;
1ed46112 665 const char *typestr = "unknown";
6cd01056 666 if ( KOMODO_PAX == 0 )
667 return("nopax");
b27b2877 668 if ( ASSETCHAINS_SYMBOL[0] != 0 && komodo_baseid(ASSETCHAINS_SYMBOL) < 0 )
894c570b 669 {
b27b2877 670 //printf("komodo_opreturn skip %s\n",ASSETCHAINS_SYMBOL);
716fb382 671 return("assetchain");
894c570b 672 }
1ed46112 673 memset(baseids,0xff,sizeof(baseids));
674 memset(values,0,sizeof(values));
06cfcf31 675 memset(srcvalues,0,sizeof(srcvalues));
f360ea0a 676 memset(rmd160s,0,sizeof(rmd160s));
1ed46112 677 memset(kmdheights,0,sizeof(kmdheights));
678 memset(otherheights,0,sizeof(otherheights));
9596e284 679 tokomodo = (komodo_is_issuer() == 0);
0a611c1e 680 if ( opretbuf[0] == 'D' )
64bb0834 681 {
9596e284 682 tokomodo = 0;
05a37d87 683 if ( opretlen == 38 ) // any KMD tx
64bb0834 684 {
05a37d87 685 iguana_rwnum(0,&opretbuf[34],sizeof(kmdheight),&kmdheight);
abdd8672 686 memset(base,0,sizeof(base));
687 PAX_pubkey(0,&opretbuf[1],&addrtype,rmd160,base,&shortflag,&fiatoshis);
abdd8672 688 bitcoin_address(coinaddr,addrtype,rmd160,20);
689 checktoshis = PAX_fiatdest(&seed,tokomodo,destaddr,pubkey33,coinaddr,kmdheight,base,fiatoshis);
690 typestr = "deposit";
05a37d87 691 if ( kmdheight <= height )
6e576848 692 {
f5e3cdfa 693 didstats = 0;
d4003105 694 if ( 0 && strcmp(base,ASSETCHAINS_SYMBOL) == 0 )
8f261c33 695 {
696 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);
697 for (i=0; i<32; i++)
698 printf("%02x",((uint8_t *)&txid)[i]);
699 printf(" <- txid.v%u ",vout);
700 for (i=0; i<33; i++)
701 printf("%02x",pubkey33[i]);
702 printf(" checkpubkey check %.8f v %.8f dest.(%s) kmdheight.%d height.%d\n",dstr(checktoshis),dstr(value),destaddr,kmdheight,height);
703 }
331a6188 704 if ( komodo_paxcmp(base,kmdheight,value,checktoshis,seed) == 0 )
05a37d87 705 {
b915be35 706 if ( (pax= komodo_paxfind(txid,vout,'D')) == 0 )
05a37d87 707 {
c98b3a08 708 if ( (basesp= komodo_stateptrget(base)) != 0 )
05a37d87 709 {
c98b3a08 710 basesp->deposited += fiatoshis;
22a31d52 711 didstats = 1;
bff51d67 712 if ( strcmp(base,ASSETCHAINS_SYMBOL) == 0 )
0398360f 713 printf("########### %p deposited %s += %.8f kmdheight.%d %.8f\n",basesp,base,dstr(fiatoshis),kmdheight,dstr(value));
c72ee808 714 } else printf("cant get stateptr.(%s)\n",base);
4d4194d3 715 komodo_gateway_deposit(coinaddr,value,base,fiatoshis,rmd160,txid,vout,'D',kmdheight,height,(char *)"KMD",0);
3f9cad6d 716 }
51e5d952 717 if ( (pax= komodo_paxfind(txid,vout,'D')) != 0 )
3f9cad6d 718 {
8bd946ce 719 pax->height = kmdheight;
720 pax->validated = value;
88dff0d3 721 pax->komodoshis = value;
722 pax->fiatoshis = fiatoshis;
22a31d52 723 if ( didstats == 0 && pax->didstats == 0 )
3f9cad6d 724 {
ca75995d 725 if ( (basesp= komodo_stateptrget(base)) != 0 )
726 {
727 basesp->deposited += fiatoshis;
22a31d52 728 didstats = 1;
bff51d67 729 if ( strcmp(base,ASSETCHAINS_SYMBOL) == 0 )
36b8ed99 730 printf("########### %p deposited %s += %.8f/%.8f kmdheight.%d/%d %.8f/%.8f\n",basesp,base,dstr(fiatoshis),dstr(pax->fiatoshis),kmdheight,pax->height,dstr(value),dstr(pax->komodoshis));
ca75995d 731 }
3f9cad6d 732 }
51e5d952 733 if ( didstats != 0 )
734 pax->didstats = 1;
7ddc4ef7 735 if ( (pax2= komodo_paxfind(txid,vout,'I')) != 0 )
736 {
737 pax2->fiatoshis = pax->fiatoshis;
738 pax2->komodoshis = pax->komodoshis;
7ddc4ef7 739 pax->marked = pax2->marked = pax->height;
da02b3be 740 pax2->height = pax->height = height;
25623352 741 if ( pax2->didstats == 0 )
742 {
bde7e5ef 743 if ( (basesp= komodo_stateptrget(base)) != 0 )
744 {
745 basesp->issued += pax2->fiatoshis;
746 pax2->didstats = 1;
747 if ( strcmp(base,ASSETCHAINS_SYMBOL) == 0 )
36b8ed99 748 printf("########### %p issueda %s += %.8f kmdheight.%d %.8f other.%d\n",basesp,base,dstr(pax2->fiatoshis),pax2->height,dstr(pax2->komodoshis),pax2->otherheight);
bde7e5ef 749 }
25623352 750 }
7ddc4ef7 751 }
3f9cad6d 752 }
eb928486 753 }
754 else if ( kmdheight > 91800 )
8f261c33 755 printf("pax %s deposit %.8f rejected kmdheight.%d %.8f KMD\n",base,dstr(fiatoshis),kmdheight,dstr(value));
8bc1bcad 756 }
64bb0834 757 }
758 }
36b8ed99 759 else if ( opretbuf[0] == 'I' )
760 {
761 tokomodo = 0;
762 if ( strncmp((char *)"KMD",(char *)&opretbuf[opretlen-4],3) != 0 )
763 {
764 if ( (n= komodo_issued_opreturn(base,txids,vouts,values,srcvalues,kmdheights,otherheights,baseids,rmd160s,opretbuf,opretlen,0)) > 0 )
765 {
766 for (i=0; i<n; i++)
767 {
768 if ( baseids[i] < 0 )
769 {
770 printf("%d of %d illegal baseid.%d\n",i,n,baseids[i]);
771 continue;
772 }
773 bitcoin_address(coinaddr,60,&rmd160s[i*20],20);
774 komodo_gateway_deposit(coinaddr,0,0,0,0,txids[i],vouts[i],'I',height,0,CURRENCIES[baseids[i]],0);
775 komodo_paxmark(height,txids[i],vouts[i],'I',height);
776 if ( (pax= komodo_paxfind(txids[i],vouts[i],'I')) != 0 )
777 {
778 pax->type = opretbuf[0];
779 strcpy(pax->source,(char *)&opretbuf[opretlen-4]);
a6a33512 780 if ( (pax2= komodo_paxfind(txids[i],vouts[i],'D')) != 0 && pax2->fiatoshis != 0 && pax2->komodoshis != 0 )
36b8ed99 781 {
782 // realtime path?
783 pax->fiatoshis = pax2->fiatoshis;
784 pax->komodoshis = pax2->komodoshis;
785 pax->marked = pax2->marked = pax2->height;
786 if ( pax->didstats == 0 )
787 {
788 if ( (basesp= komodo_stateptrget(CURRENCIES[baseids[i]])) != 0 )
789 {
790 basesp->issued += pax->fiatoshis;
791 pax->didstats = 1;
39863e30 792 pax->height = pax2->height;
793 pax->otherheight = height;
36b8ed99 794 if ( strcmp(CURRENCIES[baseids[i]],ASSETCHAINS_SYMBOL) == 0 )
795 printf("########### %p issuedb %s += %.8f kmdheight.%d %.8f other.%d\n",basesp,CURRENCIES[baseids[i]],dstr(pax->fiatoshis),pax->height,dstr(pax->komodoshis),pax->otherheight);
796 }
797 }
798 }
799 }
57f349cb 800 if ( (pax= komodo_paxmark(height,txids[i],vouts[i],'I',height)) != 0 )
801 komodo_paxdelete(pax);
802 if ( (pax= komodo_paxmark(height,txids[i],vouts[i],'D',height)) != 0 )
803 komodo_paxdelete(pax);
36b8ed99 804 }
805 } else printf("opreturn none issued?\n");
806 }
36b8ed99 807 }
a3608c89 808 else if ( opretbuf[0] == 'W' )//&& opretlen >= 38 )
01d9ed2f 809 {
9596e284 810 tokomodo = 1;
01d9ed2f 811 iguana_rwnum(0,&opretbuf[34],sizeof(kmdheight),&kmdheight);
812 memset(base,0,sizeof(base));
c3d94aec 813 PAX_pubkey(0,&opretbuf[1],&addrtype,rmd160,base,&shortflag,&komodoshis);
01d9ed2f 814 bitcoin_address(coinaddr,addrtype,rmd160,20);
c3d94aec 815 checktoshis = PAX_fiatdest(&seed,tokomodo,destaddr,pubkey33,coinaddr,kmdheight,base,value);
01d9ed2f 816 typestr = "withdraw";
ca1dd28e 817 for (i=0; i<opretlen; i++)
818 printf("%02x",opretbuf[i]);
819 printf(" [%s] WITHDRAW %s.height.%d vs height.%d check %.8f/%.8f vs %.8f tokomodo.%d %d seed.%llx -> (%s) len.%d\n",ASSETCHAINS_SYMBOL,base,kmdheight,height,dstr(checktoshis),dstr(komodoshis),dstr(value),komodo_is_issuer(),strncmp(ASSETCHAINS_SYMBOL,base,strlen(base)) == 0,(long long)seed,coinaddr,opretlen);
f5e3cdfa 820 didstats = 0;
a39d7b21 821 //if ( komodo_paxcmp(base,kmdheight,komodoshis,checktoshis,seed) == 0 )
01d9ed2f 822 {
51e5d952 823 if ( value != 0 && ((pax= komodo_paxfind(txid,vout,'W')) == 0 || pax->didstats == 0) )
0b556992 824 {
0126d891 825 if ( (basesp= komodo_stateptrget(base)) != 0 )
826 {
827 basesp->withdrawn += value;
828 didstats = 1;
2405bc66 829 if ( strcmp(base,ASSETCHAINS_SYMBOL) == 0 )
5b489b55 830 printf("########### %p withdrawn %s += %.8f check %.8f\n",basesp,base,dstr(value),dstr(checktoshis));
0126d891 831 }
57f349cb 832 if ( 0 && strcmp(base,"RUB") == 0 && (pax == 0 || pax->approved == 0) )
4718923d 833 printf("notarize %s %.8f -> %.8f kmd.%d other.%d\n",ASSETCHAINS_SYMBOL,dstr(value),dstr(komodoshis),kmdheight,height);
ea365a71 834 }
115e6a5c 835 komodo_gateway_deposit(coinaddr,0,(char *)"KMD",value,rmd160,txid,vout,'W',kmdheight,height,source,0);
51e5d952 836 if ( (pax= komodo_paxfind(txid,vout,'W')) != 0 )
daeecf95 837 {
838 pax->type = opretbuf[0];
1ac3f9ef 839 strcpy(pax->source,base);
840 strcpy(pax->symbol,"KMD");
daeecf95 841 pax->height = kmdheight;
842 pax->otherheight = height;
1e22f865 843 pax->komodoshis = komodoshis;
daeecf95 844 }
a39d7b21 845 } // else printf("withdraw %s paxcmp ht.%d %d error value %.8f -> %.8f vs %.8f\n",base,kmdheight,height,dstr(value),dstr(komodoshis),dstr(checktoshis));
846 // need to allocate pax
a4c67285 847 }
848 else if ( tokomodo != 0 && opretbuf[0] == 'A' )
849 {
9596e284 850 tokomodo = 1;
109afe64 851 if ( 0 && ASSETCHAINS_SYMBOL[0] != 0 )
826bfe51 852 {
853 for (i=0; i<opretlen; i++)
854 printf("%02x",opretbuf[i]);
40f3d9cc 855 printf(" opret[%c] else path tokomodo.%d ht.%d before %.8f opretlen.%d\n",opretbuf[0],tokomodo,height,dstr(komodo_paxtotal()),opretlen);
826bfe51 856 }
b89ab77c 857 if ( (n= komodo_issued_opreturn(base,txids,vouts,values,srcvalues,kmdheights,otherheights,baseids,rmd160s,opretbuf,opretlen,1)) > 0 )
a4c67285 858 {
859 for (i=0; i<n; i++)
860 {
885643be 861 //for (j=0; j<32; j++)
862 // printf("%02x",((uint8_t *)&txids[i])[j]);
863 //printf(" v%d %.8f %.8f k.%d ht.%d base.%d\n",vouts[i],dstr(values[i]),dstr(srcvalues[i]),kmdheights[i],otherheights[i],baseids[i]);
b89ab77c 864 if ( baseids[i] < 0 )
8e7b40d9 865 {
afdb28f3 866 for (i=0; i<opretlen; i++)
867 printf("%02x",opretbuf[i]);
868 printf(" opret[%c] else path tokomodo.%d ht.%d before %.8f opretlen.%d\n",opretbuf[0],tokomodo,height,dstr(komodo_paxtotal()),opretlen);
8952ee9d 869 //printf("baseids[%d] %d\n",i,baseids[i]);
afdb28f3 870 if ( (pax= komodo_paxfind(txids[i],vouts[i],'W')) != 0 || (pax= komodo_paxfind(txids[i],vouts[i],'X')) != 0 )
51752631 871 {
872 baseids[i] = komodo_baseid(pax->symbol);
873 printf("override neg1 with (%s)\n",pax->symbol);
874 }
875 if ( baseids[i] < 0 )
876 continue;
8e7b40d9 877 }
f5e3cdfa 878 didstats = 0;
0cc6ad81 879 seed = 0;
d515094d 880 checktoshis = komodo_paxprice(&seed,kmdheights[i],CURRENCIES[baseids[i]],(char *)"KMD",(uint64_t)values[i]);
76cf8058 881 printf("PAX_fiatdest ht.%d price %s %.8f -> KMD %.8f vs %.8f\n",kmdheights[i],CURRENCIES[baseids[i]],(double)values[i]/COIN,(double)srcvalues[i]/COIN,(double)checktoshis/COIN);
371a9c87 882 if ( srcvalues[i] == checktoshis )
a4c67285 883 {
36a4e92c 884 if ( (pax= komodo_paxfind(txids[i],vouts[i],'A')) == 0 )
0fa85cc3 885 {
371a9c87 886 bitcoin_address(coinaddr,60,&rmd160s[i*20],20);
5481c677 887 komodo_gateway_deposit(coinaddr,srcvalues[i],CURRENCIES[baseids[i]],values[i],&rmd160s[i*20],txids[i],vouts[i],'A',kmdheights[i],otherheights[i],CURRENCIES[baseids[i]],kmdheights[i]);
371a9c87 888 if ( (pax= komodo_paxfind(txids[i],vouts[i],'A')) == 0 )
889 printf("unexpected null pax for approve\n");
890 else pax->validated = checktoshis;
891 if ( (pax2= komodo_paxfind(txids[i],vouts[i],'W')) != 0 )
892 pax2->approved = kmdheights[i];
7aadf9a9 893 komodo_paxmark(height,txids[i],vouts[i],'W',height);
371a9c87 894 //komodo_paxmark(height,txids[i],vouts[i],'A',height);
bca09689 895 if ( values[i] != 0 && (basesp= komodo_stateptrget(CURRENCIES[baseids[i]])) != 0 )
371a9c87 896 {
5481c677 897 basesp->approved += values[i];
371a9c87 898 didstats = 1;
5a544e6a 899 printf("pax.%p ########### %p approved %s += %.8f -> %.8f/%.8f kht.%d %d\n",pax,basesp,CURRENCIES[baseids[i]],dstr(values[i]),dstr(srcvalues[i]),dstr(checktoshis),kmdheights[i],otherheights[i]);
371a9c87 900 }
901 //printf(" i.%d (%s) <- %.8f ADDFLAG APPROVED\n",i,coinaddr,dstr(values[i]));
0fa85cc3 902 }
371a9c87 903 else if ( pax->didstats == 0 && srcvalues[i] != 0 )
3f9cad6d 904 {
371a9c87 905 if ( (basesp= komodo_stateptrget(CURRENCIES[baseids[i]])) != 0 )
906 {
5481c677 907 basesp->approved += values[i];
371a9c87 908 didstats = 1;
5a544e6a 909 printf("pax.%p ########### %p approved %s += %.8f -> %.8f/%.8f kht.%d %d\n",pax,basesp,CURRENCIES[baseids[i]],dstr(values[i]),dstr(srcvalues[i]),dstr(checktoshis),kmdheights[i],otherheights[i]);
371a9c87 910 }
911 } //else printf(" i.%d of n.%d pax.%p baseids[] %d\n",i,n,pax,baseids[i]);
912 if ( (pax= komodo_paxfind(txids[i],vouts[i],'A')) != 0 )
913 {
914 pax->type = opretbuf[0];
915 pax->approved = kmdheights[i];
916 pax->validated = checktoshis;
917 if ( didstats != 0 )
918 pax->didstats = 1;
7ad9ed4d 919 //if ( strcmp(CURRENCIES[baseids[i]],ASSETCHAINS_SYMBOL) == 0 )
5481c677 920 //printf(" i.%d approved.%d <<<<<<<<<<<<< APPROVED %p\n",i,kmdheights[i],pax);
371a9c87 921 }
06d1a655 922 }
ea365a71 923 }
5cb9312f 924 } else printf("n.%d from opreturns\n",n);
bff51d67 925 //printf("extra.[%d] after %.8f\n",n,dstr(komodo_paxtotal()));
01d9ed2f 926 }
ca3c6549 927 else if ( opretbuf[0] == 'X' )
928 {
9596e284 929 tokomodo = 1;
c65d0868 930 if ( (n= komodo_issued_opreturn(base,txids,vouts,values,srcvalues,kmdheights,otherheights,baseids,rmd160s,opretbuf,opretlen,1)) > 0 )
4c58b338 931 {
932 for (i=0; i<n; i++)
933 {
3f9cad6d 934 if ( baseids[i] < 0 )
935 continue;
4c58b338 936 bitcoin_address(coinaddr,60,&rmd160s[i*20],20);
51e5d952 937 komodo_gateway_deposit(coinaddr,0,0,0,0,txids[i],vouts[i],'X',height,0,(char *)"KMD",0);
aa114a60 938 komodo_paxmark(height,txids[i],vouts[i],'W',height);
939 komodo_paxmark(height,txids[i],vouts[i],'A',height);
940 komodo_paxmark(height,txids[i],vouts[i],'X',height);
51e5d952 941 if ( (pax= komodo_paxfind(txids[i],vouts[i],'X')) != 0 )
ca75995d 942 {
943 pax->type = opretbuf[0];
6276f755 944 if ( height < 121842 ) // fields got switched around due to legacy issues and approves
2ee39fae 945 value = srcvalues[i];
946 else value = values[i];
947 if ( baseids[i] >= 0 && value != 0 && (basesp= komodo_stateptrget(CURRENCIES[baseids[i]])) != 0 )
c6eca157 948 {
2ee39fae 949 basesp->redeemed += value;
546672f5 950 pax->didstats = 1;
57f349cb 951 //if ( strcmp(CURRENCIES[baseids[i]],ASSETCHAINS_SYMBOL) == 0 )
e62f7114 952 printf("ht.%d %.8f ########### %p redeemed %s += %.8f %.8f kht.%d ht.%d\n",height,dstr(value),basesp,CURRENCIES[baseids[i]],dstr(value),dstr(srcvalues[i]),kmdheights[i],otherheights[i]);
c6eca157 953 }
ca75995d 954 }
57f349cb 955 if ( (pax= komodo_paxmark(height,txids[i],vouts[i],'W',height)) != 0 )
956 komodo_paxdelete(pax);
957 if ( (pax= komodo_paxmark(height,txids[i],vouts[i],'A',height)) != 0 )
958 komodo_paxdelete(pax);
959 if ( (pax= komodo_paxmark(height,txids[i],vouts[i],'X',height)) != 0 )
960 komodo_paxdelete(pax);
4c58b338 961 }
dff4ef45 962 } //else printf("komodo_issued_opreturn returned %d\n",n);
ca3c6549 963 }
64bb0834 964 return(typestr);
965}
966
30d79208 967void komodo_passport_iteration()
ab918767 968{
368c61bc 969 static long lastpos[34]; static char userpass[33][1024];
635dd34d 970 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;
2a15e8ea 971 //printf("PASSPORT.(%s)\n",ASSETCHAINS_SYMBOL);
17899df4 972 while ( KOMODO_INITDONE == 0 )
973 {
e40060c2 974 fprintf(stderr,"[%s] PASSPORT iteration waiting for KOMODO_INITDONE\n",ASSETCHAINS_SYMBOL);
17899df4 975 sleep(3);
976 }
635dd34d 977 refsp = komodo_stateptr(symbol,dest);
ab918767 978 if ( ASSETCHAINS_SYMBOL[0] == 0 )
67cd296f 979 refid = 33;
b307682f 980 else
716fb382 981 {
b307682f 982 refid = komodo_baseid(ASSETCHAINS_SYMBOL)+1; // illegal base -> baseid.-1 -> 0
983 if ( refid == 0 )
984 {
985 KOMODO_PASSPORT_INITDONE = 1;
986 return;
987 }
716fb382 988 }
6cd01056 989 if ( KOMODO_PAX == 0 )
990 {
991 KOMODO_PASSPORT_INITDONE = 1;
992 return;
993 }
49058e97 994 //printf("PASSPORT %s refid.%d\n",ASSETCHAINS_SYMBOL,refid);
959782f9 995 for (baseid=32; baseid>=0; baseid--)
508b0d3c 996 {
ecf6256c 997 sp = 0;
998 isrealtime = 0;
f789edde 999 base = (char *)CURRENCIES[baseid];
95a6016d 1000 if ( baseid+1 != refid )
ab918767 1001 {
055db9b6 1002 komodo_statefname(fname,baseid<32?base:(char *)"",(char *)"komodostate");
52f1d788 1003 komodo_nameset(symbol,dest,base);
22b09834 1004 sp = komodo_stateptrget(symbol);
1005 if ( (fp= fopen(fname,"rb")) != 0 && sp != 0 )
ab918767 1006 {
52f1d788 1007 fseek(fp,0,SEEK_END);
1008 if ( ftell(fp) > lastpos[baseid] )
ab918767 1009 {
894c570b 1010 if ( 0 && lastpos[baseid] == 0 && strcmp(symbol,"KMD") == 0 )
9a6744f2 1011 printf("passport refid.%d %s fname.(%s) base.%s\n",refid,symbol,fname,base);
52f1d788 1012 fseek(fp,lastpos[baseid],SEEK_SET);
9534c87a 1013 while ( komodo_parsestatefile(sp,fp,symbol,dest) >= 0 )
52f1d788 1014 ;
1015 lastpos[baseid] = ftell(fp);
894c570b 1016 if ( 0 && lastpos[baseid] == 0 && strcmp(symbol,"KMD") == 0 )
9a6744f2 1017 printf("from.(%s) lastpos[%s] %ld\n",ASSETCHAINS_SYMBOL,CURRENCIES[baseid],lastpos[baseid]);
49058e97 1018 } //else fprintf(stderr,"%s.%ld ",CURRENCIES[baseid],ftell(fp));
52f1d788 1019 fclose(fp);
14e3fb45 1020 } else printf("error.(%s) %p\n",fname,sp);
a7ef556c 1021 komodo_statefname(fname,baseid<32?base:(char *)"",(char *)"realtime");
1022 if ( (fp= fopen(fname,"rb")) != 0 )
1023 {
1024 if ( fread(buf,1,sizeof(buf),fp) == sizeof(buf) )
1025 {
f1db88ea 1026 sp->CURRENT_HEIGHT = buf[0];
43d45898 1027 if ( buf[0] != 0 && buf[0] >= buf[1] && buf[2] > time(NULL)-300 )
6eb41a2f 1028 {
a7ef556c 1029 isrealtime = 1;
6eb41a2f 1030 RTmask |= (1LL << baseid);
635dd34d 1031 memcpy(refsp->RTbufs[baseid+1],buf,sizeof(refsp->RTbufs[baseid+1]));
43d45898 1032 } else fprintf(stderr,"[%s]: %s not RT %u %u %d\n",ASSETCHAINS_SYMBOL,base,buf[0],buf[1],(int32_t)(time(NULL)-buf[2]));
bffa91b2 1033 } //else fprintf(stderr,"%s size error RT\n",base);
a7ef556c 1034 fclose(fp);
bff51d67 1035 } //else fprintf(stderr,"%s open error RT\n",base);
a7ef556c 1036 }
6238a204 1037 else
a7ef556c 1038 {
1039 komodo_statefname(fname,baseid<32?base:(char *)"",(char *)"realtime");
1040 if ( (fp= fopen(fname,"wb")) != 0 )
1041 {
30376a70 1042 buf[0] = (uint32_t)chainActive.Tip()->nHeight;
a7ef556c 1043 buf[1] = (uint32_t)komodo_longestchain();
1044 if ( buf[0] != 0 && buf[0] == buf[1] )
6eb41a2f 1045 {
a7ef556c 1046 buf[2] = (uint32_t)time(NULL);
582c6afe 1047 RTmask |= (1LL << baseid);
635dd34d 1048 memcpy(refsp->RTbufs[baseid+1],buf,sizeof(refsp->RTbufs[baseid+1]));
1049 if ( refid != 0 )
1050 memcpy(refsp->RTbufs[0],buf,sizeof(refsp->RTbufs[0]));
6eb41a2f 1051 }
a7ef556c 1052 if ( fwrite(buf,1,sizeof(buf),fp) != sizeof(buf) )
1053 fprintf(stderr,"[%s] %s error writing realtime\n",ASSETCHAINS_SYMBOL,base);
1054 fclose(fp);
f789edde 1055 } else fprintf(stderr,"%s create error RT\n",base);
ecf6256c 1056 }
f1db88ea 1057 if ( sp != 0 && isrealtime == 0 )
1058 refsp->RTbufs[0][2] = 0;
52f1d788 1059 }
6238a204 1060 komodo_paxtotal();
635dd34d 1061 refsp->RTmask = RTmask;
4767f1fc 1062 KOMODO_PASSPORT_INITDONE = 1;
2a15e8ea 1063 //printf("done PASSPORT %s refid.%d\n",ASSETCHAINS_SYMBOL,refid);
ab918767 1064}
ab918767 1065
Empty description
This page took 0.343935 seconds and 4 git commands to generate.