Re: [Tclhttpd-users] affecting env(SCRIPT_NAME)

[Peter F. <pet...@zv...>]

Sounds like you havent got the latest version. I supplied the patch for
that problem late last year. There are other cgi fixes as well so I'd
recommend you get up to date.


If you're in a hurry, heres a diff for cgi.tcl

*** 65,71 ****
 proc Cgi_Domain {virtual directory sock suffix} {
     global Cgi env
     # Check the path and then find the part beyond the program
       name.
!    if [catch {Url_PathCheck $suffix} pathlist] {
         Doc_NotFound $sock
         return
     }
 --- 66,73 ----
 proc Cgi_Domain {virtual directory sock suffix} {
     global Cgi env
     # Check the path and then find the part beyond the program
       name.
!     if [catch {Url_PathCheck [string trimleft $suffix /]} pathlist] {
!
          Doc_NotFound $sock
          return
      }              


> I've been able to adapt the TCL wiki to TCLHTTPD by using TCLKitsh  ( tclkit
> version of tclsh ) as the interpreter ( ie. launching tclhttpd from tclkitsh )
> and running the Wikit via CGI. The only real problem that I've encountered is
> that there's a quirk in the way that the SCRIPT_NAME environmental variable is
> being generated a/o interpreted.  The number of delimiters ,"/ " ,after cgi-bin
> in the script path are increasing - with each transaction with the wikit an
> extra forward slash is appended to cgi-bin/ .  After a few posts I've got
> something that looks like this , ../cgi-bin////////wiki.cgi .
> 
> Stripping these so that they don't affect the wiki's internal URL recognition
> isn't a problem , but I'm not sure of how to affect the base script_name var. A
> clue might lie in the fact that the script_name path reflects the URL of the
> referring link + 1 forwards slash between /cgi-gin/ and the cgi script.  So if a
> transaction involves several CGI operations you might end up with
> /cgi-bin////wikit.cgi , while a simple post to the wiki results in
> /cgi-bin//wiki.cgi.
> 
> Where is the $url of  'set env(SCRIPT_NAME) $url' within 'Cgi_SetEnvAll'
> (cgi.tcl)' coming in from ?  Is this extracted from another environmental var ?
> 
> I hadn't noticed this problem with other interps , so am assuming this has
> something to do with TCLKitsh .
> 
> any ideas ?
> 

-- 
Peter Farmer            | Custom XML software   | Internet Engineering 
Zveno Pty Ltd           | Website XML Solutions | Training & Seminars
http://www.zveno.com/   |   Open Source Tools   |   - XML XSL Tcl
Pet...@zv...  +-----------------------+---------------------
Ph. +61 8 92434146      | Mobile 0417 906 851   | Fax +61 2 6242 4099