File: database-pgsql.inc.php

package info (click to toggle)
webissues-server 0.8.3-2-1
  • links: PTS
  • area: main
  • in suites: lenny
  • size: 392 kB
  • ctags: 610
  • sloc: php: 2,206; sql: 458; sh: 44; makefile: 9
file content (106 lines) | stat: -rw-r--r-- 2,585 bytes parent folder | download
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
<?php
/**************************************************************************
* This file is part of the WebIssues Server program
* Copyright (C) 2006 Michał Męciński
* Copyright (C) 2007-2008 WebIssues Team
*
* This program is free software; you can redistribute it and/or modify
* it under the terms of the GNU General Public License as published by
* the Free Software Foundation; either version 2 of the License, or
* (at your option) any later version.
**************************************************************************/

function wi_db_connect( $host, $database, $user, $password )
{
    $parts = explode( ':', $host );
    if ( isset( $parts[ 1 ] ) ) {
        $host = $parts[ 0 ];
        $port = $parts[ 1 ];
    } else {
        $port = '';
    }

    $string = '';

    if ( $host != '' )
        $string .= "host=$host";
    if ( $port != '' )
        $string .= " port=$port";
    if ( $database != '' )
        $string .= " dbname=$database";
    if ( $user != '' )
        $string .= " user=$user";
    if ( $password != '' )
        $string .= " password=$password";

    if ( !pg_connect( $string ) )
        return false;

    return true;
}

function wi_db_escape_arg( $arg, $type )
{
    switch( $type ) {
        case 'd':
            return (int)$arg;
        case 's':
            return "'" . pg_escape_string( $arg ) . "'";
        case 'b':
            return "'" . pg_escape_bytea( $arg ) . "'";
    }
}

function wi_db_query( $query )
{
    $log = wi_log_open( 'sql' );
    if ( $log )
        fwrite( $log, "> $query\n" );

    $rs = pg_query( $query );

    if ( !$rs ) {
        if ( $log ) {
            $error = pg_last_error();
            fwrite( $log, "$error\n" );
        }
        return false;
    }

    if ( $log ) {
        $num = pg_affected_rows( $rs );
        if ( $num > 0 ) {
            fwrite( $log, "($num rows affected)\n" );
        } else {
            $num = pg_num_rows( $rs );
            fwrite( $log, "($num rows returned)\n" );
        }
    }

    return $rs;
}

function wi_db_fetch_assoc( $rs )
{
    return pg_fetch_assoc( $rs );
}

function wi_db_unescape_blob( $data )
{
    return pg_unescape_bytea( $data );
}

function wi_db_insert_id( $table, $column )
{
    $query = "SELECT last_value FROM ${table}_${column}_seq";
    $rs = pg_query( $query );
    $row = pg_fetch_row( $rs );
    return $row[ 0 ];
}

function wi_db_table_exists( $table )
{
    $query = "SELECT relname FROM pg_class WHERE relkind = 'r' AND relname = '$table'";
    $rs = pg_query( $query );
    return pg_num_rows( $rs ) > 0;
}