krs_doc.cpp

/*
 *  Copyright (c) 2005 Cyrille Berger <cberger@cberger.net>
 *  Copyright (c) 2006 Isaac Clerencia <isaac@warp.es>
 *
 *  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; if not, write to the Free Software
 *  Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301, USA.
 */
 
#include "krs_doc.h"
#include "krs_sheet.h"
 
#include <kspread_map.h>
#include <kspread_sheet.h>
 
namespace Kross { namespace KSpreadCore {
 
Doc::Doc(KSpread::Doc* doc)
    : Kross::Api::Class<Doc>("KSpreadDocument"), m_doc(doc)
{
    this->addFunction0< Sheet >("currentSheet", this, &Doc::currentSheet);
    this->addFunction1< Sheet, Kross::Api::Variant >("sheetByName", this, &Doc::sheetByName);
    this->addFunction0< Kross::Api::Variant >("sheetNames", this, &Doc::sheetNames);
 
    this->addFunction1< Kross::Api::Variant, Kross::Api::Variant >("addSheet", this, &Doc::addSheet);
    this->addFunction1< Kross::Api::Variant, Kross::Api::Variant >("removeSheet", this, &Doc::removeSheet);
 
    this->addFunction1< Kross::Api::Variant, Kross::Api::Variant >("loadNativeXML", this, &Doc::loadNativeXML);
    this->addFunction0< Kross::Api::Variant >("saveNativeXML", this, &Doc::saveNativeXML);
 
    this->addFunction1< Kross::Api::Variant, Kross::Api::Variant >("openUrl", this, &Doc::openUrl);
    this->addFunction1< Kross::Api::Variant, Kross::Api::Variant >("saveUrl", this, &Doc::saveUrl);
    this->addFunction1< Kross::Api::Variant, Kross::Api::Variant >("import", this, &Doc::import);
    this->addFunction1< Kross::Api::Variant, Kross::Api::Variant >("exp0rt", this, &Doc::exp0rt);
 
}
 
Doc::~Doc() {
 
}
 
const TQString Doc::getClassName() const {
    return "Kross::KSpreadCore::Doc";
}
 
Sheet* Doc::currentSheet()
{
    return new Sheet(m_doc->displaySheet(), m_doc);
}
 
Sheet* Doc::sheetByName(const TQString& name)
{
    TQPtrListIterator<KSpread::Sheet> it (m_doc->map()->sheetList());
    for( ; it.current(); ++it )
        if(it.current()->sheetName() == name)
            return new Sheet(it.current(), m_doc);
    return 0;
}
 
TQStringList Doc::sheetNames()
{
    TQStringList names;
    TQPtrListIterator<KSpread::Sheet> it (m_doc->map()->sheetList());
    for( ; it.current(); ++it )
        names.append( it.current()->sheetName() );
    return names;
}
 
bool Doc::addSheet(const TQString& sheetname)
{
    KSpread::Sheet* sheet = m_doc->map()->createSheet();
    if(sheet) {
        if(! sheet->setSheetName(sheetname)) {
            delete sheet;
            return false;
        }
        m_doc->map()->addSheet(sheet);
        return true;
    }
    return false;
}
 
bool Doc::removeSheet(const TQString& sheetname)
{
    KSpread::Sheet* sheet = m_doc->map()->findSheet(sheetname);
    if(sheet) {
        m_doc->map()->takeSheet(sheet);
        return true;
    }
    return false;
}
 
bool Doc::loadNativeXML(const TQString& xml) {
    TQDomDocument doc;
    if(! doc.setContent(xml, true))
        return false;
    return m_doc->loadXML(0, doc);
}
 
TQString Doc::saveNativeXML() {
    return m_doc->saveXML().toString(2);
}
 
bool Doc::openUrl(const TQString& url)
{
    return m_doc->openURL(url);
}
 
bool Doc::saveUrl(const TQString& url)
{
    return m_doc->saveAs(url);
}
 
bool Doc::import(const TQString& url)
{
    return m_doc->import(url);
}
 
bool Doc::exp0rt(const TQString& url)
{
    return m_doc->exp0rt(url);
}
 
}}