Subversion Repositories public iLand

Rev

Rev 99 | Rev 111 | Go to most recent revision | Details | Compare with Previous | Last modification | View Log | RSS feed

Rev Author Line No. Line
1
 
91 Werner 2
#include <QtCore>
3
#include <QtSql>
4
#include "global.h"
102 Werner 5
#include "xmlhelper.h"
90 Werner 6
#include "speciesset.h"
91 Werner 7
#include "species.h"
90 Werner 8
 
9
SpeciesSet::SpeciesSet()
10
{
91 Werner 11
    mSetupQuery = 0;
90 Werner 12
}
91 Werner 13
 
14
SpeciesSet::~SpeciesSet()
15
{
16
   clear();
17
}
18
 
19
void SpeciesSet::clear()
20
{
21
    qDeleteAll(mSpecies.values());
22
    mSpecies.clear();
23
}
24
 
25
 
26
/** loads active species from a database table and creates/setups the species.
27
    The function uses the global database-connection.
28
  */
102 Werner 29
int SpeciesSet::setup()
91 Werner 30
{
102 Werner 31
    const XmlHelper &xml = GlobalSettings::instance()->settings();
32
    QString tableName = xml.value("species.source", "species");
33
    QString readerFile = xml.value("species.reader", "reader.bin");
34
    readerFile = GlobalSettings::instance()->path(readerFile, "lip");
35
    mReaderStamp.load(readerFile);
36
 
91 Werner 37
    QSqlQuery query(GlobalSettings::instance()->dbin());
38
    mSetupQuery = &query;
39
    QString sql = QString("select * from %1").arg(tableName);
40
    query.exec(sql);
41
    clear();
42
    qDebug() << "attempting to load a species set from" << tableName;
43
    while (query.next()) {
44
        if (var("active").toInt()==0)
45
            continue;
46
 
47
        Species *s = new Species(this); // create
99 Werner 48
        // call setup routine (which calls SpeciesSet::var() to retrieve values
91 Werner 49
        s->setup();
50
 
51
        mSpecies.insert(s->id(), s); // store
52
    } // while query.next()
53
    qDebug() << "loaded" << mSpecies.count() << "active species:";
54
    qDebug() << mSpecies.keys();
55
 
56
    mSetupQuery = 0;
57
    return mSpecies.count();
58
 
59
}
60
/** retrieves variables from the datasource available during the setup of species.
61
  */
62
QVariant SpeciesSet::var(const QString& varName)
63
{
94 Werner 64
    Q_ASSERT(mSetupQuery!=0);
91 Werner 65
 
66
    int idx = mSetupQuery->record().indexOf(varName);
67
    if (idx>=0)
68
        return mSetupQuery->value(idx);
69
    // lookup in defaults
70
    qDebug() << "variable" << varName << "not found - using default.";
71
    return GlobalSettings::instance()->settingDefaultValue(varName);
72
}