|
|
|
/***************************************************************************
|
|
|
|
copyright : (C) 2003-2006 by Robby Stephenson
|
|
|
|
email : robby@periapsis.org
|
|
|
|
***************************************************************************/
|
|
|
|
|
|
|
|
/***************************************************************************
|
|
|
|
* *
|
|
|
|
* This program is free software; you can redistribute it and/or modify *
|
|
|
|
* it under the terms of version 2 of the GNU General Public License as *
|
|
|
|
* published by the Free Software Foundation; *
|
|
|
|
* *
|
|
|
|
***************************************************************************/
|
|
|
|
|
|
|
|
#include "pilotdbexporter.h"
|
|
|
|
#include "pilotdb/pilotdb.h"
|
|
|
|
#include "pilotdb/libflatfile/DB.h"
|
|
|
|
|
|
|
|
#include "../collection.h"
|
|
|
|
#include "../filehandler.h"
|
|
|
|
|
|
|
|
#include <tdelocale.h>
|
|
|
|
#include <kdebug.h>
|
|
|
|
#include <tdeconfig.h>
|
|
|
|
#include <tdeglobal.h>
|
|
|
|
#include <kcharsets.h>
|
|
|
|
|
|
|
|
#include <tqlayout.h>
|
|
|
|
#include <tqgroupbox.h>
|
|
|
|
#include <tqcheckbox.h>
|
|
|
|
#include <tqwhatsthis.h>
|
|
|
|
#include <tqtextcodec.h>
|
|
|
|
#include <tqdatetime.h>
|
|
|
|
|
|
|
|
using Tellico::Export::PilotDBExporter;
|
|
|
|
|
|
|
|
PilotDBExporter::PilotDBExporter() : Tellico::Export::Exporter(),
|
|
|
|
m_backup(true),
|
|
|
|
m_widget(0),
|
|
|
|
m_checkBackup(0) {
|
|
|
|
}
|
|
|
|
|
|
|
|
TQString PilotDBExporter::formatString() const {
|
|
|
|
return i18n("PilotDB");
|
|
|
|
}
|
|
|
|
|
|
|
|
TQString PilotDBExporter::fileFilter() const {
|
|
|
|
return i18n("*.pdb|Pilot Database Files (*.pdb)") + TQChar('\n') + i18n("*|All Files");
|
|
|
|
}
|
|
|
|
|
|
|
|
bool PilotDBExporter::exec() {
|
|
|
|
Data::CollPtr coll = collection();
|
|
|
|
if(!coll) {
|
|
|
|
return false;
|
|
|
|
}
|
|
|
|
|
|
|
|
// This is something of a hidden preference cause I don't want to put it in the GUI right now
|
|
|
|
// Latin1 by default
|
|
|
|
TQTextCodec* codec = 0;
|
|
|
|
{
|
|
|
|
// Latin1 is default
|
|
|
|
TDEConfigGroup group(TDEGlobal::config(), TQString::fromLatin1("ExportOptions - %1").arg(formatString()));
|
|
|
|
codec = TDEGlobal::charsets()->codecForName(group.readEntry("Charset"));
|
|
|
|
}
|
|
|
|
if(!codec) {
|
|
|
|
kdWarning() << "PilotDBExporter::exec() - no TQTextCodec!" << endl;
|
|
|
|
return false;
|
|
|
|
#ifndef NDEBUG
|
|
|
|
} else {
|
|
|
|
kdDebug() << "PilotDBExporter::exec() - encoding with " << codec->name() << endl;
|
|
|
|
#endif
|
|
|
|
}
|
|
|
|
|
|
|
|
// DB 0.3.x format
|
|
|
|
PalmLib::FlatFile::DB db;
|
|
|
|
|
|
|
|
// set database title
|
|
|
|
db.title(codec->fromUnicode(coll->title()).data());
|
|
|
|
|
|
|
|
// set backup option
|
|
|
|
// db.setOption("backup", (m_checkBackup && m_checkBackup->isChecked()) ? "true" : "false");
|
|
|
|
|
|
|
|
// all fields are added
|
|
|
|
// except that only one field of type NOTE
|
|
|
|
bool hasNote = false;
|
|
|
|
Data::FieldVec outputFields; // not all fields will be output
|
|
|
|
Data::FieldVec fields = coll->fields();
|
|
|
|
for(Data::FieldVec::Iterator fIt = fields.begin(); fIt != fields.end(); ++fIt) {
|
|
|
|
switch(fIt->type()) {
|
|
|
|
case Data::Field::Choice:
|
|
|
|
// the charSeparator is actually defined in DB.h
|
|
|
|
db.appendField(codec->fromUnicode(fIt->title()).data(), PalmLib::FlatFile::Field::LIST,
|
|
|
|
codec->fromUnicode(fIt->allowed().join(TQChar('/'))).data());
|
|
|
|
outputFields.append(fIt);
|
|
|
|
break;
|
|
|
|
|
|
|
|
case Data::Field::Number:
|
|
|
|
// the DB only supports single values of integers
|
|
|
|
if(fIt->flags() & Data::Field::AllowMultiple) {
|
|
|
|
db.appendField(codec->fromUnicode(fIt->title()).data(), PalmLib::FlatFile::Field::STRING);
|
|
|
|
} else {
|
|
|
|
db.appendField(codec->fromUnicode(fIt->title()).data(), PalmLib::FlatFile::Field::INTEGER);
|
|
|
|
}
|
|
|
|
outputFields.append(fIt);
|
|
|
|
break;
|
|
|
|
|
|
|
|
case Data::Field::Bool:
|
|
|
|
db.appendField(codec->fromUnicode(fIt->title()).data(), PalmLib::FlatFile::Field::BOOLEAN);
|
|
|
|
outputFields.append(fIt);
|
|
|
|
break;
|
|
|
|
|
|
|
|
case Data::Field::Para:
|
|
|
|
if(hasNote) { // only one is allowed, according to palm-db-tools documentation
|
|
|
|
kdDebug() << "PilotDBExporter::data() - adding note as string" << endl;
|
|
|
|
db.appendField(codec->fromUnicode(fIt->title()).data(), PalmLib::FlatFile::Field::STRING);
|
|
|
|
} else {
|
|
|
|
kdDebug() << "PilotDBExporter::data() - adding note" << endl;
|
|
|
|
db.appendField(codec->fromUnicode(fIt->title()).data(), PalmLib::FlatFile::Field::NOTE);
|
|
|
|
hasNote = true;
|
|
|
|
}
|
|
|
|
outputFields.append(fIt);
|
|
|
|
break;
|
|
|
|
|
|
|
|
case Data::Field::Date:
|
|
|
|
db.appendField(codec->fromUnicode(fIt->title()).data(), PalmLib::FlatFile::Field::DATE);
|
|
|
|
outputFields.append(fIt);
|
|
|
|
break;
|
|
|
|
|
|
|
|
case Data::Field::Image:
|
|
|
|
// don't include images
|
|
|
|
kdDebug() << "PilotDBExporter::data() - skipping " << fIt->title() << " image field" << endl;
|
|
|
|
break;
|
|
|
|
|
|
|
|
default:
|
|
|
|
db.appendField(codec->fromUnicode(fIt->title()).data(), PalmLib::FlatFile::Field::STRING);
|
|
|
|
outputFields.append(fIt);
|
|
|
|
break;
|
|
|
|
}
|
|
|
|
}
|
|
|
|
|
|
|
|
// add view with visible fields
|
|
|
|
if(m_columns.count() > 0) {
|
|
|
|
PalmLib::FlatFile::ListView lv;
|
|
|
|
lv.name = codec->fromUnicode(i18n("View Columns")).data();
|
|
|
|
for(TQStringList::ConstIterator it = m_columns.begin(); it != m_columns.end(); ++it) {
|
|
|
|
PalmLib::FlatFile::ListViewColumn col;
|
|
|
|
col.field = coll->fieldTitles().findIndex(*it);
|
|
|
|
lv.push_back(col);
|
|
|
|
}
|
|
|
|
db.appendListView(lv);
|
|
|
|
}
|
|
|
|
db.doneWithSchema();
|
|
|
|
|
|
|
|
Data::FieldVec::ConstIterator fIt, end = outputFields.constEnd();
|
|
|
|
bool format = options() & Export::ExportFormatted;
|
|
|
|
|
|
|
|
TQRegExp br(TQString::fromLatin1("<br/?>"), false /*case-sensitive*/);
|
|
|
|
TQRegExp tags(TQString::fromLatin1("<.*>"));
|
|
|
|
tags.setMinimal(true);
|
|
|
|
|
|
|
|
TQString value;
|
|
|
|
for(Data::EntryVec::ConstIterator entryIt = entries().begin(); entryIt != entries().end(); ++entryIt) {
|
|
|
|
PalmLib::FlatFile::Record record;
|
|
|
|
unsigned i = 0;
|
|
|
|
for(fIt = outputFields.constBegin(); fIt != end; ++fIt, ++i) {
|
|
|
|
value = entryIt->field(fIt->name(), format);
|
|
|
|
|
|
|
|
if(fIt->type() == Data::Field::Date) {
|
|
|
|
TQStringList s = TQStringList::split('-', value, true);
|
|
|
|
bool ok = true;
|
|
|
|
int y = s.count() > 0 ? s[0].toInt(&ok) : TQDate::currentDate().year();
|
|
|
|
if(!ok) {
|
|
|
|
y = TQDate::currentDate().year();
|
|
|
|
}
|
|
|
|
int m = s.count() > 1 ? s[1].toInt(&ok) : 1;
|
|
|
|
if(!ok) {
|
|
|
|
m = 1;
|
|
|
|
}
|
|
|
|
int d = s.count() > 2 ? s[2].toInt(&ok) : 1;
|
|
|
|
if(!ok) {
|
|
|
|
d = 1;
|
|
|
|
}
|
|
|
|
TQDate date(y, m, d);
|
|
|
|
value = date.toString(TQString::fromLatin1("yyyy/MM/dd"));
|
|
|
|
} else if(fIt->type() == Data::Field::Para) {
|
|
|
|
value.replace(br, TQChar('\n'));
|
|
|
|
value.replace(tags, TQString());
|
|
|
|
}
|
|
|
|
// the number of fields in the record must match the number of fields in the database
|
|
|
|
record.appendField(PilotDB::string2field(db.field_type(i),
|
|
|
|
value.isEmpty() ? std::string() : codec->fromUnicode(value).data()));
|
|
|
|
}
|
|
|
|
// Add the record to the database.
|
|
|
|
db.appendRecord(record);
|
|
|
|
}
|
|
|
|
|
|
|
|
class PilotDB pdb;
|
|
|
|
db.outputPDB(pdb);
|
|
|
|
|
|
|
|
return FileHandler::writeDataURL(url(), pdb.data(), options() & Export::ExportForce);
|
|
|
|
}
|
|
|
|
|
|
|
|
TQWidget* PilotDBExporter::widget(TQWidget* parent_, const char* name_/*=0*/) {
|
|
|
|
if(m_widget && TQT_BASE_OBJECT(m_widget->parent()) == TQT_BASE_OBJECT(parent_)) {
|
|
|
|
return m_widget;
|
|
|
|
}
|
|
|
|
|
|
|
|
m_widget = new TQWidget(parent_, name_);
|
|
|
|
TQVBoxLayout* l = new TQVBoxLayout(m_widget);
|
|
|
|
|
|
|
|
TQGroupBox* box = new TQGroupBox(1, Qt::Horizontal, i18n("PilotDB Options"), m_widget);
|
|
|
|
l->addWidget(box);
|
|
|
|
|
|
|
|
m_checkBackup = new TQCheckBox(i18n("Set PDA backup flag for database"), box);
|
|
|
|
m_checkBackup->setChecked(m_backup);
|
|
|
|
TQWhatsThis::add(m_checkBackup, i18n("Set PDA backup flag for database"));
|
|
|
|
|
|
|
|
l->addStretch(1);
|
|
|
|
return m_widget;
|
|
|
|
}
|
|
|
|
|
|
|
|
void PilotDBExporter::readOptions(TDEConfig* config_) {
|
|
|
|
TDEConfigGroup group(config_, TQString::fromLatin1("ExportOptions - %1").arg(formatString()));
|
|
|
|
m_backup = group.readBoolEntry("Backup", m_backup);
|
|
|
|
}
|
|
|
|
|
|
|
|
void PilotDBExporter::saveOptions(TDEConfig* config_) {
|
|
|
|
TDEConfigGroup group(config_, TQString::fromLatin1("ExportOptions - %1").arg(formatString()));
|
|
|
|
m_backup = m_checkBackup->isChecked();
|
|
|
|
group.writeEntry("Backup", m_backup);
|
|
|
|
}
|
|
|
|
|
|
|
|
#include "pilotdbexporter.moc"
|