[w3m-dev 03610] Re: news:<newsgroup>
* anchor.c (_put_anchor_news): check '<' (reAnchorNewsheader): added * file.c (loadSomething): Subject: as buffername (checkHeader): check buf->document_header (loadGeneralFile): reAnchorNewsheader * html.h (SCM_NNTP_GROUP): added * main.c (main): delete USE_NNTP in switch (newbuf->real_scheme) (chkNMIDBuffer): lowercase in url_like_pat * news.c (add_news_message): add scheme, group as arg (openNewsStream): check SCM_NNTP_GROUP check current_news.host (readNewsgroup): rewrite to support nntp:,news: extension * proto.h (reAnchorNewsheader): added * url.c (DefaultPort): add 119 for nntp group (parseURL2): rewrite to support nntp:,news: extension (_parsedURL2Str): add for SCM_NNTP_GROUP (openURL): rewrite to support nntp:,news: extension From: Hironori SAKAMOTO <hsaka@mth.biglobe.ne.jp>
This commit is contained in:
179
news.c
179
news.c
@@ -1,4 +1,4 @@
|
||||
/* $Id: news.c,v 1.5 2002/12/27 16:46:13 ukai Exp $ */
|
||||
/* $Id: news.c,v 1.6 2003/01/06 15:36:59 ukai Exp $ */
|
||||
#include "fm.h"
|
||||
#include "myctype.h"
|
||||
#include <stdio.h>
|
||||
@@ -181,7 +181,7 @@ html_quote_s(char *str)
|
||||
|
||||
static void
|
||||
add_news_message(Str str, int index, char *date, char *name, char *subject,
|
||||
char *mid)
|
||||
char *mid, char *scheme, char *group)
|
||||
{
|
||||
time_t t;
|
||||
struct tm *tm;
|
||||
@@ -190,12 +190,40 @@ add_news_message(Str str, int index, char *date, char *name, char *subject,
|
||||
t = mymktime(date);
|
||||
tm = localtime(&t);
|
||||
Strcat(str,
|
||||
Sprintf
|
||||
("<tr valign=top><td>%d<td nowrap>(%02d/%02d)<td nowrap>%s<td><a href=\"news:%s\">%s</a>\n",
|
||||
index, tm->tm_mon + 1, tm->tm_mday, html_quote_s(name),
|
||||
html_quote(file_quote(mid)), html_quote(subject)));
|
||||
Sprintf("<tr valign=top><td>%d<td nowrap>(%02d/%02d)<td nowrap>%s",
|
||||
index, tm->tm_mon + 1, tm->tm_mday, html_quote_s(name)));
|
||||
if (group)
|
||||
Strcat(str, Sprintf("<td><a href=\"%s%s/%d\">%s</a>\n", scheme, group,
|
||||
index, html_quote(subject)));
|
||||
else
|
||||
Strcat(str, Sprintf("<td><a href=\"%s%s\">%s</a>\n", scheme,
|
||||
html_quote(file_quote(mid)), html_quote(subject)));
|
||||
}
|
||||
|
||||
/*
|
||||
* [News article]
|
||||
* * RFC 1738
|
||||
* nntp://<host>:<port>/<newsgroup-name>/<article-number>
|
||||
* news:<message-id>
|
||||
*
|
||||
* * Extension
|
||||
* nntp://<host>:<port>/<newsgroup-name>/<message-id>
|
||||
* nntp://<host>:<port>/<message-id>
|
||||
* news:<newsgroup-name>/<article-number>
|
||||
* news:<newsgroup-name>/<message-id>
|
||||
*
|
||||
* [News group]
|
||||
* * RFC 1738
|
||||
* news:<newsgroup-name>
|
||||
*
|
||||
* * Extension
|
||||
* nntp://<host>:<port>/<newsgroup-name>
|
||||
* nntp://<host>:<port>/<newsgroup-name>/<start-number>-<end-number>
|
||||
* news:<newsgroup-name>/<start-number>-<end-number>
|
||||
*
|
||||
* <message-id> = <unique>@<full_domain_name>
|
||||
*/
|
||||
|
||||
InputStream
|
||||
openNewsStream(ParsedURL *pu)
|
||||
{
|
||||
@@ -205,13 +233,17 @@ openNewsStream(ParsedURL *pu)
|
||||
|
||||
if (pu->file == NULL || *pu->file == '\0')
|
||||
return NULL;
|
||||
if (pu->scheme == SCM_NNTP)
|
||||
if (pu->scheme == SCM_NNTP || pu->scheme == SCM_NNTP_GROUP)
|
||||
host = pu->host;
|
||||
else
|
||||
host = NNTP_server;
|
||||
if (!host || *host == '\0')
|
||||
if (!host || *host == '\0') {
|
||||
if (current_news.host)
|
||||
news_quit(¤t_news);
|
||||
return NULL;
|
||||
if (pu->scheme != SCM_NNTP && (p = strchr(host, ':'))) {
|
||||
}
|
||||
if (pu->scheme != SCM_NNTP && pu->scheme != SCM_NNTP_GROUP &&
|
||||
(p = strchr(host, ':'))) {
|
||||
host = allocStr(host, p - host);
|
||||
port = atoi(p + 1);
|
||||
}
|
||||
@@ -238,24 +270,33 @@ openNewsStream(ParsedURL *pu)
|
||||
if (!news_open(¤t_news))
|
||||
return NULL;
|
||||
}
|
||||
if (pu->scheme == SCM_NNTP) {
|
||||
/* first char of pu->file is '/' */
|
||||
group = file_unquote(Strnew_charp(pu->file + 1)->ptr);
|
||||
if (pu->scheme == SCM_NNTP || pu->scheme == SCM_NEWS) {
|
||||
/* News article */
|
||||
group = allocStr(pu->file, -1);
|
||||
if (pu->scheme == SCM_NNTP && *group == '/') {
|
||||
/* first char of pu->file is '/' */
|
||||
group++;
|
||||
}
|
||||
group = file_unquote(group);
|
||||
p = strchr(group, '/');
|
||||
if (p == NULL)
|
||||
return NULL;
|
||||
*p++ = '\0';
|
||||
news_command(¤t_news, Sprintf("GROUP %s", group)->ptr, &status);
|
||||
if (status != 211)
|
||||
return NULL;
|
||||
news_command(¤t_news, Sprintf("ARTICLE %s", p)->ptr, &status);
|
||||
if (status != 220)
|
||||
return NULL;
|
||||
return current_news.rf;
|
||||
}
|
||||
else if (pu->scheme == SCM_NEWS) {
|
||||
tmp = Sprintf("ARTICLE <%s>", url_unquote(pu->file));
|
||||
news_command(¤t_news, tmp->ptr, &status);
|
||||
if (p == NULL) { /* <message-id> */
|
||||
if (!strchr(group, '@'))
|
||||
return NULL;
|
||||
p = group;
|
||||
}
|
||||
else { /* <newsgroup>/<message-id or article-number> */
|
||||
*p++ = '\0';
|
||||
news_command(¤t_news, Sprintf("GROUP %s", group)->ptr,
|
||||
&status);
|
||||
if (status != 211)
|
||||
return NULL;
|
||||
}
|
||||
if (strchr(p, '@')) /* <message-id> */
|
||||
news_command(¤t_news, Sprintf("ARTICLE <%s>", p)->ptr,
|
||||
&status);
|
||||
else /* <article-number> */
|
||||
news_command(¤t_news, Sprintf("ARTICLE %s", p)->ptr,
|
||||
&status);
|
||||
if (status != 220)
|
||||
return NULL;
|
||||
return current_news.rf;
|
||||
@@ -270,8 +311,7 @@ readNewsgroup(ParsedURL *pu)
|
||||
Str tmp;
|
||||
URLFile f;
|
||||
Buffer *buf;
|
||||
char *group, *p, *q, *s, *t, *n;
|
||||
char *volatile qgroup;
|
||||
char *scheme, *group, *qgroup, *list, *p, *q, *s, *t, *n;
|
||||
int status, i, first, last;
|
||||
volatile int flag = 0, start = 0, end = 0;
|
||||
char code = '\0';
|
||||
@@ -279,14 +319,28 @@ readNewsgroup(ParsedURL *pu)
|
||||
|
||||
if (current_news.host == NULL || !pu->file || *pu->file == '\0')
|
||||
return NULL;
|
||||
group = file_unquote(pu->file);
|
||||
qgroup = html_quote(group);
|
||||
page = Strnew();
|
||||
|
||||
group = allocStr(pu->file, -1);
|
||||
if (pu->scheme == SCM_NNTP_GROUP) {
|
||||
if (*group == '/')
|
||||
group++;
|
||||
scheme = "nntp:/";
|
||||
}
|
||||
else
|
||||
scheme = "news:";
|
||||
if ((list = strchr(group, '/'))) {
|
||||
/* <newsgroup>/<start-number>-<end-number> */
|
||||
*list++ = '\0';
|
||||
}
|
||||
if (fmInitialized) {
|
||||
message(Sprintf("Reading newsgroup %s...", group)->ptr, 0, 0);
|
||||
refresh();
|
||||
}
|
||||
qgroup = html_quote(group);
|
||||
group = file_unquote(group);
|
||||
page = Sprintf("<title>Newsgroup: %s</title>\n\
|
||||
<h1>Newsgroup: %s</h1>\n<hr>\n",
|
||||
qgroup, qgroup);
|
||||
|
||||
if (SETJMP(AbortLoading) != 0) {
|
||||
news_close(¤t_news);
|
||||
Strcat_charp(page, "</table><p>Transfer Interrupted!\n");
|
||||
@@ -296,42 +350,44 @@ readNewsgroup(ParsedURL *pu)
|
||||
if (fmInitialized)
|
||||
term_cbreak();
|
||||
|
||||
page =
|
||||
Sprintf
|
||||
("<title>Newsgroup: %s</title>\n<h1>Newsgroup: %s</h1>\n<hr>\n",
|
||||
qgroup, qgroup);
|
||||
|
||||
qgroup = html_quote(file_quote(group)); /* URL */
|
||||
tmp =
|
||||
news_command(¤t_news, Sprintf("GROUP %s", group)->ptr, &status);
|
||||
if (status != 211)
|
||||
goto news_list;
|
||||
if (sscanf(tmp->ptr, "%d %d %d %d", &status, &i, &first, &last) != 4)
|
||||
goto news_list;
|
||||
if (pu->label) {
|
||||
start = atoi(pu->label);
|
||||
if (list && *list) {
|
||||
if ((p = strchr(list, '-'))) {
|
||||
*p++ = '\0';
|
||||
end = atoi(p);
|
||||
}
|
||||
start = atoi(list);
|
||||
if (start > 0) {
|
||||
if (start < first)
|
||||
start = first;
|
||||
end = start + MaxNewsMessage;
|
||||
if (end <= 0)
|
||||
end = start + MaxNewsMessage - 1;
|
||||
}
|
||||
}
|
||||
if (start <= 0) {
|
||||
start = first;
|
||||
end = last + 1;
|
||||
if (end - start > MaxNewsMessage)
|
||||
start = end - MaxNewsMessage;
|
||||
end = last;
|
||||
if (end - start > MaxNewsMessage - 1)
|
||||
start = end - MaxNewsMessage + 1;
|
||||
}
|
||||
page = Sprintf("<title>Newsgroup: %s %d-%d</title>\n\
|
||||
<h1>Newsgroup: %s %d-%d</h1>\n<hr>\n",
|
||||
qgroup, start, end, qgroup, start, end);
|
||||
if (start > first) {
|
||||
i = start - MaxNewsMessage;
|
||||
if (i < first)
|
||||
i = first;
|
||||
Strcat(page, Sprintf("<a href=\"news:%s#%d\">[%d-%d]</a>\n",
|
||||
qgroup, i, i, start - 1));
|
||||
Strcat(page, Sprintf("<a href=\"%s%s/%d-%d\">[%d-%d]</a>\n", scheme,
|
||||
qgroup, i, start - 1, i, start - 1));
|
||||
}
|
||||
|
||||
Strcat_charp(page, "<table>\n");
|
||||
news_command(¤t_news, Sprintf("XOVER %d-%d", start, end - 1)->ptr,
|
||||
news_command(¤t_news, Sprintf("XOVER %d-%d", start, end)->ptr,
|
||||
&status);
|
||||
if (status == 224) {
|
||||
f.scheme = SCM_NEWS;
|
||||
@@ -360,13 +416,14 @@ readNewsgroup(ParsedURL *pu)
|
||||
*q = '\0';
|
||||
s = convertLine(&f, decodeMIME(s), &code, HEADER_MODE)->ptr;
|
||||
n = convertLine(&f, decodeMIME(n), &code, HEADER_MODE)->ptr;
|
||||
add_news_message(page, i, t, n, s, p);
|
||||
add_news_message(page, i, t, n, s, p, scheme,
|
||||
pu->scheme == SCM_NNTP_GROUP ? qgroup : NULL);
|
||||
}
|
||||
}
|
||||
else {
|
||||
init_stream(&f, SCM_NEWS, current_news.rf);
|
||||
buf = newBuffer(INIT_BUFFER_WIDTH);
|
||||
for (i = start; i < end && i <= last; i++) {
|
||||
for (i = start; i <= end && i <= last; i++) {
|
||||
news_command(¤t_news, Sprintf("HEAD %d", i)->ptr, &status);
|
||||
if (status != 221)
|
||||
continue;
|
||||
@@ -383,23 +440,26 @@ readNewsgroup(ParsedURL *pu)
|
||||
continue;
|
||||
if (!(t = checkHeader(buf, "Date:")))
|
||||
continue;
|
||||
add_news_message(page, i, t, n, s, p);
|
||||
add_news_message(page, i, t, n, s, p, scheme,
|
||||
pu->scheme == SCM_NNTP_GROUP ? qgroup : NULL);
|
||||
}
|
||||
}
|
||||
Strcat_charp(page, "</table>\n");
|
||||
|
||||
if (end <= last) {
|
||||
i = end + MaxNewsMessage - 1;
|
||||
if (end < last) {
|
||||
i = end + MaxNewsMessage;
|
||||
if (i > last)
|
||||
i = last;
|
||||
Strcat(page, Sprintf("<a href=\"news:%s#%d\">[%d-%d]</a>\n",
|
||||
qgroup, end, end, i));
|
||||
Strcat(page, Sprintf("<a href=\"%s%s/%d-%d\">[%d-%d]</a>\n", scheme,
|
||||
qgroup, end + 1, i, end + 1, i));
|
||||
}
|
||||
flag = 1;
|
||||
|
||||
news_list:
|
||||
news_command(¤t_news, Sprintf("LIST ACTIVE %s.*", group)->ptr,
|
||||
&status);
|
||||
tmp = Sprintf("LIST ACTIVE %s", group);
|
||||
if (!strchr(group, '*'))
|
||||
Strcat_charp(tmp, ".*");
|
||||
news_command(¤t_news, tmp->ptr, &status);
|
||||
if (status != 215)
|
||||
goto news_end;
|
||||
while (1) {
|
||||
@@ -415,13 +475,14 @@ readNewsgroup(ParsedURL *pu)
|
||||
p = tmp->ptr;
|
||||
for (q = p; *q && !IS_SPACE(*q); q++) ;
|
||||
*(q++) = '\0';
|
||||
i = 0;
|
||||
if (sscanf(q, "%d %d", &last, &first) == 2 && last >= first)
|
||||
i = last - first + 1;
|
||||
else
|
||||
i = 0;
|
||||
Strcat(page,
|
||||
Sprintf
|
||||
("<tr><td align=right>%d<td><a href=\"news:%s\">%s</a>\n", i,
|
||||
html_quote(file_quote(p)), html_quote(p)));
|
||||
("<tr><td align=right>%d<td><a href=\"%s%s\">%s</a>\n", i,
|
||||
scheme, html_quote(file_quote(p)), html_quote(p)));
|
||||
}
|
||||
if (flag == 2)
|
||||
Strcat_charp(page, "</table>\n");
|
||||
|
||||
Reference in New Issue
Block a user