738 lines
33 KiB
C++
738 lines
33 KiB
C++
/******************************************************************************
|
|
* Copyright © 2014-2019 The SuperNET Developers. *
|
|
* *
|
|
* See the AUTHORS, DEVELOPER-AGREEMENT and LICENSE files at *
|
|
* the top-level directory of this distribution for the individual copyright *
|
|
* holder information and the developer policies on copyright and licensing. *
|
|
* *
|
|
* Unless otherwise agreed in a custom licensing agreement, no part of the *
|
|
* SuperNET software, including this file may be copied, modified, propagated *
|
|
* or distributed except according to the terms contained in the LICENSE file *
|
|
* *
|
|
* Removal or modification of this copyright notice is prohibited. *
|
|
* *
|
|
******************************************************************************/
|
|
|
|
#include "CCMarmara.h"
|
|
|
|
/*
|
|
Marmara CC is for the MARMARA project
|
|
|
|
'R': two forms for initial issuance and for accepting existing
|
|
vins normal
|
|
vout0 approval to senderpk (issuer or owner of baton)
|
|
|
|
'I'
|
|
vin0 approval from 'R'
|
|
vins1+ normal
|
|
vout0 baton to 1st receiverpk
|
|
vout1 marker to Marmara so all issuances can be tracked (spent when loop is closed)
|
|
|
|
'T'
|
|
vin0 approval from 'R'
|
|
vin1 baton from 'I'/'T'
|
|
vins2+ normal
|
|
vout0 baton to next receiverpk (following the unspent baton back to original is the credit loop)
|
|
|
|
'S'
|
|
vins CC utxos from credit loop
|
|
|
|
*/
|
|
|
|
// start of consensus code
|
|
|
|
int64_t IsMarmaravout(struct CCcontract_info *cp,const CTransaction& tx,int32_t v)
|
|
{
|
|
char destaddr[64];
|
|
if ( tx.vout[v].scriptPubKey.IsPayToCryptoCondition() != 0 )
|
|
{
|
|
if ( Getscriptaddress(destaddr,tx.vout[v].scriptPubKey) > 0 && strcmp(destaddr,cp->unspendableCCaddr) == 0 )
|
|
return(tx.vout[v].nValue);
|
|
}
|
|
return(0);
|
|
}
|
|
|
|
int32_t MarmaraRandomize(uint32_t ind)
|
|
{
|
|
uint64_t val64; uint32_t val,range = (MARMARA_MAXLOCK - MARMARA_MINLOCK);
|
|
val64 = komodo_block_prg(ind);
|
|
val = (uint32_t)(val64 >> 32);
|
|
val ^= (uint32_t)val64;
|
|
return((val % range) + MARMARA_MINLOCK);
|
|
}
|
|
|
|
int32_t MarmaraUnlockht(int32_t height)
|
|
{
|
|
uint32_t ind = height / MARMARA_GROUPSIZE;
|
|
height = (height / MARMARA_GROUPSIZE) * MARMARA_GROUPSIZE;
|
|
return(height + MarmaraRandomize(ind));
|
|
}
|
|
|
|
uint8_t DecodeMaramaraCoinbaseOpRet(const CScript scriptPubKey,CPubKey &pk,int32_t &height,int32_t &unlockht)
|
|
{
|
|
std::vector<uint8_t> vopret; uint8_t *script,e,f,funcid;
|
|
GetOpReturnData(scriptPubKey,vopret);
|
|
script = (uint8_t *)vopret.data();
|
|
if ( 0 )
|
|
{
|
|
int32_t i;
|
|
for (i=0; i<vopret.size(); i++)
|
|
fprintf(stderr,"%02x",script[i]);
|
|
fprintf(stderr," <- opret\n");
|
|
}
|
|
if ( vopret.size() > 2 && script[0] == EVAL_MARMARA )
|
|
{
|
|
if ( script[1] == 'C' || script[1] == 'P' )
|
|
{
|
|
if ( E_UNMARSHAL(vopret,ss >> e; ss >> f; ss >> pk; ss >> height; ss >> unlockht) != 0 )
|
|
{
|
|
return(script[1]);
|
|
} else fprintf(stderr,"DecodeMaramaraCoinbaseOpRet unmarshal error for %c\n",script[1]);
|
|
} else fprintf(stderr,"script[1] is %d != 'C' %d or 'P' %d\n",script[1],'C','P');
|
|
} else fprintf(stderr,"vopret.size() is %d\n",(int32_t)vopret.size());
|
|
return(0);
|
|
}
|
|
|
|
CScript EncodeMarmaraCoinbaseOpRet(uint8_t funcid,CPubKey pk,int32_t ht)
|
|
{
|
|
CScript opret; int32_t unlockht; uint8_t evalcode = EVAL_MARMARA;
|
|
unlockht = MarmaraUnlockht(ht);
|
|
opret << OP_RETURN << E_MARSHAL(ss << evalcode << funcid << pk << ht << unlockht);
|
|
if ( 0 )
|
|
{
|
|
std::vector<uint8_t> vopret; uint8_t *script,i;
|
|
GetOpReturnData(opret,vopret);
|
|
script = (uint8_t *)vopret.data();
|
|
{
|
|
for (i=0; i<vopret.size(); i++)
|
|
fprintf(stderr,"%02x",script[i]);
|
|
fprintf(stderr," <- gen opret.%c\n",funcid);
|
|
}
|
|
}
|
|
return(opret);
|
|
}
|
|
|
|
CScript MarmaraLoopOpret(uint8_t funcid,uint256 createtxid,CPubKey senderpk,int64_t amount,int32_t matures,std::string currency)
|
|
{
|
|
CScript opret; uint8_t evalcode = EVAL_MARMARA;
|
|
opret << OP_RETURN << E_MARSHAL(ss << evalcode << funcid << createtxid << senderpk << amount << matures << currency);
|
|
return(opret);
|
|
}
|
|
|
|
uint8_t MarmaraDecodeLoopOpret(const CScript scriptPubKey,uint256 &createtxid,CPubKey &senderpk,int64_t &amount,int32_t &matures,std::string ¤cy)
|
|
{
|
|
std::vector<uint8_t> vopret; uint8_t *script,e,f;
|
|
GetOpReturnData(scriptPubKey, vopret);
|
|
script = (uint8_t *)vopret.data();
|
|
if ( vopret.size() > 2 && E_UNMARSHAL(vopret,ss >> e; ss >> f; ss >> createtxid; ss >> senderpk; ss >> amount; ss >> matures; ss >> currency) != 0 )
|
|
{
|
|
return(f);
|
|
}
|
|
return(0);
|
|
}
|
|
|
|
int32_t MarmaraGetcreatetxid(uint256 &createtxid,uint256 txid)
|
|
{
|
|
CTransaction tx; uint256 hashBlock; uint8_t funcid; int32_t numvouts,matures; std::string currency; CPubKey senderpk; int64_t amount;
|
|
if ( myGetTransaction(txid,tx,hashBlock) != 0 && (numvouts= tx.vout.size()) > 1 )
|
|
{
|
|
if ( (funcid= MarmaraDecodeLoopOpret(tx.vout[numvouts-1].scriptPubKey,createtxid,senderpk,amount,matures,currency)) == 'I' || funcid == 'T' )
|
|
return(0);
|
|
else if ( funcid == 'R' )
|
|
{
|
|
if ( createtxid == zeroid )
|
|
createtxid = txid;
|
|
return(0);
|
|
}
|
|
}
|
|
return(-1);
|
|
}
|
|
|
|
int32_t MarmaraGetbatontxid(std::vector<uint256> &creditloop,uint256 &batontxid,uint256 txid)
|
|
{
|
|
uint256 createtxid,spenttxid; int64_t value; int32_t vini,height,n=0,vout = 0;
|
|
memset(&batontxid,0,sizeof(batontxid));
|
|
if ( MarmaraGetcreatetxid(createtxid,txid) == 0 )
|
|
{
|
|
txid = createtxid;
|
|
fprintf(stderr,"txid.%s -> createtxid %s\n",txid.GetHex().c_str(),createtxid.GetHex().c_str());
|
|
while ( CCgetspenttxid(spenttxid,vini,height,txid,vout) == 0 )
|
|
{
|
|
creditloop.push_back(txid);
|
|
fprintf(stderr,"%d: %s\n",n,txid.GetHex().c_str());
|
|
n++;
|
|
if ( (value= CCgettxout(spenttxid,vout,1)) > 0 )
|
|
{
|
|
batontxid = spenttxid;
|
|
fprintf(stderr,"got baton %s %.8f\n",batontxid.GetHex().c_str(),(double)value/COIN);
|
|
return(n);
|
|
}
|
|
txid = spenttxid;
|
|
}
|
|
}
|
|
return(-1);
|
|
}
|
|
|
|
CScript Marmara_scriptPubKey(int32_t height,CPubKey pk)
|
|
{
|
|
CTxOut ccvout;
|
|
if ( height > 0 && (height & 1) == 0 && pk.size() == 33 )
|
|
ccvout = MakeCC1vout(EVAL_MARMARA,0,pk);
|
|
return(ccvout.scriptPubKey);
|
|
}
|
|
|
|
CScript MarmaraCoinbaseOpret(uint8_t funcid,int32_t height,CPubKey pk)
|
|
{
|
|
uint8_t *ptr;
|
|
//fprintf(stderr,"height.%d pksize.%d\n",height,(int32_t)pk.size());
|
|
if ( height > 0 && (height & 1) == 0 && pk.size() == 33 )
|
|
return(EncodeMarmaraCoinbaseOpRet(funcid,pk,height));
|
|
return(CScript());
|
|
}
|
|
|
|
int32_t MarmaraValidateCoinbase(int32_t height,CTransaction tx)
|
|
{
|
|
struct CCcontract_info *cp,C; CPubKey pk; int32_t ht,unlockht; CTxOut ccvout;
|
|
cp = CCinit(&C,EVAL_MARMARA);
|
|
if ( 0 )
|
|
{
|
|
int32_t d,histo[365*2+30];
|
|
memset(histo,0,sizeof(histo));
|
|
for (ht=2; ht<100; ht++)
|
|
fprintf(stderr,"%d ",MarmaraUnlockht(ht));
|
|
fprintf(stderr," <- first 100 unlock heights\n");
|
|
for (ht=2; ht<1000000; ht+=MARMARA_GROUPSIZE)
|
|
{
|
|
d = (MarmaraUnlockht(ht) - ht) / 1440;
|
|
if ( d < 0 || d > sizeof(histo)/sizeof(*histo) )
|
|
fprintf(stderr,"d error.%d at ht.%d\n",d,ht);
|
|
else histo[d]++;
|
|
}
|
|
for (ht=0; ht<sizeof(histo)/sizeof(*histo); ht++)
|
|
fprintf(stderr,"%d ",histo[ht]);
|
|
fprintf(stderr,"<- unlock histogram[%d] by days locked\n",(int32_t)(sizeof(histo)/sizeof(*histo)));
|
|
}
|
|
if ( (height & 1) != 0 )
|
|
return(0);
|
|
if ( tx.vout.size() == 2 && tx.vout[1].nValue == 0 )
|
|
{
|
|
if ( DecodeMaramaraCoinbaseOpRet(tx.vout[1].scriptPubKey,pk,ht,unlockht) == 'C' )
|
|
{
|
|
if ( ht == height && MarmaraUnlockht(height) == unlockht )
|
|
{
|
|
//fprintf(stderr,"ht.%d -> unlock.%d\n",ht,unlockht);
|
|
ccvout = MakeCC1vout(EVAL_MARMARA,0,pk);
|
|
if ( ccvout.scriptPubKey == tx.vout[0].scriptPubKey )
|
|
return(0);
|
|
fprintf(stderr,"ht.%d mismatched CCvout scriptPubKey\n",height);
|
|
} else fprintf(stderr,"ht.%d %d vs %d unlock.%d\n",height,MarmaraUnlockht(height),ht,unlockht);
|
|
} else fprintf(stderr,"ht.%d error decoding coinbase opret\n",height);
|
|
}
|
|
return(-1);
|
|
}
|
|
|
|
bool MarmaraValidate(struct CCcontract_info *cp,Eval* eval,const CTransaction &tx, uint32_t nIn)
|
|
{
|
|
std::vector<uint8_t> vopret; CTransaction vinTx; uint256 hashBlock; int32_t numvins,numvouts,i,ht,unlockht,vht,vunlockht; uint8_t funcid,vfuncid,*script; CPubKey pk,vpk;
|
|
numvins = tx.vin.size();
|
|
numvouts = tx.vout.size();
|
|
if ( numvouts < 1 )
|
|
return eval->Invalid("no vouts");
|
|
else if ( tx.vout.size() >= 2 )
|
|
{
|
|
GetOpReturnData(tx.vout[tx.vout.size()-1].scriptPubKey,vopret);
|
|
script = (uint8_t *)vopret.data();
|
|
if ( vopret.size() < 2 || script[0] != EVAL_MARMARA )
|
|
return eval->Invalid("no opreturn");
|
|
funcid = script[1];
|
|
if ( funcid == 'P' )
|
|
{
|
|
funcid = DecodeMaramaraCoinbaseOpRet(tx.vout[tx.vout.size()-1].scriptPubKey,pk,ht,unlockht);
|
|
for (i=0; i<numvins; i++)
|
|
{
|
|
if ( (*cp->ismyvin)(tx.vin[i].scriptSig) != 0 )
|
|
{
|
|
if ( eval->GetTxUnconfirmed(tx.vin[i].prevout.hash,vinTx,hashBlock) == 0 )
|
|
return eval->Invalid("cant find vinTx");
|
|
else
|
|
{
|
|
if ( vinTx.IsCoinBase() == 0 )
|
|
return eval->Invalid("noncoinbase input");
|
|
else if ( vinTx.vout.size() != 2 )
|
|
return eval->Invalid("coinbase doesnt have 2 vouts");
|
|
vfuncid = DecodeMaramaraCoinbaseOpRet(vinTx.vout[1].scriptPubKey,vpk,vht,vunlockht);
|
|
if ( vfuncid != 'C' || vpk != pk || vunlockht != unlockht )
|
|
return eval->Invalid("mismatched opreturn");
|
|
}
|
|
}
|
|
}
|
|
return(true);
|
|
}
|
|
else if ( funcid == 'L' ) // lock -> lock funds with a unlockht
|
|
{
|
|
return(true);
|
|
}
|
|
else if ( funcid == 'R' ) // receive -> agree to receive 'I' from pk, amount, currency, dueht
|
|
{
|
|
return(true);
|
|
}
|
|
else if ( funcid == 'I' ) // issue -> issue currency to pk with due date height
|
|
{
|
|
return(true);
|
|
}
|
|
else if ( funcid == 'T' ) // transfer -> given 'R' transfer 'I' or 'T' to the pk of 'R'
|
|
{
|
|
return(true);
|
|
}
|
|
else if ( funcid == 'S' ) // collect -> automatically spend issuers locked funds, given 'I'
|
|
{
|
|
return(true); // iterate from issuer all remainder after maturity
|
|
}
|
|
// staking only for locked utxo
|
|
}
|
|
return eval->Invalid("fall through error");
|
|
}
|
|
// end of consensus code
|
|
|
|
// helper functions for rpc calls in rpcwallet.cpp
|
|
|
|
int64_t AddMarmaraCoinbases(struct CCcontract_info *cp,CMutableTransaction &mtx,int32_t firstheight,CPubKey poolpk,int32_t maxinputs)
|
|
{
|
|
char coinaddr[64]; CPubKey pk; int64_t nValue,totalinputs = 0; uint256 txid,hashBlock; CTransaction vintx; int32_t unlockht,ht,vout,unlocks,n = 0;
|
|
std::vector<std::pair<CAddressUnspentKey, CAddressUnspentValue> > unspentOutputs;
|
|
GetCCaddress(cp,coinaddr,poolpk);
|
|
SetCCunspents(unspentOutputs,coinaddr);
|
|
unlocks = MarmaraUnlockht(firstheight);
|
|
//fprintf(stderr,"check coinaddr.(%s)\n",coinaddr);
|
|
for (std::vector<std::pair<CAddressUnspentKey, CAddressUnspentValue> >::const_iterator it=unspentOutputs.begin(); it!=unspentOutputs.end(); it++)
|
|
{
|
|
txid = it->first.txhash;
|
|
vout = (int32_t)it->first.index;
|
|
//fprintf(stderr,"txid.%s/v%d\n",txid.GetHex().c_str(),vout);
|
|
if ( GetTransaction(txid,vintx,hashBlock,false) != 0 )
|
|
{
|
|
if ( vintx.IsCoinBase() != 0 && vintx.vout.size() == 2 && vintx.vout[1].nValue == 0 )
|
|
{
|
|
if ( DecodeMaramaraCoinbaseOpRet(vintx.vout[1].scriptPubKey,pk,ht,unlockht) == 'C' && unlockht == unlocks && pk == poolpk && ht >= firstheight )
|
|
{
|
|
if ( (nValue= vintx.vout[vout].nValue) > 0 && myIsutxo_spentinmempool(txid,vout) == 0 )
|
|
{
|
|
if ( maxinputs != 0 )
|
|
mtx.vin.push_back(CTxIn(txid,vout,CScript()));
|
|
nValue = it->second.satoshis;
|
|
totalinputs += nValue;
|
|
n++;
|
|
if ( maxinputs > 0 && n >= maxinputs )
|
|
break;
|
|
} //else fprintf(stderr,"nValue.%8f\n",(double)nValue/COIN);
|
|
} //else fprintf(stderr,"decode error unlockht.%d vs %d pk.%d\n",unlockht,unlocks,pk == poolpk);
|
|
} else fprintf(stderr,"not coinbase\n");
|
|
} else fprintf(stderr,"error getting tx\n");
|
|
}
|
|
return(totalinputs);
|
|
}
|
|
|
|
int32_t MarmaraGetCreditloops(int64_t &totalamount,std::vector<uint256> &issuances,struct CCcontract_info *cp,int32_t firstheight,int32_t lastheight,int64_t minamount,int64_t maxamount,CPubKey refpk,std::string refcurrency)
|
|
{
|
|
char coinaddr[64]; CPubKey Marmarapk,senderpk; int64_t amount; uint256 createtxid,txid,hashBlock; CTransaction tx; int32_t numvouts,vout,matures,n=0; std::string currency;
|
|
std::vector<std::pair<CAddressUnspentKey, CAddressUnspentValue> > unspentOutputs;
|
|
Marmarapk = GetUnspendable(cp,0);
|
|
GetCCaddress(cp,coinaddr,Marmarapk);
|
|
SetCCunspents(unspentOutputs,coinaddr);
|
|
//fprintf(stderr,"check coinaddr.(%s)\n",coinaddr);
|
|
for (std::vector<std::pair<CAddressUnspentKey, CAddressUnspentValue> >::const_iterator it=unspentOutputs.begin(); it!=unspentOutputs.end(); it++)
|
|
{
|
|
txid = it->first.txhash;
|
|
vout = (int32_t)it->first.index;
|
|
//fprintf(stderr,"txid.%s/v%d\n",txid.GetHex().c_str(),vout);
|
|
if ( vout == 1 && GetTransaction(txid,tx,hashBlock,false) != 0 )
|
|
{
|
|
if ( tx.IsCoinBase() == 0 && (numvouts= tx.vout.size()) > 2 && tx.vout[numvouts - 1].nValue == 0 )
|
|
{
|
|
if ( MarmaraDecodeLoopOpret(tx.vout[numvouts-1].scriptPubKey,createtxid,senderpk,amount,matures,currency) == 'I' )
|
|
{
|
|
n++;
|
|
if ( currency == refcurrency && matures >= firstheight && matures <= lastheight && amount >= minamount && amount <= maxamount && (refpk.size() == 0 || senderpk == refpk) )
|
|
{
|
|
issuances.push_back(txid);
|
|
totalamount += amount;
|
|
}
|
|
}
|
|
}
|
|
} else fprintf(stderr,"error getting tx\n");
|
|
}
|
|
return(n);
|
|
}
|
|
|
|
UniValue MarmaraReceive(uint64_t txfee,CPubKey senderpk,int64_t amount,std::string currency,int32_t matures,uint256 batontxid)
|
|
{
|
|
CMutableTransaction mtx = CreateNewContextualCMutableTransaction(Params().GetConsensus(), komodo_nextheight());
|
|
UniValue result(UniValue::VOBJ); CPubKey mypk; struct CCcontract_info *cp,C; std::string rawtx; char *errorstr=0; uint256 createtxid; int64_t batonamount; int32_t needbaton = 0;
|
|
cp = CCinit(&C,EVAL_MARMARA);
|
|
if ( txfee == 0 )
|
|
txfee = 10000;
|
|
// check for batonownership by senderpk and parameters match createtxid
|
|
mypk = pubkey2pk(Mypubkey());
|
|
memset(&createtxid,0,sizeof(createtxid));
|
|
if ( batontxid != zeroid && MarmaraGetcreatetxid(createtxid,batontxid) < 0 )
|
|
errorstr = (char *)"cant get createtxid from batontxid";
|
|
else if ( currency != "MARMARA" )
|
|
errorstr = (char *)"for now, only MARMARA loops are supported";
|
|
else if ( amount < txfee )
|
|
errorstr = (char *)"amount must be for more than txfee";
|
|
else if ( matures <= chainActive.LastTip()->GetHeight() )
|
|
errorstr = (char *)"it must mature in the future";
|
|
if ( errorstr == 0 )
|
|
{
|
|
if ( batontxid != zeroid )
|
|
batonamount = txfee;
|
|
else batonamount = 2*txfee;
|
|
if ( AddNormalinputs(mtx,mypk,batonamount + txfee,1) > 0 )
|
|
{
|
|
errorstr = (char *)"couldnt finalize CCtx";
|
|
mtx.vout.push_back(MakeCC1vout(EVAL_MARMARA,batonamount,senderpk));
|
|
rawtx = FinalizeCCTx(0,cp,mtx,mypk,txfee,MarmaraLoopOpret('R',createtxid,senderpk,amount,matures,currency));
|
|
if ( rawtx.size() > 0 )
|
|
errorstr = 0;
|
|
} else errorstr = (char *)"dont have enough normal inputs for 2*txfee";
|
|
}
|
|
if ( rawtx.size() == 0 || errorstr != 0 )
|
|
{
|
|
result.push_back(Pair("result","error"));
|
|
if ( errorstr != 0 )
|
|
result.push_back(Pair("error",errorstr));
|
|
}
|
|
else
|
|
{
|
|
result.push_back(Pair("result",(char *)"success"));
|
|
result.push_back(Pair("rawtx",rawtx));
|
|
result.push_back(Pair("funcid","R"));
|
|
result.push_back(Pair("createtxid",createtxid.GetHex()));
|
|
if ( batontxid != zeroid )
|
|
result.push_back(Pair("batontxid",batontxid.GetHex()));
|
|
result.push_back(Pair("senderpk",HexStr(senderpk)));
|
|
result.push_back(Pair("amount",ValueFromAmount(amount)));
|
|
result.push_back(Pair("matures",matures));
|
|
result.push_back(Pair("currency",currency));
|
|
}
|
|
return(result);
|
|
}
|
|
|
|
UniValue MarmaraIssue(uint64_t txfee,uint8_t funcid,CPubKey receiverpk,int64_t amount,std::string currency,int32_t matures,uint256 approvaltxid,uint256 batontxid)
|
|
{
|
|
CMutableTransaction mtx = CreateNewContextualCMutableTransaction(Params().GetConsensus(), komodo_nextheight());
|
|
UniValue result(UniValue::VOBJ); CPubKey mypk,Marmarapk; struct CCcontract_info *cp,C; std::string rawtx; uint256 createtxid; char *errorstr=0;
|
|
cp = CCinit(&C,EVAL_MARMARA);
|
|
if ( txfee == 0 )
|
|
txfee = 10000;
|
|
// make sure receiverpk is unique to creditloop
|
|
// make sure less than maxlength
|
|
Marmarapk = GetUnspendable(cp,0);
|
|
mypk = pubkey2pk(Mypubkey());
|
|
if ( MarmaraGetcreatetxid(createtxid,approvaltxid) < 0 )
|
|
errorstr = (char *)"cant get createtxid from approvaltxid";
|
|
else if ( batontxid == zeroid )
|
|
errorstr = (char *)"null batontxid";
|
|
else if ( currency != "MARMARA" )
|
|
errorstr = (char *)"for now, only MARMARA loops are supported";
|
|
else if ( amount < txfee )
|
|
errorstr = (char *)"amount must be for more than txfee";
|
|
else if ( matures <= chainActive.LastTip()->GetHeight() )
|
|
errorstr = (char *)"it must mature in the future";
|
|
if ( errorstr == 0 )
|
|
{
|
|
mtx.vin.push_back(CTxIn(approvaltxid,0,CScript()));
|
|
if ( funcid == 'T' )
|
|
mtx.vin.push_back(CTxIn(batontxid,0,CScript()));
|
|
if ( funcid == 'I' || AddNormalinputs(mtx,mypk,txfee,1) > 0 )
|
|
{
|
|
errorstr = (char *)"couldnt finalize CCtx";
|
|
mtx.vout.push_back(MakeCC1vout(EVAL_MARMARA,txfee,receiverpk));
|
|
if ( funcid == 'I' )
|
|
mtx.vout.push_back(MakeCC1vout(EVAL_MARMARA,txfee,Marmarapk));
|
|
rawtx = FinalizeCCTx(0,cp,mtx,mypk,txfee,MarmaraLoopOpret(funcid,createtxid,receiverpk,amount,matures,currency));
|
|
if ( rawtx.size() > 0 )
|
|
errorstr = 0;
|
|
} else errorstr = (char *)"dont have enough normal inputs for 2*txfee";
|
|
}
|
|
if ( rawtx.size() == 0 || errorstr != 0 )
|
|
{
|
|
result.push_back(Pair("result","error"));
|
|
if ( errorstr != 0 )
|
|
result.push_back(Pair("error",errorstr));
|
|
}
|
|
else
|
|
{
|
|
result.push_back(Pair("result",(char *)"success"));
|
|
result.push_back(Pair("rawtx",rawtx));
|
|
char str[2]; str[0] = funcid, str[1] = 0;
|
|
result.push_back(Pair("funcid",str));
|
|
result.push_back(Pair("createtxid",createtxid.GetHex()));
|
|
result.push_back(Pair("approvaltxid",approvaltxid.GetHex()));
|
|
if ( funcid == 'T' )
|
|
result.push_back(Pair("batontxid",batontxid.GetHex()));
|
|
result.push_back(Pair("receiverpk",HexStr(receiverpk)));
|
|
result.push_back(Pair("amount",ValueFromAmount(amount)));
|
|
result.push_back(Pair("matures",matures));
|
|
result.push_back(Pair("currency",currency));
|
|
}
|
|
return(result);
|
|
}
|
|
|
|
// get creditloop pubkeys
|
|
|
|
/*UniValue Marmara(uint64_t txfee,uint256 batontxid)
|
|
{
|
|
UniValue result(UniValue::VOBJ); int64_t avail,amount,paid=0; int32_t i,n = 0; uint256 txid,*revcreditloop=0; CPubKey Marmarapk; struct CCcontract_info *cp,C;
|
|
result.push_back(Pair("result","success"));
|
|
cp = CCinit(&C,EVAL_MARMARA);
|
|
Marmarapk = GetUnspendable(cp,0);
|
|
txid = batontxid;
|
|
while ( txid.hasprev() != 0 )
|
|
{
|
|
txid = txid.prev();
|
|
// check for unique, else error
|
|
revcreditloop[n++] = txid;
|
|
}
|
|
for (i=0; i<n; i++)
|
|
{
|
|
set opreturn vals
|
|
avail = MarmaraAvail(pk);
|
|
if ( paid >= amount )
|
|
{
|
|
change = (amount - paid);
|
|
break;
|
|
}
|
|
}
|
|
|
|
return(result);
|
|
}*/
|
|
|
|
UniValue MarmaraCreditloop(uint256 txid)
|
|
{
|
|
UniValue result(UniValue::VOBJ),a(UniValue::VARR); std::vector<uint256> creditloop; uint256 batontxid,createtxid,refcreatetxid,hashBlock; uint8_t funcid; int32_t numerrs=0,i,n,numvouts,matures,refmatures; int64_t amount,refamount; CPubKey senderpk,pk; std::string currency,refcurrency; CTransaction tx; char coinaddr[64],myCCaddr[64],str[2]; struct CCcontract_info *cp,C;
|
|
cp = CCinit(&C,EVAL_MARMARA);
|
|
if ( (n= MarmaraGetbatontxid(creditloop,batontxid,txid)) > 0 )
|
|
{
|
|
if ( GetTransaction(batontxid,tx,hashBlock,false) != 0 && (numvouts= tx.vout.size()) > 1 )
|
|
{
|
|
result.push_back(Pair("result",(char *)"success"));
|
|
Getscriptaddress(coinaddr,CScript() << ParseHex(HexStr(Mypubkey())) << OP_CHECKSIG);
|
|
result.push_back(Pair("myaddress",coinaddr));
|
|
GetCCaddress(cp,myCCaddr,Mypubkey());
|
|
result.push_back(Pair("myCCaddress",myCCaddr));
|
|
result.push_back(Pair("batontxid",batontxid.GetHex()));
|
|
if ( (funcid= MarmaraDecodeLoopOpret(tx.vout[numvouts-1].scriptPubKey,refcreatetxid,pk,refamount,refmatures,refcurrency)) != 0 )
|
|
{
|
|
str[0] = funcid, str[1] = 0;
|
|
result.push_back(Pair("funcid",str));
|
|
if ( refcreatetxid != creditloop[0] )
|
|
{
|
|
fprintf(stderr,"invalid refcreatetxid, setting to creditloop[0]\n");
|
|
refcreatetxid = creditloop[0];
|
|
numerrs++;
|
|
}
|
|
result.push_back(Pair("createtxid",refcreatetxid.GetHex()));
|
|
result.push_back(Pair("amount",ValueFromAmount(refamount)));
|
|
result.push_back(Pair("matures",refmatures));
|
|
result.push_back(Pair("currency",refcurrency));
|
|
result.push_back(Pair("receiverpk",HexStr(pk)));
|
|
Getscriptaddress(coinaddr,CScript() << ParseHex(HexStr(pk)) << OP_CHECKSIG);
|
|
result.push_back(Pair("receiveraddr",coinaddr));
|
|
GetCCaddress(cp,coinaddr,pk);
|
|
result.push_back(Pair("receiverCCaddr",coinaddr));
|
|
Getscriptaddress(coinaddr,tx.vout[0].scriptPubKey);
|
|
result.push_back(Pair("batonaddress",coinaddr));
|
|
if ( strcmp(myCCaddr,coinaddr) == 0 )
|
|
result.push_back(Pair("ismine",1));
|
|
else result.push_back(Pair("ismine",0));
|
|
for (i=0; i<n; i++)
|
|
{
|
|
if ( GetTransaction(creditloop[i],tx,hashBlock,false) != 0 && (numvouts= tx.vout.size()) > 1 )
|
|
{
|
|
if ( (funcid= MarmaraDecodeLoopOpret(tx.vout[numvouts-1].scriptPubKey,createtxid,pk,amount,matures,currency)) != 0 )
|
|
{
|
|
UniValue obj(UniValue::VOBJ);
|
|
obj.push_back(Pair("txid",creditloop[i].GetHex()));
|
|
str[0] = funcid, str[1] = 0;
|
|
obj.push_back(Pair("funcid",str));
|
|
if ( funcid == 'R' && createtxid == zeroid )
|
|
{
|
|
createtxid = creditloop[i];
|
|
obj.push_back(Pair("senderpk",HexStr(pk)));
|
|
Getscriptaddress(coinaddr,CScript() << ParseHex(HexStr(pk)) << OP_CHECKSIG);
|
|
obj.push_back(Pair("senderaddr",coinaddr));
|
|
GetCCaddress(cp,coinaddr,pk);
|
|
obj.push_back(Pair("senderCCaddr",coinaddr));
|
|
}
|
|
else
|
|
{
|
|
obj.push_back(Pair("receiverpk",HexStr(pk)));
|
|
Getscriptaddress(coinaddr,CScript() << ParseHex(HexStr(pk)) << OP_CHECKSIG);
|
|
obj.push_back(Pair("receiveraddr",coinaddr));
|
|
GetCCaddress(cp,coinaddr,pk);
|
|
obj.push_back(Pair("receiverCCaddr",coinaddr));
|
|
}
|
|
Getscriptaddress(coinaddr,tx.vout[0].scriptPubKey);
|
|
obj.push_back(Pair("nextaddress",coinaddr));
|
|
if ( createtxid != refcreatetxid || amount != refamount || matures != refmatures || currency != refcurrency )
|
|
{
|
|
numerrs++;
|
|
obj.push_back(Pair("objerror",(char *)"mismatched createtxid or amount or matures or currency"));
|
|
obj.push_back(Pair("createtxid",createtxid.GetHex()));
|
|
obj.push_back(Pair("amount",ValueFromAmount(amount)));
|
|
obj.push_back(Pair("matures",matures));
|
|
obj.push_back(Pair("currency",currency));
|
|
}
|
|
a.push_back(obj);
|
|
}
|
|
}
|
|
}
|
|
result.push_back(Pair("n",n));
|
|
result.push_back(Pair("numerrors",numerrs));
|
|
result.push_back(Pair("creditloop",a));
|
|
}
|
|
else
|
|
{
|
|
result.push_back(Pair("result",(char *)"error"));
|
|
result.push_back(Pair("error",(char *)"couldnt get batontxid opret"));
|
|
}
|
|
}
|
|
else
|
|
{
|
|
result.push_back(Pair("result",(char *)"error"));
|
|
result.push_back(Pair("error",(char *)"couldnt find batontxid"));
|
|
}
|
|
}
|
|
else
|
|
{
|
|
result.push_back(Pair("result",(char *)"error"));
|
|
result.push_back(Pair("error",(char *)"couldnt get creditloop"));
|
|
}
|
|
return(result);
|
|
}
|
|
|
|
UniValue MarmaraInfo(CPubKey refpk,int32_t firstheight,int32_t lastheight,int64_t minamount,int64_t maxamount,std::string currency)
|
|
{
|
|
UniValue result(UniValue::VOBJ),a(UniValue::VARR); int32_t i,n,matches; int64_t totalamount=0; std::vector<uint256> issuances; char coinaddr[64];
|
|
CPubKey Marmarapk; struct CCcontract_info *cp,C;
|
|
result.push_back(Pair("result","success"));
|
|
Getscriptaddress(coinaddr,CScript() << ParseHex(HexStr(Mypubkey())) << OP_CHECKSIG);
|
|
result.push_back(Pair("myaddress",coinaddr));
|
|
GetCCaddress(cp,coinaddr,Mypubkey());
|
|
result.push_back(Pair("myCCaddress",coinaddr));
|
|
if ( refpk.size() == 33 )
|
|
result.push_back(Pair("issuer",HexStr(refpk)));
|
|
if ( currency.size() == 0 )
|
|
currency = (char *)"MARMARA";
|
|
if ( firstheight <= lastheight )
|
|
firstheight = 0, lastheight = (1 << 30);
|
|
if ( minamount <= maxamount )
|
|
minamount = 0, maxamount = (1LL << 60);
|
|
result.push_back(Pair("firstheight",firstheight));
|
|
result.push_back(Pair("lastheight",lastheight));
|
|
result.push_back(Pair("minamount",ValueFromAmount(minamount)));
|
|
result.push_back(Pair("maxamount",ValueFromAmount(maxamount)));
|
|
result.push_back(Pair("currency",currency));
|
|
cp = CCinit(&C,EVAL_MARMARA);
|
|
Marmarapk = GetUnspendable(cp,0);
|
|
if ( (n= MarmaraGetCreditloops(totalamount,issuances,cp,firstheight,lastheight,minamount,maxamount,refpk,currency)) > 0 )
|
|
{
|
|
result.push_back(Pair("n",n));
|
|
matches = (int32_t)issuances.size();
|
|
result.push_back(Pair("matches",matches));
|
|
for (i=0; i<matches; i++)
|
|
a.push_back(issuances[i].GetHex());
|
|
result.push_back(Pair("issuances",a));
|
|
result.push_back(Pair("totalamount",ValueFromAmount(totalamount)));
|
|
}
|
|
return(result);
|
|
}
|
|
|
|
UniValue MarmaraPoolPayout(uint64_t txfee,int32_t firstheight,double perc,char *jsonstr) // [[pk0, shares0], [pk1, shares1], ...]
|
|
{
|
|
CMutableTransaction mtx = CreateNewContextualCMutableTransaction(Params().GetConsensus(), komodo_nextheight());
|
|
UniValue result(UniValue::VOBJ),a(UniValue::VARR); cJSON *item,*array; std::string rawtx; int32_t i,n; uint8_t buf[33]; CPubKey Marmarapk,pk,poolpk; int64_t payout,poolfee=0,total,totalpayout=0; double poolshares,share,shares = 0.; char *pkstr,*errorstr=0; struct CCcontract_info *cp,C;
|
|
poolpk = pubkey2pk(Mypubkey());
|
|
if ( txfee == 0 )
|
|
txfee = 10000;
|
|
cp = CCinit(&C,EVAL_MARMARA);
|
|
Marmarapk = GetUnspendable(cp,0);
|
|
if ( (array= cJSON_Parse(jsonstr)) != 0 && (n= cJSON_GetArraySize(array)) > 0 )
|
|
{
|
|
for (i=0; i<n; i++)
|
|
{
|
|
item = jitem(array,i);
|
|
if ( (pkstr= jstr(jitem(item,0),0)) != 0 && strlen(pkstr) == 66 )
|
|
shares += jdouble(jitem(item,1),0);
|
|
else
|
|
{
|
|
errorstr = (char *)"all items must be of the form [<pubke>, <shares>]";
|
|
break;
|
|
}
|
|
}
|
|
if ( errorstr == 0 && shares > SMALLVAL )
|
|
{
|
|
shares += shares * perc;
|
|
if ( (total= AddMarmaraCoinbases(cp,mtx,firstheight,poolpk,60)) > 0 )
|
|
{
|
|
for (i=0; i<n; i++)
|
|
{
|
|
item = jitem(array,i);
|
|
if ( (share= jdouble(jitem(item,1),0)) > SMALLVAL )
|
|
{
|
|
payout = (share * (total - txfee)) / shares;
|
|
if ( payout > 0 )
|
|
{
|
|
if ( (pkstr= jstr(jitem(item,0),0)) != 0 && strlen(pkstr) == 66 )
|
|
{
|
|
UniValue x(UniValue::VOBJ);
|
|
totalpayout += payout;
|
|
decode_hex(buf,33,pkstr);
|
|
mtx.vout.push_back(MakeCC1of2vout(EVAL_MARMARA,payout,Marmarapk,buf2pk(buf)));
|
|
x.push_back(Pair(pkstr, (double)payout/COIN));
|
|
a.push_back(x);
|
|
}
|
|
}
|
|
}
|
|
}
|
|
if ( totalpayout > 0 && total > totalpayout-txfee )
|
|
{
|
|
poolfee = (total - totalpayout - txfee);
|
|
mtx.vout.push_back(MakeCC1of2vout(EVAL_MARMARA,poolfee,Marmarapk,poolpk));
|
|
}
|
|
rawtx = FinalizeCCTx(0,cp,mtx,poolpk,txfee,MarmaraCoinbaseOpret('P',firstheight,poolpk));
|
|
if ( rawtx.size() == 0 )
|
|
errorstr = (char *)"couldnt finalize CCtx";
|
|
} else errorstr = (char *)"couldnt find any coinbases to payout";
|
|
}
|
|
else if ( errorstr == 0 )
|
|
errorstr = (char *)"no valid shares submitted";
|
|
free(array);
|
|
} else errorstr = (char *)"couldnt parse poolshares jsonstr";
|
|
if ( rawtx.size() == 0 || errorstr != 0 )
|
|
{
|
|
result.push_back(Pair("result","error"));
|
|
if ( errorstr != 0 )
|
|
result.push_back(Pair("error",errorstr));
|
|
}
|
|
else
|
|
{
|
|
result.push_back(Pair("result",(char *)"success"));
|
|
result.push_back(Pair("rawtx",rawtx));
|
|
if ( totalpayout > 0 && total > totalpayout-txfee )
|
|
{
|
|
result.push_back(Pair("firstheight",firstheight));
|
|
result.push_back(Pair("lastheight",((firstheight / MARMARA_GROUPSIZE)+1) * MARMARA_GROUPSIZE - 1));
|
|
result.push_back(Pair("total",ValueFromAmount(total)));
|
|
result.push_back(Pair("totalpayout",ValueFromAmount(totalpayout)));
|
|
result.push_back(Pair("totalshares",shares));
|
|
result.push_back(Pair("poolfee",ValueFromAmount(poolfee)));
|
|
result.push_back(Pair("perc",ValueFromAmount((int64_t)(100. * (double)poolfee/totalpayout * COIN))));
|
|
result.push_back(Pair("payouts",a));
|
|
}
|
|
}
|
|
return(result);
|
|
}
|
|
|