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.
tdeutils/superkaramba/src/sknewstuff.cpp

141 lines
4.5 KiB

/*
* Copyright (C) 2005 Ryan Nickell <p0z3r @ earthlink . net>
*
* This file is part of SuperKaramba.
*
* SuperKaramba is free software; you can redistribute it and/or modify
* it under the terms of the GNU General Public License as published by
* the Free Software Foundation; either version 2 of the License, or
* (at your option) any later version.
*
* SuperKaramba 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 General Public License for more details.
*
* You should have received a copy of the GNU General Public License
* along with SuperKaramba; if not, write to the Free Software
* Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA
****************************************************************************/
#include <tdeapplication.h>
#include <kdebug.h>
#include <tdefilemetainfo.h>
#include <tdeio/netaccess.h>
#include <kmimetype.h>
#include <krun.h>
#include <kstandarddirs.h>
#include <ktar.h>
#include <kurl.h>
#include <tqdir.h>
#include <tqfileinfo.h>
#ifdef HAVE_CONFIG_H
#include <config.h>
#endif
#include "karambaapp.h"
#include "themesdlg.h"
#ifdef HAVE_KNEWSTUFF
#include "sknewstuff.h"
SKNewStuff::SKNewStuff( ThemesDlg *dlg ) :
TDENewStuff( "superkaramba/themes", dlg ),
mDlg( dlg )
{
}
bool SKNewStuff::install( const TQString &fileName )
{
kdDebug() << "SKNewStuff::install(): " << fileName << endl;
KMimeType::Ptr result = KMimeType::findByURL(fileName);
TDEStandardDirs myStdDir;
TQFileInfo fi(fileName);
TQString base = fi.baseName();
TQString baseDestDir =myStdDir.saveLocation("data", kapp->instanceName() + "/themes/", true);
const TQString destDir = baseDestDir + base + "/";
TDEStandardDirs::makeDir( destDir );
kdDebug() << "SKNewStuff::install() mimetype: " << result->name() << endl;
if( result->name() == "application/x-gzip" ||
result->name() == "application/x-tgz" ||
result->name() == "application/x-bzip" ||
result->name() == "application/x-bzip2" ||
result->name() == "application/x-tbz" ||
result->name() == "application/x-tbz2" ||
result->name() == "application/x-tar" ||
result->name() == "application/x-tarz")
{
kdDebug() << "SKNewStuff::install() gzip/bzip2 mimetype encountered" <<
endl;
KTar archive( fileName );
if ( !archive.open( IO_ReadOnly ) )
return false;
const KArchiveDirectory *archiveDir = archive.directory();
archiveDir->copyTo(destDir);
//Add the theme to the Theme Dialog
mDlg->addThemeToDialog(archiveDir, destDir);
archive.close();
}
else if(result->name() == "application/x-zip" ||
result->name() == "application/x-superkaramba")
{
kdDebug() << "SKNewStuff::install() zip mimetype encountered" << endl;
//TODO: write a routine to check if this is a valid .skz file
//otherwise we need to unpack it like it is an old theme that was packaged
//as a .zip instead of .bz2 or .tar.gz
KURL sourceFile(fileName);
KURL destFile( destDir + sourceFile.fileName() );
if(!TDEIO::NetAccess::file_copy( sourceFile, destFile ))
{
return false;
}
TDEIO::NetAccess::removeTempFile( sourceFile.url() );
//Add the skz theme to the Theme Dialog
mDlg->addSkzThemeToDialog(destFile.path());
}
else if(result->name() == "plain/text")
{
kdDebug() << "SKNewStuff::install() plain text" << endl;
}
else if(result->name() == "text/html")
{
kdDebug() << "SKNewStuff::install() text/html" << endl;
KRun::runURL( m_sourceLink, "text/html");
}
else
{
kdDebug() << "SKNewStuff::install() Error no compatible mimetype encountered to install"
<< endl;
return false;
}
return true;
}
bool SKNewStuff::createUploadFile( const TQString &fileName )
{
kdDebug() << "SKNewStuff::createUploadFile(): " << fileName << endl;
return true;
}
TQString SKNewStuff::downloadDestination( KNS::Entry *entry )
{
KURL source = entry->payload();
m_sourceLink = source;
kdDebug() << "SKNewStuff::downloadDestination() url: "
<< source.url() << " fileName: " << source.fileName() << endl;
TQString file(source.fileName());
if ( file.isEmpty() )
{
kdDebug() << "The file was empty. " << source.url() <<
" must be a URL link." << endl;
KRun::runURL( source, "text/html");
return file;
}
return TDEGlobal::dirs()->saveLocation( "tmp" ) + source.fileName();
}
#endif //HAVE_KNEWSTUFF