Works great. Thanks!<div> Daniel <div class="gmail_quote">On Tue, Sep 13, 2011 at 7:58 AM, Jay McCarthy <<a href="mailto:jay.mccarthy@gmail.com">jay.mccarthy@gmail.com</a>> wrote: <blockquote class="gmail_quote" style="margin:0 0 0 .8ex;border-left:1px #ccc solid;padding-left:1ex;">I just pushed a fix to these issues. Problem 1 was that I only read request bodies on POSTs. Problem 2 was that I misread the spec and didn't see that request bodies had to have Content-Length fields. Jay On Mon, Sep 12, 2011 at 12:29 PM, Daniel MacDougall <div><div></div><div class="h5"><<a href="mailto:dmacdougall@gmail.com">dmacdougall@gmail.com</a>> wrote: > Thanks for the reply. See below for the server code I'm using. > I narrowed down the problem a bit and there are actually two different but > related issues. The first is that request data is ignored for non-POST, > non-PUT requests: > $ curl <a href="http://localhost:8000" target="_blank">http://localhost:8000</a> -d "abcd" -X POST > <html>POSTabcd</html> > $ curl <a href="http://localhost:8000" target="_blank">http://localhost:8000</a> -d "abcd" -X PATCH > <html>PATCHNo request body</html> > The second problem is that POST and PUT requests hang when no request body > is specified: > $ curl <a href="http://localhost:8000" target="_blank">http://localhost:8000</a> -X POST (hangs) > $ curl <a href="http://localhost:8000" target="_blank">http://localhost:8000</a> -X PUT (hangs) > No server errors, even after killing the request. I imagine the server is > waiting on the request stream to parse a request body that will never come. > Daniel > --- > And here's the server code: > #lang racket > (require web-server/servlet-env > web-server/http/xexpr > web-server/http/request-structs > web-server/dispatch) > (define-values (app-dispatch app-url) > (dispatch-rules > [("") index] > [else index])) > (define (index req) > (response/xexpr `(html (p ,(bytes->string/utf-8 (request-method req))) > (p ,(cond ((bytes? (request-post-data/raw req)) > (bytes->string/utf-8 > (request-post-data/raw req))) > (else "No request body")))))) > (serve/servlet app-dispatch > #:port 8000 > #:servlet-regexp #rx"" > #:command-line? #t) > On Mon, Sep 12, 2011 at 5:50 AM, Jay McCarthy <<a href="mailto:jay.mccarthy@gmail.com">jay.mccarthy@gmail.com</a>> > wrote: >> >> This sounds strange to me. Request objects have a 'method' field that >> you can look at it. The bindings are a promise so that non-form-data >> POST content doesn't get erroneously parsed as bindings (unless you >> force the promise). This is all in place so that you can implement >> which ever methods you want without interference from the server's >> default behavior. Can you post a small example that has the hanging >> error? >> >> Jay >> >> On Sat, Sep 10, 2011 at 8:12 PM, Daniel MacDougall >> <<a href="mailto:dmacdougall@gmail.com">dmacdougall@gmail.com</a>> wrote: >> > Hi, >> > I'm trying to build a web server that responds to [POST/PUT/DELETE] >> > requests. If I use the built-in web server and POST to a url I have >> > defined >> > a dispatch function for, the request hangs indefinitely. The docs say >> > that >> > the web server tries to hide the details of the request method from you. >> > Is >> > there any way to work around this? Or am I limited to defining GET >> > requests >> > with continuations? >> > Thanks, >> > Daniel >> > _________________________________________________ >> > For list-related administrative tasks: >> > <a href="http://lists.racket-lang.org/listinfo/users" target="_blank">http://lists.racket-lang.org/listinfo/users</a> >> > >> >> >> >> -- >> Jay McCarthy <<a href="mailto:jay@cs.byu.edu">jay@cs.byu.edu</a>> >> Assistant Professor / Brigham Young University >> <a href="http://faculty.cs.byu.edu/~jay" target="_blank">http://faculty.cs.byu.edu/~jay</a> >> >> "The glory of God is Intelligence" - D&C 93 > > </div></div>-- <div><div></div><div class="h5">Jay McCarthy <<a href="mailto:jay@cs.byu.edu">jay@cs.byu.edu</a>> Assistant Professor / Brigham Young University <a href="http://faculty.cs.byu.edu/~jay" target="_blank">http://faculty.cs.byu.edu/~jay</a> "The glory of God is Intelligence" - D&C 93 </div></div></blockquote></div> </div>