Thanks, Will, but no, this doesn't fix the problem. The URL I found had two adjacent &s: state=threads&board=cult.tamaraswift&&sort=T
I think whoever made this URL ment for sort=T to join in, but your code doesn't let it. I only get state and board. Any ideas? (I'll look into it more closely myself later on, but I'm off to bed right now). HY Dixit Will Arp (23.36 09.02.2004): >Hi Hallvard; > >this one work on your url, it also has some enhancement >most preferred is ability to set a: "" when http://dom.com?a > >I'm not sure who is the author but thanks, and shouldn't this version >replace >rebol's one? > >Hope that helps and have a great day! > >Will Arp >[EMAIL PROTECTED] > >;core 2.6 decode-cgi do not accept "a" only "a=" or "a&" >decode-cgi: func [ > {Converts CGI argument string to a list of words and value strings.} > args [any-string!] "Starts at first argument word" > /local list equate value name name-chars val add-nv >] [ > add-nv: func [ list name value /local val-ptr ] [ > value: either none? value > [ copy "" ] > [ form dehex (replace/all value "+" " ") ] > > either none? val-ptr: find list to-set-word name [ > append list compose [ (to-set-word name) (value) ] > ] [ > idx: index? next val-ptr > poke list idx compose [ (pick list idx) (value) ] > ] > ] > > list: make block! 8 > name-chars: complement charset "&=" > equate: [ copy name some name-chars value ] > value: [ "=" value > | "&" (add-nv list name "") > | [copy val to "&" "&" | copy val to end] > (add-nv list name val) > ] > > parse/all args [ some equate | none ] > list >] > > > > >On 9-feb-04, at 23:07, Hallvard Ystad wrote: > >> >>Hi >> >>I know some people say "garbage in - garbage out", but one can't >>always control what comes into one's programs as input. Here's what >>came to one of mine: >> >>http://www.bbc.co.uk/cgi-perl/h2/h2.cgi? state=threads&board=cult.tamaraswift&&sort=T >> >>This crashes 'decode-cgi in /core 2.5.6: >>>>decode-cgi "state=threads&board=cult.tamaraswift&&sort=T" >>** Script Error: Out of range or past end >>** Where: to-set-word >>** Near: to set-word! :value >> >>I believe Andreas Bolka and/or Andrew Martin made a patch to >>'decode-cgi some time back, but can't seem to find it. Does anyone >>know whether the patch fixes this problem? Or perhaps where I can find >>it? >> >>Thanks, >>HY >> >>Prętera censeo Carthaginem esse delendam >> >> >>-- >>To unsubscribe from this list, just send an email to >>[EMAIL PROTECTED] with unsubscribe as the subject. Prętera censeo Carthaginem esse delendam -- To unsubscribe from this list, just send an email to [EMAIL PROTECTED] with unsubscribe as the subject.
