ruby-net-nntp 0.2.2 → 1.0.0

data/lib/net/nntp/version.rb

@@ -1,5 +1,6 @@
+# Namespace 
 module Net      
   class NNTP
-    VERSION = "0.2.2"
+    VERSION = "1.0.0"
   end
 end

data/script/console

@@ -0,0 +1,12 @@
+#!/usr/bin/ruby
+$: << 'lib'
+
+require 'irb'
+require 'net/nntp'
+
+Net::NNTP.logger=Log4r::Logger['net::nntp'] || Log4r::Logger.new('net::nntp')
+Net::NNTP.logger.outputters = Log4r::Outputter.stdout
+Log4r::Outputter.stdout.formatter = Log4r::PatternFormatter.new(:pattern => '%d [%5l] : %m')
+
+IRB.start(__FILE__)
+

data/spec/net/nntp/request_spec.rb

@@ -0,0 +1,771 @@
+require File.join(File.dirname(__FILE__), %w[.. .. spec_helper])
+def body 
+  <<-EOF
+From: "Demo User" <nobody@example.net>
+Newsgroups: misc.test
+Subject: I am just a test article
+Organization: An Example Net
+
+This is just a test article.
+.
+With a special property.
+    EOF
+end
+
+def check_body
+<<-EOF
+From: Demo User <nobody@example.net>
+Subject: I am just a test article
+Newsgroups: misc.test
+Organization: An Example Net
+
+This is just a test article.
+.
+With a special property.
+EOF
+end
+
+describe 'Requests with body', :shared => true do
+
+  it 'should read the body from a string' do
+    @req.body = @body
+    @req.body.to_s.should == @check_body
+  end
+
+  it 'should read the body from an IO object' do
+    raw = StringIO.new
+    raw << @body
+    raw.rewind
+    @req.body = raw
+    @req.body.to_s.should == @check_body
+  end
+
+  it 'should let the body be filled from a block' do
+    raw = StringIO.new
+    raw << @body
+    raw.rewind
+    @req.instance_variable_set(:@body, nil)
+    @req.body { raw.string }
+    @req.body.to_s.should == @check_body
+    @req.instance_variable_set(:@body, nil)
+    @req.body { raw }
+    @req.body.to_s.should == @check_body
+  end
+
+end
+
+describe Net::NNTP::Request do
+  before do
+    @req = Net::NNTP::Request.new('help')
+  end
+
+  it 'should be able to generate a command' do
+    @req.command.should == "HELP\r\n"
+  end
+
+  it 'should accept general responses as valid' do
+    @req.valid_response?(Net::NNTP::NotImplemented.new(@req, '500', 'Not Implemented')).should be_true
+  end
+
+  it 'should return the indicating capability' do
+    @req.capability.should == 'mandatory'
+  end
+
+end
+
+describe Net::NNTP::Help do
+  before do
+    @req = Net::NNTP::Help.new
+  end
+  it 'should generate a HELP command' do
+    @req.command.should == "HELP\r\n"
+  end
+
+  it 'should accept HelpResponse as valid' do
+    @req.valid_response?(Net::NNTP::HelpResponse.new(@req, '100', 'Help')).should be_true
+  end
+
+  it 'should have "mandatory" as indicating capability' do
+    @req.capability.should == 'mandatory'
+  end
+
+end
+
+describe Net::NNTP::Capabilities do
+  before do
+    @req = Net::NNTP::Capabilities.new
+  end
+  it 'should generate a CAPABILITIES command' do
+    @req.command.should == "CAPABILITIES\r\n"
+  end
+
+  it 'should accept CapabilityList as valid' do
+    @req.valid_response?(Net::NNTP::CapabilityList.new(@req, '101', 'Capabilities')).should be_true
+  end
+
+  it 'should have "mandatory" as indicating capability' do
+    @req.capability.should == 'mandatory'
+  end
+
+end
+
+describe Net::NNTP::Modereader do
+  before do
+    @req = Net::NNTP::Modereader.new
+  end
+  it 'should generate a MODE READER command' do
+    @req.command.should == "MODE READER\r\n"
+  end
+
+  it 'should accept PostingAllowed as valid' do
+    @req.valid_response?(Net::NNTP::PostingAllowed.new(@req, '200', 'welcome')).should be_true
+  end
+
+  it 'should accept PostingProhibited as valid' do
+    @req.valid_response?(Net::NNTP::PostingProhibited.new(@req, '201', 'not allowed')).should be_true
+  end
+
+  it 'should have "mode-reader" as indicating capability' do
+    @req.capability.should == 'mode-reader'
+  end
+
+end
+
+describe Net::NNTP::Authinfo do
+  before do
+    @req = Net::NNTP::Authinfo.new('user', 'test')
+  end
+  it 'should generate an AUTHINFO USER command' do
+    @req.command.should == "AUTHINFO USER test\r\n"
+  end
+
+  it 'should generate an AUTHINFO PASS command' do
+    @req = Net::NNTP::Authinfo.new('pass', 'test')
+    @req.command.should == "AUTHINFO PASS test\r\n"
+  end
+
+  it 'should accept PasswordRequired as valid' do
+    @req.valid_response?(Net::NNTP::PasswordRequired.new(@req, '381', 'need password')).should be_true
+  end
+
+  it 'should accept AuthenticationAccepted as valid' do
+    @req.valid_response?(Net::NNTP::AuthenticationAccepted.new(@req, '281', 'need password')).should be_true
+  end
+
+  it 'should accept AuthenticationFailed as valid' do
+    @req.valid_response?(Net::NNTP::AuthenticationFailed.new(@req, '481', 'authentication failed')).should be_true
+  end
+
+  it 'should accept AuthenticationOutOfSequence as valid' do
+    @req.valid_response?(Net::NNTP::AuthenticationOutOfSequence.new(@req, '482', 'authentication out of sequence')).should be_true
+  end
+
+  it 'should have "authinfo" as indicating capability' do
+    @req.capability.should == 'authinfo'
+  end
+
+end
+
+describe Net::NNTP::Quit do
+  before do
+    @req = Net::NNTP::Quit.new
+  end
+
+  it 'should generate a QUIT command' do
+    @req.command.should == "QUIT\r\n"
+  end
+
+  it 'should accept ConnectionClosing as valid' do
+    @req.valid_response?(Net::NNTP::ConnectionClosing.new(@req, '205', 'connection closing')).should be_true
+  end
+end
+
+describe Net::NNTP::Group do
+  before do
+    @req = Net::NNTP::Group.new('example.group')
+  end
+  it 'should generate a GROUP command with a group parameter' do
+    @req.command.should == "GROUP example.group\r\n"
+  end
+
+  it 'should accept GroupSelected as valid' do
+    @req.valid_response?(Net::NNTP::GroupSelected.new(@req, '211', '1234 234 567 misc.test')).should be_true
+  end
+
+  it 'should have "reader" as indicating capability' do
+    @req.capability.should == 'reader'
+  end
+
+end
+
+describe Net::NNTP::Listgroup do
+  before do
+    @req = Net::NNTP::Listgroup.new
+  end
+  it 'should generate a LISTGROUP command without parameters' do
+    @req.command.should == "LISTGROUP\r\n"
+  end
+  it 'should generate a LISTGROUP command with a group parameter' do
+    @req = Net::NNTP::Listgroup.new('example.group')
+    @req.command.should == "LISTGROUP example.group\r\n"
+  end
+  it 'should generate a LISTGROUP command with group and open range parameter' do
+    @req = Net::NNTP::Listgroup.new('example.group', {:start => 1000})
+    @req.command.should == "LISTGROUP example.group 1000-\r\n"
+  end
+  it 'should generate a LISTGROUP command with group and range parameter' do
+    @req = Net::NNTP::Listgroup.new('example.group', {:start => 1000, :end => 10000})
+    @req.command.should == "LISTGROUP example.group 1000-10000\r\n"
+  end
+
+  it 'should accept GroupSelected as valid' do
+    @req.valid_response?(Net::NNTP::GroupSelected.new(@req, '211', '1234 234 567 misc.test')).should be_true
+  end
+
+  it 'should accept GroupUnknown as valid' do
+    @req.valid_response?(Net::NNTP::GroupUnknown.new(@req, '411', 'no such group')).should be_true
+  end
+
+  it 'should accept NoGroupSelected as valid' do
+    @req.valid_response?(Net::NNTP::NoGroupSelected.new(@req, '412', 'no newsgroup selected')).should be_true
+  end
+
+  it 'should have "reader" as indicating capability' do
+    @req.capability.should == 'reader'
+  end
+
+end
+
+describe Net::NNTP::Last do
+  before do
+    @req = Net::NNTP::Last.new
+  end
+
+  it 'should generate a LAST command' do
+    @req.command.should == "LAST\r\n"
+  end
+
+  it 'should accept ArticleSelected as valid' do
+    @req.valid_response?(Net::NNTP::ArticleSelected.new(@req, '223', ' 111 <abc@def.com>')).should be_true
+  end
+
+  it 'should accept NoGroupSelected as valid' do
+    @req.valid_response?(Net::NNTP::NoGroupSelected.new(@req, '412', 'no newsgroup selected')).should be_true
+  end
+
+  it 'should accept InvalidArticle as valid' do
+    @req.valid_response?(Net::NNTP::InvalidArticle.new(@req, '420', 'no such article number')).should be_true
+  end
+
+  it 'should accept NoPreviousArticle as valid' do
+    @req.valid_response?(Net::NNTP::NoPreviousArticle.new(@req, '422', 'no previous article')).should be_true
+  end
+
+  it 'should have "reader" as indicating capability' do
+    @req.capability.should == 'reader'
+  end
+
+end
+
+describe Net::NNTP::Next do
+  before do
+    @req = Net::NNTP::Next.new
+  end
+  it 'should generate a NEXT command' do
+    @req.command.should == "NEXT\r\n"
+  end
+
+  it 'should accept ArticleSelected as valid' do
+    @req.valid_response?(Net::NNTP::ArticleSelected.new(@req, '223', ' 111 <abc@def.com>')).should be_true
+  end
+
+  it 'should accept NoGroupSelected as valid' do
+    @req.valid_response?(Net::NNTP::NoGroupSelected.new(@req, '412', 'no newsgroup selected')).should be_true
+  end
+
+  it 'should accept InvalidArticle as valid' do
+    @req.valid_response?(Net::NNTP::InvalidArticle.new(@req, '420', 'no such article number')).should be_true
+  end
+
+  it 'should accept NoNextArticle as valid' do
+    @req.valid_response?(Net::NNTP::NoNextArticle.new(@req, '421', 'no next article')).should be_true
+  end
+
+  it 'should have "reader" as indicating capability' do
+    @req.capability.should == 'reader'
+  end
+
+end
+
+describe Net::NNTP::Article do
+  before do
+    @req = Net::NNTP::Article.new
+  end
+  it 'should generate a ARTICLE command without parameters' do
+    @req.command.should == "ARTICLE\r\n"
+  end
+  it 'should generate a ARTICLE command with numeric parameter' do
+    @req = Net::NNTP::Article.new(1234)
+    @req.command.should == "ARTICLE 1234\r\n"
+  end
+  it 'should generate a ARTICLE command with string parameter' do
+    @req = Net::NNTP::Article.new('<msg.id@test.host>')
+    @req.command.should == "ARTICLE <msg.id@test.host>\r\n"
+  end
+
+  it 'should accept ArticleResponse as valid' do
+    @req.valid_response?(Net::NNTP::ArticleResponse.new(@req, '220', '1234 <msg.id@test.host>')).should be_true
+  end
+
+  it 'should accept NoGroupSelected as valid' do
+    @req.valid_response?(Net::NNTP::NoGroupSelected.new(@req, '412', 'no newsgroup selected')).should be_true
+  end
+
+  it 'should accept InvalidArticle as valid' do
+    @req.valid_response?(Net::NNTP::InvalidArticle.new(@req, '420', 'no such article number')).should be_true
+  end
+
+  it 'should accept InvalidNumberOrRange as valid' do
+    @req.valid_response?(Net::NNTP::InvalidNumberOrRange.new(@req, '423', 'invalid number or range')).should be_true
+  end
+
+  it 'should accept NoSuchMessageid as valid' do
+    @req.valid_response?(Net::NNTP::NoSuchMessageid.new(@req, '430', 'not found')).should be_true
+  end
+
+  it 'should have "reader" as indicating capability' do
+    @req.capability.should == 'reader'
+  end
+
+end
+
+describe Net::NNTP::Head do
+  before do
+    @req = Net::NNTP::Head.new
+  end
+  it 'should generate a HEAD command without parameters' do
+    @req.command.should == "HEAD\r\n"
+  end
+  it 'should generate a HEAD command with numeric parameter' do
+    @req = Net::NNTP::Head.new('1234')
+    @req.command.should == "HEAD 1234\r\n"
+  end
+  it 'should generate a HEAD command with string parameter' do
+    @req = Net::NNTP::Head.new('<msg.id@test.host>')
+    @req.command.should == "HEAD <msg.id@test.host>\r\n"
+  end
+
+  it 'should accept HeaderResponse as valid' do
+    @req.valid_response?(Net::NNTP::HeaderResponse.new(@req, '221', 'headers follow')).should be_true
+  end
+
+  it 'should accept NoGroupSelected as valid' do
+    @req.valid_response?(Net::NNTP::NoGroupSelected.new(@req, '412', 'no newsgroup selected')).should be_true
+  end
+
+  it 'should accept InvalidArticle as valid' do
+    @req.valid_response?(Net::NNTP::InvalidArticle.new(@req, '420', 'no such article number')).should be_true
+  end
+
+  it 'should accept InvalidNumberOrRange as valid' do
+    @req.valid_response?(Net::NNTP::InvalidNumberOrRange.new(@req, '423', 'invalid number or range')).should be_true
+  end
+
+  it 'should accept NoSuchMessageid as valid' do
+    @req.valid_response?(Net::NNTP::NoSuchMessageid.new(@req, '430', 'not found')).should be_true
+  end
+
+end
+
+describe Net::NNTP::Body do
+  before do
+    @req = Net::NNTP::Body.new
+  end
+  it 'should generate a BODY command without parameters' do
+    @req.command.should == "BODY\r\n"
+  end
+  it 'should generate a BODY command with numeric parameter' do
+    @req = Net::NNTP::Body.new('1234')
+    @req.command.should == "BODY 1234\r\n"
+  end
+  it 'should generate a BODY command with string parameter' do
+    @req = Net::NNTP::Body.new('<msg.id@test.host>')
+    @req.command.should == "BODY <msg.id@test.host>\r\n"
+  end
+
+  it 'should accept BodyResponse as valid' do
+    @req.valid_response?(Net::NNTP::BodyResponse.new(@req, '222', 'body follows')).should be_true
+  end
+
+  it 'should accept NoGroupSelected as valid' do
+    @req.valid_response?(Net::NNTP::NoGroupSelected.new(@req, '412', 'no newsgroup selected')).should be_true
+  end
+
+  it 'should accept InvalidArticle as valid' do
+    @req.valid_response?(Net::NNTP::InvalidArticle.new(@req, '420', 'no such article number')).should be_true
+  end
+
+  it 'should accept InvalidNumberOrRange as valid' do
+    @req.valid_response?(Net::NNTP::InvalidNumberOrRange.new(@req, '423', 'invalid number or range')).should be_true
+  end
+
+  it 'should accept NoSuchMessageid as valid' do
+    @req.valid_response?(Net::NNTP::NoSuchMessageid.new(@req, '430', 'not found')).should be_true
+  end
+
+  it 'should have "reader" as indicating capability' do
+    @req.capability.should == 'reader'
+  end
+
+end
+
+describe Net::NNTP::Stat do
+  before do
+    @req = Net::NNTP::Stat.new
+  end
+  it 'should generate a STAT command without parameters' do
+    @req.command.should == "STAT\r\n"
+  end
+  it 'should generate a STAT command with numeric parameter' do
+    @req = Net::NNTP::Stat.new('1234')
+    @req.command.should == "STAT 1234\r\n"
+  end
+  it 'should generate a STAT command with string parameter' do
+    @req = Net::NNTP::Stat.new('<msg.id@test.host>')
+    @req.command.should == "STAT <msg.id@test.host>\r\n"
+  end
+ 
+  it 'should accept ArticleSelected as valid' do
+    @req.valid_response?(Net::NNTP::ArticleSelected.new(@req, '223', ' 1234 <msg.id@test.host>')).should be_true
+  end
+
+  it 'should accept NoGroupSelected as valid' do
+    @req.valid_response?(Net::NNTP::NoGroupSelected.new(@req, '412', 'no newsgroup selected')).should be_true
+  end
+
+  it 'should accept InvalidArticle as valid' do
+    @req.valid_response?(Net::NNTP::InvalidArticle.new(@req, '420', 'no such article number')).should be_true
+  end
+
+  it 'should accept InvalidNumberOrRange as valid' do
+    @req.valid_response?(Net::NNTP::InvalidNumberOrRange.new(@req, '423', 'invalid number or range')).should be_true
+  end
+
+  it 'should accept NoSuchMessageid as valid' do
+    @req.valid_response?(Net::NNTP::NoSuchMessageid.new(@req, '430', 'not found')).should be_true
+  end
+
+end
+
+describe Net::NNTP::Post do
+  before do
+    @req = Net::NNTP::Post.new(nil)
+    @body = body()
+    @check_body = check_body()
+  end
+  it 'should generate a POST command' do
+    @req.command.should == "POST\r\n"
+  end
+
+  it 'should have the correct body' do
+    @req = Net::NNTP::Post.new(@body)
+    @req.body.to_s.should == @check_body
+  end
+
+  it 'should accept ArticleReceived as valid' do
+    @req.valid_response?(Net::NNTP::ArticleReceived.new(@req, '240', 'Posting OK')).should be_true
+  end
+
+  it 'should accept PostArticle as valid' do
+    @req.valid_response?(Net::NNTP::PostArticle.new(@req, '340', 'go ahead')).should be_true
+  end
+
+  it 'should accept PostingNotPermitted as valid' do
+    @req.valid_response?(Net::NNTP::PostingNotPermitted.new(@req, '440', 'no go')).should be_true
+  end
+
+  it 'should accept PostingFailed as valid' do
+    @req.valid_response?(Net::NNTP::PostingFailed.new(@req, '441', 'no go')).should be_true
+  end
+
+  it_should_behave_like 'Requests with body'
+end
+
+describe Net::NNTP::Ihave do
+  before do
+    @req = Net::NNTP::Ihave.new('<i.am.an.article.you.will.want@example.com>')
+    @body = body()
+    @check_body = check_body()
+  end
+  it 'should generate an IHAVE command with correct parameter' do
+    @req.command.should == "IHAVE <i.am.an.article.you.will.want@example.com>\r\n"
+  end
+
+  it 'should throw ParameterError if the message-id is nil or doesn\'t match' do
+    lambda { 
+      @req = Net::NNTP::Ihave.new(nil, "From: demo.user@example.com") 
+    }.should raise_error(::Net::NNTP::ParameterError, /must not be nil/i)
+    
+    lambda { 
+      @req = Net::NNTP::Ihave.new('malformedmessageid123', "From: demo.user@example.com") 
+    }.should raise_error(::Net::NNTP::ParameterError, /malformed messageid/i)
+  end
+
+  it 'should have the correct body' do
+    @req = Net::NNTP::Ihave.new("<demo.article@example.com>", body())
+    @req.body.to_s.should == check_body()
+  end
+
+  it 'should accept TransferOK as valid' do
+    @req.valid_response?(Net::NNTP::TransferOK.new(@req, '235', 'Transfer OK')).should be_true
+  end
+
+  it 'should accept TransferArticle as valid' do
+    @req.valid_response?(Net::NNTP::TransferArticle.new(@req, '335', 'Go ahead')).should be_true
+  end
+
+  it 'should accept ArticleNotWanted as valid' do
+    @req.valid_response?(Net::NNTP::ArticleNotWanted.new(@req, '435', 'Go away')).should be_true
+  end
+
+  it 'should accept TransferNotPossible as valid' do
+    @req.valid_response?(Net::NNTP::TransferOK.new(@req, '436', 'Transfer failed')).should be_true
+  end
+
+  it 'should accept TransferRejected as valid' do
+    @req.valid_response?(Net::NNTP::TransferRejected.new(@req, '437', 'Transfer rejected')).should be_true
+  end
+
+  it 'should have "ihave" as indicating capability' do
+    @req.capability.should == 'ihave'
+  end
+  it_should_behave_like 'Requests with body'
+
+end
+
+describe Net::NNTP::Date do
+  before do
+    @req = Net::NNTP::Date.new()
+  end
+  it 'should generate a DATE command' do
+    @req.command.should == "DATE\r\n"
+  end
+
+  it 'should accept DateResponse as valid' do
+    @req.valid_response?(Net::NNTP::DateResponse.new(@req, '111', '20080519 17:00:00')).should be_true
+  end
+
+  it 'should have "reader" as indicating capability' do
+    @req.capability.should == 'reader'
+  end
+
+end
+
+describe Net::NNTP::Newgroups do
+  before do
+    @req = Net::NNTP::Newgroups.new('2008-11-01 10:12:30', true) 
+  end
+  it 'should generate a NEWGROUPS command with correct parameters' do
+    @req.command.should == "NEWGROUPS 20081101 101230 GMT\r\n"
+    @req = Net::NNTP::Newgroups.new('2008-11-01 10:12:30', false) 
+    @req.command.should == "NEWGROUPS 20081101 101230\r\n"
+  end
+
+  it 'should accept NewgroupsResponse as valid' do
+    @req.valid_response?(Net::NNTP::NewgroupsResponse.new(@req, '231', 'list follows')).should be_true
+  end
+
+  it 'should have "reader" as indicating capability' do
+    @req.capability.should == 'reader'
+  end
+
+end
+
+describe Net::NNTP::Newnews do
+  before do
+    @req = Net::NNTP::Newnews.new(%w{alt.test at.test}, '20081101 101230', true)
+  end
+  it 'should generate a NEWNEWS command with correct parameters' do
+    @req.command.should == "NEWNEWS alt.test,at.test 20081101 101230 GMT\r\n"
+    @req = Net::NNTP::Newnews.new(%w{alt.test at.test}, '20081101 101230', false)
+    @req.command.should == "NEWNEWS alt.test,at.test 20081101 101230\r\n"
+  end
+
+  it 'should accept NewnewsResponse as valid' do
+    @req.valid_response?(Net::NNTP::NewnewsResponse.new(@req, '230', 'list follows')).should be_true
+  end
+
+end
+
+describe Net::NNTP::List do
+  before do
+    @req = Net::NNTP::List.new
+  end
+  it 'should generate LIST commands with correct parameters' do
+    @req.command.should == "LIST\r\n"
+    @req = Net::NNTP::List.new('ACTIVE')
+    @req.command.should == "LIST ACTIVE\r\n"
+    @req.keyword.should == "ACTIVE"
+    @req = Net::NNTP::List.new('ACTIVE', '*.test')
+    @req.command.should == "LIST ACTIVE *.test\r\n"
+    @req.keyword.should == "ACTIVE"
+    @req = Net::NNTP::List.new('ACTIVE.TIMES')
+    @req.command.should == "LIST ACTIVE.TIMES\r\n"
+    @req.keyword.should == "ACTIVE.TIMES"
+    @req = Net::NNTP::List.new('ACTIVE.TIMES', 'tx.*')
+    @req.command.should == "LIST ACTIVE.TIMES tx.*\r\n"
+    @req.keyword.should == "ACTIVE.TIMES"
+    @req = Net::NNTP::List.new('NEWSGROUPS')
+    @req.command.should == "LIST NEWSGROUPS\r\n"
+    @req.keyword.should == "NEWSGROUPS"
+    @req = Net::NNTP::List.new('NEWSGROUPS', 'alt.*')
+    @req.command.should == "LIST NEWSGROUPS alt.*\r\n"
+    @req.keyword.should == "NEWSGROUPS"
+    @req = Net::NNTP::List.new('HEADERS', :msgid => '<another.msgid@example.com>')
+    @req.command.should == "LIST HEADERS <another.msgid@example.com>\r\n"
+    @req.keyword.should == "HEADERS"
+    @req = Net::NNTP::List.new('HEADERS', :start => 100)
+    @req.command.should == "LIST HEADERS 100-\r\n"
+    @req.keyword.should == "HEADERS"
+    @req = Net::NNTP::List.new('HEADERS', :start => 100, :end => 200)
+    @req.command.should == "LIST HEADERS 100-200\r\n"
+    @req.keyword.should == "HEADERS"
+    @req = Net::NNTP::List.new('distrib.pats')
+    @req.command.should == "LIST DISTRIB.PATS\r\n"
+    @req.keyword.should == "DISTRIB.PATS"
+    @req = Net::NNTP::List.new('OVERVIEW.FMT')
+    @req.command.should == "LIST OVERVIEW.FMT\r\n"
+    @req.keyword.should == "OVERVIEW.FMT"
+  end
+
+  it 'should accept ListInformationFollows as valid' do
+    @req.valid_response?(Net::NNTP::ListInformationFollows.new(@req, '215', 'list information follows')).should be_true
+  end
+
+  it 'should have "list" as indicating capability' do
+    @req.capability.should == 'list'
+  end
+
+end
+
+describe Net::NNTP::Over do
+  before do
+    @req = Net::NNTP::Over.new
+  end
+  it 'should generate OVER commands with correct parameters' do
+    @req.command.should == "OVER\r\n"
+    @req = Net::NNTP::Over.new(:msgid => '<an.other@example.com>')
+    @req.command.should == "OVER <an.other@example.com>\r\n"
+    @req = Net::NNTP::Over.new(:start => 100)
+    @req.command.should == "OVER 100-\r\n"
+    @req = Net::NNTP::Over.new(:start => 100, :end => 200)
+    @req.command.should == "OVER 100-200\r\n"
+  end
+
+  it 'should accept OverviewInformation as valid' do
+    @req.valid_response?(Net::NNTP::OverviewInformation.new(@req, '224', 'information follows')).should be_true
+  end
+
+  it 'should accept NoGroupSelected as valid' do
+    @req.valid_response?(Net::NNTP::NoGroupSelected.new(@req, '412', 'no newsgroup selected')).should be_true
+  end
+
+  it 'should accept InvalidArticle as valid' do
+    @req.valid_response?(Net::NNTP::InvalidArticle.new(@req, '420', 'no such article number')).should be_true
+  end
+
+  it 'should accept InvalidNumberOrRange as valid' do
+    @req.valid_response?(Net::NNTP::InvalidNumberOrRange.new(@req, '423', 'invalid number or range')).should be_true
+  end
+
+  it 'should accept NoSuchMessageid as valid' do
+    @req.valid_response?(Net::NNTP::NoSuchMessageid.new(@req, '430', 'not found')).should be_true
+  end
+
+  it 'should have "over" as indicating capability' do
+    @req.capability.should == 'over'
+  end
+
+end
+
+describe Net::NNTP::Hdr do
+  before do
+    @req = Net::NNTP::Hdr.new('Subject')
+  end
+  it 'should generate HDR @reqs with correct parameters' do
+    @req.command.should == "HDR Subject\r\n"
+    @req = Net::NNTP::Hdr.new('Subject', :msgid => '<i.am.here@example.com>')
+    @req.command.should == "HDR Subject <i.am.here@example.com>\r\n"
+    @req = Net::NNTP::Hdr.new('Subject', :start => 100)
+    @req.command.should == "HDR Subject 100-\r\n"
+    @req = Net::NNTP::Hdr.new('Subject', :start => 100, :end => 200)
+    @req.command.should == "HDR Subject 100-200\r\n"
+  end
+
+  it 'should accept HdrResponse as valid' do
+    @req.valid_response?(Net::NNTP::HdrResponse.new(@req, '225', 'header information follows')).should be_true
+  end
+
+  it 'should accept NoGroupSelected as valid' do
+    @req.valid_response?(Net::NNTP::NoGroupSelected.new(@req, '412', 'no newsgroup selected')).should be_true
+  end
+
+  it 'should accept InvalidArticle as valid' do
+    @req.valid_response?(Net::NNTP::InvalidArticle.new(@req, '420', 'no such article number')).should be_true
+  end
+
+  it 'should accept InvalidNumberOrRange as valid' do
+    @req.valid_response?(Net::NNTP::InvalidNumberOrRange.new(@req, '423', 'invalid number or range')).should be_true
+  end
+
+  it 'should accept NoSuchMessageid as valid' do
+    @req.valid_response?(Net::NNTP::NoSuchMessageid.new(@req, '430', 'not found')).should be_true
+  end
+
+  it 'should have "hdr" as indicating capability' do
+    @req.capability.should == 'hdr'
+  end
+
+end
+
+describe Net::NNTP::Xhdr do
+  before do
+    @req = Net::NNTP::Xhdr.new('Subject')
+  end
+  it 'should generage XHDR @reqs with correct parameters' do
+    @req.command.should == "XHDR Subject\r\n"
+    @req = Net::NNTP::Xhdr.new('Subject', :msgid => '<i.am.here@example.com>')
+    @req.command.should == "XHDR Subject <i.am.here@example.com>\r\n"
+    @req = Net::NNTP::Xhdr.new('Subject', :start => 100)
+    @req.command.should == "XHDR Subject 100-\r\n"
+    @req = Net::NNTP::Xhdr.new('Subject', :start => 100, :end => 200)
+    @req.command.should == "XHDR Subject 100-200\r\n"
+  end
+end
+
+describe Net::NNTP::Xover do
+  before do
+    @req = Net::NNTP::Xover.new
+  end
+  it 'should generate XOVER commands with correct parameters' do
+    @req.command.should == "XOVER\r\n"
+    @req = Net::NNTP::Xover.new(:start => 100)
+    @req.command.should == "XOVER 100-\r\n"
+    @req = Net::NNTP::Xover.new(:start => 100, :end => 200)
+    @req.command.should == "XOVER 100-200\r\n"
+  end
+end
+
+describe Net::NNTP::Xpat do
+  before do
+    @req = Net::NNTP::Xpat.new('Subject', ['is*', '*example*'], :msgid => '<is.an.example@example.com>')
+  end
+  it 'should generate XPAT commands with correct parameters' do
+    @req.command.should == "XPAT Subject <is.an.example@example.com> is* *example*\r\n"
+    @req = Net::NNTP::Xpat.new('Subject', ['is*', '*example*'], :start => 100)
+    @req.command.should == "XPAT Subject 100- is* *example*\r\n"
+    @req = Net::NNTP::Xpat.new('Subject', ['is*', '*example*'], :start => 100, :end => 300)
+    @req.command.should == "XPAT Subject 100-300 is* *example*\r\n"
+  end
+end
+