cvs commit: httpd-test/perl-framework/t/htdocs/modules/cgi nph-foldhdr.pl.PL .cvsignore

[jo...@apache.org]

jorton      2004/08/17 09:13:36

  Modified:    perl-framework/t/ssl proxy.t
               perl-framework/t/htdocs/modules/cgi .cvsignore
  Added:       perl-framework/t/htdocs/modules/cgi nph-foldhdr.pl.PL
  Log:
  Add test for #30134.
  
  Revision  Changes    Path
  1.10      +7 -1      httpd-test/perl-framework/t/ssl/proxy.t
  
  Index: proxy.t
  ===================================================================
  RCS file: /home/cvs/httpd-test/perl-framework/t/ssl/proxy.t,v
  retrieving revision 1.9
  retrieving revision 1.10
  diff -d -w -u -r1.9 -r1.10
  --- proxy.t	2 May 2002 19:25:52 -0000	1.9
  +++ proxy.t	17 Aug 2004 16:13:35 -0000	1.10
  @@ -30,7 +30,7 @@
       }
   }
   
  -plan tests => (7 + $post_tests) * $num_modules - 5 * $num_http_backends,
  +plan tests => (8 + $post_tests) * $num_modules - 5 * $num_http_backends,
                 [qw(mod_proxy proxy_http.c)];
   
   for my $module (sort keys %frontend) {
  @@ -47,6 +47,12 @@
           t_cmp(200,
                 GET('/')->code,
                 "/ with $module ($scheme)");
  +    };
  +
  +    sok {
  +        t_cmp(200, 
  +              GET('/modules/cgi/nph-foldhdr.pl')->code,
  +              "CGI script with folded headers");
       };
   
       if ($backend{$module} eq "https") {
  
  
  
  1.7       +1 -0      httpd-test/perl-framework/t/htdocs/modules/cgi/.cvsignore
  
  Index: .cvsignore
  ===================================================================
  RCS file: /home/cvs/httpd-test/perl-framework/t/htdocs/modules/cgi/.cvsignore,v
  retrieving revision 1.6
  retrieving revision 1.7
  diff -d -w -u -r1.6 -r1.7
  --- .cvsignore	16 Jun 2004 17:11:57 -0000	1.6
  +++ .cvsignore	17 Aug 2004 16:13:36 -0000	1.7
  @@ -9,3 +9,4 @@
   stderr3.pl
   nph-stderr.pl
   ranged.pl
  +nph-foldhdr.pl
  
  
  
  1.1                  httpd-test/perl-framework/t/htdocs/modules/cgi/nph-foldhdr.pl.PL
  
  Index: nph-foldhdr.pl.PL
  ===================================================================
  # produces output with folded response headers
  
  print "HTTP/1.0 200 OK\r\n";
  
  for (1..500) {
      print "X-Foo-Bar-$_:\n " . 'x'x$_ . "\n";
      print "X-Bar-$_:\n gamm\r\n beta\n theta\r\n";
  }
  
  print "Content-type: \n  text/plain\n\n";
  
  print "hello, world";
  
  
  

Re: cvs commit: httpd-test/perl-framework/t/htdocs/modules/cgi nph-foldhdr.pl.PL .cvsignore

[Joe Orton <jo...@redhat.com>]

On Tue, Aug 17, 2004 at 01:15:57PM -0400, Geoffrey Young wrote:
> 
> >   +    sok {
> >   +        t_cmp(200, 
> >   +              GET('/modules/cgi/nph-foldhdr.pl')->code,
> >   +              "CGI script with folded headers");
> 
> I swapped the arguments passed to t_cmp() here and elsewhere in the file so
> that they match the new order (received results first).  as I don't have ssl
> installed at the moment, if you could run through it again to make sure I
> didn't break anything that would be great :)

Thanks, yes, it still works.  I'll try to remember to switch the 
arguments around whenever I touch other files too...

joe

Re: cvs commit: httpd-test/perl-framework/t/htdocs/modules/cgi nph-foldhdr.pl.PL .cvsignore

[Geoffrey Young <ge...@modperlcookbook.org>]

>   +    sok {
>   +        t_cmp(200, 
>   +              GET('/modules/cgi/nph-foldhdr.pl')->code,
>   +              "CGI script with folded headers");

I swapped the arguments passed to t_cmp() here and elsewhere in the file so
that they match the new order (received results first).  as I don't have ssl
installed at the moment, if you could run through it again to make sure I
didn't break anything that would be great :)

since nobody really has the time to go through and change every file, I
guess it's just something that we can try to remember to do when we make a
modification.

--Geoff