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