Speed up block downloading
[novacoin.git] / src / db.cpp
1 // Copyright (c) 2009-2010 Satoshi Nakamoto
2 // Copyright (c) 2009-2012 The Bitcoin developers
3 // Distributed under the MIT/X11 software license, see the accompanying
4 // file license.txt or http://www.opensource.org/licenses/mit-license.php.
5
6 #include "headers.h"
7 #include "db.h"
8 #include "net.h"
9 #include <boost/version.hpp>
10 #include <boost/filesystem.hpp>
11 #include <boost/filesystem/fstream.hpp>
12
13 using namespace std;
14 using namespace boost;
15
16
17 unsigned int nWalletDBUpdated;
18 uint64 nAccountingEntryNumber = 0;
19
20
21
22 //
23 // CDB
24 //
25
26 static CCriticalSection cs_db;
27 static bool fDbEnvInit = false;
28 DbEnv dbenv(0);
29 static map<string, int> mapFileUseCount;
30 static map<string, Db*> mapDb;
31
32 static void EnvShutdown()
33 {
34     if (!fDbEnvInit)
35         return;
36
37     fDbEnvInit = false;
38     try
39     {
40         dbenv.close(0);
41     }
42     catch (const DbException& e)
43     {
44         printf("EnvShutdown exception: %s (%d)\n", e.what(), e.get_errno());
45     }
46     DbEnv(0).remove(GetDataDir().c_str(), 0);
47 }
48
49 class CDBInit
50 {
51 public:
52     CDBInit()
53     {
54     }
55     ~CDBInit()
56     {
57         EnvShutdown();
58     }
59 }
60 instance_of_cdbinit;
61
62
63 CDB::CDB(const char* pszFile, const char* pszMode) : pdb(NULL)
64 {
65     int ret;
66     if (pszFile == NULL)
67         return;
68
69     fReadOnly = (!strchr(pszMode, '+') && !strchr(pszMode, 'w'));
70     bool fCreate = strchr(pszMode, 'c');
71     unsigned int nFlags = DB_THREAD;
72     if (fCreate)
73         nFlags |= DB_CREATE;
74
75     CRITICAL_BLOCK(cs_db)
76     {
77         if (!fDbEnvInit)
78         {
79             if (fShutdown)
80                 return;
81             string strDataDir = GetDataDir();
82             string strLogDir = strDataDir + "/database";
83             filesystem::create_directory(strLogDir.c_str());
84             string strErrorFile = strDataDir + "/db.log";
85             printf("dbenv.open strLogDir=%s strErrorFile=%s\n", strLogDir.c_str(), strErrorFile.c_str());
86
87             int nDbCache = GetArg("-dbcache", 25);
88             dbenv.set_lg_dir(strLogDir.c_str());
89             dbenv.set_cachesize(nDbCache / 1024, (nDbCache % 1024)*1048576, 1);
90             dbenv.set_lg_bsize(10485760);
91             dbenv.set_lg_max(104857600);
92             dbenv.set_lk_max_locks(10000);
93             dbenv.set_lk_max_objects(10000);
94             dbenv.set_errfile(fopen(strErrorFile.c_str(), "a")); /// debug
95             dbenv.set_flags(DB_AUTO_COMMIT, 1);
96             ret = dbenv.open(strDataDir.c_str(),
97                              DB_CREATE     |
98                              DB_INIT_LOCK  |
99                              DB_INIT_LOG   |
100                              DB_INIT_MPOOL |
101                              DB_INIT_TXN   |
102                              DB_THREAD     |
103                              DB_RECOVER,
104                              S_IRUSR | S_IWUSR);
105             if (ret > 0)
106                 throw runtime_error(strprintf("CDB() : error %d opening database environment", ret));
107             fDbEnvInit = true;
108         }
109
110         strFile = pszFile;
111         ++mapFileUseCount[strFile];
112         pdb = mapDb[strFile];
113         if (pdb == NULL)
114         {
115             pdb = new Db(&dbenv, 0);
116
117             ret = pdb->open(NULL,      // Txn pointer
118                             pszFile,   // Filename
119                             "main",    // Logical db name
120                             DB_BTREE,  // Database type
121                             nFlags,    // Flags
122                             0);
123
124             if (ret > 0)
125             {
126                 delete pdb;
127                 pdb = NULL;
128                 CRITICAL_BLOCK(cs_db)
129                     --mapFileUseCount[strFile];
130                 strFile = "";
131                 throw runtime_error(strprintf("CDB() : can't open database file %s, error %d", pszFile, ret));
132             }
133
134             if (fCreate && !Exists(string("version")))
135             {
136                 bool fTmp = fReadOnly;
137                 fReadOnly = false;
138                 WriteVersion(CLIENT_VERSION);
139                 fReadOnly = fTmp;
140             }
141
142             mapDb[strFile] = pdb;
143         }
144     }
145 }
146
147 void CDB::Close()
148 {
149     if (!pdb)
150         return;
151     if (!vTxn.empty())
152         vTxn.front()->abort();
153     vTxn.clear();
154     pdb = NULL;
155
156     // Flush database activity from memory pool to disk log
157     unsigned int nMinutes = 0;
158     if (fReadOnly)
159         nMinutes = 1;
160     if (strFile == "addr.dat")
161         nMinutes = 2;
162     if (strFile == "blkindex.dat" && IsInitialBlockDownload() && nBestHeight % 5000 != 0)
163         nMinutes = 1;
164     dbenv.txn_checkpoint(0, nMinutes, 0);
165
166     CRITICAL_BLOCK(cs_db)
167         --mapFileUseCount[strFile];
168 }
169
170 void static CloseDb(const string& strFile)
171 {
172     CRITICAL_BLOCK(cs_db)
173     {
174         if (mapDb[strFile] != NULL)
175         {
176             // Close the database handle
177             Db* pdb = mapDb[strFile];
178             pdb->close(0);
179             delete pdb;
180             mapDb[strFile] = NULL;
181         }
182     }
183 }
184
185 bool CDB::Rewrite(const string& strFile, const char* pszSkip)
186 {
187     while (!fShutdown)
188     {
189         CRITICAL_BLOCK(cs_db)
190         {
191             if (!mapFileUseCount.count(strFile) || mapFileUseCount[strFile] == 0)
192             {
193                 // Flush log data to the dat file
194                 CloseDb(strFile);
195                 dbenv.txn_checkpoint(0, 0, 0);
196                 dbenv.lsn_reset(strFile.c_str(), 0);
197                 mapFileUseCount.erase(strFile);
198
199                 bool fSuccess = true;
200                 printf("Rewriting %s...\n", strFile.c_str());
201                 string strFileRes = strFile + ".rewrite";
202                 { // surround usage of db with extra {}
203                     CDB db(strFile.c_str(), "r");
204                     Db* pdbCopy = new Db(&dbenv, 0);
205     
206                     int ret = pdbCopy->open(NULL,                 // Txn pointer
207                                             strFileRes.c_str(),   // Filename
208                                             "main",    // Logical db name
209                                             DB_BTREE,  // Database type
210                                             DB_CREATE,    // Flags
211                                             0);
212                     if (ret > 0)
213                     {
214                         printf("Cannot create database file %s\n", strFileRes.c_str());
215                         fSuccess = false;
216                     }
217     
218                     Dbc* pcursor = db.GetCursor();
219                     if (pcursor)
220                         while (fSuccess)
221                         {
222                             CDataStream ssKey;
223                             CDataStream ssValue;
224                             int ret = db.ReadAtCursor(pcursor, ssKey, ssValue, DB_NEXT);
225                             if (ret == DB_NOTFOUND)
226                             {
227                                 pcursor->close();
228                                 break;
229                             }
230                             else if (ret != 0)
231                             {
232                                 pcursor->close();
233                                 fSuccess = false;
234                                 break;
235                             }
236                             if (pszSkip &&
237                                 strncmp(&ssKey[0], pszSkip, std::min(ssKey.size(), strlen(pszSkip))) == 0)
238                                 continue;
239                             if (strncmp(&ssKey[0], "\x07version", 8) == 0)
240                             {
241                                 // Update version:
242                                 ssValue.clear();
243                                 ssValue << CLIENT_VERSION;
244                             }
245                             Dbt datKey(&ssKey[0], ssKey.size());
246                             Dbt datValue(&ssValue[0], ssValue.size());
247                             int ret2 = pdbCopy->put(NULL, &datKey, &datValue, DB_NOOVERWRITE);
248                             if (ret2 > 0)
249                                 fSuccess = false;
250                         }
251                     if (fSuccess)
252                     {
253                         db.Close();
254                         CloseDb(strFile);
255                         if (pdbCopy->close(0))
256                             fSuccess = false;
257                         delete pdbCopy;
258                     }
259                 }
260                 if (fSuccess)
261                 {
262                     Db dbA(&dbenv, 0);
263                     if (dbA.remove(strFile.c_str(), NULL, 0))
264                         fSuccess = false;
265                     Db dbB(&dbenv, 0);
266                     if (dbB.rename(strFileRes.c_str(), NULL, strFile.c_str(), 0))
267                         fSuccess = false;
268                 }
269                 if (!fSuccess)
270                     printf("Rewriting of %s FAILED!\n", strFileRes.c_str());
271                 return fSuccess;
272             }
273         }
274         Sleep(100);
275     }
276     return false;
277 }
278
279
280 void DBFlush(bool fShutdown)
281 {
282     // Flush log data to the actual data file
283     //  on all files that are not in use
284     printf("DBFlush(%s)%s\n", fShutdown ? "true" : "false", fDbEnvInit ? "" : " db not started");
285     if (!fDbEnvInit)
286         return;
287     CRITICAL_BLOCK(cs_db)
288     {
289         map<string, int>::iterator mi = mapFileUseCount.begin();
290         while (mi != mapFileUseCount.end())
291         {
292             string strFile = (*mi).first;
293             int nRefCount = (*mi).second;
294             printf("%s refcount=%d\n", strFile.c_str(), nRefCount);
295             if (nRefCount == 0)
296             {
297                 // Move log data to the dat file
298                 CloseDb(strFile);
299                 dbenv.txn_checkpoint(0, 0, 0);
300                 printf("%s flush\n", strFile.c_str());
301                 dbenv.lsn_reset(strFile.c_str(), 0);
302                 mapFileUseCount.erase(mi++);
303             }
304             else
305                 mi++;
306         }
307         if (fShutdown)
308         {
309             char** listp;
310             if (mapFileUseCount.empty())
311             {
312                 dbenv.log_archive(&listp, DB_ARCH_REMOVE);
313                 EnvShutdown();
314             }
315         }
316     }
317 }
318
319
320
321
322
323
324 //
325 // CTxDB
326 //
327
328 bool CTxDB::ReadTxIndex(uint256 hash, CTxIndex& txindex)
329 {
330     assert(!fClient);
331     txindex.SetNull();
332     return Read(make_pair(string("tx"), hash), txindex);
333 }
334
335 bool CTxDB::UpdateTxIndex(uint256 hash, const CTxIndex& txindex)
336 {
337     assert(!fClient);
338     return Write(make_pair(string("tx"), hash), txindex);
339 }
340
341 bool CTxDB::AddTxIndex(const CTransaction& tx, const CDiskTxPos& pos, int nHeight)
342 {
343     assert(!fClient);
344
345     // Add to tx index
346     uint256 hash = tx.GetHash();
347     CTxIndex txindex(pos, tx.vout.size());
348     return Write(make_pair(string("tx"), hash), txindex);
349 }
350
351 bool CTxDB::EraseTxIndex(const CTransaction& tx)
352 {
353     assert(!fClient);
354     uint256 hash = tx.GetHash();
355
356     return Erase(make_pair(string("tx"), hash));
357 }
358
359 bool CTxDB::ContainsTx(uint256 hash)
360 {
361     assert(!fClient);
362     return Exists(make_pair(string("tx"), hash));
363 }
364
365 bool CTxDB::ReadOwnerTxes(uint160 hash160, int nMinHeight, vector<CTransaction>& vtx)
366 {
367     assert(!fClient);
368     vtx.clear();
369
370     // Get cursor
371     Dbc* pcursor = GetCursor();
372     if (!pcursor)
373         return false;
374
375     unsigned int fFlags = DB_SET_RANGE;
376     loop
377     {
378         // Read next record
379         CDataStream ssKey;
380         if (fFlags == DB_SET_RANGE)
381             ssKey << string("owner") << hash160 << CDiskTxPos(0, 0, 0);
382         CDataStream ssValue;
383         int ret = ReadAtCursor(pcursor, ssKey, ssValue, fFlags);
384         fFlags = DB_NEXT;
385         if (ret == DB_NOTFOUND)
386             break;
387         else if (ret != 0)
388         {
389             pcursor->close();
390             return false;
391         }
392
393         // Unserialize
394         string strType;
395         uint160 hashItem;
396         CDiskTxPos pos;
397         ssKey >> strType >> hashItem >> pos;
398         int nItemHeight;
399         ssValue >> nItemHeight;
400
401         // Read transaction
402         if (strType != "owner" || hashItem != hash160)
403             break;
404         if (nItemHeight >= nMinHeight)
405         {
406             vtx.resize(vtx.size()+1);
407             if (!vtx.back().ReadFromDisk(pos))
408             {
409                 pcursor->close();
410                 return false;
411             }
412         }
413     }
414
415     pcursor->close();
416     return true;
417 }
418
419 bool CTxDB::ReadDiskTx(uint256 hash, CTransaction& tx, CTxIndex& txindex)
420 {
421     assert(!fClient);
422     tx.SetNull();
423     if (!ReadTxIndex(hash, txindex))
424         return false;
425     return (tx.ReadFromDisk(txindex.pos));
426 }
427
428 bool CTxDB::ReadDiskTx(uint256 hash, CTransaction& tx)
429 {
430     CTxIndex txindex;
431     return ReadDiskTx(hash, tx, txindex);
432 }
433
434 bool CTxDB::ReadDiskTx(COutPoint outpoint, CTransaction& tx, CTxIndex& txindex)
435 {
436     return ReadDiskTx(outpoint.hash, tx, txindex);
437 }
438
439 bool CTxDB::ReadDiskTx(COutPoint outpoint, CTransaction& tx)
440 {
441     CTxIndex txindex;
442     return ReadDiskTx(outpoint.hash, tx, txindex);
443 }
444
445 bool CTxDB::WriteBlockIndex(const CDiskBlockIndex& blockindex)
446 {
447     return Write(make_pair(string("blockindex"), blockindex.GetBlockHash()), blockindex);
448 }
449
450 bool CTxDB::EraseBlockIndex(uint256 hash)
451 {
452     return Erase(make_pair(string("blockindex"), hash));
453 }
454
455 bool CTxDB::ReadHashBestChain(uint256& hashBestChain)
456 {
457     return Read(string("hashBestChain"), hashBestChain);
458 }
459
460 bool CTxDB::WriteHashBestChain(uint256 hashBestChain)
461 {
462     return Write(string("hashBestChain"), hashBestChain);
463 }
464
465 bool CTxDB::ReadBestInvalidWork(CBigNum& bnBestInvalidWork)
466 {
467     return Read(string("bnBestInvalidWork"), bnBestInvalidWork);
468 }
469
470 bool CTxDB::WriteBestInvalidWork(CBigNum bnBestInvalidWork)
471 {
472     return Write(string("bnBestInvalidWork"), bnBestInvalidWork);
473 }
474
475 CBlockIndex static * InsertBlockIndex(uint256 hash)
476 {
477     if (hash == 0)
478         return NULL;
479
480     // Return existing
481     map<uint256, CBlockIndex*>::iterator mi = mapBlockIndex.find(hash);
482     if (mi != mapBlockIndex.end())
483         return (*mi).second;
484
485     // Create new
486     CBlockIndex* pindexNew = new CBlockIndex();
487     if (!pindexNew)
488         throw runtime_error("LoadBlockIndex() : new CBlockIndex failed");
489     mi = mapBlockIndex.insert(make_pair(hash, pindexNew)).first;
490     pindexNew->phashBlock = &((*mi).first);
491
492     return pindexNew;
493 }
494
495 bool CTxDB::LoadBlockIndex()
496 {
497     // Get database cursor
498     Dbc* pcursor = GetCursor();
499     if (!pcursor)
500         return false;
501
502     // Load mapBlockIndex
503     unsigned int fFlags = DB_SET_RANGE;
504     loop
505     {
506         // Read next record
507         CDataStream ssKey;
508         if (fFlags == DB_SET_RANGE)
509             ssKey << make_pair(string("blockindex"), uint256(0));
510         CDataStream ssValue;
511         int ret = ReadAtCursor(pcursor, ssKey, ssValue, fFlags);
512         fFlags = DB_NEXT;
513         if (ret == DB_NOTFOUND)
514             break;
515         else if (ret != 0)
516             return false;
517
518         // Unserialize
519         string strType;
520         ssKey >> strType;
521         if (strType == "blockindex")
522         {
523             CDiskBlockIndex diskindex;
524             ssValue >> diskindex;
525
526             // Construct block index object
527             CBlockIndex* pindexNew = InsertBlockIndex(diskindex.GetBlockHash());
528             pindexNew->pprev          = InsertBlockIndex(diskindex.hashPrev);
529             pindexNew->pnext          = InsertBlockIndex(diskindex.hashNext);
530             pindexNew->nFile          = diskindex.nFile;
531             pindexNew->nBlockPos      = diskindex.nBlockPos;
532             pindexNew->nHeight        = diskindex.nHeight;
533             pindexNew->nVersion       = diskindex.nVersion;
534             pindexNew->hashMerkleRoot = diskindex.hashMerkleRoot;
535             pindexNew->nTime          = diskindex.nTime;
536             pindexNew->nBits          = diskindex.nBits;
537             pindexNew->nNonce         = diskindex.nNonce;
538
539             // Watch for genesis block
540             if (pindexGenesisBlock == NULL && diskindex.GetBlockHash() == hashGenesisBlock)
541                 pindexGenesisBlock = pindexNew;
542
543             if (!pindexNew->CheckIndex())
544                 return error("LoadBlockIndex() : CheckIndex failed at %d", pindexNew->nHeight);
545         }
546         else
547         {
548             break;
549         }
550     }
551     pcursor->close();
552
553     // Calculate bnChainWork
554     vector<pair<int, CBlockIndex*> > vSortedByHeight;
555     vSortedByHeight.reserve(mapBlockIndex.size());
556     BOOST_FOREACH(const PAIRTYPE(uint256, CBlockIndex*)& item, mapBlockIndex)
557     {
558         CBlockIndex* pindex = item.second;
559         vSortedByHeight.push_back(make_pair(pindex->nHeight, pindex));
560     }
561     sort(vSortedByHeight.begin(), vSortedByHeight.end());
562     BOOST_FOREACH(const PAIRTYPE(int, CBlockIndex*)& item, vSortedByHeight)
563     {
564         CBlockIndex* pindex = item.second;
565         pindex->bnChainWork = (pindex->pprev ? pindex->pprev->bnChainWork : 0) + pindex->GetBlockWork();
566     }
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     bnBestChainWork = pindexBest->bnChainWork;
580     printf("LoadBlockIndex(): hashBestChain=%s  height=%d\n", hashBestChain.ToString().substr(0,20).c_str(), nBestHeight);
581
582     // Load bnBestInvalidWork, OK if it doesn't exist
583     ReadBestInvalidWork(bnBestInvalidWork);
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     //// todo: shouldn't we catch exceptions and try to recover and continue?
775     CRITICAL_BLOCK(pwallet->cs_wallet)
776     {
777         // Get cursor
778         Dbc* pcursor = GetCursor();
779         if (!pcursor)
780         {
781             printf("Error getting wallet database cursor\n");
782             return DB_CORRUPT;
783         }
784
785         loop
786         {
787             // Read next record
788             CDataStream ssKey;
789             CDataStream ssValue;
790             int ret = ReadAtCursor(pcursor, ssKey, ssValue);
791             if (ret == DB_NOTFOUND)
792                 break;
793             else if (ret != 0)
794             {
795                 printf("Error reading next record from wallet database\n");
796                 return DB_CORRUPT;
797             }
798
799             // Unserialize
800             // Taking advantage of the fact that pair serialization
801             // is just the two items serialized one after the other
802             string strType;
803             ssKey >> strType;
804             if (strType == "name")
805             {
806                 string strAddress;
807                 ssKey >> strAddress;
808                 ssValue >> pwallet->mapAddressBook[strAddress];
809             }
810             else if (strType == "tx")
811             {
812                 uint256 hash;
813                 ssKey >> hash;
814                 CWalletTx& wtx = pwallet->mapWallet[hash];
815                 ssValue >> wtx;
816                 wtx.BindWallet(pwallet);
817
818                 if (wtx.GetHash() != hash)
819                     printf("Error in wallet.dat, hash mismatch\n");
820
821                 // Undo serialize changes in 31600
822                 if (31404 <= wtx.fTimeReceivedIsTxTime && wtx.fTimeReceivedIsTxTime <= 31703)
823                 {
824                     if (!ssValue.empty())
825                     {
826                         char fTmp;
827                         char fUnused;
828                         ssValue >> fTmp >> fUnused >> wtx.strFromAccount;
829                         printf("LoadWallet() upgrading tx ver=%d %d '%s' %s\n", wtx.fTimeReceivedIsTxTime, fTmp, wtx.strFromAccount.c_str(), hash.ToString().c_str());
830                         wtx.fTimeReceivedIsTxTime = fTmp;
831                     }
832                     else
833                     {
834                         printf("LoadWallet() repairing tx ver=%d %s\n", wtx.fTimeReceivedIsTxTime, hash.ToString().c_str());
835                         wtx.fTimeReceivedIsTxTime = 0;
836                     }
837                     vWalletUpgrade.push_back(hash);
838                 }
839
840                 //// debug print
841                 //printf("LoadWallet  %s\n", wtx.GetHash().ToString().c_str());
842                 //printf(" %12I64d  %s  %s  %s\n",
843                 //    wtx.vout[0].nValue,
844                 //    DateTimeStrFormat("%x %H:%M:%S", wtx.GetBlockTime()).c_str(),
845                 //    wtx.hashBlock.ToString().substr(0,20).c_str(),
846                 //    wtx.mapValue["message"].c_str());
847             }
848             else if (strType == "acentry")
849             {
850                 string strAccount;
851                 ssKey >> strAccount;
852                 uint64 nNumber;
853                 ssKey >> nNumber;
854                 if (nNumber > nAccountingEntryNumber)
855                     nAccountingEntryNumber = nNumber;
856             }
857             else if (strType == "key" || strType == "wkey")
858             {
859                 vector<unsigned char> vchPubKey;
860                 ssKey >> vchPubKey;
861                 CKey key;
862                 if (strType == "key")
863                 {
864                     CPrivKey pkey;
865                     ssValue >> pkey;
866                     key.SetPubKey(vchPubKey);
867                     key.SetPrivKey(pkey);
868                     if (key.GetPubKey() != vchPubKey)
869                     {
870                         printf("Error reading wallet database: CPrivKey pubkey inconsistency\n");
871                         return DB_CORRUPT;
872                     }
873                     if (!key.IsValid())
874                     {
875                         printf("Error reading wallet database: invalid CPrivKey\n");
876                         return DB_CORRUPT;
877                     }
878                 }
879                 else
880                 {
881                     CWalletKey wkey;
882                     ssValue >> wkey;
883                     key.SetPubKey(vchPubKey);
884                     key.SetPrivKey(wkey.vchPrivKey);
885                     if (key.GetPubKey() != vchPubKey)
886                     {
887                         printf("Error reading wallet database: CWalletKey pubkey inconsistency\n");
888                         return DB_CORRUPT;
889                     }
890                     if (!key.IsValid())
891                     {
892                         printf("Error reading wallet database: invalid CWalletKey\n");
893                         return DB_CORRUPT;
894                     }
895                 }
896                 if (!pwallet->LoadKey(key))
897                 {
898                     printf("Error reading wallet database: LoadKey failed\n");
899                     return DB_CORRUPT;
900                 }
901             }
902             else if (strType == "mkey")
903             {
904                 unsigned int nID;
905                 ssKey >> nID;
906                 CMasterKey kMasterKey;
907                 ssValue >> kMasterKey;
908                 if(pwallet->mapMasterKeys.count(nID) != 0)
909                 {
910                     printf("Error reading wallet database: duplicate CMasterKey id %u\n", nID);
911                     return DB_CORRUPT;
912                 }
913                 pwallet->mapMasterKeys[nID] = kMasterKey;
914                 if (pwallet->nMasterKeyMaxID < nID)
915                     pwallet->nMasterKeyMaxID = nID;
916             }
917             else if (strType == "ckey")
918             {
919                 vector<unsigned char> vchPubKey;
920                 ssKey >> vchPubKey;
921                 vector<unsigned char> vchPrivKey;
922                 ssValue >> vchPrivKey;
923                 if (!pwallet->LoadCryptedKey(vchPubKey, vchPrivKey))
924                 {
925                     printf("Error reading wallet database: LoadCryptedKey failed\n");
926                     return DB_CORRUPT;
927                 }
928                 fIsEncrypted = true;
929             }
930             else if (strType == "defaultkey")
931             {
932                 ssValue >> pwallet->vchDefaultKey;
933             }
934             else if (strType == "pool")
935             {
936                 int64 nIndex;
937                 ssKey >> nIndex;
938                 pwallet->setKeyPool.insert(nIndex);
939             }
940             else if (strType == "version")
941             {
942                 ssValue >> nFileVersion;
943                 if (nFileVersion == 10300)
944                     nFileVersion = 300;
945             }
946             else if (strType == "minversion")
947             {
948                 int nMinVersion = 0;
949                 ssValue >> nMinVersion;
950                 if (nMinVersion > CLIENT_VERSION)
951                     return DB_TOO_NEW;
952                 pwallet->LoadMinVersion(nMinVersion);
953             }
954             else if (strType == "cscript")
955             {
956                 uint160 hash;
957                 ssKey >> hash;
958                 CScript script;
959                 ssValue >> script;
960                 if (!pwallet->LoadCScript(script))
961                 {
962                     printf("Error reading wallet database: LoadCScript failed\n");
963                     return DB_CORRUPT;
964                 }
965             }
966         }
967         pcursor->close();
968     }
969
970     BOOST_FOREACH(uint256 hash, vWalletUpgrade)
971         WriteTx(hash, pwallet->mapWallet[hash]);
972
973     printf("nFileVersion = %d\n", nFileVersion);
974
975
976     // Rewrite encrypted wallets of versions 0.4.0 and 0.5.0rc:
977     if (fIsEncrypted && (nFileVersion == 40000 || nFileVersion == 50000))
978         return DB_NEED_REWRITE;
979
980     if (nFileVersion < CLIENT_VERSION) // Update
981     {
982         // Get rid of old debug.log file in current directory
983         if (nFileVersion <= 105 && !pszSetDataDir[0])
984             unlink("debug.log");
985
986         WriteVersion(CLIENT_VERSION);
987     }
988
989     return DB_LOAD_OK;
990 }
991
992 void ThreadFlushWalletDB(void* parg)
993 {
994     const string& strFile = ((const string*)parg)[0];
995     static bool fOneThread;
996     if (fOneThread)
997         return;
998     fOneThread = true;
999     if (!GetBoolArg("-flushwallet", true))
1000         return;
1001
1002     unsigned int nLastSeen = nWalletDBUpdated;
1003     unsigned int nLastFlushed = nWalletDBUpdated;
1004     int64 nLastWalletUpdate = GetTime();
1005     while (!fShutdown)
1006     {
1007         Sleep(500);
1008
1009         if (nLastSeen != nWalletDBUpdated)
1010         {
1011             nLastSeen = nWalletDBUpdated;
1012             nLastWalletUpdate = GetTime();
1013         }
1014
1015         if (nLastFlushed != nWalletDBUpdated && GetTime() - nLastWalletUpdate >= 2)
1016         {
1017             TRY_CRITICAL_BLOCK(cs_db)
1018             {
1019                 // Don't do this if any databases are in use
1020                 int nRefCount = 0;
1021                 map<string, int>::iterator mi = mapFileUseCount.begin();
1022                 while (mi != mapFileUseCount.end())
1023                 {
1024                     nRefCount += (*mi).second;
1025                     mi++;
1026                 }
1027
1028                 if (nRefCount == 0 && !fShutdown)
1029                 {
1030                     map<string, int>::iterator mi = mapFileUseCount.find(strFile);
1031                     if (mi != mapFileUseCount.end())
1032                     {
1033                         printf("%s ", DateTimeStrFormat("%x %H:%M:%S", GetTime()).c_str());
1034                         printf("Flushing wallet.dat\n");
1035                         nLastFlushed = nWalletDBUpdated;
1036                         int64 nStart = GetTimeMillis();
1037
1038                         // Flush wallet.dat so it's self contained
1039                         CloseDb(strFile);
1040                         dbenv.txn_checkpoint(0, 0, 0);
1041                         dbenv.lsn_reset(strFile.c_str(), 0);
1042
1043                         mapFileUseCount.erase(mi++);
1044                         printf("Flushed wallet.dat %"PRI64d"ms\n", GetTimeMillis() - nStart);
1045                     }
1046                 }
1047             }
1048         }
1049     }
1050 }
1051
1052 bool BackupWallet(const CWallet& wallet, const string& strDest)
1053 {
1054     if (!wallet.fFileBacked)
1055         return false;
1056     while (!fShutdown)
1057     {
1058         CRITICAL_BLOCK(cs_db)
1059         {
1060             if (!mapFileUseCount.count(wallet.strWalletFile) || mapFileUseCount[wallet.strWalletFile] == 0)
1061             {
1062                 // Flush log data to the dat file
1063                 CloseDb(wallet.strWalletFile);
1064                 dbenv.txn_checkpoint(0, 0, 0);
1065                 dbenv.lsn_reset(wallet.strWalletFile.c_str(), 0);
1066                 mapFileUseCount.erase(wallet.strWalletFile);
1067
1068                 // Copy wallet.dat
1069                 filesystem::path pathSrc(GetDataDir() + "/" + wallet.strWalletFile);
1070                 filesystem::path pathDest(strDest);
1071                 if (filesystem::is_directory(pathDest))
1072                     pathDest = pathDest / wallet.strWalletFile;
1073
1074                 try {
1075 #if BOOST_VERSION >= 104000
1076                     filesystem::copy_file(pathSrc, pathDest, filesystem::copy_option::overwrite_if_exists);
1077 #else
1078                     filesystem::copy_file(pathSrc, pathDest);
1079 #endif
1080                     printf("copied wallet.dat to %s\n", pathDest.string().c_str());
1081                     return true;
1082                 } catch(const filesystem::filesystem_error &e) {
1083                     printf("error copying wallet.dat to %s - %s\n", pathDest.string().c_str(), e.what());
1084                     return false;
1085                 }
1086             }
1087         }
1088         Sleep(100);
1089     }
1090     return false;
1091 }