main.cpp

   1 // Copyright (c) 2009-2010 Satoshi Nakamoto
   2 // Distributed under the MIT/X11 software license, see the accompanying
   3 // file license.txt or http://www.opensource.org/licenses/mit-license.php.
   4
   5 #include "headers.h"
   6 #include "cryptopp/sha.h"
   7
   8
   9
  10
  11
  12 //
  13 // Global state
  14 //
  15
  16 CCriticalSection cs_main;
  17
  18 map<uint256, CTransaction> mapTransactions;
  19 CCriticalSection cs_mapTransactions;
  20 unsigned int nTransactionsUpdated = 0;
  21 map<COutPoint, CInPoint> mapNextTx;
  22
  23 map<uint256, CBlockIndex*> mapBlockIndex;
  24 uint256 hashGenesisBlock("0x000000000019d6689c085ae165831e934ff763ae46a2a6c172b3f1b60a8ce26f");
  25 CBigNum bnProofOfWorkLimit(~uint256(0) >> 32);
  26 CBlockIndex* pindexGenesisBlock = NULL;
  27 int nBestHeight = -1;
  28 CBigNum bnBestChainWork = 0;
  29 CBigNum bnBestInvalidWork = 0;
  30 uint256 hashBestChain = 0;
  31 CBlockIndex* pindexBest = NULL;
  32 int64 nTimeBestReceived = 0;
  33
  34 map<uint256, CBlock*> mapOrphanBlocks;
  35 multimap<uint256, CBlock*> mapOrphanBlocksByPrev;
  36
  37 map<uint256, CDataStream*> mapOrphanTransactions;
  38 multimap<uint256, CDataStream*> mapOrphanTransactionsByPrev;
  39
  40 map<uint256, CWalletTx> mapWallet;
  41 vector<uint256> vWalletUpdated;
  42 CCriticalSection cs_mapWallet;
  43
  44 map<vector<unsigned char>, CPrivKey> mapKeys;
  45 map<uint160, vector<unsigned char> > mapPubKeys;
  46 CCriticalSection cs_mapKeys;
  47 CKey keyUser;
  48
  49 map<uint256, int> mapRequestCount;
  50 CCriticalSection cs_mapRequestCount;
  51
  52 map<string, string> mapAddressBook;
  53 CCriticalSection cs_mapAddressBook;
  54
  55 vector<unsigned char> vchDefaultKey;
  56
  57 double dHashesPerSec;
  58 int64 nHPSTimerStart;
  59
  60 // Settings
  61 int fGenerateBitcoins = false;
  62 int64 nTransactionFee = 0;
  63 CAddress addrIncoming;
  64 int fLimitProcessors = false;
  65 int nLimitProcessors = 1;
  66 int fMinimizeToTray = true;
  67 int fMinimizeOnClose = true;
  68
  69
  70
  71
  72
  73
  74 //////////////////////////////////////////////////////////////////////////////
  75 //
  76 // mapKeys
  77 //
  78
  79 bool AddKey(const CKey& key)
  80 {
  81     CRITICAL_BLOCK(cs_mapKeys)
  82     {
  83         mapKeys[key.GetPubKey()] = key.GetPrivKey();
  84         mapPubKeys[Hash160(key.GetPubKey())] = key.GetPubKey();
  85     }
  86     return CWalletDB().WriteKey(key.GetPubKey(), key.GetPrivKey());
  87 }
  88
  89 vector<unsigned char> GenerateNewKey()
  90 {
  91     RandAddSeedPerfmon();
  92     CKey key;
  93     key.MakeNewKey();
  94     if (!AddKey(key))
  95         throw runtime_error("GenerateNewKey() : AddKey failed");
  96     return key.GetPubKey();
  97 }
  98
  99
 100
 101
 102 //////////////////////////////////////////////////////////////////////////////
 103 //
 104 // mapWallet
 105 //
 106
 107 bool AddToWallet(const CWalletTx& wtxIn)
 108 {
 109     uint256 hash = wtxIn.GetHash();
 110     CRITICAL_BLOCK(cs_mapWallet)
 111     {
 112         // Inserts only if not already there, returns tx inserted or tx found
 113         pair<map<uint256, CWalletTx>::iterator, bool> ret = mapWallet.insert(make_pair(hash, wtxIn));
 114         CWalletTx& wtx = (*ret.first).second;
 115         bool fInsertedNew = ret.second;
 116         if (fInsertedNew)
 117             wtx.nTimeReceived = GetAdjustedTime();
 118
 119         bool fUpdated = false;
 120         if (!fInsertedNew)
 121         {
 122             // Merge
 123             if (wtxIn.hashBlock != 0 && wtxIn.hashBlock != wtx.hashBlock)
 124             {
 125                 wtx.hashBlock = wtxIn.hashBlock;
 126                 fUpdated = true;
 127             }
 128             if (wtxIn.nIndex != -1 && (wtxIn.vMerkleBranch != wtx.vMerkleBranch || wtxIn.nIndex != wtx.nIndex))
 129             {
 130                 wtx.vMerkleBranch = wtxIn.vMerkleBranch;
 131                 wtx.nIndex = wtxIn.nIndex;
 132                 fUpdated = true;
 133             }
 134             if (wtxIn.fFromMe && wtxIn.fFromMe != wtx.fFromMe)
 135             {
 136                 wtx.fFromMe = wtxIn.fFromMe;
 137                 fUpdated = true;
 138             }
 139             if (wtxIn.fSpent && wtxIn.fSpent != wtx.fSpent)
 140             {
 141                 wtx.fSpent = wtxIn.fSpent;
 142                 fUpdated = true;
 143             }
 144         }
 145
 146         //// debug print
 147         printf("AddToWallet %s  %s%s\n", wtxIn.GetHash().ToString().substr(0,10).c_str(), (fInsertedNew ? "new" : ""), (fUpdated ? "update" : ""));
 148
 149         // Write to disk
 150         if (fInsertedNew || fUpdated)
 151             if (!wtx.WriteToDisk())
 152                 return false;
 153
 154         // If default receiving address gets used, replace it with a new one
 155         CScript scriptDefaultKey;
 156         scriptDefaultKey.SetBitcoinAddress(vchDefaultKey);
 157         foreach(const CTxOut& txout, wtx.vout)
 158         {
 159             if (txout.scriptPubKey == scriptDefaultKey)
 160             {
 161                 CWalletDB walletdb;
 162                 vchDefaultKey = GetKeyFromKeyPool();
 163                 walletdb.WriteDefaultKey(vchDefaultKey);
 164                 walletdb.WriteName(PubKeyToAddress(vchDefaultKey), "");
 165             }
 166         }
 167
 168         // Notify UI
 169         vWalletUpdated.push_back(hash);
 170     }
 171
 172     // Refresh UI
 173     MainFrameRepaint();
 174     return true;
 175 }
 176
 177 bool AddToWalletIfMine(const CTransaction& tx, const CBlock* pblock)
 178 {
 179     if (tx.IsMine() || mapWallet.count(tx.GetHash()))
 180     {
 181         CWalletTx wtx(tx);
 182         // Get merkle branch if transaction was found in a block
 183         if (pblock)
 184             wtx.SetMerkleBranch(pblock);
 185         return AddToWallet(wtx);
 186     }
 187     return true;
 188 }
 189
 190 bool AddToWalletIfFromMe(const CTransaction& tx, const CBlock* pblock)
 191 {
 192     if (tx.IsFromMe() || mapWallet.count(tx.GetHash()))
 193     {
 194         CWalletTx wtx(tx);
 195         // Get merkle branch if transaction was found in a block
 196         if (pblock)
 197             wtx.SetMerkleBranch(pblock);
 198         return AddToWallet(wtx);
 199     }
 200     return true;
 201 }
 202
 203 bool EraseFromWallet(uint256 hash)
 204 {
 205     CRITICAL_BLOCK(cs_mapWallet)
 206     {
 207         if (mapWallet.erase(hash))
 208             CWalletDB().EraseTx(hash);
 209     }
 210     return true;
 211 }
 212
 213 void WalletUpdateSpent(const COutPoint& prevout)
 214 {
 215     // Anytime a signature is successfully verified, it's proof the outpoint is spent.
 216     // Update the wallet spent flag if it doesn't know due to wallet.dat being
 217     // restored from backup or the user making copies of wallet.dat.
 218     CRITICAL_BLOCK(cs_mapWallet)
 219     {
 220         map<uint256, CWalletTx>::iterator mi = mapWallet.find(prevout.hash);
 221         if (mi != mapWallet.end())
 222         {
 223             CWalletTx& wtx = (*mi).second;
 224             if (!wtx.fSpent && wtx.vout[prevout.n].IsMine())
 225             {
 226                 printf("WalletUpdateSpent found spent coin %sbc %s\n", FormatMoney(wtx.GetCredit()).c_str(), wtx.GetHash().ToString().c_str());
 227                 wtx.fSpent = true;
 228                 wtx.WriteToDisk();
 229                 vWalletUpdated.push_back(prevout.hash);
 230             }
 231         }
 232     }
 233 }
 234
 235
 236
 237
 238
 239
 240
 241
 242 //////////////////////////////////////////////////////////////////////////////
 243 //
 244 // mapOrphanTransactions
 245 //
 246
 247 void AddOrphanTx(const CDataStream& vMsg)
 248 {
 249     CTransaction tx;
 250     CDataStream(vMsg) >> tx;
 251     uint256 hash = tx.GetHash();
 252     if (mapOrphanTransactions.count(hash))
 253         return;
 254     CDataStream* pvMsg = mapOrphanTransactions[hash] = new CDataStream(vMsg);
 255     foreach(const CTxIn& txin, tx.vin)
 256         mapOrphanTransactionsByPrev.insert(make_pair(txin.prevout.hash, pvMsg));
 257 }
 258
 259 void EraseOrphanTx(uint256 hash)
 260 {
 261     if (!mapOrphanTransactions.count(hash))
 262         return;
 263     const CDataStream* pvMsg = mapOrphanTransactions[hash];
 264     CTransaction tx;
 265     CDataStream(*pvMsg) >> tx;
 266     foreach(const CTxIn& txin, tx.vin)
 267     {
 268         for (multimap<uint256, CDataStream*>::iterator mi = mapOrphanTransactionsByPrev.lower_bound(txin.prevout.hash);
 269              mi != mapOrphanTransactionsByPrev.upper_bound(txin.prevout.hash);)
 270         {
 271             if ((*mi).second == pvMsg)
 272                 mapOrphanTransactionsByPrev.erase(mi++);
 273             else
 274                 mi++;
 275         }
 276     }
 277     delete pvMsg;
 278     mapOrphanTransactions.erase(hash);
 279 }
 280
 281
 282
 283
 284
 285
 286
 287
 288 //////////////////////////////////////////////////////////////////////////////
 289 //
 290 // CTransaction and CTxIndex
 291 //
 292
 293 bool CTransaction::ReadFromDisk(CTxDB& txdb, COutPoint prevout, CTxIndex& txindexRet)
 294 {
 295     SetNull();
 296     if (!txdb.ReadTxIndex(prevout.hash, txindexRet))
 297         return false;
 298     if (!ReadFromDisk(txindexRet.pos))
 299         return false;
 300     if (prevout.n >= vout.size())
 301     {
 302         SetNull();
 303         return false;
 304     }
 305     return true;
 306 }
 307
 308 bool CTransaction::ReadFromDisk(CTxDB& txdb, COutPoint prevout)
 309 {
 310     CTxIndex txindex;
 311     return ReadFromDisk(txdb, prevout, txindex);
 312 }
 313
 314 bool CTransaction::ReadFromDisk(COutPoint prevout)
 315 {
 316     CTxDB txdb("r");
 317     CTxIndex txindex;
 318     return ReadFromDisk(txdb, prevout, txindex);
 319 }
 320
 321 bool CTxIn::IsMine() const
 322 {
 323     CRITICAL_BLOCK(cs_mapWallet)
 324     {
 325         map<uint256, CWalletTx>::iterator mi = mapWallet.find(prevout.hash);
 326         if (mi != mapWallet.end())
 327         {
 328             const CWalletTx& prev = (*mi).second;
 329             if (prevout.n < prev.vout.size())
 330                 if (prev.vout[prevout.n].IsMine())
 331                     return true;
 332         }
 333     }
 334     return false;
 335 }
 336
 337 int64 CTxIn::GetDebit() const
 338 {
 339     CRITICAL_BLOCK(cs_mapWallet)
 340     {
 341         map<uint256, CWalletTx>::iterator mi = mapWallet.find(prevout.hash);
 342         if (mi != mapWallet.end())
 343         {
 344             const CWalletTx& prev = (*mi).second;
 345             if (prevout.n < prev.vout.size())
 346                 if (prev.vout[prevout.n].IsMine())
 347                     return prev.vout[prevout.n].nValue;
 348         }
 349     }
 350     return 0;
 351 }
 352
 353 int64 CWalletTx::GetTxTime() const
 354 {
 355     if (!fTimeReceivedIsTxTime && hashBlock != 0)
 356     {
 357         // If we did not receive the transaction directly, we rely on the block's
 358         // time to figure out when it happened.  We use the median over a range
 359         // of blocks to try to filter out inaccurate block times.
 360         map<uint256, CBlockIndex*>::iterator mi = mapBlockIndex.find(hashBlock);
 361         if (mi != mapBlockIndex.end())
 362         {
 363             CBlockIndex* pindex = (*mi).second;
 364             if (pindex)
 365                 return pindex->GetMedianTime();
 366         }
 367     }
 368     return nTimeReceived;
 369 }
 370
 371 int CWalletTx::GetRequestCount() const
 372 {
 373     // Returns -1 if it wasn't being tracked
 374     int nRequests = -1;
 375     CRITICAL_BLOCK(cs_mapRequestCount)
 376     {
 377         if (IsCoinBase())
 378         {
 379             // Generated block
 380             if (hashBlock != 0)
 381             {
 382                 map<uint256, int>::iterator mi = mapRequestCount.find(hashBlock);
 383                 if (mi != mapRequestCount.end())
 384                     nRequests = (*mi).second;
 385             }
 386         }
 387         else
 388         {
 389             // Did anyone request this transaction?
 390             map<uint256, int>::iterator mi = mapRequestCount.find(GetHash());
 391             if (mi != mapRequestCount.end())
 392             {
 393                 nRequests = (*mi).second;
 394
 395                 // How about the block it's in?
 396                 if (nRequests == 0 && hashBlock != 0)
 397                 {
 398                     map<uint256, int>::iterator mi = mapRequestCount.find(hashBlock);
 399                     if (mi != mapRequestCount.end())
 400                         nRequests = (*mi).second;
 401                     else
 402                         nRequests = 1; // If it's in someone else's block it must have got out
 403                 }
 404             }
 405         }
 406     }
 407     return nRequests;
 408 }
 409
 410 void CWalletTx::GetAmounts(int64& nGenerated, list<pair<string, int64> >& listReceived,
 411                            list<pair<string, int64> >& listSent, int64& nFee, string& strSentAccount) const
 412 {
 413     nGenerated = nFee = 0;
 414     listReceived.clear();
 415     listSent.clear();
 416     strSentAccount = strFromAccount;
 417
 418     if (IsCoinBase())
 419     {
 420         if (GetDepthInMainChain() >= COINBASE_MATURITY)
 421             nGenerated = GetCredit();
 422         return;
 423     }
 424
 425     // Compute fee:
 426     int64 nDebit = GetDebit();
 427     if (nDebit > 0) // debit>0 means we signed/sent this transaction
 428     {
 429         int64 nValueOut = GetValueOut();
 430         nFee = nDebit - nValueOut;
 431     }
 432
 433     // Sent/received.  Standard client will never generate a send-to-multiple-recipients,
 434     // but non-standard clients might (so return a list of address/amount pairs)
 435     foreach(const CTxOut& txout, vout)
 436     {
 437         string address;
 438         uint160 hash160;
 439         vector<unsigned char> vchPubKey;
 440         if (ExtractHash160(txout.scriptPubKey, hash160))
 441             address = Hash160ToAddress(hash160);
 442         else if (ExtractPubKey(txout.scriptPubKey, false, vchPubKey))
 443             address = PubKeyToAddress(vchPubKey);
 444         else
 445         {
 446             printf("CWalletTx::GetAmounts: Unknown transaction type found, txid %s\n",
 447                    this->GetHash().ToString().c_str());
 448             address = " unknown ";
 449         }
 450
 451         // Don't report 'change' txouts
 452         if (nDebit > 0 && txout.IsChange())
 453             continue;
 454
 455         if (nDebit > 0)
 456             listSent.push_back(make_pair(address, txout.nValue));
 457
 458         if (txout.IsMine())
 459             listReceived.push_back(make_pair(address, txout.nValue));
 460     }
 461
 462 }
 463
 464 void CWalletTx::GetAccountAmounts(const string& strAccount, int64& nGenerated, int64& nReceived,
 465                                   int64& nSent, int64& nFee) const
 466 {
 467     nGenerated = nReceived = nSent = nFee = 0;
 468
 469     int64 allGenerated, allFee;
 470     allGenerated = allFee = 0;
 471     string strSentAccount;
 472     list<pair<string, int64> > listReceived;
 473     list<pair<string, int64> > listSent;
 474     GetAmounts(allGenerated, listReceived, listSent, allFee, strSentAccount);
 475
 476     if (strAccount == "")
 477         nGenerated = allGenerated;
 478     if (strAccount == strSentAccount)
 479     {
 480         foreach(const PAIRTYPE(string,int64)& s, listSent)
 481             nSent += s.second;
 482         nFee = allFee;
 483     }
 484     CRITICAL_BLOCK(cs_mapAddressBook)
 485     {
 486         foreach(const PAIRTYPE(string,int64)& r, listReceived)
 487         {
 488             if (mapAddressBook.count(r.first))
 489             {
 490                 if (mapAddressBook[r.first] == strAccount)
 491                 {
 492                     nReceived += r.second;
 493                 }
 494             }
 495             else if (strAccount.empty())
 496             {
 497                 nReceived += r.second;
 498             }
 499         }
 500     }
 501 }
 502
 503
 504
 505 int CMerkleTx::SetMerkleBranch(const CBlock* pblock)
 506 {
 507     if (fClient)
 508     {
 509         if (hashBlock == 0)
 510             return 0;
 511     }
 512     else
 513     {
 514         CBlock blockTmp;
 515         if (pblock == NULL)
 516         {
 517             // Load the block this tx is in
 518             CTxIndex txindex;
 519             if (!CTxDB("r").ReadTxIndex(GetHash(), txindex))
 520                 return 0;
 521             if (!blockTmp.ReadFromDisk(txindex.pos.nFile, txindex.pos.nBlockPos))
 522                 return 0;
 523             pblock = &blockTmp;
 524         }
 525
 526         // Update the tx's hashBlock
 527         hashBlock = pblock->GetHash();
 528
 529         // Locate the transaction
 530         for (nIndex = 0; nIndex < pblock->vtx.size(); nIndex++)
 531             if (pblock->vtx[nIndex] == *(CTransaction*)this)
 532                 break;
 533         if (nIndex == pblock->vtx.size())
 534         {
 535             vMerkleBranch.clear();
 536             nIndex = -1;
 537             printf("ERROR: SetMerkleBranch() : couldn't find tx in block\n");
 538             return 0;
 539         }
 540
 541         // Fill in merkle branch
 542         vMerkleBranch = pblock->GetMerkleBranch(nIndex);
 543     }
 544
 545     // Is the tx in a block that's in the main chain
 546     map<uint256, CBlockIndex*>::iterator mi = mapBlockIndex.find(hashBlock);
 547     if (mi == mapBlockIndex.end())
 548         return 0;
 549     CBlockIndex* pindex = (*mi).second;
 550     if (!pindex || !pindex->IsInMainChain())
 551         return 0;
 552
 553     return pindexBest->nHeight - pindex->nHeight + 1;
 554 }
 555
 556
 557
 558 void CWalletTx::AddSupportingTransactions(CTxDB& txdb)
 559 {
 560     vtxPrev.clear();
 561
 562     const int COPY_DEPTH = 3;
 563     if (SetMerkleBranch() < COPY_DEPTH)
 564     {
 565         vector<uint256> vWorkQueue;
 566         foreach(const CTxIn& txin, vin)
 567             vWorkQueue.push_back(txin.prevout.hash);
 568
 569         // This critsect is OK because txdb is already open
 570         CRITICAL_BLOCK(cs_mapWallet)
 571         {
 572             map<uint256, const CMerkleTx*> mapWalletPrev;
 573             set<uint256> setAlreadyDone;
 574             for (int i = 0; i < vWorkQueue.size(); i++)
 575             {
 576                 uint256 hash = vWorkQueue[i];
 577                 if (setAlreadyDone.count(hash))
 578                     continue;
 579                 setAlreadyDone.insert(hash);
 580
 581                 CMerkleTx tx;
 582                 if (mapWallet.count(hash))
 583                 {
 584                     tx = mapWallet[hash];
 585                     foreach(const CMerkleTx& txWalletPrev, mapWallet[hash].vtxPrev)
 586                         mapWalletPrev[txWalletPrev.GetHash()] = &txWalletPrev;
 587                 }
 588                 else if (mapWalletPrev.count(hash))
 589                 {
 590                     tx = *mapWalletPrev[hash];
 591                 }
 592                 else if (!fClient && txdb.ReadDiskTx(hash, tx))
 593                 {
 594                     ;
 595                 }
 596                 else
 597                 {
 598                     printf("ERROR: AddSupportingTransactions() : unsupported transaction\n");
 599                     continue;
 600                 }
 601
 602                 int nDepth = tx.SetMerkleBranch();
 603                 vtxPrev.push_back(tx);
 604
 605                 if (nDepth < COPY_DEPTH)
 606                     foreach(const CTxIn& txin, tx.vin)
 607                         vWorkQueue.push_back(txin.prevout.hash);
 608             }
 609         }
 610     }
 611
 612     reverse(vtxPrev.begin(), vtxPrev.end());
 613 }
 614
 615
 616
 617
 618
 619
 620
 621
 622
 623
 624
 625 bool CTransaction::CheckTransaction() const
 626 {
 627     // Basic checks that don't depend on any context
 628     if (vin.empty() || vout.empty())
 629         return error("CTransaction::CheckTransaction() : vin or vout empty");
 630
 631     // Size limits
 632     if (::GetSerializeSize(*this, SER_NETWORK) > MAX_BLOCK_SIZE)
 633         return error("CTransaction::CheckTransaction() : size limits failed");
 634
 635     // Check for negative or overflow output values
 636     int64 nValueOut = 0;
 637     foreach(const CTxOut& txout, vout)
 638     {
 639         if (txout.nValue < 0)
 640             return error("CTransaction::CheckTransaction() : txout.nValue negative");
 641         if (txout.nValue > MAX_MONEY)
 642             return error("CTransaction::CheckTransaction() : txout.nValue too high");
 643         nValueOut += txout.nValue;
 644         if (!MoneyRange(nValueOut))
 645             return error("CTransaction::CheckTransaction() : txout total out of range");
 646     }
 647
 648     if (IsCoinBase())
 649     {
 650         if (vin[0].scriptSig.size() < 2 || vin[0].scriptSig.size() > 100)
 651             return error("CTransaction::CheckTransaction() : coinbase script size");
 652     }
 653     else
 654     {
 655         foreach(const CTxIn& txin, vin)
 656             if (txin.prevout.IsNull())
 657                 return error("CTransaction::CheckTransaction() : prevout is null");
 658     }
 659
 660     return true;
 661 }
 662
 663 bool CTransaction::AcceptToMemoryPool(CTxDB& txdb, bool fCheckInputs, bool* pfMissingInputs)
 664 {
 665     if (pfMissingInputs)
 666         *pfMissingInputs = false;
 667
 668     if (!CheckTransaction())
 669         return error("AcceptToMemoryPool() : CheckTransaction failed");
 670
 671     // Coinbase is only valid in a block, not as a loose transaction
 672     if (IsCoinBase())
 673         return error("AcceptToMemoryPool() : coinbase as individual tx");
 674
 675     // To help v0.1.5 clients who would see it as a negative number
 676     if ((int64)nLockTime > INT_MAX)
 677         return error("AcceptToMemoryPool() : not accepting nLockTime beyond 2038 yet");
 678
 679     // Safety limits
 680     unsigned int nSize = ::GetSerializeSize(*this, SER_NETWORK);
 681     if (GetSigOpCount() > 2 || nSize < 100)
 682         return error("AcceptToMemoryPool() : nonstandard transaction");
 683
 684     // Rather not work on nonstandard transactions
 685     if (!IsStandard())
 686         return error("AcceptToMemoryPool() : nonstandard transaction type");
 687
 688     // Do we already have it?
 689     uint256 hash = GetHash();
 690     CRITICAL_BLOCK(cs_mapTransactions)
 691         if (mapTransactions.count(hash))
 692             return false;
 693     if (fCheckInputs)
 694         if (txdb.ContainsTx(hash))
 695             return false;
 696
 697     // Check for conflicts with in-memory transactions
 698     CTransaction* ptxOld = NULL;
 699     for (int i = 0; i < vin.size(); i++)
 700     {
 701         COutPoint outpoint = vin[i].prevout;
 702         if (mapNextTx.count(outpoint))
 703         {
 704             // Disable replacement feature for now
 705             return false;
 706
 707             // Allow replacing with a newer version of the same transaction
 708             if (i != 0)
 709                 return false;
 710             ptxOld = mapNextTx[outpoint].ptx;
 711             if (ptxOld->IsFinal())
 712                 return false;
 713             if (!IsNewerThan(*ptxOld))
 714                 return false;
 715             for (int i = 0; i < vin.size(); i++)
 716             {
 717                 COutPoint outpoint = vin[i].prevout;
 718                 if (!mapNextTx.count(outpoint) || mapNextTx[outpoint].ptx != ptxOld)
 719                     return false;
 720             }
 721             break;
 722         }
 723     }
 724
 725     if (fCheckInputs)
 726     {
 727         // Check against previous transactions
 728         map<uint256, CTxIndex> mapUnused;
 729         int64 nFees = 0;
 730         if (!ConnectInputs(txdb, mapUnused, CDiskTxPos(1,1,1), pindexBest, nFees, false, false))
 731         {
 732             if (pfMissingInputs)
 733                 *pfMissingInputs = true;
 734             return error("AcceptToMemoryPool() : ConnectInputs failed %s", hash.ToString().substr(0,10).c_str());
 735         }
 736
 737         // Don't accept it if it can't get into a block
 738         if (nFees < GetMinFee(1000))
 739             return error("AcceptToMemoryPool() : not enough fees");
 740
 741         // Continuously rate-limit free transactions
 742         // This mitigates 'penny-flooding' -- sending thousands of free transactions just to
 743         // be annoying or make other's transactions take longer to confirm.
 744         if (nFees < CENT)
 745         {
 746             static CCriticalSection cs;
 747             static double dFreeCount;
 748             static int64 nLastTime;
 749             int64 nNow = GetTime();
 750
 751             CRITICAL_BLOCK(cs)
 752             {
 753                 // Use an exponentially decaying ~10-minute window:
 754                 dFreeCount *= pow(1.0 - 1.0/600.0, (double)(nNow - nLastTime));
 755                 nLastTime = nNow;
 756                 // -limitfreerelay unit is thousand-bytes-per-minute
 757                 // At default rate it would take over a month to fill 1GB
 758                 if (dFreeCount > GetArg("-limitfreerelay", 15)*10*1000 && !IsFromMe())
 759                     return error("AcceptToMemoryPool() : free transaction rejected by rate limiter");
 760                 if (fDebug)
 761                     printf("Rate limit dFreeCount: %g => %g\n", dFreeCount, dFreeCount+nSize);
 762                 dFreeCount += nSize;
 763             }
 764         }
 765     }
 766
 767     // Store transaction in memory
 768     CRITICAL_BLOCK(cs_mapTransactions)
 769     {
 770         if (ptxOld)
 771         {
 772             printf("AcceptToMemoryPool() : replacing tx %s with new version\n", ptxOld->GetHash().ToString().c_str());
 773             ptxOld->RemoveFromMemoryPool();
 774         }
 775         AddToMemoryPoolUnchecked();
 776     }
 777
 778     ///// are we sure this is ok when loading transactions or restoring block txes
 779     // If updated, erase old tx from wallet
 780     if (ptxOld)
 781         EraseFromWallet(ptxOld->GetHash());
 782
 783     printf("AcceptToMemoryPool(): accepted %s\n", hash.ToString().substr(0,10).c_str());
 784     return true;
 785 }
 786
 787
 788 bool CTransaction::AddToMemoryPoolUnchecked()
 789 {
 790     // Add to memory pool without checking anything.  Don't call this directly,
 791     // call AcceptToMemoryPool to properly check the transaction first.
 792     CRITICAL_BLOCK(cs_mapTransactions)
 793     {
 794         uint256 hash = GetHash();
 795         mapTransactions[hash] = *this;
 796         for (int i = 0; i < vin.size(); i++)
 797             mapNextTx[vin[i].prevout] = CInPoint(&mapTransactions[hash], i);
 798         nTransactionsUpdated++;
 799     }
 800     return true;
 801 }
 802
 803
 804 bool CTransaction::RemoveFromMemoryPool()
 805 {
 806     // Remove transaction from memory pool
 807     CRITICAL_BLOCK(cs_mapTransactions)
 808     {
 809         foreach(const CTxIn& txin, vin)
 810             mapNextTx.erase(txin.prevout);
 811         mapTransactions.erase(GetHash());
 812         nTransactionsUpdated++;
 813     }
 814     return true;
 815 }
 816
 817
 818
 819
 820
 821
 822 int CMerkleTx::GetDepthInMainChain(int& nHeightRet) const
 823 {
 824     if (hashBlock == 0 || nIndex == -1)
 825         return 0;
 826
 827     // Find the block it claims to be in
 828     map<uint256, CBlockIndex*>::iterator mi = mapBlockIndex.find(hashBlock);
 829     if (mi == mapBlockIndex.end())
 830         return 0;
 831     CBlockIndex* pindex = (*mi).second;
 832     if (!pindex || !pindex->IsInMainChain())
 833         return 0;
 834
 835     // Make sure the merkle branch connects to this block
 836     if (!fMerkleVerified)
 837     {
 838         if (CBlock::CheckMerkleBranch(GetHash(), vMerkleBranch, nIndex) != pindex->hashMerkleRoot)
 839             return 0;
 840         fMerkleVerified = true;
 841     }
 842
 843     nHeightRet = pindex->nHeight;
 844     return pindexBest->nHeight - pindex->nHeight + 1;
 845 }
 846
 847
 848 int CMerkleTx::GetBlocksToMaturity() const
 849 {
 850     if (!IsCoinBase())
 851         return 0;
 852     return max(0, (COINBASE_MATURITY+20) - GetDepthInMainChain());
 853 }
 854
 855
 856 bool CMerkleTx::AcceptToMemoryPool(CTxDB& txdb, bool fCheckInputs)
 857 {
 858     if (fClient)
 859     {
 860         if (!IsInMainChain() && !ClientConnectInputs())
 861             return false;
 862         return CTransaction::AcceptToMemoryPool(txdb, false);
 863     }
 864     else
 865     {
 866         return CTransaction::AcceptToMemoryPool(txdb, fCheckInputs);
 867     }
 868 }
 869
 870
 871
 872 bool CWalletTx::AcceptWalletTransaction(CTxDB& txdb, bool fCheckInputs)
 873 {
 874     CRITICAL_BLOCK(cs_mapTransactions)
 875     {
 876         // Add previous supporting transactions first
 877         foreach(CMerkleTx& tx, vtxPrev)
 878         {
 879             if (!tx.IsCoinBase())
 880             {
 881                 uint256 hash = tx.GetHash();
 882                 if (!mapTransactions.count(hash) && !txdb.ContainsTx(hash))
 883                     tx.AcceptToMemoryPool(txdb, fCheckInputs);
 884             }
 885         }
 886         return AcceptToMemoryPool(txdb, fCheckInputs);
 887     }
 888     return false;
 889 }
 890
 891 int ScanForWalletTransactions(CBlockIndex* pindexStart)
 892 {
 893     int ret = 0;
 894
 895     CBlockIndex* pindex = pindexStart;
 896     CRITICAL_BLOCK(cs_mapWallet)
 897     {
 898         while (pindex)
 899         {
 900             CBlock block;
 901             block.ReadFromDisk(pindex, true);
 902             foreach(CTransaction& tx, block.vtx)
 903             {
 904                 uint256 hash = tx.GetHash();
 905                 if (mapWallet.count(hash)) continue;
 906                 AddToWalletIfMine(tx, &block);
 907                 if (mapWallet.count(hash))
 908                 {
 909                     ++ret;
 910                     printf("Added missing RECEIVE %s\n", hash.ToString().c_str());
 911                     continue;
 912                 }
 913                 AddToWalletIfFromMe(tx, &block);
 914                 if (mapWallet.count(hash))
 915                 {
 916                     ++ret;
 917                     printf("Added missing SEND %s\n", hash.ToString().c_str());
 918                     continue;
 919                 }
 920             }
 921             pindex = pindex->pnext;
 922         }
 923     }
 924     return ret;
 925 }
 926
 927 void ReacceptWalletTransactions()
 928 {
 929     CTxDB txdb("r");
 930     bool fRepeat = true;
 931     while (fRepeat) CRITICAL_BLOCK(cs_mapWallet)
 932     {
 933         fRepeat = false;
 934         vector<CDiskTxPos> vMissingTx;
 935         foreach(PAIRTYPE(const uint256, CWalletTx)& item, mapWallet)
 936         {
 937             CWalletTx& wtx = item.second;
 938             if (wtx.fSpent && wtx.IsCoinBase())
 939                 continue;
 940
 941             CTxIndex txindex;
 942             if (txdb.ReadTxIndex(wtx.GetHash(), txindex))
 943             {
 944                 // Update fSpent if a tx got spent somewhere else by a copy of wallet.dat
 945                 if (!wtx.fSpent)
 946                 {
 947                     if (txindex.vSpent.size() != wtx.vout.size())
 948                     {
 949                         printf("ERROR: ReacceptWalletTransactions() : txindex.vSpent.size() %d != wtx.vout.size() %d\n", txindex.vSpent.size(), wtx.vout.size());
 950                         continue;
 951                     }
 952                     for (int i = 0; i < txindex.vSpent.size(); i++)
 953                     {
 954                         if (!txindex.vSpent[i].IsNull() && wtx.vout[i].IsMine())
 955                         {
 956                             wtx.fSpent = true;
 957                             vMissingTx.push_back(txindex.vSpent[i]);
 958                         }
 959                     }
 960                     if (wtx.fSpent)
 961                     {
 962                         printf("ReacceptWalletTransactions found spent coin %sbc %s\n", FormatMoney(wtx.GetCredit()).c_str(), wtx.GetHash().ToString().c_str());
 963                         wtx.WriteToDisk();
 964                     }
 965                 }
 966             }
 967             else
 968             {
 969                 // Reaccept any txes of ours that aren't already in a block
 970                 if (!wtx.IsCoinBase())
 971                     wtx.AcceptWalletTransaction(txdb, false);
 972             }
 973         }
 974         if (!vMissingTx.empty())
 975         {
 976             // TODO: optimize this to scan just part of the block chain?
 977             if (ScanForWalletTransactions(pindexGenesisBlock))
 978                 fRepeat = true;  // Found missing transactions: re-do Reaccept.
 979         }
 980     }
 981 }
 982
 983
 984 void CWalletTx::RelayWalletTransaction(CTxDB& txdb)
 985 {
 986     foreach(const CMerkleTx& tx, vtxPrev)
 987     {
 988         if (!tx.IsCoinBase())
 989         {
 990             uint256 hash = tx.GetHash();
 991             if (!txdb.ContainsTx(hash))
 992                 RelayMessage(CInv(MSG_TX, hash), (CTransaction)tx);
 993         }
 994     }
 995     if (!IsCoinBase())
 996     {
 997         uint256 hash = GetHash();
 998         if (!txdb.ContainsTx(hash))
 999         {
1000             printf("Relaying wtx %s\n", hash.ToString().substr(0,10).c_str());
1001             RelayMessage(CInv(MSG_TX, hash), (CTransaction)*this);
1002         }
1003     }
1004 }
1005
1006 void ResendWalletTransactions()
1007 {
1008     // Do this infrequently and randomly to avoid giving away
1009     // that these are our transactions.
1010     static int64 nNextTime;
1011     if (GetTime() < nNextTime)
1012         return;
1013     bool fFirst = (nNextTime == 0);
1014     nNextTime = GetTime() + GetRand(30 * 60);
1015     if (fFirst)
1016         return;
1017
1018     // Only do it if there's been a new block since last time
1019     static int64 nLastTime;
1020     if (nTimeBestReceived < nLastTime)
1021         return;
1022     nLastTime = GetTime();
1023
1024     // Rebroadcast any of our txes that aren't in a block yet
1025     printf("ResendWalletTransactions()\n");
1026     CTxDB txdb("r");
1027     CRITICAL_BLOCK(cs_mapWallet)
1028     {
1029         // Sort them in chronological order
1030         multimap<unsigned int, CWalletTx*> mapSorted;
1031         foreach(PAIRTYPE(const uint256, CWalletTx)& item, mapWallet)
1032         {
1033             CWalletTx& wtx = item.second;
1034             // Don't rebroadcast until it's had plenty of time that
1035             // it should have gotten in already by now.
1036             if (nTimeBestReceived - (int64)wtx.nTimeReceived > 5 * 60)
1037                 mapSorted.insert(make_pair(wtx.nTimeReceived, &wtx));
1038         }
1039         foreach(PAIRTYPE(const unsigned int, CWalletTx*)& item, mapSorted)
1040         {
1041             CWalletTx& wtx = *item.second;
1042             wtx.RelayWalletTransaction(txdb);
1043         }
1044     }
1045 }
1046
1047 int CTxIndex::GetDepthInMainChain() const
1048 {
1049     // Read block header
1050     CBlock block;
1051     if (!block.ReadFromDisk(pos.nFile, pos.nBlockPos, false))
1052         return 0;
1053     // Find the block in the index
1054     map<uint256, CBlockIndex*>::iterator mi = mapBlockIndex.find(block.GetHash());
1055     if (mi == mapBlockIndex.end())
1056         return 0;
1057     CBlockIndex* pindex = (*mi).second;
1058     if (!pindex || !pindex->IsInMainChain())
1059         return 0;
1060     return 1 + nBestHeight - pindex->nHeight;
1061 }
1062
1063
1064
1065
1066
1067
1068
1069
1070
1071
1072 //////////////////////////////////////////////////////////////////////////////
1073 //
1074 // CBlock and CBlockIndex
1075 //
1076
1077 bool CBlock::ReadFromDisk(const CBlockIndex* pindex, bool fReadTransactions)
1078 {
1079     if (!fReadTransactions)
1080     {
1081         *this = pindex->GetBlockHeader();
1082         return true;
1083     }
1084     if (!ReadFromDisk(pindex->nFile, pindex->nBlockPos, fReadTransactions))
1085         return false;
1086     if (GetHash() != pindex->GetBlockHash())
1087         return error("CBlock::ReadFromDisk() : GetHash() doesn't match index");
1088     return true;
1089 }
1090
1091 uint256 GetOrphanRoot(const CBlock* pblock)
1092 {
1093     // Work back to the first block in the orphan chain
1094     while (mapOrphanBlocks.count(pblock->hashPrevBlock))
1095         pblock = mapOrphanBlocks[pblock->hashPrevBlock];
1096     return pblock->GetHash();
1097 }
1098
1099 int64 GetBlockValue(int nHeight, int64 nFees)
1100 {
1101     int64 nSubsidy = 50 * COIN;
1102
1103     // Subsidy is cut in half every 4 years
1104     nSubsidy >>= (nHeight / 210000);
1105
1106     return nSubsidy + nFees;
1107 }
1108
1109 unsigned int GetNextWorkRequired(const CBlockIndex* pindexLast)
1110 {
1111     const int64 nTargetTimespan = 14 * 24 * 60 * 60; // two weeks
1112     const int64 nTargetSpacing = 10 * 60;
1113     const int64 nInterval = nTargetTimespan / nTargetSpacing;
1114
1115     // Genesis block
1116     if (pindexLast == NULL)
1117         return bnProofOfWorkLimit.GetCompact();
1118
1119     // Only change once per interval
1120     if ((pindexLast->nHeight+1) % nInterval != 0)
1121         return pindexLast->nBits;
1122
1123     // Go back by what we want to be 14 days worth of blocks
1124     const CBlockIndex* pindexFirst = pindexLast;
1125     for (int i = 0; pindexFirst && i < nInterval-1; i++)
1126         pindexFirst = pindexFirst->pprev;
1127     assert(pindexFirst);
1128
1129     // Limit adjustment step
1130     int64 nActualTimespan = pindexLast->GetBlockTime() - pindexFirst->GetBlockTime();
1131     printf("  nActualTimespan = %"PRI64d"  before bounds\n", nActualTimespan);
1132     if (nActualTimespan < nTargetTimespan/4)
1133         nActualTimespan = nTargetTimespan/4;
1134     if (nActualTimespan > nTargetTimespan*4)
1135         nActualTimespan = nTargetTimespan*4;
1136
1137     // Retarget
1138     CBigNum bnNew;
1139     bnNew.SetCompact(pindexLast->nBits);
1140     bnNew *= nActualTimespan;
1141     bnNew /= nTargetTimespan;
1142
1143     if (bnNew > bnProofOfWorkLimit)
1144         bnNew = bnProofOfWorkLimit;
1145
1146     /// debug print
1147     printf("GetNextWorkRequired RETARGET\n");
1148     printf("nTargetTimespan = %"PRI64d"    nActualTimespan = %"PRI64d"\n", nTargetTimespan, nActualTimespan);
1149     printf("Before: %08x  %s\n", pindexLast->nBits, CBigNum().SetCompact(pindexLast->nBits).getuint256().ToString().c_str());
1150     printf("After:  %08x  %s\n", bnNew.GetCompact(), bnNew.getuint256().ToString().c_str());
1151
1152     return bnNew.GetCompact();
1153 }
1154
1155 bool CheckProofOfWork(uint256 hash, unsigned int nBits)
1156 {
1157     CBigNum bnTarget;
1158     bnTarget.SetCompact(nBits);
1159
1160     // Check range
1161     if (bnTarget <= 0 || bnTarget > bnProofOfWorkLimit)
1162         return error("CheckProofOfWork() : nBits below minimum work");
1163
1164     // Check proof of work matches claimed amount
1165     if (hash > bnTarget.getuint256())
1166         return error("CheckProofOfWork() : hash doesn't match nBits");
1167
1168     return true;
1169 }
1170
1171 bool IsInitialBlockDownload()
1172 {
1173     if (pindexBest == NULL || (!fTestNet && nBestHeight < 105000))
1174         return true;
1175     static int64 nLastUpdate;
1176     static CBlockIndex* pindexLastBest;
1177     if (pindexBest != pindexLastBest)
1178     {
1179         pindexLastBest = pindexBest;
1180         nLastUpdate = GetTime();
1181     }
1182     return (GetTime() - nLastUpdate < 10 &&
1183             pindexBest->GetBlockTime() < GetTime() - 24 * 60 * 60);
1184 }
1185
1186 void InvalidChainFound(CBlockIndex* pindexNew)
1187 {
1188     if (pindexNew->bnChainWork > bnBestInvalidWork)
1189     {
1190         bnBestInvalidWork = pindexNew->bnChainWork;
1191         CTxDB().WriteBestInvalidWork(bnBestInvalidWork);
1192         MainFrameRepaint();
1193     }
1194     printf("InvalidChainFound: invalid block=%s  height=%d  work=%s\n", pindexNew->GetBlockHash().ToString().substr(0,20).c_str(), pindexNew->nHeight, pindexNew->bnChainWork.ToString().c_str());
1195     printf("InvalidChainFound:  current best=%s  height=%d  work=%s\n", hashBestChain.ToString().substr(0,20).c_str(), nBestHeight, bnBestChainWork.ToString().c_str());
1196     if (pindexBest && bnBestInvalidWork > bnBestChainWork + pindexBest->GetBlockWork() * 6)
1197         printf("InvalidChainFound: WARNING: Displayed transactions may not be correct!  You may need to upgrade, or other nodes may need to upgrade.\n");
1198 }
1199
1200
1201
1202
1203
1204
1205
1206
1207
1208
1209
1210 bool CTransaction::DisconnectInputs(CTxDB& txdb)
1211 {
1212     // Relinquish previous transactions' spent pointers
1213     if (!IsCoinBase())
1214     {
1215         foreach(const CTxIn& txin, vin)
1216         {
1217             COutPoint prevout = txin.prevout;
1218
1219             // Get prev txindex from disk
1220             CTxIndex txindex;
1221             if (!txdb.ReadTxIndex(prevout.hash, txindex))
1222                 return error("DisconnectInputs() : ReadTxIndex failed");
1223
1224             if (prevout.n >= txindex.vSpent.size())
1225                 return error("DisconnectInputs() : prevout.n out of range");
1226
1227             // Mark outpoint as not spent
1228             txindex.vSpent[prevout.n].SetNull();
1229
1230             // Write back
1231             if (!txdb.UpdateTxIndex(prevout.hash, txindex))
1232                 return error("DisconnectInputs() : UpdateTxIndex failed");
1233         }
1234     }
1235
1236     // Remove transaction from index
1237     if (!txdb.EraseTxIndex(*this))
1238         return error("DisconnectInputs() : EraseTxPos failed");
1239
1240     return true;
1241 }
1242
1243
1244 bool CTransaction::ConnectInputs(CTxDB& txdb, map<uint256, CTxIndex>& mapTestPool, CDiskTxPos posThisTx,
1245                                  CBlockIndex* pindexBlock, int64& nFees, bool fBlock, bool fMiner, int64 nMinFee)
1246 {
1247     // Take over previous transactions' spent pointers
1248     if (!IsCoinBase())
1249     {
1250         int64 nValueIn = 0;
1251         for (int i = 0; i < vin.size(); i++)
1252         {
1253             COutPoint prevout = vin[i].prevout;
1254
1255             // Read txindex
1256             CTxIndex txindex;
1257             bool fFound = true;
1258             if (fMiner && mapTestPool.count(prevout.hash))
1259             {
1260                 // Get txindex from current proposed changes
1261                 txindex = mapTestPool[prevout.hash];
1262             }
1263             else
1264             {
1265                 // Read txindex from txdb
1266                 fFound = txdb.ReadTxIndex(prevout.hash, txindex);
1267             }
1268             if (!fFound && (fBlock || fMiner))
1269                 return fMiner ? false : error("ConnectInputs() : %s prev tx %s index entry not found", GetHash().ToString().substr(0,10).c_str(),  prevout.hash.ToString().substr(0,10).c_str());
1270
1271             // Read txPrev
1272             CTransaction txPrev;
1273             if (!fFound || txindex.pos == CDiskTxPos(1,1,1))
1274             {
1275                 // Get prev tx from single transactions in memory
1276                 CRITICAL_BLOCK(cs_mapTransactions)
1277                 {
1278                     if (!mapTransactions.count(prevout.hash))
1279                         return error("ConnectInputs() : %s mapTransactions prev not found %s", GetHash().ToString().substr(0,10).c_str(),  prevout.hash.ToString().substr(0,10).c_str());
1280                     txPrev = mapTransactions[prevout.hash];
1281                 }
1282                 if (!fFound)
1283                     txindex.vSpent.resize(txPrev.vout.size());
1284             }
1285             else
1286             {
1287                 // Get prev tx from disk
1288                 if (!txPrev.ReadFromDisk(txindex.pos))
1289                     return error("ConnectInputs() : %s ReadFromDisk prev tx %s failed", GetHash().ToString().substr(0,10).c_str(),  prevout.hash.ToString().substr(0,10).c_str());
1290             }
1291
1292             if (prevout.n >= txPrev.vout.size() || prevout.n >= txindex.vSpent.size())
1293                 return error("ConnectInputs() : %s prevout.n out of range %d %d %d prev tx %s\n%s", GetHash().ToString().substr(0,10).c_str(), prevout.n, txPrev.vout.size(), txindex.vSpent.size(), prevout.hash.ToString().substr(0,10).c_str(), txPrev.ToString().c_str());
1294
1295             // If prev is coinbase, check that it's matured
1296             if (txPrev.IsCoinBase())
1297                 for (CBlockIndex* pindex = pindexBlock; pindex && pindexBlock->nHeight - pindex->nHeight < COINBASE_MATURITY; pindex = pindex->pprev)
1298                     if (pindex->nBlockPos == txindex.pos.nBlockPos && pindex->nFile == txindex.pos.nFile)
1299                         return error("ConnectInputs() : tried to spend coinbase at depth %d", pindexBlock->nHeight - pindex->nHeight);
1300
1301             // Verify signature
1302             if (!VerifySignature(txPrev, *this, i))
1303                 return error("ConnectInputs() : %s VerifySignature failed", GetHash().ToString().substr(0,10).c_str());
1304
1305             // Check for conflicts
1306             if (!txindex.vSpent[prevout.n].IsNull())
1307                 return fMiner ? false : error("ConnectInputs() : %s prev tx already used at %s", GetHash().ToString().substr(0,10).c_str(), txindex.vSpent[prevout.n].ToString().c_str());
1308
1309             // Check for negative or overflow input values
1310             nValueIn += txPrev.vout[prevout.n].nValue;
1311             if (!MoneyRange(txPrev.vout[prevout.n].nValue) || !MoneyRange(nValueIn))
1312                 return error("ConnectInputs() : txin values out of range");
1313
1314             // Mark outpoints as spent
1315             txindex.vSpent[prevout.n] = posThisTx;
1316
1317             // Write back
1318             if (fBlock)
1319             {
1320                 if (!txdb.UpdateTxIndex(prevout.hash, txindex))
1321                     return error("ConnectInputs() : UpdateTxIndex failed");
1322             }
1323             else if (fMiner)
1324             {
1325                 mapTestPool[prevout.hash] = txindex;
1326             }
1327         }
1328
1329         if (nValueIn < GetValueOut())
1330             return error("ConnectInputs() : %s value in < value out", GetHash().ToString().substr(0,10).c_str());
1331
1332         // Tally transaction fees
1333         int64 nTxFee = nValueIn - GetValueOut();
1334         if (nTxFee < 0)
1335             return error("ConnectInputs() : %s nTxFee < 0", GetHash().ToString().substr(0,10).c_str());
1336         if (nTxFee < nMinFee)
1337             return false;
1338         nFees += nTxFee;
1339         if (!MoneyRange(nFees))
1340             return error("ConnectInputs() : nFees out of range");
1341     }
1342
1343     if (fBlock)
1344     {
1345         // Add transaction to disk index
1346         if (!txdb.AddTxIndex(*this, posThisTx, pindexBlock->nHeight))
1347             return error("ConnectInputs() : AddTxPos failed");
1348     }
1349     else if (fMiner)
1350     {
1351         // Add transaction to test pool
1352         mapTestPool[GetHash()] = CTxIndex(CDiskTxPos(1,1,1), vout.size());
1353     }
1354
1355     return true;
1356 }
1357
1358
1359 bool CTransaction::ClientConnectInputs()
1360 {
1361     if (IsCoinBase())
1362         return false;
1363
1364     // Take over previous transactions' spent pointers
1365     CRITICAL_BLOCK(cs_mapTransactions)
1366     {
1367         int64 nValueIn = 0;
1368         for (int i = 0; i < vin.size(); i++)
1369         {
1370             // Get prev tx from single transactions in memory
1371             COutPoint prevout = vin[i].prevout;
1372             if (!mapTransactions.count(prevout.hash))
1373                 return false;
1374             CTransaction& txPrev = mapTransactions[prevout.hash];
1375
1376             if (prevout.n >= txPrev.vout.size())
1377                 return false;
1378
1379             // Verify signature
1380             if (!VerifySignature(txPrev, *this, i))
1381                 return error("ConnectInputs() : VerifySignature failed");
1382
1383             ///// this is redundant with the mapNextTx stuff, not sure which I want to get rid of
1384             ///// this has to go away now that posNext is gone
1385             // // Check for conflicts
1386             // if (!txPrev.vout[prevout.n].posNext.IsNull())
1387             //     return error("ConnectInputs() : prev tx already used");
1388             //
1389             // // Flag outpoints as used
1390             // txPrev.vout[prevout.n].posNext = posThisTx;
1391
1392             nValueIn += txPrev.vout[prevout.n].nValue;
1393
1394             if (!MoneyRange(txPrev.vout[prevout.n].nValue) || !MoneyRange(nValueIn))
1395                 return error("ClientConnectInputs() : txin values out of range");
1396         }
1397         if (GetValueOut() > nValueIn)
1398             return false;
1399     }
1400
1401     return true;
1402 }
1403
1404
1405
1406
1407 bool CBlock::DisconnectBlock(CTxDB& txdb, CBlockIndex* pindex)
1408 {
1409     // Disconnect in reverse order
1410     for (int i = vtx.size()-1; i >= 0; i--)
1411         if (!vtx[i].DisconnectInputs(txdb))
1412             return false;
1413
1414     // Update block index on disk without changing it in memory.
1415     // The memory index structure will be changed after the db commits.
1416     if (pindex->pprev)
1417     {
1418         CDiskBlockIndex blockindexPrev(pindex->pprev);
1419         blockindexPrev.hashNext = 0;
1420         if (!txdb.WriteBlockIndex(blockindexPrev))
1421             return error("DisconnectBlock() : WriteBlockIndex failed");
1422     }
1423
1424     return true;
1425 }
1426
1427 bool CBlock::ConnectBlock(CTxDB& txdb, CBlockIndex* pindex)
1428 {
1429     // Check it again in case a previous version let a bad block in
1430     if (!CheckBlock())
1431         return false;
1432
1433     //// issue here: it doesn't know the version
1434     unsigned int nTxPos = pindex->nBlockPos + ::GetSerializeSize(CBlock(), SER_DISK) - 1 + GetSizeOfCompactSize(vtx.size());
1435
1436     map<uint256, CTxIndex> mapUnused;
1437     int64 nFees = 0;
1438     foreach(CTransaction& tx, vtx)
1439     {
1440         CDiskTxPos posThisTx(pindex->nFile, pindex->nBlockPos, nTxPos);
1441         nTxPos += ::GetSerializeSize(tx, SER_DISK);
1442
1443         if (!tx.ConnectInputs(txdb, mapUnused, posThisTx, pindex, nFees, true, false))
1444             return false;
1445     }
1446
1447     if (vtx[0].GetValueOut() > GetBlockValue(pindex->nHeight, nFees))
1448         return false;
1449
1450     // Update block index on disk without changing it in memory.
1451     // The memory index structure will be changed after the db commits.
1452     if (pindex->pprev)
1453     {
1454         CDiskBlockIndex blockindexPrev(pindex->pprev);
1455         blockindexPrev.hashNext = pindex->GetBlockHash();
1456         if (!txdb.WriteBlockIndex(blockindexPrev))
1457             return error("ConnectBlock() : WriteBlockIndex failed");
1458     }
1459
1460     // Watch for transactions paying to me
1461     foreach(CTransaction& tx, vtx)
1462         AddToWalletIfMine(tx, this);
1463
1464     return true;
1465 }
1466
1467 bool Reorganize(CTxDB& txdb, CBlockIndex* pindexNew)
1468 {
1469     printf("REORGANIZE\n");
1470
1471     // Find the fork
1472     CBlockIndex* pfork = pindexBest;
1473     CBlockIndex* plonger = pindexNew;
1474     while (pfork != plonger)
1475     {
1476         while (plonger->nHeight > pfork->nHeight)
1477             if (!(plonger = plonger->pprev))
1478                 return error("Reorganize() : plonger->pprev is null");
1479         if (pfork == plonger)
1480             break;
1481         if (!(pfork = pfork->pprev))
1482             return error("Reorganize() : pfork->pprev is null");
1483     }
1484
1485     // List of what to disconnect
1486     vector<CBlockIndex*> vDisconnect;
1487     for (CBlockIndex* pindex = pindexBest; pindex != pfork; pindex = pindex->pprev)
1488         vDisconnect.push_back(pindex);
1489
1490     // List of what to connect
1491     vector<CBlockIndex*> vConnect;
1492     for (CBlockIndex* pindex = pindexNew; pindex != pfork; pindex = pindex->pprev)
1493         vConnect.push_back(pindex);
1494     reverse(vConnect.begin(), vConnect.end());
1495
1496     // Disconnect shorter branch
1497     vector<CTransaction> vResurrect;
1498     foreach(CBlockIndex* pindex, vDisconnect)
1499     {
1500         CBlock block;
1501         if (!block.ReadFromDisk(pindex))
1502             return error("Reorganize() : ReadFromDisk for disconnect failed");
1503         if (!block.DisconnectBlock(txdb, pindex))
1504             return error("Reorganize() : DisconnectBlock failed");
1505
1506         // Queue memory transactions to resurrect
1507         foreach(const CTransaction& tx, block.vtx)
1508             if (!tx.IsCoinBase())
1509                 vResurrect.push_back(tx);
1510     }
1511
1512     // Connect longer branch
1513     vector<CTransaction> vDelete;
1514     for (int i = 0; i < vConnect.size(); i++)
1515     {
1516         CBlockIndex* pindex = vConnect[i];
1517         CBlock block;
1518         if (!block.ReadFromDisk(pindex))
1519             return error("Reorganize() : ReadFromDisk for connect failed");
1520         if (!block.ConnectBlock(txdb, pindex))
1521         {
1522             // Invalid block
1523             txdb.TxnAbort();
1524             return error("Reorganize() : ConnectBlock failed");
1525         }
1526
1527         // Queue memory transactions to delete
1528         foreach(const CTransaction& tx, block.vtx)
1529             vDelete.push_back(tx);
1530     }
1531     if (!txdb.WriteHashBestChain(pindexNew->GetBlockHash()))
1532         return error("Reorganize() : WriteHashBestChain failed");
1533
1534     // Make sure it's successfully written to disk before changing memory structure
1535     if (!txdb.TxnCommit())
1536         return error("Reorganize() : TxnCommit failed");
1537
1538     // Disconnect shorter branch
1539     foreach(CBlockIndex* pindex, vDisconnect)
1540         if (pindex->pprev)
1541             pindex->pprev->pnext = NULL;
1542
1543     // Connect longer branch
1544     foreach(CBlockIndex* pindex, vConnect)
1545         if (pindex->pprev)
1546             pindex->pprev->pnext = pindex;
1547
1548     // Resurrect memory transactions that were in the disconnected branch
1549     foreach(CTransaction& tx, vResurrect)
1550         tx.AcceptToMemoryPool(txdb, false);
1551
1552     // Delete redundant memory transactions that are in the connected branch
1553     foreach(CTransaction& tx, vDelete)
1554         tx.RemoveFromMemoryPool();
1555
1556     return true;
1557 }
1558
1559
1560 bool CBlock::SetBestChain(CTxDB& txdb, CBlockIndex* pindexNew)
1561 {
1562     uint256 hash = GetHash();
1563
1564     txdb.TxnBegin();
1565     if (pindexGenesisBlock == NULL && hash == hashGenesisBlock)
1566     {
1567         txdb.WriteHashBestChain(hash);
1568         if (!txdb.TxnCommit())
1569             return error("SetBestChain() : TxnCommit failed");
1570         pindexGenesisBlock = pindexNew;
1571     }
1572     else if (hashPrevBlock == hashBestChain)
1573     {
1574         // Adding to current best branch
1575         if (!ConnectBlock(txdb, pindexNew) || !txdb.WriteHashBestChain(hash))
1576         {
1577             txdb.TxnAbort();
1578             InvalidChainFound(pindexNew);
1579             return error("SetBestChain() : ConnectBlock failed");
1580         }
1581         if (!txdb.TxnCommit())
1582             return error("SetBestChain() : TxnCommit failed");
1583
1584         // Add to current best branch
1585         pindexNew->pprev->pnext = pindexNew;
1586
1587         // Delete redundant memory transactions
1588         foreach(CTransaction& tx, vtx)
1589             tx.RemoveFromMemoryPool();
1590     }
1591     else
1592     {
1593         // New best branch
1594         if (!Reorganize(txdb, pindexNew))
1595         {
1596             txdb.TxnAbort();
1597             InvalidChainFound(pindexNew);
1598             return error("SetBestChain() : Reorganize failed");
1599         }
1600     }
1601
1602     // New best block
1603     hashBestChain = hash;
1604     pindexBest = pindexNew;
1605     nBestHeight = pindexBest->nHeight;
1606     bnBestChainWork = pindexNew->bnChainWork;
1607     nTimeBestReceived = GetTime();
1608     nTransactionsUpdated++;
1609     printf("SetBestChain: new best=%s  height=%d  work=%s\n", hashBestChain.ToString().substr(0,20).c_str(), nBestHeight, bnBestChainWork.ToString().c_str());
1610
1611     return true;
1612 }
1613
1614
1615 bool CBlock::AddToBlockIndex(unsigned int nFile, unsigned int nBlockPos)
1616 {
1617     // Check for duplicate
1618     uint256 hash = GetHash();
1619     if (mapBlockIndex.count(hash))
1620         return error("AddToBlockIndex() : %s already exists", hash.ToString().substr(0,20).c_str());
1621
1622     // Construct new block index object
1623     CBlockIndex* pindexNew = new CBlockIndex(nFile, nBlockPos, *this);
1624     if (!pindexNew)
1625         return error("AddToBlockIndex() : new CBlockIndex failed");
1626     map<uint256, CBlockIndex*>::iterator mi = mapBlockIndex.insert(make_pair(hash, pindexNew)).first;
1627     pindexNew->phashBlock = &((*mi).first);
1628     map<uint256, CBlockIndex*>::iterator miPrev = mapBlockIndex.find(hashPrevBlock);
1629     if (miPrev != mapBlockIndex.end())
1630     {
1631         pindexNew->pprev = (*miPrev).second;
1632         pindexNew->nHeight = pindexNew->pprev->nHeight + 1;
1633     }
1634     pindexNew->bnChainWork = (pindexNew->pprev ? pindexNew->pprev->bnChainWork : 0) + pindexNew->GetBlockWork();
1635
1636     CTxDB txdb;
1637     txdb.TxnBegin();
1638     txdb.WriteBlockIndex(CDiskBlockIndex(pindexNew));
1639     if (!txdb.TxnCommit())
1640         return false;
1641
1642     // New best
1643     if (pindexNew->bnChainWork > bnBestChainWork)
1644         if (!SetBestChain(txdb, pindexNew))
1645             return false;
1646
1647     txdb.Close();
1648
1649     if (pindexNew == pindexBest)
1650     {
1651         // Notify UI to display prev block's coinbase if it was ours
1652         static uint256 hashPrevBestCoinBase;
1653         CRITICAL_BLOCK(cs_mapWallet)
1654             vWalletUpdated.push_back(hashPrevBestCoinBase);
1655         hashPrevBestCoinBase = vtx[0].GetHash();
1656     }
1657
1658     MainFrameRepaint();
1659     return true;
1660 }
1661
1662
1663
1664
1665 bool CBlock::CheckBlock() const
1666 {
1667     // These are checks that are independent of context
1668     // that can be verified before saving an orphan block.
1669
1670     // Size limits
1671     if (vtx.empty() || vtx.size() > MAX_BLOCK_SIZE || ::GetSerializeSize(*this, SER_NETWORK) > MAX_BLOCK_SIZE)
1672         return error("CheckBlock() : size limits failed");
1673
1674     // Check proof of work matches claimed amount
1675     if (!CheckProofOfWork(GetHash(), nBits))
1676         return error("CheckBlock() : proof of work failed");
1677
1678     // Check timestamp
1679     if (GetBlockTime() > GetAdjustedTime() + 2 * 60 * 60)
1680         return error("CheckBlock() : block timestamp too far in the future");
1681
1682     // First transaction must be coinbase, the rest must not be
1683     if (vtx.empty() || !vtx[0].IsCoinBase())
1684         return error("CheckBlock() : first tx is not coinbase");
1685     for (int i = 1; i < vtx.size(); i++)
1686         if (vtx[i].IsCoinBase())
1687             return error("CheckBlock() : more than one coinbase");
1688
1689     // Check transactions
1690     foreach(const CTransaction& tx, vtx)
1691         if (!tx.CheckTransaction())
1692             return error("CheckBlock() : CheckTransaction failed");
1693
1694     // Check that it's not full of nonstandard transactions
1695     if (GetSigOpCount() > MAX_BLOCK_SIGOPS)
1696         return error("CheckBlock() : too many nonstandard transactions");
1697
1698     // Check merkleroot
1699     if (hashMerkleRoot != BuildMerkleTree())
1700         return error("CheckBlock() : hashMerkleRoot mismatch");
1701
1702     return true;
1703 }
1704
1705 bool CBlock::AcceptBlock()
1706 {
1707     // Check for duplicate
1708     uint256 hash = GetHash();
1709     if (mapBlockIndex.count(hash))
1710         return error("AcceptBlock() : block already in mapBlockIndex");
1711
1712     // Get prev block index
1713     map<uint256, CBlockIndex*>::iterator mi = mapBlockIndex.find(hashPrevBlock);
1714     if (mi == mapBlockIndex.end())
1715         return error("AcceptBlock() : prev block not found");
1716     CBlockIndex* pindexPrev = (*mi).second;
1717     int nHeight = pindexPrev->nHeight+1;
1718
1719     // Check proof of work
1720     if (nBits != GetNextWorkRequired(pindexPrev))
1721         return error("AcceptBlock() : incorrect proof of work");
1722
1723     // Check timestamp against prev
1724     if (GetBlockTime() <= pindexPrev->GetMedianTimePast())
1725         return error("AcceptBlock() : block's timestamp is too early");
1726
1727     // Check that all transactions are finalized
1728     foreach(const CTransaction& tx, vtx)
1729         if (!tx.IsFinal(nHeight, GetBlockTime()))
1730             return error("AcceptBlock() : contains a non-final transaction");
1731
1732     // Check that the block chain matches the known block chain up to a checkpoint
1733     if (!fTestNet)
1734         if ((nHeight ==  11111 && hash != uint256("0x0000000069e244f73d78e8fd29ba2fd2ed618bd6fa2ee92559f542fdb26e7c1d")) ||
1735             (nHeight ==  33333 && hash != uint256("0x000000002dd5588a74784eaa7ab0507a18ad16a236e7b1ce69f00d7ddfb5d0a6")) ||
1736             (nHeight ==  68555 && hash != uint256("0x00000000001e1b4903550a0b96e9a9405c8a95f387162e4944e8d9fbe501cd6a")) ||
1737             (nHeight ==  70567 && hash != uint256("0x00000000006a49b14bcf27462068f1264c961f11fa2e0eddd2be0791e1d4124a")) ||
1738             (nHeight ==  74000 && hash != uint256("0x0000000000573993a3c9e41ce34471c079dcf5f52a0e824a81e7f953b8661a20")) ||
1739             (nHeight == 105000 && hash != uint256("0x00000000000291ce28027faea320c8d2b054b2e0fe44a773f3eefb151d6bdc97")))
1740             return error("AcceptBlock() : rejected by checkpoint lockin at %d", nHeight);
1741
1742     // Write block to history file
1743     if (!CheckDiskSpace(::GetSerializeSize(*this, SER_DISK)))
1744         return error("AcceptBlock() : out of disk space");
1745     unsigned int nFile = -1;
1746     unsigned int nBlockPos = 0;
1747     if (!WriteToDisk(nFile, nBlockPos))
1748         return error("AcceptBlock() : WriteToDisk failed");
1749     if (!AddToBlockIndex(nFile, nBlockPos))
1750         return error("AcceptBlock() : AddToBlockIndex failed");
1751
1752     // Relay inventory, but don't relay old inventory during initial block download
1753     if (hashBestChain == hash)
1754         CRITICAL_BLOCK(cs_vNodes)
1755             foreach(CNode* pnode, vNodes)
1756                 if (nBestHeight > (pnode->nStartingHeight != -1 ? pnode->nStartingHeight - 2000 : 105000))
1757                     pnode->PushInventory(CInv(MSG_BLOCK, hash));
1758
1759     return true;
1760 }
1761
1762 bool ProcessBlock(CNode* pfrom, CBlock* pblock)
1763 {
1764     // Check for duplicate
1765     uint256 hash = pblock->GetHash();
1766     if (mapBlockIndex.count(hash))
1767         return error("ProcessBlock() : already have block %d %s", mapBlockIndex[hash]->nHeight, hash.ToString().substr(0,20).c_str());
1768     if (mapOrphanBlocks.count(hash))
1769         return error("ProcessBlock() : already have block (orphan) %s", hash.ToString().substr(0,20).c_str());
1770
1771     // Preliminary checks
1772     if (!pblock->CheckBlock())
1773         return error("ProcessBlock() : CheckBlock FAILED");
1774
1775     // If don't already have its previous block, shunt it off to holding area until we get it
1776     if (!mapBlockIndex.count(pblock->hashPrevBlock))
1777     {
1778         printf("ProcessBlock: ORPHAN BLOCK, prev=%s\n", pblock->hashPrevBlock.ToString().substr(0,20).c_str());
1779         CBlock* pblock2 = new CBlock(*pblock);
1780         mapOrphanBlocks.insert(make_pair(hash, pblock2));
1781         mapOrphanBlocksByPrev.insert(make_pair(pblock2->hashPrevBlock, pblock2));
1782
1783         // Ask this guy to fill in what we're missing
1784         if (pfrom)
1785             pfrom->PushGetBlocks(pindexBest, GetOrphanRoot(pblock2));
1786         return true;
1787     }
1788
1789     // Store to disk
1790     if (!pblock->AcceptBlock())
1791         return error("ProcessBlock() : AcceptBlock FAILED");
1792
1793     // Recursively process any orphan blocks that depended on this one
1794     vector<uint256> vWorkQueue;
1795     vWorkQueue.push_back(hash);
1796     for (int i = 0; i < vWorkQueue.size(); i++)
1797     {
1798         uint256 hashPrev = vWorkQueue[i];
1799         for (multimap<uint256, CBlock*>::iterator mi = mapOrphanBlocksByPrev.lower_bound(hashPrev);
1800              mi != mapOrphanBlocksByPrev.upper_bound(hashPrev);
1801              ++mi)
1802         {
1803             CBlock* pblockOrphan = (*mi).second;
1804             if (pblockOrphan->AcceptBlock())
1805                 vWorkQueue.push_back(pblockOrphan->GetHash());
1806             mapOrphanBlocks.erase(pblockOrphan->GetHash());
1807             delete pblockOrphan;
1808         }
1809         mapOrphanBlocksByPrev.erase(hashPrev);
1810     }
1811
1812     printf("ProcessBlock: ACCEPTED\n");
1813     return true;
1814 }
1815
1816
1817
1818
1819
1820
1821
1822
1823 template<typename Stream>
1824 bool ScanMessageStart(Stream& s)
1825 {
1826     // Scan ahead to the next pchMessageStart, which should normally be immediately
1827     // at the file pointer.  Leaves file pointer at end of pchMessageStart.
1828     s.clear(0);
1829     short prevmask = s.exceptions(0);
1830     const char* p = BEGIN(pchMessageStart);
1831     try
1832     {
1833         loop
1834         {
1835             char c;
1836             s.read(&c, 1);
1837             if (s.fail())
1838             {
1839                 s.clear(0);
1840                 s.exceptions(prevmask);
1841                 return false;
1842             }
1843             if (*p != c)
1844                 p = BEGIN(pchMessageStart);
1845             if (*p == c)
1846             {
1847                 if (++p == END(pchMessageStart))
1848                 {
1849                     s.clear(0);
1850                     s.exceptions(prevmask);
1851                     return true;
1852                 }
1853             }
1854         }
1855     }
1856     catch (...)
1857     {
1858         s.clear(0);
1859         s.exceptions(prevmask);
1860         return false;
1861     }
1862 }
1863
1864 bool CheckDiskSpace(uint64 nAdditionalBytes)
1865 {
1866     uint64 nFreeBytesAvailable = filesystem::space(GetDataDir()).available;
1867
1868     // Check for 15MB because database could create another 10MB log file at any time
1869     if (nFreeBytesAvailable < (uint64)15000000 + nAdditionalBytes)
1870     {
1871         fShutdown = true;
1872         string strMessage = _("Warning: Disk space is low  ");
1873         strMiscWarning = strMessage;
1874         printf("*** %s\n", strMessage.c_str());
1875         ThreadSafeMessageBox(strMessage, "Bitcoin", wxOK | wxICON_EXCLAMATION);
1876         CreateThread(Shutdown, NULL);
1877         return false;
1878     }
1879     return true;
1880 }
1881
1882 FILE* OpenBlockFile(unsigned int nFile, unsigned int nBlockPos, const char* pszMode)
1883 {
1884     if (nFile == -1)
1885         return NULL;
1886     FILE* file = fopen(strprintf("%s/blk%04d.dat", GetDataDir().c_str(), nFile).c_str(), pszMode);
1887     if (!file)
1888         return NULL;
1889     if (nBlockPos != 0 && !strchr(pszMode, 'a') && !strchr(pszMode, 'w'))
1890     {
1891         if (fseek(file, nBlockPos, SEEK_SET) != 0)
1892         {
1893             fclose(file);
1894             return NULL;
1895         }
1896     }
1897     return file;
1898 }
1899
1900 static unsigned int nCurrentBlockFile = 1;
1901
1902 FILE* AppendBlockFile(unsigned int& nFileRet)
1903 {
1904     nFileRet = 0;
1905     loop
1906     {
1907         FILE* file = OpenBlockFile(nCurrentBlockFile, 0, "ab");
1908         if (!file)
1909             return NULL;
1910         if (fseek(file, 0, SEEK_END) != 0)
1911             return NULL;
1912         // FAT32 filesize max 4GB, fseek and ftell max 2GB, so we must stay under 2GB
1913         if (ftell(file) < 0x7F000000 - MAX_SIZE)
1914         {
1915             nFileRet = nCurrentBlockFile;
1916             return file;
1917         }
1918         fclose(file);
1919         nCurrentBlockFile++;
1920     }
1921 }
1922
1923 bool LoadBlockIndex(bool fAllowNew)
1924 {
1925     if (fTestNet)
1926     {
1927         hashGenesisBlock = uint256("0x00000007199508e34a9ff81e6ec0c477a4cccff2a4767a8eee39c11db367b008");
1928         bnProofOfWorkLimit = CBigNum(~uint256(0) >> 28);
1929         pchMessageStart[0] = 0xfa;
1930         pchMessageStart[1] = 0xbf;
1931         pchMessageStart[2] = 0xb5;
1932         pchMessageStart[3] = 0xda;
1933     }
1934
1935     //
1936     // Load block index
1937     //
1938     CTxDB txdb("cr");
1939     if (!txdb.LoadBlockIndex())
1940         return false;
1941     txdb.Close();
1942
1943     //
1944     // Init with genesis block
1945     //
1946     if (mapBlockIndex.empty())
1947     {
1948         if (!fAllowNew)
1949             return false;
1950
1951         // Genesis Block:
1952         // CBlock(hash=000000000019d6, ver=1, hashPrevBlock=00000000000000, hashMerkleRoot=4a5e1e, nTime=1231006505, nBits=1d00ffff, nNonce=2083236893, vtx=1)
1953         //   CTransaction(hash=4a5e1e, ver=1, vin.size=1, vout.size=1, nLockTime=0)
1954         //     CTxIn(COutPoint(000000, -1), coinbase 04ffff001d0104455468652054696d65732030332f4a616e2f32303039204368616e63656c6c6f72206f6e206272696e6b206f66207365636f6e64206261696c6f757420666f722062616e6b73)
1955         //     CTxOut(nValue=50.00000000, scriptPubKey=0x5F1DF16B2B704C8A578D0B)
1956         //   vMerkleTree: 4a5e1e
1957
1958         // Genesis block
1959         const char* pszTimestamp = "The Times 03/Jan/2009 Chancellor on brink of second bailout for banks";
1960         CTransaction txNew;
1961         txNew.vin.resize(1);
1962         txNew.vout.resize(1);
1963         txNew.vin[0].scriptSig = CScript() << 486604799 << CBigNum(4) << vector<unsigned char>((const unsigned char*)pszTimestamp, (const unsigned char*)pszTimestamp + strlen(pszTimestamp));
1964         txNew.vout[0].nValue = 50 * COIN;
1965         txNew.vout[0].scriptPubKey = CScript() << ParseHex("04678afdb0fe5548271967f1a67130b7105cd6a828e03909a67962e0ea1f61deb649f6bc3f4cef38c4f35504e51ec112de5c384df7ba0b8d578a4c702b6bf11d5f") << OP_CHECKSIG;
1966         CBlock block;
1967         block.vtx.push_back(txNew);
1968         block.hashPrevBlock = 0;
1969         block.hashMerkleRoot = block.BuildMerkleTree();
1970         block.nVersion = 1;
1971         block.nTime    = 1231006505;
1972         block.nBits    = 0x1d00ffff;
1973         block.nNonce   = 2083236893;
1974
1975         if (fTestNet)
1976         {
1977             block.nTime    = 1296688602;
1978             block.nBits    = 0x1d07fff8;
1979             block.nNonce   = 384568319;
1980         }
1981
1982         //// debug print
1983         printf("%s\n", block.GetHash().ToString().c_str());
1984         printf("%s\n", hashGenesisBlock.ToString().c_str());
1985         printf("%s\n", block.hashMerkleRoot.ToString().c_str());
1986         assert(block.hashMerkleRoot == uint256("0x4a5e1e4baab89f3a32518a88c31bc87f618f76673e2cc77ab2127b7afdeda33b"));
1987         block.print();
1988         assert(block.GetHash() == hashGenesisBlock);
1989
1990         // Start new block file
1991         unsigned int nFile;
1992         unsigned int nBlockPos;
1993         if (!block.WriteToDisk(nFile, nBlockPos))
1994             return error("LoadBlockIndex() : writing genesis block to disk failed");
1995         if (!block.AddToBlockIndex(nFile, nBlockPos))
1996             return error("LoadBlockIndex() : genesis block not accepted");
1997     }
1998
1999     return true;
2000 }
2001
2002
2003
2004 void PrintBlockTree()
2005 {
2006     // precompute tree structure
2007     map<CBlockIndex*, vector<CBlockIndex*> > mapNext;
2008     for (map<uint256, CBlockIndex*>::iterator mi = mapBlockIndex.begin(); mi != mapBlockIndex.end(); ++mi)
2009     {
2010         CBlockIndex* pindex = (*mi).second;
2011         mapNext[pindex->pprev].push_back(pindex);
2012         // test
2013         //while (rand() % 3 == 0)
2014         //    mapNext[pindex->pprev].push_back(pindex);
2015     }
2016
2017     vector<pair<int, CBlockIndex*> > vStack;
2018     vStack.push_back(make_pair(0, pindexGenesisBlock));
2019
2020     int nPrevCol = 0;
2021     while (!vStack.empty())
2022     {
2023         int nCol = vStack.back().first;
2024         CBlockIndex* pindex = vStack.back().second;
2025         vStack.pop_back();
2026
2027         // print split or gap
2028         if (nCol > nPrevCol)
2029         {
2030             for (int i = 0; i < nCol-1; i++)
2031                 printf("| ");
2032             printf("|\\\n");
2033         }
2034         else if (nCol < nPrevCol)
2035         {
2036             for (int i = 0; i < nCol; i++)
2037                 printf("| ");
2038             printf("|\n");
2039         }
2040         nPrevCol = nCol;
2041
2042         // print columns
2043         for (int i = 0; i < nCol; i++)
2044             printf("| ");
2045
2046         // print item
2047         CBlock block;
2048         block.ReadFromDisk(pindex);
2049         printf("%d (%u,%u) %s  %s  tx %d",
2050             pindex->nHeight,
2051             pindex->nFile,
2052             pindex->nBlockPos,
2053             block.GetHash().ToString().substr(0,20).c_str(),
2054             DateTimeStrFormat("%x %H:%M:%S", block.GetBlockTime()).c_str(),
2055             block.vtx.size());
2056
2057         CRITICAL_BLOCK(cs_mapWallet)
2058         {
2059             if (mapWallet.count(block.vtx[0].GetHash()))
2060             {
2061                 CWalletTx& wtx = mapWallet[block.vtx[0].GetHash()];
2062                 printf("    mine:  %d  %d  %d", wtx.GetDepthInMainChain(), wtx.GetBlocksToMaturity(), wtx.GetCredit());
2063             }
2064         }
2065         printf("\n");
2066
2067
2068         // put the main timechain first
2069         vector<CBlockIndex*>& vNext = mapNext[pindex];
2070         for (int i = 0; i < vNext.size(); i++)
2071         {
2072             if (vNext[i]->pnext)
2073             {
2074                 swap(vNext[0], vNext[i]);
2075                 break;
2076             }
2077         }
2078
2079         // iterate children
2080         for (int i = 0; i < vNext.size(); i++)
2081             vStack.push_back(make_pair(nCol+i, vNext[i]));
2082     }
2083 }
2084
2085
2086
2087
2088
2089
2090
2091
2092
2093
2094 //////////////////////////////////////////////////////////////////////////////
2095 //
2096 // CAlert
2097 //
2098
2099 map<uint256, CAlert> mapAlerts;
2100 CCriticalSection cs_mapAlerts;
2101
2102 string GetWarnings(string strFor)
2103 {
2104     int nPriority = 0;
2105     string strStatusBar;
2106     string strRPC;
2107     if (GetBoolArg("-testsafemode"))
2108         strRPC = "test";
2109
2110     // Misc warnings like out of disk space and clock is wrong
2111     if (strMiscWarning != "")
2112     {
2113         nPriority = 1000;
2114         strStatusBar = strMiscWarning;
2115     }
2116
2117     // Longer invalid proof-of-work chain
2118     if (pindexBest && bnBestInvalidWork > bnBestChainWork + pindexBest->GetBlockWork() * 6)
2119     {
2120         nPriority = 2000;
2121         strStatusBar = strRPC = "WARNING: Displayed transactions may not be correct!  You may need to upgrade, or other nodes may need to upgrade.";
2122     }
2123
2124     // Alerts
2125     CRITICAL_BLOCK(cs_mapAlerts)
2126     {
2127         foreach(PAIRTYPE(const uint256, CAlert)& item, mapAlerts)
2128         {
2129             const CAlert& alert = item.second;
2130             if (alert.AppliesToMe() && alert.nPriority > nPriority)
2131             {
2132                 nPriority = alert.nPriority;
2133                 strStatusBar = alert.strStatusBar;
2134             }
2135         }
2136     }
2137
2138     if (strFor == "statusbar")
2139         return strStatusBar;
2140     else if (strFor == "rpc")
2141         return strRPC;
2142     assert(("GetWarnings() : invalid parameter", false));
2143     return "error";
2144 }
2145
2146 bool CAlert::ProcessAlert()
2147 {
2148     if (!CheckSignature())
2149         return false;
2150     if (!IsInEffect())
2151         return false;
2152
2153     CRITICAL_BLOCK(cs_mapAlerts)
2154     {
2155         // Cancel previous alerts
2156         for (map<uint256, CAlert>::iterator mi = mapAlerts.begin(); mi != mapAlerts.end();)
2157         {
2158             const CAlert& alert = (*mi).second;
2159             if (Cancels(alert))
2160             {
2161                 printf("cancelling alert %d\n", alert.nID);
2162                 mapAlerts.erase(mi++);
2163             }
2164             else if (!alert.IsInEffect())
2165             {
2166                 printf("expiring alert %d\n", alert.nID);
2167                 mapAlerts.erase(mi++);
2168             }
2169             else
2170                 mi++;
2171         }
2172
2173         // Check if this alert has been cancelled
2174         foreach(PAIRTYPE(const uint256, CAlert)& item, mapAlerts)
2175         {
2176             const CAlert& alert = item.second;
2177             if (alert.Cancels(*this))
2178             {
2179                 printf("alert already cancelled by %d\n", alert.nID);
2180                 return false;
2181             }
2182         }
2183
2184         // Add to mapAlerts
2185         mapAlerts.insert(make_pair(GetHash(), *this));
2186     }
2187
2188     printf("accepted alert %d, AppliesToMe()=%d\n", nID, AppliesToMe());
2189     MainFrameRepaint();
2190     return true;
2191 }
2192
2193
2194
2195
2196
2197
2198
2199
2200 //////////////////////////////////////////////////////////////////////////////
2201 //
2202 // Messages
2203 //
2204
2205
2206 bool AlreadyHave(CTxDB& txdb, const CInv& inv)
2207 {
2208     switch (inv.type)
2209     {
2210     case MSG_TX:    return mapTransactions.count(inv.hash) || mapOrphanTransactions.count(inv.hash) || txdb.ContainsTx(inv.hash);
2211     case MSG_BLOCK: return mapBlockIndex.count(inv.hash) || mapOrphanBlocks.count(inv.hash);
2212     }
2213     // Don't know what it is, just say we already got one
2214     return true;
2215 }
2216
2217
2218
2219
2220 // The message start string is designed to be unlikely to occur in normal data.
2221 // The characters are rarely used upper ascii, not valid as UTF-8, and produce
2222 // a large 4-byte int at any alignment.
2223 char pchMessageStart[4] = { 0xf9, 0xbe, 0xb4, 0xd9 };
2224
2225
2226 bool ProcessMessages(CNode* pfrom)
2227 {
2228     CDataStream& vRecv = pfrom->vRecv;
2229     if (vRecv.empty())
2230         return true;
2231     //if (fDebug)
2232     //    printf("ProcessMessages(%u bytes)\n", vRecv.size());
2233
2234     //
2235     // Message format
2236     //  (4) message start
2237     //  (12) command
2238     //  (4) size
2239     //  (4) checksum
2240     //  (x) data
2241     //
2242
2243     loop
2244     {
2245         // Scan for message start
2246         CDataStream::iterator pstart = search(vRecv.begin(), vRecv.end(), BEGIN(pchMessageStart), END(pchMessageStart));
2247         int nHeaderSize = vRecv.GetSerializeSize(CMessageHeader());
2248         if (vRecv.end() - pstart < nHeaderSize)
2249         {
2250             if (vRecv.size() > nHeaderSize)
2251             {
2252                 printf("\n\nPROCESSMESSAGE MESSAGESTART NOT FOUND\n\n");
2253                 vRecv.erase(vRecv.begin(), vRecv.end() - nHeaderSize);
2254             }
2255             break;
2256         }
2257         if (pstart - vRecv.begin() > 0)
2258             printf("\n\nPROCESSMESSAGE SKIPPED %d BYTES\n\n", pstart - vRecv.begin());
2259         vRecv.erase(vRecv.begin(), pstart);
2260
2261         // Read header
2262         vector<char> vHeaderSave(vRecv.begin(), vRecv.begin() + nHeaderSize);
2263         CMessageHeader hdr;
2264         vRecv >> hdr;
2265         if (!hdr.IsValid())
2266         {
2267             printf("\n\nPROCESSMESSAGE: ERRORS IN HEADER %s\n\n\n", hdr.GetCommand().c_str());
2268             continue;
2269         }
2270         string strCommand = hdr.GetCommand();
2271
2272         // Message size
2273         unsigned int nMessageSize = hdr.nMessageSize;
2274         if (nMessageSize > MAX_SIZE)
2275         {
2276             printf("ProcessMessage(%s, %u bytes) : nMessageSize > MAX_SIZE\n", strCommand.c_str(), nMessageSize);
2277             continue;
2278         }
2279         if (nMessageSize > vRecv.size())
2280         {
2281             // Rewind and wait for rest of message
2282             vRecv.insert(vRecv.begin(), vHeaderSave.begin(), vHeaderSave.end());
2283             break;
2284         }
2285
2286         // Checksum
2287         if (vRecv.GetVersion() >= 209)
2288         {
2289             uint256 hash = Hash(vRecv.begin(), vRecv.begin() + nMessageSize);
2290             unsigned int nChecksum = 0;
2291             memcpy(&nChecksum, &hash, sizeof(nChecksum));
2292             if (nChecksum != hdr.nChecksum)
2293             {
2294                 printf("ProcessMessage(%s, %u bytes) : CHECKSUM ERROR nChecksum=%08x hdr.nChecksum=%08x\n",
2295                        strCommand.c_str(), nMessageSize, nChecksum, hdr.nChecksum);
2296                 continue;
2297             }
2298         }
2299
2300         // Copy message to its own buffer
2301         CDataStream vMsg(vRecv.begin(), vRecv.begin() + nMessageSize, vRecv.nType, vRecv.nVersion);
2302         vRecv.ignore(nMessageSize);
2303
2304         // Process message
2305         bool fRet = false;
2306         try
2307         {
2308             CRITICAL_BLOCK(cs_main)
2309                 fRet = ProcessMessage(pfrom, strCommand, vMsg);
2310             if (fShutdown)
2311                 return true;
2312         }
2313         catch (std::ios_base::failure& e)
2314         {
2315             if (strstr(e.what(), "end of data"))
2316             {
2317                 // Allow exceptions from underlength message on vRecv
2318                 printf("ProcessMessage(%s, %u bytes) : Exception '%s' caught, normally caused by a message being shorter than its stated length\n", strCommand.c_str(), nMessageSize, e.what());
2319             }
2320             else if (strstr(e.what(), "size too large"))
2321             {
2322                 // Allow exceptions from overlong size
2323                 printf("ProcessMessage(%s, %u bytes) : Exception '%s' caught\n", strCommand.c_str(), nMessageSize, e.what());
2324             }
2325             else
2326             {
2327                 PrintExceptionContinue(&e, "ProcessMessage()");
2328             }
2329         }
2330         catch (std::exception& e) {
2331             PrintExceptionContinue(&e, "ProcessMessage()");
2332         } catch (...) {
2333             PrintExceptionContinue(NULL, "ProcessMessage()");
2334         }
2335
2336         if (!fRet)
2337             printf("ProcessMessage(%s, %u bytes) FAILED\n", strCommand.c_str(), nMessageSize);
2338     }
2339
2340     vRecv.Compact();
2341     return true;
2342 }
2343
2344
2345
2346
2347 bool ProcessMessage(CNode* pfrom, string strCommand, CDataStream& vRecv)
2348 {
2349     static map<unsigned int, vector<unsigned char> > mapReuseKey;
2350     RandAddSeedPerfmon();
2351     if (fDebug)
2352         printf("%s ", DateTimeStrFormat("%x %H:%M:%S", GetTime()).c_str());
2353     printf("received: %s (%d bytes)\n", strCommand.c_str(), vRecv.size());
2354     if (mapArgs.count("-dropmessagestest") && GetRand(atoi(mapArgs["-dropmessagestest"])) == 0)
2355     {
2356         printf("dropmessagestest DROPPING RECV MESSAGE\n");
2357         return true;
2358     }
2359
2360
2361
2362
2363
2364     if (strCommand == "version")
2365     {
2366         // Each connection can only send one version message
2367         if (pfrom->nVersion != 0)
2368             return false;
2369
2370         int64 nTime;
2371         CAddress addrMe;
2372         CAddress addrFrom;
2373         uint64 nNonce = 1;
2374         vRecv >> pfrom->nVersion >> pfrom->nServices >> nTime >> addrMe;
2375         if (pfrom->nVersion == 10300)
2376             pfrom->nVersion = 300;
2377         if (pfrom->nVersion >= 106 && !vRecv.empty())
2378             vRecv >> addrFrom >> nNonce;
2379         if (pfrom->nVersion >= 106 && !vRecv.empty())
2380             vRecv >> pfrom->strSubVer;
2381         if (pfrom->nVersion >= 209 && !vRecv.empty())
2382             vRecv >> pfrom->nStartingHeight;
2383
2384         if (pfrom->nVersion == 0)
2385             return false;
2386
2387         // Disconnect if we connected to ourself
2388         if (nNonce == nLocalHostNonce && nNonce > 1)
2389         {
2390             printf("connected to self at %s, disconnecting\n", pfrom->addr.ToString().c_str());
2391             pfrom->fDisconnect = true;
2392             return true;
2393         }
2394
2395         pfrom->fClient = !(pfrom->nServices & NODE_NETWORK);
2396
2397         AddTimeData(pfrom->addr.ip, nTime);
2398
2399         // Change version
2400         if (pfrom->nVersion >= 209)
2401             pfrom->PushMessage("verack");
2402         pfrom->vSend.SetVersion(min(pfrom->nVersion, VERSION));
2403         if (pfrom->nVersion < 209)
2404             pfrom->vRecv.SetVersion(min(pfrom->nVersion, VERSION));
2405
2406         if (!pfrom->fInbound)
2407         {
2408             // Advertise our address
2409             if (addrLocalHost.IsRoutable() && !fUseProxy)
2410             {
2411                 CAddress addr(addrLocalHost);
2412                 addr.nTime = GetAdjustedTime();
2413                 pfrom->PushAddress(addr);
2414             }
2415
2416             // Get recent addresses
2417             if (pfrom->nVersion >= 31402 || mapAddresses.size() < 1000)
2418             {
2419                 pfrom->PushMessage("getaddr");
2420                 pfrom->fGetAddr = true;
2421             }
2422         }
2423
2424         // Ask the first connected node for block updates
2425         static int nAskedForBlocks;
2426         if (!pfrom->fClient && (nAskedForBlocks < 1 || vNodes.size() <= 1))
2427         {
2428             nAskedForBlocks++;
2429             pfrom->PushGetBlocks(pindexBest, uint256(0));
2430         }
2431
2432         // Relay alerts
2433         CRITICAL_BLOCK(cs_mapAlerts)
2434             foreach(PAIRTYPE(const uint256, CAlert)& item, mapAlerts)
2435                 item.second.RelayTo(pfrom);
2436
2437         pfrom->fSuccessfullyConnected = true;
2438
2439         printf("version message: version %d, blocks=%d\n", pfrom->nVersion, pfrom->nStartingHeight);
2440     }
2441
2442
2443     else if (pfrom->nVersion == 0)
2444     {
2445         // Must have a version message before anything else
2446         return false;
2447     }
2448
2449
2450     else if (strCommand == "verack")
2451     {
2452         pfrom->vRecv.SetVersion(min(pfrom->nVersion, VERSION));
2453     }
2454
2455
2456     else if (strCommand == "addr")
2457     {
2458         vector<CAddress> vAddr;
2459         vRecv >> vAddr;
2460
2461         // Don't want addr from older versions unless seeding
2462         if (pfrom->nVersion < 209)
2463             return true;
2464         if (pfrom->nVersion < 31402 && mapAddresses.size() > 1000)
2465             return true;
2466         if (vAddr.size() > 1000)
2467             return error("message addr size() = %d", vAddr.size());
2468
2469         // Store the new addresses
2470         int64 nNow = GetAdjustedTime();
2471         int64 nSince = nNow - 10 * 60;
2472         foreach(CAddress& addr, vAddr)
2473         {
2474             if (fShutdown)
2475                 return true;
2476             // ignore IPv6 for now, since it isn't implemented anyway
2477             if (!addr.IsIPv4())
2478                 continue;
2479             if (addr.nTime <= 100000000 || addr.nTime > nNow + 10 * 60)
2480                 addr.nTime = nNow - 5 * 24 * 60 * 60;
2481             AddAddress(addr, 2 * 60 * 60);
2482             pfrom->AddAddressKnown(addr);
2483             if (addr.nTime > nSince && !pfrom->fGetAddr && vAddr.size() <= 10 && addr.IsRoutable())
2484             {
2485                 // Relay to a limited number of other nodes
2486                 CRITICAL_BLOCK(cs_vNodes)
2487                 {
2488                     // Use deterministic randomness to send to the same nodes for 24 hours
2489                     // at a time so the setAddrKnowns of the chosen nodes prevent repeats
2490                     static uint256 hashSalt;
2491                     if (hashSalt == 0)
2492                         RAND_bytes((unsigned char*)&hashSalt, sizeof(hashSalt));
2493                     uint256 hashRand = hashSalt ^ (((int64)addr.ip)<<32) ^ ((GetTime()+addr.ip)/(24*60*60));
2494                     hashRand = Hash(BEGIN(hashRand), END(hashRand));
2495                     multimap<uint256, CNode*> mapMix;
2496                     foreach(CNode* pnode, vNodes)
2497                     {
2498                         if (pnode->nVersion < 31402)
2499                             continue;
2500                         unsigned int nPointer;
2501                         memcpy(&nPointer, &pnode, sizeof(nPointer));
2502                         uint256 hashKey = hashRand ^ nPointer;
2503                         hashKey = Hash(BEGIN(hashKey), END(hashKey));
2504                         mapMix.insert(make_pair(hashKey, pnode));
2505                     }
2506                     int nRelayNodes = 2;
2507                     for (multimap<uint256, CNode*>::iterator mi = mapMix.begin(); mi != mapMix.end() && nRelayNodes-- > 0; ++mi)
2508                         ((*mi).second)->PushAddress(addr);
2509                 }
2510             }
2511         }
2512         if (vAddr.size() < 1000)
2513             pfrom->fGetAddr = false;
2514     }
2515
2516
2517     else if (strCommand == "inv")
2518     {
2519         vector<CInv> vInv;
2520         vRecv >> vInv;
2521         if (vInv.size() > 50000)
2522             return error("message inv size() = %d", vInv.size());
2523
2524         CTxDB txdb("r");
2525         foreach(const CInv& inv, vInv)
2526         {
2527             if (fShutdown)
2528                 return true;
2529             pfrom->AddInventoryKnown(inv);
2530
2531             bool fAlreadyHave = AlreadyHave(txdb, inv);
2532             printf("  got inventory: %s  %s\n", inv.ToString().c_str(), fAlreadyHave ? "have" : "new");
2533
2534             if (!fAlreadyHave)
2535                 pfrom->AskFor(inv);
2536             else if (inv.type == MSG_BLOCK && mapOrphanBlocks.count(inv.hash))
2537                 pfrom->PushGetBlocks(pindexBest, GetOrphanRoot(mapOrphanBlocks[inv.hash]));
2538
2539             // Track requests for our stuff
2540             CRITICAL_BLOCK(cs_mapRequestCount)
2541             {
2542                 map<uint256, int>::iterator mi = mapRequestCount.find(inv.hash);
2543                 if (mi != mapRequestCount.end())
2544                     (*mi).second++;
2545             }
2546         }
2547     }
2548
2549
2550     else if (strCommand == "getdata")
2551     {
2552         vector<CInv> vInv;
2553         vRecv >> vInv;
2554         if (vInv.size() > 50000)
2555             return error("message getdata size() = %d", vInv.size());
2556
2557         foreach(const CInv& inv, vInv)
2558         {
2559             if (fShutdown)
2560                 return true;
2561             printf("received getdata for: %s\n", inv.ToString().c_str());
2562
2563             if (inv.type == MSG_BLOCK)
2564             {
2565                 // Send block from disk
2566                 map<uint256, CBlockIndex*>::iterator mi = mapBlockIndex.find(inv.hash);
2567                 if (mi != mapBlockIndex.end())
2568                 {
2569                     CBlock block;
2570                     block.ReadFromDisk((*mi).second);
2571                     pfrom->PushMessage("block", block);
2572
2573                     // Trigger them to send a getblocks request for the next batch of inventory
2574                     if (inv.hash == pfrom->hashContinue)
2575                     {
2576                         // Bypass PushInventory, this must send even if redundant,
2577                         // and we want it right after the last block so they don't
2578                         // wait for other stuff first.
2579                         vector<CInv> vInv;
2580                         vInv.push_back(CInv(MSG_BLOCK, hashBestChain));
2581                         pfrom->PushMessage("inv", vInv);
2582                         pfrom->hashContinue = 0;
2583                     }
2584                 }
2585             }
2586             else if (inv.IsKnownType())
2587             {
2588                 // Send stream from relay memory
2589                 CRITICAL_BLOCK(cs_mapRelay)
2590                 {
2591                     map<CInv, CDataStream>::iterator mi = mapRelay.find(inv);
2592                     if (mi != mapRelay.end())
2593                         pfrom->PushMessage(inv.GetCommand(), (*mi).second);
2594                 }
2595             }
2596
2597             // Track requests for our stuff
2598             CRITICAL_BLOCK(cs_mapRequestCount)
2599             {
2600                 map<uint256, int>::iterator mi = mapRequestCount.find(inv.hash);
2601                 if (mi != mapRequestCount.end())
2602                     (*mi).second++;
2603             }
2604         }
2605     }
2606
2607
2608     else if (strCommand == "getblocks")
2609     {
2610         CBlockLocator locator;
2611         uint256 hashStop;
2612         vRecv >> locator >> hashStop;
2613
2614         // Find the last block the caller has in the main chain
2615         CBlockIndex* pindex = locator.GetBlockIndex();
2616
2617         // Send the rest of the chain
2618         if (pindex)
2619             pindex = pindex->pnext;
2620         int nLimit = 500 + locator.GetDistanceBack();
2621         printf("getblocks %d to %s limit %d\n", (pindex ? pindex->nHeight : -1), hashStop.ToString().substr(0,20).c_str(), nLimit);
2622         for (; pindex; pindex = pindex->pnext)
2623         {
2624             if (pindex->GetBlockHash() == hashStop)
2625             {
2626                 printf("  getblocks stopping at %d %s\n", pindex->nHeight, pindex->GetBlockHash().ToString().substr(0,20).c_str());
2627                 break;
2628             }
2629             pfrom->PushInventory(CInv(MSG_BLOCK, pindex->GetBlockHash()));
2630             if (--nLimit <= 0)
2631             {
2632                 // When this block is requested, we'll send an inv that'll make them
2633                 // getblocks the next batch of inventory.
2634                 printf("  getblocks stopping at limit %d %s\n", pindex->nHeight, pindex->GetBlockHash().ToString().substr(0,20).c_str());
2635                 pfrom->hashContinue = pindex->GetBlockHash();
2636                 break;
2637             }
2638         }
2639     }
2640
2641
2642     else if (strCommand == "getheaders")
2643     {
2644         CBlockLocator locator;
2645         uint256 hashStop;
2646         vRecv >> locator >> hashStop;
2647
2648         CBlockIndex* pindex = NULL;
2649         if (locator.IsNull())
2650         {
2651             // If locator is null, return the hashStop block
2652             map<uint256, CBlockIndex*>::iterator mi = mapBlockIndex.find(hashStop);
2653             if (mi == mapBlockIndex.end())
2654                 return true;
2655             pindex = (*mi).second;
2656         }
2657         else
2658         {
2659             // Find the last block the caller has in the main chain
2660             pindex = locator.GetBlockIndex();
2661             if (pindex)
2662                 pindex = pindex->pnext;
2663         }
2664
2665         vector<CBlock> vHeaders;
2666         int nLimit = 2000 + locator.GetDistanceBack();
2667         printf("getheaders %d to %s limit %d\n", (pindex ? pindex->nHeight : -1), hashStop.ToString().substr(0,20).c_str(), nLimit);
2668         for (; pindex; pindex = pindex->pnext)
2669         {
2670             vHeaders.push_back(pindex->GetBlockHeader());
2671             if (--nLimit <= 0 || pindex->GetBlockHash() == hashStop)
2672                 break;
2673         }
2674         pfrom->PushMessage("headers", vHeaders);
2675     }
2676
2677
2678     else if (strCommand == "tx")
2679     {
2680         vector<uint256> vWorkQueue;
2681         CDataStream vMsg(vRecv);
2682         CTransaction tx;
2683         vRecv >> tx;
2684
2685         CInv inv(MSG_TX, tx.GetHash());
2686         pfrom->AddInventoryKnown(inv);
2687
2688         bool fMissingInputs = false;
2689         if (tx.AcceptToMemoryPool(true, &fMissingInputs))
2690         {
2691             AddToWalletIfMine(tx, NULL);
2692             RelayMessage(inv, vMsg);
2693             mapAlreadyAskedFor.erase(inv);
2694             vWorkQueue.push_back(inv.hash);
2695
2696             // Recursively process any orphan transactions that depended on this one
2697             for (int i = 0; i < vWorkQueue.size(); i++)
2698             {
2699                 uint256 hashPrev = vWorkQueue[i];
2700                 for (multimap<uint256, CDataStream*>::iterator mi = mapOrphanTransactionsByPrev.lower_bound(hashPrev);
2701                      mi != mapOrphanTransactionsByPrev.upper_bound(hashPrev);
2702                      ++mi)
2703                 {
2704                     const CDataStream& vMsg = *((*mi).second);
2705                     CTransaction tx;
2706                     CDataStream(vMsg) >> tx;
2707                     CInv inv(MSG_TX, tx.GetHash());
2708
2709                     if (tx.AcceptToMemoryPool(true))
2710                     {
2711                         printf("   accepted orphan tx %s\n", inv.hash.ToString().substr(0,10).c_str());
2712                         AddToWalletIfMine(tx, NULL);
2713                         RelayMessage(inv, vMsg);
2714                         mapAlreadyAskedFor.erase(inv);
2715                         vWorkQueue.push_back(inv.hash);
2716                     }
2717                 }
2718             }
2719
2720             foreach(uint256 hash, vWorkQueue)
2721                 EraseOrphanTx(hash);
2722         }
2723         else if (fMissingInputs)
2724         {
2725             printf("storing orphan tx %s\n", inv.hash.ToString().substr(0,10).c_str());
2726             AddOrphanTx(vMsg);
2727         }
2728     }
2729
2730
2731     else if (strCommand == "block")
2732     {
2733         CBlock block;
2734         vRecv >> block;
2735
2736         printf("received block %s\n", block.GetHash().ToString().substr(0,20).c_str());
2737         // block.print();
2738
2739         CInv inv(MSG_BLOCK, block.GetHash());
2740         pfrom->AddInventoryKnown(inv);
2741
2742         if (ProcessBlock(pfrom, &block))
2743             mapAlreadyAskedFor.erase(inv);
2744     }
2745
2746
2747     else if (strCommand == "getaddr")
2748     {
2749         // Nodes rebroadcast an addr every 24 hours
2750         pfrom->vAddrToSend.clear();
2751         int64 nSince = GetAdjustedTime() - 3 * 60 * 60; // in the last 3 hours
2752         CRITICAL_BLOCK(cs_mapAddresses)
2753         {
2754             unsigned int nCount = 0;
2755             foreach(const PAIRTYPE(vector<unsigned char>, CAddress)& item, mapAddresses)
2756             {
2757                 const CAddress& addr = item.second;
2758                 if (addr.nTime > nSince)
2759                     nCount++;
2760             }
2761             foreach(const PAIRTYPE(vector<unsigned char>, CAddress)& item, mapAddresses)
2762             {
2763                 const CAddress& addr = item.second;
2764                 if (addr.nTime > nSince && GetRand(nCount) < 2500)
2765                     pfrom->PushAddress(addr);
2766             }
2767         }
2768     }
2769
2770
2771     else if (strCommand == "checkorder")
2772     {
2773         uint256 hashReply;
2774         vRecv >> hashReply;
2775
2776         if (!GetBoolArg("-allowreceivebyip"))
2777         {
2778             pfrom->PushMessage("reply", hashReply, (int)2, string(""));
2779             return true;
2780         }
2781
2782         CWalletTx order;
2783         vRecv >> order;
2784
2785         /// we have a chance to check the order here
2786
2787         // Keep giving the same key to the same ip until they use it
2788         if (!mapReuseKey.count(pfrom->addr.ip))
2789             mapReuseKey[pfrom->addr.ip] = GetKeyFromKeyPool();
2790
2791         // Send back approval of order and pubkey to use
2792         CScript scriptPubKey;
2793         scriptPubKey << mapReuseKey[pfrom->addr.ip] << OP_CHECKSIG;
2794         pfrom->PushMessage("reply", hashReply, (int)0, scriptPubKey);
2795     }
2796
2797
2798     else if (strCommand == "submitorder")
2799     {
2800         uint256 hashReply;
2801         vRecv >> hashReply;
2802
2803         if (!GetBoolArg("-allowreceivebyip"))
2804         {
2805             pfrom->PushMessage("reply", hashReply, (int)2);
2806             return true;
2807         }
2808
2809         CWalletTx wtxNew;
2810         vRecv >> wtxNew;
2811         wtxNew.fFromMe = false;
2812
2813         // Broadcast
2814         if (!wtxNew.AcceptWalletTransaction())
2815         {
2816             pfrom->PushMessage("reply", hashReply, (int)1);
2817             return error("submitorder AcceptWalletTransaction() failed, returning error 1");
2818         }
2819         wtxNew.fTimeReceivedIsTxTime = true;
2820         AddToWallet(wtxNew);
2821         wtxNew.RelayWalletTransaction();
2822         mapReuseKey.erase(pfrom->addr.ip);
2823
2824         // Send back confirmation
2825         pfrom->PushMessage("reply", hashReply, (int)0);
2826     }
2827
2828
2829     else if (strCommand == "reply")
2830     {
2831         uint256 hashReply;
2832         vRecv >> hashReply;
2833
2834         CRequestTracker tracker;
2835         CRITICAL_BLOCK(pfrom->cs_mapRequests)
2836         {
2837             map<uint256, CRequestTracker>::iterator mi = pfrom->mapRequests.find(hashReply);
2838             if (mi != pfrom->mapRequests.end())
2839             {
2840                 tracker = (*mi).second;
2841                 pfrom->mapRequests.erase(mi);
2842             }
2843         }
2844         if (!tracker.IsNull())
2845             tracker.fn(tracker.param1, vRecv);
2846     }
2847
2848
2849     else if (strCommand == "ping")
2850     {
2851     }
2852
2853
2854     else if (strCommand == "alert")
2855     {
2856         CAlert alert;
2857         vRecv >> alert;
2858
2859         if (alert.ProcessAlert())
2860         {
2861             // Relay
2862             pfrom->setKnown.insert(alert.GetHash());
2863             CRITICAL_BLOCK(cs_vNodes)
2864                 foreach(CNode* pnode, vNodes)
2865                     alert.RelayTo(pnode);
2866         }
2867     }
2868
2869
2870     else
2871     {
2872         // Ignore unknown commands for extensibility
2873     }
2874
2875
2876     // Update the last seen time for this node's address
2877     if (pfrom->fNetworkNode)
2878         if (strCommand == "version" || strCommand == "addr" || strCommand == "inv" || strCommand == "getdata" || strCommand == "ping")
2879             AddressCurrentlyConnected(pfrom->addr);
2880
2881
2882     return true;
2883 }
2884
2885
2886
2887
2888
2889
2890
2891
2892
2893 bool SendMessages(CNode* pto, bool fSendTrickle)
2894 {
2895     CRITICAL_BLOCK(cs_main)
2896     {
2897         // Don't send anything until we get their version message
2898         if (pto->nVersion == 0)
2899             return true;
2900
2901         // Keep-alive ping
2902         if (pto->nLastSend && GetTime() - pto->nLastSend > 30 * 60 && pto->vSend.empty())
2903             pto->PushMessage("ping");
2904
2905         // Resend wallet transactions that haven't gotten in a block yet
2906         ResendWalletTransactions();
2907
2908         // Address refresh broadcast
2909         static int64 nLastRebroadcast;
2910         if (GetTime() - nLastRebroadcast > 24 * 60 * 60)
2911         {
2912             nLastRebroadcast = GetTime();
2913             CRITICAL_BLOCK(cs_vNodes)
2914             {
2915                 foreach(CNode* pnode, vNodes)
2916                 {
2917                     // Periodically clear setAddrKnown to allow refresh broadcasts
2918                     pnode->setAddrKnown.clear();
2919
2920                     // Rebroadcast our address
2921                     if (addrLocalHost.IsRoutable() && !fUseProxy)
2922                     {
2923                         CAddress addr(addrLocalHost);
2924                         addr.nTime = GetAdjustedTime();
2925                         pnode->PushAddress(addr);
2926                     }
2927                 }
2928             }
2929         }
2930
2931         // Clear out old addresses periodically so it's not too much work at once
2932         static int64 nLastClear;
2933         if (nLastClear == 0)
2934             nLastClear = GetTime();
2935         if (GetTime() - nLastClear > 10 * 60 && vNodes.size() >= 3)
2936         {
2937             nLastClear = GetTime();
2938             CRITICAL_BLOCK(cs_mapAddresses)
2939             {
2940                 CAddrDB addrdb;
2941                 int64 nSince = GetAdjustedTime() - 14 * 24 * 60 * 60;
2942                 for (map<vector<unsigned char>, CAddress>::iterator mi = mapAddresses.begin();
2943                      mi != mapAddresses.end();)
2944                 {
2945                     const CAddress& addr = (*mi).second;
2946                     if (addr.nTime < nSince)
2947                     {
2948                         if (mapAddresses.size() < 1000 || GetTime() > nLastClear + 20)
2949                             break;
2950                         addrdb.EraseAddress(addr);
2951                         mapAddresses.erase(mi++);
2952                     }
2953                     else
2954                         mi++;
2955                 }
2956             }
2957         }
2958
2959
2960         //
2961         // Message: addr
2962         //
2963         if (fSendTrickle)
2964         {
2965             vector<CAddress> vAddr;
2966             vAddr.reserve(pto->vAddrToSend.size());
2967             foreach(const CAddress& addr, pto->vAddrToSend)
2968             {
2969                 // returns true if wasn't already contained in the set
2970                 if (pto->setAddrKnown.insert(addr).second)
2971                 {
2972                     vAddr.push_back(addr);
2973                     // receiver rejects addr messages larger than 1000
2974                     if (vAddr.size() >= 1000)
2975                     {
2976                         pto->PushMessage("addr", vAddr);
2977                         vAddr.clear();
2978                     }
2979                 }
2980             }
2981             pto->vAddrToSend.clear();
2982             if (!vAddr.empty())
2983                 pto->PushMessage("addr", vAddr);
2984         }
2985
2986
2987         //
2988         // Message: inventory
2989         //
2990         vector<CInv> vInv;
2991         vector<CInv> vInvWait;
2992         CRITICAL_BLOCK(pto->cs_inventory)
2993         {
2994             vInv.reserve(pto->vInventoryToSend.size());
2995             vInvWait.reserve(pto->vInventoryToSend.size());
2996             foreach(const CInv& inv, pto->vInventoryToSend)
2997             {
2998                 if (pto->setInventoryKnown.count(inv))
2999                     continue;
3000
3001                 // trickle out tx inv to protect privacy
3002                 if (inv.type == MSG_TX && !fSendTrickle)
3003                 {
3004                     // 1/4 of tx invs blast to all immediately
3005                     static uint256 hashSalt;
3006                     if (hashSalt == 0)
3007                         RAND_bytes((unsigned char*)&hashSalt, sizeof(hashSalt));
3008                     uint256 hashRand = inv.hash ^ hashSalt;
3009                     hashRand = Hash(BEGIN(hashRand), END(hashRand));
3010                     bool fTrickleWait = ((hashRand & 3) != 0);
3011
3012                     // always trickle our own transactions
3013                     if (!fTrickleWait)
3014                     {
3015                         TRY_CRITICAL_BLOCK(cs_mapWallet)
3016                         {
3017                             map<uint256, CWalletTx>::iterator mi = mapWallet.find(inv.hash);
3018                             if (mi != mapWallet.end())
3019                             {
3020                                 CWalletTx& wtx = (*mi).second;
3021                                 if (wtx.fFromMe)
3022                                     fTrickleWait = true;
3023                             }
3024                         }
3025                     }
3026
3027                     if (fTrickleWait)
3028                     {
3029                         vInvWait.push_back(inv);
3030                         continue;
3031                     }
3032                 }
3033
3034                 // returns true if wasn't already contained in the set
3035                 if (pto->setInventoryKnown.insert(inv).second)
3036                 {
3037                     vInv.push_back(inv);
3038                     if (vInv.size() >= 1000)
3039                     {
3040                         pto->PushMessage("inv", vInv);
3041                         vInv.clear();
3042                     }
3043                 }
3044             }
3045             pto->vInventoryToSend = vInvWait;
3046         }
3047         if (!vInv.empty())
3048             pto->PushMessage("inv", vInv);
3049
3050
3051         //
3052         // Message: getdata
3053         //
3054         vector<CInv> vGetData;
3055         int64 nNow = GetTime() * 1000000;
3056         CTxDB txdb("r");
3057         while (!pto->mapAskFor.empty() && (*pto->mapAskFor.begin()).first <= nNow)
3058         {
3059             const CInv& inv = (*pto->mapAskFor.begin()).second;
3060             if (!AlreadyHave(txdb, inv))
3061             {
3062                 printf("sending getdata: %s\n", inv.ToString().c_str());
3063                 vGetData.push_back(inv);
3064                 if (vGetData.size() >= 1000)
3065                 {
3066                     pto->PushMessage("getdata", vGetData);
3067                     vGetData.clear();
3068                 }
3069             }
3070             pto->mapAskFor.erase(pto->mapAskFor.begin());
3071         }
3072         if (!vGetData.empty())
3073             pto->PushMessage("getdata", vGetData);
3074
3075     }
3076     return true;
3077 }
3078
3079
3080
3081
3082
3083
3084
3085
3086
3087
3088
3089
3090
3091
3092 //////////////////////////////////////////////////////////////////////////////
3093 //
3094 // BitcoinMiner
3095 //
3096
3097 void GenerateBitcoins(bool fGenerate)
3098 {
3099     if (fGenerateBitcoins != fGenerate)
3100     {
3101         fGenerateBitcoins = fGenerate;
3102         CWalletDB().WriteSetting("fGenerateBitcoins", fGenerateBitcoins);
3103         MainFrameRepaint();
3104     }
3105     if (fGenerateBitcoins)
3106     {
3107         int nProcessors = boost::thread::hardware_concurrency();
3108         printf("%d processors\n", nProcessors);
3109         if (nProcessors < 1)
3110             nProcessors = 1;
3111         if (fLimitProcessors && nProcessors > nLimitProcessors)
3112             nProcessors = nLimitProcessors;
3113         int nAddThreads = nProcessors - vnThreadsRunning[3];
3114         printf("Starting %d BitcoinMiner threads\n", nAddThreads);
3115         for (int i = 0; i < nAddThreads; i++)
3116         {
3117             if (!CreateThread(ThreadBitcoinMiner, NULL))
3118                 printf("Error: CreateThread(ThreadBitcoinMiner) failed\n");
3119             Sleep(10);
3120         }
3121     }
3122 }
3123
3124 void ThreadBitcoinMiner(void* parg)
3125 {
3126     try
3127     {
3128         vnThreadsRunning[3]++;
3129         BitcoinMiner();
3130         vnThreadsRunning[3]--;
3131     }
3132     catch (std::exception& e) {
3133         vnThreadsRunning[3]--;
3134         PrintException(&e, "ThreadBitcoinMiner()");
3135     } catch (...) {
3136         vnThreadsRunning[3]--;
3137         PrintException(NULL, "ThreadBitcoinMiner()");
3138     }
3139     UIThreadCall(boost::bind(CalledSetStatusBar, "", 0));
3140     nHPSTimerStart = 0;
3141     if (vnThreadsRunning[3] == 0)
3142         dHashesPerSec = 0;
3143     printf("ThreadBitcoinMiner exiting, %d threads remaining\n", vnThreadsRunning[3]);
3144 }
3145
3146 #if defined(__GNUC__) && defined(CRYPTOPP_X86_ASM_AVAILABLE)
3147 void CallCPUID(int in, int& aret, int& cret)
3148 {
3149     int a, c;
3150     asm (
3151         "mov %2, %%eax; " // in into eax
3152         "cpuid;"
3153         "mov %%eax, %0;" // eax into a
3154         "mov %%ecx, %1;" // ecx into c
3155         :"=r"(a),"=r"(c) /* output */
3156         :"r"(in) /* input */
3157         :"%eax","%ebx","%ecx","%edx" /* clobbered register */
3158     );
3159     aret = a;
3160     cret = c;
3161 }
3162
3163 bool Detect128BitSSE2()
3164 {
3165     int a, c, nBrand;
3166     CallCPUID(0, a, nBrand);
3167     bool fIntel = (nBrand == 0x6c65746e); // ntel
3168     bool fAMD = (nBrand == 0x444d4163); // cAMD
3169
3170     struct
3171     {
3172         unsigned int nStepping : 4;
3173         unsigned int nModel : 4;
3174         unsigned int nFamily : 4;
3175         unsigned int nProcessorType : 2;
3176         unsigned int nUnused : 2;
3177         unsigned int nExtendedModel : 4;
3178         unsigned int nExtendedFamily : 8;
3179     }
3180     cpu;
3181     CallCPUID(1, a, c);
3182     memcpy(&cpu, &a, sizeof(cpu));
3183     int nFamily = cpu.nExtendedFamily + cpu.nFamily;
3184     int nModel = cpu.nExtendedModel*16 + cpu.nModel;
3185
3186     // We need Intel Nehalem or AMD K10 or better for 128bit SSE2
3187     // Nehalem = i3/i5/i7 and some Xeon
3188     // K10 = Opterons with 4 or more cores, Phenom, Phenom II, Athlon II
3189     //  Intel Core i5  family 6, model 26 or 30
3190     //  Intel Core i7  family 6, model 26 or 30
3191     //  Intel Core i3  family 6, model 37
3192     //  AMD Phenom    family 16, model 10
3193     bool fUseSSE2 = ((fIntel && nFamily * 10000 + nModel >=  60026) ||
3194                      (fAMD   && nFamily * 10000 + nModel >= 160010));
3195
3196     // AMD reports a lower model number in 64-bit mode
3197     if (fAMD && sizeof(void*) > 4 && nFamily * 10000 + nModel >= 160000)
3198         fUseSSE2 = true;
3199
3200     static bool fPrinted;
3201     if (!fPrinted)
3202     {
3203         fPrinted = true;
3204         printf("CPUID %08x family %d, model %d, stepping %d, fUseSSE2=%d\n", nBrand, nFamily, nModel, cpu.nStepping, fUseSSE2);
3205     }
3206     return fUseSSE2;
3207 }
3208 #else
3209 bool Detect128BitSSE2() { return false; }
3210 #endif
3211
3212 int FormatHashBlocks(void* pbuffer, unsigned int len)
3213 {
3214     unsigned char* pdata = (unsigned char*)pbuffer;
3215     unsigned int blocks = 1 + ((len + 8) / 64);
3216     unsigned char* pend = pdata + 64 * blocks;
3217     memset(pdata + len, 0, 64 * blocks - len);
3218     pdata[len] = 0x80;
3219     unsigned int bits = len * 8;
3220     pend[-1] = (bits >> 0) & 0xff;
3221     pend[-2] = (bits >> 8) & 0xff;
3222     pend[-3] = (bits >> 16) & 0xff;
3223     pend[-4] = (bits >> 24) & 0xff;
3224     return blocks;
3225 }
3226
3227 using CryptoPP::ByteReverse;
3228
3229 static const unsigned int pSHA256InitState[8] =
3230 {0x6a09e667, 0xbb67ae85, 0x3c6ef372, 0xa54ff53a, 0x510e527f, 0x9b05688c, 0x1f83d9ab, 0x5be0cd19};
3231
3232 inline void SHA256Transform(void* pstate, void* pinput, const void* pinit)
3233 {
3234     memcpy(pstate, pinit, 32);
3235     CryptoPP::SHA256::Transform((CryptoPP::word32*)pstate, (CryptoPP::word32*)pinput);
3236 }
3237
3238 //
3239 // ScanHash scans nonces looking for a hash with at least some zero bits.
3240 // It operates on big endian data.  Caller does the byte reversing.
3241 // All input buffers are 16-byte aligned.  nNonce is usually preserved
3242 // between calls, but periodically or if nNonce is 0xffff0000 or above,
3243 // the block is rebuilt and nNonce starts over at zero.
3244 //
3245 unsigned int ScanHash_CryptoPP(char* pmidstate, char* pdata, char* phash1, char* phash, unsigned int& nHashesDone)
3246 {
3247     unsigned int& nNonce = *(unsigned int*)(pdata + 12);
3248     for (;;)
3249     {
3250         // Crypto++ SHA-256
3251         // Hash pdata using pmidstate as the starting state into
3252         // preformatted buffer phash1, then hash phash1 into phash
3253         nNonce++;
3254         SHA256Transform(phash1, pdata, pmidstate);
3255         SHA256Transform(phash, phash1, pSHA256InitState);
3256
3257         // Return the nonce if the hash has at least some zero bits,
3258         // caller will check if it has enough to reach the target
3259         if (((unsigned short*)phash)[14] == 0)
3260             return nNonce;
3261
3262         // If nothing found after trying for a while, return -1
3263         if ((nNonce & 0xffff) == 0)
3264         {
3265             nHashesDone = 0xffff+1;
3266             return -1;
3267         }
3268     }
3269 }
3270
3271 extern unsigned int ScanHash_4WaySSE2(char* pmidstate, char* pblock, char* phash1, char* phash, unsigned int& nHashesDone);
3272
3273
3274
3275 class COrphan
3276 {
3277 public:
3278     CTransaction* ptx;
3279     set<uint256> setDependsOn;
3280     double dPriority;
3281
3282     COrphan(CTransaction* ptxIn)
3283     {
3284         ptx = ptxIn;
3285         dPriority = 0;
3286     }
3287
3288     void print() const
3289     {
3290         printf("COrphan(hash=%s, dPriority=%.1f)\n", ptx->GetHash().ToString().substr(0,10).c_str(), dPriority);
3291         foreach(uint256 hash, setDependsOn)
3292             printf("   setDependsOn %s\n", hash.ToString().substr(0,10).c_str());
3293     }
3294 };
3295
3296
3297 CBlock* CreateNewBlock(CReserveKey& reservekey)
3298 {
3299     CBlockIndex* pindexPrev = pindexBest;
3300
3301     // Create new block
3302     auto_ptr<CBlock> pblock(new CBlock());
3303     if (!pblock.get())
3304         return NULL;
3305
3306     // Create coinbase tx
3307     CTransaction txNew;
3308     txNew.vin.resize(1);
3309     txNew.vin[0].prevout.SetNull();
3310     txNew.vout.resize(1);
3311     txNew.vout[0].scriptPubKey << reservekey.GetReservedKey() << OP_CHECKSIG;
3312
3313     // Add our coinbase tx as first transaction
3314     pblock->vtx.push_back(txNew);
3315
3316     // Collect memory pool transactions into the block
3317     int64 nFees = 0;
3318     CRITICAL_BLOCK(cs_main)
3319     CRITICAL_BLOCK(cs_mapTransactions)
3320     {
3321         CTxDB txdb("r");
3322
3323         // Priority order to process transactions
3324         list<COrphan> vOrphan; // list memory doesn't move
3325         map<uint256, vector<COrphan*> > mapDependers;
3326         multimap<double, CTransaction*> mapPriority;
3327         for (map<uint256, CTransaction>::iterator mi = mapTransactions.begin(); mi != mapTransactions.end(); ++mi)
3328         {
3329             CTransaction& tx = (*mi).second;
3330             if (tx.IsCoinBase() || !tx.IsFinal())
3331                 continue;
3332
3333             COrphan* porphan = NULL;
3334             double dPriority = 0;
3335             foreach(const CTxIn& txin, tx.vin)
3336             {
3337                 // Read prev transaction
3338                 CTransaction txPrev;
3339                 CTxIndex txindex;
3340                 if (!txPrev.ReadFromDisk(txdb, txin.prevout, txindex))
3341                 {
3342                     // Has to wait for dependencies
3343                     if (!porphan)
3344                     {
3345                         // Use list for automatic deletion
3346                         vOrphan.push_back(COrphan(&tx));
3347                         porphan = &vOrphan.back();
3348                     }
3349                     mapDependers[txin.prevout.hash].push_back(porphan);
3350                     porphan->setDependsOn.insert(txin.prevout.hash);
3351                     continue;
3352                 }
3353                 int64 nValueIn = txPrev.vout[txin.prevout.n].nValue;
3354
3355                 // Read block header
3356                 int nConf = txindex.GetDepthInMainChain();
3357
3358                 dPriority += (double)nValueIn * nConf;
3359
3360                 if (fDebug && GetBoolArg("-printpriority"))
3361                     printf("priority     nValueIn=%-12I64d nConf=%-5d dPriority=%-20.1f\n", nValueIn, nConf, dPriority);
3362             }
3363
3364             // Priority is sum(valuein * age) / txsize
3365             dPriority /= ::GetSerializeSize(tx, SER_NETWORK);
3366
3367             if (porphan)
3368                 porphan->dPriority = dPriority;
3369             else
3370                 mapPriority.insert(make_pair(-dPriority, &(*mi).second));
3371
3372             if (fDebug && GetBoolArg("-printpriority"))
3373             {
3374                 printf("priority %-20.1f %s\n%s", dPriority, tx.GetHash().ToString().substr(0,10).c_str(), tx.ToString().c_str());
3375                 if (porphan)
3376                     porphan->print();
3377                 printf("\n");
3378             }
3379         }
3380
3381         // Collect transactions into block
3382         map<uint256, CTxIndex> mapTestPool;
3383         uint64 nBlockSize = 1000;
3384         int nBlockSigOps = 100;
3385         while (!mapPriority.empty())
3386         {
3387             // Take highest priority transaction off priority queue
3388             double dPriority = -(*mapPriority.begin()).first;
3389             CTransaction& tx = *(*mapPriority.begin()).second;
3390             mapPriority.erase(mapPriority.begin());
3391
3392             // Size limits
3393             unsigned int nTxSize = ::GetSerializeSize(tx, SER_NETWORK);
3394             if (nBlockSize + nTxSize >= MAX_BLOCK_SIZE_GEN)
3395                 continue;
3396             int nTxSigOps = tx.GetSigOpCount();
3397             if (nBlockSigOps + nTxSigOps >= MAX_BLOCK_SIGOPS)
3398                 continue;
3399
3400             // Transaction fee required depends on block size
3401             bool fAllowFree = (nBlockSize + nTxSize < 4000 || CTransaction::AllowFree(dPriority));
3402             int64 nMinFee = tx.GetMinFee(nBlockSize, fAllowFree);
3403
3404             // Connecting shouldn't fail due to dependency on other memory pool transactions
3405             // because we're already processing them in order of dependency
3406             map<uint256, CTxIndex> mapTestPoolTmp(mapTestPool);
3407             if (!tx.ConnectInputs(txdb, mapTestPoolTmp, CDiskTxPos(1,1,1), pindexPrev, nFees, false, true, nMinFee))
3408                 continue;
3409             swap(mapTestPool, mapTestPoolTmp);
3410
3411             // Added
3412             pblock->vtx.push_back(tx);
3413             nBlockSize += nTxSize;
3414             nBlockSigOps += nTxSigOps;
3415
3416             // Add transactions that depend on this one to the priority queue
3417             uint256 hash = tx.GetHash();
3418             if (mapDependers.count(hash))
3419             {
3420                 foreach(COrphan* porphan, mapDependers[hash])
3421                 {
3422                     if (!porphan->setDependsOn.empty())
3423                     {
3424                         porphan->setDependsOn.erase(hash);
3425                         if (porphan->setDependsOn.empty())
3426                             mapPriority.insert(make_pair(-porphan->dPriority, porphan->ptx));
3427                     }
3428                 }
3429             }
3430         }
3431     }
3432     pblock->vtx[0].vout[0].nValue = GetBlockValue(pindexPrev->nHeight+1, nFees);
3433
3434     // Fill in header
3435     pblock->hashPrevBlock  = pindexPrev->GetBlockHash();
3436     pblock->hashMerkleRoot = pblock->BuildMerkleTree();
3437     pblock->nTime          = max(pindexPrev->GetMedianTimePast()+1, GetAdjustedTime());
3438     pblock->nBits          = GetNextWorkRequired(pindexPrev);
3439     pblock->nNonce         = 0;
3440
3441     return pblock.release();
3442 }
3443
3444
3445 void IncrementExtraNonce(CBlock* pblock, CBlockIndex* pindexPrev, unsigned int& nExtraNonce, int64& nPrevTime)
3446 {
3447     // Update nExtraNonce
3448     int64 nNow = max(pindexPrev->GetMedianTimePast()+1, GetAdjustedTime());
3449     if (++nExtraNonce >= 0x7f && nNow > nPrevTime+1)
3450     {
3451         nExtraNonce = 1;
3452         nPrevTime = nNow;
3453     }
3454     pblock->vtx[0].vin[0].scriptSig = CScript() << pblock->nBits << CBigNum(nExtraNonce);
3455     pblock->hashMerkleRoot = pblock->BuildMerkleTree();
3456 }
3457
3458
3459 void FormatHashBuffers(CBlock* pblock, char* pmidstate, char* pdata, char* phash1)
3460 {
3461     //
3462     // Prebuild hash buffers
3463     //
3464     struct
3465     {
3466         struct unnamed2
3467         {
3468             int nVersion;
3469             uint256 hashPrevBlock;
3470             uint256 hashMerkleRoot;
3471             unsigned int nTime;
3472             unsigned int nBits;
3473             unsigned int nNonce;
3474         }
3475         block;
3476         unsigned char pchPadding0[64];
3477         uint256 hash1;
3478         unsigned char pchPadding1[64];
3479     }
3480     tmp;
3481     memset(&tmp, 0, sizeof(tmp));
3482
3483     tmp.block.nVersion       = pblock->nVersion;
3484     tmp.block.hashPrevBlock  = pblock->hashPrevBlock;
3485     tmp.block.hashMerkleRoot = pblock->hashMerkleRoot;
3486     tmp.block.nTime          = pblock->nTime;
3487     tmp.block.nBits          = pblock->nBits;
3488     tmp.block.nNonce         = pblock->nNonce;
3489
3490     FormatHashBlocks(&tmp.block, sizeof(tmp.block));
3491     FormatHashBlocks(&tmp.hash1, sizeof(tmp.hash1));
3492
3493     // Byte swap all the input buffer
3494     for (int i = 0; i < sizeof(tmp)/4; i++)
3495         ((unsigned int*)&tmp)[i] = ByteReverse(((unsigned int*)&tmp)[i]);
3496
3497     // Precalc the first half of the first hash, which stays constant
3498     SHA256Transform(pmidstate, &tmp.block, pSHA256InitState);
3499
3500     memcpy(pdata, &tmp.block, 128);
3501     memcpy(phash1, &tmp.hash1, 64);
3502 }
3503
3504
3505 bool CheckWork(CBlock* pblock, CReserveKey& reservekey)
3506 {
3507     uint256 hash = pblock->GetHash();
3508     uint256 hashTarget = CBigNum().SetCompact(pblock->nBits).getuint256();
3509
3510     if (hash > hashTarget)
3511         return false;
3512
3513     //// debug print
3514     printf("BitcoinMiner:\n");
3515     printf("proof-of-work found  \n  hash: %s  \ntarget: %s\n", hash.GetHex().c_str(), hashTarget.GetHex().c_str());
3516     pblock->print();
3517     printf("%s ", DateTimeStrFormat("%x %H:%M", GetTime()).c_str());
3518     printf("generated %s\n", FormatMoney(pblock->vtx[0].vout[0].nValue).c_str());
3519
3520     // Found a solution
3521     CRITICAL_BLOCK(cs_main)
3522     {
3523         if (pblock->hashPrevBlock != hashBestChain)
3524             return error("BitcoinMiner : generated block is stale");
3525
3526         // Remove key from key pool
3527         reservekey.KeepKey();
3528
3529         // Track how many getdata requests this block gets
3530         CRITICAL_BLOCK(cs_mapRequestCount)
3531             mapRequestCount[pblock->GetHash()] = 0;
3532
3533         // Process this block the same as if we had received it from another node
3534         if (!ProcessBlock(NULL, pblock))
3535             return error("BitcoinMiner : ProcessBlock, block not accepted");
3536     }
3537
3538     Sleep(2000);
3539     return true;
3540 }
3541
3542
3543 void BitcoinMiner()
3544 {
3545     printf("BitcoinMiner started\n");
3546     SetThreadPriority(THREAD_PRIORITY_LOWEST);
3547     bool f4WaySSE2 = Detect128BitSSE2();
3548     if (mapArgs.count("-4way"))
3549         f4WaySSE2 = GetBoolArg("-4way");
3550
3551     // Each thread has its own key and counter
3552     CReserveKey reservekey;
3553     unsigned int nExtraNonce = 0;
3554     int64 nPrevTime = 0;
3555
3556     while (fGenerateBitcoins)
3557     {
3558         if (AffinityBugWorkaround(ThreadBitcoinMiner))
3559             return;
3560         if (fShutdown)
3561             return;
3562         while (vNodes.empty() || IsInitialBlockDownload())
3563         {
3564             Sleep(1000);
3565             if (fShutdown)
3566                 return;
3567             if (!fGenerateBitcoins)
3568                 return;
3569         }
3570
3571
3572         //
3573         // Create new block
3574         //
3575         unsigned int nTransactionsUpdatedLast = nTransactionsUpdated;
3576         CBlockIndex* pindexPrev = pindexBest;
3577
3578         auto_ptr<CBlock> pblock(CreateNewBlock(reservekey));
3579         if (!pblock.get())
3580             return;
3581         IncrementExtraNonce(pblock.get(), pindexPrev, nExtraNonce, nPrevTime);
3582
3583         printf("Running BitcoinMiner with %d transactions in block\n", pblock->vtx.size());
3584
3585
3586         //
3587         // Prebuild hash buffers
3588         //
3589         char pmidstatebuf[32+16]; char* pmidstate = alignup<16>(pmidstatebuf);
3590         char pdatabuf[128+16];    char* pdata     = alignup<16>(pdatabuf);
3591         char phash1buf[64+16];    char* phash1    = alignup<16>(phash1buf);
3592
3593         FormatHashBuffers(pblock.get(), pmidstate, pdata, phash1);
3594
3595         unsigned int& nBlockTime = *(unsigned int*)(pdata + 64 + 4);
3596         unsigned int& nBlockNonce = *(unsigned int*)(pdata + 64 + 12);
3597
3598
3599         //
3600         // Search
3601         //
3602         int64 nStart = GetTime();
3603         uint256 hashTarget = CBigNum().SetCompact(pblock->nBits).getuint256();
3604         uint256 hashbuf[2];
3605         uint256& hash = *alignup<16>(hashbuf);
3606         loop
3607         {
3608             unsigned int nHashesDone = 0;
3609             unsigned int nNonceFound;
3610
3611 #ifdef FOURWAYSSE2
3612             if (f4WaySSE2)
3613                 // tcatm's 4-way 128-bit SSE2 SHA-256
3614                 nNonceFound = ScanHash_4WaySSE2(pmidstate, pdata + 64, phash1, (char*)&hash, nHashesDone);
3615             else
3616 #endif
3617                 // Crypto++ SHA-256
3618                 nNonceFound = ScanHash_CryptoPP(pmidstate, pdata + 64, phash1, (char*)&hash, nHashesDone);
3619
3620             // Check if something found
3621             if (nNonceFound != -1)
3622             {
3623                 for (int i = 0; i < sizeof(hash)/4; i++)
3624                     ((unsigned int*)&hash)[i] = ByteReverse(((unsigned int*)&hash)[i]);
3625
3626                 if (hash <= hashTarget)
3627                 {
3628                     // Found a solution
3629                     pblock->nNonce = ByteReverse(nNonceFound);
3630                     assert(hash == pblock->GetHash());
3631
3632                     SetThreadPriority(THREAD_PRIORITY_NORMAL);
3633                     CheckWork(pblock.get(), reservekey);
3634                     SetThreadPriority(THREAD_PRIORITY_LOWEST);
3635                     break;
3636                 }
3637             }
3638
3639             // Meter hashes/sec
3640             static int64 nHashCounter;
3641             if (nHPSTimerStart == 0)
3642             {
3643                 nHPSTimerStart = GetTimeMillis();
3644                 nHashCounter = 0;
3645             }
3646             else
3647                 nHashCounter += nHashesDone;
3648             if (GetTimeMillis() - nHPSTimerStart > 4000)
3649             {
3650                 static CCriticalSection cs;
3651                 CRITICAL_BLOCK(cs)
3652                 {
3653                     if (GetTimeMillis() - nHPSTimerStart > 4000)
3654                     {
3655                         dHashesPerSec = 1000.0 * nHashCounter / (GetTimeMillis() - nHPSTimerStart);
3656                         nHPSTimerStart = GetTimeMillis();
3657                         nHashCounter = 0;
3658                         string strStatus = strprintf("    %.0f khash/s", dHashesPerSec/1000.0);
3659                         UIThreadCall(boost::bind(CalledSetStatusBar, strStatus, 0));
3660                         static int64 nLogTime;
3661                         if (GetTime() - nLogTime > 30 * 60)
3662                         {
3663                             nLogTime = GetTime();
3664                             printf("%s ", DateTimeStrFormat("%x %H:%M", GetTime()).c_str());
3665                             printf("hashmeter %3d CPUs %6.0f khash/s\n", vnThreadsRunning[3], dHashesPerSec/1000.0);
3666                         }
3667                     }
3668                 }
3669             }
3670
3671             // Check for stop or if block needs to be rebuilt
3672             if (fShutdown)
3673                 return;
3674             if (!fGenerateBitcoins)
3675                 return;
3676             if (fLimitProcessors && vnThreadsRunning[3] > nLimitProcessors)
3677                 return;
3678             if (vNodes.empty())
3679                 break;
3680             if (nBlockNonce >= 0xffff0000)
3681                 break;
3682             if (nTransactionsUpdated != nTransactionsUpdatedLast && GetTime() - nStart > 60)
3683                 break;
3684             if (pindexPrev != pindexBest)
3685                 break;
3686
3687             // Update nTime every few seconds
3688             pblock->nTime = max(pindexPrev->GetMedianTimePast()+1, GetAdjustedTime());
3689             nBlockTime = ByteReverse(pblock->nTime);
3690         }
3691     }
3692 }
3693
3694
3695
3696
3697
3698
3699
3700
3701
3702
3703
3704
3705
3706
3707
3708
3709
3710
3711 //////////////////////////////////////////////////////////////////////////////
3712 //
3713 // Actions
3714 //
3715
3716
3717 int64 GetBalance()
3718 {
3719     int64 nStart = GetTimeMillis();
3720
3721     int64 nTotal = 0;
3722     CRITICAL_BLOCK(cs_mapWallet)
3723     {
3724         for (map<uint256, CWalletTx>::iterator it = mapWallet.begin(); it != mapWallet.end(); ++it)
3725         {
3726             CWalletTx* pcoin = &(*it).second;
3727             if (!pcoin->IsFinal() || pcoin->fSpent || !pcoin->IsConfirmed())
3728                 continue;
3729             nTotal += pcoin->GetCredit();
3730         }
3731     }
3732
3733     //printf("GetBalance() %"PRI64d"ms\n", GetTimeMillis() - nStart);
3734     return nTotal;
3735 }
3736
3737
3738 bool SelectCoinsMinConf(int64 nTargetValue, int nConfMine, int nConfTheirs, set<CWalletTx*>& setCoinsRet)
3739 {
3740     setCoinsRet.clear();
3741
3742     // List of values less than target
3743     int64 nLowestLarger = INT64_MAX;
3744     CWalletTx* pcoinLowestLarger = NULL;
3745     vector<pair<int64, CWalletTx*> > vValue;
3746     int64 nTotalLower = 0;
3747
3748     CRITICAL_BLOCK(cs_mapWallet)
3749     {
3750        vector<CWalletTx*> vCoins;
3751        vCoins.reserve(mapWallet.size());
3752        for (map<uint256, CWalletTx>::iterator it = mapWallet.begin(); it != mapWallet.end(); ++it)
3753            vCoins.push_back(&(*it).second);
3754        random_shuffle(vCoins.begin(), vCoins.end(), GetRandInt);
3755
3756        foreach(CWalletTx* pcoin, vCoins)
3757        {
3758             if (!pcoin->IsFinal() || pcoin->fSpent || !pcoin->IsConfirmed())
3759                 continue;
3760
3761             int nDepth = pcoin->GetDepthInMainChain();
3762             if (nDepth < (pcoin->IsFromMe() ? nConfMine : nConfTheirs))
3763                 continue;
3764
3765             int64 n = pcoin->GetCredit();
3766             if (n <= 0)
3767                 continue;
3768             if (n < nTargetValue)
3769             {
3770                 vValue.push_back(make_pair(n, pcoin));
3771                 nTotalLower += n;
3772             }
3773             else if (n == nTargetValue)
3774             {
3775                 setCoinsRet.insert(pcoin);
3776                 return true;
3777             }
3778             else if (n < nLowestLarger)
3779             {
3780                 nLowestLarger = n;
3781                 pcoinLowestLarger = pcoin;
3782             }
3783         }
3784     }
3785
3786     if (nTotalLower < nTargetValue)
3787     {
3788         if (pcoinLowestLarger == NULL)
3789             return false;
3790         setCoinsRet.insert(pcoinLowestLarger);
3791         return true;
3792     }
3793
3794     // Solve subset sum by stochastic approximation
3795     sort(vValue.rbegin(), vValue.rend());
3796     vector<char> vfIncluded;
3797     vector<char> vfBest(vValue.size(), true);
3798     int64 nBest = nTotalLower;
3799
3800     for (int nRep = 0; nRep < 1000 && nBest != nTargetValue; nRep++)
3801     {
3802         vfIncluded.assign(vValue.size(), false);
3803         int64 nTotal = 0;
3804         bool fReachedTarget = false;
3805         for (int nPass = 0; nPass < 2 && !fReachedTarget; nPass++)
3806         {
3807             for (int i = 0; i < vValue.size(); i++)
3808             {
3809                 if (nPass == 0 ? rand() % 2 : !vfIncluded[i])
3810                 {
3811                     nTotal += vValue[i].first;
3812                     vfIncluded[i] = true;
3813                     if (nTotal >= nTargetValue)
3814                     {
3815                         fReachedTarget = true;
3816                         if (nTotal < nBest)
3817                         {
3818                             nBest = nTotal;
3819                             vfBest = vfIncluded;
3820                         }
3821                         nTotal -= vValue[i].first;
3822                         vfIncluded[i] = false;
3823                     }
3824                 }
3825             }
3826         }
3827     }
3828
3829     // If the next larger is still closer, return it
3830     if (pcoinLowestLarger && nLowestLarger - nTargetValue <= nBest - nTargetValue)
3831         setCoinsRet.insert(pcoinLowestLarger);
3832     else
3833     {
3834         for (int i = 0; i < vValue.size(); i++)
3835             if (vfBest[i])
3836                 setCoinsRet.insert(vValue[i].second);
3837
3838         //// debug print
3839         printf("SelectCoins() best subset: ");
3840         for (int i = 0; i < vValue.size(); i++)
3841             if (vfBest[i])
3842                 printf("%s ", FormatMoney(vValue[i].first).c_str());
3843         printf("total %s\n", FormatMoney(nBest).c_str());
3844     }
3845
3846     return true;
3847 }
3848
3849 bool SelectCoins(int64 nTargetValue, set<CWalletTx*>& setCoinsRet)
3850 {
3851     return (SelectCoinsMinConf(nTargetValue, 1, 6, setCoinsRet) ||
3852             SelectCoinsMinConf(nTargetValue, 1, 1, setCoinsRet) ||
3853             SelectCoinsMinConf(nTargetValue, 0, 1, setCoinsRet));
3854 }
3855
3856
3857
3858
3859 bool CreateTransaction(CScript scriptPubKey, int64 nValue, CWalletTx& wtxNew, CReserveKey& reservekey, int64& nFeeRet)
3860 {
3861     CRITICAL_BLOCK(cs_main)
3862     {
3863         // txdb must be opened before the mapWallet lock
3864         CTxDB txdb("r");
3865         CRITICAL_BLOCK(cs_mapWallet)
3866         {
3867             nFeeRet = nTransactionFee;
3868             loop
3869             {
3870                 wtxNew.vin.clear();
3871                 wtxNew.vout.clear();
3872                 wtxNew.fFromMe = true;
3873                 if (nValue < 0)
3874                     return false;
3875                 int64 nValueOut = nValue;
3876                 int64 nTotalValue = nValue + nFeeRet;
3877                 double dPriority = 0;
3878
3879                 // Choose coins to use
3880                 set<CWalletTx*> setCoins;
3881                 if (!SelectCoins(nTotalValue, setCoins))
3882                     return false;
3883                 int64 nValueIn = 0;
3884                 foreach(CWalletTx* pcoin, setCoins)
3885                 {
3886                     int64 nCredit = pcoin->GetCredit();
3887                     nValueIn += nCredit;
3888                     dPriority += (double)nCredit * pcoin->GetDepthInMainChain();
3889                 }
3890
3891                 // Fill a vout to the payee
3892                 bool fChangeFirst = GetRand(2);
3893                 if (!fChangeFirst)
3894                     wtxNew.vout.push_back(CTxOut(nValueOut, scriptPubKey));
3895
3896                 // Fill a vout back to self with any change
3897                 int64 nChange = nValueIn - nTotalValue;
3898                 if (nChange >= CENT)
3899                 {
3900                     // Note: We use a new key here to keep it from being obvious which side is the change.
3901                     //  The drawback is that by not reusing a previous key, the change may be lost if a
3902                     //  backup is restored, if the backup doesn't have the new private key for the change.
3903                     //  If we reused the old key, it would be possible to add code to look for and
3904                     //  rediscover unknown transactions that were written with keys of ours to recover
3905                     //  post-backup change.
3906
3907                     // Reserve a new key pair from key pool
3908                     vector<unsigned char> vchPubKey = reservekey.GetReservedKey();
3909                     assert(mapKeys.count(vchPubKey));
3910
3911                     // Fill a vout to ourself, using same address type as the payment
3912                     CScript scriptChange;
3913                     if (scriptPubKey.GetBitcoinAddressHash160() != 0)
3914                         scriptChange.SetBitcoinAddress(vchPubKey);
3915                     else
3916                         scriptChange << vchPubKey << OP_CHECKSIG;
3917                     wtxNew.vout.push_back(CTxOut(nChange, scriptChange));
3918                 }
3919                 else
3920                     reservekey.ReturnKey();
3921
3922                 // Fill a vout to the payee
3923                 if (fChangeFirst)
3924                     wtxNew.vout.push_back(CTxOut(nValueOut, scriptPubKey));
3925
3926                 // Fill vin
3927                 foreach(CWalletTx* pcoin, setCoins)
3928                     for (int nOut = 0; nOut < pcoin->vout.size(); nOut++)
3929                         if (pcoin->vout[nOut].IsMine())
3930                             wtxNew.vin.push_back(CTxIn(pcoin->GetHash(), nOut));
3931
3932                 // Sign
3933                 int nIn = 0;
3934                 foreach(CWalletTx* pcoin, setCoins)
3935                     for (int nOut = 0; nOut < pcoin->vout.size(); nOut++)
3936                         if (pcoin->vout[nOut].IsMine())
3937                             if (!SignSignature(*pcoin, wtxNew, nIn++))
3938                                 return false;
3939
3940                 // Limit size
3941                 unsigned int nBytes = ::GetSerializeSize(*(CTransaction*)&wtxNew, SER_NETWORK);
3942                 if (nBytes >= MAX_BLOCK_SIZE_GEN/5)
3943                     return false;
3944                 dPriority /= nBytes;
3945
3946                 // Check that enough fee is included
3947                 int64 nPayFee = nTransactionFee * (1 + (int64)nBytes / 1000);
3948                 bool fAllowFree = CTransaction::AllowFree(dPriority);
3949                 int64 nMinFee = wtxNew.GetMinFee(1, fAllowFree);
3950                 if (nFeeRet < max(nPayFee, nMinFee))
3951                 {
3952                     nFeeRet = max(nPayFee, nMinFee);
3953                     continue;
3954                 }
3955
3956                 // Fill vtxPrev by copying from previous transactions vtxPrev
3957                 wtxNew.AddSupportingTransactions(txdb);
3958                 wtxNew.fTimeReceivedIsTxTime = true;
3959
3960                 break;
3961             }
3962         }
3963     }
3964     return true;
3965 }
3966
3967 // Call after CreateTransaction unless you want to abort
3968 bool CommitTransaction(CWalletTx& wtxNew, CReserveKey& reservekey)
3969 {
3970     CRITICAL_BLOCK(cs_main)
3971     {
3972         printf("CommitTransaction:\n%s", wtxNew.ToString().c_str());
3973         CRITICAL_BLOCK(cs_mapWallet)
3974         {
3975             // This is only to keep the database open to defeat the auto-flush for the
3976             // duration of this scope.  This is the only place where this optimization
3977             // maybe makes sense; please don't do it anywhere else.
3978             CWalletDB walletdb("r");
3979
3980             // Take key pair from key pool so it won't be used again
3981             reservekey.KeepKey();
3982
3983             // Add tx to wallet, because if it has change it's also ours,
3984             // otherwise just for transaction history.
3985             AddToWallet(wtxNew);
3986
3987             // Mark old coins as spent
3988             set<CWalletTx*> setCoins;
3989             foreach(const CTxIn& txin, wtxNew.vin)
3990                 setCoins.insert(&mapWallet[txin.prevout.hash]);
3991             foreach(CWalletTx* pcoin, setCoins)
3992             {
3993                 pcoin->fSpent = true;
3994                 pcoin->WriteToDisk();
3995                 vWalletUpdated.push_back(pcoin->GetHash());
3996             }
3997         }
3998
3999         // Track how many getdata requests our transaction gets
4000         CRITICAL_BLOCK(cs_mapRequestCount)
4001             mapRequestCount[wtxNew.GetHash()] = 0;
4002
4003         // Broadcast
4004         if (!wtxNew.AcceptToMemoryPool())
4005         {
4006             // This must not fail. The transaction has already been signed and recorded.
4007             printf("CommitTransaction() : Error: Transaction not valid");
4008             return false;
4009         }
4010         wtxNew.RelayWalletTransaction();
4011     }
4012     MainFrameRepaint();
4013     return true;
4014 }
4015
4016
4017
4018
4019 string SendMoney(CScript scriptPubKey, int64 nValue, CWalletTx& wtxNew, bool fAskFee)
4020 {
4021     CRITICAL_BLOCK(cs_main)
4022     {
4023         CReserveKey reservekey;
4024         int64 nFeeRequired;
4025         if (!CreateTransaction(scriptPubKey, nValue, wtxNew, reservekey, nFeeRequired))
4026         {
4027             string strError;
4028             if (nValue + nFeeRequired > GetBalance())
4029                 strError = strprintf(_("Error: This is an oversized transaction that requires a transaction fee of %s  "), FormatMoney(nFeeRequired).c_str());
4030             else
4031                 strError = _("Error: Transaction creation failed  ");
4032             printf("SendMoney() : %s", strError.c_str());
4033             return strError;
4034         }
4035
4036         if (fAskFee && !ThreadSafeAskFee(nFeeRequired, _("Sending..."), NULL))
4037             return "ABORTED";
4038
4039         if (!CommitTransaction(wtxNew, reservekey))
4040             return _("Error: The transaction was rejected.  This might happen if some of the coins in your wallet were already spent, such as if you used a copy of wallet.dat and coins were spent in the copy but not marked as spent here.");
4041     }
4042     MainFrameRepaint();
4043     return "";
4044 }
4045
4046
4047
4048 string SendMoneyToBitcoinAddress(string strAddress, int64 nValue, CWalletTx& wtxNew, bool fAskFee)
4049 {
4050     // Check amount
4051     if (nValue <= 0)
4052         return _("Invalid amount");
4053     if (nValue + nTransactionFee > GetBalance())
4054         return _("Insufficient funds");
4055
4056     // Parse bitcoin address
4057     CScript scriptPubKey;
4058     if (!scriptPubKey.SetBitcoinAddress(strAddress))
4059         return _("Invalid bitcoin address");
4060
4061     return SendMoney(scriptPubKey, nValue, wtxNew, fAskFee);
4062 }