2 * Bring external RSS feeds into rooms.
4 * Copyright (c) 2007-2015 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);
142 static void SetRSSState(AsyncIO *IO, RSSState State)
144 CitContext* CCC = IO->CitContext;
146 memcpy(CCC->cs_clientname, RSSStates[State].Key, RSSStates[State].len + 1);
149 void DeleteRoomReference(long QRnumber)
155 rss_room_counter *pRoomC;
157 At = GetNewHashPos(RSSQueueRooms, 0);
159 if (GetHashPosFromKey(RSSQueueRooms, LKEY(QRnumber), At))
161 GetHashPos(RSSQueueRooms, At, &HKLen, &HK, &vData);
164 pRoomC = (rss_room_counter *) vData;
166 if (pRoomC->count == 0)
167 DeleteEntryFromHash(RSSQueueRooms, At);
173 void UnlinkRooms(rss_aggregator *RSSAggr)
175 DeleteRoomReference(RSSAggr->Cfg.QRnumber);
176 if (RSSAggr->OtherQRnumbers != NULL)
183 At = GetNewHashPos(RSSAggr->OtherQRnumbers, 0);
184 while (! server_shutting_down &&
185 GetNextHashPos(RSSAggr->OtherQRnumbers,
191 pRSSConfig *Data = (pRSSConfig*) vData;
192 DeleteRoomReference(Data->QRnumber);
199 void UnlinkRSSAggregator(rss_aggregator *RSSAggr)
203 pthread_mutex_lock(&RSSQueueMutex);
204 UnlinkRooms(RSSAggr);
206 At = GetNewHashPos(RSSFetchUrls, 0);
207 if (GetHashPosFromKey(RSSFetchUrls, SKEY(RSSAggr->Url), At))
209 DeleteEntryFromHash(RSSFetchUrls, At);
212 last_run = time(NULL);
213 pthread_mutex_unlock(&RSSQueueMutex);
216 void DeleteRssCfg(void *vptr)
218 rss_aggregator *RSSAggr = (rss_aggregator *)vptr;
219 AsyncIO *IO = &RSSAggr->IO;
221 if (IO->CitContext != NULL)
222 EVRSSCM_syslog(LOG_DEBUG, "RSS: destroying\n");
224 FreeStrBuf(&RSSAggr->Url);
225 FreeStrBuf(&RSSAggr->RedirectUrl);
226 FreeStrBuf(&RSSAggr->rooms);
227 FreeStrBuf(&RSSAggr->CData);
228 FreeStrBuf(&RSSAggr->Key);
229 DeleteHash(&RSSAggr->OtherQRnumbers);
231 DeleteHashPos (&RSSAggr->Pos);
232 DeleteHash (&RSSAggr->Messages);
233 if (RSSAggr->recp.recp_room != NULL)
234 free(RSSAggr->recp.recp_room);
237 if (RSSAggr->Item != NULL)
239 flush_rss_item(RSSAggr->Item);
244 FreeAsyncIOContents(&RSSAggr->IO);
245 memset(RSSAggr, 0, sizeof(rss_aggregator));
249 eNextState RSSAggregator_Terminate(AsyncIO *IO)
251 rss_aggregator *RSSAggr = (rss_aggregator *)IO->Data;
253 EVRSSCM_syslog(LOG_DEBUG, "RSS: Terminating.\n");
255 StopCurlWatchers(IO);
256 UnlinkRSSAggregator(RSSAggr);
260 eNextState RSSAggregator_TerminateDB(AsyncIO *IO)
262 rss_aggregator *RSSAggr = (rss_aggregator *)IO->Data;
264 EVRSSCM_syslog(LOG_DEBUG, "RSS: Terminating.\n");
267 StopDBWatchers(&RSSAggr->IO);
268 UnlinkRSSAggregator(RSSAggr);
272 eNextState RSSAggregator_ShutdownAbort(AsyncIO *IO)
275 rss_aggregator *RSSAggr = (rss_aggregator *)IO->Data;
277 pUrl = IO->ConnectMe->PlainUrl;
281 EVRSSC_syslog(LOG_DEBUG, "RSS: Aborting by shutdown: %s.\n", pUrl);
283 StopCurlWatchers(IO);
284 UnlinkRSSAggregator(RSSAggr);
288 void AppendLink(StrBuf *Message,
293 if (StrLength(link) > 0)
295 StrBufAppendBufPlain(Message, HKEY("<a href=\""), 0);
296 StrBufAppendBuf(Message, link, 0);
297 StrBufAppendBufPlain(Message, HKEY("\">"), 0);
298 if (StrLength(LinkTitle) > 0)
299 StrBufAppendBuf(Message, LinkTitle, 0);
300 else if ((Title != NULL) && !IsEmptyStr(Title))
301 StrBufAppendBufPlain(Message, Title, -1, 0);
303 StrBufAppendBuf(Message, link, 0);
304 StrBufAppendBufPlain(Message, HKEY("</a><br>\n"), 0);
309 int rss_format_item(AsyncIO *IO, networker_save_message *SaveMsg)
314 if (StrLength(SaveMsg->description) +
315 StrLength(SaveMsg->link) +
316 StrLength(SaveMsg->linkTitle) +
317 StrLength(SaveMsg->reLink) +
318 StrLength(SaveMsg->reLinkTitle) +
319 StrLength(SaveMsg->title) == 0)
321 EVRSSCM_syslog(LOG_INFO, "Refusing to save empty message.");
325 CM_Flush(&SaveMsg->Msg);
327 if (SaveMsg->author_or_creator != NULL) {
330 StrBuf *Encoded = NULL;
333 From = html_to_ascii(ChrPtr(SaveMsg->author_or_creator),
334 StrLength(SaveMsg->author_or_creator),
336 StrBufPlain(SaveMsg->author_or_creator, From, -1);
337 StrBufTrim(SaveMsg->author_or_creator);
340 FromAt = strchr(ChrPtr(SaveMsg->author_or_creator), '@') != NULL;
341 if (!FromAt && StrLength (SaveMsg->author_email) > 0)
343 StrBufRFC2047encode(&Encoded, SaveMsg->author_or_creator);
344 CM_SetAsFieldSB(&SaveMsg->Msg, eAuthor, &Encoded);
345 CM_SetAsFieldSB(&SaveMsg->Msg, eMessagePath, &SaveMsg->author_email);
351 CM_SetAsFieldSB(&SaveMsg->Msg, eAuthor, &SaveMsg->author_or_creator);
352 CM_CopyField(&SaveMsg->Msg, eMessagePath, eAuthor);
356 StrBufRFC2047encode(&Encoded,
357 SaveMsg->author_or_creator);
358 CM_SetAsFieldSB(&SaveMsg->Msg, eAuthor, &Encoded);
359 CM_SetField(&SaveMsg->Msg, eMessagePath, HKEY("rss@localhost"));
365 CM_SetField(&SaveMsg->Msg, eAuthor, HKEY("rss"));
368 CM_SetField(&SaveMsg->Msg, eNodeName, CtdlGetConfigStr("c_nodename"), strlen(CtdlGetConfigStr("c_nodename")));
369 if (SaveMsg->title != NULL) {
372 StrBuf *Encoded, *QPEncoded;
375 StrBufSpaceToBlank(SaveMsg->title);
376 len = StrLength(SaveMsg->title);
377 Sbj = html_to_ascii(ChrPtr(SaveMsg->title), len, 512, 0);
379 if ((len > 0) && (Sbj[len - 1] == '\n'))
384 Encoded = NewStrBufPlain(Sbj, len);
388 StrBufRFC2047encode(&QPEncoded, Encoded);
390 CM_SetAsFieldSB(&SaveMsg->Msg, eMsgSubject, &QPEncoded);
391 FreeStrBuf(&Encoded);
393 if (SaveMsg->link == NULL)
394 SaveMsg->link = NewStrBufPlain(HKEY(""));
396 #if 0 /* temporarily disable shorter urls. */
397 SaveMsg->Msg.cm_fields[TMP_SHORTER_URLS] =
398 GetShorterUrls(SaveMsg->description);
401 msglen += 1024 + StrLength(SaveMsg->link) + StrLength(SaveMsg->description) ;
403 Message = NewStrBufPlain(NULL, msglen);
405 StrBufPlain(Message, HKEY(
406 "Content-type: text/html; charset=\"UTF-8\"\r\n\r\n"
408 #if 0 /* disable shorter url for now. */
409 SaveMsg->Msg.cm_fields[TMP_SHORTER_URL_OFFSET] = StrLength(Message);
411 StrBufAppendBuf(Message, SaveMsg->description, 0);
412 StrBufAppendBufPlain(Message, HKEY("<br><br>\n"), 0);
414 AppendLink(Message, SaveMsg->link, SaveMsg->linkTitle, NULL);
415 AppendLink(Message, SaveMsg->reLink, SaveMsg->reLinkTitle, "Reply to this");
416 StrBufAppendBufPlain(Message, HKEY("</body></html>\n"), 0);
418 SaveMsg->Message = Message;
422 eNextState RSSSaveMessage(AsyncIO *IO)
426 rss_aggregator *RSSAggr = (rss_aggregator *) IO->Data;
428 if (rss_format_item(IO, RSSAggr->ThisMsg))
430 CM_SetAsFieldSB(&RSSAggr->ThisMsg->Msg, eMesageText,
431 &RSSAggr->ThisMsg->Message);
433 CtdlSubmitMsg(&RSSAggr->ThisMsg->Msg, &RSSAggr->recp, NULL, 0);
435 /* write the uidl to the use table so we don't store this item again */
437 CheckIfAlreadySeen("RSS Item Insert", RSSAggr->ThisMsg->MsgGUID, EvGetNow(IO), 0, eWrite, CCID, IO->ID);
440 if (GetNextHashPos(RSSAggr->Messages,
443 (void**) &RSSAggr->ThisMsg))
444 return NextDBOperation(IO, RSS_FetchNetworkUsetableEntry);
449 eNextState RSS_FetchNetworkUsetableEntry(AsyncIO *IO)
451 static const time_t antiExpire = USETABLE_ANTIEXPIRE_HIRES;
453 time_t seenstamp = 0;
456 rss_aggregator *Ctx = (rss_aggregator *) IO->Data;
458 /* Find out if we've already seen this item */
460 SetRSSState(IO, eRSSUT);
461 seenstamp = CheckIfAlreadySeen("RSS Item Seen",
462 Ctx->ThisMsg->MsgGUID,
469 /* Item has already been seen */
470 EVRSSC_syslog(LOG_DEBUG,
471 "%s has already been seen - %ld < %ld",
472 ChrPtr(Ctx->ThisMsg->MsgGUID),
473 seenstamp, antiExpire);
475 SetRSSState(IO, eRSSParsing);
477 if (GetNextHashPos(Ctx->Messages,
480 (void**) &Ctx->ThisMsg))
481 return NextDBOperation(
483 RSS_FetchNetworkUsetableEntry);
490 /* Item has already been seen */
491 EVRSSC_syslog(LOG_DEBUG,
492 "%s Parsing - %ld >= %ld",
493 ChrPtr(Ctx->ThisMsg->MsgGUID),
494 seenstamp, antiExpire);
495 SetRSSState(IO, eRSSParsing);
497 NextDBOperation(IO, RSSSaveMessage);
503 void UpdateLastKnownGood(pRSSConfig *pCfg, time_t now)
505 OneRoomNetCfg* pRNCfg;
506 begin_critical_section(S_NETCONFIGS);
507 pRNCfg = CtdlGetNetCfgForRoom (pCfg->QRnumber);
510 RSSCfgLine *RSSCfg = (RSSCfgLine *)pRNCfg->NetConfigs[rssclient];
512 while (RSSCfg != NULL)
514 if (RSSCfg == pCfg->pCfg)
517 RSSCfg = RSSCfg->next;
522 RSSCfg->last_known_good = now;
526 end_critical_section(S_NETCONFIGS);
529 eNextState RSSAggregator_AnalyseReply(AsyncIO *IO)
535 u_char rawdigest[MD5_DIGEST_LEN];
536 struct MD5Context md5context;
538 rss_aggregator *Ctx = (rss_aggregator *) IO->Data;
541 if ((IO->HttpReq.httpcode >= 300) &&
542 (IO->HttpReq.httpcode < 400) &&
543 (Ctx->RedirectUrl != NULL)) {
549 SetRSSState(IO, eRSSFailure);
550 ErrMsg = NewStrBuf();
551 if (IO) EVRSSC_syslog(LOG_ALERT, "need a 200, got a %ld !\n",
552 IO->HttpReq.httpcode);
553 strs[0] = ChrPtr(Ctx->Url);
554 lens[0] = StrLength(Ctx->Url);
556 strs[1] = ChrPtr(Ctx->rooms);
557 lens[1] = StrLength(Ctx->rooms);
559 if (IO->HttpReq.CurlError == NULL)
560 IO->HttpReq.CurlError = "";
563 "Error while RSS-Aggregation Run of %s\n"
564 " need a 200, got a %ld !\n"
565 " Curl Error message: \n%s / %s\n"
566 " Redirect header points to: %s\n"
567 " Response text was: \n"
570 IO->HttpReq.httpcode,
572 IO->HttpReq.CurlError,
573 ChrPtr(Ctx->RedirectUrl),
574 ChrPtr(IO->HttpReq.ReplyData)
579 "RSS Aggregation run failure",
580 2, strs, (long*) &lens,
586 EVRSSC_syslog(LOG_DEBUG,
587 "RSS feed returned an invalid http status code. <%s><HTTP %ld>\n",
589 IO->HttpReq.httpcode);
592 else if (IO->HttpReq.httpcode != 200)
598 SetRSSState(IO, eRSSFailure);
599 ErrMsg = NewStrBuf();
600 if (IO) EVRSSC_syslog(LOG_ALERT, "need a 200, got a %ld !\n",
601 IO->HttpReq.httpcode);
602 strs[0] = ChrPtr(Ctx->Url);
603 lens[0] = StrLength(Ctx->Url);
605 strs[1] = ChrPtr(Ctx->rooms);
606 lens[1] = StrLength(Ctx->rooms);
608 if (IO->HttpReq.CurlError == NULL)
609 IO->HttpReq.CurlError = "";
612 "Error while RSS-Aggregation Run of %s\n"
613 " need a 200, got a %ld !\n"
614 " Curl Error message: \n%s / %s\n"
615 " Response text was: \n"
618 IO->HttpReq.httpcode,
620 IO->HttpReq.CurlError,
621 ChrPtr(IO->HttpReq.ReplyData)
626 "RSS Aggregation run failure",
627 2, strs, (long*) &lens,
633 EVRSSC_syslog(LOG_DEBUG,
634 "RSS feed returned an invalid http status code. <%s><HTTP %ld>\n",
636 IO->HttpReq.httpcode);
644 UpdateLastKnownGood (pCfg, EvGetNow(IO));
645 if ((Ctx->roomlist_parts > 1) &&
648 it = GetNewHashPos(RSSFetchUrls, 0);
653 if (GetNextHashPos(Ctx->OtherQRnumbers, it, &len, &Key, &vptr))
663 SetRSSState(IO, eRSSUT);
665 MD5Init(&md5context);
667 MD5Update(&md5context,
668 (const unsigned char*)SKEY(IO->HttpReq.ReplyData));
670 MD5Update(&md5context,
671 (const unsigned char*)SKEY(Ctx->Url));
673 MD5Final(rawdigest, &md5context);
674 guid = NewStrBufPlain(NULL,
675 MD5_DIGEST_LEN * 2 + 12 /* _rss2ctdl*/);
676 StrBufHexEscAppend(guid, NULL, rawdigest, MD5_DIGEST_LEN);
677 StrBufAppendBufPlain(guid, HKEY("_rssFM"), 0);
678 if (StrLength(guid) > 40)
679 StrBufCutAt(guid, 40, NULL);
680 /* Find out if we've already seen this item */
684 if (CheckIfAlreadySeen("RSS Whole",
687 EvGetNow(IO) - USETABLE_ANTIEXPIRE,
694 EVRSSC_syslog(LOG_DEBUG, "RSS feed already seen. <%s>\n", ChrPtr(Ctx->Url));
699 SetRSSState(IO, eRSSParsing);
700 return RSSAggregator_ParseReply(IO);
703 eNextState RSSAggregator_FinishHttp(AsyncIO *IO)
705 return CurlQueueDBOperation(IO, RSSAggregator_AnalyseReply);
711 int rss_do_fetching(rss_aggregator *RSSAggr)
713 AsyncIO *IO = &RSSAggr->IO;
722 if ((RSSAggr->next_poll != 0) && (now < RSSAggr->next_poll))
725 ri = (rss_item*) malloc(sizeof(rss_item));
726 memset(ri, 0, sizeof(rss_item));
729 if (! InitcURLIOStruct(&RSSAggr->IO,
731 "Citadel RSS Client",
732 RSSAggregator_FinishHttp,
733 RSSAggregator_Terminate,
734 RSSAggregator_TerminateDB,
735 RSSAggregator_ShutdownAbort))
737 EVRSSCM_syslog(LOG_ALERT, "Unable to initialize libcurl.\n");
740 chnd = IO->HttpReq.chnd;
742 OPT(HEADERFUNCTION, GetLocationString);
743 SetRSSState(IO, eRSSCreated);
745 safestrncpy(((CitContext*)RSSAggr->IO.CitContext)->cs_host,
746 ChrPtr(RSSAggr->Url),
747 sizeof(((CitContext*)RSSAggr->IO.CitContext)->cs_host));
749 EVRSSC_syslog(LOG_DEBUG, "Fetching RSS feed <%s>\n", ChrPtr(RSSAggr->Url));
750 ParseURL(&RSSAggr->IO.ConnectMe, RSSAggr->Url, 80);
751 CurlPrepareURL(RSSAggr->IO.ConnectMe);
753 SetRSSState(IO, eRSSFetching);
754 QueueCurlContext(&RSSAggr->IO);
759 * Scan a room's netconfig to determine whether it is requesting any RSS feeds
761 void rssclient_scan_room(struct ctdlroom *qrbuf, void *data, OneRoomNetCfg *OneRNCFG)
763 const RSSCfgLine *RSSCfg = (RSSCfgLine *)OneRNCFG->NetConfigs[rssclient];
764 rss_aggregator *RSSAggr = NULL;
765 rss_aggregator *use_this_RSSAggr = NULL;
768 pthread_mutex_lock(&RSSQueueMutex);
769 if (GetHash(RSSQueueRooms, LKEY(qrbuf->QRnumber), &vptr))
771 EVRSSQ_syslog(LOG_DEBUG,
772 "rssclient: [%ld] %s already in progress.\n",
775 pthread_mutex_unlock(&RSSQueueMutex);
778 pthread_mutex_unlock(&RSSQueueMutex);
780 if (server_shutting_down) return;
782 while (RSSCfg != NULL)
784 pthread_mutex_lock(&RSSQueueMutex);
785 GetHash(RSSFetchUrls,
789 use_this_RSSAggr = (rss_aggregator *)vptr;
790 if (use_this_RSSAggr != NULL)
794 StrBufAppendBufPlain(
795 use_this_RSSAggr->rooms,
798 if (use_this_RSSAggr->roomlist_parts==1)
800 use_this_RSSAggr->OtherQRnumbers
801 = NewHash(1, lFlathash);
804 pRSSCfg = (pRSSConfig *) malloc(sizeof(pRSSConfig));
806 pRSSCfg->QRnumber = qrbuf->QRnumber;
807 pRSSCfg->pCfg = RSSCfg;
809 Put(use_this_RSSAggr->OtherQRnumbers,
810 LKEY(qrbuf->QRnumber),
813 use_this_RSSAggr->roomlist_parts++;
815 pthread_mutex_unlock(&RSSQueueMutex);
817 RSSCfg = RSSCfg->next;
820 pthread_mutex_unlock(&RSSQueueMutex);
822 RSSAggr = (rss_aggregator *) malloc(
823 sizeof(rss_aggregator));
825 memset (RSSAggr, 0, sizeof(rss_aggregator));
826 RSSAggr->Cfg.QRnumber = qrbuf->QRnumber;
827 RSSAggr->Cfg.pCfg = RSSCfg;
828 RSSAggr->roomlist_parts = 1;
829 RSSAggr->Url = NewStrBufDup(RSSCfg->Url);
831 RSSAggr->ItemType = RSS_UNSET;
833 RSSAggr->rooms = NewStrBufPlain(
836 pthread_mutex_lock(&RSSQueueMutex);
843 pthread_mutex_unlock(&RSSQueueMutex);
844 RSSCfg = RSSCfg->next;
849 * Scan for rooms that have RSS client requests configured
851 void rssclient_scan(void) {
852 int RSSRoomCount, RSSCount;
853 rss_aggregator *rptr = NULL;
858 time_t now = time(NULL);
860 /* Run no more than once every 15 minutes. */
861 if ((now - last_run) < 900) {
862 EVRSSQ_syslog(LOG_DEBUG,
863 "Client: polling interval not yet reached; last run was %ldm%lds ago",
864 ((now - last_run) / 60),
865 ((now - last_run) % 60)
871 * This is a simple concurrency check to make sure only one rssclient
872 * run is done at a time.
874 pthread_mutex_lock(&RSSQueueMutex);
875 RSSCount = GetCount(RSSFetchUrls);
876 RSSRoomCount = GetCount(RSSQueueRooms);
877 pthread_mutex_unlock(&RSSQueueMutex);
879 if ((RSSRoomCount > 0) || (RSSCount > 0)) {
880 EVRSSQ_syslog(LOG_DEBUG,
881 "rssclient: concurrency check failed; %d rooms and %d url's are queued",
882 RSSRoomCount, RSSCount
887 become_session(&rss_CC);
888 EVRSSQM_syslog(LOG_DEBUG, "rssclient started");
889 CtdlForEachNetCfgRoom(rssclient_scan_room, NULL, rssclient);
891 if (GetCount(RSSFetchUrls) > 0)
893 pthread_mutex_lock(&RSSQueueMutex);
894 EVRSSQ_syslog(LOG_DEBUG,
895 "rssclient starting %d Clients",
896 GetCount(RSSFetchUrls));
898 it = GetNewHashPos(RSSFetchUrls, 0);
899 while (!server_shutting_down &&
900 GetNextHashPos(RSSFetchUrls, it, &len, &Key, &vrptr) &&
902 rptr = (rss_aggregator *)vrptr;
903 if (!rss_do_fetching(rptr))
904 UnlinkRSSAggregator(rptr);
907 pthread_mutex_unlock(&RSSQueueMutex);
910 EVRSSQM_syslog(LOG_DEBUG, "Nothing to do.");
912 EVRSSQM_syslog(LOG_DEBUG, "rssclient ended\n");
916 void rss_cleanup(void)
918 /* citthread_mutex_destroy(&RSSQueueMutex); TODO */
919 DeleteHash(&RSSFetchUrls);
920 DeleteHash(&RSSQueueRooms);
923 void LogDebugEnableRSSClient(const int n)
925 RSSClientDebugEnabled = n;
929 typedef struct __RSSVetoInfo {
935 void rssclient_veto_scan_room(struct ctdlroom *qrbuf, void *data, OneRoomNetCfg *OneRNCFG)
937 RSSVetoInfo *Info = (RSSVetoInfo *) data;
938 const RSSCfgLine *RSSCfg = (RSSCfgLine *)OneRNCFG->NetConfigs[rssclient];
940 while (RSSCfg != NULL)
942 if ((RSSCfg->last_known_good != 0) &&
943 (RSSCfg->last_known_good + USETABLE_ANTIEXPIRE < Info->Now))
945 StrBufAppendPrintf(Info->ErrMsg,
946 "RSS feed not seen for a %d days:: <",
947 (Info->Now - RSSCfg->last_known_good) / (24 * 60 * 60));
949 StrBufAppendBuf(Info->ErrMsg, RSSCfg->Url, 0);
950 StrBufAppendBufPlain(Info->ErrMsg, HKEY(">\n"), 0);
952 RSSCfg = RSSCfg->next;
956 int RSSCheckUsetableVeto(StrBuf *ErrMsg)
960 Info.ErrMsg = ErrMsg;
961 Info.Now = time (NULL);
964 CtdlForEachNetCfgRoom(rssclient_veto_scan_room, &Info, rssclient);
972 void ParseRSSClientCfgLine(const CfgLineType *ThisOne, StrBuf *Line, const char *LinePos, OneRoomNetCfg *OneRNCFG)
976 RSSCfg = (RSSCfgLine *) malloc (sizeof(RSSCfgLine));
977 RSSCfg->Url = NewStrBufPlain (NULL, StrLength (Line));
980 StrBufExtract_NextToken(RSSCfg->Url, Line, &LinePos, '|');
981 RSSCfg->last_known_good = StrBufExtractNext_long(Line, &LinePos, '|');
984 RSSCfg->next = (RSSCfgLine *)OneRNCFG->NetConfigs[ThisOne->C];
985 OneRNCFG->NetConfigs[ThisOne->C] = (RoomNetCfgLine*) RSSCfg;
988 void SerializeRSSClientCfgLine(const CfgLineType *ThisOne, StrBuf *OutputBuffer, OneRoomNetCfg *RNCfg, RoomNetCfgLine *data)
990 RSSCfgLine *RSSCfg = (RSSCfgLine*) data;
992 StrBufAppendBufPlain(OutputBuffer, CKEY(ThisOne->Str), 0);
993 StrBufAppendBufPlain(OutputBuffer, HKEY("|"), 0);
994 StrBufAppendBufPlain(OutputBuffer, SKEY(RSSCfg->Url), 0);
995 StrBufAppendPrintf(OutputBuffer, "|%ld\n", RSSCfg->last_known_good);
998 void DeleteRSSClientCfgLine(const CfgLineType *ThisOne, RoomNetCfgLine **data)
1000 RSSCfgLine *RSSCfg = (RSSCfgLine*) *data;
1002 FreeStrBuf(&RSSCfg->Url);
1008 CTDL_MODULE_INIT(rssclient)
1012 CtdlRegisterTDAPVetoHook (RSSCheckUsetableVeto, CDB_USETABLE, 0);
1014 CtdlREGISTERRoomCfgType(rssclient, ParseRSSClientCfgLine, 0, 1, SerializeRSSClientCfgLine, DeleteRSSClientCfgLine);
1015 pthread_mutex_init(&RSSQueueMutex, NULL);
1016 RSSQueueRooms = NewHash(1, lFlathash);
1017 RSSFetchUrls = NewHash(1, NULL);
1018 syslog(LOG_INFO, "%s\n", curl_version());
1019 CtdlRegisterSessionHook(rssclient_scan, EVT_TIMER, PRIO_AGGR + 300);
1020 CtdlRegisterEVCleanupHook(rss_cleanup);
1021 CtdlRegisterDebugFlagHook(HKEY("rssclient"), LogDebugEnableRSSClient, &RSSClientDebugEnabled);
1025 CtdlFillSystemContext(&rss_CC, "rssclient");