Readloop remove special cases
[citadel.git] / webcit / feed_generator.c
index 4daebf4d94121e64e77202ff2c875223d2ebaedd..34b721bdd248ec35fd8902a6558e69902d2eb6f5 100644 (file)
@@ -1,12 +1,12 @@
 /*
- * RSS/Atom feed generator
+ * RSS feed generator (could be adapted in the future to feed both RSS and Atom)
  *
- * Copyright (c) 2010 by the citadel.org team
+ * Copyright (c) 2010-2011 by the citadel.org team
  *
- * This program is free software; you can redistribute it and/or modify
- * it under the terms of the GNU General Public License as published by
- * the Free Software Foundation; either version 3 of the License, or
- * (at your option) any later version.
+ * This program is open source software.  You can redistribute it and/or
+ * modify it under the terms of the GNU General Public License as
+ * published by the Free Software Foundation; either version 3 of the
+ * License, or (at your option) any later version.
  *
  * This program is distributed in the hope that it will be useful,
  * but WITHOUT ANY WARRANTY; without even the implied warranty of
@@ -15,7 +15,7 @@
  *
  * You should have received a copy of the GNU General Public License
  * along with this program; if not, write to the Free Software
- * Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307  USA
+ * Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA
  */
 
 #include "webcit.h"
  * RSS feed generator -- do one message
  */
 void feed_rss_one_message(long msgnum) {
-       char buf[1024];
        int in_body = 0;
+       int in_messagetext = 0;
        int found_title = 0;
+       int found_guid = 0;
        char pubdate[128];
+       StrBuf *messagetext = NULL;
+       int is_top_level_post = 1;
+       const char *BufPtr = NULL;
+       StrBuf *Line = NewStrBufPlain(NULL, 1024);
+       char buf[1024];
+       int permalink_hash = 0;
 
-       serv_printf("MSG0 %ld", msgnum);                /* FIXME we want msg4 eventually */
+       /* Phase 1: read the message into memory */
+       serv_printf("MSG4 %ld", msgnum);
        serv_getln(buf, sizeof buf);
        if (buf[0] != '1') return;
-
-       wc_printf("<item>");
-       wc_printf("<link>%s/readfwd?gotofirst=", ChrPtr(site_prefix));
-       urlescputs(ChrPtr(WC->CurRoom.name));
-       wc_printf("?start_reading_at=%ld</link>", msgnum);
-
+       StrBuf *ServerResponse = NewStrBuf();
        while (serv_getln(buf, sizeof buf), strcmp(buf, "000")) {
+               StrBufAppendPrintf(ServerResponse, "%s\n", buf);
+       }
+
+       /* Phase 2: help SkyNet become self-aware */
+       BufPtr = NULL;
+       while (StrBufSipLine(Line, ServerResponse, &BufPtr), ((BufPtr!=StrBufNOTNULL)&&(BufPtr!=NULL)) ) {
                if (in_body) {
-                       escputs(buf);
+                       /* do nothing */
                }
-               else if (!strncasecmp(buf, "subj=", 5)) {
-                       wc_printf("<title>");
-                       escputs(&buf[5]);
-                       wc_printf("</title>");
-                       ++found_title;
+               else if (StrLength(Line) == 0) {
+                       ++in_body;
                }
-               else if (!strncasecmp(buf, "exti=", 5)) {
-                       wc_printf("<guid>");
-                       escputs(&buf[5]);
-                       wc_printf("</guid>");
+               else if ((StrLength(Line) > 5) && (!strncasecmp(ChrPtr(Line), "wefw=", 5))) {
+                       is_top_level_post = 0;  /* presence of references means it's a reply/comment */
                }
-               else if (!strncasecmp(buf, "time=", 5)) {
-                       http_datestring(pubdate, sizeof pubdate, atol(&buf[5]));
-                       wc_printf("<pubDate>%s</pubDate>", pubdate);
+               else if ((StrLength(Line) > 5) && (!strncasecmp(ChrPtr(Line), "msgn=", 5))) {
+                       StrBufCutLeft(Line, 5);
+                       permalink_hash = ThreadIdHash(Line);
                }
-               else if (!strncasecmp(buf, "text", 4)) {
-                       if (!found_title) {
-                               wc_printf("<title>Message #%ld</title>", msgnum);
+       }
+
+       /*
+        * Phase 3: output the message in RSS <item> form
+        * (suppress replies [comments] if this is a blog room)
+        */
+       if ( (WC->CurRoom.view != VIEW_BLOG) || (is_top_level_post == 1) ) {
+               wc_printf("<item>");
+               wc_printf("<link>%s/readfwd?go=", ChrPtr(site_prefix));
+               urlescputs(ChrPtr(WC->CurRoom.name));
+               if ((WC->CurRoom.view == VIEW_BLOG) && (permalink_hash != 0)) {
+                       wc_printf("?p=%d", permalink_hash);
+               }
+               else {
+                       wc_printf("?start_reading_at=%ld", msgnum);
+               }
+               wc_printf("</link>");
+       
+               BufPtr = NULL;
+               in_body = 0;
+               in_messagetext = 0;
+               while (StrBufSipLine(Line, ServerResponse, &BufPtr), ((BufPtr!=StrBufNOTNULL)&&(BufPtr!=NULL)) ) {
+                       safestrncpy(buf, ChrPtr(Line), sizeof buf);
+                       if (in_body) {
+                               if (in_messagetext) {
+                                       StrBufAppendBufPlain(messagetext, buf, -1, 0);
+                                       StrBufAppendBufPlain(messagetext, HKEY("\r\n"), 0);
+                               }
+                               else if (IsEmptyStr(buf)) {
+                                       in_messagetext = 1;
+                               }
+                       }
+                       else if (!strncasecmp(buf, "subj=", 5)) {
+                               wc_printf("<title>");
+                               escputs(&buf[5]);
+                               wc_printf("</title>");
+                               ++found_title;
+                       }
+                       else if (!strncasecmp(buf, "exti=", 5)) {
+                               wc_printf("<guid isPermaLink=\"false\">");
+                               escputs(&buf[5]);
+                               wc_printf("</guid>");
+                               ++found_guid;
+                       }
+                       else if (!strncasecmp(buf, "time=", 5)) {
+                               http_datestring(pubdate, sizeof pubdate, atol(&buf[5]));
+                               wc_printf("<pubDate>%s</pubDate>", pubdate);
+                       }
+                       else if (!strncasecmp(buf, "text", 4)) {
+                               if (!found_title) {
+                                       wc_printf("<title>Message #%ld</title>", msgnum);
+                               }
+                               if (!found_guid) {
+                                       wc_printf("<guid isPermaLink=\"false\">%ld@%s</guid>",
+                                               msgnum,
+                                               ChrPtr(WC->serv_info->serv_humannode)
+                                       );
+                               }
+                               wc_printf("<description>");
+                               in_body = 1;
+                               messagetext = NewStrBuf();
                        }
-                       wc_printf("<description>");
-                       in_body = 1;
                }
-       }
+       
+               if (in_body) {
+                       cdataout((char*)ChrPtr(messagetext));
+                       FreeStrBuf(&messagetext);
+                       wc_printf("</description>");
+               }
 
-       if (in_body) {
-               wc_printf("</description>");
+               wc_printf("</item>");
        }
 
-       wc_printf("</item>");
+       FreeStrBuf(&Line);
+       FreeStrBuf(&ServerResponse);
+       return;
 }
 
 /*
  * RSS feed generator -- go through the message list
  */
 void feed_rss_do_messages(void) {
-       char buf[1024];
-       long *msgs = NULL;
+       wcsession *WCC = WC;
        int num_msgs = 0;
-       int num_msgs_alloc = 0;
        int i;
+       SharedMessageStatus Stat;
+       message_summary *Msg = NULL;
 
-       serv_puts("MSGP text/html|text/plain");         /* identify our preferred mime types */
-       serv_getln(buf, sizeof buf);                    /* don't care about the result */
-
-       serv_puts("MSGS ALL");                          /* ask for all messages in the room */
-       serv_getln(buf, sizeof buf);
-       if (buf[0] != '1') return;
-
-       while (serv_getln(buf, sizeof buf), strcmp(buf, "000"))
-       {
-               if (num_msgs >= num_msgs_alloc) {
-                       num_msgs_alloc += 1024;
-                       msgs = realloc(msgs, num_msgs_alloc*sizeof(long) );
-               }
-               msgs[num_msgs++] = atol(buf);
-       }
+       memset(&Stat, 0, sizeof Stat);
+       Stat.maxload = INT_MAX;
+       Stat.lowest_found = (-1);
+       Stat.highest_found = (-1);
+       num_msgs = load_msg_ptrs("MSGS ALL", NULL, &Stat, NULL);
+       if (num_msgs < 1) return;
 
        i = num_msgs;                                   /* convention is to feed newest-to-oldest */
        while (i > 0) {
-               feed_rss_one_message(msgs[i-1]);
+               Msg = GetMessagePtrAt(i-1, WCC->summ);
+               if (Msg != NULL) {
+                       feed_rss_one_message(Msg->msgnum);
+               }
                --i;
        }
+}
 
-       free(msgs);
 
+/*
+ * Output the room info file of the current room as a <description> for the channel
+ */
+void feed_rss_do_room_info_as_description(void)
+{
+       wc_printf("<description>");
+       escputs(ChrPtr(WC->CurRoom.name));      /* FIXME use the output of RINF instead */
+       wc_printf("</description>\r\n");
 }
 
+
 /*
  * Entry point for RSS feed generator
  */
 void feed_rss(void) {
+       char buf[1024];
 
-       output_headers(0, 0, 0, 1, 1, 0);
-       hprintf("Content-type: text/xml\r\n");
+       output_headers(0, 0, 0, 0, 1, 0);
+       hprintf("Content-type: text/xml; charset=utf-8\r\n");
        hprintf(
                "Server: %s / %s\r\n"
                "Connection: close\r\n"
@@ -127,7 +197,7 @@ void feed_rss(void) {
        begin_burst();
 
        wc_printf("<?xml version=\"1.0\"?>"
-               "<rss version=\"2.0\" xmlns:atom=\"http://www.w3.org/2005/Atom\">"
+               "<rss version=\"2.0\">"
                "<channel>"
        );
 
@@ -136,19 +206,31 @@ void feed_rss(void) {
        wc_printf("</title>");
 
        wc_printf("<link>");
-       urlescputs(ChrPtr(site_prefix));
-       wc_printf("</link>");
+       escputs(ChrPtr(site_prefix));
+       wc_printf("/</link>");
 
-       //      <language>en-us</language>
-       //      <description>Linux Today News Service</description>
-       //      <atom:link href="http://linuxtoday.com/biglt.rss" rel="self" type="application/rss+xml" />
+       serv_puts("RINF");
+       serv_getln(buf, sizeof buf);
+       if (buf[0] == '1') {
+               wc_printf("<description>\r\n");
+               while (serv_getln(buf, sizeof buf), strcmp(buf, "000")) {
+                       escputs(buf);
+                       wc_printf("\r\n");
+               }
+               wc_printf("</description>");
+       }
 
-       //    <image>
-       //      <title>Linux Today</title>
-       //      <url>http://linuxtoday.com/pics/ltnet.png</url>
-       //      <link>http://linuxtoday.com</link>
-       //    </image>
+       wc_printf("<image><title>");
+       escputs(ChrPtr(WC->CurRoom.name));
+       wc_printf("</title><url>");
+       escputs(ChrPtr(site_prefix));
+       wc_printf("/image?name=_roompic_?go=");
+       urlescputs(ChrPtr(WC->CurRoom.name));
+       wc_printf("</url><link>");
+       escputs(ChrPtr(site_prefix));
+       wc_printf("/</link></image>\r\n");
 
+       feed_rss_do_room_info_as_description();
        feed_rss_do_messages();
 
        wc_printf("</channel>"
@@ -157,7 +239,44 @@ void feed_rss(void) {
        );
 
        wDumpContent(0);
-       end_webcit_session();
+}
+
+
+/*
+ * Offer the RSS feed meta tag for this room
+ */
+void tmplput_rssmeta(StrBuf *Target, WCTemplputParams *TP) 
+{
+       wcsession *WCC = WC;
+       char feed_link[1024];
+       char encoded_link[1024];
+
+       strcpy(feed_link, "/feed_rss?go=");
+       urlesc(&feed_link[20], sizeof(feed_link) - 20, (char *)ChrPtr(WCC->CurRoom.name) );
+       CtdlEncodeBase64(encoded_link, feed_link, strlen(feed_link), 0);
+
+       StrBufAppendPrintf(Target,
+               "<link rel=\"alternate\" title=\"RSS\" href=\"/B64%s\" type=\"application/rss+xml\">",
+               encoded_link
+       );
+}
+
+
+/*
+ * Offer the RSS feed button for this room
+ */
+void tmplput_rssbutton(StrBuf *Target, WCTemplputParams *TP) 
+{
+       StrBuf *FeedLink = NULL;
+
+       FeedLink = NewStrBufPlain(HKEY("/feed_rss?go="));
+       StrBufUrlescAppend(FeedLink, WC->CurRoom.name, NULL);
+
+       StrBufAppendPrintf(Target, "<a type=\"application/rss+xml\" href=\"");
+       StrBufAppendBuf(Target, FeedLink, 0);
+       StrBufAppendPrintf(Target, "\"><img src=\"static/webcit_icons/essen/16x16/rss.png\" alt=\"RSS\">");
+       StrBufAppendPrintf(Target, "</a>");
+       FreeStrBuf(&FeedLink);
 }
 
 
@@ -165,5 +284,7 @@ void
 InitModule_RSS
 (void)
 {
-       WebcitAddUrlHandler(HKEY("feed_rss"), "", 0, feed_rss, ANONYMOUS|COOKIEUNNEEDED|FORCE_SESSIONCLOSE);
+       WebcitAddUrlHandler(HKEY("feed_rss"), "", 0, feed_rss, ANONYMOUS|COOKIEUNNEEDED);
+       RegisterNamespace("THISROOM:FEED:RSS", 0, 0, tmplput_rssbutton, NULL, CTX_NONE);
+       RegisterNamespace("THISROOM:FEED:RSSMETA", 0, 0, tmplput_rssmeta, NULL, CTX_NONE);
 }