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);
378 if (!IsEmptyStr(Sbj)) {
380 if ((Sbj[len - 1] == '\n'))
385 Encoded = NewStrBufPlain(Sbj, len);
389 StrBufRFC2047encode(&QPEncoded, Encoded);
391 CM_SetAsFieldSB(&SaveMsg->Msg, eMsgSubject, &QPEncoded);
392 FreeStrBuf(&Encoded);
398 if (SaveMsg->link == NULL)
399 SaveMsg->link = NewStrBufPlain(HKEY(""));
401 #if 0 /* temporarily disable shorter urls. */
402 SaveMsg->Msg.cm_fields[TMP_SHORTER_URLS] =
403 GetShorterUrls(SaveMsg->description);
406 msglen += 1024 + StrLength(SaveMsg->link) + StrLength(SaveMsg->description) ;
408 Message = NewStrBufPlain(NULL, msglen);
410 StrBufPlain(Message, HKEY(
411 "Content-type: text/html; charset=\"UTF-8\"\r\n\r\n"
413 #if 0 /* disable shorter url for now. */
414 SaveMsg->Msg.cm_fields[TMP_SHORTER_URL_OFFSET] = StrLength(Message);
416 StrBufAppendBuf(Message, SaveMsg->description, 0);
417 StrBufAppendBufPlain(Message, HKEY("<br><br>\n"), 0);
419 AppendLink(Message, SaveMsg->link, SaveMsg->linkTitle, NULL);
420 AppendLink(Message, SaveMsg->reLink, SaveMsg->reLinkTitle, "Reply to this");
421 StrBufAppendBufPlain(Message, HKEY("</body></html>\n"), 0);
423 SaveMsg->Message = Message;
427 eNextState RSSSaveMessage(AsyncIO *IO)
431 rss_aggregator *RSSAggr = (rss_aggregator *) IO->Data;
433 if (rss_format_item(IO, RSSAggr->ThisMsg))
435 CM_SetAsFieldSB(&RSSAggr->ThisMsg->Msg, eMesageText,
436 &RSSAggr->ThisMsg->Message);
438 CtdlSubmitMsg(&RSSAggr->ThisMsg->Msg, &RSSAggr->recp, NULL, 0);
440 /* write the uidl to the use table so we don't store this item again */
442 CheckIfAlreadySeen("RSS Item Insert", RSSAggr->ThisMsg->MsgGUID, EvGetNow(IO), 0, eWrite, CCID, IO->ID);
445 if (GetNextHashPos(RSSAggr->Messages,
448 (void**) &RSSAggr->ThisMsg))
449 return NextDBOperation(IO, RSS_FetchNetworkUsetableEntry);
454 eNextState RSS_FetchNetworkUsetableEntry(AsyncIO *IO)
456 static const time_t antiExpire = USETABLE_ANTIEXPIRE_HIRES;
458 time_t seenstamp = 0;
461 rss_aggregator *Ctx = (rss_aggregator *) IO->Data;
463 /* Find out if we've already seen this item */
465 SetRSSState(IO, eRSSUT);
466 seenstamp = CheckIfAlreadySeen("RSS Item Seen",
467 Ctx->ThisMsg->MsgGUID,
474 /* Item has already been seen */
475 EVRSSC_syslog(LOG_DEBUG,
476 "%s has already been seen - %ld < %ld",
477 ChrPtr(Ctx->ThisMsg->MsgGUID),
478 seenstamp, antiExpire);
480 SetRSSState(IO, eRSSParsing);
482 if (GetNextHashPos(Ctx->Messages,
485 (void**) &Ctx->ThisMsg))
486 return NextDBOperation(
488 RSS_FetchNetworkUsetableEntry);
495 /* Item has already been seen */
496 EVRSSC_syslog(LOG_DEBUG,
497 "%s Parsing - %ld >= %ld",
498 ChrPtr(Ctx->ThisMsg->MsgGUID),
499 seenstamp, antiExpire);
500 SetRSSState(IO, eRSSParsing);
502 NextDBOperation(IO, RSSSaveMessage);
508 void UpdateLastKnownGood(pRSSConfig *pCfg, time_t now)
510 OneRoomNetCfg* pRNCfg;
511 begin_critical_section(S_NETCONFIGS);
512 pRNCfg = CtdlGetNetCfgForRoom (pCfg->QRnumber);
515 RSSCfgLine *RSSCfg = (RSSCfgLine *)pRNCfg->NetConfigs[rssclient];
517 while (RSSCfg != NULL)
519 if (RSSCfg == pCfg->pCfg)
522 RSSCfg = RSSCfg->next;
527 RSSCfg->last_known_good = now;
531 end_critical_section(S_NETCONFIGS);
534 eNextState RSSAggregator_AnalyseReply(AsyncIO *IO)
540 u_char rawdigest[MD5_DIGEST_LEN];
541 struct MD5Context md5context;
543 rss_aggregator *Ctx = (rss_aggregator *) IO->Data;
546 if ((IO->HttpReq.httpcode >= 300) &&
547 (IO->HttpReq.httpcode < 400) &&
548 (Ctx->RedirectUrl != NULL)) {
554 SetRSSState(IO, eRSSFailure);
555 ErrMsg = NewStrBuf();
556 if (IO) EVRSSC_syslog(LOG_ALERT, "need a 200, got a %ld !\n",
557 IO->HttpReq.httpcode);
558 strs[0] = ChrPtr(Ctx->Url);
559 lens[0] = StrLength(Ctx->Url);
561 strs[1] = ChrPtr(Ctx->rooms);
562 lens[1] = StrLength(Ctx->rooms);
564 if (IO->HttpReq.CurlError == NULL)
565 IO->HttpReq.CurlError = "";
568 "Error while RSS-Aggregation Run of %s\n"
569 " need a 200, got a %ld !\n"
570 " Curl Error message: \n%s / %s\n"
571 " Redirect header points to: %s\n"
572 " Response text was: \n"
575 IO->HttpReq.httpcode,
577 IO->HttpReq.CurlError,
578 ChrPtr(Ctx->RedirectUrl),
579 ChrPtr(IO->HttpReq.ReplyData)
584 "RSS Aggregation run failure",
585 2, strs, (long*) &lens,
591 EVRSSC_syslog(LOG_DEBUG,
592 "RSS feed returned an invalid http status code. <%s><HTTP %ld>\n",
594 IO->HttpReq.httpcode);
597 else if (IO->HttpReq.httpcode != 200)
603 SetRSSState(IO, eRSSFailure);
604 ErrMsg = NewStrBuf();
605 if (IO) EVRSSC_syslog(LOG_ALERT, "need a 200, got a %ld !\n",
606 IO->HttpReq.httpcode);
607 strs[0] = ChrPtr(Ctx->Url);
608 lens[0] = StrLength(Ctx->Url);
610 strs[1] = ChrPtr(Ctx->rooms);
611 lens[1] = StrLength(Ctx->rooms);
613 if (IO->HttpReq.CurlError == NULL)
614 IO->HttpReq.CurlError = "";
617 "Error while RSS-Aggregation Run of %s\n"
618 " need a 200, got a %ld !\n"
619 " Curl Error message: \n%s / %s\n"
620 " Response text was: \n"
623 IO->HttpReq.httpcode,
625 IO->HttpReq.CurlError,
626 ChrPtr(IO->HttpReq.ReplyData)
631 "RSS Aggregation run failure",
632 2, strs, (long*) &lens,
638 EVRSSC_syslog(LOG_DEBUG,
639 "RSS feed returned an invalid http status code. <%s><HTTP %ld>\n",
641 IO->HttpReq.httpcode);
649 UpdateLastKnownGood (pCfg, EvGetNow(IO));
650 if ((Ctx->roomlist_parts > 1) &&
653 it = GetNewHashPos(RSSFetchUrls, 0);
658 if (GetNextHashPos(Ctx->OtherQRnumbers, it, &len, &Key, &vptr))
668 SetRSSState(IO, eRSSUT);
670 MD5Init(&md5context);
672 MD5Update(&md5context,
673 (const unsigned char*)SKEY(IO->HttpReq.ReplyData));
675 MD5Update(&md5context,
676 (const unsigned char*)SKEY(Ctx->Url));
678 MD5Final(rawdigest, &md5context);
679 guid = NewStrBufPlain(NULL,
680 MD5_DIGEST_LEN * 2 + 12 /* _rss2ctdl*/);
681 StrBufHexEscAppend(guid, NULL, rawdigest, MD5_DIGEST_LEN);
682 StrBufAppendBufPlain(guid, HKEY("_rssFM"), 0);
683 if (StrLength(guid) > 40)
684 StrBufCutAt(guid, 40, NULL);
685 /* Find out if we've already seen this item */
689 if (CheckIfAlreadySeen("RSS Whole",
692 EvGetNow(IO) - USETABLE_ANTIEXPIRE,
699 EVRSSC_syslog(LOG_DEBUG, "RSS feed already seen. <%s>\n", ChrPtr(Ctx->Url));
704 SetRSSState(IO, eRSSParsing);
705 return RSSAggregator_ParseReply(IO);
708 eNextState RSSAggregator_FinishHttp(AsyncIO *IO)
710 return CurlQueueDBOperation(IO, RSSAggregator_AnalyseReply);
716 int rss_do_fetching(rss_aggregator *RSSAggr)
718 AsyncIO *IO = &RSSAggr->IO;
727 if ((RSSAggr->next_poll != 0) && (now < RSSAggr->next_poll))
730 ri = (rss_item*) malloc(sizeof(rss_item));
731 memset(ri, 0, sizeof(rss_item));
734 if (! InitcURLIOStruct(&RSSAggr->IO,
736 "Citadel RSS Client",
737 RSSAggregator_FinishHttp,
738 RSSAggregator_Terminate,
739 RSSAggregator_TerminateDB,
740 RSSAggregator_ShutdownAbort))
742 EVRSSCM_syslog(LOG_ALERT, "Unable to initialize libcurl.\n");
745 chnd = IO->HttpReq.chnd;
747 OPT(HEADERFUNCTION, GetLocationString);
748 SetRSSState(IO, eRSSCreated);
750 safestrncpy(((CitContext*)RSSAggr->IO.CitContext)->cs_host,
751 ChrPtr(RSSAggr->Url),
752 sizeof(((CitContext*)RSSAggr->IO.CitContext)->cs_host));
754 EVRSSC_syslog(LOG_DEBUG, "Fetching RSS feed <%s>\n", ChrPtr(RSSAggr->Url));
755 ParseURL(&RSSAggr->IO.ConnectMe, RSSAggr->Url, 80);
756 CurlPrepareURL(RSSAggr->IO.ConnectMe);
758 SetRSSState(IO, eRSSFetching);
759 QueueCurlContext(&RSSAggr->IO);
764 * Scan a room's netconfig to determine whether it is requesting any RSS feeds
766 void rssclient_scan_room(struct ctdlroom *qrbuf, void *data, OneRoomNetCfg *OneRNCFG)
768 const RSSCfgLine *RSSCfg = (RSSCfgLine *)OneRNCFG->NetConfigs[rssclient];
769 rss_aggregator *RSSAggr = NULL;
770 rss_aggregator *use_this_RSSAggr = NULL;
773 pthread_mutex_lock(&RSSQueueMutex);
774 if (GetHash(RSSQueueRooms, LKEY(qrbuf->QRnumber), &vptr))
776 EVRSSQ_syslog(LOG_DEBUG,
777 "rssclient: [%ld] %s already in progress.\n",
780 pthread_mutex_unlock(&RSSQueueMutex);
783 pthread_mutex_unlock(&RSSQueueMutex);
785 if (server_shutting_down) return;
787 while (RSSCfg != NULL)
789 pthread_mutex_lock(&RSSQueueMutex);
790 GetHash(RSSFetchUrls,
794 use_this_RSSAggr = (rss_aggregator *)vptr;
795 if (use_this_RSSAggr != NULL)
799 StrBufAppendBufPlain(
800 use_this_RSSAggr->rooms,
803 if (use_this_RSSAggr->roomlist_parts==1)
805 use_this_RSSAggr->OtherQRnumbers
806 = NewHash(1, lFlathash);
809 pRSSCfg = (pRSSConfig *) malloc(sizeof(pRSSConfig));
811 pRSSCfg->QRnumber = qrbuf->QRnumber;
812 pRSSCfg->pCfg = RSSCfg;
814 Put(use_this_RSSAggr->OtherQRnumbers,
815 LKEY(qrbuf->QRnumber),
818 use_this_RSSAggr->roomlist_parts++;
820 pthread_mutex_unlock(&RSSQueueMutex);
822 RSSCfg = RSSCfg->next;
825 pthread_mutex_unlock(&RSSQueueMutex);
827 RSSAggr = (rss_aggregator *) malloc(
828 sizeof(rss_aggregator));
830 memset (RSSAggr, 0, sizeof(rss_aggregator));
831 RSSAggr->Cfg.QRnumber = qrbuf->QRnumber;
832 RSSAggr->Cfg.pCfg = RSSCfg;
833 RSSAggr->roomlist_parts = 1;
834 RSSAggr->Url = NewStrBufDup(RSSCfg->Url);
836 RSSAggr->ItemType = RSS_UNSET;
838 RSSAggr->rooms = NewStrBufPlain(
841 pthread_mutex_lock(&RSSQueueMutex);
848 pthread_mutex_unlock(&RSSQueueMutex);
849 RSSCfg = RSSCfg->next;
854 * Scan for rooms that have RSS client requests configured
856 void rssclient_scan(void) {
857 int RSSRoomCount, RSSCount;
858 rss_aggregator *rptr = NULL;
863 time_t now = time(NULL);
865 /* Run no more than once every 15 minutes. */
866 if ((now - last_run) < 900) {
867 EVRSSQ_syslog(LOG_DEBUG,
868 "Client: polling interval not yet reached; last run was %ldm%lds ago",
869 ((now - last_run) / 60),
870 ((now - last_run) % 60)
876 * This is a simple concurrency check to make sure only one rssclient
877 * run is done at a time.
879 pthread_mutex_lock(&RSSQueueMutex);
880 RSSCount = GetCount(RSSFetchUrls);
881 RSSRoomCount = GetCount(RSSQueueRooms);
882 pthread_mutex_unlock(&RSSQueueMutex);
884 if ((RSSRoomCount > 0) || (RSSCount > 0)) {
885 EVRSSQ_syslog(LOG_DEBUG,
886 "rssclient: concurrency check failed; %d rooms and %d url's are queued",
887 RSSRoomCount, RSSCount
892 become_session(&rss_CC);
893 EVRSSQM_syslog(LOG_DEBUG, "rssclient started");
894 CtdlForEachNetCfgRoom(rssclient_scan_room, NULL, rssclient);
896 if (GetCount(RSSFetchUrls) > 0)
898 pthread_mutex_lock(&RSSQueueMutex);
899 EVRSSQ_syslog(LOG_DEBUG,
900 "rssclient starting %d Clients",
901 GetCount(RSSFetchUrls));
903 it = GetNewHashPos(RSSFetchUrls, 0);
904 while (!server_shutting_down &&
905 GetNextHashPos(RSSFetchUrls, it, &len, &Key, &vrptr) &&
907 rptr = (rss_aggregator *)vrptr;
908 if (!rss_do_fetching(rptr))
909 UnlinkRSSAggregator(rptr);
912 pthread_mutex_unlock(&RSSQueueMutex);
915 EVRSSQM_syslog(LOG_DEBUG, "Nothing to do.");
917 EVRSSQM_syslog(LOG_DEBUG, "rssclient ended\n");
921 void rss_cleanup(void)
923 /* citthread_mutex_destroy(&RSSQueueMutex); TODO */
924 DeleteHash(&RSSFetchUrls);
925 DeleteHash(&RSSQueueRooms);
928 void LogDebugEnableRSSClient(const int n)
930 RSSClientDebugEnabled = n;
934 typedef struct __RSSVetoInfo {
940 void rssclient_veto_scan_room(struct ctdlroom *qrbuf, void *data, OneRoomNetCfg *OneRNCFG)
942 RSSVetoInfo *Info = (RSSVetoInfo *) data;
943 const RSSCfgLine *RSSCfg = (RSSCfgLine *)OneRNCFG->NetConfigs[rssclient];
945 while (RSSCfg != NULL)
947 if ((RSSCfg->last_known_good != 0) &&
948 (RSSCfg->last_known_good + USETABLE_ANTIEXPIRE < Info->Now))
950 StrBufAppendPrintf(Info->ErrMsg,
951 "RSS feed not seen for a %d days:: <",
952 (Info->Now - RSSCfg->last_known_good) / (24 * 60 * 60));
954 StrBufAppendBuf(Info->ErrMsg, RSSCfg->Url, 0);
955 StrBufAppendBufPlain(Info->ErrMsg, HKEY(">\n"), 0);
957 RSSCfg = RSSCfg->next;
961 int RSSCheckUsetableVeto(StrBuf *ErrMsg)
965 Info.ErrMsg = ErrMsg;
966 Info.Now = time (NULL);
969 CtdlForEachNetCfgRoom(rssclient_veto_scan_room, &Info, rssclient);
977 void ParseRSSClientCfgLine(const CfgLineType *ThisOne, StrBuf *Line, const char *LinePos, OneRoomNetCfg *OneRNCFG)
981 RSSCfg = (RSSCfgLine *) malloc (sizeof(RSSCfgLine));
982 RSSCfg->Url = NewStrBufPlain (NULL, StrLength (Line));
985 StrBufExtract_NextToken(RSSCfg->Url, Line, &LinePos, '|');
986 RSSCfg->last_known_good = StrBufExtractNext_long(Line, &LinePos, '|');
989 RSSCfg->next = (RSSCfgLine *)OneRNCFG->NetConfigs[ThisOne->C];
990 OneRNCFG->NetConfigs[ThisOne->C] = (RoomNetCfgLine*) RSSCfg;
993 void SerializeRSSClientCfgLine(const CfgLineType *ThisOne, StrBuf *OutputBuffer, OneRoomNetCfg *RNCfg, RoomNetCfgLine *data)
995 RSSCfgLine *RSSCfg = (RSSCfgLine*) data;
997 StrBufAppendBufPlain(OutputBuffer, CKEY(ThisOne->Str), 0);
998 StrBufAppendBufPlain(OutputBuffer, HKEY("|"), 0);
999 StrBufAppendBufPlain(OutputBuffer, SKEY(RSSCfg->Url), 0);
1000 StrBufAppendPrintf(OutputBuffer, "|%ld\n", RSSCfg->last_known_good);
1003 void DeleteRSSClientCfgLine(const CfgLineType *ThisOne, RoomNetCfgLine **data)
1005 RSSCfgLine *RSSCfg = (RSSCfgLine*) *data;
1007 FreeStrBuf(&RSSCfg->Url);
1013 CTDL_MODULE_INIT(rssclient)
1017 CtdlRegisterTDAPVetoHook (RSSCheckUsetableVeto, CDB_USETABLE, 0);
1019 CtdlREGISTERRoomCfgType(rssclient, ParseRSSClientCfgLine, 0, 1, SerializeRSSClientCfgLine, DeleteRSSClientCfgLine);
1020 pthread_mutex_init(&RSSQueueMutex, NULL);
1021 RSSQueueRooms = NewHash(1, lFlathash);
1022 RSSFetchUrls = NewHash(1, NULL);
1023 syslog(LOG_INFO, "%s\n", curl_version());
1024 CtdlRegisterSessionHook(rssclient_scan, EVT_TIMER, PRIO_AGGR + 300);
1025 CtdlRegisterEVCleanupHook(rss_cleanup);
1026 CtdlRegisterDebugFlagHook(HKEY("rssclient"), LogDebugEnableRSSClient, &RSSClientDebugEnabled);
1030 CtdlFillSystemContext(&rss_CC, "rssclient");