ruby-net-nntp 0.2.2 → 1.0.0

data/spec/net/nntp/response_spec.rb

@@ -0,0 +1,994 @@
+require File.join(File.dirname(__FILE__), %w[.. .. spec_helper])
+
+describe Net::NNTP::FormatHeader do
+  it 'should parse a simple header ending with a colon' do
+    @header = Net::NNTP::FormatHeader.new('Date:')
+    @header.name.should == 'date'
+    @header.full.should == false
+  end
+
+  it 'should parse a header starting with a colon' do
+    @header = Net::NNTP::FormatHeader.new(':bytes')
+    @header.name.should == 'bytes'
+    @header.full.should == false
+  end
+  it 'should parse a header with the indicator "full" separated by a colon' do
+    @header = Net::NNTP::FormatHeader.new('Xref:full')
+    @header.name.should == 'xref'
+    @header.full.should == true
+  end
+end
+
+describe 'Responses with body', :shared => true do
+
+  it 'should read the response from a string' do
+    @response.body = @body
+    @response.raw.should == @body
+  end
+
+  it 'should read the response from an IO object' do
+    raw = StringIO.new
+    raw << @body
+    raw.rewind
+    @response.body = raw
+    @response.raw.should == @body
+  end
+
+  it 'should let the response be filled from a block' do
+    raw = StringIO.new
+    raw << @body
+    raw.rewind
+    @response.instance_variable_set(:@body, nil)
+    @response.body { raw.string }
+    @response.raw.should == @body
+    @response.instance_variable_set(:@body, nil)
+    @response.body { raw }
+    @response.raw.should == @body
+  end
+
+end
+
+describe 'Single Line Responses', :shared => true do
+  it 'must not be a multiline response' do
+    @response.should_not be_multiline
+    @response.body.should be_nil
+  end
+end
+
+describe Net::NNTP::InformationResponse do
+end
+
+describe Net::NNTP::HelpResponse do
+  before do
+    @response = Net::NNTP::HelpResponse.new(@request, '100', 'Help text follows')
+    @body = <<-EOF
+100 Help text follows
+  this is a help text
+  not much to look at.
+.
+    EOF
+  end
+  it 'must not be a generic response' do
+    @response.should_not be_generic
+  end
+  it_should_behave_like 'Responses with body'
+end
+
+describe Net::NNTP::CapabilityList do
+  before do
+    @response = Net::NNTP::CapabilityList.new(@request, '101', 'Capability list:')
+    @body = "VERSION 2\r\nREADER\r\nLIST ACTIVE NEWSGROUPS\r\n.\r\n"
+  end
+  it 'must not be a generic response' do
+    @response.should_not be_generic
+  end
+  it 'should have capabilities' do
+    @response.should respond_to(:capabilities)
+  end
+  it 'should parse capabilities from body and make them accessible' do
+    @response.body = @body
+    @response.capabilities['version'].should == '2'
+    @response.capabilities['reader'].should be_true
+    @response.capabilities['list'].should == ['ACTIVE', 'NEWSGROUPS']
+    @response.capabilities.should_not have_key('post')
+    @response.capabilities['post'].should be_nil
+  end
+  it_should_behave_like 'Responses with body'
+end
+
+describe Net::NNTP::DateResponse do
+  before do
+    @response = Net::NNTP::Response.create(@request, '111 20080815124533')
+  end
+  it_should_behave_like "Single Line Responses"
+
+  it 'should return a valid date' do
+    @response.date.should == DateTime.parse('August 15 2008 12:45:33')
+  end
+end
+
+describe Net::NNTP::OKResponse do
+end
+
+describe 'Multiline Responses', :shared => true do
+  it 'must be a multiline response' do
+    @response.should be_multiline
+  end
+end
+
+describe Net::NNTP::PostingAllowed do
+  before do
+    @response = Net::NNTP::PostingAllowed.new(@request, '200', 'Posting allowed')
+  end
+  it_should_behave_like 'Single Line Responses'
+end
+
+describe Net::NNTP::PostingProhibited do
+  before do
+    @response = Net::NNTP::PostingProhibited.new(@request, '201', 'Posting prohibited')
+  end
+  it_should_behave_like 'Single Line Responses'
+end
+
+describe Net::NNTP::ConnectionClosing do
+  before do
+    @response = Net::NNTP::ConnectionClosing.new(@request, '205', 'Connection closing')
+  end
+  it_should_behave_like 'Single Line Responses'
+  it 'should request closing of the socket' do
+    @response.force_close?.should be_true
+  end
+end
+
+describe Net::NNTP::GroupSelected do
+  before do
+    @request = Net::NNTP::Group.new('misc.test')
+    @response = Net::NNTP::GroupSelected.new(@request, '211', '1234 3000234 3002322 misc.test list follows')
+    @body ="300234\r\n300237\r\n300238\r\n300239\r\n3002322\r\n.\r\n"
+  end
+  it_should_behave_like 'Responses with body'
+  it 'should have a group name' do
+    @response.group.name.should == 'misc.test'
+  end
+  it 'should have the article numbers' do
+    @response.group.number.should == 1234
+  end
+  it 'should have the low watermark' do
+    @response.group.low.should == 3000234
+  end
+  it 'should have the high watermark' do
+    @response.group.high.should == 3002322
+  end
+  it 'should have an optional body and parse numbers' do
+    @request = Net::NNTP::Group.new('misc.test')
+    @response = Net::NNTP::GroupSelected.new(@request, '211', '1234 3000234 3002322 misc.test list follows')
+    @response.should_not have_body
+    @request = Net::NNTP::Listgroup.new('misc.test')
+    @response = Net::NNTP::GroupSelected.new(@request, '211', '1234 3000234 3002322 misc.test list follows')
+    @response.body = "300234\r\n300237\r\n300238\r\n300239\r\n3002322\r\n.\r\n"
+    @response.should have_body
+    @response.list.should == ["300234", "300237", "300238", "300239", "3002322"]
+  end
+  it 'should be a multiline response if the request is a Listgroup request' do
+    @request = Net::NNTP::Listgroup.new('misc.test')
+    @response = Net::NNTP::GroupSelected.new(@request, '211', '1234 3000234 3002322 misc.test list follows')
+    @body ="300234\r\n300237\r\n300238\r\n300239\r\n3002322\r\n.\r\n"
+    @response.should be_multiline
+  end
+
+  it 'should not be a multiline response if the request is a Group request' do
+    @request = Net::NNTP::Group.new('misc.test')
+    @response = Net::NNTP::GroupSelected.new(@request, '211', '1234 3000234 3002322 misc.test list follows')
+    @response.should_not be_multiline
+  end
+  
+end
+
+describe Net::NNTP::ListInformationFollows do
+  before do 
+    @request = Net::NNTP::List.new
+    @response = Net::NNTP::ListInformationFollows.new(@request, '215', 'information follows')
+    @body = "at.test 3 5 y\r\nalt.test 8 30 y\r\n"
+    @response.body = @body
+  end
+  it_should_behave_like 'Multiline Responses'
+  it_should_behave_like 'Responses with body'
+
+  it 'should parse the body to a list of groups on LIST (ACTIVE)' do 
+    @request = Net::NNTP::List.new
+    @response = Net::NNTP::ListInformationFollows.new(@request, '215', 'information follows')
+    @body = "at.test 3 5 y\r\nalt.test 8 30 y\n"
+    @response.body = @body
+    @response.list.should respond_to(:each)
+    @response.list[0].name.should == 'at.test'
+    @response.list[0].high.should == 5
+    @response.list[0].low.should == 3
+    @response.list[0].status.should == 'y'
+  end
+
+  it 'should parse the body to a list of groups on LIST ACTIVE.TIMES' do
+    @request = Net::NNTP::List.new('ACTIVE.TIMES')
+    @response = Net::NNTP::ListInformationFollows.new(@request, '215', 'information follows')
+    @body = <<-EOF
+misc.test 930445408 <creatme@isc.org>
+alt.rfc-writers.recovery 930562309 <m@example.com>
+tx.natives.recovery 930678923 <sob@academ.com>
+.
+    EOF
+    @response.body = @body
+    @response.list.should respond_to(:each)
+    @response.list[0].name.should == 'misc.test'
+    @response.list[0].epoch.should == '930445408'
+    @response.list[0].creator.should == '<creatme@isc.org>'
+  end
+
+  it 'should parse the body to a list of distibution patterns on LIST DISTRIB.PATS' do
+    @request = Net::NNTP::List.new('DISTRIB.PATS')
+    @response = Net::NNTP::ListInformationFollows.new(@request, '215', 'information follows')
+    @body = <<-EOF
+10:local.*:local
+5:*:world
+20:local.here.*:thissite
+.
+    EOF
+    @response.body = @body
+    @response.list.should respond_to(:each)
+    @response.list[0].priority.should == 10
+    @response.list[0].pattern.should == 'local.*'
+    @response.list[0].distribution.should == 'local'
+  end
+
+  it 'should parse the body to a list of fields on LIST HEADERS' do
+    @request = Net::NNTP::List.new('HEADERS')
+    @response = Net::NNTP::ListInformationFollows.new(@request, '215', 'information follows')
+    @body = <<-EOF
+Date
+Distribution
+From
+Message-ID
+References
+Subject
+Xref
+:bytes
+:lines
+.
+    EOF
+    @response.body = @body
+    @response.list.should respond_to(:each)
+    @response.list[0].should == 'Date'
+    @response.list[1].should == 'Distribution'
+    @response.list[2].should == 'From'
+  end
+
+  it 'should parse the body to a list of groups and their description on LIST NEWSGROUPS' do
+    @request = Net::NNTP::List.new('NEWSGROUPS')
+    @response = Net::NNTP::ListInformationFollows.new(@request, '215', 'information follows')
+    @body = <<-EOF
+misc.test General Usenet testing
+alt.rfc-writers.recovery RFC Writers Recovery
+tx.natives.recovery Texas Natives Recovery
+.
+    EOF
+    @response.body = @body
+    @response.list.should respond_to(:each)
+    @response.list[0].name.should == 'misc.test'
+    @response.list[0].desc.should == 'General Usenet testing'
+  end
+  it 'should parse the body to a list of fields on LIST OVERVIEW.FMT' do
+    @request = Net::NNTP::List.new('OVERVIEW.FMT')
+    @response = Net::NNTP::ListInformationFollows.new(@request, '215', 'information follows')
+    @body = <<-EOF
+Subject:
+From:
+Date:
+Message-ID:
+References:
+:bytes
+:lines
+Xref:full
+Distribution:full
+.
+    EOF
+    @response.body = @body
+    @response.list.should respond_to(:each)
+    @response.list[0].name.should == 'subject'
+    @response.list[0].full.should be_false
+    @response.list[1].name.should == 'from'
+    @response.list[1].full.should be_false
+    @response.list[5].name.should == 'bytes'
+    @response.list[5].full.should be_false
+    @response.list[6].name.should == 'lines'
+    @response.list[6].full.should be_false
+    @response.list[8].name.should == 'distribution'
+    @response.list[8].full.should be_true
+  end
+end
+
+describe 'Article Responses', :shared => true do
+  it 'should return the article number' do
+    @response.number.should == 3000237
+  end
+
+  it 'should return the message-id' do
+    @response.message_id.should == '<1234@example.org>'
+  end
+end
+
+describe Net::NNTP::ArticleResponse do
+  before do 
+    @response = Net::NNTP::ArticleResponse.new(@request, '220', '3000237 <1234@example.org>')
+    @body =<<EOF
+Path: ahost!demo!not-for-mail
+From: "Demo User" <nobody@example.com>
+Newsgroups: misc.test
+Subject: I am just a test article
+Date: 14 May 2008 11:40:23 +0200
+Organization: An Example
+Message-ID: <1234@example.com>
+
+This is just a test article.
+.But with special properties
+...
+..
+EOF
+    @check_article = TMail::Mail.parse(@body.gsub(/^\./, "")).to_s
+    @preamble =<<-EOF
+This is just a test article.
+But with special properties
+..
+.
+    EOF
+  end
+  it_should_behave_like 'Multiline Responses'
+  it_should_behave_like 'Article Responses'
+  it_should_behave_like 'Responses with body'
+
+  
+  it 'should return an article' do
+    @response.body = @body
+    @response.article.to_s.should == @check_article
+    @response.article.preamble.should == @preamble
+  end
+
+  it 'should return an enumeration of headers' do
+    @response.body = @body
+    @response['Subject'].should == "I am just a test article"
+  end
+
+end
+
+describe Net::NNTP::HeaderResponse do
+  before do 
+    @request = Net::NNTP::Head.new('3000237')
+    @response = Net::NNTP::HeaderResponse.new(@request, '221', '3000237 <1234@example.org>')
+    @body =<<EOF
+Path: ahost!demo!not-for-mail
+From: "Demo User" <nobody@example.com>
+Newsgroups: misc.test
+Subject: I am just a test article
+Date: 14 May 2008 11:40:23 +0200
+Organization: An Example
+Message-ID: <1234@example.com>
+.
+EOF
+  end
+  it_should_behave_like 'Multiline Responses'
+  it_should_behave_like 'Article Responses'
+  it_should_behave_like 'Responses with body'
+  it 'should return an enumeration of headers' do
+    @response.body = @body
+    @response['Subject'].should == "I am just a test article"
+    @response.header['from'].to_s.should == 'Demo User <nobody@example.com>'
+  end
+  
+  it 'should return an enumeration of numbers and contents if the request is a XHDR request' do
+    @request = Net::NNTP::Xhdr.new('Subject')
+    @response = Net::NNTP::HeaderResponse.new(@request, '221', 'Subject fields follow')
+    @body =<<-EOF
+3000237 I am just a test article
+.
+    EOF
+    @response.body = @body
+    @response.list.should respond_to(:each)
+  end
+end
+
+describe Net::NNTP::BodyResponse do
+  before do 
+    @response = Net::NNTP::BodyResponse.new(@request, '222', '3000237 <1234@example.org>')
+    @body =<<EOF
+This is just a test article
+.
+EOF
+  end
+  it_should_behave_like 'Multiline Responses'
+  it_should_behave_like 'Article Responses'
+  it_should_behave_like 'Responses with body'
+end
+
+describe Net::NNTP::ArticleSelected do
+  before do 
+    @response = Net::NNTP::ArticleSelected.new(@request, '223', '3000237 <1234@example.org> retrieved')
+  end
+  it_should_behave_like 'Single Line Responses'
+  it_should_behave_like 'Article Responses'
+end
+
+describe Net::NNTP::OverviewInformation do
+  before do 
+    @response = Net::NNTP::OverviewInformation.new(@request, '224', 'Overview Information follows')
+    @body = "3000234	I am just a test article	\"Demo User\" <nobody@example.com>	6 Oct 1998 04:38:40 -0500	<45223423@example.com>	<45454@example.net>	1234	17	Xref: news.example.com misc.test:3000363"
+    @response.body = @body
+  end
+  it_should_behave_like 'Multiline Responses'
+  it_should_behave_like 'Responses with body'
+
+  it 'should have a from field' do
+    @response.from.should == '"Demo User" <nobody@example.com>'
+  end
+
+  it 'should have a number field' do
+    @response.number.should == 3000234
+  end
+
+
+  it 'should have a date field' do
+    @response.date.should == DateTime.parse('6 Oct 1998 04:38:40 -0500')
+  end
+
+  it 'should have a message-id field' do
+    @response.message_id.should == '<45223423@example.com>'
+  end
+  
+  it 'should have a references field' do 
+    @response.references.should == ['<45454@example.net>']
+  end
+
+  it 'should have a bytes field' do 
+    @response.bytes.should == 1234
+  end
+
+  it 'should have a lines field' do 
+    @response.lines.should == 17
+  end
+
+  it 'should have optional headers' do
+    @response.optional_headers.should == {'xref' => 'news.example.com misc.test:3000363'}
+  end
+
+end
+
+describe Net::NNTP::HdrResponse do
+  before do
+    @response = Net::NNTP::HdrResponse.new(@request, '225', 'Header information follows')
+    @body = "300234\tI am just a test article\r\n300235\tAnother subject"
+    @response.body = @body
+  end
+
+  it_should_behave_like "Multiline Responses"
+
+  it 'should have a list of articles' do
+    @response.list.should == {300234 => 'I am just a test article', 300235 => 'Another subject'}
+  end
+
+end
+
+describe Net::NNTP::NewnewsResponse do
+  before do
+    @response = Net::NNTP::NewnewsResponse.new(@request, '230', 'List of new articles by message-id follows')
+    @body = "<1234@example.com>\r\n<3453@example.com>\r\n<4567@example.com>"
+    @response.body = @body
+  end
+
+  it_should_behave_like "Multiline Responses"
+  
+  it 'should have a list of message ids' do
+    @response.list.should == %w[<1234@example.com> <3453@example.com> <4567@example.com>]
+  end
+end
+
+describe Net::NNTP::NewgroupsResponse do
+  before do
+    @request = Net::NNTP::Newgroups.new('20080527133122')
+    @response = Net::NNTP::NewgroupsResponse.new(@request, '231', 'List of new newsgroups follows')
+    @body = "at.test 3 5 y\r\nalt.test 8 30 y\r\n"
+    @response.body = @body
+  end
+
+  it_should_behave_like "Multiline Responses"
+
+  it 'should have a list of articles' do 
+    @response.list.should respond_to(:each)
+    @response.list[0].name.should == 'at.test'
+    @response.list[0].high.should == 5
+    @response.list[0].low.should == 3
+    @response.list[0].status.should == 'y'
+  end
+end
+
+describe Net::NNTP::TransferOK do
+  before do
+    @response = Net::NNTP::TransferOK.new(@request, '235', 'Article transferred OK')
+  end
+
+  it_should_behave_like 'Single Line Responses'
+end
+
+describe Net::NNTP::ArticleReceived do
+  before do
+    @response = Net::NNTP::ArticleReceived.new(@request, '240', 'Article received OK')
+  end
+
+  it_should_behave_like 'Single Line Responses'
+end
+
+describe Net::NNTP::AuthenticationAccepted do
+  before do
+    @response = Net::NNTP::AuthenticationAccepted.new(@request, '281', 'Authentication OK')
+  end
+  it_should_behave_like 'Single Line Responses'
+end
+
+describe Net::NNTP::ContinueResponse do
+end
+
+describe Net::NNTP::TransferArticle do
+  before do
+    @response = Net::NNTP::TransferArticle.new(@request, '335', 'Send it; end with <CR-LF>.<CR-LF>')
+  end
+  it_should_behave_like 'Single Line Responses'
+  it 'should request a body' do
+    @response.needs_article?.should be_true
+  end
+end
+
+describe Net::NNTP::PostArticle do
+  before do
+    @response = Net::NNTP::PostArticle.new(@request, '340', 'Send it; end with <CR-LF>.<CR-LF>')
+  end
+  it_should_behave_like 'Single Line Responses'
+  it 'should request a body' do
+    @response.needs_article?.should be_true
+  end
+end
+
+describe Net::NNTP::PasswordRequired do
+  before do
+    @response = Net::NNTP::PasswordRequired.new(@request, '381', 'Password required')
+  end
+  it_should_behave_like 'Single Line Responses'
+end
+  
+describe Net::NNTP::RetryResponse do
+end
+
+describe "Generic Responses", :shared => true do
+  it 'must be a generic response' do
+    @response.should be_generic
+  end
+end
+
+describe Net::NNTP::TemporarilyUnavailable do
+  before do
+    @response = Net::NNTP::TemporarilyUnavailable.new(@request, '400', 'Temporarily unavailable')
+  end
+  it_should_behave_like 'Single Line Responses'
+end
+
+describe Net::NNTP::InternalFault do
+  before(:all) do
+    @response = Net::NNTP::InternalFault.new(@request, '403', 'Internal Failure')
+  end
+  it_should_behave_like 'Generic Responses'
+end
+
+describe Net::NNTP::GroupUnknown do
+  before(:all) do
+    @response = Net::NNTP::GroupUnknown.new(@request, '411', 'not.here is unknown')
+  end
+  it_should_behave_like 'Single Line Responses'
+end
+
+describe Net::NNTP::NoGroupSelected do
+  before(:all) do
+    @response = Net::NNTP::NoGroupSelected.new(@request, '412', 'no group selected')
+  end
+  it_should_behave_like 'Single Line Responses'
+end
+
+describe Net::NNTP::InvalidArticle do
+  before(:all) do
+    @response = Net::NNTP::InvalidArticle.new(@request, '420', 'invalid article')
+  end
+  it_should_behave_like 'Single Line Responses'
+end
+
+describe Net::NNTP::NoPreviousArticle do
+  before(:all) do
+    @response = Net::NNTP::NoPreviousArticle.new(@request, '421', 'no previous article')
+  end
+  it_should_behave_like 'Single Line Responses'
+end
+
+describe Net::NNTP::NoNextArticle do
+  before(:all) do
+    @response = Net::NNTP::NoNextArticle.new(@request, '422', 'no next article')
+  end
+  it_should_behave_like 'Single Line Responses'
+end
+
+describe Net::NNTP::InvalidNumberOrRange do
+  before(:all) do
+    @response = Net::NNTP::InvalidNumberOrRange.new(@request, '423', 'no such article')
+  end
+  it_should_behave_like 'Single Line Responses'
+end
+
+describe Net::NNTP::NoSuchMessageid do
+  before(:all) do
+    @response = Net::NNTP::NoSuchMessageid.new(@request, '430', 'no such article')
+  end
+  it_should_behave_like 'Single Line Responses'
+end
+
+describe Net::NNTP::ArticleNotWanted do
+  before(:all) do
+    @response = Net::NNTP::ArticleNotWanted.new(@request, '435', 'not wanted')
+  end
+  it_should_behave_like 'Single Line Responses'
+end
+
+describe Net::NNTP::TransferNotPossible do
+  before(:all) do
+    @response = Net::NNTP::TransferNotPossible.new(@request, '436', 'not possible')
+  end
+  it_should_behave_like 'Single Line Responses'
+end
+
+describe Net::NNTP::TransferRejected do
+  before(:all) do
+    @response = Net::NNTP::TransferRejected.new(@request, '437', 'rejected')
+  end
+  it_should_behave_like 'Single Line Responses'
+end
+
+describe Net::NNTP::PostingNotPermitted do
+  before(:all) do
+    @response = Net::NNTP::PostingNotPermitted.new(@request, '440', 'not permitted')
+  end
+  it_should_behave_like 'Single Line Responses'
+end
+
+describe Net::NNTP::PostingFailed do
+  before(:all) do
+    @response = Net::NNTP::PostingFailed.new(@request, '441', 'failed')
+  end
+  it_should_behave_like 'Single Line Responses'
+end
+
+
+describe Net::NNTP::AuthenticationRequired do
+  before(:all) do
+    @response = Net::NNTP::AuthenticationRequired.new(@request, '480', 'Authentication Required')
+  end
+  it_should_behave_like 'Generic Responses'
+end
+
+describe Net::NNTP::AuthenticationRequired do
+  before(:all) do
+    @response = Net::NNTP::AuthenticationRequired.new(@request, '481', 'Authentication failed')
+  end
+  it_should_behave_like 'Single Line Responses'
+end
+
+describe Net::NNTP::AuthenticationOutOfSequence do
+  before(:all) do
+    @response = Net::NNTP::AuthenticationOutOfSequence.new(@request, '482', 'Authentication out of sequence')
+  end
+  it_should_behave_like 'Single Line Responses'
+end
+
+describe Net::NNTP::PrivacyRequired do
+  before(:all) do
+    @response = Net::NNTP::PrivacyRequired.new(@request, '483', 'Privacy Required')
+  end
+  it_should_behave_like 'Generic Responses'
+end
+
+describe Net::NNTP::NotImplemented do
+  before(:all) do
+    @response = Net::NNTP::NotImplemented.new(@request, '500', 'Not Implemented')
+  end
+  it_should_behave_like 'Generic Responses'
+end
+
+describe Net::NNTP::SyntaxError do
+  before(:all) do
+    @response = Net::NNTP::SyntaxError.new(@request, '501', 'Syntax Error')
+  end
+  it_should_behave_like 'Generic Responses'
+end
+
+describe Net::NNTP::PermanentlyUnavailable do
+  before(:all) do
+    @response = Net::NNTP::PermanentlyUnavailable.new(@request, '502', 'Permanently Unavailable')
+  end
+  it_should_behave_like 'Generic Responses'
+end
+
+describe Net::NNTP::FeatureNotProvided do
+  before(:all) do
+    @response = Net::NNTP::FeatureNotProvided.new(@request, '503', 'Feature NotProvided')
+  end
+  it_should_behave_like 'Generic Responses'
+end
+
+describe Net::NNTP::EncodingError do
+  before(:all) do
+    @response = Net::NNTP::EncodingError.new(@request, '504', 'Encoding Error')
+  end
+  it_should_behave_like 'Generic Responses'
+end
+
+describe Net::NNTP::FailResponse do
+end
+
+describe Net::NNTP::Response do
+
+  before do
+    @request = Net::NNTP::Help.new
+  end
+  it 'should have a request accessor' do
+    @request = Net::NNTP::Help.new
+    @response = Net::NNTP::Response.new(@request, '100', 'Help Information follows', true, false)
+    @response.request.should == @request
+  end
+
+  it 'should not request an article body' do
+    @response = Net::NNTP::Response.new(@request, '100', 'Help Information follows', true, false)
+    @response.needs_article?.should be_false
+  end
+
+  it 'should not request closing of the socket' do
+    @response = Net::NNTP::Response.new(@request, '100', 'Help Information follows', true, false)
+    @response.force_close?.should be_false
+  end
+
+  it 'should be comparable to another Response' do
+    Net::NNTP::Response.create(@request, '500 Not Implemented').should == Net::NNTP::Response.create(@request, '500 Not Implemented')
+    Net::NNTP::NotImplemented.new(@request, '500', 'Not Implemented').should_not == Net::NNTP::SyntaxError.new(@request, '500', 'Not Implemented')
+  end
+
+  it 'should create a NotImplemented Class' do
+    Net::NNTP::Response.create(@request, '500 Not Implemented').class.should == Net::NNTP::NotImplemented
+  end
+
+  it 'should create a SyntaxError Class' do
+    Net::NNTP::Response.create(@request, '501 Syntax Error').class.should == Net::NNTP::SyntaxError
+  end
+
+  it 'should create a PermanentlyUnavailable Class' do
+    Net::NNTP::Response.create(@request, '502 Feature Not Provided').class.should == Net::NNTP::PermanentlyUnavailable
+  end
+
+  it 'should create a FeatureNotProvided Class' do
+    Net::NNTP::Response.create(@request, '503 Feature Not Provided').class.should == Net::NNTP::FeatureNotProvided
+  end
+
+  it 'should create an EncodingError Class' do
+    Net::NNTP::Response.create(@request, '504 Encoding Error').class.should == Net::NNTP::EncodingError
+  end
+
+  it 'should create a TemporarilyUnavailable Class' do
+    Net::NNTP::Response.create(@request, '400 Temporarily unavailable').class.should == Net::NNTP::TemporarilyUnavailable
+  end
+  
+  it 'should create an InternalFault Class' do
+    Net::NNTP::Response.create(@request, '403 Internal Error').class.should == Net::NNTP::InternalFault
+  end
+
+  it 'should create a GroupUnknown Class' do
+    @request = Net::NNTP::Group.new('not.here')
+    Net::NNTP::Response.create(@request, '411 not.here is unknown').class.should == Net::NNTP::GroupUnknown
+  end
+
+  it 'should create a NoGroupSelected Class' do
+    @request = Net::NNTP::Next
+    Net::NNTP::Response.create(@request, '412 no newsgroup selected').class.should == Net::NNTP::NoGroupSelected
+  end
+
+  it 'should create an InvalidArticle Class' do
+    @request = Net::NNTP::Article.new(0)
+    Net::NNTP::Response.create(@request, '420 invalid article number').class.should == Net::NNTP::InvalidArticle
+  end
+
+  it 'should create a NoNextArticle Class' do
+    Net::NNTP::Response.create(@request, '421 no next article in group').class.should == Net::NNTP::NoNextArticle
+  end
+
+  it 'should create a NoPreviousArticle Class' do
+    Net::NNTP::Response.create(@request, '422 no previous article in group').class.should == Net::NNTP::NoPreviousArticle
+  end
+
+  it 'should create an InvalidNumberOrRange Class' do
+    Net::NNTP::Response.create(@request, '423 no article with that number or in that range').class.should == Net::NNTP::InvalidNumberOrRange
+  end
+
+  it 'should create a NoSuchMessageid Class' do
+    Net::NNTP::Response.create(@request, '430 no article with that message-id').class.should == Net::NNTP::NoSuchMessageid
+  end
+
+  it 'should create an ArticleNotWanted Class' do
+    Net::NNTP::Response.create(@request, '435 article not wanted').class.should == Net::NNTP::ArticleNotWanted
+  end
+
+  it 'should create a TransferNotPossible Class' do
+    Net::NNTP::Response.create(@request, '436 transfer failed').class.should == Net::NNTP::TransferNotPossible
+  end
+
+  it 'should create an TransferRejected Class' do
+    Net::NNTP::Response.create(@request, '437 transfer rejected').class.should == Net::NNTP::TransferRejected
+  end
+
+  it 'should create a PostingNotPermitted Class' do
+    Net::NNTP::Response.create(@request, '440 not permitted').class.should == Net::NNTP::PostingNotPermitted
+  end
+
+  it 'should create a PostingFailed Class' do
+    Net::NNTP::Response.create(@request, '441 posting failed').class.should == Net::NNTP::PostingFailed
+  end
+
+  it 'should create a AuthenticationRequired Class' do
+    Net::NNTP::Response.create(@request, '480 Authentication Required').class.should == Net::NNTP::AuthenticationRequired
+  end
+
+  it 'should create a AuthenticationFailed Class' do
+    Net::NNTP::Response.create(@request, '481 Authentication failed').class.should == Net::NNTP::AuthenticationFailed
+  end
+
+  it 'should create a AuthenticationOutOfSequence Class' do
+    Net::NNTP::Response.create(@request, '482 Authentication out of sequence').class.should == Net::NNTP::AuthenticationOutOfSequence
+  end
+
+  it 'should create a PrivacyRequired Class' do
+    Net::NNTP::Response.create(@request, '483 Privacy Required').class.should == Net::NNTP::PrivacyRequired
+  end
+
+  it 'should create a HelpResponse Class' do
+    Net::NNTP::Response.create(@request, '100 Help text follows').class.should == Net::NNTP::HelpResponse
+  end
+
+  it 'should create a CapabilityList Class' do
+    Net::NNTP::Response.create(@request, '101 Capability list:').class.should == Net::NNTP::CapabilityList
+  end
+
+  it 'should create a DateResponse Class' do
+    Net::NNTP::Response.create(@request, '111 20080815124533').class.should == Net::NNTP::DateResponse
+  end
+
+  it 'should create a PostingAllowed Class' do
+    @request = Net::NNTP::Modereader.new
+    response = Net::NNTP::Response.create(@request, '200 Posting allowed')
+    response.class.should == Net::NNTP::PostingAllowed
+  end
+
+  it 'should create a PostingProhibited Class' do
+    @request = Net::NNTP::Modereader.new
+    response = Net::NNTP::Response.create(@request, '201 Posting Prohibited')
+    response.class.should == Net::NNTP::PostingProhibited
+  end
+
+  it 'should create a ConnectionClosing Class' do
+    @request = Net::NNTP::Quit.new
+    response = Net::NNTP::Response.create(@request, '205 Connection closing')
+    response.class.should == Net::NNTP::ConnectionClosing
+  end
+
+  it 'should create a GroupSelected Class' do
+    @request = Net::NNTP::Group.new('misc.test')
+    response = Net::NNTP::Response.create(@request, '211 1234 3000234 3002322 misc.test')
+    response.class.should == Net::NNTP::GroupSelected
+    @request = Net::NNTP::Listgroup.new('misc.test')
+    response = Net::NNTP::Response.create(@request, '211 1234 3000234 3002322 misc.test list follows')
+    response.class.should == Net::NNTP::GroupSelected
+  end
+
+  it 'should create a ListInformationFollows Class' do
+    @request = Net::NNTP::List.new
+    response = Net::NNTP::Response.create(@request, '215 list information follows')
+    response.class.should == Net::NNTP::ListInformationFollows
+  end
+
+  it 'should create an ArticleResponse Class' do
+    @request = Net::NNTP::Article.new
+    response = Net::NNTP::Response.create(@request, '220 Article follows')
+    response.class.should == Net::NNTP::ArticleResponse
+  end
+
+  it 'should create a HeaderResponse Class' do
+    @request = Net::NNTP::Head.new
+    response = Net::NNTP::Response.create(@request, '221 Header information follows')
+    response.class.should == Net::NNTP::HeaderResponse
+  end
+
+  it 'should create a BodyResponse Class' do
+    @request = Net::NNTP::Body.new
+    response = Net::NNTP::Response.create(@request, '222 Article Body follows')
+    response.class.should == Net::NNTP::BodyResponse
+  end
+
+  it 'should create an ArticleSelected Class' do
+    @request = Net::NNTP::Next.new
+    response = Net::NNTP::Response.create(@request, '223 3000237 <1234@example.org> retrieved')
+    response.class.should == Net::NNTP::ArticleSelected
+  end
+
+  it 'should create an OverviewInformation Class' do
+    @request = Net::NNTP::Over.new
+    response = Net::NNTP::Response.create(@request, '224 Overview Information follows')
+    response.class.should == Net::NNTP::OverviewInformation
+  end
+
+  it 'should create a HdrResponse Class' do
+    @request = Net::NNTP::Hdr.new('Subject')
+    response = Net::NNTP::Response.create(@request, '225 Header information follows')
+    response.class.should == Net::NNTP::HdrResponse
+  end
+
+  it 'should create a NewnewsResponse Class' do
+    @request = Net::NNTP::Newnews.new(['at.*'], '20080527 092535')
+    response = Net::NNTP::Response.create(@request, '230 List of new articles by message-id follows')
+    response.class.should == Net::NNTP::NewnewsResponse
+  end
+
+  it 'should create a NewgroupsResponse Class' do
+    @request = Net::NNTP::Newgroups.new('20080527 092535')
+    response = Net::NNTP::Response.create(@request, '231 List of new newsgroups follows')
+    response.class.should == Net::NNTP::NewgroupsResponse
+  end
+
+  it 'should create a TransferOK Class' do
+    @request = Net::NNTP::Ihave.new('<my.msgid@example.com>')
+    response = Net::NNTP::Response.create(@request, '235 Article transferred OK')
+    response.class.should == Net::NNTP::TransferOK
+  end
+
+  it 'should create an ArticleReceived Class' do
+    @request = Net::NNTP::Post.new
+    response = Net::NNTP::Response.create(@request, '240 Article received OK')
+    response.class.should == Net::NNTP::ArticleReceived
+  end
+
+  it 'should create an AuthenticationAccepted Class' do
+    @request = Net::NNTP::Authinfo.new('user', 'pass')
+    response = Net::NNTP::Response.create(@request, '281 Authentication OK')
+    response.class.should == Net::NNTP::AuthenticationAccepted
+  end
+
+  it 'should create a TransferArticle Class' do
+    @request = Net::NNTP::Ihave.new('<my.msgid@example.com>')
+    response = Net::NNTP::Response.create(@request, '335 Send it; end with <CR-LF>.<CR-LF>')
+    response.class.should == Net::NNTP::TransferArticle
+  end
+
+  it 'should create a PostArticle Class' do
+    @request = Net::NNTP::Post.new
+    response = Net::NNTP::Response.create(@request, '340 Send it; end with <CR-LF>.<CR-LF>')
+    response.class.should == Net::NNTP::PostArticle
+  end
+
+  it 'should create a PasswordRequired Class' do
+    response = Net::NNTP::Response.create(@request,'381 Password required')
+    response.class.should == Net::NNTP::PasswordRequired
+  end
+
+  it 'should create a InformationResponse on unknown 189 code' do
+    @request = Net::NNTP::Help.new
+    response = Net::NNTP::Response.create(@request, '189 unknown code')
+    response.class.should == Net::NNTP::InformationResponse
+    response.code.should == '189'
+    response.message.should == 'unknown code'
+  end
+
+end
+