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/konsole/schemaeditor.cpp

709 lines
19 KiB

/***************************************************************************
schemaeditor.cpp - description
-------------------
begin : mar apr 17 16:44:59 CEST 2001
copyright : (C) 2001 by Andrea Rizzi
email : rizzi@kde.org
***************************************************************************/
/***************************************************************************
* *
* This program 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. *
* *
***************************************************************************/
#define TABLE_COLORS 20
#include "schemaeditor.h"
#include "schemaeditor.moc"
#include <dcopclient.h>
#include <tqlabel.h>
#include <tqlineedit.h>
#include <tqwmatrix.h>
#include <tqcombobox.h>
#include <kdebug.h>
#include <tqcheckbox.h>
#include <kstandarddirs.h>
//#include <errno.h>
#include <tqslider.h>
#include <klocale.h>
#include <kfiledialog.h>
#include <kinputdialog.h>
#include <tqtoolbutton.h>
#include <kmessagebox.h>
#include <ksharedpixmap.h>
#include <kimageeffect.h>
#include <tqimage.h>
// SchemaListBoxText is a list box text item with schema filename
class SchemaListBoxText : public TQListBoxText
{
public:
SchemaListBoxText(const TQString &title, const TQString &filename): TQListBoxText(title)
{
m_filename = filename;
};
const TQString filename() { return m_filename; };
private:
TQString m_filename;
};
SchemaEditor::SchemaEditor(TQWidget * parent, const char *name)
:SchemaDialog(parent, name)
{
schMod= false;
loaded = false;
schemaLoaded = false;
change = false;
oldSlot = 0;
oldSchema = -1;
color.resize(20);
type.resize(20);
bold.resize(20);
transparent.resize(20);
defaultSchema = "";
spix = new KSharedPixmap;
connect(spix, TQT_SIGNAL(done(bool)), TQT_SLOT(previewLoaded(bool)));
DCOPClient *client = kapp->dcopClient();
if (!client->isAttached())
client->attach();
TQByteArray data;
TQDataStream args(data, IO_WriteOnly);
args << 1;
client->send("kdesktop", "KBackgroundIface", "setExport(int)", data);
transparencyCheck->setChecked(true);
transparencyCheck->setChecked(false);
KGlobal::locale()->insertCatalogue("konsole"); // For schema translations
connect(imageBrowse, TQT_SIGNAL(clicked()), this, TQT_SLOT(imageSelect()));
connect(saveButton, TQT_SIGNAL(clicked()), this, TQT_SLOT(saveCurrent()));
connect(removeButton, TQT_SIGNAL(clicked()), this, TQT_SLOT(removeCurrent()));
connect(colorCombo, TQT_SIGNAL(activated(int)), this, TQT_SLOT(slotColorChanged(int)));
connect(typeCombo, TQT_SIGNAL(activated(int)), this, TQT_SLOT(slotTypeChanged(int)));
connect(schemaList, TQT_SIGNAL(highlighted(int)), this, TQT_SLOT(readSchema(int)));
connect(shadeColor, TQT_SIGNAL(changed(const TQColor&)), this, TQT_SLOT(updatePreview()));
connect(shadeSlide, TQT_SIGNAL(valueChanged(int)), this, TQT_SLOT(updatePreview()));
connect(transparencyCheck, TQT_SIGNAL(toggled(bool)), this, TQT_SLOT(updatePreview()));
connect(backgndLine, TQT_SIGNAL(returnPressed()), this, TQT_SLOT(updatePreview()));
connect(titleLine, TQT_SIGNAL(textChanged(const TQString&)), this, TQT_SLOT(schemaModified()));
connect(shadeColor, TQT_SIGNAL(changed(const TQColor&)), this, TQT_SLOT(schemaModified()));
connect(shadeSlide, TQT_SIGNAL(valueChanged(int)), this, TQT_SLOT(schemaModified()));
connect(transparencyCheck, TQT_SIGNAL(toggled(bool)), this, TQT_SLOT(schemaModified()));
connect(modeCombo, TQT_SIGNAL(activated(int)), this, TQT_SLOT(schemaModified()));
connect(backgndLine, TQT_SIGNAL(returnPressed()), this, TQT_SLOT(schemaModified()));
connect(transparentCheck, TQT_SIGNAL(toggled(bool)), this, TQT_SLOT(schemaModified()));
connect(boldCheck, TQT_SIGNAL(toggled(bool)), this, TQT_SLOT(schemaModified()));
connect(colorButton, TQT_SIGNAL(changed(const TQColor&)), this, TQT_SLOT(schemaModified()));
connect(backgndLine, TQT_SIGNAL(textChanged(const TQString&)), this, TQT_SLOT(schemaModified()));
connect(defaultSchemaCB, TQT_SIGNAL(toggled(bool)), this, TQT_SIGNAL(changed()));
removeButton->setEnabled( schemaList->currentItem() );
}
TQString SchemaEditor::schema()
{
TQString filename = defaultSchema;
int i = schemaList->currentItem();
if (defaultSchemaCB->isChecked() && i>=0)
filename = ((SchemaListBoxText *) schemaList->item(i))->filename();
return filename.section('/',-1);
}
void SchemaEditor::setSchema(TQString sch)
{
defaultSchema = sch;
sch = locate("data", "konsole/"+sch);
int sc = -1;
for (int i = 0; i < (int) schemaList->count(); i++)
if (sch == ((SchemaListBoxText *) schemaList->item(i))->filename())
sc = i;
oldSchema = sc;
if (sc == -1)
sc = 0;
schemaList->setCurrentItem(sc);
// readSchema(sc);
}
SchemaEditor::~SchemaEditor()
{
delete spix;
}
void SchemaEditor::updatePreview()
{
if (transparencyCheck->isChecked()) {
if (loaded) {
float rx = (100.0 - shadeSlide->value()) / 100;
TQImage ima(pix.convertToImage());
ima = KImageEffect::fade(ima, rx, shadeColor->color());
TQPixmap pm;
pm.convertFromImage(ima);
previewPixmap->setPixmap(pm);
previewPixmap->setScaledContents(true);
}
else //try to reload
{
if(!spix->loadFromShared(TQString("DESKTOP1")))
kdDebug(0) << "cannot load" << endl;
}
} else {
TQPixmap pm;
pm.load(backgndLine->text());
if ( pm.isNull() ) {
previewPixmap->clear();
} else {
previewPixmap->setPixmap(pm);
previewPixmap->setScaledContents(true);
}
}
}
void SchemaEditor::previewLoaded(bool l)
{
if (l) {
TQWMatrix mat;
pix =
spix->xForm(mat.
scale(180.0 / spix->TQPixmap::width(),
100.0 / spix->TQPixmap::height()));
kdDebug(0) << "Loaded" << endl;
loaded = true;
if (transparencyCheck->isChecked()) {
updatePreview();
}
} else
kdDebug(0) << "error loading" << endl;
}
void SchemaEditor::getList()
{
if (! schemaLoaded) {
loadAllSchema();
setSchema(defaultSchema);
schemaLoaded = true;
change = true;
}
}
void SchemaEditor::show()
{
getList();
SchemaDialog::show();
}
void SchemaEditor::loadAllSchema(TQString currentFile)
{
TQStringList list = KGlobal::dirs()->findAllResources("data", "konsole/*.schema");
TQStringList::ConstIterator it;
disconnect(schemaList, TQT_SIGNAL(highlighted(int)), this, TQT_SLOT(readSchema(int)));
schemaList->clear();
TQListBoxItem* currentItem = 0;
for (it = list.begin(); it != list.end(); ++it) {
TQString name = (*it);
TQString title = readSchemaTitle(name);
// Only insert new items so that local items override global
if (schemaList->findItem(title, ExactMatch) == 0) {
if (title.isNull() || title.isEmpty())
title=i18n("untitled");
schemaList->insertItem(new SchemaListBoxText(title, name));
if (currentFile==name.section('/',-1))
currentItem = schemaList->item( schemaList->count()-1 );
}
}
schemaList->sort();
schemaList->setCurrentItem(0); // select the first added item correctly too
schemaList->setCurrentItem(currentItem);
connect(schemaList, TQT_SIGNAL(highlighted(int)), this, TQT_SLOT(readSchema(int)));
schemaListChanged();
}
void SchemaEditor::imageSelect()
{
TQString start;
start = backgndLine->text();
if (start.isEmpty())
{
TQStringList list=KGlobal::dirs()->resourceDirs("wallpaper");
if(list.count()>0)
start= list.last();
}
KURL url = KFileDialog::getImageOpenURL(start, 0, i18n("Select Background Image"));
// KURL url=KFileDialog::getOpenURL(start,"",0,i18n("Select Background Image"));
if(!url.path().isEmpty())
{
backgndLine->setText(url.path());
updatePreview();
}
}
void SchemaEditor::slotTypeChanged(int slot)
{
schemaModified();
bool active = slot == 0 || slot == 3;
colorButton->setEnabled(active);
boldCheck->setEnabled(active);
transparentCheck->setEnabled(active);
}
void SchemaEditor::slotColorChanged(int slot)
{
kdDebug(0) << slot << endl;
color[oldSlot] = colorButton->color();
type[oldSlot] = typeCombo->currentItem();
bold[oldSlot] = boldCheck->isChecked();
transparent[oldSlot] = transparentCheck->isChecked();
change = false; // Don't mark as modified
transparentCheck->setChecked(transparent[slot]);
boldCheck->setChecked(bold[slot]);
typeCombo->setCurrentItem(type[slot]);
colorButton->setColor(color[slot]);
oldSlot = slot;
change = true;
}
void SchemaEditor::removeCurrent()
{
int i = schemaList->currentItem();
if(i==-1)
return;
TQString base = ((SchemaListBoxText *) schemaList->item(i))->filename();
// Query if system schemas should be removed
if (locateLocal("data", "konsole/" + base.section('/', -1)) != base) {
int code = KMessageBox::warningContinueCancel(this,
i18n("You are trying to remove a system schema. Are you sure?"),
i18n("Removing System Schema"),
KGuiItem(i18n("&Delete"), "editdelete"));
if (code != KMessageBox::Continue)
return;
}
TQString base_filename = base.section('/',-1);
if(base_filename==schema())
setSchema("");
if (!TQFile::remove(base))
KMessageBox::error(this,
i18n("Cannot remove the schema.\nMaybe it is a system schema.\n"),
i18n("Error Removing Schema"));
loadAllSchema();
setSchema(defaultSchema);
}
void SchemaEditor::saveCurrent()
{
//This is to update the color table
colorCombo->setCurrentItem(0);
slotColorChanged(0);
TQString fullpath;
if (schemaList->currentText() == titleLine->text()) {
int i = schemaList->currentItem();
fullpath = ((SchemaListBoxText *) schemaList->item(i))->filename().section('/',-1);
}
else {
// Only ask for a name for changed titleLine, considered a "save as"
fullpath = titleLine->text().stripWhiteSpace().simplifyWhiteSpace()+".schema";
bool ok;
fullpath = KInputDialog::getText( i18n( "Save Schema" ),
i18n( "File name:" ), fullpath, &ok, this );
if (!ok) return;
}
if (fullpath[0] != '/')
fullpath = KGlobal::dirs()->saveLocation("data", "konsole/") + fullpath;
TQFile f(fullpath);
if (f.open(IO_WriteOnly)) {
TQTextStream t(&f);
t.setEncoding( TQTextStream::UnicodeUTF8 );
t << "# schema for konsole autogenerated with the schema editor" << endl;
t << endl;
t << "title " << titleLine->text() << endl; // Use title line as schema title
t << endl;
if (transparencyCheck->isChecked()) {
TQColor c = shadeColor->color();
TQString tra;
tra.sprintf("transparency %1.2f %3d %3d %3d",
1.0 * (100 - shadeSlide->value()) / 100, c.red(), c.green(), c.blue());
t << tra << endl;
}
if (!backgndLine->text().isEmpty()) {
TQString smode;
int mode;
mode = modeCombo->currentItem();
if (mode == 0)
smode = "tile";
if (mode == 1)
smode = "center";
if (mode == 2)
smode = "full";
TQString image;
image.sprintf("image %s %s",
(const char *) smode.latin1(),
(const char *) backgndLine->text().utf8());
t << image << endl;
}
t << endl;
t << "# foreground colors" << endl;
t << endl;
t << "# note that the default background color is flagged" << endl;
t << "# to become transparent when an image is present." << endl;
t << endl;
t << "# slot transparent bold" << endl;
t << "# | red grn blu | |" << endl;
t << "# V V--color--V V V" << endl;
for (int i = 0; i < 20; i++) {
TQString scol;
if (type[i] == 0)
scol.sprintf("color %2d %3d %3d %3d %2d %1d # %s", i,
color[i].red(), color[i].green(), color[i].blue(),
transparent[i], bold[i],
(const char *) colorCombo->text(i).utf8());
else if (type[i] == 1)
scol.sprintf("sysfg %2d %2d %1d # %s", i,
transparent[i], bold[i],
(const char *) colorCombo->text(i).utf8());
else if (type[i] == 2)
scol.sprintf("sysbg %2d %2d %1d # %s", i,
transparent[i], bold[i],
(const char *) colorCombo->text(i).utf8());
else {
int ch, cs, cv;
color[i].hsv(&ch, &cs, &cv);
scol.sprintf("rcolor %1d %3d %3d %2d %1d # %s", i,
cs, cv, transparent[i], bold[i],
(const char *) colorCombo->text(i).utf8());
}
t << scol << endl;
}
f.close();
} else
KMessageBox::error(this, i18n("Cannot save the schema.\nMaybe permission denied.\n"),
i18n("Error Saving Schema"));
schMod=false;
loadAllSchema(fullpath.section('/',-1));
}
void SchemaEditor::schemaModified()
{
if (change) {
saveButton->setEnabled(titleLine->text().length() != 0);
schMod=true;
emit changed();
}
}
TQString SchemaEditor::readSchemaTitle(const TQString & file)
{
/*
Code taken from konsole/konsole/schema.cpp
*/
TQString fPath = locate("data", "konsole/" + file);
if (fPath.isNull())
fPath = locate("data", file);
if (fPath.isNull())
return 0;
FILE *sysin = fopen(TQFile::encodeName(fPath), "r");
if (!sysin)
return 0;
char line[100];
while (fscanf(sysin, "%80[^\n]\n", line) > 0)
if (strlen(line) > 5)
if (!strncmp(line, "title", 5)) {
fclose(sysin);
return i18n(line + 6);
}
return 0;
}
void SchemaEditor::schemaListChanged()
{
TQStringList titles, filenames;
SchemaListBoxText *item;
for (int index = 0; index < (int) schemaList->count(); index++) {
item = (SchemaListBoxText *) schemaList->item(index);
titles.append(item->text());
filenames.append(item->filename().section('/', -1));
}
emit schemaListChanged(titles, filenames);
}
void SchemaEditor::querySave()
{
int result = KMessageBox::questionYesNo(this,
i18n("The schema has been modified.\n"
"Do you want to save the changes?"),
i18n("Schema Modified"),
KStdGuiItem::save(),
KStdGuiItem::discard());
if (result == KMessageBox::Yes)
{
saveCurrent();
}
}
void SchemaEditor::readSchema(int num)
{
/*
Code taken from konsole/konsole/schema.cpp
*/
if (oldSchema != -1) {
if (defaultSchemaCB->isChecked()) {
defaultSchema = ((SchemaListBoxText *) schemaList->item(oldSchema))->filename();
}
if(schMod) {
disconnect(schemaList, TQT_SIGNAL(highlighted(int)), this, TQT_SLOT(readSchema(int)));
schemaList->setCurrentItem(oldSchema);
querySave();
schemaList->setCurrentItem(num);
connect(schemaList, TQT_SIGNAL(highlighted(int)), this, TQT_SLOT(readSchema(int)));
schMod=false;
}
}
TQString fPath = locate("data", "konsole/" +
((SchemaListBoxText *) schemaList->item(num))->filename());
if (fPath.isNull())
fPath = locate("data",
((SchemaListBoxText *) schemaList->item(num))->filename());
if (fPath.isNull()) {
KMessageBox::error(this, i18n("Cannot find the schema."),
i18n("Error Loading Schema"));
return;
}
removeButton->setEnabled( TQFileInfo (fPath).isWritable () );
defaultSchemaCB->setChecked(fPath.section('/',-1) == defaultSchema.section('/',-1));
FILE *sysin = fopen(TQFile::encodeName(fPath), "r");
if (!sysin) {
KMessageBox::error(this, i18n("Cannot load the schema."),
i18n("Error Loading Schema"));
loadAllSchema();
return;
}
char line[100];
titleLine->setText(i18n("untitled"));
transparencyCheck->setChecked(false);
backgndLine->setText("");
while (fscanf(sysin, "%80[^\n]\n", line) > 0) {
if (strlen(line) > 5) {
if (!strncmp(line, "title", 5)) {
titleLine->setText(i18n(line + 6));
}
if (!strncmp(line, "image", 5)) {
char rend[100], path[100];
int attr = 1;
if (sscanf(line, "image %s %s", rend, path) != 2)
continue;
if (!strcmp(rend, "tile"))
attr = 2;
else if (!strcmp(rend, "center"))
attr = 3;
else if (!strcmp(rend, "full"))
attr = 4;
else
continue;
TQString qline(line);
backgndLine->setText(locate("wallpaper", qline.mid( qline.find(" ",7)+1 ) ));
modeCombo->setCurrentItem(attr - 2);
}
if (!strncmp(line, "transparency", 12)) {
float rx;
int rr, rg, rb;
// Transparency needs 4 parameters: fade strength and the 3
// components of the fade color.
if (sscanf(line, "transparency %g %d %d %d", &rx, &rr, &rg, &rb) != 4)
continue;
transparencyCheck->setChecked(true);
shadeSlide->setValue((int)(100 - rx * 100));
shadeColor->setColor(TQColor(rr, rg, rb));
}
if (!strncmp(line,"rcolor",6)) {
int fi,ch,cs,cv,tr,bo;
if(sscanf(line,"rcolor %d %d %d %d %d",&fi,&cs,&cv,&tr,&bo) != 5)
continue;
if (!(0 <= fi && fi <= TABLE_COLORS))
continue;
ch = 0; // Random hue - set to zero
if (!(0 <= cs && cs <= 255 ))
continue;
if (!(0 <= cv && cv <= 255 ))
continue;
if (!(0 <= tr && tr <= 1 ))
continue;
if (!(0 <= bo && bo <= 1 ))
continue;
color[fi] = TQColor();
color[fi].setHsv(ch,cs,cv);
transparent[fi] = tr;
bold[fi] = bo;
type[fi] = 3;
}
if (!strncmp(line, "color", 5)) {
int fi, cr, cg, cb, tr, bo;
if (sscanf(line, "color %d %d %d %d %d %d", &fi, &cr, &cg, &cb, &tr, &bo) != 6)
continue;
if (!(0 <= fi && fi <= TABLE_COLORS))
continue;
if (!(0 <= cr && cr <= 255))
continue;
if (!(0 <= cg && cg <= 255))
continue;
if (!(0 <= cb && cb <= 255))
continue;
if (!(0 <= tr && tr <= 1))
continue;
if (!(0 <= bo && bo <= 1))
continue;
color[fi] = TQColor(cr, cg, cb);
transparent[fi] = tr;
bold[fi] = bo;
type[fi] = 0;
}
if (!strncmp(line, "sysfg", 5)) {
int fi, tr, bo;
if (sscanf(line, "sysfg %d %d %d", &fi, &tr, &bo) != 3)
continue;
if (!(0 <= fi && fi <= TABLE_COLORS))
continue;
if (!(0 <= tr && tr <= 1))
continue;
if (!(0 <= bo && bo <= 1))
continue;
color[fi] = kapp->tqpalette().active().text();
transparent[fi] = tr;
bold[fi] = bo;
type[fi] = 1;
}
if (!strncmp(line, "sysbg", 5)) {
int fi, tr, bo;
if (sscanf(line, "sysbg %d %d %d", &fi, &tr, &bo) != 3)
continue;
if (!(0 <= fi && fi <= TABLE_COLORS))
continue;
if (!(0 <= tr && tr <= 1))
continue;
if (!(0 <= bo && bo <= 1))
continue;
color[fi] = kapp->tqpalette().active().base();
transparent[fi] = tr;
bold[fi] = bo;
type[fi] = 2;
}
}
}
fclose(sysin);
int ii = colorCombo->currentItem();
transparentCheck->setChecked(transparent[ii]);
boldCheck->setChecked(bold[ii]);
typeCombo->setCurrentItem(type[ii]);
colorButton->setColor(color[ii]);
bool inactive = type[ii] == 1 || type[ii] == 2;
boldCheck->setDisabled(inactive);
transparentCheck->setDisabled(inactive);
colorButton->setDisabled(inactive);
oldSchema = num;
updatePreview();
schMod=false;
return;
}