From 3393117e5ff8faef209bbf4988a59743f00b2a80 Mon Sep 17 00:00:00 2001 From: Eric Wong Date: Wed, 30 Sep 2015 21:00:24 +0000 Subject: nntp: implement LIST HEADERS We shall remove slow, unoptimized headers in XHDR/HDR to avoid becoming an easy DoS target. --- lib/PublicInbox/NNTP.pm | 7 +++++++ 1 file changed, 7 insertions(+) (limited to 'lib/PublicInbox/NNTP.pm') diff --git a/lib/PublicInbox/NNTP.pm b/lib/PublicInbox/NNTP.pm index 142bee39..12760394 100644 --- a/lib/PublicInbox/NNTP.pm +++ b/lib/PublicInbox/NNTP.pm @@ -25,6 +25,8 @@ sub now () { clock_gettime(CLOCK_MONOTONIC) }; my @OVERVIEW = qw(Subject From Date Message-ID References Bytes Lines); my $OVERVIEW_FMT = join(":\r\n", @OVERVIEW) . ":\r\n"; +my $LIST_HEADERS = join("\r\n", qw(Subject From Date Message-ID References + :bytes :lines Xref To Cc)) . "\r\n"; # disable commands with easy DoS potential: # LISTGROUP could get pretty bad, too... @@ -95,6 +97,11 @@ sub list_overview_fmt ($) { do_more($self, $OVERVIEW_FMT); } +sub list_headers ($;$) { + my ($self) = @_; + do_more($self, $LIST_HEADERS); +} + sub list_active ($;$) { my ($self, $wildmat) = @_; wildmat2re($wildmat); -- cgit v1.2.3-24-ge0c7