]> git.wh0rd.org - tt-rss.git/blob - include/rssfuncs.php
fetch: better checking for 1970- date
[tt-rss.git] / include / rssfuncs.php
1 <?php
2 define_default('DAEMON_UPDATE_LOGIN_LIMIT', 30);
3 define_default('DAEMON_FEED_LIMIT', 500);
4 define_default('DAEMON_SLEEP_INTERVAL', 120);
5
6 function update_feedbrowser_cache() {
7
8 $result = db_query("SELECT feed_url, site_url, title, COUNT(id) AS subscribers
9 FROM ttrss_feeds WHERE (SELECT COUNT(id) = 0 FROM ttrss_feeds AS tf
10 WHERE tf.feed_url = ttrss_feeds.feed_url
11 AND (private IS true OR auth_login != '' OR auth_pass != '' OR feed_url LIKE '%:%@%/%'))
12 GROUP BY feed_url, site_url, title ORDER BY subscribers DESC LIMIT 1000");
13
14 db_query("BEGIN");
15
16 db_query("DELETE FROM ttrss_feedbrowser_cache");
17
18 $count = 0;
19
20 while ($line = db_fetch_assoc($result)) {
21 $subscribers = db_escape_string($line["subscribers"]);
22 $feed_url = db_escape_string($line["feed_url"]);
23 $title = db_escape_string($line["title"]);
24 $site_url = db_escape_string($line["site_url"]);
25
26 $tmp_result = db_query("SELECT subscribers FROM
27 ttrss_feedbrowser_cache WHERE feed_url = '$feed_url'");
28
29 if (db_num_rows($tmp_result) == 0) {
30
31 db_query("INSERT INTO ttrss_feedbrowser_cache
32 (feed_url, site_url, title, subscribers) VALUES ('$feed_url',
33 '$site_url', '$title', '$subscribers')");
34
35 ++$count;
36
37 }
38
39 }
40
41 db_query("COMMIT");
42
43 return $count;
44
45 }
46
47
48 /**
49 * Update a feed batch.
50 * Used by daemons to update n feeds by run.
51 * Only update feed needing a update, and not being processed
52 * by another process.
53 *
54 * @param mixed $link Database link
55 * @param integer $limit Maximum number of feeds in update batch. Default to DAEMON_FEED_LIMIT.
56 * @param boolean $from_http Set to true if you call this function from http to disable cli specific code.
57 * @param boolean $debug Set to false to disable debug output. Default to true.
58 * @return void
59 */
60 function update_daemon_common($limit = DAEMON_FEED_LIMIT, $from_http = false, $debug = true) {
61 // Process all other feeds using last_updated and interval parameters
62
63 $schema_version = get_schema_version();
64
65 if ($schema_version != SCHEMA_VERSION) {
66 die("Schema version is wrong, please upgrade the database.\n");
67 }
68
69 define('PREFS_NO_CACHE', true);
70
71 // Test if the user has loggued in recently. If not, it does not update its feeds.
72 if (!SINGLE_USER_MODE && DAEMON_UPDATE_LOGIN_LIMIT > 0) {
73 if (DB_TYPE == "pgsql") {
74 $login_thresh_qpart = "AND ttrss_users.last_login >= NOW() - INTERVAL '".DAEMON_UPDATE_LOGIN_LIMIT." days'";
75 } else {
76 $login_thresh_qpart = "AND ttrss_users.last_login >= DATE_SUB(NOW(), INTERVAL ".DAEMON_UPDATE_LOGIN_LIMIT." DAY)";
77 }
78 } else {
79 $login_thresh_qpart = "";
80 }
81
82 // Test if the feed need a update (update interval exceded).
83 if (DB_TYPE == "pgsql") {
84 $update_limit_qpart = "AND ((
85 ttrss_feeds.update_interval = 0
86 AND ttrss_user_prefs.value != '-1'
87 AND ttrss_feeds.last_updated < NOW() - CAST((ttrss_user_prefs.value || ' minutes') AS INTERVAL)
88 ) OR (
89 ttrss_feeds.update_interval > 0
90 AND ttrss_feeds.last_updated < NOW() - CAST((ttrss_feeds.update_interval || ' minutes') AS INTERVAL)
91 ) OR ttrss_feeds.last_updated IS NULL
92 OR last_updated = '1970-01-01 00:00:00')";
93 } else {
94 $update_limit_qpart = "AND ((
95 ttrss_feeds.update_interval = 0
96 AND ttrss_user_prefs.value != '-1'
97 AND ttrss_feeds.last_updated < DATE_SUB(NOW(), INTERVAL CONVERT(ttrss_user_prefs.value, SIGNED INTEGER) MINUTE)
98 ) OR (
99 ttrss_feeds.update_interval > 0
100 AND ttrss_feeds.last_updated < DATE_SUB(NOW(), INTERVAL ttrss_feeds.update_interval MINUTE)
101 ) OR ttrss_feeds.last_updated IS NULL
102 OR last_updated = '1970-01-01 00:00:00')";
103 }
104
105 // Test if feed is currently being updated by another process.
106 if (DB_TYPE == "pgsql") {
107 $updstart_thresh_qpart = "AND (ttrss_feeds.last_update_started IS NULL OR ttrss_feeds.last_update_started < NOW() - INTERVAL '10 minutes')";
108 } else {
109 $updstart_thresh_qpart = "AND (ttrss_feeds.last_update_started IS NULL OR ttrss_feeds.last_update_started < DATE_SUB(NOW(), INTERVAL 10 MINUTE))";
110 }
111
112 // Test if there is a limit to number of updated feeds
113 $query_limit = "";
114 if($limit) $query_limit = sprintf("LIMIT %d", $limit);
115
116 $query = "SELECT DISTINCT ttrss_feeds.feed_url, ttrss_feeds.last_updated
117 FROM
118 ttrss_feeds, ttrss_users, ttrss_user_prefs
119 WHERE
120 ttrss_feeds.owner_uid = ttrss_users.id
121 AND ttrss_users.id = ttrss_user_prefs.owner_uid
122 AND ttrss_user_prefs.pref_name = 'DEFAULT_UPDATE_INTERVAL'
123 $login_thresh_qpart $update_limit_qpart
124 $updstart_thresh_qpart
125 ORDER BY last_updated $query_limit";
126
127 // We search for feed needing update.
128 $result = db_query($query);
129
130 if($debug) _debug(sprintf("Scheduled %d feeds to update...", db_num_rows($result)));
131
132 // Here is a little cache magic in order to minimize risk of double feed updates.
133 $feeds_to_update = array();
134 while ($line = db_fetch_assoc($result)) {
135 array_push($feeds_to_update, db_escape_string($line['feed_url']));
136 }
137
138 // We update the feed last update started date before anything else.
139 // There is no lag due to feed contents downloads
140 // It prevent an other process to update the same feed.
141
142 if(count($feeds_to_update) > 0) {
143 $feeds_quoted = array();
144
145 foreach ($feeds_to_update as $feed) {
146 array_push($feeds_quoted, "'" . db_escape_string($feed) . "'");
147 }
148
149 db_query(sprintf("UPDATE ttrss_feeds SET last_update_started = NOW()
150 WHERE feed_url IN (%s)", implode(',', $feeds_quoted)));
151 }
152
153 $nf = 0;
154
155 // For each feed, we call the feed update function.
156 foreach ($feeds_to_update as $feed) {
157 if($debug) _debug("Base feed: $feed");
158
159 //update_rss_feed($line["id"], true);
160
161 // since we have the data cached, we can deal with other feeds with the same url
162
163 $tmp_result = db_query("SELECT DISTINCT ttrss_feeds.id,last_updated
164 FROM ttrss_feeds, ttrss_users, ttrss_user_prefs WHERE
165 ttrss_user_prefs.owner_uid = ttrss_feeds.owner_uid AND
166 ttrss_users.id = ttrss_user_prefs.owner_uid AND
167 ttrss_user_prefs.pref_name = 'DEFAULT_UPDATE_INTERVAL' AND
168 feed_url = '".db_escape_string($feed)."' AND
169 (ttrss_feeds.update_interval > 0 OR
170 ttrss_user_prefs.value != '-1')
171 $login_thresh_qpart
172 ORDER BY ttrss_feeds.id $query_limit");
173
174 if (db_num_rows($tmp_result) > 0) {
175 while ($tline = db_fetch_assoc($tmp_result)) {
176 if($debug) _debug(" => " . $tline["last_updated"] . ", " . $tline["id"]);
177 update_rss_feed($tline["id"], true);
178 ++$nf;
179 }
180 }
181 }
182
183 require_once "digest.php";
184
185 // Send feed digests by email if needed.
186 send_headlines_digests($debug);
187
188 return $nf;
189
190 } // function update_daemon_common
191
192 // ignore_daemon is not used
193 function update_rss_feed($feed, $ignore_daemon = false, $no_cache = false,
194 $override_url = false) {
195
196 require_once "lib/simplepie/simplepie.inc";
197
198 $debug_enabled = defined('DAEMON_EXTENDED_DEBUG') || $_REQUEST['xdebug'];
199
200 _debug("start", $debug_enabled);
201
202 $result = db_query("SELECT id,update_interval,auth_login,
203 feed_url,auth_pass,cache_images,last_updated,
204 mark_unread_on_update, owner_uid,
205 pubsub_state, auth_pass_encrypted
206 FROM ttrss_feeds WHERE id = '$feed'");
207
208 if (db_num_rows($result) == 0) {
209 _debug("feed $feed NOT FOUND/SKIPPED", $debug_enabled);
210 return false;
211 }
212
213 $last_updated = db_fetch_result($result, 0, "last_updated");
214 $owner_uid = db_fetch_result($result, 0, "owner_uid");
215 $mark_unread_on_update = sql_bool_to_bool(db_fetch_result($result,
216 0, "mark_unread_on_update"));
217 $pubsub_state = db_fetch_result($result, 0, "pubsub_state");
218 $auth_pass_encrypted = sql_bool_to_bool(db_fetch_result($result,
219 0, "auth_pass_encrypted"));
220
221 db_query("UPDATE ttrss_feeds SET last_update_started = NOW()
222 WHERE id = '$feed'");
223
224 $auth_login = db_fetch_result($result, 0, "auth_login");
225 $auth_pass = db_fetch_result($result, 0, "auth_pass");
226
227 if ($auth_pass_encrypted) {
228 require_once "crypt.php";
229 $auth_pass = decrypt_string($auth_pass);
230 }
231
232 $cache_images = sql_bool_to_bool(db_fetch_result($result, 0, "cache_images"));
233 $fetch_url = db_fetch_result($result, 0, "feed_url");
234
235 $feed = db_escape_string($feed);
236
237 if ($override_url) $fetch_url = $override_url;
238
239 $date_feed_processed = date('Y-m-d H:i');
240
241 $cache_filename = CACHE_DIR . "/simplepie/" . sha1($fetch_url) . ".feed";
242
243 // Ignore cache if new feed or manual update.
244 $cache_age = ($no_cache || is_null($last_updated) || strpos($last_updated, '1970-01-01') === 0) ? 30 : get_feed_update_interval($feed) * 60;
245
246 _debug("cache filename: $cache_filename exists: " . file_exists($cache_filename), $debug_enabled);
247 _debug("cache age: $cache_age; no cache: $no_cache", $debug_enabled);
248
249 $cached_feed_data_hash = false;
250
251 $rss = false;
252 $rss_hash = false;
253 $cache_timestamp = file_exists($cache_filename) ? filemtime($cache_filename) : 0;
254 $last_updated_timestamp = strtotime($last_updated);
255
256 $force_refetch = isset($_REQUEST["force_refetch"]);
257
258 if (file_exists($cache_filename) &&
259 is_readable($cache_filename) &&
260 !$auth_login && !$auth_pass &&
261 filemtime($cache_filename) > time() - $cache_age) {
262
263 _debug("using local cache.", $debug_enabled);
264
265 if ($cache_timestamp > $last_updated_timestamp) {
266 @$rss_data = file_get_contents($cache_filename);
267
268 if ($rss_data) {
269 $rss_hash = sha1($rss_data);
270 @$rss = unserialize($rss_data);
271 }
272 } else if (!$force_refetch) {
273 _debug("local cache valid and older than last_updated, nothing to do.", $debug_enabled);
274 return;
275 }
276 } else {
277 _debug("local cache will not be used for this feed", $debug_enabled);
278 $cache_timestamp = 0;
279 }
280
281 if (!$rss) {
282
283 if (!$feed_data) {
284 _debug("fetching [$fetch_url] (ts: $cache_timestamp/$last_updated_timestamp)", $debug_enabled);
285
286 $feed_data = fetch_file_contents($fetch_url, false,
287 $auth_login, $auth_pass, false,
288 $no_cache ? FEED_FETCH_NO_CACHE_TIMEOUT : FEED_FETCH_TIMEOUT,
289 $force_refetch ? 0 : max($last_updated_timestamp, $cache_timestamp));
290
291 global $fetch_curl_used;
292
293 if (!$fetch_curl_used) {
294 $tmp = @gzdecode($feed_data);
295
296 if ($tmp) $feed_data = $tmp;
297 }
298
299 $feed_data = trim($feed_data);
300
301 _debug("fetch done.", $debug_enabled);
302
303 if ($feed_data) {
304 $error = verify_feed_xml($feed_data);
305
306 if ($error) {
307 _debug("error verifying XML, code: " . $error->code, $debug_enabled);
308
309 if ($error->code == 26) {
310 _debug("got error 26, trying to decode entities...", $debug_enabled);
311
312 $feed_data = html_entity_decode($feed_data, ENT_COMPAT, 'UTF-8');
313
314 $error = verify_feed_xml($feed_data);
315
316 if ($error) $feed_data = '';
317 }
318 }
319 }
320 }
321
322 if (!$feed_data) {
323 global $fetch_last_error;
324 global $fetch_last_error_code;
325
326 _debug("unable to fetch: $fetch_last_error [$fetch_last_error_code]", $debug_enabled);
327
328 $error_escaped = '';
329
330 // If-Modified-Since
331 if ($fetch_last_error_code != 304) {
332 $error_escaped = db_escape_string($fetch_last_error);
333 } else {
334 _debug("source claims data not modified, nothing to do.", $debug_enabled);
335 }
336
337 db_query(
338 "UPDATE ttrss_feeds SET last_error = '$error_escaped',
339 last_updated = NOW() WHERE id = '$feed'");
340
341 return;
342 }
343 }
344
345 $pluginhost = new PluginHost();
346 $pluginhost->set_debug($debug_enabled, $debug_enabled);
347 $user_plugins = get_pref("_ENABLED_PLUGINS", $owner_uid);
348
349 $pluginhost->load(PLUGINS, PluginHost::KIND_ALL);
350 $pluginhost->load($user_plugins, PluginHost::KIND_USER, $owner_uid);
351 $pluginhost->load_data();
352
353 foreach ($pluginhost->get_hooks(PluginHost::HOOK_FEED_FETCHED) as $plugin) {
354 $feed_data = $plugin->hook_feed_fetched($feed_data);
355 }
356
357 if (!$rss) {
358 $rss = new SimplePie();
359 $rss->set_sanitize_class("SanitizeDummy");
360 // simplepie ignores the above and creates default sanitizer anyway,
361 // so let's override it...
362 $rss->sanitize = new SanitizeDummy();
363 $rss->set_output_encoding('UTF-8');
364 $rss->set_raw_data($feed_data);
365 $rss->enable_cache(false);
366
367 @$rss->init();
368 }
369
370 // print_r($rss);
371
372 $feed = db_escape_string($feed);
373
374 if (!$rss->error()) {
375
376 // cache data for later
377 if (!$auth_pass && !$auth_login && is_writable(CACHE_DIR . "/simplepie")) {
378 $rss_data = serialize($rss);
379 $new_rss_hash = sha1($rss_data);
380
381 if ($new_rss_hash != $rss_hash) {
382 _debug("saving $cache_filename", $debug_enabled);
383 @file_put_contents($cache_filename, serialize($rss));
384 }
385 }
386
387 // We use local pluginhost here because we need to load different per-user feed plugins
388 $pluginhost->run_hooks(PluginHost::HOOK_FEED_PARSED, "hook_feed_parsed", $rss);
389
390 _debug("processing feed data...", $debug_enabled);
391
392 // db_query("BEGIN");
393
394 if (DB_TYPE == "pgsql") {
395 $favicon_interval_qpart = "favicon_last_checked < NOW() - INTERVAL '12 hour'";
396 } else {
397 $favicon_interval_qpart = "favicon_last_checked < DATE_SUB(NOW(), INTERVAL 12 HOUR)";
398 }
399
400 $result = db_query("SELECT title,site_url,owner_uid,favicon_avg_color,
401 (favicon_last_checked IS NULL OR $favicon_interval_qpart) AS
402 favicon_needs_check
403 FROM ttrss_feeds WHERE id = '$feed'");
404
405 $registered_title = db_fetch_result($result, 0, "title");
406 $orig_site_url = db_fetch_result($result, 0, "site_url");
407 $favicon_needs_check = sql_bool_to_bool(db_fetch_result($result, 0,
408 "favicon_needs_check"));
409 $favicon_avg_color = db_fetch_result($result, 0, "favicon_avg_color");
410
411 $owner_uid = db_fetch_result($result, 0, "owner_uid");
412
413 $site_url = db_escape_string(mb_substr(rewrite_relative_url($fetch_url, $rss->get_link()), 0, 245));
414
415 if ($favicon_needs_check || $force_refetch) {
416
417 /* terrible hack: if we crash on floicon shit here, we won't check
418 * the icon avgcolor again (unless the icon got updated) */
419
420 $favicon_file = ICONS_DIR . "/$feed.ico";
421 $favicon_modified = @filemtime($favicon_file);
422
423 _debug("checking favicon...", $debug_enabled);
424
425 check_feed_favicon($site_url, $feed, $link);
426 $favicon_modified_new = @filemtime($favicon_file);
427
428 if ($favicon_modified_new > $favicon_modified)
429 $favicon_avg_color = '';
430
431 if (file_exists($favicon_file) && function_exists("imagecreatefromstring") && $favicon_avg_color == '') {
432 require_once "colors.php";
433
434 db_query("UPDATE ttrss_feeds SET favicon_avg_color = 'fail' WHERE
435 id = '$feed'");
436
437 $favicon_color = db_escape_string(
438 calculate_avg_color($favicon_file));
439
440 $favicon_colorstring = ",favicon_avg_color = '".$favicon_color."'";
441 } else if ($favicon_avg_color == 'fail') {
442 _debug("floicon failed on this file, not trying to recalculate avg color", $debug_enabled);
443 }
444
445 db_query("UPDATE ttrss_feeds SET favicon_last_checked = NOW()
446 $favicon_colorstring
447 WHERE id = '$feed'");
448 }
449
450 if (!$registered_title || $registered_title == "[Unknown]") {
451
452 $feed_title = db_escape_string($rss->get_title());
453
454 _debug("registering title: $feed_title", $debug_enabled);
455
456 db_query("UPDATE ttrss_feeds SET
457 title = '$feed_title' WHERE id = '$feed'");
458 }
459
460 if ($site_url && $orig_site_url != $site_url) {
461 db_query("UPDATE ttrss_feeds SET
462 site_url = '$site_url' WHERE id = '$feed'");
463 }
464
465 _debug("loading filters & labels...", $debug_enabled);
466
467 $filters = load_filters($feed, $owner_uid);
468 $labels = get_all_labels($owner_uid);
469
470 _debug("" . count($filters) . " filters loaded.", $debug_enabled);
471
472 $items = $rss->get_items();
473
474 if (!is_array($items)) {
475 _debug("no articles found.", $debug_enabled);
476
477 db_query("UPDATE ttrss_feeds
478 SET last_updated = NOW(), last_error = '' WHERE id = '$feed'");
479
480 return; // no articles
481 }
482
483 if ($pubsub_state != 2 && PUBSUBHUBBUB_ENABLED) {
484
485 _debug("checking for PUSH hub...", $debug_enabled);
486
487 $feed_hub_url = false;
488
489 $links = $rss->get_links('hub');
490
491 if ($links && is_array($links)) {
492 foreach ($links as $l) {
493 $feed_hub_url = $l;
494 break;
495 }
496 }
497
498 _debug("feed hub url: $feed_hub_url", $debug_enabled);
499
500 if ($feed_hub_url && function_exists('curl_init') &&
501 !ini_get("open_basedir")) {
502
503 require_once 'lib/pubsubhubbub/subscriber.php';
504
505 $callback_url = get_self_url_prefix() .
506 "/public.php?op=pubsub&id=$feed";
507
508 $s = new Subscriber($feed_hub_url, $callback_url);
509
510 $rc = $s->subscribe($fetch_url);
511
512 _debug("feed hub url found, subscribe request sent.", $debug_enabled);
513
514 db_query("UPDATE ttrss_feeds SET pubsub_state = 1
515 WHERE id = '$feed'");
516 }
517 }
518
519 _debug("processing articles...", $debug_enabled);
520
521 foreach ($items as $item) {
522 if ($_REQUEST['xdebug'] == 3) {
523 print_r($item);
524 }
525
526 $entry_guid = $item->get_id();
527 if (!$entry_guid) $entry_guid = $item->get_link();
528 if (!$entry_guid) $entry_guid = make_guid_from_title($item->get_title());
529
530 if (!$entry_guid) continue;
531
532 $entry_guid = "$owner_uid,$entry_guid";
533
534 $entry_guid_hashed = db_escape_string('SHA1:' . sha1($entry_guid));
535
536 _debug("guid $entry_guid / $entry_guid_hashed", $debug_enabled);
537
538 $entry_timestamp = "";
539
540 $entry_timestamp = strtotime($item->get_date());
541
542 if ($entry_timestamp == -1 || !$entry_timestamp || $entry_timestamp > time()) {
543 $entry_timestamp = time();
544 $no_orig_date = 'true';
545 } else {
546 $no_orig_date = 'false';
547 }
548
549 $entry_timestamp_fmt = strftime("%Y/%m/%d %H:%M:%S", $entry_timestamp);
550
551 _debug("date $entry_timestamp [$entry_timestamp_fmt]", $debug_enabled);
552
553 $entry_title = html_entity_decode($item->get_title(), ENT_COMPAT, 'UTF-8');
554
555 $entry_link = rewrite_relative_url($site_url, $item->get_link());
556
557 _debug("title $entry_title", $debug_enabled);
558 _debug("link $entry_link", $debug_enabled);
559
560 if (!$entry_title) $entry_title = date("Y-m-d H:i:s", $entry_timestamp);;
561
562 $entry_content = $item->get_content();
563 if (!$entry_content) $entry_content = $item->get_description();
564
565 if ($_REQUEST["xdebug"] == 2) {
566 print "content: ";
567 print $entry_content;
568 print "\n";
569 }
570
571 $entry_comments = $item->data["comments"];
572
573 if ($item->get_author()) {
574 $entry_author_item = $item->get_author();
575 $entry_author = $entry_author_item->get_name();
576 if (!$entry_author) $entry_author = $entry_author_item->get_email();
577 }
578
579 $entry_guid = db_escape_string(mb_substr($entry_guid, 0, 245));
580
581 $entry_comments = db_escape_string(mb_substr(trim($entry_comments), 0, 245));
582 $entry_author = db_escape_string(mb_substr(trim($entry_author), 0, 245));
583
584 $num_comments = $item->get_item_tags('http://purl.org/rss/1.0/modules/slash/', 'comments');
585
586 if (is_array($num_comments) && is_array($num_comments[0])) {
587 $num_comments = (int) $num_comments[0]["data"];
588 } else {
589 $num_comments = 0;
590 }
591
592 _debug("author $entry_author", $debug_enabled);
593 _debug("num_comments: $num_comments", $debug_enabled);
594 _debug("looking for tags [1]...", $debug_enabled);
595
596 // parse <category> entries into tags
597
598 $additional_tags = array();
599
600 $additional_tags_src = $item->get_categories();
601
602 if (is_array($additional_tags_src)) {
603 foreach ($additional_tags_src as $tobj) {
604 array_push($additional_tags, $tobj->get_term());
605 }
606 }
607
608 _debug("category tags:", $debug_enabled);
609 _debug("looking for tags [2]...", $debug_enabled);
610
611 $entry_tags = array_unique($additional_tags);
612
613 for ($i = 0; $i < count($entry_tags); $i++)
614 $entry_tags[$i] = mb_strtolower($entry_tags[$i], 'utf-8');
615
616 _debug("done collecting data.", $debug_enabled);
617
618 // TODO: less memory-hungry implementation
619
620 _debug("applying plugin filters..", $debug_enabled);
621
622 // FIXME not sure if owner_uid is a good idea here, we may have a base entry without user entry (?)
623 $result = db_query("SELECT plugin_data,title,content,link,tag_cache,author FROM ttrss_entries, ttrss_user_entries
624 WHERE ref_id = id AND (guid = '".db_escape_string($entry_guid)."' OR guid = '$entry_guid_hashed') AND owner_uid = $owner_uid");
625
626 if (db_num_rows($result) != 0) {
627 $entry_plugin_data = db_fetch_result($result, 0, "plugin_data");
628 $stored_article = array("title" => db_fetch_result($result, 0, "title"),
629 "content" => db_fetch_result($result, 0, "content"),
630 "link" => db_fetch_result($result, 0, "link"),
631 "tags" => explode(",", db_fetch_result($result, 0, "tag_cache")),
632 "author" => db_fetch_result($result, 0, "author"));
633 } else {
634 $entry_plugin_data = "";
635 $stored_article = array();
636 }
637
638 $article = array("owner_uid" => $owner_uid, // read only
639 "guid" => $entry_guid, // read only
640 "title" => $entry_title,
641 "content" => $entry_content,
642 "link" => $entry_link,
643 "tags" => $entry_tags,
644 "plugin_data" => $entry_plugin_data,
645 "author" => $entry_author,
646 "stored" => $stored_article);
647
648 foreach ($pluginhost->get_hooks(PluginHost::HOOK_ARTICLE_FILTER) as $plugin) {
649 $article = $plugin->hook_article_filter($article);
650 }
651
652 $entry_tags = $article["tags"];
653 $entry_guid = db_escape_string($entry_guid);
654 $entry_title = db_escape_string($article["title"]);
655 $entry_author = db_escape_string($article["author"]);
656 $entry_link = db_escape_string($article["link"]);
657 $entry_plugin_data = db_escape_string($article["plugin_data"]);
658 $entry_content = $article["content"]; // escaped below
659
660
661 _debug("plugin data: $entry_plugin_data", $debug_enabled);
662
663 if ($cache_images && is_writable(CACHE_DIR . '/images'))
664 cache_images($entry_content, $site_url, $debug_enabled);
665
666 $entry_content = db_escape_string($entry_content, false);
667
668 $content_hash = "SHA1:" . sha1($entry_content);
669
670 db_query("BEGIN");
671
672 $result = db_query("SELECT id FROM ttrss_entries
673 WHERE (guid = '$entry_guid' OR guid = '$entry_guid_hashed')");
674
675 if (db_num_rows($result) == 0) {
676
677 _debug("base guid [$entry_guid] not found", $debug_enabled);
678
679 // base post entry does not exist, create it
680
681 $result = db_query(
682 "INSERT INTO ttrss_entries
683 (title,
684 guid,
685 link,
686 updated,
687 content,
688 content_hash,
689 cached_content,
690 no_orig_date,
691 date_updated,
692 date_entered,
693 comments,
694 num_comments,
695 plugin_data,
696 author)
697 VALUES
698 ('$entry_title',
699 '$entry_guid_hashed',
700 '$entry_link',
701 '$entry_timestamp_fmt',
702 '$entry_content',
703 '$content_hash',
704 '',
705 $no_orig_date,
706 NOW(),
707 '$date_feed_processed',
708 '$entry_comments',
709 '$num_comments',
710 '$entry_plugin_data',
711 '$entry_author')");
712
713 $article_labels = array();
714
715 } else {
716 // we keep encountering the entry in feeds, so we need to
717 // update date_updated column so that we don't get horrible
718 // dupes when the entry gets purged and reinserted again e.g.
719 // in the case of SLOW SLOW OMG SLOW updating feeds
720
721 $base_entry_id = db_fetch_result($result, 0, "id");
722
723 db_query("UPDATE ttrss_entries SET date_updated = NOW()
724 WHERE id = '$base_entry_id'");
725
726 $article_labels = get_article_labels($base_entry_id, $owner_uid);
727 }
728
729 // now it should exist, if not - bad luck then
730
731 $result = db_query("SELECT
732 id,content_hash,no_orig_date,title,plugin_data,guid,
733 ".SUBSTRING_FOR_DATE."(date_updated,1,19) as date_updated,
734 ".SUBSTRING_FOR_DATE."(updated,1,19) as updated,
735 num_comments
736 FROM
737 ttrss_entries
738 WHERE guid = '$entry_guid' OR guid = '$entry_guid_hashed'");
739
740 $entry_ref_id = 0;
741 $entry_int_id = 0;
742
743 if (db_num_rows($result) == 1) {
744
745 _debug("base guid found, checking for user record", $debug_enabled);
746
747 // this will be used below in update handler
748 $orig_content_hash = db_fetch_result($result, 0, "content_hash");
749 $orig_title = db_fetch_result($result, 0, "title");
750 $orig_num_comments = db_fetch_result($result, 0, "num_comments");
751 $orig_date_updated = strtotime(db_fetch_result($result,
752 0, "date_updated"));
753 $orig_plugin_data = db_fetch_result($result, 0, "plugin_data");
754
755 $ref_id = db_fetch_result($result, 0, "id");
756 $entry_ref_id = $ref_id;
757
758 /* $stored_guid = db_fetch_result($result, 0, "guid");
759 if ($stored_guid != $entry_guid_hashed) {
760 if ($debug_enabled) _debug("upgrading compat guid to hashed one", $debug_enabled);
761
762 db_query("UPDATE ttrss_entries SET guid = '$entry_guid_hashed' WHERE
763 id = '$ref_id'");
764 } */
765
766 // check for user post link to main table
767
768 // do we allow duplicate posts with same GUID in different feeds?
769 if (get_pref("ALLOW_DUPLICATE_POSTS", $owner_uid, false)) {
770 $dupcheck_qpart = "AND (feed_id = '$feed' OR feed_id IS NULL)";
771 } else {
772 $dupcheck_qpart = "";
773 }
774
775 /* Collect article tags here so we could filter by them: */
776
777 $article_filters = get_article_filters($filters, $entry_title,
778 $entry_content, $entry_link, $entry_timestamp, $entry_author,
779 $entry_tags);
780
781 if ($debug_enabled) {
782 _debug("article filters: ", $debug_enabled);
783 if (count($article_filters) != 0) {
784 print_r($article_filters);
785 }
786 }
787
788 if (find_article_filter($article_filters, "filter")) {
789 db_query("COMMIT"); // close transaction in progress
790 continue;
791 }
792
793 $score = calculate_article_score($article_filters);
794
795 _debug("initial score: $score", $debug_enabled);
796
797 $query = "SELECT ref_id, int_id FROM ttrss_user_entries WHERE
798 ref_id = '$ref_id' AND owner_uid = '$owner_uid'
799 $dupcheck_qpart";
800
801 // if ($_REQUEST["xdebug"]) print "$query\n";
802
803 $result = db_query($query);
804
805 // okay it doesn't exist - create user entry
806 if (db_num_rows($result) == 0) {
807
808 _debug("user record not found, creating...", $debug_enabled);
809
810 if ($score >= -500 && !find_article_filter($article_filters, 'catchup')) {
811 $unread = 'true';
812 $last_read_qpart = 'NULL';
813 } else {
814 $unread = 'false';
815 $last_read_qpart = 'NOW()';
816 }
817
818 if (find_article_filter($article_filters, 'mark') || $score > 1000) {
819 $marked = 'true';
820 } else {
821 $marked = 'false';
822 }
823
824 if (find_article_filter($article_filters, 'publish')) {
825 $published = 'true';
826 } else {
827 $published = 'false';
828 }
829
830 // N-grams
831
832 if (DB_TYPE == "pgsql" and defined('_NGRAM_TITLE_DUPLICATE_THRESHOLD')) {
833
834 $result = db_query("SELECT COUNT(*) AS similar FROM
835 ttrss_entries,ttrss_user_entries
836 WHERE ref_id = id AND updated >= NOW() - INTERVAL '7 day'
837 AND similarity(title, '$entry_title') >= "._NGRAM_TITLE_DUPLICATE_THRESHOLD."
838 AND owner_uid = $owner_uid");
839
840 $ngram_similar = db_fetch_result($result, 0, "similar");
841
842 _debug("N-gram similar results: $ngram_similar", $debug_enabled);
843
844 if ($ngram_similar > 0) {
845 $unread = 'false';
846 }
847 }
848
849 $last_marked = ($marked == 'true') ? 'NOW()' : 'NULL';
850 $last_published = ($published == 'true') ? 'NOW()' : 'NULL';
851
852 $result = db_query(
853 "INSERT INTO ttrss_user_entries
854 (ref_id, owner_uid, feed_id, unread, last_read, marked,
855 published, score, tag_cache, label_cache, uuid,
856 last_marked, last_published)
857 VALUES ('$ref_id', '$owner_uid', '$feed', $unread,
858 $last_read_qpart, $marked, $published, '$score', '', '',
859 '', $last_marked, $last_published)");
860
861 if (PUBSUBHUBBUB_HUB && $published == 'true') {
862 $rss_link = get_self_url_prefix() .
863 "/public.php?op=rss&id=-2&key=" .
864 get_feed_access_key(-2, false, $owner_uid);
865
866 $p = new Publisher(PUBSUBHUBBUB_HUB);
867
868 $pubsub_result = $p->publish_update($rss_link);
869 }
870
871 $result = db_query(
872 "SELECT int_id FROM ttrss_user_entries WHERE
873 ref_id = '$ref_id' AND owner_uid = '$owner_uid' AND
874 feed_id = '$feed' LIMIT 1");
875
876 if (db_num_rows($result) == 1) {
877 $entry_int_id = db_fetch_result($result, 0, "int_id");
878 }
879 } else {
880 _debug("user record FOUND", $debug_enabled);
881
882 $entry_ref_id = db_fetch_result($result, 0, "ref_id");
883 $entry_int_id = db_fetch_result($result, 0, "int_id");
884 }
885
886 _debug("RID: $entry_ref_id, IID: $entry_int_id", $debug_enabled);
887
888 $post_needs_update = false;
889 $update_insignificant = false;
890
891 if ($orig_num_comments != $num_comments) {
892 $post_needs_update = true;
893 $update_insignificant = true;
894 }
895
896 if ($entry_plugin_data != $orig_plugin_data) {
897 $post_needs_update = true;
898 $update_insignificant = true;
899 }
900
901 if ($content_hash != $orig_content_hash) {
902 $post_needs_update = true;
903 $update_insignificant = false;
904 }
905
906 if (db_escape_string($orig_title) != $entry_title) {
907 $post_needs_update = true;
908 $update_insignificant = false;
909 }
910
911 // if post needs update, update it and mark all user entries
912 // linking to this post as updated
913 if ($post_needs_update) {
914
915 if (defined('DAEMON_EXTENDED_DEBUG')) {
916 _debug("post $entry_guid_hashed needs update...", $debug_enabled);
917 }
918
919 // print "<!-- post $orig_title needs update : $post_needs_update -->";
920
921 db_query("UPDATE ttrss_entries
922 SET title = '$entry_title', content = '$entry_content',
923 content_hash = '$content_hash',
924 updated = '$entry_timestamp_fmt',
925 num_comments = '$num_comments',
926 plugin_data = '$entry_plugin_data'
927 WHERE id = '$ref_id'");
928
929 if (!$update_insignificant) {
930 if ($mark_unread_on_update) {
931 db_query("UPDATE ttrss_user_entries
932 SET last_read = null, unread = true WHERE ref_id = '$ref_id'");
933 }
934 }
935 }
936 }
937
938 db_query("COMMIT");
939
940 _debug("assigning labels...", $debug_enabled);
941
942 assign_article_to_label_filters($entry_ref_id, $article_filters,
943 $owner_uid, $article_labels);
944
945 _debug("looking for enclosures...", $debug_enabled);
946
947 // enclosures
948
949 $enclosures = array();
950
951 $encs = $item->get_enclosures();
952
953 if (is_array($encs)) {
954 foreach ($encs as $e) {
955 $e_item = array(
956 $e->link, $e->type, $e->length);
957 array_push($enclosures, $e_item);
958 }
959 }
960
961 if ($debug_enabled) {
962 _debug("article enclosures:", $debug_enabled);
963 print_r($enclosures);
964 }
965
966 db_query("BEGIN");
967
968 foreach ($enclosures as $enc) {
969 $enc_url = db_escape_string($enc[0]);
970 $enc_type = db_escape_string($enc[1]);
971 $enc_dur = db_escape_string($enc[2]);
972
973 $result = db_query("SELECT id FROM ttrss_enclosures
974 WHERE content_url = '$enc_url' AND post_id = '$entry_ref_id'");
975
976 if (db_num_rows($result) == 0) {
977 db_query("INSERT INTO ttrss_enclosures
978 (content_url, content_type, title, duration, post_id) VALUES
979 ('$enc_url', '$enc_type', '', '$enc_dur', '$entry_ref_id')");
980 }
981 }
982
983 db_query("COMMIT");
984
985 // check for manual tags (we have to do it here since they're loaded from filters)
986
987 foreach ($article_filters as $f) {
988 if ($f["type"] == "tag") {
989
990 $manual_tags = trim_array(explode(",", $f["param"]));
991
992 foreach ($manual_tags as $tag) {
993 if (tag_is_valid($tag)) {
994 array_push($entry_tags, $tag);
995 }
996 }
997 }
998 }
999
1000 // Skip boring tags
1001
1002 $boring_tags = trim_array(explode(",", mb_strtolower(get_pref(
1003 'BLACKLISTED_TAGS', $owner_uid, ''), 'utf-8')));
1004
1005 $filtered_tags = array();
1006 $tags_to_cache = array();
1007
1008 if ($entry_tags && is_array($entry_tags)) {
1009 foreach ($entry_tags as $tag) {
1010 if (array_search($tag, $boring_tags) === false) {
1011 array_push($filtered_tags, $tag);
1012 }
1013 }
1014 }
1015
1016 $filtered_tags = array_unique($filtered_tags);
1017
1018 if ($debug_enabled) {
1019 _debug("filtered article tags:", $debug_enabled);
1020 print_r($filtered_tags);
1021 }
1022
1023 // Save article tags in the database
1024
1025 if (count($filtered_tags) > 0) {
1026
1027 db_query("BEGIN");
1028
1029 foreach ($filtered_tags as $tag) {
1030
1031 $tag = sanitize_tag($tag);
1032 $tag = db_escape_string($tag);
1033
1034 if (!tag_is_valid($tag)) continue;
1035
1036 $result = db_query("SELECT id FROM ttrss_tags
1037 WHERE tag_name = '$tag' AND post_int_id = '$entry_int_id' AND
1038 owner_uid = '$owner_uid' LIMIT 1");
1039
1040 if ($result && db_num_rows($result) == 0) {
1041
1042 db_query("INSERT INTO ttrss_tags
1043 (owner_uid,tag_name,post_int_id)
1044 VALUES ('$owner_uid','$tag', '$entry_int_id')");
1045 }
1046
1047 array_push($tags_to_cache, $tag);
1048 }
1049
1050 /* update the cache */
1051
1052 $tags_to_cache = array_unique($tags_to_cache);
1053
1054 $tags_str = db_escape_string(join(",", $tags_to_cache));
1055
1056 db_query("UPDATE ttrss_user_entries
1057 SET tag_cache = '$tags_str' WHERE ref_id = '$entry_ref_id'
1058 AND owner_uid = $owner_uid");
1059
1060 db_query("COMMIT");
1061 }
1062
1063 if (get_pref("AUTO_ASSIGN_LABELS", $owner_uid, false)) {
1064 _debug("auto-assigning labels...", $debug_enabled);
1065
1066 foreach ($labels as $label) {
1067 $caption = preg_quote($label["caption"]);
1068
1069 if ($caption && preg_match("/\b$caption\b/i", "$tags_str " . strip_tags($entry_content) . " $entry_title")) {
1070 if (!labels_contains_caption($article_labels, $caption)) {
1071 label_add_article($entry_ref_id, $caption, $owner_uid);
1072 }
1073 }
1074 }
1075 }
1076
1077 _debug("article processed", $debug_enabled);
1078 }
1079
1080 if (!$last_updated) {
1081 _debug("new feed, catching it up...", $debug_enabled);
1082 catchup_feed($feed, false, $owner_uid);
1083 }
1084
1085 _debug("purging feed...", $debug_enabled);
1086
1087 purge_feed($feed, 0, $debug_enabled);
1088
1089 db_query("UPDATE ttrss_feeds
1090 SET last_updated = NOW(), last_error = '' WHERE id = '$feed'");
1091
1092 // db_query("COMMIT");
1093
1094 } else {
1095
1096 $error_msg = db_escape_string(mb_substr($rss->error(), 0, 245));
1097
1098 _debug("error fetching feed: $error_msg", $debug_enabled);
1099
1100 db_query(
1101 "UPDATE ttrss_feeds SET last_error = '$error_msg',
1102 last_updated = NOW() WHERE id = '$feed'");
1103 }
1104
1105 unset($rss);
1106
1107 _debug("done", $debug_enabled);
1108 }
1109
1110 function cache_images($html, $site_url, $debug) {
1111 $cache_dir = CACHE_DIR . "/images";
1112
1113 libxml_use_internal_errors(true);
1114
1115 $charset_hack = '<head>
1116 <meta http-equiv="Content-Type" content="text/html; charset=utf-8"/>
1117 </head>';
1118
1119 $doc = new DOMDocument();
1120 $doc->loadHTML($charset_hack . $html);
1121 $xpath = new DOMXPath($doc);
1122
1123 $entries = $xpath->query('(//img[@src])');
1124
1125 foreach ($entries as $entry) {
1126 if ($entry->hasAttribute('src')) {
1127 $src = rewrite_relative_url($site_url, $entry->getAttribute('src'));
1128
1129 $local_filename = CACHE_DIR . "/images/" . sha1($src) . ".png";
1130
1131 if ($debug) _debug("cache_images: downloading: $src to $local_filename");
1132
1133 if (!file_exists($local_filename)) {
1134 $file_content = fetch_file_contents($src);
1135
1136 if ($file_content && strlen($file_content) > 1024) {
1137 file_put_contents($local_filename, $file_content);
1138 }
1139 }
1140
1141 if (file_exists($local_filename)) {
1142 $entry->setAttribute('src', SELF_URL_PATH . '/image.php?url=' .
1143 base64_encode($src));
1144 }
1145 }
1146 }
1147
1148 $node = $doc->getElementsByTagName('body')->item(0);
1149
1150 return $doc->saveXML($node);
1151 }
1152
1153 function expire_error_log($debug) {
1154 if ($debug) _debug("Removing old error log entries...");
1155
1156 if (DB_TYPE == "pgsql") {
1157 db_query("DELETE FROM ttrss_error_log
1158 WHERE created_at < NOW() - INTERVAL '7 days'");
1159 } else {
1160 db_query("DELETE FROM ttrss_error_log
1161 WHERE created_at < DATE_SUB(NOW(), INTERVAL 7 DAY)");
1162 }
1163
1164 }
1165
1166 function expire_lock_files($debug) {
1167 //if ($debug) _debug("Removing old lock files...");
1168
1169 $num_deleted = 0;
1170
1171 if (is_writable(LOCK_DIRECTORY)) {
1172 $files = glob(LOCK_DIRECTORY . "/*.lock");
1173
1174 if ($files) {
1175 foreach ($files as $file) {
1176 if (!file_is_locked(basename($file)) && time() - filemtime($file) > 86400*2) {
1177 unlink($file);
1178 ++$num_deleted;
1179 }
1180 }
1181 }
1182 }
1183
1184 if ($debug) _debug("Removed $num_deleted old lock files.");
1185 }
1186
1187 function expire_cached_files($debug) {
1188 foreach (array("simplepie", "images", "export", "upload") as $dir) {
1189 $cache_dir = CACHE_DIR . "/$dir";
1190
1191 // if ($debug) _debug("Expiring $cache_dir");
1192
1193 $num_deleted = 0;
1194
1195 if (is_writable($cache_dir)) {
1196 $files = glob("$cache_dir/*");
1197
1198 if ($files) {
1199 foreach ($files as $file) {
1200 if (time() - filemtime($file) > 86400*7) {
1201 unlink($file);
1202
1203 ++$num_deleted;
1204 }
1205 }
1206 }
1207 }
1208
1209 if ($debug) _debug("$cache_dir: removed $num_deleted files.");
1210 }
1211 }
1212
1213 /**
1214 * Source: http://www.php.net/manual/en/function.parse-url.php#104527
1215 * Returns the url query as associative array
1216 *
1217 * @param string query
1218 * @return array params
1219 */
1220 function convertUrlQuery($query) {
1221 $queryParts = explode('&', $query);
1222
1223 $params = array();
1224
1225 foreach ($queryParts as $param) {
1226 $item = explode('=', $param);
1227 $params[$item[0]] = $item[1];
1228 }
1229
1230 return $params;
1231 }
1232
1233 function get_article_filters($filters, $title, $content, $link, $timestamp, $author, $tags) {
1234 $matches = array();
1235
1236 foreach ($filters as $filter) {
1237 $match_any_rule = $filter["match_any_rule"];
1238 $inverse = $filter["inverse"];
1239 $filter_match = false;
1240
1241 foreach ($filter["rules"] as $rule) {
1242 $match = false;
1243 $reg_exp = $rule["reg_exp"];
1244 $rule_inverse = $rule["inverse"];
1245
1246 if (!$reg_exp)
1247 continue;
1248
1249 switch ($rule["type"]) {
1250 case "title":
1251 $match = @preg_match("/$reg_exp/i", $title);
1252 break;
1253 case "content":
1254 // we don't need to deal with multiline regexps
1255 $content = preg_replace("/[\r\n\t]/", "", $content);
1256
1257 $match = @preg_match("/$reg_exp/i", $content);
1258 break;
1259 case "both":
1260 // we don't need to deal with multiline regexps
1261 $content = preg_replace("/[\r\n\t]/", "", $content);
1262
1263 $match = (@preg_match("/$reg_exp/i", $title) || @preg_match("/$reg_exp/i", $content));
1264 break;
1265 case "link":
1266 $match = @preg_match("/$reg_exp/i", $link);
1267 break;
1268 case "author":
1269 $match = @preg_match("/$reg_exp/i", $author);
1270 break;
1271 case "tag":
1272 $tag_string = join(",", $tags);
1273 $match = @preg_match("/$reg_exp/i", $tag_string);
1274 break;
1275 }
1276
1277 if ($rule_inverse) $match = !$match;
1278
1279 if ($match_any_rule) {
1280 if ($match) {
1281 $filter_match = true;
1282 break;
1283 }
1284 } else {
1285 $filter_match = $match;
1286 if (!$match) {
1287 break;
1288 }
1289 }
1290 }
1291
1292 if ($inverse) $filter_match = !$filter_match;
1293
1294 if ($filter_match) {
1295 foreach ($filter["actions"] AS $action) {
1296 array_push($matches, $action);
1297
1298 // if Stop action encountered, perform no further processing
1299 if ($action["type"] == "stop") return $matches;
1300 }
1301 }
1302 }
1303
1304 return $matches;
1305 }
1306
1307 function find_article_filter($filters, $filter_name) {
1308 foreach ($filters as $f) {
1309 if ($f["type"] == $filter_name) {
1310 return $f;
1311 };
1312 }
1313 return false;
1314 }
1315
1316 function find_article_filters($filters, $filter_name) {
1317 $results = array();
1318
1319 foreach ($filters as $f) {
1320 if ($f["type"] == $filter_name) {
1321 array_push($results, $f);
1322 };
1323 }
1324 return $results;
1325 }
1326
1327 function calculate_article_score($filters) {
1328 $score = 0;
1329
1330 foreach ($filters as $f) {
1331 if ($f["type"] == "score") {
1332 $score += $f["param"];
1333 };
1334 }
1335 return $score;
1336 }
1337
1338 function labels_contains_caption($labels, $caption) {
1339 foreach ($labels as $label) {
1340 if ($label[1] == $caption) {
1341 return true;
1342 }
1343 }
1344
1345 return false;
1346 }
1347
1348 function assign_article_to_label_filters($id, $filters, $owner_uid, $article_labels) {
1349 foreach ($filters as $f) {
1350 if ($f["type"] == "label") {
1351 if (!labels_contains_caption($article_labels, $f["param"])) {
1352 label_add_article($id, $f["param"], $owner_uid);
1353 }
1354 }
1355 }
1356 }
1357
1358 function make_guid_from_title($title) {
1359 return preg_replace("/[ \"\',.:;]/", "-",
1360 mb_strtolower(strip_tags($title), 'utf-8'));
1361 }
1362
1363 function verify_feed_xml($feed_data) {
1364 libxml_use_internal_errors(true);
1365 $doc = new DOMDocument();
1366 $doc->loadXML($feed_data);
1367 $error = libxml_get_last_error();
1368 libxml_clear_errors();
1369 return $error;
1370 }
1371
1372 function housekeeping_common($debug) {
1373 expire_cached_files($debug);
1374 expire_lock_files($debug);
1375 expire_error_log($debug);
1376
1377 $count = update_feedbrowser_cache();
1378 _debug("Feedbrowser updated, $count feeds processed.");
1379
1380 purge_orphans( true);
1381 $rc = cleanup_tags( 14, 50000);
1382
1383 _debug("Cleaned $rc cached tags.");
1384 }
1385 ?>