version 0.2.4
[fms.git] / src / freenet / periodicdbmaintenance.cpp
1 #include "../../include/freenet/periodicdbmaintenance.h"\r
2 #include "../../include/stringfunctions.h"\r
3 #include "../../include/option.h"\r
4 \r
5 #ifdef XMEM\r
6         #include <xmem.h>\r
7 #endif\r
8 \r
9 PeriodicDBMaintenance::PeriodicDBMaintenance()\r
10 {\r
11         std::string tempval;\r
12 \r
13         m_check10mins.SetToGMTime();\r
14         m_check30mins.SetToGMTime();\r
15         m_check1hour.SetToGMTime();\r
16         m_check6hours.SetToGMTime();\r
17         m_check1day.SetToGMTime();\r
18 \r
19         // set back times so they will do their first maintenance soon ( within the next hour ) - stagger so not all run at once\r
20         m_check30mins.Add(0,-5);\r
21         m_check1hour.Add(0,-42);\r
22         m_check6hours.Add(0,-1,-5);\r
23         m_check1day.Add(0,0,-23);\r
24 \r
25         tempval="180";\r
26         Option::Instance()->Get("DeleteMessagesOlderThan",tempval);\r
27         StringFunctions::Convert(tempval,m_deletemessagesolderthan);\r
28 \r
29 }\r
30 \r
31 void PeriodicDBMaintenance::Do10MinuteMaintenance()\r
32 {\r
33 \r
34         m_log->WriteLog(LogFile::LOGLEVEL_DEBUG,"PeriodicDBMaintenance::Do10MinuteMaintenance");\r
35 }\r
36 \r
37 void PeriodicDBMaintenance::Do30MinuteMaintenance()\r
38 {\r
39 \r
40         m_log->WriteLog(LogFile::LOGLEVEL_DEBUG,"PeriodicDBMaintenance::Do30MinuteMaintenance");\r
41 }\r
42 \r
43 void PeriodicDBMaintenance::Do1HourMaintenance()\r
44 {\r
45         // recalculate all trust levels - this is CPU instensive\r
46         // do 1 identity at a time as doing it with 1 UPDATE statement locks that database for the duration\r
47         SQLite3DB::Statement st=m_db->Prepare("SELECT TargetIdentityID,PeerMessageTrust,PeerTrustListTrust FROM vwCalculatedPeerTrust;");\r
48         SQLite3DB::Statement upd=m_db->Prepare("UPDATE tblIdentity SET PeerMessageTrust=?, PeerTrustListTrust=? WHERE IdentityID=?");\r
49         st.Step();\r
50         while(st.RowReturned())\r
51         {\r
52                 int identityid=0;\r
53                 int trust=0;\r
54                 \r
55                 st.ResultInt(0,identityid);\r
56 \r
57                 upd.Bind(0,identityid);\r
58                 if(st.ResultNull(1)==false)\r
59                 {\r
60                         trust=0;\r
61                         st.ResultInt(1,trust);\r
62                         upd.Bind(0,trust);\r
63                 }\r
64                 else\r
65                 {\r
66                         upd.Bind(0);\r
67                 }\r
68                 if(st.ResultNull(2)==false)\r
69                 {\r
70                         trust=0;\r
71                         st.ResultInt(2,trust);\r
72                         upd.Bind(1,trust);\r
73                 }\r
74                 else\r
75                 {\r
76                         upd.Bind(1);\r
77                 }\r
78                 upd.Bind(2,identityid);\r
79                 upd.Step();\r
80                 upd.Reset();\r
81 \r
82                 st.Step();\r
83         }\r
84 \r
85         // set null peer trust for identities without a calculated trust\r
86         st=m_db->Prepare("SELECT IdentityID FROM tblIdentity WHERE IdentityID NOT IN (SELECT TargetIdentityID FROM vwCalculatedPeerTrust);");\r
87         upd=m_db->Prepare("UPDATE tblIdentity SET PeerMessageTrust=NULL, PeerTrustListTrust=NULL WHERE IdentityID=?;");\r
88         st.Step();\r
89         while(st.RowReturned())\r
90         {\r
91                 int identityid=0;\r
92                 st.ResultInt(0,identityid);\r
93                 upd.Bind(0,identityid);\r
94                 upd.Step();\r
95                 upd.Reset();\r
96                 st.Step();\r
97         }\r
98 \r
99         m_log->WriteLog(LogFile::LOGLEVEL_DEBUG,"PeriodicDBMaintenance::Do1HourMaintenance");\r
100 }\r
101 \r
102 void PeriodicDBMaintenance::Do6HourMaintenance()\r
103 {\r
104 \r
105         // if we remove a board and the reply boardid is still set to it, we need to replace it with a boardid that does exist\r
106         SQLite3DB::Statement st=m_db->Prepare("SELECT MessageID FROM tblMessage WHERE ReplyBoardID NOT IN (SELECT BoardID FROM tblBoard);");\r
107         SQLite3DB::Statement st2=m_db->Prepare("SELECT BoardID FROM tblMessageBoard WHERE MessageID=?;");\r
108         SQLite3DB::Statement upd=m_db->Prepare("UPDATE tblMessage SET ReplyBoardID=? WHERE MessageID=?;");\r
109         st.Step();\r
110         while(st.RowReturned())\r
111         {\r
112                 // find a valid boardid for the message\r
113                 int messageid=0;\r
114                 int boardid=0;\r
115 \r
116                 st.ResultInt(0,messageid);\r
117 \r
118                 st2.Bind(0,messageid);\r
119                 st2.Step();\r
120                 if(st2.RowReturned())\r
121                 {\r
122                         st2.ResultInt(0,boardid);\r
123                         upd.Bind(0,boardid);\r
124                         upd.Bind(1,messageid);\r
125                         upd.Step();\r
126                         upd.Reset();\r
127                 }\r
128                 st2.Reset();\r
129                 \r
130                 st.Step();\r
131         }\r
132 \r
133         m_log->WriteLog(LogFile::LOGLEVEL_DEBUG,"PeriodicDBMaintenance::Do6HourMaintenance");\r
134 }\r
135 \r
136 void PeriodicDBMaintenance::Do1DayMaintenance()\r
137 {\r
138         DateTime date;\r
139 \r
140         // delete all puzzles 2 or more days old\r
141         date.SetToGMTime();\r
142         date.Add(0,0,0,-2);\r
143         m_db->Execute("DELETE FROM tblIntroductionPuzzleInserts WHERE Day<='"+date.Format("%Y-%m-%d")+"';");\r
144         m_db->Execute("DELETE FROM tblIntroductionPuzzleRequests WHERE Day<='"+date.Format("%Y-%m-%d")+"';");\r
145 \r
146         m_log->WriteLog(LogFile::LOGLEVEL_DEBUG,"PeriodicDBMaintenance::Do1DayMaintenance");\r
147 \r
148         // delete all identities we've never seen and were added more than 20 days ago\r
149         date.SetToGMTime();\r
150         date.Add(0,0,0,-20);\r
151         m_db->Execute("DELETE FROM tblIdentity WHERE LastSeen IS NULL AND DateAdded<'"+date.Format("%Y-%m-%d")+"';");\r
152 \r
153         // delete old identity requests - we don't need them anymore\r
154         date.SetToGMTime();\r
155         date.Add(0,0,0,-2);\r
156         m_db->Execute("DELETE FROM tblIdentityRequests WHERE Day<'"+date.Format("%Y-%m-%d")+"';");\r
157 \r
158         // delete old local identity inserts - we don't need them anymore\r
159         date.SetToGMTime();\r
160         date.Add(0,0,0,-2);\r
161         m_db->Execute("DELETE FROM tblLocalIdentityInserts WHERE Day<'"+date.Format("%Y-%m-%d")+"';");\r
162 \r
163         // delete old message list inserts/requests - we don't need them anymore\r
164         date.SetToGMTime();\r
165         date.Add(0,0,0,-2);\r
166         m_db->Execute("DELETE FROM tblMessageListInserts WHERE Day<'"+date.Format("%Y-%m-%d")+"';");\r
167         m_db->Execute("DELETE FROM tblMessageListRequests WHERE Day<'"+date.Format("%Y-%m-%d")+"';");\r
168 \r
169         // delete old trust list inserts/requests - we don't need them anymore\r
170         date.SetToGMTime();\r
171         date.Add(0,0,0,-2);\r
172         m_db->Execute("DELETE FROM tblTrustListInserts WHERE Day<'"+date.Format("%Y-%m-%d")+"';");\r
173         m_db->Execute("DELETE FROM tblTrustListRequests WHERE Day<'"+date.Format("%Y-%m-%d")+"';");\r
174 \r
175         // delete trust lists from identities we aren't trusting anymore\r
176         m_db->Execute("DELETE FROM tblPeerTrust WHERE IdentityID NOT IN (SELECT IdentityID FROM tblIdentity WHERE (LocalTrustListTrust>=(SELECT OptionValue FROM tblOption WHERE Option='MinLocalTrustListTrust')) AND (PeerTrustListTrust IS NULL OR PeerTrustListTrust>=(SELECT OptionValue FROM tblOption WHERE Option='MinPeerTrustListTrust')));");\r
177 \r
178         // remove identityid from messages where the identity has been deleted\r
179         m_db->Execute("UPDATE tblMessage SET IdentityID=NULL WHERE IdentityID NOT IN (SELECT IdentityID FROM tblIdentity);");\r
180 \r
181         // try to re-attach messages from identities that were previously deleted, but have been since re-added\r
182         // first get the names from messages that have a NULL IdentityID\r
183         SQLite3DB::Statement st=m_db->Prepare("SELECT FromName FROM tblMessage WHERE IdentityID IS NULL GROUP BY FromName;");\r
184         st.Step();\r
185         while(st.RowReturned())\r
186         {\r
187                 std::string name="";\r
188                 std::string publickey="";\r
189                 int identityid=0;\r
190                 st.ResultText(0,name);\r
191 \r
192                 std::vector<std::string> parts;\r
193                 StringFunctions::Split(name,"@",parts);\r
194 \r
195                 // find identities with this name\r
196                 SQLite3DB::Statement st2=m_db->Prepare("SELECT IdentityID,PublicKey FROM tblIdentity WHERE Name=?;");\r
197                 st2.Bind(0,name);\r
198                 st2.Step();\r
199                 while(st2.RowReturned())\r
200                 {\r
201                         publickey="";\r
202                         identityid=0;\r
203                         st2.ResultText(1,publickey);\r
204                         // check if public key matches 2nd part\r
205                         if(parts.size()>1 && publickey.find(parts[1])==4)\r
206                         {\r
207                                 // we have the identity - so update the messages table with the identityid\r
208                                 st2.ResultInt(0,identityid);\r
209 \r
210                                 SQLite3DB::Statement st3=m_db->Prepare("UPDATE tblMessage SET IdentityID=? WHERE Name=? AND IdentityID IS NULL;");\r
211                                 st3.Bind(0,identityid);\r
212                                 st3.Bind(1,name);\r
213                                 st3.Step();\r
214                         }\r
215                         st2.Step();\r
216                 }\r
217 \r
218                 st.Step();\r
219         }\r
220 \r
221         // delete single use identities that are older than 7 days\r
222         date.SetToGMTime();\r
223         date.Add(0,0,0,-7);\r
224         st=m_db->Prepare("DELETE FROM tblIdentity WHERE SingleUse='true' AND DateAdded<?;");\r
225         st.Bind(0,date.Format("%Y-%m-%d %H:%M:%S"));\r
226         st.Step();\r
227 \r
228         // delete local single use identities that are older than 7 days\r
229         date.SetToGMTime();\r
230         date.Add(0,0,0,-7);\r
231         st=m_db->Prepare("DELETE FROM tblLocalIdentity WHERE SingleUse='true' AND DateCreated<?;");\r
232         st.Bind(0,date.Format("%Y-%m-%d %H:%M:%S"));\r
233         st.Step();\r
234 \r
235         // delete old messages\r
236         date.SetToGMTime();\r
237         date.Add(0,0,0,-m_deletemessagesolderthan);\r
238         st=m_db->Prepare("DELETE FROM tblMessage WHERE MessageDate<?;");\r
239         st.Bind(0,date.Format("%Y-%m-%d"));\r
240         st.Step();\r
241 \r
242 }\r
243 \r
244 void PeriodicDBMaintenance::Process()\r
245 {\r
246         DateTime now;\r
247         now.SetToGMTime();\r
248         \r
249         if(m_check10mins<=(now-((1.0/1440.0)*10.0)))\r
250         {\r
251                 Do10MinuteMaintenance();\r
252                 m_check10mins=now;\r
253         }\r
254         if(m_check30mins<=(now-((1.0/1440.0)*30.0)))\r
255         {\r
256                 Do30MinuteMaintenance();\r
257                 m_check30mins=now;\r
258         }\r
259         if(m_check1hour<=(now-(1.0/24.0)))\r
260         {\r
261                 Do1HourMaintenance();\r
262                 m_check1hour=now;\r
263         }\r
264         if(m_check6hours<=(now-(1.0/4.0)))\r
265         {\r
266                 Do6HourMaintenance();\r
267                 m_check6hours=now;\r
268         }\r
269         if(m_check1day<=(now-(1.0)))\r
270         {\r
271                 Do1DayMaintenance();\r
272                 m_check1day=now;\r
273         }\r
274 \r
275 }\r
276 \r
277 void PeriodicDBMaintenance::RegisterWithThread(FreenetMasterThread *thread)\r
278 {\r
279         thread->RegisterPeriodicProcessor(this);\r
280 }\r