dbproperties.cpp

/* This file is part of the KDE project
   Copyright (C) 2005-2006 Jaroslaw Staniek <js@iidea.pl>
 
   This program is free software; you can redistribute it and/or
   modify it under the terms of the GNU Library General Public
   License as published by the Free Software Foundation; either
   version 2 of the License, or (at your option) any later version.
 
   This program is distributed in the hope that it will be useful,
   but WITHOUT ANY WARRANTY; without even the implied warranty of
   MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
   Library General Public License for more details.
 
   You should have received a copy of the GNU Library General Public License
   along with this program; see the file COPYING.  If not, write to
   the Free Software Foundation, Inc., 51 Franklin Street, Fifth Floor,
 * Boston, MA 02110-1301, USA.
*/
 
#include "dbproperties.h"
#include <tdelocale.h>
 
using namespace KexiDB;
 
DatabaseProperties::DatabaseProperties(Connection *conn)
 : KexiDB::Object()
 , m_conn(conn)
{
}
 
DatabaseProperties::~DatabaseProperties()
{
}
 
bool DatabaseProperties::setValue( const TQString& _name, const TQVariant& value )
{
    TQString name(_name.stripWhiteSpace());
    bool ok;
    //we need to know whether update or insert
    bool exists = m_conn->resultExists(
        TQString::fromLatin1("SELECT 1 FROM kexi__db WHERE db_property=%1")
            .arg(m_conn->driver()->escapeString(name)), ok);
    if (!ok) {
        setError(m_conn, i18n("Could not set value of database property \"%1\".").arg(name));
        return false;
    }
 
    if (exists) {
        if (!m_conn->executeSQL(
            TQString::fromLatin1("UPDATE kexi__db SET db_value=%1 WHERE db_property=%2")
            .arg(m_conn->driver()->escapeString(value.toString()))
            .arg(m_conn->driver()->escapeString(name))))
        {
            setError(m_conn, i18n("Could not set value of database property \"%1\".").arg(name));
            return false;
        }
        return true;
    }
 
    if (!m_conn->executeSQL(
        TQString::fromLatin1("INSERT INTO kexi__db (db_property, db_value) VALUES (%1, %2)")
        .arg(m_conn->driver()->escapeString(name))
        .arg(m_conn->driver()->escapeString(value.toString()))))
    {
        setError(m_conn, i18n("Could not set value of database property \"%1\".").arg(name));
        return false;
    }
    return true;
}
 
bool DatabaseProperties::setCaption( const TQString& _name, const TQString& caption )
{
    TQString name(_name.stripWhiteSpace());
    //captions have ' ' prefix
    name.prepend(" ");
    bool ok;
    //we need to know whether update or insert
    bool exists = m_conn->resultExists(
        TQString::fromLatin1("SELECT 1 FROM kexi__db WHERE db_property=%1")
            .arg(m_conn->driver()->escapeString(name)), ok);
    if (!ok) {
        setError(m_conn, i18n("Could not set caption for database property \"%1\".").arg(name));
        return false;
    }
 
    if (exists) {
        if (!m_conn->executeSQL(
            TQString::fromLatin1("UPDATE kexi__db SET db_value=%1 WHERE db_property=%2")
            .arg(m_conn->driver()->escapeString(caption))
            .arg(m_conn->driver()->escapeString(name))))
        {
            setError(m_conn, i18n("Could not set caption for database property \"%1\".").arg(name));
            return false;
        }
        return true;
    }
 
    if (!m_conn->executeSQL(
        TQString::fromLatin1("INSERT INTO kexi__db (db_property, db_value) VALUES (%1, %2)")
        .arg(m_conn->driver()->escapeString(name))
        .arg(m_conn->driver()->escapeString(caption))))
    {
        setError(m_conn, i18n("Could not set caption for database property \"%1\".").arg(name));
        return false;
    }
    return true;
}
 
TQVariant DatabaseProperties::value( const TQString& _name )
{
    TQString result;
    TQString name(_name.stripWhiteSpace());
    if (true!=m_conn->querySingleString(
        TQString::fromLatin1("SELECT db_value FROM kexi__db WHERE db_property=")
        + m_conn->driver()->escapeString(name), result)) {
        m_conn->setError(ERR_NO_DB_PROPERTY, i18n("Could not read database property \"%1\".").arg(name));
        return TQVariant();
    }
    return result;
}
 
TQString DatabaseProperties::caption( const TQString& _name )
{
    TQString result;
    TQString name(_name.stripWhiteSpace());
    //captions have ' ' prefix
    name.prepend(" ");
    if (true!=m_conn->querySingleString(
        TQString::fromLatin1("SELECT db_value FROM kexi__db WHERE db_property=")
        + m_conn->driver()->escapeString(name), result)) {
        setError(m_conn, i18n("Could not read database property \"%1\".").arg(name));
        return TQString();
    }
    return result;
}
 
TQStringList DatabaseProperties::names()
{
    TQStringList result;
    if (true!=m_conn->queryStringList(
        TQString::fromLatin1("SELECT db_value FROM kexi__db WHERE db_property NOT LIKE ")
            + m_conn->driver()->escapeString(TQString::fromLatin1(" %%")), result, 0 /*0-th*/)) {
        //                                                        ^^ exclude captions
        setError(m_conn, i18n("Could not read database properties."));
        return TQStringList();
    }
    return result;
}