You can not select more than 25 topics Topics must start with a letter or number, can include dashes ('-') and can be up to 35 characters long.
tellico/src/reportdialog.cpp

221 lines
7.6 KiB

/***************************************************************************
copyright : (C) 2005-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 "reportdialog.h"
#include "translators/htmlexporter.h"
#include "imagefactory.h"
#include "tellico_kernel.h"
#include "collection.h"
#include "document.h"
#include "entry.h"
#include "controller.h"
#include "tellico_utils.h"
#include "tellico_debug.h"
#include "gui/combobox.h"
#include "core/tellico_config.h"
#include <tdelocale.h>
#include <tdehtml_part.h>
#include <tdehtmlview.h>
#include <kstandarddirs.h>
#include <kdebug.h>
#include <tdeapplication.h>
#include <kpushbutton.h>
#include <kiconloader.h>
#include <ksortablevaluelist.h>
#include <tdefiledialog.h>
#include <tqlayout.h>
#include <tqfile.h>
#include <tqlabel.h>
#include <tqfileinfo.h>
#include <tqtimer.h>
namespace {
static const int REPORT_MIN_WIDTH = 600;
static const int REPORT_MIN_HEIGHT = 420;
}
using Tellico::ReportDialog;
// default button is going to be used as a print button, so it's separated
ReportDialog::ReportDialog(TQWidget* parent_, const char* name_/*=0*/)
: KDialogBase(parent_, name_, false, i18n("Collection Report"), Close, Close),
m_exporter(0) {
TQWidget* mainWidget = new TQWidget(this, "ReportDialog mainWidget");
setMainWidget(mainWidget);
TQVBoxLayout* topLayout = new TQVBoxLayout(mainWidget, 0, KDialog::spacingHint());
TQHBoxLayout* hlay = new TQHBoxLayout(topLayout);
TQLabel* l = new TQLabel(i18n("&Report template:"), mainWidget);
hlay->addWidget(l);
// TDEStandardDirs::findAllResources(const char *type, const TQString &filter, bool recursive, bool uniq)
TQStringList files = TDEGlobal::dirs()->findAllResources("appdata", TQString::fromLatin1("report-templates/*.xsl"),
false, true);
KSortableValueList<TQString, TQString> templates;
for(TQStringList::ConstIterator it = files.begin(); it != files.end(); ++it) {
TQFileInfo fi(*it);
TQString file = fi.fileName();
TQString name = file.section('.', 0, -2);
name.replace('_', ' ');
TQString title = i18n((name + TQString::fromLatin1(" XSL Template")).utf8(), name.utf8());
templates.insert(title, file);
}
templates.sort();
m_templateCombo = new GUI::ComboBox(mainWidget);
for(KSortableValueList<TQString, TQString>::iterator it = templates.begin(); it != templates.end(); ++it) {
m_templateCombo->insertItem((*it).index(), (*it).value());
}
hlay->addWidget(m_templateCombo);
l->setBuddy(m_templateCombo);
KPushButton* pb1 = new KPushButton(SmallIconSet(TQString::fromLatin1("application-x-executable")), i18n("&Generate"), mainWidget);
hlay->addWidget(pb1);
connect(pb1, TQT_SIGNAL(clicked()), TQT_SLOT(slotGenerate()));
hlay->addStretch();
KPushButton* pb2 = new KPushButton(KStdGuiItem::saveAs(), mainWidget);
hlay->addWidget(pb2);
connect(pb2, TQT_SIGNAL(clicked()), TQT_SLOT(slotSaveAs()));
KPushButton* pb3 = new KPushButton(KStdGuiItem::print(), mainWidget);
hlay->addWidget(pb3);
connect(pb3, TQT_SIGNAL(clicked()), TQT_SLOT(slotPrint()));
m_HTMLPart = new TDEHTMLPart(mainWidget);
m_HTMLPart->setJScriptEnabled(false);
m_HTMLPart->setJavaEnabled(false);
m_HTMLPart->setMetaRefreshEnabled(false);
m_HTMLPart->setPluginsEnabled(false);
topLayout->addWidget(m_HTMLPart->view());
TQString text = TQString::fromLatin1("<html><style>p{font-weight:bold;width:50%;"
"margin:20% auto auto auto;text-align:center;"
"background:white;color:%1;}</style><body><p>").arg(contrastColor.name())
+ i18n("Select a report template and click <em>Generate</em>.") + ' '
+ i18n("Some reports may take several seconds to generate for large collections.");
+ TQString::fromLatin1("</p></body></html>");
m_HTMLPart->begin();
m_HTMLPart->write(text);
m_HTMLPart->end();
setMinimumWidth(TQMAX(minimumWidth(), REPORT_MIN_WIDTH));
setMinimumHeight(TQMAX(minimumHeight(), REPORT_MIN_HEIGHT));
resize(configDialogSize(TQString::fromLatin1("Report Dialog Options")));
}
ReportDialog::~ReportDialog() {
delete m_exporter;
m_exporter = 0;
saveDialogSize(TQString::fromLatin1("Report Dialog Options"));
}
void ReportDialog::slotGenerate() {
GUI::CursorSaver cs(TQt::waitCursor);
TQString fileName = TQString::fromLatin1("report-templates/") + m_templateCombo->currentData().toString();
TQString xsltFile = locate("appdata", fileName);
if(xsltFile.isEmpty()) {
kdWarning() << "ReportDialog::setXSLTFile() - can't locate " << m_templateCombo->currentData().toString() << endl;
return;
}
// if it's the same XSL file, no need to reload the XSLTHandler, just refresh
if(xsltFile == m_xsltFile) {
slotRefresh();
return;
}
m_xsltFile = xsltFile;
delete m_exporter;
m_exporter = new Export::HTMLExporter();
m_exporter->setXSLTFile(m_xsltFile);
m_exporter->setPrintHeaders(false); // the templates should take care of this themselves
m_exporter->setPrintGrouped(true); // allow templates to take advantage of added DOM
slotRefresh();
}
void ReportDialog::slotRefresh() {
if(!m_exporter) {
kdWarning() << "ReportDialog::slotRefresh() - no exporter" << endl;
return;
}
m_exporter->setGroupBy(Controller::self()->expandedGroupBy());
m_exporter->setSortTitles(Controller::self()->sortTitles());
m_exporter->setColumns(Controller::self()->visibleColumns());
// only print visible entries
m_exporter->setEntries(Controller::self()->visibleEntries());
long options = Export::ExportUTF8 | Export::ExportComplete | Export::ExportImages;
if(Config::autoFormat()) {
options |= Export::ExportFormatted;
}
m_exporter->setOptions(options);
// by setting the xslt file as the URL, any images referenced in the xslt "theme" can be found
// by simply using a relative path in the xslt file
KURL u;
u.setPath(m_xsltFile);
m_HTMLPart->begin(u);
m_HTMLPart->write(m_exporter->text());
#if 0
TQFile f(TQString::fromLatin1("/tmp/test.html"));
if(f.open(IO_WriteOnly)) {
TQTextStream t(&f);
t << m_exporter->text();
}
f.close();
#endif
m_HTMLPart->end();
// is this needed?
// view()->layout();
}
// actually the print button
void ReportDialog::slotPrint() {
m_HTMLPart->view()->print();
}
void ReportDialog::slotSaveAs() {
TQString filter = i18n("*.html|HTML Files (*.html)") + TQChar('\n') + i18n("*|All Files");
KURL u = KFileDialog::getSaveURL(TQString(), filter, this);
if(!u.isEmpty() && u.isValid()) {
TDEConfigGroup config(TDEGlobal::config(), "ExportOptions");
bool encode = config.readBoolEntry("EncodeUTF8", true);
long oldOpt = m_exporter->options();
// turn utf8 off
long options = oldOpt & ~Export::ExportUTF8;
// now turn it on if true
if(encode) {
options |= Export::ExportUTF8;
}
KURL oldURL = m_exporter->url();
m_exporter->setOptions(options);
m_exporter->setURL(u);
m_exporter->exec();
m_exporter->setURL(oldURL);
m_exporter->setOptions(oldOpt);
}
}
#include "reportdialog.moc"