Postgres Test

For this test to work, postgres must be correctly configured on your system and accessible to the webserver user id.

if [catch { set conn [pg_connect template1] set r [pg_exec $conn "select * from pg_database"] if {[pg_result $r -status] == "PGRES_TUPLES_OK"} { html "Success!

\n" html "\n" loop i 0 [pg_result $r -numTuples] { html "\n" } html "
[join [pg_result $r -attributes] ]
[join [pg_result $r -getTuple $i] ]
\n" } else { html "Bummer. Could not read template1 tuples, result was: [pg_result $r -status]" } }] { html "Too bad. Something is definitely broken. The following traceback should help:

" global errorInfo html "

$errorInfo
" html {

If the test failed due to an error like: "pg_connect no such command", then this indicates either a problem in the configuration (access.conf), or something more subtle.} }

Proceed to authentication tests.