On further thought, probably I'm incorrect in trying to set a cookie in the
request, rather than the response.
Sorry :)
On Sun, Jul 18, 2010 at 1:56 PM, Jim mack <[email protected]> wrote:
> Sorry, I don't build from source on my windows laptop, so here's a manual fix:
>
> http.factor
> : parse-cookie ( string -- seq )
> ....
> ] { } make ;
>
> needs to be:
> ] V{ } make ;
>
> the test on put-cookie doesn't have it parsing a request. Writing that test
> is beyond me at the moment.
> This does break 4 existing tests that hardcode a cookie result of { }.
>
> This may apply to parse-set-cookie as well, but I didn't test this.
>
> Detail of Problem:
>
> Trying to use put-cookie, stepped as far as the final push, the inspector
> showed a stack
> T{ request ...}
> T{ cookie ... }
>
> { ~cookie~ ~cookie~ ~cookie~ }
>
>
> and push fails with "Sequence index out of bounds"
> index 3
> seq { ~cookie~ ~cookie~ ~cookie~ }
> URL" http://localhost/abc";
> "
>
> "
> (U) Quotation: [ set-namestack init-catchstack self quot>> call -> stop ]
>
> (O) Word: handle-client
> (O) Method: M\ http-server handle-client*
> (O) Word: do-request
> (O) Method: M\ sessions call-responder*
> (O) Word: handle-get
> (U) Quotation: [
> 2dup [
> ~quotation~ dip
>
>
> dup terminated?>> ~quotation~ ~quotation~ if
> ] 2dip -> rot [ 2drop ] [ wrong-values ] if
> ]
> (U) Quotation: [
> [ ~quotation~ dip dip ] dip -> dup terminated?>>
>
>
> [ 2drop f ]
> [ dup in>> length swap out>> length check-datastack ] if
> ]
> (U) Quotation: [ swap [ call ] dip -> ]
> Word: dip
> (O) Word: route-and-return
> (O) Word: (route-and-return)
>
>
> (U) Quotation: [ set-password-for-machine -> f ]
> (U) Quotation: [ [ request get ] dip pkey put-cookie -> drop ]
> (U) Quotation: [
> [ break name>> dupd get-cookie ~quotation~ when* ] keep
> over cookies>> push ->
>
>
> ]
> (O) Method: M\ sequence set-nth
> (O) Word: bounds-error
> (O) Method: M\ object throw
> (U) Quotation: [
> 63 special-object error-thread set-global
> continuation -> error-continuation set-global rethrow
>
>
> ]
>
>
>
> --
> Jim
> "I'm for extending the working Medicare program for our seniors all the way
> back to contraception, so Americans can concentrate on living their lives
> without fear of changing a job, going bankrupt from deductibles or fighting
> HMO bureaucracy."
>
--
Jim
"I'm for extending the working Medicare program for our seniors all the way
back to contraception, so Americans can concentrate on living their lives
without fear of changing a job, going bankrupt from deductibles or fighting
HMO bureaucracy."
------------------------------------------------------------------------------
This SF.net email is sponsored by Sprint
What will you do first with EVO, the first 4G phone?
Visit sprint.com/first -- http://p.sf.net/sfu/sprint-com-first
_______________________________________________
Factor-talk mailing list
[email protected]
https://lists.sourceforge.net/lists/listinfo/factor-talk
