src/komodo_gateway.h

   1 /******************************************************************************
   2  * Copyright © 2014-2017 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
  16 // paxdeposit equivalent in reverse makes opreturn and KMD does the same in reverse
  17
  18 int32_t pax_fiatstatus(uint64_t *available,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; int64_t netliability,maxallowed,maxval;
  21     *available = *deposited = *issued = *withdrawn = *approved = *redeemed = 0;
  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;
  31             maxval = sp->approved;
  32             if ( sp->withdrawn > maxval )
  33                 maxval = sp->withdrawn;
  34             netliability = (sp->issued - maxval) - sp->shorted;
  35             maxallowed = komodo_maxallowed(baseid);
  36             if ( netliability < maxallowed )
  37                 *available = (maxallowed - netliability);
  38             //printf("%llu - %llu %s %.8f %.8f %.8f %.8f %.8f\n",(long long)maxallowed,(long long)netliability,base,dstr(*deposited),dstr(*issued),dstr(*withdrawn),dstr(*approved),dstr(*redeemed));
  39             return(0);
  40         } else printf("pax_fiatstatus cant get basesp.%s\n",base);
  41     } // else printf("pax_fiatstatus illegal base.%s\n",base);
  42     return(-1);
  43 }
  44
  45 void pax_keyset(uint8_t *buf,uint256 txid,uint16_t vout,uint8_t type)
  46 {
  47     memcpy(buf,&txid,32);
  48     memcpy(&buf[32],&vout,2);
  49     buf[34] = type;
  50 }
  51
  52 struct pax_transaction *komodo_paxfind(uint256 txid,uint16_t vout,uint8_t type)
  53 {
  54     struct pax_transaction *pax; uint8_t buf[35];
  55     pthread_mutex_lock(&komodo_mutex);
  56     pax_keyset(buf,txid,vout,type);
  57     HASH_FIND(hh,PAX,buf,sizeof(buf),pax);
  58     pthread_mutex_unlock(&komodo_mutex);
  59     return(pax);
  60 }
  61
  62 struct pax_transaction *komodo_paxfinds(uint256 txid,uint16_t vout)
  63 {
  64     struct pax_transaction *pax; int32_t i; uint8_t types[] = { 'I', 'D', 'X', 'A', 'W' };
  65     for (i=0; i<sizeof(types)/sizeof(*types); i++)
  66         if ( (pax= komodo_paxfind(txid,vout,types[i])) != 0 )
  67             return(pax);
  68     return(0);
  69 }
  70
  71 struct pax_transaction *komodo_paxmark(int32_t height,uint256 txid,uint16_t vout,uint8_t type,int32_t mark)
  72 {
  73     struct pax_transaction *pax; uint8_t buf[35];
  74     pthread_mutex_lock(&komodo_mutex);
  75     pax_keyset(buf,txid,vout,type);
  76     HASH_FIND(hh,PAX,buf,sizeof(buf),pax);
  77     if ( pax == 0 )
  78     {
  79         pax = (struct pax_transaction *)calloc(1,sizeof(*pax));
  80         pax->txid = txid;
  81         pax->vout = vout;
  82         pax->type = type;
  83         memcpy(pax->buf,buf,sizeof(pax->buf));
  84         HASH_ADD_KEYPTR(hh,PAX,pax->buf,sizeof(pax->buf),pax);
  85         //printf("ht.%d create pax.%p mark.%d\n",height,pax,mark);
  86     }
  87     if ( pax != 0 )
  88     {
  89         pax->marked = mark;
  90         //if ( height > 214700 || pax->height > 214700 )
  91         //    printf("mark ht.%d %.8f %.8f\n",pax->height,dstr(pax->komodoshis),dstr(pax->fiatoshis));
  92
  93     }
  94     pthread_mutex_unlock(&komodo_mutex);
  95     return(pax);
  96 }
  97
  98 void komodo_paxdelete(struct pax_transaction *pax)
  99 {
 100     return; // breaks when out of order
 101     pthread_mutex_lock(&komodo_mutex);
 102     HASH_DELETE(hh,PAX,pax);
 103     pthread_mutex_unlock(&komodo_mutex);
 104 }
 105
 106 void 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
 107 {
 108     struct pax_transaction *pax; uint8_t buf[35]; int32_t addflag = 0; struct komodo_state *sp; char str[16],dest[16],*s;
 109     //if ( KOMODO_PAX == 0 )
 110     //    return;
 111     //if ( strcmp(symbol,ASSETCHAINS_SYMBOL) != 0 )
 112     //    return;
 113     sp = komodo_stateptr(str,dest);
 114     pthread_mutex_lock(&komodo_mutex);
 115     pax_keyset(buf,txid,vout,type);
 116     HASH_FIND(hh,PAX,buf,sizeof(buf),pax);
 117     if ( pax == 0 )
 118     {
 119         pax = (struct pax_transaction *)calloc(1,sizeof(*pax));
 120         pax->txid = txid;
 121         pax->vout = vout;
 122         pax->type = type;
 123         memcpy(pax->buf,buf,sizeof(pax->buf));
 124         HASH_ADD_KEYPTR(hh,PAX,pax->buf,sizeof(pax->buf),pax);
 125         addflag = 1;
 126         if ( 0 && ASSETCHAINS_SYMBOL[0] == 0 )
 127         {
 128             int32_t i; for (i=0; i<32; i++)
 129                 printf("%02x",((uint8_t *)&txid)[i]);
 130             printf(" v.%d [%s] kht.%d ht.%d create pax.%p symbol.%s source.%s\n",vout,ASSETCHAINS_SYMBOL,height,otherheight,pax,symbol,source);
 131         }
 132     }
 133     pthread_mutex_unlock(&komodo_mutex);
 134     if ( coinaddr != 0 )
 135     {
 136         strcpy(pax->coinaddr,coinaddr);
 137         if ( value != 0 )
 138             pax->komodoshis = value;
 139         if ( symbol != 0 )
 140             strcpy(pax->symbol,symbol);
 141         if ( source != 0 )
 142             strcpy(pax->source,source);
 143         if ( fiatoshis != 0 )
 144             pax->fiatoshis = fiatoshis;
 145         if ( rmd160 != 0 )
 146             memcpy(pax->rmd160,rmd160,20);
 147         if ( height != 0 )
 148             pax->height = height;
 149         if ( otherheight != 0 )
 150             pax->otherheight = otherheight;
 151     }
 152     else
 153     {
 154         pax->marked = height;
 155         //printf("pax.%p MARK DEPOSIT ht.%d other.%d\n",pax,height,otherheight);
 156     }
 157 }
 158
 159 int32_t komodo_rwapproval(int32_t rwflag,uint8_t *opretbuf,struct pax_transaction *pax)
 160 {
 161     int32_t i,len = 0;
 162     if ( rwflag == 1 )
 163     {
 164         for (i=0; i<32; i++)
 165             opretbuf[len++] = ((uint8_t *)&pax->txid)[i];
 166         opretbuf[len++] = pax->vout & 0xff;
 167         opretbuf[len++] = (pax->vout >> 8) & 0xff;
 168     }
 169     else
 170     {
 171         for (i=0; i<32; i++)
 172             ((uint8_t *)&pax->txid)[i] = opretbuf[len++];
 173         //for (i=0; i<32; i++)
 174         //    printf("%02x",((uint8_t *)&pax->txid)[31-i]);
 175         pax->vout = opretbuf[len++];
 176         pax->vout += ((uint32_t)opretbuf[len++] << 8);
 177         //printf(" txid v.%d\n",pax->vout);
 178     }
 179     len += iguana_rwnum(rwflag,&opretbuf[len],sizeof(pax->komodoshis),&pax->komodoshis);
 180     len += iguana_rwnum(rwflag,&opretbuf[len],sizeof(pax->fiatoshis),&pax->fiatoshis);
 181     len += iguana_rwnum(rwflag,&opretbuf[len],sizeof(pax->height),&pax->height);
 182     len += iguana_rwnum(rwflag,&opretbuf[len],sizeof(pax->otherheight),&pax->otherheight);
 183     if ( rwflag != 0 )
 184     {
 185         memcpy(&opretbuf[len],pax->rmd160,20), len += 20;
 186         for (i=0; i<4; i++)
 187             opretbuf[len++] = pax->source[i];
 188     }
 189     else
 190     {
 191         memcpy(pax->rmd160,&opretbuf[len],20), len += 20;
 192         for (i=0; i<4; i++)
 193             pax->source[i] = opretbuf[len++];
 194     }
 195     return(len);
 196 }
 197
 198 int32_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)
 199 {
 200     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];
 201     //if ( KOMODO_PAX == 0 )
 202     //    return(0);
 203     incr = 34 + (iskomodo * (2*sizeof(fiatoshis) + 2*sizeof(height) + 20 + 4));
 204     //41e77b91cb68dc2aa02fa88550eae6b6d44db676a7e935337b6d1392d9718f03cb0200305c90660400000000fbcbeb1f000000bde801006201000058e7945ad08ddba1eac9c9b6c8e1e97e8016a2d152
 205
 206     // 41e94d736ec69d88c08b5d238abeeca609c02357a8317e0d56c328bcb1c259be5d0200485bc80200000000404b4c000000000059470200b80b000061f22ba7d19fe29ac3baebd839af8b7127d1f9075553440046bb4cc7a3b5cd39dffe7206507a3482a00780e617f68b273cce9817ed69298d02001069ca1b0000000080f0fa02000000005b470200b90b000061f22ba7d19fe29ac3baebd839af8b7127d1f90755
 207
 208     //for (i=0; i<opretlen; i++)
 209     //    printf("%02x",opretbuf[i]);
 210     //printf(" opretlen.%d (%s)\n",opretlen,base);
 211     //printf(" opretlen.%d vs %d incr.%d (%d)\n",opretlen,(int32_t)(2*sizeof(fiatoshis) + 2*sizeof(height) + 20 + 2),incr,opretlen/incr);
 212     //if ( ASSETCHAINS_SYMBOL[0] == 0 || strncmp(ASSETCHAINS_SYMBOL,base,strlen(base)) == 0 )
 213     {
 214         type = opretbuf[0];
 215         opretbuf++, opretlen--;
 216         for (n=0; n<opretlen/incr; n++)
 217         {
 218             if ( iskomodo != 0 )
 219             {
 220                 memset(&p,0,sizeof(p));
 221                 len += komodo_rwapproval(0,&opretbuf[len],&p);
 222                 if ( values != 0 && srcvalues != 0 && kmdheights != 0 && otherheights != 0 && baseids != 0 && rmd160s != 0 )
 223                 {
 224                     txids[n] = p.txid;
 225                     vouts[n] = p.vout;
 226                     values[n] = (strcmp("KMD",base) == 0) ? p.komodoshis : p.fiatoshis;
 227                     srcvalues[n] = (strcmp("KMD",base) == 0) ? p.fiatoshis : p.komodoshis;
 228                     kmdheights[n] = p.height;
 229                     otherheights[n] = p.otherheight;
 230                     memcpy(&rmd160s[n * 20],p.rmd160,20);
 231                     baseids[n] = komodo_baseid(p.source);
 232                     if ( 0 )
 233                     {
 234                         char coinaddr[64];
 235                         bitcoin_address(coinaddr,60,&rmd160s[n * 20],20);
 236                         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]));
 237                     }
 238                 }
 239             }
 240             else
 241             {
 242                 for (i=0; i<4; i++)
 243                     base[i] = opretbuf[opretlen-4+i];
 244                 for (j=0; j<32; j++)
 245                 {
 246                     ((uint8_t *)&txids[n])[j] = opretbuf[len++];
 247                     //printf("%02x",((uint8_t *)&txids[n])[j]);
 248                 }
 249                 vouts[n] = opretbuf[len++];
 250                 vouts[n] = (opretbuf[len++] << 8) | vouts[n];
 251                 baseids[n] = komodo_baseid(base);
 252                 if ( (pax= komodo_paxfinds(txids[n],vouts[n])) != 0 )
 253                 {
 254                     values[n] = (strcmp("KMD",base) == 0) ? pax->komodoshis : pax->fiatoshis;
 255                     srcvalues[n] = (strcmp("KMD",base) == 0) ? pax->fiatoshis : pax->komodoshis;
 256                     kmdheights[n] = pax->height;
 257                     otherheights[n] = pax->otherheight;
 258                     memcpy(&rmd160s[n * 20],pax->rmd160,20);
 259                 }
 260             }
 261             //printf(" komodo_issued_opreturn issuedtxid v%d i.%d opretlen.%d\n",vouts[n],n,opretlen);
 262         }
 263     }
 264     return(n);
 265 }
 266
 267 int32_t komodo_paxcmp(char *symbol,int32_t kmdheight,uint64_t value,uint64_t checkvalue,uint64_t seed)
 268 {
 269     int32_t ratio;
 270     if ( seed == 0 && checkvalue != 0 )
 271     {
 272         ratio = ((value << 6) / checkvalue);
 273         if ( ratio >= 62 && ratio <= 66 )
 274             return(0);
 275         else
 276         {
 277             if ( kmdheight >= 238000 )
 278                 printf("ht.%d ignore mismatched %s value %lld vs checkvalue %lld -> ratio.%d\n",kmdheight,symbol,(long long)value,(long long)checkvalue,ratio);
 279             return(-1);
 280         }
 281     }
 282     else if ( checkvalue != 0 )
 283     {
 284         ratio = ((value << 10) / checkvalue);
 285         if ( ratio >= 1023 && ratio <= 1025 )
 286             return(0);
 287     }
 288     return(value != checkvalue);
 289 }
 290
 291 uint64_t komodo_paxtotal()
 292 {
 293     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;
 294     if ( KOMODO_PASSPORT_INITDONE == 0 ) //KOMODO_PAX == 0 ||
 295         return(0);
 296     if ( komodo_isrealtime(&ht) == 0 )
 297         return(0);
 298     else
 299     {
 300         HASH_ITER(hh,PAX,pax,tmp)
 301         {
 302             if ( pax->marked != 0 )
 303                 continue;
 304             if ( pax->type == 'A' || pax->type == 'D' || pax->type == 'X' )
 305                 str = pax->symbol;
 306             else str = pax->source;
 307             basesp = komodo_stateptrget(str);
 308             if ( basesp != 0 && pax->didstats == 0 )
 309             {
 310                 if ( pax->type == 'I' && (pax2= komodo_paxfind(pax->txid,pax->vout,'D')) != 0 )
 311                 {
 312                     if ( pax2->fiatoshis != 0 )
 313                     {
 314                         pax->komodoshis = pax2->komodoshis;
 315                         pax->fiatoshis = pax2->fiatoshis;
 316                         basesp->issued += pax->fiatoshis;
 317                         pax->didstats = 1;
 318                         if ( strcmp(str,ASSETCHAINS_SYMBOL) == 0 )
 319                             printf("########### %p issued %s += %.8f kmdheight.%d %.8f other.%d\n",basesp,str,dstr(pax->fiatoshis),pax->height,dstr(pax->komodoshis),pax->otherheight);
 320                         pax2->marked = pax->height;
 321                         pax->marked = pax->height;
 322                     }
 323                 }
 324                 else if ( pax->type == 'W' )
 325                 {
 326                     //bitcoin_address(coinaddr,addrtype,rmd160,20);
 327                     if ( (checktoshis= komodo_paxprice(&seed,pax->height,pax->source,(char *)"KMD",(uint64_t)pax->fiatoshis)) != 0 )
 328                     {
 329                         if ( komodo_paxcmp(pax->source,pax->height,pax->komodoshis,checktoshis,seed) != 0 )
 330                         {
 331                             pax->marked = pax->height;
 332                             //printf("WITHDRAW.%s mark <- %d %.8f != %.8f\n",pax->source,pax->height,dstr(checktoshis),dstr(pax->komodoshis));
 333                         }
 334                         else if ( pax->validated == 0 )
 335                         {
 336                             pax->validated = pax->komodoshis = checktoshis;
 337                             //int32_t j; for (j=0; j<32; j++)
 338                             //    printf("%02x",((uint8_t *)&pax->txid)[j]);
 339                             //if ( strcmp(str,ASSETCHAINS_SYMBOL) == 0 )
 340                             //    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));
 341                         }
 342                     }
 343                 }
 344             }
 345         }
 346     }
 347     komodo_stateptr(symbol,dest);
 348     HASH_ITER(hh,PAX,pax,tmp)
 349     {
 350         pax->ready = 0;
 351         if ( 0 && pax->type == 'A' )
 352             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);
 353         if ( pax->marked != 0 )
 354             continue;
 355         if ( strcmp(symbol,pax->symbol) == 0 || pax->type == 'A' )
 356         {
 357             if ( pax->marked == 0 )
 358             {
 359                 if ( komodo_is_issuer() != 0 )
 360                 {
 361                     if ( pax->validated != 0 && pax->type == 'D' )
 362                     {
 363                         total += pax->fiatoshis;
 364                         pax->ready = 1;
 365                     }
 366                 }
 367                 else if ( pax->approved != 0 && pax->type == 'A' )
 368                 {
 369                     if ( pax->validated != 0 )
 370                     {
 371                         total += pax->komodoshis;
 372                         pax->ready = 1;
 373                     }
 374                     else
 375                     {
 376                         seed = 0;
 377                         checktoshis = komodo_paxprice(&seed,pax->height,pax->source,(char *)"KMD",(uint64_t)pax->fiatoshis);
 378                         //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);
 379                         //printf(" v%d %.8f k.%d ht.%d\n",pax->vout,dstr(pax->komodoshis),pax->height,pax->otherheight);
 380                         if ( seed != 0 && checktoshis != 0 )
 381                         {
 382                             if ( checktoshis == pax->komodoshis )
 383                             {
 384                                 total += pax->komodoshis;
 385                                 pax->validated = pax->komodoshis;
 386                                 pax->ready = 1;
 387                             } else pax->marked = pax->height;
 388                         }
 389                     }
 390                 }
 391                 if ( 0 && pax->ready != 0 )
 392                     printf("%p (%c) pax.%s marked.%d %.8f -> %.8f validated.%d approved.%d ready.%d ht.%d\n",pax,pax->type,pax->symbol,pax->marked,dstr(pax->komodoshis),dstr(pax->fiatoshis),pax->validated != 0,pax->approved != 0,pax->ready,pax->height);
 393             }
 394         }
 395     }
 396     //printf("paxtotal %.8f\n",dstr(total));
 397     return(total);
 398 }
 399
 400 static int _paxorder(const void *a,const void *b)
 401 {
 402 #define pax_a (*(struct pax_transaction **)a)
 403 #define pax_b (*(struct pax_transaction **)b)
 404     uint64_t aval,bval;
 405     aval = pax_a->fiatoshis + pax_a->komodoshis + pax_a->height;
 406     bval = pax_b->fiatoshis + pax_b->komodoshis + pax_b->height;
 407         if ( bval > aval )
 408                 return(-1);
 409         else if ( bval < aval )
 410                 return(1);
 411         return(0);
 412 #undef pax_a
 413 #undef pax_b
 414 }
 415
 416 int32_t komodo_pending_withdraws(char *opretstr) // todo: enforce deterministic order
 417 {
 418     struct pax_transaction *pax,*pax2,*tmp,*paxes[64]; uint8_t opretbuf[16384]; int32_t i,n,ht,len=0; uint64_t total = 0;
 419     if ( KOMODO_PAX == 0 || KOMODO_PASSPORT_INITDONE == 0 )
 420         return(0);
 421     if ( komodo_isrealtime(&ht) == 0 || ASSETCHAINS_SYMBOL[0] != 0 )
 422         return(0);
 423     n = 0;
 424     HASH_ITER(hh,PAX,pax,tmp)
 425     {
 426         if ( pax->type == 'W' )
 427         {
 428             if ( (pax2= komodo_paxfind(pax->txid,pax->vout,'A')) != 0 )
 429             {
 430                 if ( pax2->approved != 0 )
 431                     pax->approved = pax2->approved;
 432             }
 433             else if ( (pax2= komodo_paxfind(pax->txid,pax->vout,'X')) != 0 )
 434                 pax->approved = pax->height;
 435             //printf("pending_withdraw: pax %s marked.%u approved.%u validated.%llu\n",pax->symbol,pax->marked,pax->approved,(long long)pax->validated);
 436             if ( pax->marked == 0 && pax->approved == 0 && pax->validated != 0 ) //strcmp((char *)"KMD",pax->symbol) == 0 &&
 437             {
 438                 if ( n < sizeof(paxes)/sizeof(*paxes) )
 439                 {
 440                     paxes[n++] = pax;
 441                     //int32_t j; for (j=0; j<32; j++)
 442                     //    printf("%02x",((uint8_t *)&pax->txid)[j]);
 443                     //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));
 444                 }
 445             }
 446         }
 447     }
 448     opretstr[0] = 0;
 449     if ( n > 0 )
 450     {
 451         opretbuf[len++] = 'A';
 452         qsort(paxes,n,sizeof(*paxes),_paxorder);
 453         for (i=0; i<n; i++)
 454         {
 455             if ( len < (sizeof(opretbuf)>>3)*7 )
 456                 len += komodo_rwapproval(1,&opretbuf[len],paxes[i]);
 457         }
 458         if ( len > 0 )
 459             init_hexbytes_noT(opretstr,opretbuf,len);
 460     }
 461     //fprintf(stderr,"komodo_pending_withdraws len.%d PAXTOTAL %.8f\n",len,dstr(komodo_paxtotal()));
 462     return(len);
 463 }
 464
 465 int32_t komodo_gateway_deposits(CMutableTransaction *txNew,char *base,int32_t tokomodo)
 466 {
 467     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,sum = 0;
 468     if ( KOMODO_PASSPORT_INITDONE == 0 )//KOMODO_PAX == 0 ||
 469         return(0);
 470     struct komodo_state *kmdsp = komodo_stateptrget((char *)"KMD");
 471     sp = komodo_stateptr(symbol,dest);
 472     strcpy(symbol,base);
 473     if ( ASSETCHAINS_SYMBOL[0] != 0 && komodo_baseid(ASSETCHAINS_SYMBOL) < 0 )
 474         return(0);
 475     PENDING_KOMODO_TX = 0;
 476     for (i=0; i<3; i++)
 477     {
 478         if ( komodo_isrealtime(&ht) != 0 )
 479             break;
 480         sleep(1);
 481     }
 482     if ( i == 3 )
 483     {
 484         if ( tokomodo == 0 )
 485             printf("%s not realtime ht.%d\n",ASSETCHAINS_SYMBOL,ht);
 486         return(0);
 487     }
 488     if ( tokomodo == 0 )
 489     {
 490         opcode = 'I';
 491     }
 492     else
 493     {
 494         opcode = 'X';
 495         if ( 1 || komodo_paxtotal() == 0 )
 496             return(0);
 497     }
 498     HASH_ITER(hh,PAX,pax,tmp)
 499     {
 500         if ( pax->type != 'D' && pax->type != 'A' )
 501             continue;
 502         {
 503 #ifdef KOMODO_ASSETCHAINS_WAITNOTARIZE
 504             if ( pax->height > 236000 )
 505             {
 506                 if ( kmdsp != 0 && kmdsp->NOTARIZED_HEIGHT >= pax->height )
 507                     pax->validated = pax->komodoshis;
 508                 else if ( kmdsp->CURRENT_HEIGHT > pax->height+30 )
 509                     pax->validated = pax->ready = 0;
 510             }
 511             else
 512             {
 513                 if ( kmdsp != 0 && (kmdsp->NOTARIZED_HEIGHT >= pax->height || kmdsp->CURRENT_HEIGHT > pax->height+30) ) // assumes same chain as notarize
 514                     pax->validated = pax->komodoshis;
 515                 else pax->validated = pax->ready = 0;
 516             }
 517 #else
 518             pax->validated = pax->komodoshis;
 519 #endif
 520         }
 521         if ( ASSETCHAINS_SYMBOL[0] != 0 && (pax_fiatstatus(&available,&deposited,&issued,&withdrawn,&approved,&redeemed,symbol) != 0 || available < pax->fiatoshis) )
 522         {
 523             //if ( pax->height > 214700 || strcmp(ASSETCHAINS_SYMBOL,symbol) == 0 )
 524             //    printf("miner.[%s]: skip %s %.8f when avail %.8f deposited %.8f, issued %.8f withdrawn %.8f approved %.8f redeemed %.8f\n",ASSETCHAINS_SYMBOL,symbol,dstr(pax->fiatoshis),dstr(available),dstr(deposited),dstr(issued),dstr(withdrawn),dstr(approved),dstr(redeemed));
 525             continue;
 526         }
 527         /*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);
 528         if ( pax->marked != 0 || (pax->type != 'D' && pax->type != 'A') || pax->ready == 0 )
 529         {
 530             printf("reject 2\n");
 531             continue;
 532         }*/
 533         if ( ASSETCHAINS_SYMBOL[0] != 0 && (strcmp(pax->symbol,symbol) != 0 || pax->validated == 0 || pax->ready == 0) )
 534         {
 535             if ( strcmp(pax->symbol,ASSETCHAINS_SYMBOL) == 0 )
 536                 printf("pax->symbol.%s != %s or null pax->validated %.8f ready.%d ht.(%d %d)\n",pax->symbol,symbol,dstr(pax->validated),pax->ready,kmdsp->CURRENT_HEIGHT,pax->height);
 537             pax->marked = pax->height;
 538             continue;
 539         }
 540         if ( pax->ready == 0 )
 541             continue;
 542         if ( pax->type == 'A' && ASSETCHAINS_SYMBOL[0] == 0 )
 543         {
 544             if ( kmdsp != 0 )
 545             {
 546                 if ( (baseid= komodo_baseid(pax->symbol)) < 0 || ((1LL << baseid) & sp->RTmask) == 0 )
 547                 {
 548                     printf("not RT for (%s) %llx baseid.%d %llx\n",pax->symbol,(long long)sp->RTmask,baseid,(long long)(1LL<<baseid));
 549                     continue;
 550                 }
 551             } else continue;
 552         }
 553
 554         //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);
 555         if ( 0 && ASSETCHAINS_SYMBOL[0] != 0 )
 556             printf("pax.%s marked.%d %.8f -> %.8f\n",ASSETCHAINS_SYMBOL,pax->marked,dstr(pax->komodoshis),dstr(pax->fiatoshis));
 557         if ( opcode == 'I' )
 558         {
 559             sum += pax->fiatoshis;
 560             if ( sum > available )
 561                 break;
 562         }
 563         txNew->vout.resize(numvouts+1);
 564         txNew->vout[numvouts].nValue = (opcode == 'I') ? pax->fiatoshis : pax->komodoshis;
 565         txNew->vout[numvouts].scriptPubKey.resize(25);
 566         script = (uint8_t *)&txNew->vout[numvouts].scriptPubKey[0];
 567         *script++ = 0x76;
 568         *script++ = 0xa9;
 569         *script++ = 20;
 570         memcpy(script,pax->rmd160,20), script += 20;
 571         *script++ = 0x88;
 572         *script++ = 0xac;
 573         if ( tokomodo == 0 )
 574         {
 575             for (i=0; i<32; i++)
 576                 data[len++] = ((uint8_t *)&pax->txid)[i];
 577             data[len++] = pax->vout & 0xff;
 578             data[len++] = (pax->vout >> 8) & 0xff;
 579             PENDING_KOMODO_TX += pax->fiatoshis;
 580         }
 581         else
 582         {
 583             len += komodo_rwapproval(1,&data[len],pax);
 584             PENDING_KOMODO_TX += pax->komodoshis;
 585             printf(" len.%d vout.%u DEPOSIT %.8f <- pax.%s pending ht %d %d %.8f | ",len,pax->vout,(double)txNew->vout[numvouts].nValue/COIN,symbol,pax->height,pax->otherheight,dstr(PENDING_KOMODO_TX));
 586         }
 587         if ( numvouts++ >= 64 || sum > COIN )
 588             break;
 589     }
 590     if ( numvouts > 1 )
 591     {
 592         if ( tokomodo != 0 )
 593             strcpy(symbol,(char *)"KMD");
 594         for (i=0; symbol[i]!=0; i++)
 595             data[len++] = symbol[i];
 596         data[len++] = 0;
 597         for (i=0; i<len; i++)
 598             printf("%02x",data[i]);
 599         printf(" <- data[%d]\n",len);
 600         opretlen = komodo_opreturnscript(opret,opcode,data,len);
 601         txNew->vout.resize(numvouts+1);
 602         txNew->vout[numvouts].nValue = 0;
 603         txNew->vout[numvouts].scriptPubKey.resize(opretlen);
 604         script = (uint8_t *)&txNew->vout[numvouts].scriptPubKey[0];
 605         memcpy(script,opret,opretlen);
 606         for (i=0; i<8; i++)
 607             printf("%02x",opret[i]);
 608         printf(" <- opret, MINER deposits.%d (%s) vouts.%d %.8f opretlen.%d\n",tokomodo,ASSETCHAINS_SYMBOL,numvouts,dstr(PENDING_KOMODO_TX),opretlen);
 609         return(1);
 610     }
 611     return(0);
 612 }
 613
 614 const char *banned_txids[] =
 615 {
 616     "78cb4e21245c26b015b888b14c4f5096e18137d2741a6de9734d62b07014dfca", //233559
 617     "00697be658e05561febdee1aafe368b821ca33fbb89b7027365e3d77b5dfede5", //234172
 618     "e909465788b32047c472d73e882d79a92b0d550f90be008f76e1edaee6d742ea", //234187
 619     "f56c6873748a327d0b92b8108f8ec8505a2843a541b1926022883678fb24f9dc", //234188
 620     "abf08be07d8f5b3a433ddcca7ef539e79a3571632efd6d0294ec0492442a0204", //234213
 621     "3b854b996cc982fba8c06e76cf507ae7eed52ab92663f4c0d7d10b3ed879c3b0", //234367
 622     "fa9e474c2cda3cb4127881a40eb3f682feaba3f3328307d518589024a6032cc4", //234635
 623     "ca746fa13e0113c4c0969937ea2c66de036d20274efad4ce114f6b699f1bc0f3", //234662
 624     "43ce88438de4973f21b1388ffe66e68fda592da38c6ef939be10bb1b86387041", //234697
 625     "0aeb748de82f209cd5ff7d3a06f65543904c4c17387c9d87c65fd44b14ad8f8c", //234899
 626     "bbd3a3d9b14730991e1066bd7c626ca270acac4127131afe25f877a5a886eb25", //235252
 627     "fa9943525f2e6c32cbc243294b08187e314d83a2870830180380c3c12a9fd33c", //235253
 628     "a01671c8775328a41304e31a6693bbd35e9acbab28ab117f729eaba9cb769461", //235265
 629     "2ef49d2d27946ad7c5d5e4ab5c089696762ff04e855f8ab48e83bdf0cc68726d", //235295
 630     "c85dcffb16d5a45bd239021ad33443414d60224760f11d535ae2063e5709efee", //235296
 631     // all vouts banned
 632     "c4ea1462c207547cd6fb6a4155ca6d042b22170d29801a465db5c09fec55b19d", //246748
 633     "305dc96d8bc23a69d3db955e03a6a87c1832673470c32fe25473a46cc473c7d1", //247204
 634 };
 635
 636 int32_t komodo_bannedset(int32_t *indallvoutsp,uint256 *array,int32_t max)
 637 {
 638     int32_t i;
 639     if ( sizeof(banned_txids)/sizeof(*banned_txids) > max )
 640     {
 641         fprintf(stderr,"komodo_bannedset: buffer too small %ld vs %d\n",sizeof(banned_txids)/sizeof(*banned_txids),max);
 642         exit(-1);
 643     }
 644     for (i=0; i<sizeof(banned_txids)/sizeof(*banned_txids); i++)
 645         array[i] = uint256S(banned_txids[i]);
 646     *indallvoutsp = i-2;
 647     return(i);
 648 }
 649
 650 void komodo_passport_iteration();
 651
 652 int32_t komodo_check_deposit(int32_t height,const CBlock& block) // verify above block is valid pax pricing
 653 {
 654     static uint256 array[64]; static int32_t numbanned,indallvouts;
 655     int32_t i,j,k,n,ht,baseid,txn_count,activation,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 total,available,deposited,issued,withdrawn,approved,redeemed,checktoshis,seed; int64_t values[64],srcvalues[64]; struct pax_transaction *pax; struct komodo_state *sp;
 656     activation = 235300;
 657     if ( *(int32_t *)&array[0] == 0 )
 658         numbanned = komodo_bannedset(&indallvouts,array,(int32_t)(sizeof(array)/sizeof(*array)));
 659     memset(baseids,0xff,sizeof(baseids));
 660     memset(values,0,sizeof(values));
 661     memset(srcvalues,0,sizeof(srcvalues));
 662     memset(rmd160s,0,sizeof(rmd160s));
 663     memset(kmdheights,0,sizeof(kmdheights));
 664     memset(otherheights,0,sizeof(otherheights));
 665     txn_count = block.vtx.size();
 666     if ( ASSETCHAINS_SYMBOL[0] == 0 )
 667     {
 668         for (i=0; i<txn_count; i++)
 669         {
 670             n = block.vtx[i].vin.size();
 671             for (j=0; j<n; j++)
 672             {
 673                 for (k=0; k<numbanned; k++)
 674                 {
 675                     if ( block.vtx[i].vin[j].prevout.hash == array[k] && (block.vtx[i].vin[j].prevout.n == 1 || k >= indallvouts)  )
 676                     {
 677                         printf("banned tx.%d being used at ht.%d txi.%d vini.%d\n",k,height,i,j);
 678                         return(-1);
 679                     }
 680                 }
 681             }
 682         }
 683     }
 684     n = block.vtx[0].vout.size();
 685     script = (uint8_t *)block.vtx[0].vout[n-1].scriptPubKey.data();
 686     if ( n <= 2 || script[0] != 0x6a )
 687     {
 688         int64_t val,prevtotal = 0; int32_t overflow = 0;
 689         total = 0;
 690         for (i=1; i<n; i++)
 691         {
 692             if ( (val= block.vtx[0].vout[i].nValue) < 0 || val >= MAX_MONEY )
 693             {
 694                 overflow = 1;
 695                 break;
 696             }
 697             total += val;
 698             if ( total < prevtotal || (val != 0 && total == prevtotal) )
 699             {
 700                 overflow = 1;
 701                 break;
 702             }
 703             prevtotal = total;
 704         }
 705         if ( ASSETCHAINS_SYMBOL[0] == 0 )
 706         {
 707             if ( overflow != 0 || total > COIN/10 )
 708             {
 709                 //fprintf(stderr,">>>>>>>> <<<<<<<<<< ht.%d illegal nonz output %.8f n.%d\n",height,dstr(block.vtx[0].vout[1].nValue),n);
 710                 if ( height >= activation )
 711                     return(-1);
 712             }
 713         }
 714         else
 715         {
 716             if ( overflow != 0 || total > 0 )
 717                 return(-1);
 718         }
 719         return(0);
 720     }
 721     //fprintf(stderr,"ht.%d n.%d nValue %.8f (%d %d %d)\n",height,n,dstr(block.vtx[0].vout[1].nValue),KOMODO_PAX,komodo_isrealtime(&ht),KOMODO_PASSPORT_INITDONE);
 722     offset += komodo_scriptitemlen(&opretlen,&script[offset]);
 723     //printf("offset.%d opretlen.%d [%02x %02x %02x %02x]\n",offset,opretlen,script[0],script[1],script[2],script[3]);
 724     if ( ASSETCHAINS_SYMBOL[0] == 0 )
 725     {
 726         opcode = 'X';
 727         if ( height >= 235300 )
 728             return(-1);
 729         strcpy(symbol,(char *)"KMD");
 730         if ( komodo_isrealtime(&ht) == 0 || KOMODO_PASSPORT_INITDONE == 0 ) // init time already in DB
 731             return(0);
 732     }
 733     else
 734     {
 735         strcpy(symbol,ASSETCHAINS_SYMBOL);
 736         opcode = 'I';
 737         if ( (baseid= komodo_baseid(symbol)) < 0 )
 738         {
 739             if ( block.vtx[0].vout.size() != 1 )
 740             {
 741                 printf("%s has more than one coinbase?\n",symbol);
 742                 return(-1);
 743             }
 744             return(0);
 745         }
 746         while ( KOMODO_PASSPORT_INITDONE == 0 )
 747             komodo_passport_iteration();
 748         komodo_passport_iteration();
 749         // grandfathering preexisting
 750         if ( height < 777 )
 751             return(0);
 752         if ( baseid == USD ) // 6820 in balance calcs
 753         {
 754             if ( height <= 6821 || height <= 2000 || height == 2968 || height == 2960 || height == 2649 || height == 3275 || height == 3282 || height == 3328 || height == 3468 )
 755             return(0);
 756         }
 757         else if ( baseid == EUR )
 758         {
 759             if ( height < 1200 || height == 1408 || height == 1111 || height == 1094 || height == 1092 || height == 1080 || height == 1053 || height == 1005 || height == 822 || height == 821 || height == 810 || height == 797 || height == 790 || height == 787 || height == 785 || height == 1313 || height == 1288 || height == 1263 || height == 1262 || height <= 211 || height == 210 || height == 188 || height == 185 || height == 182 || height == 181 || height == 171 || height == 170 || height == 169 || height == 168 || height == 167 || height == 166 || height == 165 || height == 164 || height == 163 || height == 162 )
 760                 return(0);
 761         }
 762         else if ( baseid == JPY )
 763         {
 764             if ( height == 1038 || height == 1039 || height == 1040 || height == 1041 || height == 1014 || height == 998 || height == 973 || height == 139 || height == 971 || height == 141 || height == 816 || height == 814 || height == 803 || height == 142 || height == 782 || height == 145 || height == 181 || height == 186 || height == 192 || height == 190 || height == 189 || height == 255 || height == 218 || height == 233 || height == 259 || height == 278 || height == 361 || height == 367 || height == 733 || height == 688 || height == 468 )
 765                 return(0);
 766         }
 767         else if ( baseid == GBP )
 768         {
 769             if ( height == 1025 || height == 1026 || height == 1027 || height == 1028 || height == 997 || height == 970 || height == 953 || height == 951 || height == 803 || height == 800 || height == 786 || height == 123 || height == 771 || height == 137 || height == 139 || height == 140 || height == 146 || height == 194 || height == 200 || height == 202 || height == 203 || height == 205 || height == 210 || height == 216 || height == 271 || height == 233 || height == 294 )
 770                 return(0);
 771         }
 772         else if ( baseid == AUD )
 773         {
 774             if ( height == 1012 || height == 1013 || height == 1014 || height == 985 || height == 958 || height == 936 || height == 933 || height == 790 || height == 788 || height == 778 || height == 124 || height == 777 || height == 122 || height == 140 || height == 142 || height == 143 || height == 186 || height == 196 || height == 198 || height == 201 || height == 210 || height == 192 )
 775                 return(0);
 776         }
 777         else if ( baseid == CAD )
 778         {
 779             if ( height < 1000 || height == 836 || height == 781 || height == 779 || height == 798 || height == 794 || height == 1181 || height == 1179 || height == 1159 || height == 1134 || height == 1132 || height == 121 || height == 970 || height == 119 || height == 299 || height == 302 || height == 303 || height == 306 || height == 308 || height == 355 || height == 362 || height == 367 || height == 363 || height == 364 || height == 380 || height == 373 || height == 390 || height == 437 || height == 777 )
 780                 return(0);
 781         }
 782         else if ( baseid == CHF )
 783         {
 784             if ( height == 987 || height == 988 || height == 989 || height == 960 || height == 931 || height == 914 || height == 122 || height == 912 || height == 141 || height == 780 || height == 145 || height == 777 || height == 151 || height == 775 || height == 765 || height == 195 || height == 764 || height == 737 || height == 194 || height == 193 || height == 198 || height == 207 || height == 216 || height == 227 || height == 256 || height == 260 || height == 276 || height == 289 || height == 292 || height == 349 )
 785                 return(0);
 786         }
 787         else if ( baseid == NZD )
 788         {
 789             if ( height < 1000 || height == 787 || height == 786 || height == 784 || height == 785 || height == 777 || height == 1113 || height == 1083 || height == 1067 || height == 265 || height == 1064 || height == 920 || height == 913 || height == 124 || height == 911 || height == 903 || height == 900 || height == 879 || height == 122 || height == 266 || height == 269 || height == 270 || height == 278 || height == 307 || height == 318 || height == 322 || height == 335 || height == 395 || height == 406 || height == 314 )
 790                 return(0);
 791         }
 792         else if ( baseid == CNY )
 793         {
 794             if ( height == 987 || height == 988 || height == 989 || height == 982 || height == 957 || height == 931 || height == 119 || height == 929 || height == 134 || height == 782 || height == 137 || height == 775 || height == 143 || height == 772 || height == 186 || height == 763 || height == 761 || height == 734 || height == 183 || height == 190 || height == 192 || height == 211 || height == 203 || height == 226 || height == 263 || height == 264 || height == 277 || height == 342 || height == 613 || height == 525 )
 795                 return(0);
 796         }
 797         else if ( baseid == RUB )
 798         {
 799             if ( height == 819 || height == 812 || height == 810 || height == 802 || height == 801 || height == 1074 || height == 1040 || height == 1014 || height == 163 || height == 1013 || height == 877 || height == 867 || height == 863 || height == 834 || height == 158 || height == 126 || height == 106 || height == 105 || height == 174 || height == 175 || height == 176 || height == 177 || height == 181 || height == 183 || height == 184 || height == 187 )
 800                 return(0);
 801         }
 802         else if ( baseid == MXN )
 803         {
 804             if ( height == 1079 || height == 1080 || height == 1081 || height == 1069 || height == 1048 || height == 1028 || height == 121 || height == 1027 || height == 146 || height == 894 || height == 891 || height == 148 || height == 882 || height == 879 || height == 151 || height == 856 || height == 158 || height == 822 || height == 197 || height == 203 || height == 207 || height == 209 || height == 213 || height == 217 || height == 218 || height == 226 || height == 283 || height == 302 || height == 319 || height == 318 || height == 569 )
 805                 return(0);
 806         }
 807         else if ( baseid == BRL )
 808         {
 809             if ( height == 1003 || height == 1004 || height == 1005 || height == 972 || height == 943 || height == 922 || height == 118 || height == 920 || height == 145 || height == 787 || height == 783 || height == 147 || height == 781 || height == 774 || height == 148 || height == 771 || height == 154 || height == 751 || height == 156 || height == 188 || height == 193 || height == 195 || height == 199 || height == 203 || height == 225 || height == 230 || height == 262 || height == 266 || height == 284 || height == 300 || height == 640 )
 810                 return(0);
 811         }
 812         else if ( baseid == INR )
 813         {
 814             if ( height == 998 || height == 999 || height == 1000 || height == 788 || height == 786 || height == 775 || height == 753 || height == 125 || height == 153 || height == 155 || height == 159 || height == 204 || height == 206 || height == 211 || height == 217 || height == 220 || height == 229 || height == 265 || height == 292 || height == 300 )
 815                 return(0);
 816         }
 817         else if ( baseid == PLN )
 818         {
 819             if ( height == 1029 || height == 1030 || height == 1031 || height == 1009 || height == 984 || height == 960 || height == 959 || height == 798 || height == 794 || height == 792 || height == 782 || height == 775 || height == 755 || height == 122 || height == 120 || height == 158 || height == 160 || height == 163 || height == 225 || height == 217 || height == 219 || height == 229 || height == 234 || height == 286 || height == 231 || height == 292 )
 820                 return(0);
 821         }
 822         else if ( baseid == HKD )
 823         {
 824             if ( height == 1013 || height == 1014 || height == 1015 || height == 1002 || height == 979 || height == 947 || height == 123 || height == 946 || height == 153 || height == 811 || height == 808 || height == 806 || height == 155 || height == 795 || height == 157 || height == 773 || height == 205 || height == 208 || height == 210 || height == 211 || height == 215 || height == 221 || height == 231 || height == 255 || height == 273 || height == 293 || height == 310 || height == 654 )
 825                 return(0);
 826         }
 827         else if ( baseid == TRY )
 828         {
 829             if ( height == 1022 || height == 1023 || height == 1051 || height == 991 || height == 974 || height == 949 || height == 141 || height == 948 || height == 783 || height == 153 || height == 781 || height == 779 || height == 776 || height == 768 || height == 765 || height == 121 || height == 142 || height == 144 || height == 143 || height == 149 || height == 204 || height == 210 || height == 216 || height == 229 || height == 280 || height == 145 )
 830                 return(0);
 831         }
 832         else if ( baseid == NOK )
 833         {
 834             if ( height == 987 || height == 988 || height == 989 || height == 962 || height == 911 || height == 907 || height == 125 || height == 765 || height == 150 || height == 762 || height == 760 || height == 753 || height == 152 || height == 751 || height == 151 || height == 154 || height == 160 || height == 195 || height == 203 || height == 207 || height == 211 || height == 220 || height == 236 || height == 253 || height == 278 || height == 283 )
 835                 return(0);
 836         }
 837         else if ( baseid == ZAR )
 838         {
 839             if ( height == 979 || height == 980 || height == 981 || height == 956 || height == 937 || height == 906 || height == 905 || height == 122 || height == 756 || height == 754 || height == 752 || height == 749 || height == 742 || height == 739 || height == 120 || height == 151 || height == 153 || height == 157 || height == 159 || height == 206 || height == 213 || height == 216 || height == 222 || height == 277 || height == 287 || height == 215 )
 840                 return(0);
 841         }
 842         else if ( baseid == SEK )
 843         {
 844             if ( height == 960 || height == 961 || height == 962 || height == 943 || height == 925 || height == 896 || height == 147 || height == 894 || height == 759 || height == 751 || height == 749 || height == 742 || height == 740 || height == 716 || height == 123 || height == 148 || height == 150 || height == 151 || height == 157 || height == 199 || height == 200 || height == 201 || height == 206 || height == 256 || height == 257 || height == 268 )
 845                 return(0);
 846         }
 847         else if ( baseid == CZK )
 848         {
 849             if ( height == 1084 || height == 1085 || height == 1086 || height == 778 || height == 1079 || height == 1054 || height == 1032 || height == 121 || height == 1030 || height == 182 || height == 876 || height == 873 || height == 871 || height == 184 || height == 862 || height == 185 || height == 861 || height == 186 || height == 838 || height == 238 || height == 242 || height == 246 || height == 248 || height == 250 || height == 251 || height == 256 || height == 282 || height == 322 || height == 343 || height == 433 || height == 323 || height == 276 )
 850                 return(0);
 851         }
 852         else if ( baseid == HUF )
 853         {
 854             if ( height < 2200 || height == 1531 || height == 1528 || height == 1530 || height == 1451 || height == 1448 || height == 1442 || height == 1418 || height == 1407 || height == 1406 || height == 1392 || height == 1391 || height == 1387 || height == 1383 || height == 1335 || height == 1337 || height == 1338 || height == 1649 || height == 2378 || height == 2376 || height == 2371 || height == 1330 || height == 2326 || height == 1344 || height == 2305 || height == 2304 || height == 2171 || height == 2168 || height == 2166 || height == 2156 || height == 2135 || height == 1343 || height == 1342 || height == 1341 || height == 1340 || height == 1339 || height == 1336 || height == 1334 || height == 1333 || height == 1346 || height == 1400 || height == 1525 || height == 1509 )
 855                 return(0);
 856         }
 857         else if ( baseid == DKK )
 858         {
 859             if ( height == 1241 || height == 945 || height == 898 || height == 894 || height == 892 || height == 866 || height == 857 || height == 853 || height == 834 || height == 812 || height == 792 || height == 784 || height == 778 || height == 783 || height == 1214 || height == 1186 || height == 1158 || height == 126 || height == 1156 || height == 329 || height == 1021 || height == 1016 || height == 1014 || height == 333 || height == 1003 || height == 1002 || height == 978 || height == 332 || height == 337 || height == 381 || height == 390 || height == 386 || height == 401 || height == 389 || height == 396 || height == 428 || height == 473 || height == 490 || height == 493 )
 860                 return(0);
 861         }
 862         else if ( baseid == ILS )
 863         {
 864             if ( height == 1017 || height == 1018 || height == 1019 || height == 1010 || height == 985 || height == 954 || height == 120 || height == 952 || height == 143 || height == 819 || height == 817 || height == 808 || height == 145 || height == 786 || height == 155 || height == 753 || height == 151 || height == 149 || height == 199 || height == 193 || height == 201 || height == 209 || height == 284 || height == 305 || height == 676 || height == 702 || height == 406 )
 865                 return(0);
 866         }
 867         else if ( baseid == MYR )
 868         {
 869             if ( height == 1020 || height == 1021 || height == 1022 || height == 1015 || height == 984 || height == 950 || height == 949 || height == 823 || height == 820 || height == 818 || height == 812 || height == 809 || height == 126 || height == 789 || height == 144 || height == 746 || height == 146 || height == 147 || height == 148 || height == 150 || height == 205 || height == 210 || height == 215 || height == 219 || height == 222 || height == 290 || height == 242 || height == 312 )
 870                 return(0);
 871         }
 872         else if ( baseid == PHP )
 873         {
 874             if ( height == 859 || height == 817 || height == 812 || height == 811 || height == 792 || height == 779 || height == 778 || height == 781 || height == 1154 || height == 1114 || height == 1077 || height == 1076 || height == 931 || height == 927 || height == 925 || height == 918 || height == 891 || height == 127 || height == 125 || height == 272 || height == 275 || height == 276 || height == 278 || height == 328 || height == 330 || height == 335 || height == 344 || height == 315 )
 875                 return(0);
 876         }
 877         else if ( baseid == KRW )
 878         {
 879             if ( height == 1021 || height == 1022 || height == 1023 || height == 1010 || height == 950 || height == 916 || height == 138 || height == 914 || height == 140 || height == 785 || height == 782 || height == 781 || height == 142 || height == 775 || height == 148 || height == 772 || height == 751 || height == 147 || height == 146 || height == 159 || height == 175 || height == 181 || height == 184 || height == 186 || height == 188 || height == 196 || height == 209 || height == 238 )
 880                 return(0);
 881         }
 882         else if ( baseid == RON )
 883         {
 884             if ( height == 1008 || height == 1009 || height == 1010 || height == 1003 || height == 973 || height == 940 || height == 939 || height == 806 || height == 802 || height == 800 || height == 793 || height == 789 || height == 768 || height == 123 || height == 141 || height == 143 || height == 144 || height == 150 || height == 197 || height == 200 || height == 202 || height == 217 || height == 240 || height == 276 )
 885                 return(0);
 886         }
 887         else if ( baseid == SGD )
 888         {
 889             if ( height == 1016 || height == 1017 || height == 1018 || height == 1010 || height == 984 || height == 951 || height == 950 || height == 801 || height == 798 || height == 792 || height == 788 || height == 122 || height == 769 || height == 120 || height == 158 || height == 160 || height == 164 || height == 169 || height == 229 || height == 234 || height == 246 || height == 297 || height == 299 || height == 316 || height == 233 )
 890                 return(0);
 891         }
 892         else if ( baseid == THB )
 893         {
 894             if ( height == 977 || height == 978 || height == 968 || height == 933 || height == 898 || height == 897 || height == 788 || height == 786 || height == 779 || height == 777 || height == 757 || height == 119 || height == 140 || height == 142 || height == 146 || height == 152 || height == 196 || height == 200 || height == 214 || height == 260 || height == 263 )
 895                 return(0);
 896         }
 897         else if ( baseid == BGN )
 898         {
 899             if ( height == 1044 || height == 1045 || height == 1046 || height == 1030 || height == 995 || height == 960 || height == 959 || height == 830 || height == 822 || height == 819 || height == 810 || height == 809 || height == 781 || height == 124 || height == 122 || height == 189 || height == 193 || height == 200 || height == 194 || height == 250 || height == 256 || height == 260 || height == 280 )
 900                 return(0);
 901         }
 902         else if ( baseid == HRK )
 903         {
 904             if ( height == 1027 || height == 1028 || height == 1029 || height == 1022 || height == 999 || height == 969 || height == 967 || height == 832 || height == 829 || height == 827 || height == 817 || height == 792 || height == 754 || height == 125 || height == 123 || height == 184 || height == 186 || height == 187 || height == 227 || height == 230 || height == 235 || height == 240 || height == 242 || height == 261 || height == 336 )
 905                 return(0);
 906         }
 907         else if ( baseid == IDR )
 908         {
 909             if ( height == 836 || height == 1036 || height == 837 || height == 720 || height == 715 || height == 714 || height == 696 || height == 695 || height == 694 || height == 693 || height == 119 || height == 689 || height == 120 || height == 669 || height == 123 || height == 662 || height == 122 || height == 634 || height == 121 || height == 609 || height == 124 || height == 174 || height == 603 || height == 595 || height == 166 || height == 176 || height == 589 || height == 172 || height == 587 || height == 179 || height == 239 || height == 175 || height == 245 || height == 260 )
 910                 return(0);
 911         }
 912     }
 913     if ( script[offset] == opcode && opretlen < block.vtx[0].vout[n-1].scriptPubKey.size() )
 914     {
 915         if ( (num= komodo_issued_opreturn(base,txids,vouts,values,srcvalues,kmdheights,otherheights,baseids,rmd160s,&script[offset],opretlen,opcode == 'X')) > 0 )
 916         {
 917             for (i=1; i<n-1; i++)
 918             {
 919                 if ( ASSETCHAINS_SYMBOL[0] != 0 && (sp= komodo_stateptrget(CURRENCIES[baseids[i-1]])) != 0 )
 920                 {
 921                     int32_t rtflag = 0;
 922                     while ( (sp->RTmask & (1LL << baseids[i-1])) == 0 )
 923                     {
 924                         if ( rtflag == 0 )
 925                             printf("[%s] skip checkdeposit.%s not RT %llx\n",ASSETCHAINS_SYMBOL,CURRENCIES[baseids[i-1]],(long long)sp->RTmask);
 926                         sleep(60);
 927                         rtflag = 1;
 928                         //matched++;
 929                         //continue;
 930                     }
 931                     if ( rtflag != 0 )
 932                         printf("[%s] %s reached RT\n",ASSETCHAINS_SYMBOL,CURRENCIES[baseids[i-1]]);
 933                 }
 934                 if ( (pax= komodo_paxfinds(txids[i-1],vouts[i-1])) != 0 ) // finds... make sure right one
 935                 {
 936                     pax->type = opcode;
 937                     if ( opcode == 'I' && (pax_fiatstatus(&available,&deposited,&issued,&withdrawn,&approved,&redeemed,symbol) != 0 || available < pax->fiatoshis) )
 938                     {
 939                         printf("checkdeposit.[%s.%d]: skip %s %.8f when avail %.8f deposited %.8f, issued %.8f withdrawn %.8f approved %.8f redeemed %.8f\n",ASSETCHAINS_SYMBOL,height,symbol,dstr(pax->fiatoshis),dstr(available),dstr(deposited),dstr(issued),dstr(withdrawn),dstr(approved),dstr(redeemed));
 940                         return(-1);
 941                     }
 942                     if ( pax->fiatoshis == block.vtx[0].vout[i].nValue )
 943                     {
 944                         matched++;
 945                         if ( pax->marked != 0 && height >= 80820 )
 946                         {
 947                             printf(">>>>>>>>>>> %c errs.%d i.%d match %.8f vs %.8f paxmarked.%d kht.%d ht.%d [%s].%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,ASSETCHAINS_SYMBOL,height);
 948                         }
 949                         else
 950                         {
 951                         }
 952                         if ( strcmp(ASSETCHAINS_SYMBOL,CURRENCIES[baseids[i-1]]) == 0 )
 953                         {
 954                             //check deposit validates AUD.1047 [3] 0.14585530 -> 0.01000000 (0.14585530 0.01000000 0.01000000)
 955                             char destaddr[64],coinaddr[64]; uint8_t pubkey33[33];
 956                             checktoshis = PAX_fiatdest(&seed,0,destaddr,pubkey33,coinaddr,pax->height,CURRENCIES[baseids[i-1]],pax->fiatoshis);
 957                             //checktoshis = komodo_paxprice(&seed,pax->height,CURRENCIES[baseids[i-1]],(char *)"KMD",(uint64_t)pax->komodoshis);
 958                             if ( komodo_paxcmp(CURRENCIES[baseids[i-1]],pax->height,pax->komodoshis,checktoshis,seed) < 0 )
 959                             {
 960                                 printf("paxcmp FAIL when check deposit validates %s.%d [%d] %.8f -> %.8f (%.8f %.8f %.8f)\n",CURRENCIES[baseids[i-1]],height,i,dstr(srcvalues[i-1]),dstr(values[i-1]),dstr(pax->komodoshis),dstr(pax->fiatoshis),dstr(block.vtx[0].vout[i].nValue));
 961                                 return(-1);
 962                             } //else printf("check deposit validates %s.%d [%d] %.8f -> %.8f (%.8f %.8f %.8f)\n",CURRENCIES[baseids[i-1]],height,i,dstr(srcvalues[i-1]),dstr(values[i-1]),dstr(pax->komodoshis),dstr(pax->fiatoshis),dstr(block.vtx[0].vout[i].nValue));
 963                         }
 964                     }
 965                     else if ( strcmp(ASSETCHAINS_SYMBOL,CURRENCIES[baseids[i-1]]) == 0 )
 966                     {
 967                         for (j=0; j<32; j++)
 968                             printf("%02x",((uint8_t *)&txids[i-1])[j]);
 969                         printf(" cant paxfind %c txid [%d]\n",opcode,height);
 970                         printf(">>>>>>>>>>> %c errs.%d i.%d match %.8f vs %.8f pax.%p [%s] ht.%d\n",opcode,errs,i,dstr(opcode == 'I' ? pax->fiatoshis : pax->komodoshis),dstr(block.vtx[0].vout[i].nValue),pax,ASSETCHAINS_SYMBOL,height);
 971                         return(-1);
 972                     }
 973                 }
 974                 else //if ( kmdheights[i-1] > 0 && otherheights[i-1] > 0 )
 975                 {
 976                     hash = block.GetHash();
 977                     for (j=0; j<n; j++)
 978                         printf("%.8f ",dstr(block.vtx[0].vout[j].nValue));
 979                     printf("vout values\n");
 980                     for (j=0; j<32; j++)
 981                         printf("%02x",((uint8_t *)&txids[i-1])[j]);
 982                     printf(" kht.%d ht.%d %.8f %.8f couldnt find vout.[%d of %d] ht.%d %s for [%s]\n",kmdheights[i-1],otherheights[i-1],dstr(values[i-1]),dstr(srcvalues[i]),i,n,height,ASSETCHAINS_SYMBOL,CURRENCIES[baseids[i-1]]);
 983                     if ( ASSETCHAINS_SYMBOL[0] != 0 || height >= activation )
 984                         return(-1);
 985                 }
 986             }
 987             if ( ASSETCHAINS_SYMBOL[0] == 0 )
 988             {
 989                 /*if ( height > 0 && (height < chainActive.Tip()->nHeight || (height >= chainActive.Tip()->nHeight && komodo_isrealtime(&ht) != 0)) && matched != num )
 990                 {
 991                     printf("WOULD REJECT %s: ht.%d (%c) matched.%d vs num.%d tip.%d isRT.%d\n",symbol,height,opcode,matched,num,(int32_t)chainActive.Tip()->nHeight,komodo_isrealtime(&ht));
 992                     // can easily happen depending on order of loading
 993                     if ( height > 200000 )
 994                     {
 995                         printf("REJECT: ht.%d (%c) matched.%d vs num.%d\n",height,opcode,matched,num);
 996                         return(-1);
 997                     }
 998                 }*/ // disabled 'X' path
 999             }
1000             else
1001             {
1002                 if ( height > 0 && (height < chainActive.Tip()->nHeight || (height >= chainActive.Tip()->nHeight && komodo_isrealtime(&ht) != 0)) && matched != num )
1003                 {
1004                     printf("REJECT %s: ht.%d (%c) matched.%d vs num.%d tip.%d isRT.%d\n",symbol,height,opcode,matched,num,(int32_t)chainActive.Tip()->nHeight,komodo_isrealtime(&ht));
1005                     return(-1);
1006                 }
1007             }
1008         }
1009         else
1010         {
1011             for (i=0; i<n; i++)
1012                 printf("%.8f ",dstr(block.vtx[0].vout[i].nValue));
1013             printf("no opreturn entries to check ht.%d %s\n",height,ASSETCHAINS_SYMBOL);
1014             if ( ASSETCHAINS_SYMBOL[0] != 0 || height >= activation )
1015                 return(-1);
1016         }
1017         //printf("opretlen.%d num.%d\n",opretlen,num);
1018     }
1019     else
1020     {
1021         for (i=0; i<opretlen&&i<100; i++)
1022             printf("%02x",script[i]);
1023         printf(" height.%d checkdeposit n.%d [%02x] [%c] %d opcode.%d len.%d ",height,n,script[0],script[offset],script[offset],opcode,opretlen);
1024         printf("not proper vout with opreturn format %s ht.%d cmp.%d %d\n",ASSETCHAINS_SYMBOL,height,script[offset] == opcode,(int32_t)block.vtx[0].vout[n-1].scriptPubKey.size());
1025         return(-1);
1026     }
1027     return(0);
1028 }
1029
1030 const char *komodo_opreturn(int32_t height,uint64_t value,uint8_t *opretbuf,int32_t opretlen,uint256 txid,uint16_t vout,char *source)
1031 {
1032     uint8_t rmd160[20],rmd160s[64*20],addrtype,shortflag,pubkey33[33]; int32_t didstats,i,j,n,kvheight,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 fee,fiatoshis,komodoshis,checktoshis,values[64],srcvalues[64]; struct pax_transaction *pax,*pax2; struct komodo_state *basesp; double diff;
1033     const char *typestr = "unknown";
1034     if ( ASSETCHAINS_SYMBOL[0] != 0 && komodo_baseid(ASSETCHAINS_SYMBOL) < 0 && opretbuf[0] != 'K' )
1035     {
1036         //printf("komodo_opreturn skip %s\n",ASSETCHAINS_SYMBOL);
1037         return("assetchain");
1038     }
1039     //else if ( KOMODO_PAX == 0 )
1040     //    return("nopax");
1041     memset(baseids,0xff,sizeof(baseids));
1042     memset(values,0,sizeof(values));
1043     memset(srcvalues,0,sizeof(srcvalues));
1044     memset(rmd160s,0,sizeof(rmd160s));
1045     memset(kmdheights,0,sizeof(kmdheights));
1046     memset(otherheights,0,sizeof(otherheights));
1047     tokomodo = (komodo_is_issuer() == 0);
1048     if ( opretbuf[0] == 'K' && opretlen != 40 )
1049     {
1050         komodo_kvupdate(opretbuf,opretlen,value);
1051     }
1052     else if ( opretbuf[0] == 'D' )
1053     {
1054         tokomodo = 0;
1055         if ( opretlen == 38 ) // any KMD tx
1056         {
1057             iguana_rwnum(0,&opretbuf[34],sizeof(kmdheight),&kmdheight);
1058             memset(base,0,sizeof(base));
1059             PAX_pubkey(0,&opretbuf[1],&addrtype,rmd160,base,&shortflag,&fiatoshis);
1060             bitcoin_address(coinaddr,addrtype,rmd160,20);
1061             checktoshis = PAX_fiatdest(&seed,tokomodo,destaddr,pubkey33,coinaddr,kmdheight,base,fiatoshis);
1062             typestr = "deposit";
1063             if ( strcmp(base,ASSETCHAINS_SYMBOL) == 0 && (kmdheight > 195000 || kmdheight <= height) )
1064             {
1065                 didstats = 0;
1066                 if ( 0 && kmdheight > 214700 && strcmp(base,ASSETCHAINS_SYMBOL) == 0 )
1067                 {
1068                     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);
1069                     for (i=0; i<32; i++)
1070                         printf("%02x",((uint8_t *)&txid)[i]);
1071                     printf(" <- txid.v%u ",vout);
1072                     for (i=0; i<33; i++)
1073                         printf("%02x",pubkey33[i]);
1074                     printf(" checkpubkey check %.8f v %.8f dest.(%s) kmdheight.%d height.%d\n",dstr(checktoshis),dstr(value),destaddr,kmdheight,height);
1075                 }
1076                 if ( komodo_paxcmp(base,kmdheight,value,checktoshis,kmdheight < 225000 ? seed : 0) == 0 )
1077                 {
1078                     if ( (pax= komodo_paxfind(txid,vout,'D')) == 0 )
1079                     {
1080                         if ( (basesp= komodo_stateptrget(base)) != 0 )
1081                         {
1082                             basesp->deposited += fiatoshis;
1083                             didstats = 1;
1084                             if ( 0 && strcmp(base,ASSETCHAINS_SYMBOL) == 0 )
1085                                 printf("########### %p deposited %s += %.8f kmdheight.%d %.8f\n",basesp,base,dstr(fiatoshis),kmdheight,dstr(value));
1086                         } else printf("cant get stateptr.(%s)\n",base);
1087                         komodo_gateway_deposit(coinaddr,value,base,fiatoshis,rmd160,txid,vout,'D',kmdheight,height,(char *)"KMD",0);
1088                     }
1089                     if ( (pax= komodo_paxfind(txid,vout,'D')) != 0 )
1090                     {
1091                         pax->height = kmdheight;
1092                         pax->validated = value;
1093                         pax->komodoshis = value;
1094                         pax->fiatoshis = fiatoshis;
1095                         if ( didstats == 0 && pax->didstats == 0 )
1096                         {
1097                             if ( (basesp= komodo_stateptrget(base)) != 0 )
1098                             {
1099                                 basesp->deposited += fiatoshis;
1100                                 didstats = 1;
1101                                 if ( 0 && strcmp(base,ASSETCHAINS_SYMBOL) == 0 )
1102                                     printf("########### %p depositedB %s += %.8f/%.8f kmdheight.%d/%d %.8f/%.8f\n",basesp,base,dstr(fiatoshis),dstr(pax->fiatoshis),kmdheight,pax->height,dstr(value),dstr(pax->komodoshis));
1103                             }
1104                         } //
1105                         if ( didstats != 0 )
1106                             pax->didstats = 1;
1107                         if ( (pax2= komodo_paxfind(txid,vout,'I')) != 0 )
1108                         {
1109                             pax2->fiatoshis = pax->fiatoshis;
1110                             pax2->komodoshis = pax->komodoshis;
1111                             pax->marked = pax2->marked = pax->height;
1112                             pax2->height = pax->height = height;
1113                             if ( pax2->didstats == 0 )
1114                             {
1115                                 if ( (basesp= komodo_stateptrget(base)) != 0 )
1116                                 {
1117                                     basesp->issued += pax2->fiatoshis;
1118                                     pax2->didstats = 1;
1119                                     if ( 0 && strcmp(base,"USD") == 0 )
1120                                         printf("########### %p issueda %s += %.8f kmdheight.%d %.8f other.%d [%d]\n",basesp,base,dstr(pax2->fiatoshis),pax2->height,dstr(pax2->komodoshis),pax2->otherheight,height);
1121                                 }
1122                             }
1123                         }
1124                     }
1125                 }
1126                 else
1127                 {
1128                     if ( (pax= komodo_paxfind(txid,vout,'D')) != 0 )
1129                         pax->marked = checktoshis;
1130                     if ( kmdheight > 238000 && (kmdheight > 214700 || strcmp(base,ASSETCHAINS_SYMBOL) == 0) ) //seed != 0 &&
1131                         printf("pax %s deposit %.8f rejected kmdheight.%d %.8f KMD check %.8f seed.%llu\n",base,dstr(fiatoshis),kmdheight,dstr(value),dstr(checktoshis),(long long)seed);
1132                 }
1133             } else if ( strcmp(base,ASSETCHAINS_SYMBOL) == 0 )
1134                 printf("[%s] %s paxdeposit height.%d vs kmdheight.%d\n",ASSETCHAINS_SYMBOL,base,height,kmdheight);
1135         }
1136     }
1137     else if ( opretbuf[0] == 'I' )
1138     {
1139         tokomodo = 0;
1140         if ( strncmp((char *)"KMD",(char *)&opretbuf[opretlen-4],3) != 0 && strncmp(ASSETCHAINS_SYMBOL,(char *)&opretbuf[opretlen-4],3) == 0 )
1141         {
1142             if ( (n= komodo_issued_opreturn(base,txids,vouts,values,srcvalues,kmdheights,otherheights,baseids,rmd160s,opretbuf,opretlen,0)) > 0 )
1143             {
1144                 for (i=0; i<n; i++)
1145                 {
1146                     if ( baseids[i] < 0 )
1147                     {
1148                         printf("%d of %d illegal baseid.%d\n",i,n,baseids[i]);
1149                         continue;
1150                     }
1151                     bitcoin_address(coinaddr,60,&rmd160s[i*20],20);
1152                     komodo_gateway_deposit(coinaddr,0,ASSETCHAINS_SYMBOL,0,0,txids[i],vouts[i],'I',height,0,CURRENCIES[baseids[i]],0);
1153                     komodo_paxmark(height,txids[i],vouts[i],'I',height);
1154                     if ( (pax= komodo_paxfind(txids[i],vouts[i],'I')) != 0 )
1155                     {
1156                         pax->type = opretbuf[0];
1157                         strcpy(pax->source,(char *)&opretbuf[opretlen-4]);
1158                         if ( (pax2= komodo_paxfind(txids[i],vouts[i],'D')) != 0 && pax2->fiatoshis != 0 && pax2->komodoshis != 0 )
1159                         {
1160                             // realtime path?
1161                             pax->fiatoshis = pax2->fiatoshis;
1162                             pax->komodoshis = pax2->komodoshis;
1163                             pax->marked = pax2->marked = pax2->height;
1164                             if ( pax->didstats == 0 )
1165                             {
1166                                 if ( (basesp= komodo_stateptrget(CURRENCIES[baseids[i]])) != 0 )
1167                                 {
1168                                     basesp->issued += pax->fiatoshis;
1169                                     pax->didstats = 1;
1170                                     pax->height = pax2->height;
1171                                     pax->otherheight = height;
1172                                     if ( 1 && strcmp(CURRENCIES[baseids[i]],"USD") == 0 )
1173                                         printf("########### %p issuedb %s += %.8f kmdheight.%d %.8f other.%d [%d]\n",basesp,CURRENCIES[baseids[i]],dstr(pax->fiatoshis),pax->height,dstr(pax->komodoshis),pax->otherheight,height);
1174                                 }
1175                             }
1176                         }
1177                     }
1178                     if ( (pax= komodo_paxmark(height,txids[i],vouts[i],'I',height)) != 0 )
1179                         komodo_paxdelete(pax);
1180                     if ( (pax= komodo_paxmark(height,txids[i],vouts[i],'D',height)) != 0 )
1181                         komodo_paxdelete(pax);
1182                 }
1183             } //else printf("opreturn none issued?\n");
1184         }
1185     }
1186     else if ( height < 236000 && opretbuf[0] == 'W' && strncmp(ASSETCHAINS_SYMBOL,(char *)&opretbuf[opretlen-4],3) == 0 )//&& opretlen >= 38 )
1187     {
1188         if ( komodo_baseid((char *)&opretbuf[opretlen-4]) >= 0 && strcmp(ASSETCHAINS_SYMBOL,(char *)&opretbuf[opretlen-4]) == 0 )
1189         {
1190             for (i=0; i<opretlen; i++)
1191                 printf("%02x",opretbuf[i]);
1192             printf(" [%s] reject obsolete withdraw request.%s\n",ASSETCHAINS_SYMBOL,(char *)&opretbuf[opretlen-4]);
1193             return(typestr);
1194         }
1195         tokomodo = 1;
1196         iguana_rwnum(0,&opretbuf[34],sizeof(kmdheight),&kmdheight);
1197         memset(base,0,sizeof(base));
1198         PAX_pubkey(0,&opretbuf[1],&addrtype,rmd160,base,&shortflag,&komodoshis);
1199         bitcoin_address(coinaddr,addrtype,rmd160,20);
1200         checktoshis = PAX_fiatdest(&seed,tokomodo,destaddr,pubkey33,coinaddr,kmdheight,base,value);
1201         typestr = "withdraw";
1202         //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);
1203         didstats = 0;
1204         //if ( komodo_paxcmp(base,kmdheight,komodoshis,checktoshis,seed) == 0 )
1205         {
1206             if ( value != 0 && ((pax= komodo_paxfind(txid,vout,'W')) == 0 || pax->didstats == 0) )
1207             {
1208                 if ( (basesp= komodo_stateptrget(base)) != 0 )
1209                 {
1210                     basesp->withdrawn += value;
1211                     didstats = 1;
1212                     if ( 0 && strcmp(base,ASSETCHAINS_SYMBOL) == 0 )
1213                         printf("########### %p withdrawn %s += %.8f check %.8f\n",basesp,base,dstr(value),dstr(checktoshis));
1214                 }
1215                 if ( 0 && strcmp(base,"RUB") == 0 && (pax == 0 || pax->approved == 0) )
1216                     printf("notarize %s %.8f -> %.8f kmd.%d other.%d\n",ASSETCHAINS_SYMBOL,dstr(value),dstr(komodoshis),kmdheight,height);
1217             }
1218             komodo_gateway_deposit(coinaddr,0,(char *)"KMD",value,rmd160,txid,vout,'W',kmdheight,height,source,0);
1219             if ( (pax= komodo_paxfind(txid,vout,'W')) != 0 )
1220             {
1221                 pax->type = opretbuf[0];
1222                 strcpy(pax->source,base);
1223                 strcpy(pax->symbol,"KMD");
1224                 pax->height = kmdheight;
1225                 pax->otherheight = height;
1226                 pax->komodoshis = komodoshis;
1227             }
1228         } // else printf("withdraw %s paxcmp ht.%d %d error value %.8f -> %.8f vs %.8f\n",base,kmdheight,height,dstr(value),dstr(komodoshis),dstr(checktoshis));
1229         // need to allocate pax
1230     }
1231     else if ( height < 236000 && tokomodo != 0 && opretbuf[0] == 'A' && ASSETCHAINS_SYMBOL[0] == 0 )
1232     {
1233         tokomodo = 1;
1234         if ( 0 && ASSETCHAINS_SYMBOL[0] != 0 )
1235         {
1236             for (i=0; i<opretlen; i++)
1237                 printf("%02x",opretbuf[i]);
1238             printf(" opret[%c] else path tokomodo.%d ht.%d before %.8f opretlen.%d\n",opretbuf[0],tokomodo,height,dstr(komodo_paxtotal()),opretlen);
1239         }
1240         if ( (n= komodo_issued_opreturn(base,txids,vouts,values,srcvalues,kmdheights,otherheights,baseids,rmd160s,opretbuf,opretlen,1)) > 0 )
1241         {
1242             for (i=0; i<n; i++)
1243             {
1244                 //for (j=0; j<32; j++)
1245                 //    printf("%02x",((uint8_t *)&txids[i])[j]);
1246                 //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]);
1247                 if ( baseids[i] < 0 )
1248                 {
1249                     for (i=0; i<opretlen; i++)
1250                         printf("%02x",opretbuf[i]);
1251                     printf(" opret[%c] else path tokomodo.%d ht.%d before %.8f opretlen.%d\n",opretbuf[0],tokomodo,height,dstr(komodo_paxtotal()),opretlen);
1252                     //printf("baseids[%d] %d\n",i,baseids[i]);
1253                     if ( (pax= komodo_paxfind(txids[i],vouts[i],'W')) != 0 || (pax= komodo_paxfind(txids[i],vouts[i],'X')) != 0 )
1254                     {
1255                         baseids[i] = komodo_baseid(pax->symbol);
1256                         printf("override neg1 with (%s)\n",pax->symbol);
1257                     }
1258                     if ( baseids[i] < 0 )
1259                         continue;
1260                 }
1261                 didstats = 0;
1262                 seed = 0;
1263                 checktoshis = komodo_paxprice(&seed,kmdheights[i],CURRENCIES[baseids[i]],(char *)"KMD",(uint64_t)values[i]);
1264                 //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);
1265                 if ( srcvalues[i] == checktoshis )
1266                 {
1267                     if ( (pax= komodo_paxfind(txids[i],vouts[i],'A')) == 0 )
1268                     {
1269                         bitcoin_address(coinaddr,60,&rmd160s[i*20],20);
1270                         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]);
1271                         if ( (pax= komodo_paxfind(txids[i],vouts[i],'A')) == 0 )
1272                             printf("unexpected null pax for approve\n");
1273                         else pax->validated = checktoshis;
1274                         if ( (pax2= komodo_paxfind(txids[i],vouts[i],'W')) != 0 )
1275                             pax2->approved = kmdheights[i];
1276                         komodo_paxmark(height,txids[i],vouts[i],'W',height);
1277                         //komodo_paxmark(height,txids[i],vouts[i],'A',height);
1278                         if ( values[i] != 0 && (basesp= komodo_stateptrget(CURRENCIES[baseids[i]])) != 0 )
1279                         {
1280                             basesp->approved += values[i];
1281                             didstats = 1;
1282                             //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]);
1283                         }
1284                         //printf(" i.%d (%s) <- %.8f ADDFLAG APPROVED\n",i,coinaddr,dstr(values[i]));
1285                     }
1286                     else if ( pax->didstats == 0 && srcvalues[i] != 0 )
1287                     {
1288                         if ( (basesp= komodo_stateptrget(CURRENCIES[baseids[i]])) != 0 )
1289                         {
1290                             basesp->approved += values[i];
1291                             didstats = 1;
1292                             //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]);
1293                         }
1294                     } //else printf(" i.%d of n.%d pax.%p baseids[] %d\n",i,n,pax,baseids[i]);
1295                     if ( (pax= komodo_paxfind(txids[i],vouts[i],'A')) != 0 )
1296                     {
1297                         pax->type = opretbuf[0];
1298                         pax->approved = kmdheights[i];
1299                         pax->validated = checktoshis;
1300                         if ( didstats != 0 )
1301                             pax->didstats = 1;
1302                         //if ( strcmp(CURRENCIES[baseids[i]],ASSETCHAINS_SYMBOL) == 0 )
1303                         //printf(" i.%d approved.%d <<<<<<<<<<<<< APPROVED %p\n",i,kmdheights[i],pax);
1304                     }
1305                 }
1306             }
1307         } //else printf("n.%d from opreturns\n",n);
1308         //printf("extra.[%d] after %.8f\n",n,dstr(komodo_paxtotal()));
1309     }
1310     else if ( height < 236000 && opretbuf[0] == 'X' && ASSETCHAINS_SYMBOL[0] == 0 )
1311     {
1312         tokomodo = 1;
1313         if ( (n= komodo_issued_opreturn(base,txids,vouts,values,srcvalues,kmdheights,otherheights,baseids,rmd160s,opretbuf,opretlen,1)) > 0 )
1314         {
1315             for (i=0; i<n; i++)
1316             {
1317                 if ( baseids[i] < 0 )
1318                     continue;
1319                 bitcoin_address(coinaddr,60,&rmd160s[i*20],20);
1320                 komodo_gateway_deposit(coinaddr,0,0,0,0,txids[i],vouts[i],'X',height,0,(char *)"KMD",0);
1321                 komodo_paxmark(height,txids[i],vouts[i],'W',height);
1322                 komodo_paxmark(height,txids[i],vouts[i],'A',height);
1323                 komodo_paxmark(height,txids[i],vouts[i],'X',height);
1324                 if ( (pax= komodo_paxfind(txids[i],vouts[i],'X')) != 0 )
1325                 {
1326                     pax->type = opretbuf[0];
1327                     if ( height < 121842 ) // fields got switched around due to legacy issues and approves
1328                         value = srcvalues[i];
1329                     else value = values[i];
1330                     if ( baseids[i] >= 0 && value != 0 && (basesp= komodo_stateptrget(CURRENCIES[baseids[i]])) != 0 )
1331                     {
1332                         basesp->redeemed += value;
1333                         pax->didstats = 1;
1334                         if ( strcmp(CURRENCIES[baseids[i]],ASSETCHAINS_SYMBOL) == 0 )
1335                             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]);
1336                     }
1337                 }
1338                 if ( (pax= komodo_paxmark(height,txids[i],vouts[i],'W',height)) != 0 )
1339                     komodo_paxdelete(pax);
1340                 if ( (pax= komodo_paxmark(height,txids[i],vouts[i],'A',height)) != 0 )
1341                     komodo_paxdelete(pax);
1342                 if ( (pax= komodo_paxmark(height,txids[i],vouts[i],'X',height)) != 0 )
1343                     komodo_paxdelete(pax);
1344             }
1345         } //else printf("komodo_issued_opreturn returned %d\n",n);
1346     }
1347     return(typestr);
1348 }
1349
1350 void komodo_passport_iteration()
1351 {
1352     static long lastpos[34]; static char userpass[33][1024]; static uint32_t lasttime;
1353     int32_t maxseconds = 30;
1354     FILE *fp; int32_t baseid,n,ht,isrealtime,expired,refid,blocks,longest; struct komodo_state *sp,*refsp; char *retstr,fname[512],*base,symbol[16],dest[16]; uint32_t buf[3],starttime; cJSON *infoobj,*result; uint64_t RTmask = 0;
1355     //printf("PASSPORT.(%s)\n",ASSETCHAINS_SYMBOL);
1356     expired = 0;
1357     while ( KOMODO_INITDONE == 0 )
1358     {
1359         fprintf(stderr,"[%s] PASSPORT iteration waiting for KOMODO_INITDONE\n",ASSETCHAINS_SYMBOL);
1360         sleep(3);
1361     }
1362     refsp = komodo_stateptr(symbol,dest);
1363     if ( ASSETCHAINS_SYMBOL[0] == 0 )
1364         refid = 33;
1365     else
1366     {
1367         refid = komodo_baseid(ASSETCHAINS_SYMBOL)+1; // illegal base -> baseid.-1 -> 0
1368         if ( refid == 0 )
1369         {
1370             KOMODO_PASSPORT_INITDONE = 1;
1371             return;
1372         }
1373     }
1374     /*if ( KOMODO_PAX == 0 )
1375     {
1376         KOMODO_PASSPORT_INITDONE = 1;
1377         return;
1378     }*/
1379     starttime = (uint32_t)time(NULL);
1380     if ( starttime == lasttime )
1381     {
1382         usleep(1000);
1383         return;
1384     }
1385     lasttime = starttime;
1386     //printf("PASSPORT %s refid.%d\n",ASSETCHAINS_SYMBOL,refid);
1387     for (baseid=32; baseid>=0; baseid--)
1388     {
1389         if ( time(NULL) >= starttime+maxseconds )
1390             break;
1391         sp = 0;
1392         isrealtime = 0;
1393         base = (char *)CURRENCIES[baseid];
1394         if ( baseid+1 != refid )
1395         {
1396             if ( baseid == 32 || ASSETCHAINS_SYMBOL[0] == 0 )
1397             {
1398                 refsp->RTmask &= ~(1LL << baseid);
1399                 komodo_statefname(fname,baseid<32?base:(char *)"",(char *)"komodostate");
1400                 komodo_nameset(symbol,dest,base);
1401                 sp = komodo_stateptrget(symbol);
1402                 n = 0;
1403                 if ( (fp= fopen(fname,"rb")) != 0 && sp != 0 )
1404                 {
1405                     fseek(fp,0,SEEK_END);
1406                     if ( ftell(fp) > lastpos[baseid] )
1407                     {
1408                         if ( ASSETCHAINS_SYMBOL[0] != 0 )
1409                             printf("%s passport refid.%d %s fname.(%s) base.%s %ld %ld\n",ASSETCHAINS_SYMBOL,refid,symbol,fname,base,ftell(fp),lastpos[baseid]);
1410                         fseek(fp,lastpos[baseid],SEEK_SET);
1411                         while ( komodo_parsestatefile(sp,fp,symbol,dest) >= 0 && n < 1000 )
1412                         {
1413                             if ( n == 999 )
1414                             {
1415                                 if ( time(NULL) < starttime+maxseconds )
1416                                     n = 0;
1417                                 else
1418                                 {
1419                                     //printf("expire passport loop %s -> %s at %ld\n",ASSETCHAINS_SYMBOL,base,lastpos[baseid]);
1420                                     expired++;
1421                                 }
1422                             }
1423                             n++;
1424                         }
1425                         lastpos[baseid] = ftell(fp);
1426                         if ( lastpos[baseid] == 0 && strcmp(symbol,"KMD") == 0 )
1427                             printf("from.(%s) lastpos[%s] %ld isrt.%d\n",ASSETCHAINS_SYMBOL,CURRENCIES[baseid],lastpos[baseid],komodo_isrealtime(&ht));
1428                     } //else fprintf(stderr,"%s.%ld ",CURRENCIES[baseid],ftell(fp));
1429                     fclose(fp);
1430                 } //else printf("error.(%s) %p\n",fname,sp);
1431                 komodo_statefname(fname,baseid<32?base:(char *)"",(char *)"realtime");
1432                 if ( (fp= fopen(fname,"rb")) != 0 )
1433                 {
1434                     if ( fread(buf,1,sizeof(buf),fp) == sizeof(buf) )
1435                     {
1436                         sp->CURRENT_HEIGHT = buf[0];
1437                         if ( buf[0] != 0 && buf[0] >= buf[1] && buf[2] > time(NULL)-60 )
1438                         {
1439                             isrealtime = 1;
1440                             RTmask |= (1LL << baseid);
1441                             memcpy(refsp->RTbufs[baseid+1],buf,sizeof(refsp->RTbufs[baseid+1]));
1442                         }
1443                         else if ( KOMODO_PAX != 0 && (time(NULL)-buf[2]) > 60 && ASSETCHAINS_SYMBOL[0] != 0 )
1444                             fprintf(stderr,"[%s]: %s not RT %u %u %d\n",ASSETCHAINS_SYMBOL,base,buf[0],buf[1],(int32_t)(time(NULL)-buf[2]));
1445                     } //else fprintf(stderr,"%s size error RT\n",base);
1446                     fclose(fp);
1447                 } //else fprintf(stderr,"%s open error RT\n",base);
1448             }
1449         }
1450         else
1451         {
1452             refsp->RTmask &= ~(1LL << baseid);
1453             komodo_statefname(fname,baseid<32?base:(char *)"",(char *)"realtime");
1454             if ( (fp= fopen(fname,"wb")) != 0 )
1455             {
1456                 buf[0] = (uint32_t)chainActive.Tip()->nHeight;
1457                 buf[1] = (uint32_t)komodo_longestchain();
1458                 if ( buf[0] != 0 && buf[0] == buf[1] )
1459                 {
1460                     buf[2] = (uint32_t)time(NULL);
1461                     RTmask |= (1LL << baseid);
1462                     memcpy(refsp->RTbufs[baseid+1],buf,sizeof(refsp->RTbufs[baseid+1]));
1463                     if ( refid != 0 )
1464                         memcpy(refsp->RTbufs[0],buf,sizeof(refsp->RTbufs[0]));
1465                 }
1466                 if ( fwrite(buf,1,sizeof(buf),fp) != sizeof(buf) )
1467                     fprintf(stderr,"[%s] %s error writing realtime\n",ASSETCHAINS_SYMBOL,base);
1468                 fclose(fp);
1469             } else fprintf(stderr,"%s create error RT\n",base);
1470         }
1471         if ( sp != 0 && isrealtime == 0 )
1472             refsp->RTbufs[0][2] = 0;
1473     }
1474     komodo_paxtotal();
1475     refsp->RTmask |= RTmask;
1476     if ( expired == 0 && KOMODO_PASSPORT_INITDONE == 0 )
1477     {
1478         KOMODO_PASSPORT_INITDONE = 1;
1479         printf("done PASSPORT %s refid.%d\n",ASSETCHAINS_SYMBOL,refid);
1480     }
1481 }
1482