src/db.cpp

   1 // Copyright (c) 2009-2010 Satoshi Nakamoto
   2 // Copyright (c) 2011 The Bitcoin developers
   3 // Copyright (c) 2011-2012 The PPCoin developers
   4 // Distributed under the MIT/X11 software license, see the accompanying
   5 // file license.txt or http://www.opensource.org/licenses/mit-license.php.
   6
   7 #include "headers.h"
   8 #include "db.h"
   9 #include "net.h"
  10 #include "checkpoints.h"
  11 #include <boost/filesystem.hpp>
  12 #include <boost/filesystem/fstream.hpp>
  13
  14 using namespace std;
  15 using namespace boost;
  16
  17
  18 unsigned int nWalletDBUpdated;
  19 uint64 nAccountingEntryNumber = 0;
  20
  21
  22
  23 //
  24 // CDB
  25 //
  26
  27 static CCriticalSection cs_db;
  28 static bool fDbEnvInit = false;
  29 DbEnv dbenv(0);
  30 static map<string, int> mapFileUseCount;
  31 static map<string, Db*> mapDb;
  32
  33 static void EnvShutdown()
  34 {
  35     if (!fDbEnvInit)
  36         return;
  37
  38     fDbEnvInit = false;
  39     try
  40     {
  41         dbenv.close(0);
  42     }
  43     catch (const DbException& e)
  44     {
  45         printf("EnvShutdown exception: %s (%d)\n", e.what(), e.get_errno());
  46     }
  47     DbEnv(0).remove(GetDataDir().c_str(), 0);
  48 }
  49
  50 class CDBInit
  51 {
  52 public:
  53     CDBInit()
  54     {
  55     }
  56     ~CDBInit()
  57     {
  58         EnvShutdown();
  59     }
  60 }
  61 instance_of_cdbinit;
  62
  63
  64 CDB::CDB(const char* pszFile, const char* pszMode) : pdb(NULL)
  65 {
  66     int ret;
  67     if (pszFile == NULL)
  68         return;
  69
  70     fReadOnly = (!strchr(pszMode, '+') && !strchr(pszMode, 'w'));
  71     bool fCreate = strchr(pszMode, 'c');
  72     unsigned int nFlags = DB_THREAD;
  73     if (fCreate)
  74         nFlags |= DB_CREATE;
  75
  76     CRITICAL_BLOCK(cs_db)
  77     {
  78         if (!fDbEnvInit)
  79         {
  80             if (fShutdown)
  81                 return;
  82             string strDataDir = GetDataDir();
  83             string strLogDir = strDataDir + "/database";
  84             filesystem::create_directory(strLogDir.c_str());
  85             string strErrorFile = strDataDir + "/db.log";
  86             printf("dbenv.open strLogDir=%s strErrorFile=%s\n", strLogDir.c_str(), strErrorFile.c_str());
  87
  88             dbenv.set_lg_dir(strLogDir.c_str());
  89             dbenv.set_lg_max(10000000);
  90             dbenv.set_lk_max_locks(10000);
  91             dbenv.set_lk_max_objects(10000);
  92             dbenv.set_errfile(fopen(strErrorFile.c_str(), "a")); /// debug
  93             dbenv.set_flags(DB_AUTO_COMMIT, 1);
  94             ret = dbenv.open(strDataDir.c_str(),
  95                              DB_CREATE     |
  96                              DB_INIT_LOCK  |
  97                              DB_INIT_LOG   |
  98                              DB_INIT_MPOOL |
  99                              DB_INIT_TXN   |
 100                              DB_THREAD     |
 101                              DB_RECOVER,
 102                              S_IRUSR | S_IWUSR);
 103             if (ret > 0)
 104                 throw runtime_error(strprintf("CDB() : error %d opening database environment", ret));
 105             fDbEnvInit = true;
 106         }
 107
 108         strFile = pszFile;
 109         ++mapFileUseCount[strFile];
 110         pdb = mapDb[strFile];
 111         if (pdb == NULL)
 112         {
 113             pdb = new Db(&dbenv, 0);
 114
 115             ret = pdb->open(NULL,      // Txn pointer
 116                             pszFile,   // Filename
 117                             "main",    // Logical db name
 118                             DB_BTREE,  // Database type
 119                             nFlags,    // Flags
 120                             0);
 121
 122             if (ret > 0)
 123             {
 124                 delete pdb;
 125                 pdb = NULL;
 126                 CRITICAL_BLOCK(cs_db)
 127                     --mapFileUseCount[strFile];
 128                 strFile = "";
 129                 throw runtime_error(strprintf("CDB() : can't open database file %s, error %d", pszFile, ret));
 130             }
 131
 132             if (fCreate && !Exists(string("version")))
 133             {
 134                 bool fTmp = fReadOnly;
 135                 fReadOnly = false;
 136                 WriteVersion(VERSION);
 137                 fReadOnly = fTmp;
 138             }
 139
 140             mapDb[strFile] = pdb;
 141         }
 142     }
 143 }
 144
 145 void CDB::Close()
 146 {
 147     if (!pdb)
 148         return;
 149     if (!vTxn.empty())
 150         vTxn.front()->abort();
 151     vTxn.clear();
 152     pdb = NULL;
 153
 154     // Flush database activity from memory pool to disk log
 155     unsigned int nMinutes = 0;
 156     if (fReadOnly)
 157         nMinutes = 1;
 158     if (strFile == "addr.dat")
 159         nMinutes = 2;
 160     if (strFile == "blkindex.dat" && IsInitialBlockDownload() && nBestHeight % 500 != 0)
 161         nMinutes = 1;
 162     dbenv.txn_checkpoint(0, nMinutes, 0);
 163
 164     CRITICAL_BLOCK(cs_db)
 165         --mapFileUseCount[strFile];
 166 }
 167
 168 void static CloseDb(const string& strFile)
 169 {
 170     CRITICAL_BLOCK(cs_db)
 171     {
 172         if (mapDb[strFile] != NULL)
 173         {
 174             // Close the database handle
 175             Db* pdb = mapDb[strFile];
 176             pdb->close(0);
 177             delete pdb;
 178             mapDb[strFile] = NULL;
 179         }
 180     }
 181 }
 182
 183 bool CDB::Rewrite(const string& strFile, const char* pszSkip)
 184 {
 185     while (!fShutdown)
 186     {
 187         CRITICAL_BLOCK(cs_db)
 188         {
 189             if (!mapFileUseCount.count(strFile) || mapFileUseCount[strFile] == 0)
 190             {
 191                 // Flush log data to the dat file
 192                 CloseDb(strFile);
 193                 dbenv.txn_checkpoint(0, 0, 0);
 194                 dbenv.lsn_reset(strFile.c_str(), 0);
 195                 mapFileUseCount.erase(strFile);
 196
 197                 bool fSuccess = true;
 198                 printf("Rewriting %s...\n", strFile.c_str());
 199                 string strFileRes = strFile + ".rewrite";
 200                 { // surround usage of db with extra {}
 201                     CDB db(strFile.c_str(), "r");
 202                     Db* pdbCopy = new Db(&dbenv, 0);
 203
 204                     int ret = pdbCopy->open(NULL,                 // Txn pointer
 205                                             strFileRes.c_str(),   // Filename
 206                                             "main",    // Logical db name
 207                                             DB_BTREE,  // Database type
 208                                             DB_CREATE,    // Flags
 209                                             0);
 210                     if (ret > 0)
 211                     {
 212                         printf("Cannot create database file %s\n", strFileRes.c_str());
 213                         fSuccess = false;
 214                     }
 215
 216                     Dbc* pcursor = db.GetCursor();
 217                     if (pcursor)
 218                         while (fSuccess)
 219                         {
 220                             CDataStream ssKey;
 221                             CDataStream ssValue;
 222                             int ret = db.ReadAtCursor(pcursor, ssKey, ssValue, DB_NEXT);
 223                             if (ret == DB_NOTFOUND)
 224                             {
 225                                 pcursor->close();
 226                                 break;
 227                             }
 228                             else if (ret != 0)
 229                             {
 230                                 pcursor->close();
 231                                 fSuccess = false;
 232                                 break;
 233                             }
 234                             if (pszSkip &&
 235                                 strncmp(&ssKey[0], pszSkip, std::min(ssKey.size(), strlen(pszSkip))) == 0)
 236                                 continue;
 237                             if (strncmp(&ssKey[0], "\x07version", 8) == 0)
 238                             {
 239                                 // Update version:
 240                                 ssValue.clear();
 241                                 ssValue << VERSION;
 242                             }
 243                             Dbt datKey(&ssKey[0], ssKey.size());
 244                             Dbt datValue(&ssValue[0], ssValue.size());
 245                             int ret2 = pdbCopy->put(NULL, &datKey, &datValue, DB_NOOVERWRITE);
 246                             if (ret2 > 0)
 247                                 fSuccess = false;
 248                         }
 249                     if (fSuccess)
 250                     {
 251                         db.Close();
 252                         CloseDb(strFile);
 253                         if (pdbCopy->close(0))
 254                             fSuccess = false;
 255                         delete pdbCopy;
 256                     }
 257                 }
 258                 if (fSuccess)
 259                 {
 260                     Db dbA(&dbenv, 0);
 261                     if (dbA.remove(strFile.c_str(), NULL, 0))
 262                         fSuccess = false;
 263                     Db dbB(&dbenv, 0);
 264                     if (dbB.rename(strFileRes.c_str(), NULL, strFile.c_str(), 0))
 265                         fSuccess = false;
 266                 }
 267                 if (!fSuccess)
 268                     printf("Rewriting of %s FAILED!\n", strFileRes.c_str());
 269                 return fSuccess;
 270             }
 271         }
 272         Sleep(100);
 273     }
 274     return false;
 275 }
 276
 277
 278 void DBFlush(bool fShutdown)
 279 {
 280     // Flush log data to the actual data file
 281     //  on all files that are not in use
 282     printf("DBFlush(%s)%s\n", fShutdown ? "true" : "false", fDbEnvInit ? "" : " db not started");
 283     if (!fDbEnvInit)
 284         return;
 285     CRITICAL_BLOCK(cs_db)
 286     {
 287         map<string, int>::iterator mi = mapFileUseCount.begin();
 288         while (mi != mapFileUseCount.end())
 289         {
 290             string strFile = (*mi).first;
 291             int nRefCount = (*mi).second;
 292             printf("%s refcount=%d\n", strFile.c_str(), nRefCount);
 293             if (nRefCount == 0)
 294             {
 295                 // Move log data to the dat file
 296                 CloseDb(strFile);
 297                 dbenv.txn_checkpoint(0, 0, 0);
 298                 printf("%s flush\n", strFile.c_str());
 299                 dbenv.lsn_reset(strFile.c_str(), 0);
 300                 mapFileUseCount.erase(mi++);
 301             }
 302             else
 303                 mi++;
 304         }
 305         if (fShutdown)
 306         {
 307             char** listp;
 308             if (mapFileUseCount.empty())
 309             {
 310                 dbenv.log_archive(&listp, DB_ARCH_REMOVE);
 311                 EnvShutdown();
 312             }
 313         }
 314     }
 315 }
 316
 317
 318
 319
 320
 321
 322 //
 323 // CTxDB
 324 //
 325
 326 bool CTxDB::ReadTxIndex(uint256 hash, CTxIndex& txindex)
 327 {
 328     assert(!fClient);
 329     txindex.SetNull();
 330     return Read(make_pair(string("tx"), hash), txindex);
 331 }
 332
 333 bool CTxDB::UpdateTxIndex(uint256 hash, const CTxIndex& txindex)
 334 {
 335     assert(!fClient);
 336     return Write(make_pair(string("tx"), hash), txindex);
 337 }
 338
 339 bool CTxDB::AddTxIndex(const CTransaction& tx, const CDiskTxPos& pos, int nHeight)
 340 {
 341     assert(!fClient);
 342
 343     // Add to tx index
 344     uint256 hash = tx.GetHash();
 345     CTxIndex txindex(pos, tx.vout.size());
 346     return Write(make_pair(string("tx"), hash), txindex);
 347 }
 348
 349 bool CTxDB::EraseTxIndex(const CTransaction& tx)
 350 {
 351     assert(!fClient);
 352     uint256 hash = tx.GetHash();
 353
 354     return Erase(make_pair(string("tx"), hash));
 355 }
 356
 357 bool CTxDB::ContainsTx(uint256 hash)
 358 {
 359     assert(!fClient);
 360     return Exists(make_pair(string("tx"), hash));
 361 }
 362
 363 bool CTxDB::ReadOwnerTxes(uint160 hash160, int nMinHeight, vector<CTransaction>& vtx)
 364 {
 365     assert(!fClient);
 366     vtx.clear();
 367
 368     // Get cursor
 369     Dbc* pcursor = GetCursor();
 370     if (!pcursor)
 371         return false;
 372
 373     unsigned int fFlags = DB_SET_RANGE;
 374     loop
 375     {
 376         // Read next record
 377         CDataStream ssKey;
 378         if (fFlags == DB_SET_RANGE)
 379             ssKey << string("owner") << hash160 << CDiskTxPos(0, 0, 0);
 380         CDataStream ssValue;
 381         int ret = ReadAtCursor(pcursor, ssKey, ssValue, fFlags);
 382         fFlags = DB_NEXT;
 383         if (ret == DB_NOTFOUND)
 384             break;
 385         else if (ret != 0)
 386         {
 387             pcursor->close();
 388             return false;
 389         }
 390
 391         // Unserialize
 392         string strType;
 393         uint160 hashItem;
 394         CDiskTxPos pos;
 395         ssKey >> strType >> hashItem >> pos;
 396         int nItemHeight;
 397         ssValue >> nItemHeight;
 398
 399         // Read transaction
 400         if (strType != "owner" || hashItem != hash160)
 401             break;
 402         if (nItemHeight >= nMinHeight)
 403         {
 404             vtx.resize(vtx.size()+1);
 405             if (!vtx.back().ReadFromDisk(pos))
 406             {
 407                 pcursor->close();
 408                 return false;
 409             }
 410         }
 411     }
 412
 413     pcursor->close();
 414     return true;
 415 }
 416
 417 bool CTxDB::ReadDiskTx(uint256 hash, CTransaction& tx, CTxIndex& txindex)
 418 {
 419     assert(!fClient);
 420     tx.SetNull();
 421     if (!ReadTxIndex(hash, txindex))
 422         return false;
 423     return (tx.ReadFromDisk(txindex.pos));
 424 }
 425
 426 bool CTxDB::ReadDiskTx(uint256 hash, CTransaction& tx)
 427 {
 428     CTxIndex txindex;
 429     return ReadDiskTx(hash, tx, txindex);
 430 }
 431
 432 bool CTxDB::ReadDiskTx(COutPoint outpoint, CTransaction& tx, CTxIndex& txindex)
 433 {
 434     return ReadDiskTx(outpoint.hash, tx, txindex);
 435 }
 436
 437 bool CTxDB::ReadDiskTx(COutPoint outpoint, CTransaction& tx)
 438 {
 439     CTxIndex txindex;
 440     return ReadDiskTx(outpoint.hash, tx, txindex);
 441 }
 442
 443 bool CTxDB::WriteBlockIndex(const CDiskBlockIndex& blockindex)
 444 {
 445     return Write(make_pair(string("blockindex"), blockindex.GetBlockHash()), blockindex);
 446 }
 447
 448 bool CTxDB::EraseBlockIndex(uint256 hash)
 449 {
 450     return Erase(make_pair(string("blockindex"), hash));
 451 }
 452
 453 bool CTxDB::ReadHashBestChain(uint256& hashBestChain)
 454 {
 455     return Read(string("hashBestChain"), hashBestChain);
 456 }
 457
 458 bool CTxDB::WriteHashBestChain(uint256 hashBestChain)
 459 {
 460     return Write(string("hashBestChain"), hashBestChain);
 461 }
 462
 463 bool CTxDB::ReadBestInvalidTrust(uint64& nBestInvalidTrust)
 464 {
 465     return Read(string("nBestInvalidTrust"), nBestInvalidTrust);
 466 }
 467
 468 bool CTxDB::WriteBestInvalidTrust(uint64 nBestInvalidTrust)
 469 {
 470     return Write(string("nBestInvalidTrust"), nBestInvalidTrust);
 471 }
 472
 473 bool CTxDB::ReadAutoCheckpoint(int& nAutoCheckpoint)
 474 {
 475     return Read(string("nAutoCheckpoint"), nAutoCheckpoint);
 476 }
 477
 478 bool CTxDB::WriteAutoCheckpoint(int nCheckpoint, bool fReset)
 479 {
 480     nCheckpoint = fReset? nCheckpoint : max(Checkpoints::nAutoCheckpoint, nCheckpoint);
 481     return Write(string("nAutoCheckpoint"), nCheckpoint);
 482 }
 483
 484 CBlockIndex static * InsertBlockIndex(uint256 hash)
 485 {
 486     if (hash == 0)
 487         return NULL;
 488
 489     // Return existing
 490     map<uint256, CBlockIndex*>::iterator mi = mapBlockIndex.find(hash);
 491     if (mi != mapBlockIndex.end())
 492         return (*mi).second;
 493
 494     // Create new
 495     CBlockIndex* pindexNew = new CBlockIndex();
 496     if (!pindexNew)
 497         throw runtime_error("LoadBlockIndex() : new CBlockIndex failed");
 498     mi = mapBlockIndex.insert(make_pair(hash, pindexNew)).first;
 499     pindexNew->phashBlock = &((*mi).first);
 500
 501     return pindexNew;
 502 }
 503
 504 bool CTxDB::LoadBlockIndex()
 505 {
 506     // Get database cursor
 507     Dbc* pcursor = GetCursor();
 508     if (!pcursor)
 509         return false;
 510
 511     // Load mapBlockIndex
 512     unsigned int fFlags = DB_SET_RANGE;
 513     loop
 514     {
 515         // Read next record
 516         CDataStream ssKey;
 517         if (fFlags == DB_SET_RANGE)
 518             ssKey << make_pair(string("blockindex"), uint256(0));
 519         CDataStream ssValue;
 520         int ret = ReadAtCursor(pcursor, ssKey, ssValue, fFlags);
 521         fFlags = DB_NEXT;
 522         if (ret == DB_NOTFOUND)
 523             break;
 524         else if (ret != 0)
 525             return false;
 526
 527         // Unserialize
 528         string strType;
 529         ssKey >> strType;
 530         if (strType == "blockindex")
 531         {
 532             CDiskBlockIndex diskindex;
 533             ssValue >> diskindex;
 534
 535             // Construct block index object
 536             CBlockIndex* pindexNew = InsertBlockIndex(diskindex.GetBlockHash());
 537             pindexNew->pprev          = InsertBlockIndex(diskindex.hashPrev);
 538             pindexNew->pnext          = InsertBlockIndex(diskindex.hashNext);
 539             pindexNew->nFile          = diskindex.nFile;
 540             pindexNew->nBlockPos      = diskindex.nBlockPos;
 541             pindexNew->nChainTrust    = diskindex.nChainTrust;
 542             pindexNew->nHeight        = diskindex.nHeight;
 543             pindexNew->nVersion       = diskindex.nVersion;
 544             pindexNew->hashMerkleRoot = diskindex.hashMerkleRoot;
 545             pindexNew->nTime          = diskindex.nTime;
 546             pindexNew->nBits          = diskindex.nBits;
 547             pindexNew->nNonce         = diskindex.nNonce;
 548
 549             // Watch for genesis block
 550             if (pindexGenesisBlock == NULL && diskindex.GetBlockHash() == hashGenesisBlock)
 551                 pindexGenesisBlock = pindexNew;
 552
 553             if (!pindexNew->CheckIndex())
 554                 return error("LoadBlockIndex() : CheckIndex failed at %d", pindexNew->nHeight);
 555         }
 556         else
 557         {
 558             break;
 559         }
 560     }
 561     pcursor->close();
 562
 563     // Load hashBestChain pointer to end of best chain
 564     if (!ReadHashBestChain(hashBestChain))
 565     {
 566         if (pindexGenesisBlock == NULL)
 567             return true;
 568         return error("CTxDB::LoadBlockIndex() : hashBestChain not loaded");
 569     }
 570     if (!mapBlockIndex.count(hashBestChain))
 571         return error("CTxDB::LoadBlockIndex() : hashBestChain not found in the block index");
 572     pindexBest = mapBlockIndex[hashBestChain];
 573     nBestHeight = pindexBest->nHeight;
 574     nBestChainTrust = pindexBest->nChainTrust;
 575     printf("LoadBlockIndex(): hashBestChain=%s  height=%d  trust=%d\n", hashBestChain.ToString().substr(0,20).c_str(), nBestHeight, nBestChainTrust);
 576
 577     // Load nAutoCheckpoint
 578     if (!ReadAutoCheckpoint(Checkpoints::nAutoCheckpoint))
 579         return error("CTxDB::LoadBlockIndex() : nAutoCheckpoint not loaded");
 580     printf("LoadBlockIndex(): automatic checkpoint at height=%d\n", Checkpoints::nAutoCheckpoint);
 581
 582     // Load nBestInvalidTrust, OK if it doesn't exist
 583     ReadBestInvalidTrust(nBestInvalidTrust);
 584
 585     // Verify blocks in the best chain
 586     CBlockIndex* pindexFork = NULL;
 587     for (CBlockIndex* pindex = pindexBest; pindex && pindex->pprev; pindex = pindex->pprev)
 588     {
 589         if (pindex->nHeight < nBestHeight-2500 && !mapArgs.count("-checkblocks"))
 590             break;
 591         CBlock block;
 592         if (!block.ReadFromDisk(pindex))
 593             return error("LoadBlockIndex() : block.ReadFromDisk failed");
 594         if (!block.CheckBlock())
 595         {
 596             printf("LoadBlockIndex() : *** found bad block at %d, hash=%s\n", pindex->nHeight, pindex->GetBlockHash().ToString().c_str());
 597             pindexFork = pindex->pprev;
 598         }
 599     }
 600     if (pindexFork)
 601     {
 602         // Reorg back to the fork
 603         printf("LoadBlockIndex() : *** moving best chain pointer back to block %d\n", pindexFork->nHeight);
 604         CBlock block;
 605         if (!block.ReadFromDisk(pindexFork))
 606             return error("LoadBlockIndex() : block.ReadFromDisk failed");
 607         CTxDB txdb;
 608         block.SetBestChain(txdb, pindexFork);
 609     }
 610
 611     return true;
 612 }
 613
 614
 615
 616
 617
 618 //
 619 // CAddrDB
 620 //
 621
 622 bool CAddrDB::WriteAddress(const CAddress& addr)
 623 {
 624     return Write(make_pair(string("addr"), addr.GetKey()), addr);
 625 }
 626
 627 bool CAddrDB::EraseAddress(const CAddress& addr)
 628 {
 629     return Erase(make_pair(string("addr"), addr.GetKey()));
 630 }
 631
 632 bool CAddrDB::LoadAddresses()
 633 {
 634     CRITICAL_BLOCK(cs_mapAddresses)
 635     {
 636         // Get cursor
 637         Dbc* pcursor = GetCursor();
 638         if (!pcursor)
 639             return false;
 640
 641         loop
 642         {
 643             // Read next record
 644             CDataStream ssKey;
 645             CDataStream ssValue;
 646             int ret = ReadAtCursor(pcursor, ssKey, ssValue);
 647             if (ret == DB_NOTFOUND)
 648                 break;
 649             else if (ret != 0)
 650                 return false;
 651
 652             // Unserialize
 653             string strType;
 654             ssKey >> strType;
 655             if (strType == "addr")
 656             {
 657                 CAddress addr;
 658                 ssValue >> addr;
 659                 mapAddresses.insert(make_pair(addr.GetKey(), addr));
 660             }
 661         }
 662         pcursor->close();
 663
 664         printf("Loaded %d addresses\n", mapAddresses.size());
 665     }
 666
 667     return true;
 668 }
 669
 670 bool LoadAddresses()
 671 {
 672     return CAddrDB("cr+").LoadAddresses();
 673 }
 674
 675
 676
 677
 678 //
 679 // CWalletDB
 680 //
 681
 682 bool CWalletDB::WriteName(const string& strAddress, const string& strName)
 683 {
 684     nWalletDBUpdated++;
 685     return Write(make_pair(string("name"), strAddress), strName);
 686 }
 687
 688 bool CWalletDB::EraseName(const string& strAddress)
 689 {
 690     // This should only be used for sending addresses, never for receiving addresses,
 691     // receiving addresses must always have an address book entry if they're not change return.
 692     nWalletDBUpdated++;
 693     return Erase(make_pair(string("name"), strAddress));
 694 }
 695
 696 bool CWalletDB::ReadAccount(const string& strAccount, CAccount& account)
 697 {
 698     account.SetNull();
 699     return Read(make_pair(string("acc"), strAccount), account);
 700 }
 701
 702 bool CWalletDB::WriteAccount(const string& strAccount, const CAccount& account)
 703 {
 704     return Write(make_pair(string("acc"), strAccount), account);
 705 }
 706
 707 bool CWalletDB::WriteAccountingEntry(const CAccountingEntry& acentry)
 708 {
 709     return Write(boost::make_tuple(string("acentry"), acentry.strAccount, ++nAccountingEntryNumber), acentry);
 710 }
 711
 712 int64 CWalletDB::GetAccountCreditDebit(const string& strAccount)
 713 {
 714     list<CAccountingEntry> entries;
 715     ListAccountCreditDebit(strAccount, entries);
 716
 717     int64 nCreditDebit = 0;
 718     BOOST_FOREACH (const CAccountingEntry& entry, entries)
 719         nCreditDebit += entry.nCreditDebit;
 720
 721     return nCreditDebit;
 722 }
 723
 724 void CWalletDB::ListAccountCreditDebit(const string& strAccount, list<CAccountingEntry>& entries)
 725 {
 726     bool fAllAccounts = (strAccount == "*");
 727
 728     Dbc* pcursor = GetCursor();
 729     if (!pcursor)
 730         throw runtime_error("CWalletDB::ListAccountCreditDebit() : cannot create DB cursor");
 731     unsigned int fFlags = DB_SET_RANGE;
 732     loop
 733     {
 734         // Read next record
 735         CDataStream ssKey;
 736         if (fFlags == DB_SET_RANGE)
 737             ssKey << boost::make_tuple(string("acentry"), (fAllAccounts? string("") : strAccount), uint64(0));
 738         CDataStream ssValue;
 739         int ret = ReadAtCursor(pcursor, ssKey, ssValue, fFlags);
 740         fFlags = DB_NEXT;
 741         if (ret == DB_NOTFOUND)
 742             break;
 743         else if (ret != 0)
 744         {
 745             pcursor->close();
 746             throw runtime_error("CWalletDB::ListAccountCreditDebit() : error scanning DB");
 747         }
 748
 749         // Unserialize
 750         string strType;
 751         ssKey >> strType;
 752         if (strType != "acentry")
 753             break;
 754         CAccountingEntry acentry;
 755         ssKey >> acentry.strAccount;
 756         if (!fAllAccounts && acentry.strAccount != strAccount)
 757             break;
 758
 759         ssValue >> acentry;
 760         entries.push_back(acentry);
 761     }
 762
 763     pcursor->close();
 764 }
 765
 766
 767 int CWalletDB::LoadWallet(CWallet* pwallet)
 768 {
 769     pwallet->vchDefaultKey.clear();
 770     int nFileVersion = 0;
 771     vector<uint256> vWalletUpgrade;
 772     bool fIsEncrypted = false;
 773
 774     // Modify defaults
 775 #ifndef WIN32
 776     // Tray icon sometimes disappears on 9.10 karmic koala 64-bit, leaving no way to access the program
 777     fMinimizeToTray = false;
 778     fMinimizeOnClose = false;
 779 #endif
 780
 781     //// todo: shouldn't we catch exceptions and try to recover and continue?
 782     CRITICAL_BLOCK(pwallet->cs_wallet)
 783     {
 784         // Get cursor
 785         Dbc* pcursor = GetCursor();
 786         if (!pcursor)
 787             return DB_CORRUPT;
 788
 789         loop
 790         {
 791             // Read next record
 792             CDataStream ssKey;
 793             CDataStream ssValue;
 794             int ret = ReadAtCursor(pcursor, ssKey, ssValue);
 795             if (ret == DB_NOTFOUND)
 796                 break;
 797             else if (ret != 0)
 798                 return DB_CORRUPT;
 799
 800             // Unserialize
 801             // Taking advantage of the fact that pair serialization
 802             // is just the two items serialized one after the other
 803             string strType;
 804             ssKey >> strType;
 805             if (strType == "name")
 806             {
 807                 string strAddress;
 808                 ssKey >> strAddress;
 809                 ssValue >> pwallet->mapAddressBook[strAddress];
 810             }
 811             else if (strType == "tx")
 812             {
 813                 uint256 hash;
 814                 ssKey >> hash;
 815                 CWalletTx& wtx = pwallet->mapWallet[hash];
 816                 ssValue >> wtx;
 817                 wtx.pwallet = pwallet;
 818
 819                 if (wtx.GetHash() != hash)
 820                     printf("Error in wallet.dat, hash mismatch\n");
 821
 822                 // Undo serialize changes in 31600
 823                 if (31404 <= wtx.fTimeReceivedIsTxTime && wtx.fTimeReceivedIsTxTime <= 31703)
 824                 {
 825                     if (!ssValue.empty())
 826                     {
 827                         char fTmp;
 828                         char fUnused;
 829                         ssValue >> fTmp >> fUnused >> wtx.strFromAccount;
 830                         printf("LoadWallet() upgrading tx ver=%d %d '%s' %s\n", wtx.fTimeReceivedIsTxTime, fTmp, wtx.strFromAccount.c_str(), hash.ToString().c_str());
 831                         wtx.fTimeReceivedIsTxTime = fTmp;
 832                     }
 833                     else
 834                     {
 835                         printf("LoadWallet() repairing tx ver=%d %s\n", wtx.fTimeReceivedIsTxTime, hash.ToString().c_str());
 836                         wtx.fTimeReceivedIsTxTime = 0;
 837                     }
 838                     vWalletUpgrade.push_back(hash);
 839                 }
 840
 841                 //// debug print
 842                 //printf("LoadWallet  %s\n", wtx.GetHash().ToString().c_str());
 843                 //printf(" %12I64d  %s  %s  %s\n",
 844                 //    wtx.vout[0].nValue,
 845                 //    DateTimeStrFormat("%x %H:%M:%S", wtx.GetBlockTime()).c_str(),
 846                 //    wtx.hashBlock.ToString().substr(0,20).c_str(),
 847                 //    wtx.mapValue["message"].c_str());
 848             }
 849             else if (strType == "acentry")
 850             {
 851                 string strAccount;
 852                 ssKey >> strAccount;
 853                 uint64 nNumber;
 854                 ssKey >> nNumber;
 855                 if (nNumber > nAccountingEntryNumber)
 856                     nAccountingEntryNumber = nNumber;
 857             }
 858             else if (strType == "key" || strType == "wkey")
 859             {
 860                 vector<unsigned char> vchPubKey;
 861                 ssKey >> vchPubKey;
 862                 CKey key;
 863                 if (strType == "key")
 864                 {
 865                     CPrivKey pkey;
 866                     ssValue >> pkey;
 867                     key.SetPrivKey(pkey);
 868                 }
 869                 else
 870                 {
 871                     CWalletKey wkey;
 872                     ssValue >> wkey;
 873                     key.SetPrivKey(wkey.vchPrivKey);
 874                 }
 875                 if (!pwallet->LoadKey(key))
 876                     return DB_CORRUPT;
 877             }
 878             else if (strType == "mkey")
 879             {
 880                 unsigned int nID;
 881                 ssKey >> nID;
 882                 CMasterKey kMasterKey;
 883                 ssValue >> kMasterKey;
 884                 if(pwallet->mapMasterKeys.count(nID) != 0)
 885                     return DB_CORRUPT;
 886                 pwallet->mapMasterKeys[nID] = kMasterKey;
 887                 if (pwallet->nMasterKeyMaxID < nID)
 888                     pwallet->nMasterKeyMaxID = nID;
 889             }
 890             else if (strType == "ckey")
 891             {
 892                 vector<unsigned char> vchPubKey;
 893                 ssKey >> vchPubKey;
 894                 vector<unsigned char> vchPrivKey;
 895                 ssValue >> vchPrivKey;
 896                 if (!pwallet->LoadCryptedKey(vchPubKey, vchPrivKey))
 897                     return DB_CORRUPT;
 898                 fIsEncrypted = true;
 899             }
 900             else if (strType == "defaultkey")
 901             {
 902                 ssValue >> pwallet->vchDefaultKey;
 903             }
 904             else if (strType == "pool")
 905             {
 906                 int64 nIndex;
 907                 ssKey >> nIndex;
 908                 pwallet->setKeyPool.insert(nIndex);
 909             }
 910             else if (strType == "version")
 911             {
 912                 ssValue >> nFileVersion;
 913                 if (nFileVersion == 10300)
 914                     nFileVersion = 300;
 915             }
 916             else if (strType == "setting")
 917             {
 918                 string strKey;
 919                 ssKey >> strKey;
 920
 921                 // Options
 922 #ifndef QT_GUI
 923                 if (strKey == "fGenerateBitcoins")  ssValue >> fGenerateBitcoins;
 924 #endif
 925                 if (strKey == "nTransactionFee")    ssValue >> nTransactionFee;
 926                 if (strKey == "fLimitProcessors")   ssValue >> fLimitProcessors;
 927                 if (strKey == "nLimitProcessors")   ssValue >> nLimitProcessors;
 928                 if (strKey == "fMinimizeToTray")    ssValue >> fMinimizeToTray;
 929                 if (strKey == "fMinimizeOnClose")   ssValue >> fMinimizeOnClose;
 930                 if (strKey == "fUseProxy")          ssValue >> fUseProxy;
 931                 if (strKey == "addrProxy")          ssValue >> addrProxy;
 932                 if (fHaveUPnP && strKey == "fUseUPnP")           ssValue >> fUseUPnP;
 933                 if (strKey == "nBalanceReserve")    ssValue >> nBalanceReserve;
 934             }
 935             else if (strType == "minversion")
 936             {
 937                 int nMinVersion = 0;
 938                 ssValue >> nMinVersion;
 939                 if (nMinVersion > VERSION)
 940                     return DB_TOO_NEW;
 941             }
 942         }
 943         pcursor->close();
 944     }
 945
 946     BOOST_FOREACH(uint256 hash, vWalletUpgrade)
 947         WriteTx(hash, pwallet->mapWallet[hash]);
 948
 949     printf("nFileVersion = %d\n", nFileVersion);
 950     printf("fGenerateBitcoins = %d\n", fGenerateBitcoins);
 951     printf("nTransactionFee = %"PRI64d"\n", nTransactionFee);
 952     printf("fMinimizeToTray = %d\n", fMinimizeToTray);
 953     printf("fMinimizeOnClose = %d\n", fMinimizeOnClose);
 954     printf("fUseProxy = %d\n", fUseProxy);
 955     printf("addrProxy = %s\n", addrProxy.ToString().c_str());
 956     if (fHaveUPnP)
 957         printf("fUseUPnP = %d\n", fUseUPnP);
 958
 959
 960     // Rewrite encrypted wallets of versions 0.4.0 and 0.5.0rc:
 961     if (fIsEncrypted && (nFileVersion == 40000 || nFileVersion == 50000))
 962         return DB_NEED_REWRITE;
 963
 964     if (nFileVersion < VERSION) // Update
 965     {
 966         // Get rid of old debug.log file in current directory
 967         if (nFileVersion <= 105 && !pszSetDataDir[0])
 968             unlink("debug.log");
 969
 970         WriteVersion(VERSION);
 971     }
 972
 973     return DB_LOAD_OK;
 974 }
 975
 976 void ThreadFlushWalletDB(void* parg)
 977 {
 978     const string& strFile = ((const string*)parg)[0];
 979     static bool fOneThread;
 980     if (fOneThread)
 981         return;
 982     fOneThread = true;
 983     if (mapArgs.count("-noflushwallet"))
 984         return;
 985
 986     unsigned int nLastSeen = nWalletDBUpdated;
 987     unsigned int nLastFlushed = nWalletDBUpdated;
 988     int64 nLastWalletUpdate = GetTime();
 989     while (!fShutdown)
 990     {
 991         Sleep(500);
 992
 993         if (nLastSeen != nWalletDBUpdated)
 994         {
 995             nLastSeen = nWalletDBUpdated;
 996             nLastWalletUpdate = GetTime();
 997         }
 998
 999         if (nLastFlushed != nWalletDBUpdated && GetTime() - nLastWalletUpdate >= 2)
1000         {
1001             TRY_CRITICAL_BLOCK(cs_db)
1002             {
1003                 // Don't do this if any databases are in use
1004                 int nRefCount = 0;
1005                 map<string, int>::iterator mi = mapFileUseCount.begin();
1006                 while (mi != mapFileUseCount.end())
1007                 {
1008                     nRefCount += (*mi).second;
1009                     mi++;
1010                 }
1011
1012                 if (nRefCount == 0 && !fShutdown)
1013                 {
1014                     map<string, int>::iterator mi = mapFileUseCount.find(strFile);
1015                     if (mi != mapFileUseCount.end())
1016                     {
1017                         printf("%s ", DateTimeStrFormat("%x %H:%M:%S", GetTime()).c_str());
1018                         printf("Flushing wallet.dat\n");
1019                         nLastFlushed = nWalletDBUpdated;
1020                         int64 nStart = GetTimeMillis();
1021
1022                         // Flush wallet.dat so it's self contained
1023                         CloseDb(strFile);
1024                         dbenv.txn_checkpoint(0, 0, 0);
1025                         dbenv.lsn_reset(strFile.c_str(), 0);
1026
1027                         mapFileUseCount.erase(mi++);
1028                         printf("Flushed wallet.dat %"PRI64d"ms\n", GetTimeMillis() - nStart);
1029                     }
1030                 }
1031             }
1032         }
1033     }
1034 }
1035
1036 bool BackupWallet(const CWallet& wallet, const string& strDest)
1037 {
1038     if (!wallet.fFileBacked)
1039         return false;
1040     while (!fShutdown)
1041     {
1042         CRITICAL_BLOCK(cs_db)
1043         {
1044             if (!mapFileUseCount.count(wallet.strWalletFile) || mapFileUseCount[wallet.strWalletFile] == 0)
1045             {
1046                 // Flush log data to the dat file
1047                 CloseDb(wallet.strWalletFile);
1048                 dbenv.txn_checkpoint(0, 0, 0);
1049                 dbenv.lsn_reset(wallet.strWalletFile.c_str(), 0);
1050                 mapFileUseCount.erase(wallet.strWalletFile);
1051
1052                 // Copy wallet.dat
1053                 filesystem::path pathSrc(GetDataDir() + "/" + wallet.strWalletFile);
1054                 filesystem::path pathDest(strDest);
1055                 if (filesystem::is_directory(pathDest))
1056                     pathDest = pathDest / wallet.strWalletFile;
1057 #if BOOST_VERSION >= 104000
1058                 filesystem::copy_file(pathSrc, pathDest, filesystem::copy_option::overwrite_if_exists);
1059 #else
1060                 filesystem::copy_file(pathSrc, pathDest);
1061 #endif
1062                 printf("copied wallet.dat to %s\n", pathDest.string().c_str());
1063
1064                 return true;
1065             }
1066         }
1067         Sleep(100);
1068     }
1069     return false;
1070 }