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::ReadSyncCheckpoint(uint256& hashCheckpoint)
 474 {
 475     return Read(string("hashSyncCheckpoint"), hashCheckpoint);
 476 }
 477
 478 bool CTxDB::WriteSyncCheckpoint(uint256 hashCheckpoint)
 479 {
 480     return Write(string("hashSyncCheckpoint"), hashCheckpoint);
 481 }
 482
 483 CBlockIndex static * InsertBlockIndex(uint256 hash)
 484 {
 485     if (hash == 0)
 486         return NULL;
 487
 488     // Return existing
 489     map<uint256, CBlockIndex*>::iterator mi = mapBlockIndex.find(hash);
 490     if (mi != mapBlockIndex.end())
 491         return (*mi).second;
 492
 493     // Create new
 494     CBlockIndex* pindexNew = new CBlockIndex();
 495     if (!pindexNew)
 496         throw runtime_error("LoadBlockIndex() : new CBlockIndex failed");
 497     mi = mapBlockIndex.insert(make_pair(hash, pindexNew)).first;
 498     pindexNew->phashBlock = &((*mi).first);
 499
 500     return pindexNew;
 501 }
 502
 503 bool CTxDB::LoadBlockIndex()
 504 {
 505     // Get database cursor
 506     Dbc* pcursor = GetCursor();
 507     if (!pcursor)
 508         return false;
 509
 510     // Load mapBlockIndex
 511     unsigned int fFlags = DB_SET_RANGE;
 512     loop
 513     {
 514         // Read next record
 515         CDataStream ssKey;
 516         if (fFlags == DB_SET_RANGE)
 517             ssKey << make_pair(string("blockindex"), uint256(0));
 518         CDataStream ssValue;
 519         int ret = ReadAtCursor(pcursor, ssKey, ssValue, fFlags);
 520         fFlags = DB_NEXT;
 521         if (ret == DB_NOTFOUND)
 522             break;
 523         else if (ret != 0)
 524             return false;
 525
 526         // Unserialize
 527         string strType;
 528         ssKey >> strType;
 529         if (strType == "blockindex")
 530         {
 531             CDiskBlockIndex diskindex;
 532             ssValue >> diskindex;
 533
 534             // Construct block index object
 535             CBlockIndex* pindexNew = InsertBlockIndex(diskindex.GetBlockHash());
 536             pindexNew->pprev          = InsertBlockIndex(diskindex.hashPrev);
 537             pindexNew->pnext          = InsertBlockIndex(diskindex.hashNext);
 538             pindexNew->nFile          = diskindex.nFile;
 539             pindexNew->nBlockPos      = diskindex.nBlockPos;
 540             pindexNew->nChainTrust    = diskindex.nChainTrust;
 541             pindexNew->nHeight        = diskindex.nHeight;
 542             pindexNew->fProofOfStake  = diskindex.fProofOfStake;
 543             pindexNew->prevoutStake   = diskindex.prevoutStake;
 544             pindexNew->nVersion       = diskindex.nVersion;
 545             pindexNew->hashMerkleRoot = diskindex.hashMerkleRoot;
 546             pindexNew->nTime          = diskindex.nTime;
 547             pindexNew->nBits          = diskindex.nBits;
 548             pindexNew->nNonce         = diskindex.nNonce;
 549
 550             // Watch for genesis block
 551             if (pindexGenesisBlock == NULL && diskindex.GetBlockHash() == hashGenesisBlock)
 552                 pindexGenesisBlock = pindexNew;
 553
 554             if (!pindexNew->CheckIndex())
 555                 return error("LoadBlockIndex() : CheckIndex failed at %d", pindexNew->nHeight);
 556
 557             // ppcoin: build setStakeSeen
 558             if (pindexNew->fProofOfStake)
 559                 setStakeSeen.insert(make_pair(pindexNew->prevoutStake, pindexNew->nStakeTime));
 560         }
 561         else
 562         {
 563             break;
 564         }
 565     }
 566     pcursor->close();
 567
 568     // Load hashBestChain pointer to end of best chain
 569     if (!ReadHashBestChain(hashBestChain))
 570     {
 571         if (pindexGenesisBlock == NULL)
 572             return true;
 573         return error("CTxDB::LoadBlockIndex() : hashBestChain not loaded");
 574     }
 575     if (!mapBlockIndex.count(hashBestChain))
 576         return error("CTxDB::LoadBlockIndex() : hashBestChain not found in the block index");
 577     pindexBest = mapBlockIndex[hashBestChain];
 578     nBestHeight = pindexBest->nHeight;
 579     nBestChainTrust = pindexBest->nChainTrust;
 580     printf("LoadBlockIndex(): hashBestChain=%s  height=%d  trust=%d\n", hashBestChain.ToString().substr(0,20).c_str(), nBestHeight, nBestChainTrust);
 581
 582     // ppcoin: load hashSyncCheckpoint
 583     if (!ReadSyncCheckpoint(Checkpoints::hashSyncCheckpoint))
 584         return error("CTxDB::LoadBlockIndex() : hashSyncCheckpoint not loaded");
 585     printf("LoadBlockIndex(): synchronized checkpoint %s\n", Checkpoints::hashSyncCheckpoint.ToString().c_str());
 586
 587     // Load nBestInvalidTrust, OK if it doesn't exist
 588     ReadBestInvalidTrust(nBestInvalidTrust);
 589
 590     // Verify blocks in the best chain
 591     CBlockIndex* pindexFork = NULL;
 592     for (CBlockIndex* pindex = pindexBest; pindex && pindex->pprev; pindex = pindex->pprev)
 593     {
 594         if (pindex->nHeight < nBestHeight-2500 && !mapArgs.count("-checkblocks"))
 595             break;
 596         CBlock block;
 597         if (!block.ReadFromDisk(pindex))
 598             return error("LoadBlockIndex() : block.ReadFromDisk failed");
 599         if (!block.CheckBlock())
 600         {
 601             printf("LoadBlockIndex() : *** found bad block at %d, hash=%s\n", pindex->nHeight, pindex->GetBlockHash().ToString().c_str());
 602             pindexFork = pindex->pprev;
 603         }
 604     }
 605     if (pindexFork)
 606     {
 607         // Reorg back to the fork
 608         printf("LoadBlockIndex() : *** moving best chain pointer back to block %d\n", pindexFork->nHeight);
 609         CBlock block;
 610         if (!block.ReadFromDisk(pindexFork))
 611             return error("LoadBlockIndex() : block.ReadFromDisk failed");
 612         CTxDB txdb;
 613         block.SetBestChain(txdb, pindexFork);
 614     }
 615
 616     return true;
 617 }
 618
 619
 620
 621
 622
 623 //
 624 // CAddrDB
 625 //
 626
 627 bool CAddrDB::WriteAddress(const CAddress& addr)
 628 {
 629     return Write(make_pair(string("addr"), addr.GetKey()), addr);
 630 }
 631
 632 bool CAddrDB::EraseAddress(const CAddress& addr)
 633 {
 634     return Erase(make_pair(string("addr"), addr.GetKey()));
 635 }
 636
 637 bool CAddrDB::LoadAddresses()
 638 {
 639     CRITICAL_BLOCK(cs_mapAddresses)
 640     {
 641         // Get cursor
 642         Dbc* pcursor = GetCursor();
 643         if (!pcursor)
 644             return false;
 645
 646         loop
 647         {
 648             // Read next record
 649             CDataStream ssKey;
 650             CDataStream ssValue;
 651             int ret = ReadAtCursor(pcursor, ssKey, ssValue);
 652             if (ret == DB_NOTFOUND)
 653                 break;
 654             else if (ret != 0)
 655                 return false;
 656
 657             // Unserialize
 658             string strType;
 659             ssKey >> strType;
 660             if (strType == "addr")
 661             {
 662                 CAddress addr;
 663                 ssValue >> addr;
 664                 mapAddresses.insert(make_pair(addr.GetKey(), addr));
 665             }
 666         }
 667         pcursor->close();
 668
 669         printf("Loaded %d addresses\n", mapAddresses.size());
 670     }
 671
 672     return true;
 673 }
 674
 675 bool LoadAddresses()
 676 {
 677     return CAddrDB("cr+").LoadAddresses();
 678 }
 679
 680
 681
 682
 683 //
 684 // CWalletDB
 685 //
 686
 687 bool CWalletDB::WriteName(const string& strAddress, const string& strName)
 688 {
 689     nWalletDBUpdated++;
 690     return Write(make_pair(string("name"), strAddress), strName);
 691 }
 692
 693 bool CWalletDB::EraseName(const string& strAddress)
 694 {
 695     // This should only be used for sending addresses, never for receiving addresses,
 696     // receiving addresses must always have an address book entry if they're not change return.
 697     nWalletDBUpdated++;
 698     return Erase(make_pair(string("name"), strAddress));
 699 }
 700
 701 bool CWalletDB::ReadAccount(const string& strAccount, CAccount& account)
 702 {
 703     account.SetNull();
 704     return Read(make_pair(string("acc"), strAccount), account);
 705 }
 706
 707 bool CWalletDB::WriteAccount(const string& strAccount, const CAccount& account)
 708 {
 709     return Write(make_pair(string("acc"), strAccount), account);
 710 }
 711
 712 bool CWalletDB::WriteAccountingEntry(const CAccountingEntry& acentry)
 713 {
 714     return Write(boost::make_tuple(string("acentry"), acentry.strAccount, ++nAccountingEntryNumber), acentry);
 715 }
 716
 717 int64 CWalletDB::GetAccountCreditDebit(const string& strAccount)
 718 {
 719     list<CAccountingEntry> entries;
 720     ListAccountCreditDebit(strAccount, entries);
 721
 722     int64 nCreditDebit = 0;
 723     BOOST_FOREACH (const CAccountingEntry& entry, entries)
 724         nCreditDebit += entry.nCreditDebit;
 725
 726     return nCreditDebit;
 727 }
 728
 729 void CWalletDB::ListAccountCreditDebit(const string& strAccount, list<CAccountingEntry>& entries)
 730 {
 731     bool fAllAccounts = (strAccount == "*");
 732
 733     Dbc* pcursor = GetCursor();
 734     if (!pcursor)
 735         throw runtime_error("CWalletDB::ListAccountCreditDebit() : cannot create DB cursor");
 736     unsigned int fFlags = DB_SET_RANGE;
 737     loop
 738     {
 739         // Read next record
 740         CDataStream ssKey;
 741         if (fFlags == DB_SET_RANGE)
 742             ssKey << boost::make_tuple(string("acentry"), (fAllAccounts? string("") : strAccount), uint64(0));
 743         CDataStream ssValue;
 744         int ret = ReadAtCursor(pcursor, ssKey, ssValue, fFlags);
 745         fFlags = DB_NEXT;
 746         if (ret == DB_NOTFOUND)
 747             break;
 748         else if (ret != 0)
 749         {
 750             pcursor->close();
 751             throw runtime_error("CWalletDB::ListAccountCreditDebit() : error scanning DB");
 752         }
 753
 754         // Unserialize
 755         string strType;
 756         ssKey >> strType;
 757         if (strType != "acentry")
 758             break;
 759         CAccountingEntry acentry;
 760         ssKey >> acentry.strAccount;
 761         if (!fAllAccounts && acentry.strAccount != strAccount)
 762             break;
 763
 764         ssValue >> acentry;
 765         entries.push_back(acentry);
 766     }
 767
 768     pcursor->close();
 769 }
 770
 771
 772 int CWalletDB::LoadWallet(CWallet* pwallet)
 773 {
 774     pwallet->vchDefaultKey.clear();
 775     int nFileVersion = 0;
 776     vector<uint256> vWalletUpgrade;
 777     bool fIsEncrypted = false;
 778
 779     // Modify defaults
 780 #ifndef WIN32
 781     // Tray icon sometimes disappears on 9.10 karmic koala 64-bit, leaving no way to access the program
 782     fMinimizeToTray = false;
 783     fMinimizeOnClose = false;
 784 #endif
 785
 786     //// todo: shouldn't we catch exceptions and try to recover and continue?
 787     CRITICAL_BLOCK(pwallet->cs_wallet)
 788     {
 789         // Get cursor
 790         Dbc* pcursor = GetCursor();
 791         if (!pcursor)
 792             return DB_CORRUPT;
 793
 794         loop
 795         {
 796             // Read next record
 797             CDataStream ssKey;
 798             CDataStream ssValue;
 799             int ret = ReadAtCursor(pcursor, ssKey, ssValue);
 800             if (ret == DB_NOTFOUND)
 801                 break;
 802             else if (ret != 0)
 803                 return DB_CORRUPT;
 804
 805             // Unserialize
 806             // Taking advantage of the fact that pair serialization
 807             // is just the two items serialized one after the other
 808             string strType;
 809             ssKey >> strType;
 810             if (strType == "name")
 811             {
 812                 string strAddress;
 813                 ssKey >> strAddress;
 814                 ssValue >> pwallet->mapAddressBook[strAddress];
 815             }
 816             else if (strType == "tx")
 817             {
 818                 uint256 hash;
 819                 ssKey >> hash;
 820                 CWalletTx& wtx = pwallet->mapWallet[hash];
 821                 ssValue >> wtx;
 822                 wtx.pwallet = pwallet;
 823
 824                 if (wtx.GetHash() != hash)
 825                     printf("Error in wallet.dat, hash mismatch\n");
 826
 827                 // Undo serialize changes in 31600
 828                 if (31404 <= wtx.fTimeReceivedIsTxTime && wtx.fTimeReceivedIsTxTime <= 31703)
 829                 {
 830                     if (!ssValue.empty())
 831                     {
 832                         char fTmp;
 833                         char fUnused;
 834                         ssValue >> fTmp >> fUnused >> wtx.strFromAccount;
 835                         printf("LoadWallet() upgrading tx ver=%d %d '%s' %s\n", wtx.fTimeReceivedIsTxTime, fTmp, wtx.strFromAccount.c_str(), hash.ToString().c_str());
 836                         wtx.fTimeReceivedIsTxTime = fTmp;
 837                     }
 838                     else
 839                     {
 840                         printf("LoadWallet() repairing tx ver=%d %s\n", wtx.fTimeReceivedIsTxTime, hash.ToString().c_str());
 841                         wtx.fTimeReceivedIsTxTime = 0;
 842                     }
 843                     vWalletUpgrade.push_back(hash);
 844                 }
 845
 846                 //// debug print
 847                 //printf("LoadWallet  %s\n", wtx.GetHash().ToString().c_str());
 848                 //printf(" %12I64d  %s  %s  %s\n",
 849                 //    wtx.vout[0].nValue,
 850                 //    DateTimeStrFormat("%x %H:%M:%S", wtx.GetBlockTime()).c_str(),
 851                 //    wtx.hashBlock.ToString().substr(0,20).c_str(),
 852                 //    wtx.mapValue["message"].c_str());
 853             }
 854             else if (strType == "acentry")
 855             {
 856                 string strAccount;
 857                 ssKey >> strAccount;
 858                 uint64 nNumber;
 859                 ssKey >> nNumber;
 860                 if (nNumber > nAccountingEntryNumber)
 861                     nAccountingEntryNumber = nNumber;
 862             }
 863             else if (strType == "key" || strType == "wkey")
 864             {
 865                 vector<unsigned char> vchPubKey;
 866                 ssKey >> vchPubKey;
 867                 CKey key;
 868                 if (strType == "key")
 869                 {
 870                     CPrivKey pkey;
 871                     ssValue >> pkey;
 872                     key.SetPrivKey(pkey);
 873                 }
 874                 else
 875                 {
 876                     CWalletKey wkey;
 877                     ssValue >> wkey;
 878                     key.SetPrivKey(wkey.vchPrivKey);
 879                 }
 880                 if (!pwallet->LoadKey(key))
 881                     return DB_CORRUPT;
 882             }
 883             else if (strType == "mkey")
 884             {
 885                 unsigned int nID;
 886                 ssKey >> nID;
 887                 CMasterKey kMasterKey;
 888                 ssValue >> kMasterKey;
 889                 if(pwallet->mapMasterKeys.count(nID) != 0)
 890                     return DB_CORRUPT;
 891                 pwallet->mapMasterKeys[nID] = kMasterKey;
 892                 if (pwallet->nMasterKeyMaxID < nID)
 893                     pwallet->nMasterKeyMaxID = nID;
 894             }
 895             else if (strType == "ckey")
 896             {
 897                 vector<unsigned char> vchPubKey;
 898                 ssKey >> vchPubKey;
 899                 vector<unsigned char> vchPrivKey;
 900                 ssValue >> vchPrivKey;
 901                 if (!pwallet->LoadCryptedKey(vchPubKey, vchPrivKey))
 902                     return DB_CORRUPT;
 903                 fIsEncrypted = true;
 904             }
 905             else if (strType == "defaultkey")
 906             {
 907                 ssValue >> pwallet->vchDefaultKey;
 908             }
 909             else if (strType == "pool")
 910             {
 911                 int64 nIndex;
 912                 ssKey >> nIndex;
 913                 pwallet->setKeyPool.insert(nIndex);
 914             }
 915             else if (strType == "version")
 916             {
 917                 ssValue >> nFileVersion;
 918                 if (nFileVersion == 10300)
 919                     nFileVersion = 300;
 920             }
 921             else if (strType == "setting")
 922             {
 923                 string strKey;
 924                 ssKey >> strKey;
 925
 926                 // Options
 927 #ifndef QT_GUI
 928                 if (strKey == "fGenerateBitcoins")  ssValue >> fGenerateBitcoins;
 929 #endif
 930                 if (strKey == "nTransactionFee")    ssValue >> nTransactionFee;
 931                 if (strKey == "fLimitProcessors")   ssValue >> fLimitProcessors;
 932                 if (strKey == "nLimitProcessors")   ssValue >> nLimitProcessors;
 933                 if (strKey == "fMinimizeToTray")    ssValue >> fMinimizeToTray;
 934                 if (strKey == "fMinimizeOnClose")   ssValue >> fMinimizeOnClose;
 935                 if (strKey == "fUseProxy")          ssValue >> fUseProxy;
 936                 if (strKey == "addrProxy")          ssValue >> addrProxy;
 937                 if (fHaveUPnP && strKey == "fUseUPnP")           ssValue >> fUseUPnP;
 938                 if (strKey == "nBalanceReserve")    ssValue >> nBalanceReserve;
 939             }
 940             else if (strType == "minversion")
 941             {
 942                 int nMinVersion = 0;
 943                 ssValue >> nMinVersion;
 944                 if (nMinVersion > VERSION)
 945                     return DB_TOO_NEW;
 946             }
 947         }
 948         pcursor->close();
 949     }
 950
 951     BOOST_FOREACH(uint256 hash, vWalletUpgrade)
 952         WriteTx(hash, pwallet->mapWallet[hash]);
 953
 954     printf("nFileVersion = %d\n", nFileVersion);
 955     printf("fGenerateBitcoins = %d\n", fGenerateBitcoins);
 956     printf("nTransactionFee = %"PRI64d"\n", nTransactionFee);
 957     printf("fMinimizeToTray = %d\n", fMinimizeToTray);
 958     printf("fMinimizeOnClose = %d\n", fMinimizeOnClose);
 959     printf("fUseProxy = %d\n", fUseProxy);
 960     printf("addrProxy = %s\n", addrProxy.ToString().c_str());
 961     if (fHaveUPnP)
 962         printf("fUseUPnP = %d\n", fUseUPnP);
 963
 964
 965     // Rewrite encrypted wallets of versions 0.4.0 and 0.5.0rc:
 966     if (fIsEncrypted && (nFileVersion == 40000 || nFileVersion == 50000))
 967         return DB_NEED_REWRITE;
 968
 969     if (nFileVersion < VERSION) // Update
 970     {
 971         // Get rid of old debug.log file in current directory
 972         if (nFileVersion <= 105 && !pszSetDataDir[0])
 973             unlink("debug.log");
 974
 975         WriteVersion(VERSION);
 976     }
 977
 978     return DB_LOAD_OK;
 979 }
 980
 981 void ThreadFlushWalletDB(void* parg)
 982 {
 983     const string& strFile = ((const string*)parg)[0];
 984     static bool fOneThread;
 985     if (fOneThread)
 986         return;
 987     fOneThread = true;
 988     if (mapArgs.count("-noflushwallet"))
 989         return;
 990
 991     unsigned int nLastSeen = nWalletDBUpdated;
 992     unsigned int nLastFlushed = nWalletDBUpdated;
 993     int64 nLastWalletUpdate = GetTime();
 994     while (!fShutdown)
 995     {
 996         Sleep(500);
 997
 998         if (nLastSeen != nWalletDBUpdated)
 999         {
1000             nLastSeen = nWalletDBUpdated;
1001             nLastWalletUpdate = GetTime();
1002         }
1003
1004         if (nLastFlushed != nWalletDBUpdated && GetTime() - nLastWalletUpdate >= 2)
1005         {
1006             TRY_CRITICAL_BLOCK(cs_db)
1007             {
1008                 // Don't do this if any databases are in use
1009                 int nRefCount = 0;
1010                 map<string, int>::iterator mi = mapFileUseCount.begin();
1011                 while (mi != mapFileUseCount.end())
1012                 {
1013                     nRefCount += (*mi).second;
1014                     mi++;
1015                 }
1016
1017                 if (nRefCount == 0 && !fShutdown)
1018                 {
1019                     map<string, int>::iterator mi = mapFileUseCount.find(strFile);
1020                     if (mi != mapFileUseCount.end())
1021                     {
1022                         printf("%s ", DateTimeStrFormat("%x %H:%M:%S", GetTime()).c_str());
1023                         printf("Flushing wallet.dat\n");
1024                         nLastFlushed = nWalletDBUpdated;
1025                         int64 nStart = GetTimeMillis();
1026
1027                         // Flush wallet.dat so it's self contained
1028                         CloseDb(strFile);
1029                         dbenv.txn_checkpoint(0, 0, 0);
1030                         dbenv.lsn_reset(strFile.c_str(), 0);
1031
1032                         mapFileUseCount.erase(mi++);
1033                         printf("Flushed wallet.dat %"PRI64d"ms\n", GetTimeMillis() - nStart);
1034                     }
1035                 }
1036             }
1037         }
1038     }
1039 }
1040
1041 bool BackupWallet(const CWallet& wallet, const string& strDest)
1042 {
1043     if (!wallet.fFileBacked)
1044         return false;
1045     while (!fShutdown)
1046     {
1047         CRITICAL_BLOCK(cs_db)
1048         {
1049             if (!mapFileUseCount.count(wallet.strWalletFile) || mapFileUseCount[wallet.strWalletFile] == 0)
1050             {
1051                 // Flush log data to the dat file
1052                 CloseDb(wallet.strWalletFile);
1053                 dbenv.txn_checkpoint(0, 0, 0);
1054                 dbenv.lsn_reset(wallet.strWalletFile.c_str(), 0);
1055                 mapFileUseCount.erase(wallet.strWalletFile);
1056
1057                 // Copy wallet.dat
1058                 filesystem::path pathSrc(GetDataDir() + "/" + wallet.strWalletFile);
1059                 filesystem::path pathDest(strDest);
1060                 if (filesystem::is_directory(pathDest))
1061                     pathDest = pathDest / wallet.strWalletFile;
1062 #if BOOST_VERSION >= 104000
1063                 filesystem::copy_file(pathSrc, pathDest, filesystem::copy_option::overwrite_if_exists);
1064 #else
1065                 filesystem::copy_file(pathSrc, pathDest);
1066 #endif
1067                 printf("copied wallet.dat to %s\n", pathDest.string().c_str());
1068
1069                 return true;
1070             }
1071         }
1072         Sleep(100);
1073     }
1074     return false;
1075 }