cvs commit: modperl/src/modules/perl Apache.xs

2000-08-30 Thread dougm

dougm   00/08/30 20:38:37

  Modified:.Changes
   src/modules/perl Apache.xs
  Log:
  add PerlCleanupHandler to the {get,set}_handlers table
  
  Revision  ChangesPath
  1.507 +3 -0  modperl/Changes
  
  Index: Changes
  ===
  RCS file: /home/cvs/modperl/Changes,v
  retrieving revision 1.506
  retrieving revision 1.507
  diff -u -r1.506 -r1.507
  --- Changes   2000/08/15 04:35:13 1.506
  +++ Changes   2000/08/31 03:38:35 1.507
  @@ -10,6 +10,9 @@
   
   =item 1.24_01-dev
   
  +add PerlCleanupHandler to the {get,set}_handlers table,
  +thanks Geoffrey Young for the spot
  +
   fix $r-args(undef), thanks to Greg Cope for the spot
   
   quotemeta path_info in Registry regexp
  
  
  
  1.104 +1 -0  modperl/src/modules/perl/Apache.xs
  
  Index: Apache.xs
  ===
  RCS file: /home/cvs/modperl/src/modules/perl/Apache.xs,v
  retrieving revision 1.103
  retrieving revision 1.104
  diff -u -r1.103 -r1.104
  --- Apache.xs 2000/08/15 19:36:32 1.103
  +++ Apache.xs 2000/08/31 03:38:36 1.104
  @@ -101,6 +101,7 @@
   {HandlerDirEntry("PerlFixupHandler", PerlFixupHandler)},
   {HandlerDirEntry("PerlHandler", PerlHandler)},
   {HandlerDirEntry("PerlLogHandler", PerlLogHandler)},
  +{HandlerDirEntry("PerlCleanupHandler", PerlCleanupHandler)},
   { FALSE, NULL }
   };
   
  
  
  



cvs commit: modperl/src/modules/perl Apache.xs

2000-08-30 Thread dougm

dougm   00/08/30 20:39:45

  Modified:.Changes
   src/modules/perl Apache.xs
  Log:
  fix refcnt bug in $r-get_handlers
  
  Revision  ChangesPath
  1.508 +3 -0  modperl/Changes
  
  Index: Changes
  ===
  RCS file: /home/cvs/modperl/Changes,v
  retrieving revision 1.507
  retrieving revision 1.508
  diff -u -r1.507 -r1.508
  --- Changes   2000/08/31 03:38:35 1.507
  +++ Changes   2000/08/31 03:39:44 1.508
  @@ -10,6 +10,9 @@
   
   =item 1.24_01-dev
   
  +fix refcnt bug in $r-get_handlers,
  +thanks Geoffrey Young for the spot
  +
   add PerlCleanupHandler to the {get,set}_handlers table,
   thanks Geoffrey Young for the spot
   
  
  
  
  1.105 +1 -1  modperl/src/modules/perl/Apache.xs
  
  Index: Apache.xs
  ===
  RCS file: /home/cvs/modperl/src/modules/perl/Apache.xs,v
  retrieving revision 1.104
  retrieving revision 1.105
  diff -u -r1.104 -r1.105
  --- Apache.xs 2000/08/31 03:38:36 1.104
  +++ Apache.xs 2000/08/31 03:39:45 1.105
  @@ -130,7 +130,7 @@
   base = (AV*)SvRV(*svp);
   for(i=0; i=AvFILL(base); i++) { 
SV *sv = *av_fetch(base, i, FALSE);
  - av_push(*dest, sv);
  + av_push(*dest, SvREFCNT_inc(sv));
   }
   }
   
  
  
  



cvs commit: modperl ToDo

2000-08-30 Thread dougm

dougm   00/08/30 22:35:35

  Modified:.ToDo
  Log:
  todo
  
  Revision  ChangesPath
  1.247 +7 -0  modperl/ToDo
  
  Index: ToDo
  ===
  RCS file: /home/cvs/modperl/ToDo,v
  retrieving revision 1.246
  retrieving revision 1.247
  diff -u -r1.246 -r1.247
  --- ToDo  2000/08/21 17:40:19 1.246
  +++ ToDo  2000/08/31 05:35:34 1.247
  @@ -3,6 +3,13 @@
(well, close to it anyhow)
   ---
   
  +- something like 2.0's Apache::BuildConfig for testing build options
  +
  +- sort out hpux Config.pm issues when $Config{ld} eq 'ld' but
  +  $Config{ldflags} have -Wl arguments
  +
  +- update mod_ssl test config
  +
   - replace Apache::StatINC with Apache::ModuleReload?
   
   - ken f's send_header patch
  
  
  



cvs commit: modperl/src/modules/perl Apache.xs

2000-08-30 Thread dougm

dougm   00/08/30 22:49:07

  Modified:.Changes
   Apache   Apache.pm
   src/modules/perl Apache.xs
  Log:
  switch usage of hard_timeout() to soft_timeout()
  
  Revision  ChangesPath
  1.509 +4 -0  modperl/Changes
  
  Index: Changes
  ===
  RCS file: /home/cvs/modperl/Changes,v
  retrieving revision 1.508
  retrieving revision 1.509
  diff -u -r1.508 -r1.509
  --- Changes   2000/08/31 03:39:44 1.508
  +++ Changes   2000/08/31 05:49:04 1.509
  @@ -10,6 +10,10 @@
   
   =item 1.24_01-dev
   
  +switch usage of hard_timeout() to soft_timeout(), so if SIGALRM
  +happens during Apache::{print,read}, the script will continue run,
  +allowing proper cleanup (e.g. DESTROY)
  +
   fix refcnt bug in $r-get_handlers,
   thanks Geoffrey Young for the spot
   
  
  
  
  1.53  +4 -4  modperl/Apache/Apache.pm
  
  Index: Apache.pm
  ===
  RCS file: /home/cvs/modperl/Apache/Apache.pm,v
  retrieving revision 1.52
  retrieving revision 1.53
  diff -u -r1.52 -r1.53
  --- Apache.pm 2000/08/15 04:35:13 1.52
  +++ Apache.pm 2000/08/31 05:49:05 1.53
  @@ -68,7 +68,7 @@
   $_[1] ||= "";
   #$_[1] = " " x $bufsiz unless defined $_[1]; #XXX?
   
  -$r-hard_timeout("Apache-read");
  +$r-soft_timeout("Apache-read");
   
   while($bufsiz) {
$nrd = $r-read_client_block($buf, $bufsiz) || 0;
  @@ -113,7 +113,7 @@
return 0;
   }
   
  -$r-hard_timeout("Apache-read");
  +$r-soft_timeout("Apache-read");
   
   while($bufsiz) {
$nrd = $r-get_client_block($buf, $bufsiz) || 0;
  @@ -425,7 +425,7 @@
   looping until it gets all of C$bytes_to_read or a timeout happens.
   
   In addition, this method sets a timeout before reading with
  -C$r-Egthard_timeout.
  +C$r-Egtsoft_timeout.
   
   =item $r-get_remote_host
   
  @@ -909,7 +909,7 @@
   =item $r-print( @list )
   
   This method sends data to the client with C$r-Egtwrite_client, but first
  -sets a timeout before sending with C$r-Egthard_timeout. This method is
  +sets a timeout before sending with C$r-Egtsoft_timeout. This method is
   called instead of CORE::print when you use print() in your mod_perl programs.
   
   This method treats scalar references specially. If an item in @list is a
  
  
  
  1.106 +1 -1  modperl/src/modules/perl/Apache.xs
  
  Index: Apache.xs
  ===
  RCS file: /home/cvs/modperl/src/modules/perl/Apache.xs,v
  retrieving revision 1.105
  retrieving revision 1.106
  diff -u -r1.105 -r1.106
  --- Apache.xs 2000/08/31 03:39:45 1.105
  +++ Apache.xs 2000/08/31 05:49:06 1.106
  @@ -1033,7 +1033,7 @@
   }
   else {
CV *cv = GvCV(gv_fetchpv("Apache::write_client", FALSE, SVt_PVCV));
  - hard_timeout("mod_perl: Apache-print", r);
  + soft_timeout("mod_perl: Apache-print", r);
PUSHMARK(mark);
   #ifdef PERL_OBJECT
(void)(*CvXSUB(cv))(cv, pPerl); /* Apache::write_client; */
  
  
  



cvs commit: modperl/t/modules request.t

2000-08-30 Thread dougm

dougm   00/08/30 22:54:11

  Modified:.Changes
   t/modules request.t
  Log:
  modules/request test fix
  
  Revision  ChangesPath
  1.510 +3 -0  modperl/Changes
  
  Index: Changes
  ===
  RCS file: /home/cvs/modperl/Changes,v
  retrieving revision 1.509
  retrieving revision 1.510
  diff -u -r1.509 -r1.510
  --- Changes   2000/08/31 05:49:04 1.509
  +++ Changes   2000/08/31 05:54:10 1.510
  @@ -10,6 +10,9 @@
   
   =item 1.24_01-dev
   
  +modules/request test fix
  +[Ken Williams [EMAIL PROTECTED]]
  +
   switch usage of hard_timeout() to soft_timeout(), so if SIGALRM
   happens during Apache::{print,read}, the script will continue run,
   allowing proper cleanup (e.g. DESTROY)
  
  
  
  1.9   +1 -1  modperl/t/modules/request.t
  
  Index: request.t
  ===
  RCS file: /home/cvs/modperl/t/modules/request.t,v
  retrieving revision 1.8
  retrieving revision 1.9
  diff -u -r1.8 -r1.9
  --- request.t 2000/05/12 03:43:24 1.8
  +++ request.t 2000/08/31 05:54:11 1.9
  @@ -125,7 +125,7 @@
   my $lines = 0;
   local *FH;
   open FH, $file or die "open $file $!";
  -++$lines while (my $dummy = FH);
  +++$lines while defined FH;
   close FH;
   my(@headers);
   if ($Is_dougm) {
  
  
  



cvs commit: modperl apache-modlist.html

2000-08-30 Thread dougm

dougm   00/08/30 22:54:45

  Modified:.apache-modlist.html
  Log:
  updates from ken
  
  Revision  ChangesPath
  1.73  +5 -4  modperl/apache-modlist.html
  
  Index: apache-modlist.html
  ===
  RCS file: /home/cvs/modperl/apache-modlist.html,v
  retrieving revision 1.72
  retrieving revision 1.73
  diff -u -r1.72 -r1.73
  --- apache-modlist.html   2000/08/30 04:05:56 1.72
  +++ apache-modlist.html   2000/08/31 05:54:45 1.73
  @@ -6,7 +6,7 @@
   h1The Apache/Perl Module List/h1
   
   Maintained by a href="mailto:[EMAIL PROTECTED]"Doug MacEachern/a,
  -bri $Revision: 1.72 $ $Date: 2000/08/30 04:05:56 $/i
  +bri $Revision: 1.73 $ $Date: 2000/08/31 05:54:45 $/i
   
   h3Contents/h3
   a href="#intro"Introduction/abr
  @@ -74,11 +74,12 @@
   BBS  cdpOBBS like System for Apache  MKOSS
   CallHandler  cdpfMap filenames to subroutine calls   GKNOPS
   Cachet   i   OutputChain with cachingMERLYN
  +Compress bdpOCompress content on the fly KWILLIAM
   Dir  i   OO (subclassable) mod_dir replacement   DOUGM
   a href="http://perl.apache.org/embperl/"Embperl/aRmcfEmbed 
Perl in HTML  GRICHTER
   EmbperlChain bdpOFeed handler output to Embperl  CHOLET
   ePerlRdprFast emulated Embedded Perl (ePerl) RSE
  -Filter   bdpOOutputChain like functionality  KWILLIAM
  +Filter   RdpOOutputChain like functionality  KWILLIAM
   Forward  bdpOOutputChain like functionality  MPB
   FTP  i   Full-fledged FTP proxy  PMKANE
   Gateway  bdpfA multiplexing gateway  CCWF
  @@ -86,7 +87,7 @@
   iNcombdpfAn e-commerce framework FRAJULAC
   LayerbdpfLayer content tree over one or more SAM
   Magick   bdpfImage conversion on-the-fly MPB
  -MasonbdpOBuild sites w/ modular Perl/HTML blocks JSWARTZ
  +a href="http://www.masonhq.com"Mason/a   bdpOBuild sites w/ modular 
Perl/HTML blocks JSWARTZ
   ModuleDocbdpfSelf documentation for Apache C modules DOUGM
   NavBar   bdpONavigation bar generatorMPB
   OutputChain bmpO Chain output of stacked handlersJANPAZ
  @@ -120,7 +121,7 @@
   * PerlAuthenHandler's
   AuthAny  bdpfAuthenticate with any username/password MPB
   AuthenCache  bmpfCache authentication credentialsJBODNAR
  -AuthCookie   bdpOAuthen + Authz via cookies  KWILLIAM
  +AuthCookie   RdpOAuthen + Authz via cookies  KWILLIAM
   AuthenDBIbmpOAuthenticate via Perl's DBI MERGL
   AuthExpire   i   Expire Basic auth credentials   DOUGM
   AuthenGSScdpfGeneric Security Service (RFC 2078) DOUGM