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

Re: [hunchentoot-devel] serious H'toot performance problem on CCL OSX ?
by JTK 19 Aug '10

19 Aug '10

In addition to ccl, I've tried to use sbcl 1.0.29 with threads enabled, again on OSX 10.6. It displayed a similar slowdown with simultaneous connections. But with 100 connections, sbcl crashed and went into the ldb debugger: > fatal error encountered in SBCL pid 38459(tid 75514880): fault in heap page 12293 not marked as write-protected boxed_region.first_page: 0, boxed_region.last_page -1 Error opening /dev/tty: Device not configured Welcome to LDB, a low-level debugger for the Lisp runtime environment. ldb>

1 0

[hunchentoot-devel] USOCKET::%SETUP-WAIT-LIST is undefined
by Haris Bogdanović 26 Jun '10

26 Jun '10

Hi. When I try to start hunchentoot with: "(hunchentoot:start (make-instance 'hunchentoot:acceptor :port 8000))" I get: "The function USOCKET::%SETUP-WAIT-LIST is undefined." ? I use emacs/slime/sbcl on windows.

1 0

[hunchentoot-devel] hunchentoot doesn't show a picture
by Haris Bogdanović 23 Jun '10

23 Jun '10

I have this piece of code: ------------------------------------------------------------------------------------------------------------------------- (hunchentoot:start (make-instance 'hunchentoot:acceptor :port 5000)) (push (hunchentoot:create-prefix-dispatcher "/" 'start-page) hunchentoot:*dispatch-table*) (push (hunchentoot:create-folder-dispatcher-and-handler "pics/" "c:") hunchentoot:*dispatch-table*) (defun start-page () (cl-who:with-html-output-to-string (*standard-output* nil :indent t) (:html (:body (:img :alt "alt" :src "pics/pic01.jpg"))))) -------------------------------------------------------------------------------------------------------------------------------- and when I go to http://localhost:5000 I don't see a picture, I see alternative text "alt". Why, where is the problem ?

1 0

[hunchentoot-devel] less-than-helpful error message
by Cyrus Harmon 23 Jun '10

23 Jun '10

Esteemed hunchentoot developers, So, while trying to track down an unrelated issue where my handlers aren't getting called anymore, I came across the following issue where failure to open the message log file results in an error, which, in turn, attempts to open the message log file. The problem in this case was that the permissions were bogus for the directory I was trying to open. But, still, we should probably have a nicer error message than "recursive lock attempt" here. thanks, Cyrus Recursive lock attempt #S(SB-THREAD:MUTEX :NAME "global-message-log-lock" :%OWNER #<SB-THREAD:THREAD "Hunchentoot worker (client: 192.168.0.101:50690)" RUNNING {100427B6A1}> :STATE 1). [Condition of type SIMPLE-ERROR] Restarts: 0: [TERMINATE-THREAD] Terminate this thread (#<THREAD "Hunchentoot worker (client: 192.168.0.101:50690)" RUNNING {100427B6A1}>) Backtrace: 0: (SB-THREAD:GET-MUTEX #<unavailable argument> #<unavailable argument> #<unavailable argument> #<unavailable argument>) 1: ((FLET #:WITHOUT-INTERRUPTS-BODY-[CALL-WITH-MUTEX]300)) 2: (HUNCHENTOOT::LOG-MESSAGE-TO-FILE :ERROR "Error while processing connection: ~A")[:EXTERNAL] 3: ((FLET #:LAMBDA103) #<SIMPLE-ERROR "Recursive lock attempt ~S." {1003715361}>) 4: (SIGNAL #<SIMPLE-ERROR "Recursive lock attempt ~S." {1003715361}>)[:EXTERNAL] 5: (ERROR "Recursive lock attempt ~S.")[:EXTERNAL] 6: (SB-THREAD:GET-MUTEX #<unavailable argument> #<unavailable argument> #<unavailable argument> #<unavailable argument>) 7: ((FLET #:WITHOUT-INTERRUPTS-BODY-[CALL-WITH-MUTEX]300)) 8: (SB-THREAD::CALL-WITH-MUTEX ..) 9: (HUNCHENTOOT::LOG-MESSAGE-TO-FILE :ERROR "~A~:[~*~;~%~:*~A~]")[:EXTERNAL] 10: ((FLET #:LAMBDA250) #<SB-INT:SIMPLE-FILE-ERROR "~@<~?: ~2I~_~A~:>" {10036AD531}>) 11: (SIGNAL #<SB-INT:SIMPLE-FILE-ERROR "~@<~?: ~2I~_~A~:>" {10036AD531}>)[:EXTERNAL] 12: (ERROR SB-INT:SIMPLE-FILE-ERROR)[:EXTERNAL] 13: (SB-IMPL::SIMPLE-FILE-PERROR "error opening ~S" #P"/usr/home/sly/projects/priv.cyrusharmon.org/hunchentoot-launcher/log/hunchentoot-message.log" 13) 14: ((LABELS SB-IMPL::VANILLA-OPEN-ERROR)) 15: (OPEN #P"/usr/home/sly/projects/priv.cyrusharmon.org/hunchentoot-launcher/log/hunchentoot-message.log")[:EXTERNAL] 16: ((FLET SB-THREAD::WITH-MUTEX-THUNK)) 17: ((FLET #:WITHOUT-INTERRUPTS-BODY-[CALL-WITH-MUTEX]300)) 18: (SB-THREAD::CALL-WITH-MUTEX ..) 19: (HUNCHENTOOT::LOG-MESSAGE-TO-FILE :INFO "Default handler called for script ~A")[:EXTERNAL] 20: (HUNCHENTOOT::DEFAULT-HANDLER) 21: ((SB-PCL::FAST-METHOD HUNCHENTOOT:HANDLE-REQUEST (HUNCHENTOOT:ACCEPTOR HUNCHENTOOT:REQUEST)) ..) 22: ((SB-PCL::FAST-METHOD HUNCHENTOOT:PROCESS-REQUEST (T)) #<unavailable argument> #<unavailable argument> #<HUNCHENTOOT:REQUEST {1003587951}>) 23: ((SB-PCL::FAST-METHOD HUNCHENTOOT:PROCESS-CONNECTION (HUNCHENTOOT:ACCEPTOR T)) ..) 24: ((SB-PCL::FAST-METHOD HUNCHENTOOT:PROCESS-CONNECTION :AROUND (HUNCHENTOOT:ACCEPTOR T)) ..) 25: ((LAMBDA ())) 26: ((FLET #:WITHOUT-INTERRUPTS-BODY-[BLOCK369]374))

4 5

Re: [hunchentoot-devel] hunchentoot working dir
by Mike Marbles 22 Jun '10

22 Jun '10

There is an example of one way to do it in the test-handlers.lisp file in the test directory in the hunchentoot source.

1 0

[hunchentoot-devel] hunchentoot working dir
by Haris Bogdanović 22 Jun '10

22 Jun '10

Hi. How do I find out hunchentoot working dir ? I want to add pictures to be accessed by my web page so I want to know where to put them. Thanks.

1 0

[hunchentoot-devel] unchentoot-test
by Haris Bogdanović 18 Jun '10

18 Jun '10

Hi. I wanted to try hunchentoot-test by typing: (asdf:oos 'asdf:load-op :hunchentoot-test) Everything went ok but when trying to connect by going to: http://127.0.0.1:4242/hunchentoot/test firefox says unable to connect ? I'm using lispworks on windows. Thanks

2 1

[hunchentoot-devel] hunchentoot error log
by a 17 Jun '10

17 Jun '10

Hi. I have this piece of code: ----------------------------------------------------------------------------- (defpackage :web (:use :common-lisp :hunchentoot :cl-who :parenscript)) (in-package :web) (start (make-instance 'acceptor :port 8000)) (push (create-prefix-dispatcher "/index.html" 'index) *dispatch-table*) (defun index () (with-html-output-to-string (str) (:html (:head (:title "Test page")) (:body (dotimes (x 10) (htm (:p "Text"))))))) ------------------------------------------------------------------------ and when I go to http://localhost:8000/index.html I get an error: --------------------------------------------------------- Internal Server Error An error has occured. ------------------------------------------------------------ Where is the error in my code ? And where is the hunchentoot error log ? Thanks

2 3

[hunchentoot-devel] format string error in HANDLE-REQUEST
by Desmond O. Chang 08 Jun '10

08 Jun '10

Hi all, In SBCL, HANDLE-REQUEST raises an error like this if *LOG-LISP-BACKTRACE-P* is NIL: error in FORMAT: no more arguments ~A~:[~*~;~%~:*~A~] ^ [Condition of type SB-FORMAT:FORMAT-ERROR] Just remove the first ~* to fix it, or you can apply the attachment. Thanks, Des.

4 3

[hunchentoot-devel] maybe bug + patch
by Richard KLINDA 06 Jun '10

06 Jun '10

Hello, I may have found a bug. After stopping an acceptor with STOP, one can't start it again with START, because the START method doesn't reset the value of acceptor-shutdown-p to NIL, so the listener returns/quits instantly. See the attached trivial patch, that fixes the issue for me, but maybe I'm just missing something here. -- Richard

3 2