Merge branch 'addrman' of https://github.com/sipa/bitcoin
[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::WriteAddrman(const CAddrMan& addrman)
628 {
629     return Write(string("addrman"), addrman);
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(bool &fUpdate)
638 {
639     bool fAddrMan = false;
640     if (Read(string("addrman"), addrman))
641     {
642         printf("Loaded %i addresses\n", addrman.size());
643         fAddrMan = true;
644     }
645
646     vector<CAddress> vAddr;
647
648     // Get cursor
649     Dbc* pcursor = GetCursor();
650     if (!pcursor)
651         return false;
652
653     loop
654     {
655         // Read next record
656         CDataStream ssKey;
657         CDataStream ssValue;
658         int ret = ReadAtCursor(pcursor, ssKey, ssValue);
659         if (ret == DB_NOTFOUND)
660             break;
661         else if (ret != 0)
662             return false;
663
664         // Unserialize
665         string strType;
666         ssKey >> strType;
667         if (strType == "addr")
668         {
669             if (fAddrMan)
670                 fUpdate = true;
671             else
672             {
673                 CAddress addr;
674                 ssValue >> addr;
675                 vAddr.push_back(addr);
676             }
677
678         }
679     }
680     pcursor->close();
681
682     if (!fAddrMan)
683     {
684         addrman.Add(vAddr, CNetAddr("0.0.0.0"));
685         printf("Loaded %i addresses\n", addrman.size());
686     }
687
688     return true;
689 }
690
691 bool LoadAddresses()
692 {
693     bool fUpdate = false;
694     bool fRet = CAddrDB("cr+").LoadAddresses(fUpdate);
695     if (fUpdate)
696         CDB::Rewrite("addr.dat", "\004addr");
697     return fRet;
698 }
699
700
701
702
703 //
704 // CWalletDB
705 //
706
707 bool CWalletDB::WriteName(const string& strAddress, const string& strName)
708 {
709     nWalletDBUpdated++;
710     return Write(make_pair(string("name"), strAddress), strName);
711 }
712
713 bool CWalletDB::EraseName(const string& strAddress)
714 {
715     // This should only be used for sending addresses, never for receiving addresses,
716     // receiving addresses must always have an address book entry if they're not change return.
717     nWalletDBUpdated++;
718     return Erase(make_pair(string("name"), strAddress));
719 }
720
721 bool CWalletDB::ReadAccount(const string& strAccount, CAccount& account)
722 {
723     account.SetNull();
724     return Read(make_pair(string("acc"), strAccount), account);
725 }
726
727 bool CWalletDB::WriteAccount(const string& strAccount, const CAccount& account)
728 {
729     return Write(make_pair(string("acc"), strAccount), account);
730 }
731
732 bool CWalletDB::WriteAccountingEntry(const CAccountingEntry& acentry)
733 {
734     return Write(boost::make_tuple(string("acentry"), acentry.strAccount, ++nAccountingEntryNumber), acentry);
735 }
736
737 int64 CWalletDB::GetAccountCreditDebit(const string& strAccount)
738 {
739     list<CAccountingEntry> entries;
740     ListAccountCreditDebit(strAccount, entries);
741
742     int64 nCreditDebit = 0;
743     BOOST_FOREACH (const CAccountingEntry& entry, entries)
744         nCreditDebit += entry.nCreditDebit;
745
746     return nCreditDebit;
747 }
748
749 void CWalletDB::ListAccountCreditDebit(const string& strAccount, list<CAccountingEntry>& entries)
750 {
751     bool fAllAccounts = (strAccount == "*");
752
753     Dbc* pcursor = GetCursor();
754     if (!pcursor)
755         throw runtime_error("CWalletDB::ListAccountCreditDebit() : cannot create DB cursor");
756     unsigned int fFlags = DB_SET_RANGE;
757     loop
758     {
759         // Read next record
760         CDataStream ssKey;
761         if (fFlags == DB_SET_RANGE)
762             ssKey << boost::make_tuple(string("acentry"), (fAllAccounts? string("") : strAccount), uint64(0));
763         CDataStream ssValue;
764         int ret = ReadAtCursor(pcursor, ssKey, ssValue, fFlags);
765         fFlags = DB_NEXT;
766         if (ret == DB_NOTFOUND)
767             break;
768         else if (ret != 0)
769         {
770             pcursor->close();
771             throw runtime_error("CWalletDB::ListAccountCreditDebit() : error scanning DB");
772         }
773
774         // Unserialize
775         string strType;
776         ssKey >> strType;
777         if (strType != "acentry")
778             break;
779         CAccountingEntry acentry;
780         ssKey >> acentry.strAccount;
781         if (!fAllAccounts && acentry.strAccount != strAccount)
782             break;
783
784         ssValue >> acentry;
785         entries.push_back(acentry);
786     }
787
788     pcursor->close();
789 }
790
791
792 int CWalletDB::LoadWallet(CWallet* pwallet)
793 {
794     pwallet->vchDefaultKey.clear();
795     int nFileVersion = 0;
796     vector<uint256> vWalletUpgrade;
797     bool fIsEncrypted = false;
798
799     //// todo: shouldn't we catch exceptions and try to recover and continue?
800     CRITICAL_BLOCK(pwallet->cs_wallet)
801     {
802         // Get cursor
803         Dbc* pcursor = GetCursor();
804         if (!pcursor)
805         {
806             printf("Error getting wallet database cursor\n");
807             return DB_CORRUPT;
808         }
809
810         loop
811         {
812             // Read next record
813             CDataStream ssKey;
814             CDataStream ssValue;
815             int ret = ReadAtCursor(pcursor, ssKey, ssValue);
816             if (ret == DB_NOTFOUND)
817                 break;
818             else if (ret != 0)
819             {
820                 printf("Error reading next record from wallet database\n");
821                 return DB_CORRUPT;
822             }
823
824             // Unserialize
825             // Taking advantage of the fact that pair serialization
826             // is just the two items serialized one after the other
827             string strType;
828             ssKey >> strType;
829             if (strType == "name")
830             {
831                 string strAddress;
832                 ssKey >> strAddress;
833                 ssValue >> pwallet->mapAddressBook[strAddress];
834             }
835             else if (strType == "tx")
836             {
837                 uint256 hash;
838                 ssKey >> hash;
839                 CWalletTx& wtx = pwallet->mapWallet[hash];
840                 ssValue >> wtx;
841                 wtx.BindWallet(pwallet);
842
843                 if (wtx.GetHash() != hash)
844                     printf("Error in wallet.dat, hash mismatch\n");
845
846                 // Undo serialize changes in 31600
847                 if (31404 <= wtx.fTimeReceivedIsTxTime && wtx.fTimeReceivedIsTxTime <= 31703)
848                 {
849                     if (!ssValue.empty())
850                     {
851                         char fTmp;
852                         char fUnused;
853                         ssValue >> fTmp >> fUnused >> wtx.strFromAccount;
854                         printf("LoadWallet() upgrading tx ver=%d %d '%s' %s\n", wtx.fTimeReceivedIsTxTime, fTmp, wtx.strFromAccount.c_str(), hash.ToString().c_str());
855                         wtx.fTimeReceivedIsTxTime = fTmp;
856                     }
857                     else
858                     {
859                         printf("LoadWallet() repairing tx ver=%d %s\n", wtx.fTimeReceivedIsTxTime, hash.ToString().c_str());
860                         wtx.fTimeReceivedIsTxTime = 0;
861                     }
862                     vWalletUpgrade.push_back(hash);
863                 }
864
865                 //// debug print
866                 //printf("LoadWallet  %s\n", wtx.GetHash().ToString().c_str());
867                 //printf(" %12I64d  %s  %s  %s\n",
868                 //    wtx.vout[0].nValue,
869                 //    DateTimeStrFormat("%x %H:%M:%S", wtx.GetBlockTime()).c_str(),
870                 //    wtx.hashBlock.ToString().substr(0,20).c_str(),
871                 //    wtx.mapValue["message"].c_str());
872             }
873             else if (strType == "acentry")
874             {
875                 string strAccount;
876                 ssKey >> strAccount;
877                 uint64 nNumber;
878                 ssKey >> nNumber;
879                 if (nNumber > nAccountingEntryNumber)
880                     nAccountingEntryNumber = nNumber;
881             }
882             else if (strType == "key" || strType == "wkey")
883             {
884                 vector<unsigned char> vchPubKey;
885                 ssKey >> vchPubKey;
886                 CKey key;
887                 if (strType == "key")
888                 {
889                     CPrivKey pkey;
890                     ssValue >> pkey;
891                     key.SetPubKey(vchPubKey);
892                     key.SetPrivKey(pkey);
893                     if (key.GetPubKey() != vchPubKey)
894                     {
895                         printf("Error reading wallet database: CPrivKey pubkey inconsistency\n");
896                         return DB_CORRUPT;
897                     }
898                     if (!key.IsValid())
899                     {
900                         printf("Error reading wallet database: invalid CPrivKey\n");
901                         return DB_CORRUPT;
902                     }
903                 }
904                 else
905                 {
906                     CWalletKey wkey;
907                     ssValue >> wkey;
908                     key.SetPubKey(vchPubKey);
909                     key.SetPrivKey(wkey.vchPrivKey);
910                     if (key.GetPubKey() != vchPubKey)
911                     {
912                         printf("Error reading wallet database: CWalletKey pubkey inconsistency\n");
913                         return DB_CORRUPT;
914                     }
915                     if (!key.IsValid())
916                     {
917                         printf("Error reading wallet database: invalid CWalletKey\n");
918                         return DB_CORRUPT;
919                     }
920                 }
921                 if (!pwallet->LoadKey(key))
922                 {
923                     printf("Error reading wallet database: LoadKey failed\n");
924                     return DB_CORRUPT;
925                 }
926             }
927             else if (strType == "mkey")
928             {
929                 unsigned int nID;
930                 ssKey >> nID;
931                 CMasterKey kMasterKey;
932                 ssValue >> kMasterKey;
933                 if(pwallet->mapMasterKeys.count(nID) != 0)
934                 {
935                     printf("Error reading wallet database: duplicate CMasterKey id %u\n", nID);
936                     return DB_CORRUPT;
937                 }
938                 pwallet->mapMasterKeys[nID] = kMasterKey;
939                 if (pwallet->nMasterKeyMaxID < nID)
940                     pwallet->nMasterKeyMaxID = nID;
941             }
942             else if (strType == "ckey")
943             {
944                 vector<unsigned char> vchPubKey;
945                 ssKey >> vchPubKey;
946                 vector<unsigned char> vchPrivKey;
947                 ssValue >> vchPrivKey;
948                 if (!pwallet->LoadCryptedKey(vchPubKey, vchPrivKey))
949                 {
950                     printf("Error reading wallet database: LoadCryptedKey failed\n");
951                     return DB_CORRUPT;
952                 }
953                 fIsEncrypted = true;
954             }
955             else if (strType == "defaultkey")
956             {
957                 ssValue >> pwallet->vchDefaultKey;
958             }
959             else if (strType == "pool")
960             {
961                 int64 nIndex;
962                 ssKey >> nIndex;
963                 pwallet->setKeyPool.insert(nIndex);
964             }
965             else if (strType == "version")
966             {
967                 ssValue >> nFileVersion;
968                 if (nFileVersion == 10300)
969                     nFileVersion = 300;
970             }
971             else if (strType == "minversion")
972             {
973                 int nMinVersion = 0;
974                 ssValue >> nMinVersion;
975                 if (nMinVersion > CLIENT_VERSION)
976                     return DB_TOO_NEW;
977                 pwallet->LoadMinVersion(nMinVersion);
978             }
979             else if (strType == "cscript")
980             {
981                 uint160 hash;
982                 ssKey >> hash;
983                 CScript script;
984                 ssValue >> script;
985                 if (!pwallet->LoadCScript(script))
986                 {
987                     printf("Error reading wallet database: LoadCScript failed\n");
988                     return DB_CORRUPT;
989                 }
990             }
991         }
992         pcursor->close();
993     }
994
995     BOOST_FOREACH(uint256 hash, vWalletUpgrade)
996         WriteTx(hash, pwallet->mapWallet[hash]);
997
998     printf("nFileVersion = %d\n", nFileVersion);
999
1000
1001     // Rewrite encrypted wallets of versions 0.4.0 and 0.5.0rc:
1002     if (fIsEncrypted && (nFileVersion == 40000 || nFileVersion == 50000))
1003         return DB_NEED_REWRITE;
1004
1005     if (nFileVersion < CLIENT_VERSION) // Update
1006     {
1007         // Get rid of old debug.log file in current directory
1008         if (nFileVersion <= 105 && !pszSetDataDir[0])
1009             unlink("debug.log");
1010
1011         WriteVersion(CLIENT_VERSION);
1012     }
1013
1014     return DB_LOAD_OK;
1015 }
1016
1017 void ThreadFlushWalletDB(void* parg)
1018 {
1019     const string& strFile = ((const string*)parg)[0];
1020     static bool fOneThread;
1021     if (fOneThread)
1022         return;
1023     fOneThread = true;
1024     if (!GetBoolArg("-flushwallet", true))
1025         return;
1026
1027     unsigned int nLastSeen = nWalletDBUpdated;
1028     unsigned int nLastFlushed = nWalletDBUpdated;
1029     int64 nLastWalletUpdate = GetTime();
1030     while (!fShutdown)
1031     {
1032         Sleep(500);
1033
1034         if (nLastSeen != nWalletDBUpdated)
1035         {
1036             nLastSeen = nWalletDBUpdated;
1037             nLastWalletUpdate = GetTime();
1038         }
1039
1040         if (nLastFlushed != nWalletDBUpdated && GetTime() - nLastWalletUpdate >= 2)
1041         {
1042             TRY_CRITICAL_BLOCK(cs_db)
1043             {
1044                 // Don't do this if any databases are in use
1045                 int nRefCount = 0;
1046                 map<string, int>::iterator mi = mapFileUseCount.begin();
1047                 while (mi != mapFileUseCount.end())
1048                 {
1049                     nRefCount += (*mi).second;
1050                     mi++;
1051                 }
1052
1053                 if (nRefCount == 0 && !fShutdown)
1054                 {
1055                     map<string, int>::iterator mi = mapFileUseCount.find(strFile);
1056                     if (mi != mapFileUseCount.end())
1057                     {
1058                         printf("%s ", DateTimeStrFormat("%x %H:%M:%S", GetTime()).c_str());
1059                         printf("Flushing wallet.dat\n");
1060                         nLastFlushed = nWalletDBUpdated;
1061                         int64 nStart = GetTimeMillis();
1062
1063                         // Flush wallet.dat so it's self contained
1064                         CloseDb(strFile);
1065                         dbenv.txn_checkpoint(0, 0, 0);
1066                         dbenv.lsn_reset(strFile.c_str(), 0);
1067
1068                         mapFileUseCount.erase(mi++);
1069                         printf("Flushed wallet.dat %"PRI64d"ms\n", GetTimeMillis() - nStart);
1070                     }
1071                 }
1072             }
1073         }
1074     }
1075 }
1076
1077 bool BackupWallet(const CWallet& wallet, const string& strDest)
1078 {
1079     if (!wallet.fFileBacked)
1080         return false;
1081     while (!fShutdown)
1082     {
1083         CRITICAL_BLOCK(cs_db)
1084         {
1085             if (!mapFileUseCount.count(wallet.strWalletFile) || mapFileUseCount[wallet.strWalletFile] == 0)
1086             {
1087                 // Flush log data to the dat file
1088                 CloseDb(wallet.strWalletFile);
1089                 dbenv.txn_checkpoint(0, 0, 0);
1090                 dbenv.lsn_reset(wallet.strWalletFile.c_str(), 0);
1091                 mapFileUseCount.erase(wallet.strWalletFile);
1092
1093                 // Copy wallet.dat
1094                 filesystem::path pathSrc(GetDataDir() + "/" + wallet.strWalletFile);
1095                 filesystem::path pathDest(strDest);
1096                 if (filesystem::is_directory(pathDest))
1097                     pathDest = pathDest / wallet.strWalletFile;
1098
1099                 try {
1100 #if BOOST_VERSION >= 104000
1101                     filesystem::copy_file(pathSrc, pathDest, filesystem::copy_option::overwrite_if_exists);
1102 #else
1103                     filesystem::copy_file(pathSrc, pathDest);
1104 #endif
1105                     printf("copied wallet.dat to %s\n", pathDest.string().c_str());
1106                     return true;
1107                 } catch(const filesystem::filesystem_error &e) {
1108                     printf("error copying wallet.dat to %s - %s\n", pathDest.string().c_str(), e.what());
1109                     return false;
1110                 }
1111             }
1112         }
1113         Sleep(100);
1114     }
1115     return false;
1116 }