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.
tdebase/kcontrol/konq/previews.cpp

220 lines
8.1 KiB

/* This file is part of the KDE libraries
Copyright (C) 2002 David Faure <faure@kde.org>
This library is free software; you can redistribute it and/or
modify it under the terms of the GNU Library General Public
License version 2 as published by the Free Software Foundation.
This library 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 library; see the file COPYING.LIB. If not, write to
the Free Software Foundation, Inc., 51 Franklin Street, Fifth Floor,
Boston, MA 02110-1301, USA.
*/
//
// File previews configuration
//
#include <tqcheckbox.h>
#include <tqlabel.h>
#include <tqlayout.h>
#include <tqwhatsthis.h>
#include <dcopclient.h>
#include <kapplication.h>
#include <kconfig.h>
#include <kdialog.h>
#include <kglobal.h>
#include <klistview.h>
#include <klocale.h>
#include <knuminput.h>
#include <kprotocolinfo.h>
#include "previews.h"
//-----------------------------------------------------------------------------
class PreviewCheckListItem : public TQCheckListItem
{
public:
PreviewCheckListItem( TQListView *parent, const TQString &text )
: TQCheckListItem( parent, text, CheckBoxController )
{}
PreviewCheckListItem( TQListViewItem *parent, const TQString &text )
: TQCheckListItem( parent, text, CheckBox )
{}
protected:
void stateChange( bool )
{
static_cast<KPreviewOptions *>( listView()->parent() )->changed();
}
};
KPreviewOptions::KPreviewOptions( TQWidget *parent, const char */*name*/ )
: KCModule( parent, "kcmkonq" )
{
TQVBoxLayout *lay = new TQVBoxLayout(this, 0, KDialog::spacingHint());
lay->addWidget( new TQLabel( i18n("<p>Allow previews, \"Folder Icons Reflect Contents\", and "
"retrieval of meta-data on protocols:</p>"), this ) );
setQuickHelp( i18n("<h1>Preview Options</h1> Here you can modify the behavior "
"of Konqueror when it shows the files in a folder."
"<h2>The list of protocols:</h2> Check the protocols over which "
"previews should be shown; uncheck those over which they should not. "
"For instance, you might want to show previews over SMB if the local "
"network is fast enough, but you might disable it for FTP if you often "
"visit very slow FTP sites with large images."
"<h2>Maximum File Size:</h2> Select the maximum file size for which "
"previews should be generated. For instance, if set to 10 MB (the default), "
"no preview will be generated for files bigger than 10 MB, for speed reasons."));
// Listview containing checkboxes for all protocols that support listing
KListView *listView = new KListView( this, "listView" );
listView->addColumn( i18n( "Select Protocols" ) );
listView->setFullWidth( true );
TQHBoxLayout *hbox = new TQHBoxLayout( lay );
hbox->addWidget( listView );
hbox->addStretch();
PreviewCheckListItem *localItems = new PreviewCheckListItem( listView,
i18n( "Local Protocols" ) );
PreviewCheckListItem *inetItems = new PreviewCheckListItem( listView,
i18n( "Internet Protocols" ) );
TQStringList protocolList = KProtocolInfo::protocols();
protocolList.sort();
TQStringList::Iterator it = protocolList.begin();
KURL url;
url.setPath("/");
for ( ; it != protocolList.end() ; ++it )
{
url.setProtocol( *it );
if ( KProtocolInfo::supportsListing( url ) )
{
TQCheckListItem *item;
if ( KProtocolInfo::protocolClass( *it ) == ":local" )
item = new PreviewCheckListItem( localItems, ( *it ) );
else
item = new PreviewCheckListItem( inetItems, ( *it ) );
m_items.append( item );
}
}
listView->setOpen( localItems, true );
listView->setOpen( inetItems, true );
TQWhatsThis::add( listView,
i18n("This option makes it possible to choose when the file previews, "
"smart folder icons, and meta-data in the File Manager should be activated.\n"
"In the list of protocols that appear, select which ones are fast "
"enough for you to allow previews to be generated.") );
TQLabel *label = new TQLabel( i18n( "&Maximum file size:" ), this );
lay->addWidget( label );
m_maxSize = new KDoubleNumInput( this );
m_maxSize->setSuffix( i18n(" MB") );
m_maxSize->setRange( 0.02, 10, 0.02, true );
m_maxSize->setPrecision( 1 );
label->setBuddy( m_maxSize );
lay->addWidget( m_maxSize );
connect( m_maxSize, TQT_SIGNAL( valueChanged(double) ), TQT_SLOT( changed() ) );
m_boostSize = new TQCheckBox(i18n("&Increase size of previews relative to icons"), this);
connect( m_boostSize, TQT_SIGNAL( toggled(bool) ), TQT_SLOT( changed() ) );
lay->addWidget(m_boostSize);
m_useFileThumbnails = new TQCheckBox(i18n("&Use thumbnails embedded in files"), this);
connect( m_useFileThumbnails, TQT_SIGNAL( toggled(bool) ), TQT_SLOT( changed() ) );
lay->addWidget(m_useFileThumbnails);
TQWhatsThis::add( m_useFileThumbnails,
i18n("Select this to use thumbnails that are found inside some "
"file types (e.g. JPEG). This will increase speed and reduce "
"disk usage. Deselect it if you have files that have been processed "
"by programs which create inaccurate thumbnails, such as ImageMagick.") );
lay->addWidget( new TQWidget(this), 10 );
load();
}
// Default: 10 MB
#define DEFAULT_MAXSIZE (1024*1024*10)
void KPreviewOptions::load(bool useDefaults)
{
// *** load and apply to GUI ***
KGlobal::config()->setReadDefaults(useDefaults);
KConfigGroup group( KGlobal::config(), "PreviewSettings" );
TQPtrListIterator<TQCheckListItem> it( m_items );
for ( ; it.current() ; ++it ) {
TQString protocol( it.current()->text() );
if ( ( protocol == "file" ) && ( !group.hasKey ( protocol ) ) )
// file should be enabled in case is not defined because if not so
// than preview's lost when size is changed from default one
it.current()->setOn( true );
else
it.current()->setOn( group.readBoolEntry( protocol, false ) );
}
// config key is in bytes (default value 10MB), numinput is in MB
m_maxSize->setValue( ((double)group.readNumEntry( "MaximumSize", DEFAULT_MAXSIZE )) / (1024*1024) );
m_boostSize->setChecked( group.readBoolEntry( "BoostSize", false /*default*/ ) );
m_useFileThumbnails->setChecked( group.readBoolEntry( "UseFileThumbnails", true /*default*/ ) );
KGlobal::config()->setReadDefaults(false);
}
void KPreviewOptions::load()
{
load(false);
}
void KPreviewOptions::defaults()
{
load(true);
}
void KPreviewOptions::save()
{
KConfigGroup group( KGlobal::config(), "PreviewSettings" );
TQPtrListIterator<TQCheckListItem> it( m_items );
for ( ; it.current() ; ++it ) {
TQString protocol( it.current()->text() );
group.writeEntry( protocol, it.current()->isOn(), true, true );
}
// config key is in bytes, numinput is in MB
group.writeEntry( "MaximumSize", tqRound( m_maxSize->value() *1024*1024 ), true, true );
group.writeEntry( "BoostSize", m_boostSize->isChecked(), true, true );
group.writeEntry( "UseFileThumbnails", m_useFileThumbnails->isChecked(), true, true );
group.sync();
// Send signal to konqueror
// Warning. In case something is added/changed here, keep kfmclient in sync
TQByteArray data;
if ( !kapp->dcopClient()->isAttached() )
kapp->dcopClient()->attach();
kapp->dcopClient()->send( "konqueror*", "KonquerorIface", "reparseConfiguration()", data );
}
void KPreviewOptions::changed()
{
emit KCModule::changed(true);
}
#include "previews.moc"