/*
* RSS feed generator -- do one message
*/
void feed_rss_one_message(long msgnum) {
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;
/* Phase 1: read the message into memory */
serv_printf("MSG4 %ld", msgnum);
serv_getln(buf, sizeof buf);
if (buf[0] != '1') return;
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) {
/* do nothing */
}
else if (StrLength(Line) == 0) {
++in_body;
}
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 ((StrLength(Line) > 5) && (!strncasecmp(ChrPtr(Line), "msgn=", 5))) {
StrBufCutLeft(Line, 5);
permalink_hash = ThreadIdHash(Line);
}
}
/*
* 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);
/* XML parsers can be picky; strip out nonprintable header characters */
if ((strlen(buf)>=6) && (buf[4]=='=')) {
char *p = &buf[5];
while (*p) {
if (!isprint(*p)) {
*p = 0;
}
++p;
}
}
/* Now output fields */
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();
}
}
if (in_body) {
cdataout((char*)ChrPtr(messagetext));
FreeStrBuf(&messagetext);
wc_printf("</description>");
}
wc_printf("</item>");
}
FreeStrBuf(&Line);
FreeStrBuf(&ServerResponse);
return;
}
void cmd_gvdn(char *argbuf)
{
const ConfType *pCfg;
char *confptr;
long min = atol(argbuf);
const char *Pos = NULL;
const char *PPos = NULL;
const char *HKey;
long HKLen;
StrBuf *Line;
StrBuf *Config;
StrBuf *Cfg;
StrBuf *CfgToken;
HashList *List;
HashPos *It;
void *vptr;
List = NewHash(1, NULL);
Cfg = NewStrBufPlain(config.c_fqdn, -1);
Put(List, SKEY(Cfg), Cfg, HFreeStrBuf);
Cfg = NULL;
confptr = CtdlGetSysConfig(INTERNETCFG);
Config = NewStrBufPlain(confptr, -1);
free(confptr);
Line = NewStrBufPlain(NULL, StrLength(Config));
CfgToken = NewStrBufPlain(NULL, StrLength(Config));
while (StrBufSipLine(Line, Config, &Pos))
{
if (Cfg == NULL)
Cfg = NewStrBufPlain(NULL, StrLength(Line));
PPos = NULL;
StrBufExtract_NextToken(Cfg, Line, &PPos, '|');
StrBufExtract_NextToken(CfgToken, Line, &PPos, '|');
if (GetHash(CfgNameHash, SKEY(CfgToken), &vptr) &&
(vptr != NULL))
{
pCfg = (ConfType *) vptr;
if (pCfg->Type <= min)
{
Put(List, SKEY(Cfg), Cfg, HFreeStrBuf);
Cfg = NULL;
}
}
}
cprintf("%d Valid Domains\n", LISTING_FOLLOWS);
It = GetNewHashPos(List, 1);
while (GetNextHashPos(List, It, &HKLen, &HKey, &vptr))
{
cputbuf(vptr);
cprintf("\n");
}
cprintf("000\n");
DeleteHashPos(&It);
DeleteHash(&List);
FreeStrBuf(&Cfg);
FreeStrBuf(&Line);
FreeStrBuf(&CfgToken);
FreeStrBuf(&Config);
}
