April 2008 - postmodern-devel - mailman3.common-lisp.net

[postmodern-devel] Release 1.12
by Marijn Haverbeke 30 Apr '08

30 Apr '08

Hi list, There is now a version 1.12 of postmodern. It features SSL support, a few rather un-spectacular new features, and less bugs than 1.11. See the docs and the darcsweb for details. Regards, Marijn

1 0

[postmodern-devel] Error when no persistent field
by Sven Van Caekenberghe 21 Apr '08

21 Apr '08

Hi, I defined an object with metaclass dao-class but forgot to add any col- type options, this results in a rather cryptic error that is hard to get out of in LispWorks: P1 10 > (select-dao 'enumeration) Error: The assertion (= (LENGTH POSTMODERN::QUERY-FIELDS) POSTMODERN::N-DAO-FIELDS) failed. 1 (continue) Retry assertion. 2 (abort) Return to level 0. 3 Return to top loop level 0. Type :b for backtrace, :c <option number> to proceed, or :? for other options P1 11 : 1 > :bq (HARLEQUIN-COMMON-LISP:SUBFUNCTION 1 POSTMODERN::BUILD-ROW-READER) <- CL-POSTGRES::SEND-QUERY <- (HARLEQUIN-COMMON-LISP:SUBFUNCTION (LABELS #:G244377) CL- POSTGRES:EXEC-QUERY) <- CL-POSTGRES:EXEC-QUERY <- LET <- EVAL <- CAPI::CAPI-TOP-LEVEL-FUNCTION <- CAPI::INTERACTIVE-PANE-TOP- LOOP <- (HARLEQUIN-COMMON-LISP:SUBFUNCTION MP::PROCESS-SG-FUNCTION MP::INITIALIZE-PROCESS-STACK) I can live with this, but maybe it would be good to make this more user friendly. Cheers, Sven

2 4

[postmodern-devel] Timestamp (with time zone)
by Sven Van Caekenberghe 14 Apr '08

14 Apr '08

Hi, This is partly postmodern, partly postgresql related. I was wondering whether it would not be useful to also do the following when loading simple-date above postmodern: (in-package :simple-date) (cl-postgres:set-sql-datetime-readers :timestamp-with-timezone (lambda (usecs) (multiple-value-bind (days usecs) (floor usecs +usecs-in-one-day+) (make-instance 'timestamp :days (+ days +postgres-day-offset+) :ms (floor usecs 1000))))) Or even in place of the normal :timestamp binding (from which the above code is copied) ? From my experiments and reading, using timestamp with time zone as SQL type is more useful than timestamp. What I want is a created or last-modified timestamp that is set or updated automatically by SQL and not CL with a default like now(). The problem seems to be that the way now() is interpreted is dependent on the time zone set for the session (or the time zone default of postgresql, which defaults to your machine's). The only correct thing to store are GMT timestamps and to adjust those to the viewer's own time zone. psql does that correctly only with the type timestamp with time zone and not with the type timestamp, although they seem to be the same thing internally. In CL, (simple-date:universal-time-to-timestamp (get-universal-time)) is always GMT, indepedent of the current (viewer's) timezone. In PG SQL this seems to be hard to do using now() or similar functions. So out of the box reader support for that type would be useful. A second question is how to correctly specify this col-type in a DAO since :timestamp-with-time-zone doesn't generate the necessary spaces when generating the table definition and a string is not considered a CL type ? Any thoughts ? Thanks, Sven

2 2

[postmodern-devel] s-sql insert-into problem
by Jens Teich 14 Apr '08

14 Apr '08

I have a tablename as string, a list of fieldnames as strings and a list of values known only at runtime all. Tried the following. What is going wrong? HB> (sql (append (list :insert-into (intern "table") :set) (loop for k in '("field1" "field2" "field3") for v in '(4 5 6) append (list (intern k) v)))) Error: Value (:INSERT-INTO |table| :SET |field1| 4 |field2| 5 |field3| 6) can not be converted to an SQL literal. [Condition of type SIMPLE-ERROR] Jens

2 2

[postmodern-devel] Release 1.11 [was: Unexpected Result from SET command]
by Marijn Haverbeke 09 Apr '08

09 Apr '08

Hey list, I've just released version 1.11 of Postmodern. Mostly bug-fixes, but one feature to be careful with is the new auto-escaping: If you were using 'true and 'false in your queries for boolean values, they will now be escaped and not be read as boolean values at all, so use T and NIL instead. See http://common-lisp.net/project/postmodern for a slightly more detailed release description and, as always, the darcsweb for the definite word on what happened. Regards, Marijn On Tue, Apr 1, 2008 at 5:13 PM, Sven Van Caekenberghe <scaekenberghe(a)common-lisp.net> wrote: > Marijn, > > > > On 01 Apr 2008, at 15:47, Marijn Haverbeke wrote: > > > > Hey Sven, > > > > > > > POSTMODERN 45 > (execute "set time zone gmt") > > > CL-POSTGRES: set time zone gmt > > > Error: Postgresql protocol error: Unexpected message received: S > > > > > > > Oops - this was a case in the pg client/server protocol that I was not > > handling correctly. I've pushed a patch which should solve the > > problem. > > > > Cheers, > > Marijn > > > > Pulling from > "http://common-lisp.net/project/postmodern/darcs/postmodern"... > > Tue Apr 1 15:39:53 CEST 2008 marijnh(a)gmail.com > * handle ParameterStatus messages when reading in query results > > And it works for me now! Thanks a lot for the fast response. > > Regards, > > > > Sven > > > _______________________________________________ > postmodern-devel mailing list > postmodern-devel(a)common-lisp.net > http://common-lisp.net/cgi-bin/mailman/listinfo/postmodern-devel >

1 0

[postmodern-devel] Unexpected Result from SET command
by Sven Van Caekenberghe 01 Apr '08

01 Apr '08

Hi, Is it possible that there is something wrong or missing in handling the result from a SET command ? POSTMODERN 44 > (connect-toplevel "test" "postgres" "" "localhost") POSTMODERN 45 > (execute "set time zone gmt") CL-POSTGRES: set time zone gmt Error: Postgresql protocol error: Unexpected message received: S 1 (abort) Return to level 0. 2 Return to top loop level 0. Type :b for backtrace, :c <option number> to proceed, or :? for other options POSTMODERN 46 : 1 > :b Call to CL-POSTGRES::LOOK-FOR-ROW Call to CL-POSTGRES::SEND-QUERY Call to (HARLEQUIN-COMMON-LISP:SUBFUNCTION (LABELS #:G135637) EXEC- QUERY) Call to EXEC-QUERY Call to EVAL Call to CAPI::CAPI-TOP-LEVEL-FUNCTION Call to CAPI::INTERACTIVE-PANE-TOP-LOOP Call to (HARLEQUIN-COMMON-LISP:SUBFUNCTION MP::PROCESS-SG-FUNCTION MP::INITIALIZE-PROCESS-STACK) Thanks, Sven

2 2