version 0.2.8
[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 board list inserts/requests - 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 tblBoardListInserts WHERE Day<'"+date.Format("%Y-%m-%d")+"';");\r
162         m_db->Execute("DELETE FROM tblBoardListRequests WHERE Day<'"+date.Format("%Y-%m-%d")+"';");\r
163 \r
164         // delete old local identity inserts - we don't need them anymore\r
165         date.SetToGMTime();\r
166         date.Add(0,0,0,-2);\r
167         m_db->Execute("DELETE FROM tblLocalIdentityInserts WHERE Day<'"+date.Format("%Y-%m-%d")+"';");\r
168 \r
169         // delete old message 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 tblMessageListInserts WHERE Day<'"+date.Format("%Y-%m-%d")+"';");\r
173         m_db->Execute("DELETE FROM tblMessageListRequests WHERE Day<'"+date.Format("%Y-%m-%d")+"';");\r
174 \r
175         // delete old trust list inserts/requests - we don't need them anymore\r
176         date.SetToGMTime();\r
177         date.Add(0,0,0,-2);\r
178         m_db->Execute("DELETE FROM tblTrustListInserts WHERE Day<'"+date.Format("%Y-%m-%d")+"';");\r
179         m_db->Execute("DELETE FROM tblTrustListRequests WHERE Day<'"+date.Format("%Y-%m-%d")+"';");\r
180 \r
181         // delete trust lists from identities we aren't trusting anymore\r
182         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
183 \r
184         // remove identityid from messages where the identity has been deleted\r
185         m_db->Execute("UPDATE tblMessage SET IdentityID=NULL WHERE IdentityID NOT IN (SELECT IdentityID FROM tblIdentity);");\r
186 \r
187         // try to re-attach messages from identities that were previously deleted, but have been since re-added\r
188         // first get the names from messages that have a NULL IdentityID\r
189         SQLite3DB::Statement st=m_db->Prepare("SELECT FromName FROM tblMessage WHERE IdentityID IS NULL GROUP BY FromName;");\r
190         st.Step();\r
191         while(st.RowReturned())\r
192         {\r
193                 std::string name="";\r
194                 std::string publickey="";\r
195                 int identityid=0;\r
196                 st.ResultText(0,name);\r
197 \r
198                 std::vector<std::string> parts;\r
199                 StringFunctions::Split(name,"@",parts);\r
200 \r
201                 // find identities with this name\r
202                 SQLite3DB::Statement st2=m_db->Prepare("SELECT IdentityID,PublicKey FROM tblIdentity WHERE Name=?;");\r
203                 st2.Bind(0,name);\r
204                 st2.Step();\r
205                 while(st2.RowReturned())\r
206                 {\r
207                         publickey="";\r
208                         identityid=0;\r
209                         st2.ResultText(1,publickey);\r
210                         // check if public key matches 2nd part\r
211                         if(parts.size()>1 && publickey.find(parts[1])==4)\r
212                         {\r
213                                 // we have the identity - so update the messages table with the identityid\r
214                                 st2.ResultInt(0,identityid);\r
215 \r
216                                 SQLite3DB::Statement st3=m_db->Prepare("UPDATE tblMessage SET IdentityID=? WHERE Name=? AND IdentityID IS NULL;");\r
217                                 st3.Bind(0,identityid);\r
218                                 st3.Bind(1,name);\r
219                                 st3.Step();\r
220                         }\r
221                         st2.Step();\r
222                 }\r
223 \r
224                 st.Step();\r
225         }\r
226 \r
227         // delete single use identities that are older than 7 days\r
228         date.SetToGMTime();\r
229         date.Add(0,0,0,-7);\r
230         st=m_db->Prepare("DELETE FROM tblIdentity WHERE SingleUse='true' AND DateAdded<?;");\r
231         st.Bind(0,date.Format("%Y-%m-%d %H:%M:%S"));\r
232         st.Step();\r
233 \r
234         // delete local single use identities that are older than 7 days\r
235         date.SetToGMTime();\r
236         date.Add(0,0,0,-7);\r
237         st=m_db->Prepare("DELETE FROM tblLocalIdentity WHERE SingleUse='true' AND DateCreated<?;");\r
238         st.Bind(0,date.Format("%Y-%m-%d %H:%M:%S"));\r
239         st.Step();\r
240 \r
241         // delete old messages\r
242         date.SetToGMTime();\r
243         date.Add(0,0,0,-m_deletemessagesolderthan);\r
244         st=m_db->Prepare("DELETE FROM tblMessage WHERE MessageDate<?;");\r
245         st.Bind(0,date.Format("%Y-%m-%d"));\r
246         st.Step();\r
247 \r
248         // delete tblIdentityTrust for local identities and identities that have been deleted\r
249         m_db->Execute("DELETE FROM tblIdentityTrust WHERE LocalIdentityID NOT IN (SELECT LocalIdentityID FROM tblLocalIdentity);");\r
250         m_db->Execute("DELETE FROM tblIdentityTrust WHERE IdentityID NOT IN (SELECT IdentityID FROM tblIdentity);");\r
251 \r
252 }\r
253 \r
254 void PeriodicDBMaintenance::Process()\r
255 {\r
256         DateTime now;\r
257         now.SetToGMTime();\r
258         \r
259         if(m_check10mins<=(now-((1.0/1440.0)*10.0)))\r
260         {\r
261                 Do10MinuteMaintenance();\r
262                 m_check10mins=now;\r
263         }\r
264         if(m_check30mins<=(now-((1.0/1440.0)*30.0)))\r
265         {\r
266                 Do30MinuteMaintenance();\r
267                 m_check30mins=now;\r
268         }\r
269         if(m_check1hour<=(now-(1.0/24.0)))\r
270         {\r
271                 Do1HourMaintenance();\r
272                 m_check1hour=now;\r
273         }\r
274         if(m_check6hours<=(now-(1.0/4.0)))\r
275         {\r
276                 Do6HourMaintenance();\r
277                 m_check6hours=now;\r
278         }\r
279         if(m_check1day<=(now-(1.0)))\r
280         {\r
281                 Do1DayMaintenance();\r
282                 m_check1day=now;\r
283         }\r
284 \r
285 }\r
286 \r
287 void PeriodicDBMaintenance::RegisterWithThread(FreenetMasterThread *thread)\r
288 {\r
289         thread->RegisterPeriodicProcessor(this);\r
290 }\r