June 2005 - tbnl-devel@common-lisp.net - mailman3.common-lisp.net

[tbnl-devel] arbitrary per-request data?
by Zach Beane 17 Sep '05

17 Sep '05

I have an application that has a notion of a current user that is lazily established on a per-request basis. For now, I have been returning a handler that is really a lambda wrapping a real handler that lexically binds the special *current-user*: (defun page-handler (request) (multiple-value-bind (handler foundp) (gethash (script-name request) *handlers*) (when foundp (lambda () (let ((*current-user* *current-user-local-unbound-value*)) (funcall handler)))))) But it occurred to me that there is already the *request* structure. Would it make sense to be able to have a table of arbitrary keys and values in the request structure for application use? I was thinking of an accessor like this: request-data key &optional (request *request*) => value, foundp Then I could write CURRENT-USER something like: (defun current-user () (multiple-value-bind (value foundp) (request-data 'user) (if foundp value (setf (request-data 'user) (cookie-user))))) Right now it's a bit messier than that. What do you think? If this seems reasonable I can work out and submit a patch. Zach

3 5

[tbnl-devel] New version 0.5.0 / Multiple back-ends
by Edi Weitz 17 Aug '05

17 Aug '05

Hi! I've finally found some time to incorporate Bob's changes, test them and document them. I've also changed the logging API and re-factored some of the code. I'm sure I broke something in the process so please test... :) Specifically, I tried to explain in the documentation how TBNL talks with the different back-ends. I also changed the test setup so that it now hopefully adapts to all three back-ends and gives new users a chance to understand how TBNL works. While testing the "stand-alone" version I had some problems with MS Internet Explorer but I /think/ I've nailed them down now. Note that some of the changes in 0.5.0 might break API compatibility with earlier versions so be careful if you use this release for an existing deployment of TBNL and resort to the docs if in doubt. Special thanks to Bob Hutchison who made this all possible! Download: <http://weitz.de/files/tbnl.tar.gz>. Have fun, Edi.

4 6

[tbnl-devel] (no subject)
by Bob Hutchison 14 Jul '05

14 Jul '05

Hi, So far I've got 48 create-static-file-dispatcher-and-handler definitions in my TBNL dispatch table. These are mostly image files now, but also CSS and javascript files. This number is about to go up by maybe five or six real soon now. Then soon after that I'll need to be able to serve an unknown, but large, number of files of different types. Is there currently a dispatcher/handler that deals with directories, possibly even recursively, or maybe that consults some kind of list of things to serve? No point writing one if it is already done. If there isn't one already, I'll code one up and contribute it to TBNL. Cheers, Bob ---- Bob Hutchison -- blogs at <http://www.recursive.ca/hutch/> Recursive Design Inc. -- <http://www.recursive.ca/>

3 5

[tbnl-devel] file upload from windows, pathname?
by Keith Irwin 28 Jun '05

28 Jun '05

Folks (or, anyway, Edi)-- When I upload a file, I get a structure something like: ("file" #P"/tmp/tbnl/tbnl-10" "Water Lillies.jpg" "image/jpeg") which is just fine. Documented, after all. And this works using firefox on both linux and windows. BUT, when I use IE on windows (where else), I get: ("file" #P"/tmp/tbnl/tbnl-10" "C:\\\\Documents and Settings\\\\All Users\\\\Documents\\\\Sample Pictures\\\Water lilies.jpg" "image/pjpeg") As you can imagine, this causes a slight bit of weirdness when I try to move the file from /tmp to my asset store. Amazingly, the pictures is copied. The name is a bit long. But in IE, at least, I can't "view" the picture as it translates to images/C:/Documents.... FWIW: images are served by apache, not TBNL. Easily fixable? Or should I just try for a regex to remove everything up to the last \ or /? --K {} ps. Interestingly, firefox on windows properly escapes the slashes so the image does get rendered.

4 6

Re: [tbnl-devel] sbcl and file upload
by Edi Weitz 27 Jun '05

27 Jun '05

On Sun, 26 Jun 2005 14:06:43 -0700, Keith Irwin <keith.irwin(a)gmail.com> wrote: > BTW, does CMUCL suffer from this same problem? Nope, because in CMUCL all characters are 8-bit.

2 1

[tbnl-devel] sbcl and file upload
by Keith Irwin 26 Jun '05

26 Jun '05

Folks-- I'm using tbnl 0.5.5, sbcl 0.9.1 with mod_lisp2 (for apache2) and can't seem to get file upload working because of: [error] [TBNL] While parsing multipart/form-data parameters: decoding error on stream [error] [TBNL] #<SB-SYS:FD-STREAM for "a constant string" {A20C1C9}> [error] [TBNL] (:EXTERNAL-FORMAT :UTF-8): [error] [TBNL] the octet sequence (137) cannot [error] [TBNL] be decoded. The files I want to upload are images. Uploading text works just fine. I'm guessing this has something to do with SBCL not allowing bivalent streams (or whatever, it's been awhile). Is there any option with SBCL? Any chance that a CVS version solves this? TBNL using SBCL's simple streams? I already serve images via straight apache. Any recommendations? -- K {}

2 3

[tbnl-devel] Re: Concerning TBNL and HTML-TEMPLATE
by Edi Weitz 09 Jun '05

09 Jun '05

Hi Dan! Please use the mailing lists for future questions like these - see Cc and the links on the websites. Thanks. On Wed, 08 Jun 2005 19:47:00 -0400, Dan Larkin <dl9534(a)albany.edu> wrote: > First of all let me thank you for your terrific software. The > availability of your software (and others too) has really helped > my picking up lisp. You're welcome... :) > For the past few days I've been reading c.l.l (but not posting, > because I don't know nearly enough to participate in any of the > current discussions). My background with lisp began this winter > when I started a course at my University in scheme. Since then > I've been trying to get going with common lisp and web > programming (since that is what I do during the summer at my > job). Good luck! I'm sure you'll have fun with CL. > But anyway, on to my question: How can I get a template parsed > with html-template to come up with as a tbnl page? I'm working > off the tbnl-test example so I have just created a new function > add-artist' and added it to dispatch table, but I can't figure out > how to get it to output the results of parsing a template. Something like (defun add-artist () (with-output-to-string (*default-template-output*) (fill-and-print-template template/printer values))) should do it. Note that FILL-AND-PRINT-TEMPLATE prints its output to the stream *DEFAULT-TEMPLATE-OUTPUT* and TBNL wants a string returned by the handler, so the code above makes sure everything printed to this stream ends up in a string which is returned by the function. This assumes that ADD-ARTIST is a handler, not a dispatcher. > Also another issue I am having is get-parameters, get-parameter, > post-parameters and post-parameter all don't seem to work. Even > with something like > (defun add-artist () > (with-html > (:html > (get-parameters)))) > does not work (the way I'd expect it to at least, it produces only > the prologue and <html></html> even when passed parameters). WITH-HTML is the macro which uses CL-WHO from the test suite, right? If that's the case you must wrap the form (GET-PARAMETERS) with something that asks CL-WHO to include it in the output, otherwise it'll only be evaluated for its side effects. One of (str (get-parameters)) (esc (get-parameters)) (fmt "~S" (get-parameters)) should do it. Does that help? Cheers, Edi.

1 0