httpd-apreq-cvs mailing list archives

Site index · List index
Message view « Date » · « Thread »
Top « Date » · « Thread »
From ran...@apache.org
Subject cvs commit: httpd-apreq-2/glue/perl/t/apreq cgi.t
Date Sun, 11 Jul 2004 01:36:06 GMT
randyk      2004/07/10 18:36:06

  Modified:    .        STATUS
               glue/perl/t/apreq cgi.t
  Log:
  Reviewed by:	joes
  on Win32, printing strings of larger than about 10000 in size hangs
  in the glue/perl/t/apreq/cgi test. For now print smaller messages,
  and make a note in STATUS to come back to that.
  
  Revision  Changes    Path
  1.66      +5 -1      httpd-apreq-2/STATUS
  
  Index: STATUS
  ===================================================================
  RCS file: /home/cvs/httpd-apreq-2/STATUS,v
  retrieving revision 1.65
  retrieving revision 1.66
  diff -u -r1.65 -r1.66
  --- STATUS	10 Jul 2004 22:13:28 -0000	1.65
  +++ STATUS	11 Jul 2004 01:36:06 -0000	1.66
  @@ -50,6 +50,10 @@
   
   TODO:
   
  +    - in glue/perl/t/apreq/cgi.t on Win32, printing to the error log
  +      hangs if the strings involved are about 10000 in size.
  +      This doesn't occur in the env/cgi tests - why?
  +
       - Why must fprintf(stderr, ...), rather than
         apr_file_printf(err, ...), be used on Win32 in
         cgi_log() of src/apreq_env.c?
  
  
  
  1.4       +3 -2      httpd-apreq-2/glue/perl/t/apreq/cgi.t
  
  Index: cgi.t
  ===================================================================
  RCS file: /home/cvs/httpd-apreq-2/glue/perl/t/apreq/cgi.t,v
  retrieving revision 1.3
  retrieving revision 1.4
  diff -u -r1.3 -r1.4
  --- cgi.t	8 Jul 2004 02:10:05 -0000	1.3
  +++ cgi.t	11 Jul 2004 01:36:06 -0000	1.4
  @@ -202,8 +202,9 @@
       for ($req->param) {
           my $param = $req->param($_);
           next unless $param;
  -        apreq_log("$_ => $param");
  -        $len += length($_) + length($param);
  +        my $length = length($param);
  +        apreq_log("$_ has a value of length $length");
  +        $len += length($_) + $length;
       }
       print $len;
   }
  
  
  

Mime
View raw message