Attached are two patches.  These are also on the SF patch manager page:
http://sourceforge.net/patch/?group_id=12884

The first patch fixes a definite bug that breaks POST to your scripts
in /cgi-bin  (however, I think .cgi scripts in other directories are
still broken - I need a more elaborate fix for that...)

The second patch fixes the weird issue with the "cgihits" counter
that I still don't fully understand, but should help for those folks
that have that problem.


--      Brent Welch     <[EMAIL PROTECTED]>
        http://www.ajubasolutions.com
        Scriptics has become Ajuba Solutions

Index: cgi.tcl
===================================================================
RCS file: /home/cvs/external/tclhttpd/lib/cgi.tcl,v
retrieving revision 1.20
diff -c -r1.20 cgi.tcl
*** cgi.tcl	2000/08/02 07:06:51	1.20
--- cgi.tcl	2000/10/26 22:58:58
***************
*** 56,62 ****
      # Set it to 1 to dispatch it to a thread that forks.
  
      set inThread 0
!     Url_PrefixInstall $virtual [list Cgi_Domain $virtual $directory] $inThread
  }
  
  # Cgi_Domain is called from Url_Dispatch for URLs inside cgi-bin directories.
--- 56,63 ----
      # Set it to 1 to dispatch it to a thread that forks.
  
      set inThread 0
!     Url_PrefixInstall $virtual [list Cgi_Domain $virtual $directory] \
! 	-thread $inThread -readpost 0
  }
  
  # Cgi_Domain is called from Url_Dispatch for URLs inside cgi-bin directories.
Index: counter.tcl
===================================================================
RCS file: /home/cvs/external/tclhttpd/lib/counter.tcl,v
retrieving revision 1.14
diff -c -r1.14 counter.tcl
*** counter.tcl	2000/10/20 17:51:26	1.14
--- counter.tcl	2000/10/26 23:02:00
***************
*** 61,67 ****
      # These are simple counters about each kind of connection event
  
      foreach c {accepts sockets connections urlreply keepalive connclose 
! 		http1.0 http1.1} {
  	counter::init $c
      }
      Httpd_RegisterShutdown Counter_CheckPoint
--- 61,67 ----
      # These are simple counters about each kind of connection event
  
      foreach c {accepts sockets connections urlreply keepalive connclose 
! 		http1.0 http1.1 cgihits} {
  	counter::init $c
      }
      Httpd_RegisterShutdown Counter_CheckPoint

Reply via email to