test/mock/mock_socket.rb in ruby-net-nntp-0.0.7 vs test/mock/mock_socket.rb in ruby-net-nntp-0.0.8

- old
+ new

@@ -33,33 +33,33 @@ def write( str ) super # Call the mocked method to record the call @io = [] case str.downcase when /^body(.*)/ - body = [ + body = [ "222 1392 <5d6be$4625ae23$51df8a12$32566@news.inode.at> article retrieved - body follows\r\n", "Hi,\r\n", "\r\n", "kennt ihr eine Moeglichkeit den maximalen Speicherbedarf eines Programms \r\n", "ueber dessen gesamte Laufzeit zu ermitteln? Also keine Momentaufnahme \r\n", "wie mit ps, top & Co?\r\n", "\r\n", "Danke & vG\r\n", "Franz Hollerer\r\n", ".\r\n" - ] + ] case $1 when /^\s+1392/, /^\s*$/ - if @group_selected - @io = body - else - @io = ["412 No Group selected"] - end + if @group_selected + @io = body + else + @io = ["412 No Group selected"] + end when /^\s*<5d6be\$4625ae23\$51df8a12\$32566@news\.inode\.at>/ - @io = body + @io = body else - @io = ["No such article"] + @io = ["No such article"] end when /^article(.*)/ article = [ "220 1392 <5d6be$4625ae23$51df8a12$32566@news.inode.at> article retrieved - text follows\r\n", "Path: vietwist00.chello.at!newsfeed02.chello.at!news.inode.at.POSTED!not-for-mail\r\n", @@ -90,256 +90,256 @@ "Franz Hollerer\r\n", ".\r\n" ] case $1 when /\s*1392/ - if @group_selected - @io = article - else - @io = ["412 No Group selected"] - end + if @group_selected + @io = article + else + @io = ["412 No Group selected"] + end when /^\s*<5d6be\$4625ae23\$51df8a12\$32566@news\.inode\.at>/ - @io = article + @io = article else - @io = ["430 No such article"] + @io = ["430 No such article"] end when /^list\b\s*(.*)\r\n$/ case $1 when /overview.fmt/i - @io = ["215 Order of fields in overview database.\r\nSubject:\r\nFrom:\r\nDate:\r\nMessage-ID:\r\nReferences:\r\nBytes:\r\nLines:\r\nXref:full\r\n.\r\n" ] + @io = ["215 Order of fields in overview database.\r\nSubject:\r\nFrom:\r\nDate:\r\nMessage-ID:\r\nReferences:\r\nBytes:\r\nLines:\r\nXref:full\r\n.\r\n" ] when /active\s*(.*)/ - @io = ["215 Newsgroups in form \"group high low flags\".", "at.test 200 100 y\r\n", "at.linux 100 90 n\r\n", ".\r\n"] + @io = ["215 Newsgroups in form \"group high low flags\".", "at.test 200 100 y\r\n", "at.linux 100 90 n\r\n", ".\r\n"] when /^\s*$/ - @io = ["215 Newsgroups in form \"group high low flags\".", "at.test 200 100 y\r\n", "at.linux 100 90 n\r\n", ".\r\n"] + @io = ["215 Newsgroups in form \"group high low flags\".", "at.test 200 100 y\r\n", "at.linux 100 90 n\r\n", ".\r\n"] else - @io = ["501 Bad Command Usage"] + @io = ["501 Bad Command Usage"] end when "help\r\n" then @io = [ - "100 Legal commands on THIS server:\r\n", - "ARTICLE [<Message-ID>|<Number>]\r\n", - "BODY [<Message-ID>|<Number>]\r\n", - "DATE\r\n", - "GROUP <Newsgroup>\r\n", - "HDR <Header> <Message-ID>|<Range>\r\n", - "HEAD [<Message-ID>|<Number>]\r\n", - "HELP\r\n", - "LAST\r\n", - "LIST [ACTIVE|NEWSGROUPS] [<Wildmat>]]\r\n", - "LIST [ACTIVE.TIMES|EXTENSIONS|OVERVIEW.FMT]\r\n", - "LISTGROUP <Newsgroup>\r\n", - "MODE READER\r\n", - "NEWGROUPS <yymmdd> <hhmmss> [GMT]\r\n", - "NEXT\r\n", - "POST\r\n", - "OVER <Range>\r\n", - "SLAVE\r\n", - "STAT [<Message-ID>|<Number>]\r\n", - "XHDR <Header> <Message-ID>|<Range>\r\n", - "XOVER <Range>\r\n", - ".\r\n"] + "100 Legal commands on THIS server:\r\n", + "ARTICLE [<Message-ID>|<Number>]\r\n", + "BODY [<Message-ID>|<Number>]\r\n", + "DATE\r\n", + "GROUP <Newsgroup>\r\n", + "HDR <Header> <Message-ID>|<Range>\r\n", + "HEAD [<Message-ID>|<Number>]\r\n", + "HELP\r\n", + "LAST\r\n", + "LIST [ACTIVE|NEWSGROUPS] [<Wildmat>]]\r\n", + "LIST [ACTIVE.TIMES|EXTENSIONS|OVERVIEW.FMT]\r\n", + "LISTGROUP <Newsgroup>\r\n", + "MODE READER\r\n", + "NEWGROUPS <yymmdd> <hhmmss> [GMT]\r\n", + "NEXT\r\n", + "POST\r\n", + "OVER <Range>\r\n", + "SLAVE\r\n", + "STAT [<Message-ID>|<Number>]\r\n", + "XHDR <Header> <Message-ID>|<Range>\r\n", + "XOVER <Range>\r\n", + ".\r\n"] when /^next/i if @group_selected - if @last_article - if @last_article < 1375 - @last_article += 1 - else - @last_article = nil - end - else - @last_article = 1363 - end - @io = @last_article ? ["223 #{@last_article} <example.msgid@fake.host> retrieved"] : ['421 No next article in group'] + if @last_article + if @last_article < 1375 + @last_article += 1 + else + @last_article = nil + end + else + @last_article = 1363 + end + @io = @last_article ? ["223 #{@last_article} <example.msgid@fake.host> retrieved"] : ['421 No next article in group'] else - @io = ['412 No Group selected'] + @io = ['412 No Group selected'] end when /^last/i if @group_selected - if @last_article - if @last_article > 1363 - @last_article -= 1 - else - @last_article = nil - end - end - @io = @last_article ? ["223 #{@last_article} <example.msgid@fake.host> retrieved"] : ['421 No next article in group'] + if @last_article + if @last_article > 1363 + @last_article -= 1 + else + @last_article = nil + end + end + @io = @last_article ? ["223 #{@last_article} <example.msgid@fake.host> retrieved"] : ['421 No next article in group'] else - @io = ['412 No Group selected'] + @io = ['412 No Group selected'] end when /^mode reader/i @io = ["200 Welcome"] when /^listgroup\s*(.*)\s*/i case $1 when 'at.linux' - @io = [ - "211 Article list for at.linux follows\r\n", - "1363\r\n", - "1364\r\n", - "1365\r\n", - "1366\r\n", - "1367\r\n", - "1368\r\n", - "1369\r\n", - "1370\r\n", - "1371\r\n", - "1372\r\n", - "1373\r\n", - "1374\r\n", - "1375\r\n", - ".\r\n" - ] - else - if @group_selected - @io = [ - "211 Article list for at.linux follows\r\n", - "1363\r\n", - "1364\r\n", - "1365\r\n", - "1366\r\n", - "1367\r\n", - "1368\r\n", - "1369\r\n", - "1370\r\n", - "1371\r\n", - "1372\r\n", - "1373\r\n", - "1374\r\n", - "1375\r\n", - ".\r\n" - ] - else - @io = ['412 No Group selected'] - end - end - when "quit\r\n" then - @io = ["200 Good bye"] - when "authinfo user dummy\r\n" - @io = ["381 More authentication details needed"] - when "authinfo pass test\r\n" - @io = ["281 Welcome to dummytest"] - when /^group\s+(.+)\s*\r\n$/ - case $1 - when 'at.linux' - @io = ["211 12 1363 1375 at.linux"] - @group_selected = 'at.linux' - else - @io = ["411 No such group"] - end - when "xhdr subject <slrnf26akq.ci5.hjp-usenet2@zeno.hjp.at>\r\n" - @io = - ["1375 Re: Bitte um Meinungen ==> Virtualisierung\r\n"] - when "xhdr subject 1363-1375\r\n" + @io = [ + "211 Article list for at.linux follows\r\n", + "1363\r\n", + "1364\r\n", + "1365\r\n", + "1366\r\n", + "1367\r\n", + "1368\r\n", + "1369\r\n", + "1370\r\n", + "1371\r\n", + "1372\r\n", + "1373\r\n", + "1374\r\n", + "1375\r\n", + ".\r\n" + ] + else if @group_selected - @io = [ - "221 Subject header (from overview) for postings 1363-1375\r\n", - "1363 Re: Bitte um Meinungen ==> Virtualisierung\r\n", - "1364 Re: Bitte um Meinungen ==> Virtualisierung\r\n", - "1365 Re: Bitte um Meinungen ==> Virtualisierung\r\n", - "1366 Re: Bitte um Meinungen ==> Virtualisierung\r\n", - "1367 Re: Bitte um Meinungen ==> Virtualisierung\r\n", - "1368 Re: Bitte um Meinungen ==> Virtualisierung\r\n", - "1369 Re: Bitte um Meinungen ==> Virtualisierung\r\n", - "1370 Re: Bitte um Meinungen ==> Virtualisierung\r\n", - "1371 Re: Bitte um Meinungen ==> Virtualisierung\r\n", - "1372 Re: Bitte um Meinungen ==> Virtualisierung\r\n", - "1373 Re: Bitte um Meinungen ==> Virtualisierung\r\n", - "1374 Re: Bitte um Meinungen ==> Virtualisierung\r\n", - "1375 Re: Bitte um Meinungen ==> Virtualisierung\r\n", - ".\r\n" - ] + @io = [ + "211 Article list for at.linux follows\r\n", + "1363\r\n", + "1364\r\n", + "1365\r\n", + "1366\r\n", + "1367\r\n", + "1368\r\n", + "1369\r\n", + "1370\r\n", + "1371\r\n", + "1372\r\n", + "1373\r\n", + "1374\r\n", + "1375\r\n", + ".\r\n" + ] else - @io = ['412 No group selected'] + @io = ['412 No Group selected'] end - when "xover 1363-1375\r\n" - if @group_selected + end + when "quit\r\n" then + @io = ["200 Good bye"] + when "authinfo user dummy\r\n" + @io = ["381 More authentication details needed"] + when "authinfo pass test\r\n" + @io = ["281 Welcome to dummytest"] + when /^group\s+(.+)\s*\r\n$/ + case $1 + when 'at.linux' + @io = ["211 12 1363 1375 at.linux"] + @group_selected = 'at.linux' + else + @io = ["411 No such group"] + end + when "xhdr subject <slrnf26akq.ci5.hjp-usenet2@zeno.hjp.at>\r\n" + @io = + ["1375 Re: Bitte um Meinungen ==> Virtualisierung\r\n"] + when "xhdr subject 1363-1375\r\n" + if @group_selected @io = [ - "224 Overview information for postings 1363-1375:\r\n", - "1363 Re: Bitte um Meinungen ==> Virtualisierung \"Igo Besser\" <i.besser@aon.at> Sun, 15 Apr 2007 14:09:46 +0200 <46221541$0$2299$91cee783@newsreader01.highway.telekom.at> <4621dbb8$0$2310$91cee783@newsreader01.highway.telekom.at> <dh49f4-qem.ln1@this.is.a.news.server.you.goddamn.stupid.program> <slrnf23snh.dfm.hjp-usenet2@zeno.hjp.at> <4621ff58$0$2307$91cee783@newsreader01.highway.telekom.at> <evt242$1jc7$1@geiz-ist-geil.priv.at> 1165 9 Xref: sensor.twincode.net at.linux:1363\r\n", - "1364 Re: Bitte um Meinungen ==> Virtualisierung \"Igo Besser\" <i.besser@aon.at> Sun, 15 Apr 2007 14:14:12 +0200 <4622164b$0$25611$91cee783@newsreader02.highway.telekom.at> <4621dbb8$0$2310$91cee783@newsreader01.highway.telekom.at> <dh49f4-qem.ln1@this.is.a.news.server.you.goddamn.stupid.program> <4621fc17$0$2315$91cee783@newsreader01.highway.telekom.at> <evt1p1$1jar$1@geiz-ist-geil.priv.at> 1229 13 Xref: sensor.twincode.net at.linux:1364\r\n", - "1365 Re: Bitte um Meinungen ==> Virtualisierung \"Peter J. Holzer\" <hjp-usenet2@hjp.at> Sun, 15 Apr 2007 16:39:56 +0200 <slrnf24e9s.dtb.hjp-usenet2@zeno.hjp.at> <4621dbb8$0$2310$91cee783@newsreader01.highway.telekom.at> <dh49f4-qem.ln1@this.is.a.news.server.you.goddamn.stupid.program> <slrnf23snh.dfm.hjp-usenet2@zeno.hjp.at> <4621ff58$0$2307$91cee783@newsreader01.highway.telekom.at> 2643 42 Xref: sensor.twincode.net at.linux:1365\r\n", - "1366 Re: Bitte um Meinungen ==> Virtualisierung \"Igo Besser\" <i.besser@aon.at> Sun, 15 Apr 2007 19:14:08 +0200 <46225c97$0$25626$91cee783@newsreader02.highway.telekom.at> <4621dbb8$0$2310$91cee783@newsreader01.highway.telekom.at> <dh49f4-qem.ln1@this.is.a.news.server.you.goddamn.stupid.program> <slrnf23snh.dfm.hjp-usenet2@zeno.hjp.at> <4621ff58$0$2307$91cee783@newsreader01.highway.telekom.at> <slrnf24e9s.dtb.hjp-usenet2@zeno.hjp.at> 1344 13 Xref: sensor.twincode.net at.linux:1366\r\n", - "1367 Re: Bitte um Meinungen ==> Virtualisierung \"Peter J. Holzer\" <hjp-usenet2@hjp.at> Sun, 15 Apr 2007 21:35:27 +0200 <slrnf24vjv.7pk.hjp-usenet2@zeno.hjp.at> <4621dbb8$0$2310$91cee783@newsreader01.highway.telekom.at> <dh49f4-qem.ln1@this.is.a.news.server.you.goddamn.stupid.program> <slrnf23snh.dfm.hjp-usenet2@zeno.hjp.at> <4621ff58$0$2307$91cee783@newsreader01.highway.telekom.at> <slrnf24e9s.dtb.hjp-usenet2@zeno.hjp.at> <46225c97$0$25626$91cee783@newsreader02.highway.telekom.at> 1851 24 Xref: sensor.twincode.net at.linux:1367\r\n", - "1368 Re: Bitte um Meinungen ==> Virtualisierung Wolfgang Steger <wolfgangs-spambox@utanet.at> Sun, 15 Apr 2007 21:48:48 +0200 <16caf4-581.ln1@swws1.dyndns.org> <4621dbb8$0$2310$91cee783@newsreader01.highway.telekom.at> <dh49f4-qem.ln1@this.is.a.news.server.you.goddamn.stupid.program> <slrnf23snh.dfm.hjp-usenet2@zeno.hjp.at> <4621ff58$0$2307$91cee783@newsreader01.highway.telekom.at> <slrnf24e9s.dtb.hjp-usenet2@zeno.hjp.at> <46225c97$0$25626$91cee783@newsreader02.highway.telekom.at> 2248 20 Xref: sensor.twincode.net at.linux:1368\r\n", - "1369 Re: Bitte um Meinungen ==> Virtualisierung Michael Prokop <devnull@michael-prokop.at> Sun, 15 Apr 2007 22:22:46 +0200 <2007-04-15T22-19-44@devnull.michael-prokop.at> <4621dbb8$0$2310$91cee783@newsreader01.highway.telekom.at> <dh49f4-qem.ln1@this.is.a.news.server.you.goddamn.stupid.program> <slrnf23snh.dfm.hjp-usenet2@zeno.hjp.at> <4621ff58$0$2307$91cee783@newsreader01.highway.telekom.at> <slrnf24e9s.dtb.hjp-usenet2@zeno.hjp.at> <46225c97$0$25626$91cee783@newsreader02.highway.telekom.at> <slrnf24vjv.7pk.hjp-usenet2@zeno.hjp.at> 2022 23 Xref: sensor.twincode.net at.linux:1369\r\n", - "1370 Re: Bitte um Meinungen ==> Virtualisierung Robert Annessi <robert@annessi.at> Sun, 15 Apr 2007 22:52:36 +0200 <46229089$0$10578$3b214f66@tunews.univie.ac.at> <4621dbb8$0$2310$91cee783@newsreader01.highway.telekom.at> <dh49f4-qem.ln1@this.is.a.news.server.you.goddamn.stupid.program> <slrnf23snh.dfm.hjp-usenet2@zeno.hjp.at> <4621ff58$0$2307$91cee783@newsreader01.highway.telekom.at> <slrnf24e9s.dtb.hjp-usenet2@zeno.hjp.at> <46225c97$0$25626$91cee783@newsreader02.highway.telekom.at> <16caf4-581.ln1@swws1.dyndns.org> 1807 27 Xref: sensor.twincode.net at.linux:1370\r\n", - "1371 Re: Bitte um Meinungen ==> Virtualisierung \"Thomas Spachinger\" <t.spachinger@gmx.at> Sun, 15 Apr 2007 22:58:17 +0200 <58fi18F2gdp4eU1@mid.individual.net> <4621dbb8$0$2310$91cee783@newsreader01.highway.telekom.at> <dh49f4-qem.ln1@this.is.a.news.server.you.goddamn.stupid.program> <4621fc17$0$2315$91cee783@newsreader01.highway.telekom.at> <evt1p1$1jar$1@geiz-ist-geil.priv.at> <4622164b$0$25611$91cee783@newsreader02.highway.telekom.at> 1427 18 Xref: sensor.twincode.net at.linux:1371\r\n", - "1372 Re: Bitte um Meinungen ==> Virtualisierung Bernd Haug <haug@berndhaug.net> Sun, 15 Apr 2007 23:54:05 +0200 <tgjaf4-lt9.ln1@this.is.a.news.server.you.goddamn.stupid.program> <4621dbb8$0$2310$91cee783@newsreader01.highway.telekom.at> <dh49f4-qem.ln1@this.is.a.news.server.you.goddamn.stupid.program> <slrnf23snh.dfm.hjp-usenet2@zeno.hjp.at> <4621ff58$0$2307$91cee783@newsreader01.highway.telekom.at> <slrnf24e9s.dtb.hjp-usenet2@zeno.hjp.at> <46225c97$0$25626$91cee783@newsreader02.highway.telekom.at> <slrnf24vjv.7pk.hjp-usenet2@zeno.hjp.at> 1721 10 Xref: sensor.twincode.net at.linux:1372\r\n", - "1373 Re: Bitte um Meinungen ==> Virtualisierung Wolfgang Fuschlberger <usenet-2006-05@fuschlberger.net> Sun, 15 Apr 2007 23:58:07 +0200 <fojaf4-kcj.ln1@window.dtdns.net> <4621dbb8$0$2310$91cee783@newsreader01.highway.telekom.at> <dh49f4-qem.ln1@this.is.a.news.server.you.goddamn.stupid.program> <slrnf23snh.dfm.hjp-usenet2@zeno.hjp.at> <4621ff58$0$2307$91cee783@newsreader01.highway.telekom.at> <slrnf24e9s.dtb.hjp-usenet2@zeno.hjp.at> <46225c97$0$25626$91cee783@newsreader02.highway.telekom.at> <16caf4-581.ln1@swws1.dyndns.org> <46229089$0$10578$3b214f66@tunews.univie.ac.at> 1800 17 Xref: sensor.twincode.net at.linux:1373\r\n", - "1374 Re: Bitte um Meinungen ==> Virtualisierung Andreas Labres <al-nospam0310&bounce@labres.at> Mon, 16 Apr 2007 08:57:43 +0200 <1tnru1ccirb05.dlg@al.lab.at> <4621dbb8$0$2310$91cee783@newsreader01.highway.telekom.at> <dh49f4-qem.ln1@this.is.a.news.server.you.goddamn.stupid.program> <slrnf23snh.dfm.hjp-usenet2@zeno.hjp.at> <4621ff58$0$2307$91cee783@newsreader01.highway.telekom.at> 1702 19 Xref: sensor.twincode.net at.linux:1374\r\n", - "1375 Re: Bitte um Meinungen ==> Virtualisierung \"Peter J. Holzer\" <hjp-usenet2@hjp.at> Mon, 16 Apr 2007 09:49:46 +0200 <slrnf26akq.ci5.hjp-usenet2@zeno.hjp.at> <4621dbb8$0$2310$91cee783@newsreader01.highway.telekom.at> <dh49f4-qem.ln1@this.is.a.news.server.you.goddamn.stupid.program> <slrnf23snh.dfm.hjp-usenet2@zeno.hjp.at> <4621ff58$0$2307$91cee783@newsreader01.highway.telekom.at> <1tnru1ccirb05.dlg@al.lab.at> 2127 33 Xref: sensor.twincode.net at.linux:1375\r\n", - ".\r\n" + "221 Subject header (from overview) for postings 1363-1375\r\n", + "1363 Re: Bitte um Meinungen ==> Virtualisierung\r\n", + "1364 Re: Bitte um Meinungen ==> Virtualisierung\r\n", + "1365 Re: Bitte um Meinungen ==> Virtualisierung\r\n", + "1366 Re: Bitte um Meinungen ==> Virtualisierung\r\n", + "1367 Re: Bitte um Meinungen ==> Virtualisierung\r\n", + "1368 Re: Bitte um Meinungen ==> Virtualisierung\r\n", + "1369 Re: Bitte um Meinungen ==> Virtualisierung\r\n", + "1370 Re: Bitte um Meinungen ==> Virtualisierung\r\n", + "1371 Re: Bitte um Meinungen ==> Virtualisierung\r\n", + "1372 Re: Bitte um Meinungen ==> Virtualisierung\r\n", + "1373 Re: Bitte um Meinungen ==> Virtualisierung\r\n", + "1374 Re: Bitte um Meinungen ==> Virtualisierung\r\n", + "1375 Re: Bitte um Meinungen ==> Virtualisierung\r\n", + ".\r\n" ] - else - @io = ["412 No Group selected"] + else + @io = ['412 No group selected'] + end + when "xover 1363-1375\r\n" + if @group_selected + @io = [ + "224 Overview information for postings 1363-1375:\r\n", + "1363 Re: Bitte um Meinungen ==> Virtualisierung \"Igo Besser\" <i.besser@aon.at> Sun, 15 Apr 2007 14:09:46 +0200 <46221541$0$2299$91cee783@newsreader01.highway.telekom.at> <4621dbb8$0$2310$91cee783@newsreader01.highway.telekom.at> <dh49f4-qem.ln1@this.is.a.news.server.you.goddamn.stupid.program> <slrnf23snh.dfm.hjp-usenet2@zeno.hjp.at> <4621ff58$0$2307$91cee783@newsreader01.highway.telekom.at> <evt242$1jc7$1@geiz-ist-geil.priv.at> 1165 9 Xref: sensor.twincode.net at.linux:1363\r\n", + "1364 Re: Bitte um Meinungen ==> Virtualisierung \"Igo Besser\" <i.besser@aon.at> Sun, 15 Apr 2007 14:14:12 +0200 <4622164b$0$25611$91cee783@newsreader02.highway.telekom.at> <4621dbb8$0$2310$91cee783@newsreader01.highway.telekom.at> <dh49f4-qem.ln1@this.is.a.news.server.you.goddamn.stupid.program> <4621fc17$0$2315$91cee783@newsreader01.highway.telekom.at> <evt1p1$1jar$1@geiz-ist-geil.priv.at> 1229 13 Xref: sensor.twincode.net at.linux:1364\r\n", + "1365 Re: Bitte um Meinungen ==> Virtualisierung \"Peter J. Holzer\" <hjp-usenet2@hjp.at> Sun, 15 Apr 2007 16:39:56 +0200 <slrnf24e9s.dtb.hjp-usenet2@zeno.hjp.at> <4621dbb8$0$2310$91cee783@newsreader01.highway.telekom.at> <dh49f4-qem.ln1@this.is.a.news.server.you.goddamn.stupid.program> <slrnf23snh.dfm.hjp-usenet2@zeno.hjp.at> <4621ff58$0$2307$91cee783@newsreader01.highway.telekom.at> 2643 42 Xref: sensor.twincode.net at.linux:1365\r\n", + "1366 Re: Bitte um Meinungen ==> Virtualisierung \"Igo Besser\" <i.besser@aon.at> Sun, 15 Apr 2007 19:14:08 +0200 <46225c97$0$25626$91cee783@newsreader02.highway.telekom.at> <4621dbb8$0$2310$91cee783@newsreader01.highway.telekom.at> <dh49f4-qem.ln1@this.is.a.news.server.you.goddamn.stupid.program> <slrnf23snh.dfm.hjp-usenet2@zeno.hjp.at> <4621ff58$0$2307$91cee783@newsreader01.highway.telekom.at> <slrnf24e9s.dtb.hjp-usenet2@zeno.hjp.at> 1344 13 Xref: sensor.twincode.net at.linux:1366\r\n", + "1367 Re: Bitte um Meinungen ==> Virtualisierung \"Peter J. Holzer\" <hjp-usenet2@hjp.at> Sun, 15 Apr 2007 21:35:27 +0200 <slrnf24vjv.7pk.hjp-usenet2@zeno.hjp.at> <4621dbb8$0$2310$91cee783@newsreader01.highway.telekom.at> <dh49f4-qem.ln1@this.is.a.news.server.you.goddamn.stupid.program> <slrnf23snh.dfm.hjp-usenet2@zeno.hjp.at> <4621ff58$0$2307$91cee783@newsreader01.highway.telekom.at> <slrnf24e9s.dtb.hjp-usenet2@zeno.hjp.at> <46225c97$0$25626$91cee783@newsreader02.highway.telekom.at> 1851 24 Xref: sensor.twincode.net at.linux:1367\r\n", + "1368 Re: Bitte um Meinungen ==> Virtualisierung Wolfgang Steger <wolfgangs-spambox@utanet.at> Sun, 15 Apr 2007 21:48:48 +0200 <16caf4-581.ln1@swws1.dyndns.org> <4621dbb8$0$2310$91cee783@newsreader01.highway.telekom.at> <dh49f4-qem.ln1@this.is.a.news.server.you.goddamn.stupid.program> <slrnf23snh.dfm.hjp-usenet2@zeno.hjp.at> <4621ff58$0$2307$91cee783@newsreader01.highway.telekom.at> <slrnf24e9s.dtb.hjp-usenet2@zeno.hjp.at> <46225c97$0$25626$91cee783@newsreader02.highway.telekom.at> 2248 20 Xref: sensor.twincode.net at.linux:1368\r\n", + "1369 Re: Bitte um Meinungen ==> Virtualisierung Michael Prokop <devnull@michael-prokop.at> Sun, 15 Apr 2007 22:22:46 +0200 <2007-04-15T22-19-44@devnull.michael-prokop.at> <4621dbb8$0$2310$91cee783@newsreader01.highway.telekom.at> <dh49f4-qem.ln1@this.is.a.news.server.you.goddamn.stupid.program> <slrnf23snh.dfm.hjp-usenet2@zeno.hjp.at> <4621ff58$0$2307$91cee783@newsreader01.highway.telekom.at> <slrnf24e9s.dtb.hjp-usenet2@zeno.hjp.at> <46225c97$0$25626$91cee783@newsreader02.highway.telekom.at> <slrnf24vjv.7pk.hjp-usenet2@zeno.hjp.at> 2022 23 Xref: sensor.twincode.net at.linux:1369\r\n", + "1370 Re: Bitte um Meinungen ==> Virtualisierung Robert Annessi <robert@annessi.at> Sun, 15 Apr 2007 22:52:36 +0200 <46229089$0$10578$3b214f66@tunews.univie.ac.at> <4621dbb8$0$2310$91cee783@newsreader01.highway.telekom.at> <dh49f4-qem.ln1@this.is.a.news.server.you.goddamn.stupid.program> <slrnf23snh.dfm.hjp-usenet2@zeno.hjp.at> <4621ff58$0$2307$91cee783@newsreader01.highway.telekom.at> <slrnf24e9s.dtb.hjp-usenet2@zeno.hjp.at> <46225c97$0$25626$91cee783@newsreader02.highway.telekom.at> <16caf4-581.ln1@swws1.dyndns.org> 1807 27 Xref: sensor.twincode.net at.linux:1370\r\n", + "1371 Re: Bitte um Meinungen ==> Virtualisierung \"Thomas Spachinger\" <t.spachinger@gmx.at> Sun, 15 Apr 2007 22:58:17 +0200 <58fi18F2gdp4eU1@mid.individual.net> <4621dbb8$0$2310$91cee783@newsreader01.highway.telekom.at> <dh49f4-qem.ln1@this.is.a.news.server.you.goddamn.stupid.program> <4621fc17$0$2315$91cee783@newsreader01.highway.telekom.at> <evt1p1$1jar$1@geiz-ist-geil.priv.at> <4622164b$0$25611$91cee783@newsreader02.highway.telekom.at> 1427 18 Xref: sensor.twincode.net at.linux:1371\r\n", + "1372 Re: Bitte um Meinungen ==> Virtualisierung Bernd Haug <haug@berndhaug.net> Sun, 15 Apr 2007 23:54:05 +0200 <tgjaf4-lt9.ln1@this.is.a.news.server.you.goddamn.stupid.program> <4621dbb8$0$2310$91cee783@newsreader01.highway.telekom.at> <dh49f4-qem.ln1@this.is.a.news.server.you.goddamn.stupid.program> <slrnf23snh.dfm.hjp-usenet2@zeno.hjp.at> <4621ff58$0$2307$91cee783@newsreader01.highway.telekom.at> <slrnf24e9s.dtb.hjp-usenet2@zeno.hjp.at> <46225c97$0$25626$91cee783@newsreader02.highway.telekom.at> <slrnf24vjv.7pk.hjp-usenet2@zeno.hjp.at> 1721 10 Xref: sensor.twincode.net at.linux:1372\r\n", + "1373 Re: Bitte um Meinungen ==> Virtualisierung Wolfgang Fuschlberger <usenet-2006-05@fuschlberger.net> Sun, 15 Apr 2007 23:58:07 +0200 <fojaf4-kcj.ln1@window.dtdns.net> <4621dbb8$0$2310$91cee783@newsreader01.highway.telekom.at> <dh49f4-qem.ln1@this.is.a.news.server.you.goddamn.stupid.program> <slrnf23snh.dfm.hjp-usenet2@zeno.hjp.at> <4621ff58$0$2307$91cee783@newsreader01.highway.telekom.at> <slrnf24e9s.dtb.hjp-usenet2@zeno.hjp.at> <46225c97$0$25626$91cee783@newsreader02.highway.telekom.at> <16caf4-581.ln1@swws1.dyndns.org> <46229089$0$10578$3b214f66@tunews.univie.ac.at> 1800 17 Xref: sensor.twincode.net at.linux:1373\r\n", + "1374 Re: Bitte um Meinungen ==> Virtualisierung Andreas Labres <al-nospam0310&bounce@labres.at> Mon, 16 Apr 2007 08:57:43 +0200 <1tnru1ccirb05.dlg@al.lab.at> <4621dbb8$0$2310$91cee783@newsreader01.highway.telekom.at> <dh49f4-qem.ln1@this.is.a.news.server.you.goddamn.stupid.program> <slrnf23snh.dfm.hjp-usenet2@zeno.hjp.at> <4621ff58$0$2307$91cee783@newsreader01.highway.telekom.at> 1702 19 Xref: sensor.twincode.net at.linux:1374\r\n", + "1375 Re: Bitte um Meinungen ==> Virtualisierung \"Peter J. Holzer\" <hjp-usenet2@hjp.at> Mon, 16 Apr 2007 09:49:46 +0200 <slrnf26akq.ci5.hjp-usenet2@zeno.hjp.at> <4621dbb8$0$2310$91cee783@newsreader01.highway.telekom.at> <dh49f4-qem.ln1@this.is.a.news.server.you.goddamn.stupid.program> <slrnf23snh.dfm.hjp-usenet2@zeno.hjp.at> <4621ff58$0$2307$91cee783@newsreader01.highway.telekom.at> <1tnru1ccirb05.dlg@al.lab.at> 2127 33 Xref: sensor.twincode.net at.linux:1375\r\n", + ".\r\n" + ] + else + @io = ["412 No Group selected"] end when /xover \<.+\>/ @io = ["502 Usage: OVER first[-[last]]"] when /^xhdr\s*$/ @io = ["502 Usage: HDR header [first[-last]]|[message-id]"] when /^head(.*)$/ case $1 when /^\s+(1430|<462dfa6f$0$23135$9b4e6d93@newsspool1.arcor-online.net>)/ - @io = [ - "221 1430 <462dfa6f$0$23135$9b4e6d93@newsspool1.arcor-online.net> article retrieved - head follows\r\n", - "Path: vietwist00.chello.at!newsfeed02.chello.at!newsfeed01.chello.at!newsfeed.arcor.de!newsspool1.arcor-online.net!news.arcor.de.POSTED!not-for-mail\r\n", - "Message-ID: <462dfa6f$0$23135$9b4e6d93@newsspool1.arcor-online.net>\r\n", - "From: Gerhard Engler <gerhard.engler@gmx.de>\r\n", - "Newsgroups: at.linux\r\n", - "Subject: Re: udev_node_mknod: /dev/capi Operation not permitted\r\n", - "Date: Tue, 24 Apr 2007 14:39:11 +0200\r\n", - "References: <4629ee10$0$10187$9b4e6d93@newsspool4.arcor-online.net> <slrnf2np7k.a8e.tom-usenet@eristoteles.iwoars.net>\r\n", - "Lines: 26\r\n", - "User-Agent: Thunderbird 1.5.0.10 (Windows/20070221)\r\n", - "MIME-Version: 1.0\r\n", - "In-Reply-To: <slrnf2np7k.a8e.tom-usenet@eristoteles.iwoars.net>\r\n", - "Content-Type: text/plain; charset=ISO-8859-15; format=flowed\r\n", - "Content-Transfer-Encoding: 7bit\r\n", - "Organization: Arcor\r\n", - "NNTP-Posting-Date: 24 Apr 2007 14:39:11 CEST\r\n", - "NNTP-Posting-Host: 6cf11d8c.newsspool1.arcor-online.net\r\n", - "X-Trace: DXC=Cd=D_AR>:`a^Y=RbYBPl4`ic==]BZ:afn4Fo<]lROoRaFl8W>\BH3Yb7K@fQgPi`FgUTEAfnAR\Ta@JWJ8E:^d<ob]cIfD6hVgh<SdIn0f]3?i\r\n", - "X-Complaints-To: usenet-abuse@arcor.de\r\n", - "Xref: sensor.twincode.net at.linux:1430\r\n", - ".\r\n" - ] + @io = [ + "221 1430 <462dfa6f$0$23135$9b4e6d93@newsspool1.arcor-online.net> article retrieved - head follows\r\n", + "Path: vietwist00.chello.at!newsfeed02.chello.at!newsfeed01.chello.at!newsfeed.arcor.de!newsspool1.arcor-online.net!news.arcor.de.POSTED!not-for-mail\r\n", + "Message-ID: <462dfa6f$0$23135$9b4e6d93@newsspool1.arcor-online.net>\r\n", + "From: Gerhard Engler <gerhard.engler@gmx.de>\r\n", + "Newsgroups: at.linux\r\n", + "Subject: Re: udev_node_mknod: /dev/capi Operation not permitted\r\n", + "Date: Tue, 24 Apr 2007 14:39:11 +0200\r\n", + "References: <4629ee10$0$10187$9b4e6d93@newsspool4.arcor-online.net> <slrnf2np7k.a8e.tom-usenet@eristoteles.iwoars.net>\r\n", + "Lines: 26\r\n", + "User-Agent: Thunderbird 1.5.0.10 (Windows/20070221)\r\n", + "MIME-Version: 1.0\r\n", + "In-Reply-To: <slrnf2np7k.a8e.tom-usenet@eristoteles.iwoars.net>\r\n", + "Content-Type: text/plain; charset=ISO-8859-15; format=flowed\r\n", + "Content-Transfer-Encoding: 7bit\r\n", + "Organization: Arcor\r\n", + "NNTP-Posting-Date: 24 Apr 2007 14:39:11 CEST\r\n", + "NNTP-Posting-Host: 6cf11d8c.newsspool1.arcor-online.net\r\n", + "X-Trace: DXC=Cd=D_AR>:`a^Y=RbYBPl4`ic==]BZ:afn4Fo<]lROoRaFl8W>\BH3Yb7K@fQgPi`FgUTEAfnAR\Ta@JWJ8E:^d<ob]cIfD6hVgh<SdIn0f]3?i\r\n", + "X-Complaints-To: usenet-abuse@arcor.de\r\n", + "Xref: sensor.twincode.net at.linux:1430\r\n", + ".\r\n" + ] when /^\s?$/ - if @group_selected - @io = [ - "221 1430 <462dfa6f$0$23135$9b4e6d93@newsspool1.arcor-online.net> article retrieved - head follows\r\n", - "Path: vietwist00.chello.at!newsfeed02.chello.at!newsfeed01.chello.at!newsfeed.arcor.de!newsspool1.arcor-online.net!news.arcor.de.POSTED!not-for-mail\r\n", - "Message-ID: <462dfa6f$0$23135$9b4e6d93@newsspool1.arcor-online.net>\r\n", - "From: Gerhard Engler <gerhard.engler@gmx.de>\r\n", - "Newsgroups: at.linux\r\n", - "Subject: Re: udev_node_mknod: /dev/capi Operation not permitted\r\n", - "Date: Tue, 24 Apr 2007 14:39:11 +0200\r\n", - "References: <4629ee10$0$10187$9b4e6d93@newsspool4.arcor-online.net> <slrnf2np7k.a8e.tom-usenet@eristoteles.iwoars.net>\r\n", - "Lines: 26\r\n", - "User-Agent: Thunderbird 1.5.0.10 (Windows/20070221)\r\n", - "MIME-Version: 1.0\r\n", - "In-Reply-To: <slrnf2np7k.a8e.tom-usenet@eristoteles.iwoars.net>\r\n", - "Content-Type: text/plain; charset=ISO-8859-15; format=flowed\r\n", - "Content-Transfer-Encoding: 7bit\r\n", - "Organization: Arcor\r\n", - "NNTP-Posting-Date: 24 Apr 2007 14:39:11 CEST\r\n", - "NNTP-Posting-Host: 6cf11d8c.newsspool1.arcor-online.net\r\n", - "X-Trace: DXC=Cd=D_AR>:`a^Y=RbYBPl4`ic==]BZ:afn4Fo<]lROoRaFl8W>\BH3Yb7K@fQgPi`FgUTEAfnAR\Ta@JWJ8E:^d<ob]cIfD6hVgh<SdIn0f]3?i\r\n", - "X-Complaints-To: usenet-abuse@arcor.de\r\n", - "Xref: sensor.twincode.net at.linux:1430\r\n", - ".\r\n" - ] - else - @io = ["412 No Group selected"] - end + if @group_selected + @io = [ + "221 1430 <462dfa6f$0$23135$9b4e6d93@newsspool1.arcor-online.net> article retrieved - head follows\r\n", + "Path: vietwist00.chello.at!newsfeed02.chello.at!newsfeed01.chello.at!newsfeed.arcor.de!newsspool1.arcor-online.net!news.arcor.de.POSTED!not-for-mail\r\n", + "Message-ID: <462dfa6f$0$23135$9b4e6d93@newsspool1.arcor-online.net>\r\n", + "From: Gerhard Engler <gerhard.engler@gmx.de>\r\n", + "Newsgroups: at.linux\r\n", + "Subject: Re: udev_node_mknod: /dev/capi Operation not permitted\r\n", + "Date: Tue, 24 Apr 2007 14:39:11 +0200\r\n", + "References: <4629ee10$0$10187$9b4e6d93@newsspool4.arcor-online.net> <slrnf2np7k.a8e.tom-usenet@eristoteles.iwoars.net>\r\n", + "Lines: 26\r\n", + "User-Agent: Thunderbird 1.5.0.10 (Windows/20070221)\r\n", + "MIME-Version: 1.0\r\n", + "In-Reply-To: <slrnf2np7k.a8e.tom-usenet@eristoteles.iwoars.net>\r\n", + "Content-Type: text/plain; charset=ISO-8859-15; format=flowed\r\n", + "Content-Transfer-Encoding: 7bit\r\n", + "Organization: Arcor\r\n", + "NNTP-Posting-Date: 24 Apr 2007 14:39:11 CEST\r\n", + "NNTP-Posting-Host: 6cf11d8c.newsspool1.arcor-online.net\r\n", + "X-Trace: DXC=Cd=D_AR>:`a^Y=RbYBPl4`ic==]BZ:afn4Fo<]lROoRaFl8W>\BH3Yb7K@fQgPi`FgUTEAfnAR\Ta@JWJ8E:^d<ob]cIfD6hVgh<SdIn0f]3?i\r\n", + "X-Complaints-To: usenet-abuse@arcor.de\r\n", + "Xref: sensor.twincode.net at.linux:1430\r\n", + ".\r\n" + ] + else + @io = ["412 No Group selected"] + end else - @io = ["501 Bad Command"] + @io = ["501 Bad Command"] end - else - @io = ["500 Unknown Command"] - end + else + @io = ["500 Unknown Command"] + end return str.length - end + end def readline super @io.shift end @@ -347,6 +347,6 @@ private def dp(x) $stdout.puts x end -end + end