2 * Bring external RSS feeds into rooms.
4 * Copyright (c) 2007-2016 by the citadel.org team
6 * This program is open source software; you can redistribute it and/or modify
7 * it under the terms of the GNU General Public License version 3.
9 * This program is distributed in the hope that it will be useful,
10 * but WITHOUT ANY WARRANTY; without even the implied warranty of
11 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.See the
12 * GNU General Public License for more details.
19 #if TIME_WITH_SYS_TIME
20 # include <sys/time.h>
33 #include <sys/types.h>
36 #include <curl/curl.h>
37 #include <libcitadel.h>
40 #include "citserver.h"
44 #include "ctdl_module.h"
46 #include "parsedate.h"
48 #include "citadel_dirs.h"
51 #include "event_client.h"
52 #include "rss_atom_parser.h"
55 #define TMP_MSGDATA 0xFF
56 #define TMP_SHORTER_URL_OFFSET 0xFE
57 #define TMP_SHORTER_URLS 0xFD
61 pthread_mutex_t RSSQueueMutex; /* locks the access to the following vars: */
62 HashList *RSSQueueRooms = NULL; /* rss_room_counter */
63 HashList *RSSFetchUrls = NULL; /*->rss_aggregator;->RefCount access locked*/
65 eNextState RSSAggregator_Terminate(AsyncIO *IO);
66 eNextState RSSAggregator_TerminateDB(AsyncIO *IO);
67 eNextState RSSAggregator_ShutdownAbort(AsyncIO *IO);
68 struct CitContext rss_CC;
70 struct rssnetcfg *rnclist = NULL;
71 int RSSClientDebugEnabled = 0;
72 #define N ((rss_aggregator*)IO->Data)->Cfg.QRnumber
74 #define DBGLOG(LEVEL) if ((LEVEL != LOG_DEBUG) || (RSSClientDebugEnabled != 0))
76 #define EVRSSC_syslog(LEVEL, FORMAT, ...) \
77 DBGLOG(LEVEL) syslog(LEVEL, \
78 "%s[%ld]CC[%d][%ld]RSS" FORMAT, \
79 IOSTR, IO->ID, CCID, N, __VA_ARGS__)
81 #define EVRSSCM_syslog(LEVEL, FORMAT) \
82 DBGLOG(LEVEL) syslog(LEVEL, \
83 "%s[%ld]CC[%d][%ld]RSS" FORMAT, \
84 IOSTR, IO->ID, CCID, N)
86 #define EVRSSQ_syslog(LEVEL, FORMAT, ...) \
87 DBGLOG(LEVEL) syslog(LEVEL, "RSS" FORMAT, \
89 #define EVRSSQM_syslog(LEVEL, FORMAT) \
90 DBGLOG(LEVEL) syslog(LEVEL, "RSS" FORMAT)
92 #define EVRSSCSM_syslog(LEVEL, FORMAT) \
93 DBGLOG(LEVEL) syslog(LEVEL, "%s[%ld][%ld]RSS" FORMAT, \
96 typedef enum _RSSState {
103 ConstStr RSSStates[] = {
104 {HKEY("Aggregator created")},
105 {HKEY("Fetching content")},
107 {HKEY("parsing content")},
108 {HKEY("checking usetable")}
112 static size_t GetLocationString( void *ptr, size_t size, size_t nmemb, void *userdata)
114 #define LOCATION "location"
115 if (strncasecmp((char*)ptr, LOCATION, sizeof(LOCATION) - 1) == 0)
117 AsyncIO *IO = (AsyncIO *) userdata;
118 rss_aggregator *RSSAggr = (rss_aggregator *)IO->Data;
120 char *pch = (char*) ptr;
123 pche = pch + (size * nmemb);
124 pch += sizeof(LOCATION);
126 while (isspace(*pch) || (*pch == ':'))
129 while (isspace(*pche) || (*pche == '\0'))
131 if (RSSAggr->RedirectUrl == NULL) {
132 RSSAggr->RedirectUrl = NewStrBufPlain(pch, pche - pch + 1);
135 FlushStrBuf(RSSAggr->RedirectUrl);
136 StrBufPlain(RSSAggr->RedirectUrl, pch, pche - pch + 1);
143 static void SetRSSState(AsyncIO *IO, RSSState State)
145 CitContext* CCC = IO->CitContext;
147 memcpy(CCC->cs_clientname, RSSStates[State].Key, RSSStates[State].len + 1);
152 void DeleteRoomReference(long QRnumber)
158 rss_room_counter *pRoomC;
160 At = GetNewHashPos(RSSQueueRooms, 0);
162 if (GetHashPosFromKey(RSSQueueRooms, LKEY(QRnumber), At))
164 GetHashPos(RSSQueueRooms, At, &HKLen, &HK, &vData);
167 pRoomC = (rss_room_counter *) vData;
169 if (pRoomC->count == 0)
170 DeleteEntryFromHash(RSSQueueRooms, At);
176 void UnlinkRooms(rss_aggregator *RSSAggr)
178 DeleteRoomReference(RSSAggr->Cfg.QRnumber);
179 if (RSSAggr->OtherQRnumbers != NULL)
186 At = GetNewHashPos(RSSAggr->OtherQRnumbers, 0);
187 while (! server_shutting_down &&
188 GetNextHashPos(RSSAggr->OtherQRnumbers,
194 pRSSConfig *Data = (pRSSConfig*) vData;
195 DeleteRoomReference(Data->QRnumber);
202 void UnlinkRSSAggregator(rss_aggregator *RSSAggr)
206 pthread_mutex_lock(&RSSQueueMutex);
207 UnlinkRooms(RSSAggr);
209 At = GetNewHashPos(RSSFetchUrls, 0);
210 if (GetHashPosFromKey(RSSFetchUrls, SKEY(RSSAggr->Url), At))
212 DeleteEntryFromHash(RSSFetchUrls, At);
215 last_run = time(NULL);
216 pthread_mutex_unlock(&RSSQueueMutex);
219 void DeleteRssCfg(void *vptr)
221 rss_aggregator *RSSAggr = (rss_aggregator *)vptr;
222 AsyncIO *IO = &RSSAggr->IO;
224 if (IO->CitContext != NULL) {
225 EVRSSCM_syslog(LOG_DEBUG, "RSS: destroying");
228 FreeStrBuf(&RSSAggr->Url);
229 FreeStrBuf(&RSSAggr->RedirectUrl);
230 FreeStrBuf(&RSSAggr->rooms);
231 FreeStrBuf(&RSSAggr->CData);
232 FreeStrBuf(&RSSAggr->Key);
233 DeleteHash(&RSSAggr->OtherQRnumbers);
235 DeleteHashPos (&RSSAggr->Pos);
236 DeleteHash (&RSSAggr->Messages);
237 if (RSSAggr->recp.recp_room != NULL)
238 free(RSSAggr->recp.recp_room);
241 if (RSSAggr->Item != NULL)
243 flush_rss_item(RSSAggr->Item);
248 FreeAsyncIOContents(&RSSAggr->IO);
249 memset(RSSAggr, 0, sizeof(rss_aggregator));
253 eNextState RSSAggregator_Terminate(AsyncIO *IO)
255 rss_aggregator *RSSAggr = (rss_aggregator *)IO->Data;
257 EVRSSCM_syslog(LOG_DEBUG, "RSS: Terminating.");
259 StopCurlWatchers(IO);
260 UnlinkRSSAggregator(RSSAggr);
264 eNextState RSSAggregator_TerminateDB(AsyncIO *IO)
266 rss_aggregator *RSSAggr = (rss_aggregator *)IO->Data;
268 EVRSSCM_syslog(LOG_DEBUG, "RSS: Terminating.");
271 StopDBWatchers(&RSSAggr->IO);
272 UnlinkRSSAggregator(RSSAggr);
276 eNextState RSSAggregator_ShutdownAbort(AsyncIO *IO)
279 rss_aggregator *RSSAggr = (rss_aggregator *)IO->Data;
281 pUrl = IO->ConnectMe->PlainUrl;
285 EVRSSC_syslog(LOG_DEBUG, "RSS: Aborting by shutdown: %s.", pUrl);
287 StopCurlWatchers(IO);
288 UnlinkRSSAggregator(RSSAggr);
292 void AppendLink(StrBuf *Message,
297 if (StrLength(link) > 0)
299 StrBufAppendBufPlain(Message, HKEY("<a href=\""), 0);
300 StrBufAppendBuf(Message, link, 0);
301 StrBufAppendBufPlain(Message, HKEY("\">"), 0);
302 if (StrLength(LinkTitle) > 0)
303 StrBufAppendBuf(Message, LinkTitle, 0);
304 else if ((Title != NULL) && !IsEmptyStr(Title))
305 StrBufAppendBufPlain(Message, Title, -1, 0);
307 StrBufAppendBuf(Message, link, 0);
308 StrBufAppendBufPlain(Message, HKEY("</a><br>\n"), 0);
313 int rss_format_item(AsyncIO *IO, networker_save_message *SaveMsg)
318 if (StrLength(SaveMsg->description) +
319 StrLength(SaveMsg->link) +
320 StrLength(SaveMsg->linkTitle) +
321 StrLength(SaveMsg->reLink) +
322 StrLength(SaveMsg->reLinkTitle) +
323 StrLength(SaveMsg->title) == 0)
325 EVRSSCM_syslog(LOG_INFO, "Refusing to save empty message.");
329 CM_Flush(&SaveMsg->Msg);
331 if (SaveMsg->author_or_creator != NULL) {
334 StrBuf *Encoded = NULL;
337 From = html_to_ascii(ChrPtr(SaveMsg->author_or_creator),
338 StrLength(SaveMsg->author_or_creator),
340 StrBufPlain(SaveMsg->author_or_creator, From, -1);
341 StrBufTrim(SaveMsg->author_or_creator);
344 FromAt = strchr(ChrPtr(SaveMsg->author_or_creator), '@') != NULL;
345 if (!FromAt && StrLength (SaveMsg->author_email) > 0)
347 StrBufRFC2047encode(&Encoded, SaveMsg->author_or_creator);
348 CM_SetAsFieldSB(&SaveMsg->Msg, eAuthor, &Encoded);
349 CM_SetAsFieldSB(&SaveMsg->Msg, eMessagePath, &SaveMsg->author_email);
355 CM_SetAsFieldSB(&SaveMsg->Msg, eAuthor, &SaveMsg->author_or_creator);
356 CM_CopyField(&SaveMsg->Msg, eMessagePath, eAuthor);
360 StrBufRFC2047encode(&Encoded,
361 SaveMsg->author_or_creator);
362 CM_SetAsFieldSB(&SaveMsg->Msg, eAuthor, &Encoded);
363 CM_SetField(&SaveMsg->Msg, eMessagePath, HKEY("rss@localhost"));
369 CM_SetField(&SaveMsg->Msg, eAuthor, HKEY("rss"));
372 CM_SetField(&SaveMsg->Msg, eNodeName, CtdlGetConfigStr("c_nodename"), strlen(CtdlGetConfigStr("c_nodename")));
373 if (SaveMsg->title != NULL) {
376 StrBuf *Encoded, *QPEncoded;
379 StrBufSpaceToBlank(SaveMsg->title);
380 len = StrLength(SaveMsg->title);
381 Sbj = html_to_ascii(ChrPtr(SaveMsg->title), len, 512, 0);
382 if (!IsEmptyStr(Sbj)) {
384 if ((Sbj[len - 1] == '\n'))
389 Encoded = NewStrBufPlain(Sbj, len);
393 StrBufRFC2047encode(&QPEncoded, Encoded);
395 CM_SetAsFieldSB(&SaveMsg->Msg, eMsgSubject, &QPEncoded);
396 FreeStrBuf(&Encoded);
402 if (SaveMsg->link == NULL)
403 SaveMsg->link = NewStrBufPlain(HKEY(""));
405 #if 0 /* temporarily disable shorter urls. */
406 SaveMsg->Msg.cm_fields[TMP_SHORTER_URLS] =
407 GetShorterUrls(SaveMsg->description);
410 msglen += 1024 + StrLength(SaveMsg->link) + StrLength(SaveMsg->description) ;
412 Message = NewStrBufPlain(NULL, msglen);
414 StrBufPlain(Message, HKEY(
415 "Content-type: text/html; charset=\"UTF-8\"\r\n\r\n"
417 #if 0 /* disable shorter url for now. */
418 SaveMsg->Msg.cm_fields[TMP_SHORTER_URL_OFFSET] = StrLength(Message);
420 StrBufAppendBuf(Message, SaveMsg->description, 0);
421 StrBufAppendBufPlain(Message, HKEY("<br><br>\n"), 0);
423 AppendLink(Message, SaveMsg->link, SaveMsg->linkTitle, NULL);
424 AppendLink(Message, SaveMsg->reLink, SaveMsg->reLinkTitle, "Reply to this");
425 StrBufAppendBufPlain(Message, HKEY("</body></html>\n"), 0);
427 SaveMsg->Message = Message;
431 eNextState RSSSaveMessage(AsyncIO *IO)
435 rss_aggregator *RSSAggr = (rss_aggregator *) IO->Data;
437 if (rss_format_item(IO, RSSAggr->ThisMsg))
439 CM_SetAsFieldSB(&RSSAggr->ThisMsg->Msg, eMesageText,
440 &RSSAggr->ThisMsg->Message);
442 CtdlSubmitMsg(&RSSAggr->ThisMsg->Msg, &RSSAggr->recp, NULL, 0);
444 /* write the uidl to the use table so we don't store this item again */
446 CheckIfAlreadySeen("RSS Item Insert", RSSAggr->ThisMsg->MsgGUID, EvGetNow(IO), 0, eWrite, CCID, IO->ID);
449 if (GetNextHashPos(RSSAggr->Messages,
452 (void**) &RSSAggr->ThisMsg))
453 return NextDBOperation(IO, RSS_FetchNetworkUsetableEntry);
458 eNextState RSS_FetchNetworkUsetableEntry(AsyncIO *IO)
460 static const time_t antiExpire = USETABLE_ANTIEXPIRE_HIRES;
462 time_t seenstamp = 0;
465 rss_aggregator *Ctx = (rss_aggregator *) IO->Data;
467 /* Find out if we've already seen this item */
469 SetRSSState(IO, eRSSUT);
470 seenstamp = CheckIfAlreadySeen("RSS Item Seen",
471 Ctx->ThisMsg->MsgGUID,
478 /* Item has already been seen */
479 EVRSSC_syslog(LOG_DEBUG,
480 "%s has already been seen - %ld < %ld",
481 ChrPtr(Ctx->ThisMsg->MsgGUID),
482 seenstamp, antiExpire);
484 SetRSSState(IO, eRSSParsing);
486 if (GetNextHashPos(Ctx->Messages,
489 (void**) &Ctx->ThisMsg))
490 return NextDBOperation(
492 RSS_FetchNetworkUsetableEntry);
499 /* Item has already been seen */
500 EVRSSC_syslog(LOG_DEBUG,
501 "%s Parsing - %ld >= %ld",
502 ChrPtr(Ctx->ThisMsg->MsgGUID),
503 seenstamp, antiExpire);
504 SetRSSState(IO, eRSSParsing);
506 NextDBOperation(IO, RSSSaveMessage);
512 void UpdateLastKnownGood(pRSSConfig *pCfg, time_t now)
514 OneRoomNetCfg *pRNCfg;
515 begin_critical_section(S_NETCONFIGS);
516 pRNCfg = CtdlGetNetCfgForRoom(pCfg->QRnumber);
519 RSSCfgLine *RSSCfg = (RSSCfgLine *)pRNCfg->NetConfigs[rssclient];
521 while (RSSCfg != NULL)
523 if (RSSCfg == pCfg->pCfg)
526 RSSCfg = RSSCfg->next;
530 RSSCfg->last_known_good = now;
533 SaveRoomNetConfigFile(pRNCfg, pCfg->QRnumber);
534 FreeRoomNetworkStruct(&pRNCfg);
535 end_critical_section(S_NETCONFIGS);
538 eNextState RSSAggregator_AnalyseReply(AsyncIO *IO)
544 u_char rawdigest[MD5_DIGEST_LEN];
545 struct MD5Context md5context;
547 rss_aggregator *Ctx = (rss_aggregator *) IO->Data;
550 if ((IO->HttpReq.httpcode >= 300) && (IO->HttpReq.httpcode < 400) && (Ctx->RedirectUrl != NULL))
556 SetRSSState(IO, eRSSFailure);
557 ErrMsg = NewStrBuf();
559 EVRSSC_syslog(LOG_INFO, "need a 200, got a %ld !",
560 IO->HttpReq.httpcode);
562 strs[0] = ChrPtr(Ctx->Url);
563 lens[0] = StrLength(Ctx->Url);
565 strs[1] = ChrPtr(Ctx->rooms);
566 lens[1] = StrLength(Ctx->rooms);
568 if (IO->HttpReq.CurlError == NULL)
569 IO->HttpReq.CurlError = "";
572 "Error while RSS-Aggregation Run of %s\n"
573 " need a 200, got a %ld !\n"
574 " Curl Error message: \n%s / %s\n"
575 " Redirect header points to: %s\n"
576 " Response text was: \n"
579 IO->HttpReq.httpcode,
581 IO->HttpReq.CurlError,
582 ChrPtr(Ctx->RedirectUrl),
583 ChrPtr(IO->HttpReq.ReplyData)
588 "RSS Aggregation run failure",
589 2, strs, (long*) &lens,
595 EVRSSC_syslog(LOG_DEBUG,
596 "RSS feed returned an invalid http status code. <%s><HTTP %ld>",
598 IO->HttpReq.httpcode);
601 else if (IO->HttpReq.httpcode != 200)
607 SetRSSState(IO, eRSSFailure);
608 ErrMsg = NewStrBuf();
610 EVRSSC_syslog(LOG_ALERT, "need a 200, got a %ld !",
611 IO->HttpReq.httpcode);
613 strs[0] = ChrPtr(Ctx->Url);
614 lens[0] = StrLength(Ctx->Url);
616 strs[1] = ChrPtr(Ctx->rooms);
617 lens[1] = StrLength(Ctx->rooms);
619 if (IO->HttpReq.CurlError == NULL)
620 IO->HttpReq.CurlError = "";
623 "Error while RSS-Aggregation Run of %s\n"
624 " need a 200, got a %ld !\n"
625 " Curl Error message: \n%s / %s\n"
626 " Response text was: \n"
629 IO->HttpReq.httpcode,
631 IO->HttpReq.CurlError,
632 ChrPtr(IO->HttpReq.ReplyData)
637 "RSS Aggregation run failure",
638 2, strs, (long*) &lens,
644 EVRSSC_syslog(LOG_DEBUG,
645 "RSS feed returned an invalid http status code. <%s><HTTP %ld>",
647 IO->HttpReq.httpcode);
655 UpdateLastKnownGood (pCfg, EvGetNow(IO));
656 if ((Ctx->roomlist_parts > 1) &&
659 it = GetNewHashPos(RSSFetchUrls, 0);
664 if (GetNextHashPos(Ctx->OtherQRnumbers, it, &len, &Key, &vptr))
674 SetRSSState(IO, eRSSUT);
676 MD5Init(&md5context);
678 MD5Update(&md5context,
679 (const unsigned char*)SKEY(IO->HttpReq.ReplyData));
681 MD5Update(&md5context,
682 (const unsigned char*)SKEY(Ctx->Url));
684 MD5Final(rawdigest, &md5context);
685 guid = NewStrBufPlain(NULL,
686 MD5_DIGEST_LEN * 2 + 12 /* _rss2ctdl*/);
687 StrBufHexEscAppend(guid, NULL, rawdigest, MD5_DIGEST_LEN);
688 StrBufAppendBufPlain(guid, HKEY("_rssFM"), 0);
689 if (StrLength(guid) > 40)
690 StrBufCutAt(guid, 40, NULL);
691 /* Find out if we've already seen this item */
695 if (CheckIfAlreadySeen("RSS Whole",
698 EvGetNow(IO) - USETABLE_ANTIEXPIRE,
705 EVRSSC_syslog(LOG_DEBUG, "RSS feed already seen. <%s>", ChrPtr(Ctx->Url));
710 SetRSSState(IO, eRSSParsing);
711 return RSSAggregator_ParseReply(IO);
714 eNextState RSSAggregator_FinishHttp(AsyncIO *IO)
716 return CurlQueueDBOperation(IO, RSSAggregator_AnalyseReply);
722 int rss_do_fetching(rss_aggregator *RSSAggr)
724 AsyncIO *IO = &RSSAggr->IO;
733 if ((RSSAggr->next_poll != 0) && (now < RSSAggr->next_poll))
736 ri = (rss_item*) malloc(sizeof(rss_item));
737 memset(ri, 0, sizeof(rss_item));
740 if (! InitcURLIOStruct(&RSSAggr->IO,
742 "Citadel RSS Client",
743 RSSAggregator_FinishHttp,
744 RSSAggregator_Terminate,
745 RSSAggregator_TerminateDB,
746 RSSAggregator_ShutdownAbort))
748 EVRSSCM_syslog(LOG_ALERT, "Unable to initialize libcurl.");
751 chnd = IO->HttpReq.chnd;
753 OPT(HEADERFUNCTION, GetLocationString);
754 SetRSSState(IO, eRSSCreated);
756 safestrncpy(((CitContext*)RSSAggr->IO.CitContext)->cs_host,
757 ChrPtr(RSSAggr->Url),
758 sizeof(((CitContext*)RSSAggr->IO.CitContext)->cs_host));
760 EVRSSC_syslog(LOG_DEBUG, "Fetching RSS feed <%s>", ChrPtr(RSSAggr->Url));
761 ParseURL(&RSSAggr->IO.ConnectMe, RSSAggr->Url, 80);
762 CurlPrepareURL(RSSAggr->IO.ConnectMe);
764 SetRSSState(IO, eRSSFetching);
765 QueueCurlContext(&RSSAggr->IO);
770 * Scan a room's netconfig to determine whether it is requesting any RSS feeds
772 void rssclient_scan_room(struct ctdlroom *qrbuf, void *data, OneRoomNetCfg *OneRNCFG)
774 const RSSCfgLine *RSSCfg = (RSSCfgLine *)OneRNCFG->NetConfigs[rssclient];
775 rss_aggregator *RSSAggr = NULL;
776 rss_aggregator *use_this_RSSAggr = NULL;
779 EVRSSQ_syslog(LOG_DEBUG, "rssclient_scan_room(%s)", qrbuf->QRname);
780 pthread_mutex_lock(&RSSQueueMutex);
781 if (GetHash(RSSQueueRooms, LKEY(qrbuf->QRnumber), &vptr))
783 EVRSSQ_syslog(LOG_DEBUG,
784 "rssclient: [%ld] %s already in progress.",
787 pthread_mutex_unlock(&RSSQueueMutex);
790 pthread_mutex_unlock(&RSSQueueMutex);
792 if (server_shutting_down) return;
794 while (RSSCfg != NULL)
796 pthread_mutex_lock(&RSSQueueMutex);
797 GetHash(RSSFetchUrls,
801 use_this_RSSAggr = (rss_aggregator *)vptr;
802 if (use_this_RSSAggr != NULL)
806 StrBufAppendBufPlain(
807 use_this_RSSAggr->rooms,
810 if (use_this_RSSAggr->roomlist_parts==1)
812 use_this_RSSAggr->OtherQRnumbers
813 = NewHash(1, lFlathash);
816 pRSSCfg = (pRSSConfig *) malloc(sizeof(pRSSConfig));
818 pRSSCfg->QRnumber = qrbuf->QRnumber;
819 pRSSCfg->pCfg = RSSCfg;
821 Put(use_this_RSSAggr->OtherQRnumbers,
822 LKEY(qrbuf->QRnumber),
825 use_this_RSSAggr->roomlist_parts++;
827 pthread_mutex_unlock(&RSSQueueMutex);
829 RSSCfg = RSSCfg->next;
832 pthread_mutex_unlock(&RSSQueueMutex);
834 RSSAggr = (rss_aggregator *) malloc(
835 sizeof(rss_aggregator));
837 memset (RSSAggr, 0, sizeof(rss_aggregator));
838 RSSAggr->Cfg.QRnumber = qrbuf->QRnumber;
839 RSSAggr->Cfg.pCfg = RSSCfg;
840 RSSAggr->roomlist_parts = 1;
841 RSSAggr->Url = NewStrBufDup(RSSCfg->Url);
843 RSSAggr->ItemType = RSS_UNSET;
845 RSSAggr->rooms = NewStrBufPlain(
848 pthread_mutex_lock(&RSSQueueMutex);
855 pthread_mutex_unlock(&RSSQueueMutex);
856 RSSCfg = RSSCfg->next;
861 * Scan for rooms that have RSS client requests configured
863 void rssclient_scan(void) {
864 int RSSRoomCount, RSSCount;
865 rss_aggregator *rptr = NULL;
870 time_t now = time(NULL);
872 /* Run no more than once every 15 minutes. */
873 if ((now - last_run) < 900) {
874 EVRSSQ_syslog(LOG_DEBUG,
875 "Client: polling interval not yet reached; last run was %ldm%lds ago",
876 ((now - last_run) / 60),
877 ((now - last_run) % 60)
883 * This is a simple concurrency check to make sure only one rssclient
884 * run is done at a time.
886 pthread_mutex_lock(&RSSQueueMutex);
887 RSSCount = GetCount(RSSFetchUrls);
888 RSSRoomCount = GetCount(RSSQueueRooms);
889 pthread_mutex_unlock(&RSSQueueMutex);
891 if ((RSSRoomCount > 0) || (RSSCount > 0)) {
892 EVRSSQ_syslog(LOG_DEBUG,
893 "rssclient: concurrency check failed; %d rooms and %d url's are queued",
894 RSSRoomCount, RSSCount
900 become_session(&rss_CC);
901 EVRSSQM_syslog(LOG_DEBUG, "rssclient started");
902 CtdlForEachNetCfgRoom(rssclient_scan_room, NULL);
904 if (GetCount(RSSFetchUrls) > 0)
906 pthread_mutex_lock(&RSSQueueMutex);
907 EVRSSQ_syslog(LOG_DEBUG,
908 "rssclient starting %d Clients",
909 GetCount(RSSFetchUrls));
911 it = GetNewHashPos(RSSFetchUrls, 0);
912 while (!server_shutting_down &&
913 GetNextHashPos(RSSFetchUrls, it, &len, &Key, &vrptr) &&
915 rptr = (rss_aggregator *)vrptr;
916 if (!rss_do_fetching(rptr))
917 UnlinkRSSAggregator(rptr);
920 pthread_mutex_unlock(&RSSQueueMutex);
923 EVRSSQM_syslog(LOG_DEBUG, "Nothing to do.");
925 EVRSSQM_syslog(LOG_DEBUG, "rssclient ended");
929 void rss_cleanup(void)
931 /* citthread_mutex_destroy(&RSSQueueMutex); TODO */
932 DeleteHash(&RSSFetchUrls);
933 DeleteHash(&RSSQueueRooms);
936 void LogDebugEnableRSSClient(const int n)
938 RSSClientDebugEnabled = n;
942 typedef struct __RSSVetoInfo {
948 void rssclient_veto_scan_room(struct ctdlroom *qrbuf, void *data, OneRoomNetCfg *OneRNCFG)
950 RSSVetoInfo *Info = (RSSVetoInfo *) data;
951 const RSSCfgLine *RSSCfg = (RSSCfgLine *)OneRNCFG->NetConfigs[rssclient];
953 while (RSSCfg != NULL)
955 if ((RSSCfg->last_known_good != 0) &&
956 (RSSCfg->last_known_good + USETABLE_ANTIEXPIRE < Info->Now))
958 StrBufAppendPrintf(Info->ErrMsg,
959 "RSS feed not seen for a %d days:: <",
960 (Info->Now - RSSCfg->last_known_good) / (24 * 60 * 60));
962 StrBufAppendBuf(Info->ErrMsg, RSSCfg->Url, 0);
963 StrBufAppendBufPlain(Info->ErrMsg, HKEY(">\n"), 0);
965 RSSCfg = RSSCfg->next;
969 int RSSCheckUsetableVeto(StrBuf *ErrMsg)
973 Info.ErrMsg = ErrMsg;
974 Info.Now = time (NULL);
977 CtdlForEachNetCfgRoom(rssclient_veto_scan_room, &Info);
985 void ParseRSSClientCfgLine(const CfgLineType *ThisOne, StrBuf *Line, const char *LinePos, OneRoomNetCfg *OneRNCFG)
989 RSSCfg = (RSSCfgLine *) malloc (sizeof(RSSCfgLine));
990 RSSCfg->Url = NewStrBufPlain (NULL, StrLength (Line));
993 StrBufExtract_NextToken(RSSCfg->Url, Line, &LinePos, '|');
994 RSSCfg->last_known_good = StrBufExtractNext_long(Line, &LinePos, '|');
997 RSSCfg->next = (RSSCfgLine *)OneRNCFG->NetConfigs[ThisOne->C];
998 OneRNCFG->NetConfigs[ThisOne->C] = (RoomNetCfgLine*) RSSCfg;
1001 void SerializeRSSClientCfgLine(const CfgLineType *ThisOne, StrBuf *OutputBuffer, OneRoomNetCfg *RNCfg, RoomNetCfgLine *data)
1003 RSSCfgLine *RSSCfg = (RSSCfgLine*) data;
1005 StrBufAppendBufPlain(OutputBuffer, CKEY(ThisOne->Str), 0);
1006 StrBufAppendBufPlain(OutputBuffer, HKEY("|"), 0);
1007 StrBufAppendBufPlain(OutputBuffer, SKEY(RSSCfg->Url), 0);
1008 StrBufAppendPrintf(OutputBuffer, "|%ld\n", RSSCfg->last_known_good);
1011 void DeleteRSSClientCfgLine(const CfgLineType *ThisOne, RoomNetCfgLine **data)
1013 RSSCfgLine *RSSCfg = (RSSCfgLine*) *data;
1015 FreeStrBuf(&RSSCfg->Url);
1021 CTDL_MODULE_INIT(rssclient)
1025 CtdlRegisterTDAPVetoHook (RSSCheckUsetableVeto, CDB_USETABLE, 0);
1027 CtdlREGISTERRoomCfgType(rssclient, ParseRSSClientCfgLine, 0, 1, SerializeRSSClientCfgLine, DeleteRSSClientCfgLine);
1028 pthread_mutex_init(&RSSQueueMutex, NULL);
1029 RSSQueueRooms = NewHash(1, lFlathash);
1030 RSSFetchUrls = NewHash(1, NULL);
1031 syslog(LOG_INFO, "%s\n", curl_version());
1032 CtdlRegisterSessionHook(rssclient_scan, EVT_TIMER, PRIO_AGGR + 300);
1033 CtdlRegisterEVCleanupHook(rss_cleanup);
1034 CtdlRegisterDebugFlagHook(HKEY("rssclient"), LogDebugEnableRSSClient, &RSSClientDebugEnabled);
1038 CtdlFillSystemContext(&rss_CC, "rssclient");