diff options
Diffstat (limited to 'tdeconf_update')
| -rw-r--r-- | tdeconf_update/CMakeLists.txt | 34 | ||||
| -rw-r--r-- | tdeconf_update/Mainpage.dox | 31 | ||||
| -rw-r--r-- | tdeconf_update/Makefile.am | 33 | ||||
| -rw-r--r-- | tdeconf_update/README.tdeconf_update | 251 | ||||
| -rw-r--r-- | tdeconf_update/tdeconf_update.cpp | 959 |
5 files changed, 1308 insertions, 0 deletions
diff --git a/tdeconf_update/CMakeLists.txt b/tdeconf_update/CMakeLists.txt new file mode 100644 index 000000000..fffb66e80 --- /dev/null +++ b/tdeconf_update/CMakeLists.txt @@ -0,0 +1,34 @@ +################################################# +# +# (C) 2010 Serghei Amelian +# serghei (DOT) amelian (AT) gmail.com +# +# Improvements and feedback are welcome +# +# This file is released under GPL >= 2 +# +################################################# + +include_directories( + ${TQT_INCLUDE_DIRS} + ${CMAKE_BINARY_DIR}/tdecore + ${CMAKE_SOURCE_DIR}/tdecore +) + +link_directories( + ${TQT_LIBRARY_DIRS} +) + + +##### tdeconf_update ############################## + +set( target tdeconf_update ) + +set( ${target}_SRCS + tdeconf_update.cpp +) + +tde_add_tdeinit_executable( ${target} AUTOMOC + SOURCES ${${target}_SRCS} + LINK tdecore-shared +) diff --git a/tdeconf_update/Mainpage.dox b/tdeconf_update/Mainpage.dox new file mode 100644 index 000000000..2557fe1c0 --- /dev/null +++ b/tdeconf_update/Mainpage.dox @@ -0,0 +1,31 @@ +/** @mainpage ./tdeconf_update + +tdeconf_update is a tool designed to update config files. Over time applications +sometimes need to rearrange the way configuration options are stored. Since +such an update shouldn't influence the configuration options that the user +has selected, the application must take care that the options stored in the +old way will still be honored. + +What used to happen is that the application looks up both the old and the +new configuration option and then decides which one to use. This method has +several drawbacks: +- The application may need to read more configuration files than strictly + needed, resulting in a slower startup. +- The application becomes bigger with code that will only be used once. + +tdeconf_update addresses these problems by offering a framework to update +configuration files without adding code to the application itself. + +See the README file for more information. + +@authors +Waldo Bastian \<bastian@kde.org\> + +@maintainers +[Unknown/None] + +@licenses +@lgpl + +*/ +// vim:ts=4:sw=4:expandtab:filetype=doxygen diff --git a/tdeconf_update/Makefile.am b/tdeconf_update/Makefile.am new file mode 100644 index 000000000..9041aad8a --- /dev/null +++ b/tdeconf_update/Makefile.am @@ -0,0 +1,33 @@ +# This file is part of the KDE libraries +# Copyright (C) 2001 Waldo Bastian <bastian@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 as published by the Free Software Foundation; either +# version 2 of the License, or (at your option) any later version. + +# 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. + +INCLUDES= -I../kded $(all_includes) + +bin_PROGRAMS = +lib_LTLIBRARIES = +tdeinit_LTLIBRARIES = tdeconf_update.la + +tdeconf_update_la_SOURCES = tdeconf_update.cpp +tdeconf_update_la_LIBADD = $(LIB_TDECORE) $(LIB_QT) +tdeconf_update_la_LDFLAGS = $(all_libraries) -module -avoid-version + +METASOURCES = AUTO + +# Internal +# noinst_HEADERS = tdeconf_update.h + diff --git a/tdeconf_update/README.tdeconf_update b/tdeconf_update/README.tdeconf_update new file mode 100644 index 000000000..340f71eaa --- /dev/null +++ b/tdeconf_update/README.tdeconf_update @@ -0,0 +1,251 @@ +README tdeconf_update + +Version: 1.1 +Author: Waldo Bastian <bastian@kde.org>, <bastian@suse.com> + +What it does +============ + +tdeconf_update is a tool designed to update config files. Over time applications +sometimes need to rearrange the way configuration options are stored. Since +such an update shouldn't influence the configuration options that the user +has selected, the application must take care that the options stored in the +old way will still be honored. + +What used to happen is that the application looks up both the old and the +new configuration option and then decides which one to use. This method has +several drawbacks: +* The application may need to read more configuration files than strictly +needed, resulting in a slower startup. +* The application becomes bigger with code that will only be used once. + +tdeconf_update addresses these problems by offering a framework to update +configuration files without adding code to the application itself. + + +How it works +============ + +Applications can install so called "update files" under +$TDEDIR/share/apps/tdeconf_update. An update file has ".upd" as extension and +contains instructions for transferring/converting configuration information +from one place to another. + +Updating the configuration happens automatically, either when KDE gets started +or when kded detects a new update file in the above mentioned location. + +Update files are separated into sections. Each section has an Id. When a +section describing a configuration change has been applied, the Id will be +stored in the file "tdeconf_updaterc". This information is used to make sure +that a configuration update is only performed once. + +If you overwrite an existing update file with a new version that contains a +new section, only the update instructions from this extra section will be +performed. + +File format of the update file +============================== + +Empty lines or lines that start with '#' are considered comments. +Commas (,) are used to seperate fields and may not occur as part +of any field and all of the keywords are case-sensitive, i.e. you +cannot say "key" instead of "Key" for example. + +For the rest the file is parsed and executed sequentially from top to bottom. +Each line can contain one entry. The following entries are recognized: + + +Id=<id> + +With <id> identifying the group of update entries that follows. Once a group +of entries have been applied, their <id> is stored and this group of entries +will not be applied again. + + +File=<oldfile>,<newfile> +File=<oldfile> + +Specifies that configuration information is read from <oldfile> and written +to <newfile>. If you only specify <oldfile>, the information is read from +as well as written to <oldfile>. + +Script=<script>[,<interpreter>] + +All entries from <oldfile> are piped into <script>. The output of script +is used as new entries for <newfile>. Existing entries can be deleted by +adding lines with "# DELETE [group]key" in the output of the script. +To delete a whole group use "# DELETEGROUP [group]". + +<script> should be installed into $(kde_datadir)/tdeconf_update, or +tdeconf_update will not be able to find it. It is not portable to install +binary applications in $kde_datadir, so you have to stick with interpreted +scripts like sh or perl scripts. From KDE 3.2 onwards it's also possible +to install tdeconf_update applications in $(kde_bindir)/tdeconf_update_bin, +which opens the door to tdeconf_update applications that are written in C++ +and use Qt's powerful string API instead. + +A workaround for KDE 3.1.x and older is to install a .sh script in +$(kde_datadir) that contains a simple exec: + + exec "`tde-config --prefix`/bin/tdeconf_update_bin/my_update_app" + +This is equivalent to what KDE 3.2 can do directly, but of course the .upd +file now points to the .sh script instead of the binary application. + +If Script was issued after a "Group" command the behavior is slightly +different: +All entries from <oldfile>/<oldgroup> are piped into <script>. The output +of script is used as new entries for <newfile>/<newgroup>, unless a different +group is specified with "[group]". Existing entries can be deleted from +<oldgroup> by adding lines with "# DELETE key" in the output of the script. +To delete <oldgroup> use "# DELETEGROUP". + +<interpreter> can be something like "perl". + +Since KDE 3.3 it is also possible to have a Script without specifying +<oldfile> or <newfile>. In that case the script is run but it will not be +fed any input and its output will simply be discarded. + +ScriptArguments=<arguments> + +If specified, the arguments will be passed to <script>. +IMPORTANT: It has to be specified before Script=. + +Group=<oldgroup>,<newgroup> +Group=<oldgroup> + +Specifies that configuration information is read from the group <oldgroup> +and written to <newgroup>. If you only specify <oldgroup>, the information +is read from as well as written to <oldgroup>. You can use <default> to +specify keys that are not under any group. + +RemoveGroup=<oldgroup> + +Specifies that <oldgroup> is removed entirely. This can be used +to remove obsolete entries or to force a revert to default values. + +Options=<option1>, <option2>, .... + +With this entry you can specify options that apply to the next "Script", +"Key" or "AllKeys" entry (only to the first!). Possible options are: + +- "copy" Copy the configuration item instead of moving it. This means that + the configuration item will not be deleted from <oldfile>/<oldgroup>. + +- "overwrite" Normally, a configuration item is not moved if an item with the + new name already exists. When this option is specified the old + configuration item will overwrite any existing item. + + +Key=<oldkey>,<newkey> +Key=<oldkey> + +Specifies that configuration information is read from the key <oldkey> +and written to <newkey>. If you only specify <oldkey>, the information +is read from as well as written to <oldkey>. + + +AllKeys + +Specifies that all configuration information in the selected group should +be moved (All keys). + +AllGroups + +Specifies that all configuration information from all keys in ALL +groups should be moved. + + +RemoveKey=<oldkey> + +Specifies that <oldkey> is removed from the selected group. This can be used +to remove obsolete entries or to force a revert to default values. + + +Example update file +=================== + +# This is comment +Id=kde2.2 +File=tdeioslaverc,kio_httprc +Group=Proxy Settings +Key=NoProxyFor +Key=UseProxy +Key=httpProxy,Proxy +Group=Cache Settings,Cache +Key=MaxCacheSize +Key=UseCache +Group=UserAgent +AllKeys +RemoveGroup=KDE +# End of file + + +The above update file extracts config information from the file "tdeioslaverc" +and stores it into the file "kio_httprc". + +It reads the keys "NoProxyFor", "UseProxy" and "httpProxy" from the group +"Proxy Settings" in the "tdeioslaverc" file. If any of these options are present +they are written to the keys "NoProxyFor", "UseProxy" and "Proxy" (!) in +the group "Proxy Settings" in the "kio_httprc" file. + +It also reads the keys "MaxCacheSize" and "UseCache" from the group +"Cache Settings" in the "tdeioslaverc" file and writes this information to the +keys "MaxCacheSize" and "UseCache" in the group "Cache" (!) in the +"kio_httprc" file. + +Then it takes all keys in the "UserAgent" group of the file "tdeioslaverc" +and moves then to the "UserAgent" group in the "kio_httprc" file. + +Finally it removes the entire "KDE" group in the tdeioslaverc file. + + +Debugging and testing +===================== + +If you are developing a tdeconf_update script and want to test or debug it you +need to make sure tdeconf_update runs again after each of your changes. There +are a number of ways to achieve this. + +The easiest is to not install the tdeconf_update script in the first place, but +manually call it through a pipe. If you want to test the update script for +your application KHello's config file khellorc, you can test by using + + cat ~/.trinity/share/config/khellorc | khello_conf_update.sh + +(assuming khello_conf_update.sh is the tdeconf_update script and ~/.trinity is your +$TDEHOME). This is easier than making install every time, but has the obvious +downside that you need to 'parse' your script's output yourself instead of +letting tdeconf_update do it and check the resulting output file. + +After 'make install' the tdeconf_update script is run by kded, but it does so +only once. This is of course the idea behind it, but while developing it can +be a problem. You can increase the revision number for each subsequent run +of 'make install' to force a new tdeconf_update run, but there's a better +approach that doesn't skyrocket the version number for a mediocre debug +session. + +kded doesn't really ignore scripts that it has already run right away. +Instead it checks the affected config file every time a .upd file is added +or changed. The reason it still doesn't run again on your config file lies +in the traces tdeconf_update leaves behind: it adds a special config group +'[$Version]' with a key 'update_info'. This key lists all tdeconf_update +scripts that have already been run on this config file. Just remove your +file's entry, 'make install', and tdeconf_update will happily run your script +again, without you having to increase the version number. + +If you want to know what tdeconf_update has been up to lately, have a look +at $TDEHOME/share/apps/tdeconf_update/update.log + + +Common Problems +=============== + +* tdeconf_update refuses to update an entry +If you change the value of an entry without changing the key or file, +make sure to tell tdeconf_update that it should overwrite the old entry +by adding "Options=overwrite". + + +Have fun, +Waldo diff --git a/tdeconf_update/tdeconf_update.cpp b/tdeconf_update/tdeconf_update.cpp new file mode 100644 index 000000000..206711274 --- /dev/null +++ b/tdeconf_update/tdeconf_update.cpp @@ -0,0 +1,959 @@ +/* + * + * This file is part of the KDE libraries + * Copyright (c) 2001 Waldo Bastian <bastian@kde.org> + * + * $Id$ + * + * 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. + **/ + +#include <sys/types.h> +#include <sys/stat.h> +#include <unistd.h> +#include <stdlib.h> + +#include <tqfile.h> +#include <tqtextstream.h> + +#include <tdeconfig.h> +#include <ksimpleconfig.h> +#include <klocale.h> +#include <kcmdlineargs.h> +#include <kglobal.h> +#include <kstandarddirs.h> +#include <kaboutdata.h> +#include <kinstance.h> +#include <ktempfile.h> + +static KCmdLineOptions options[] = +{ + { "debug", I18N_NOOP("Keep output results from scripts"), 0 }, + { "check <update-file>", I18N_NOOP("Check whether config file itself requires updating"), 0 }, + { "+[file]", I18N_NOOP("File to read update instructions from"), 0 }, + KCmdLineLastOption +}; + +class KonfUpdate +{ +public: + KonfUpdate(); + ~KonfUpdate(); + TQStringList findUpdateFiles(bool dirtyOnly); + + TQTextStream &log(); + + bool checkFile(const TQString &filename); + void checkGotFile(const TQString &_file, const TQString &id); + + bool updateFile(const TQString &filename); + + void gotId(const TQString &_id); + void gotFile(const TQString &_file); + void gotGroup(const TQString &_group); + void gotRemoveGroup(const TQString &_group); + void gotKey(const TQString &_key); + void gotRemoveKey(const TQString &_key); + void gotAllKeys(); + void gotAllGroups(); + void gotOptions(const TQString &_options); + void gotScript(const TQString &_script); + void gotScriptArguments(const TQString &_arguments); + void resetOptions(); + + void copyGroup(TDEConfigBase *cfg1, const TQString &grp1, + TDEConfigBase *cfg2, const TQString &grp2); + +protected: + TDEConfig *config; + TQString currentFilename; + bool skip; + bool debug; + TQString id; + + TQString oldFile; + TQString newFile; + TQString newFileName; + TDEConfig *oldConfig1; // Config to read keys from. + TDEConfig *oldConfig2; // Config to delete keys from. + TDEConfig *newConfig; + + TQString oldGroup; + TQString newGroup; + TQString oldKey; + TQString newKey; + + bool m_bCopy; + bool m_bOverwrite; + bool m_bUseConfigInfo; + TQString m_arguments; + TQTextStream *m_textStream; + TQFile *m_file; + TQString m_line; + int m_lineCount; +}; + +KonfUpdate::KonfUpdate() + : m_textStream(0), m_file(0) +{ + bool updateAll = false; + oldConfig1 = 0; + oldConfig2 = 0; + newConfig = 0; + + config = new TDEConfig("tdeconf_updaterc"); + + TQStringList updateFiles; + TDECmdLineArgs *args=TDECmdLineArgs::parsedArgs(); + + debug = args->isSet("debug"); + + m_bUseConfigInfo = false; + if (args->isSet("check")) + { + m_bUseConfigInfo = true; + TQString file = locate("data", "tdeconf_update/"+TQFile::decodeName(args->getOption("check"))); + if (file.isEmpty()) + { + tqWarning("File '%s' not found.", args->getOption("check").data()); + log() << "File '" << TQFile::decodeName(args->getOption("check")) << "' passed on command line not found" << endl; + return; + } + updateFiles.append(file); + } + else if (args->count()) + { + for(int i = 0; i < args->count(); i++) + { + KURL url = args->url(i); + if (!url.isLocalFile()) + TDECmdLineArgs::usage(i18n("Only local files are supported.")); + updateFiles.append(url.path()); + } + } + else + { + if (config->readBoolEntry("autoUpdateDisabled", false)) + return; + updateFiles = findUpdateFiles(true); + updateAll = true; + } + + for(TQStringList::ConstIterator it = updateFiles.begin(); + it != updateFiles.end(); + ++it) + { + TQString file = *it; + updateFile(file); + } + + config->setGroup(TQString::null); + if (updateAll && !config->readBoolEntry("updateInfoAdded", false)) + { + config->writeEntry("updateInfoAdded", true); + updateFiles = findUpdateFiles(false); + + for(TQStringList::ConstIterator it = updateFiles.begin(); + it != updateFiles.end(); + ++it) + { + TQString file = *it; + checkFile(file); + } + updateFiles.clear(); + } +} + +KonfUpdate::~KonfUpdate() +{ + delete config; + delete m_file; + delete m_textStream; +} + +TQTextStream & +KonfUpdate::log() +{ + if (!m_textStream) + { + TQString file = locateLocal("data", "tdeconf_update/log/update.log"); + m_file = new TQFile(file); + if (m_file->open(IO_WriteOnly | IO_Append)) + { + m_textStream = new TQTextStream(m_file); + } + else + { + // Error + m_textStream = new TQTextStream(stderr, IO_WriteOnly); + } + } + + (*m_textStream) << TQDateTime::currentDateTime().toString( Qt::ISODate ) << " "; + + return *m_textStream; +} + +TQStringList KonfUpdate::findUpdateFiles(bool dirtyOnly) +{ + TQStringList result; + TQStringList list = TDEGlobal::dirs()->findAllResources("data", "tdeconf_update/*.upd", false, true); + for(TQStringList::ConstIterator it = list.begin(); + it != list.end(); + ++it) + { + TQString file = *it; + struct stat buff; + if (stat( TQFile::encodeName(file), &buff) == 0) + { + int i = file.findRev('/'); + if (i != -1) + file = file.mid(i+1); + config->setGroup(file); + time_t ctime = config->readUnsignedLongNumEntry("ctime"); + time_t mtime = config->readUnsignedLongNumEntry("mtime"); + if (!dirtyOnly || + (ctime != buff.st_ctime) || (mtime != buff.st_mtime)) + { + result.append(*it); + } + } + } + return result; +} + +bool KonfUpdate::checkFile(const TQString &filename) +{ + currentFilename = filename; + int i = currentFilename.findRev('/'); + if (i != -1) + currentFilename = currentFilename.mid(i+1); + skip = true; + TQFile file(filename); + if (!file.open(IO_ReadOnly)) + return false; + + TQTextStream ts(&file); + ts.setEncoding(TQTextStream::Latin1); + int lineCount = 0; + resetOptions(); + TQString id; + while(!ts.atEnd()) + { + TQString line = ts.readLine().stripWhiteSpace(); + lineCount++; + if (line.isEmpty() || (line[0] == '#')) + continue; + if (line.startsWith("Id=")) + id = currentFilename+":"+line.mid(3); + else if (line.startsWith("File=")) + checkGotFile(line.mid(5), id); + } + + return true; +} + +void KonfUpdate::checkGotFile(const TQString &_file, const TQString &id) +{ + TQString file; + int i = _file.find(','); + if (i == -1) + { + file = _file.stripWhiteSpace(); + } + else + { + file = _file.mid(i+1).stripWhiteSpace(); + } + +// tqDebug("File %s, id %s", file.latin1(), id.latin1()); + + KSimpleConfig cfg(file); + cfg.setGroup("$Version"); + TQStringList ids = cfg.readListEntry("update_info"); + if (ids.contains(id)) + return; + ids.append(id); + cfg.writeEntry("update_info", ids); +} + +/** + * Syntax: + * # Comment + * Id=id + * File=oldfile[,newfile] + * AllGroups + * Group=oldgroup[,newgroup] + * RemoveGroup=oldgroup + * Options=[copy,][overwrite,] + * Key=oldkey[,newkey] + * RemoveKey=ldkey + * AllKeys + * Keys= [Options](AllKeys|(Key|RemoveKey)*) + * ScriptArguments=arguments + * Script=scriptfile[,interpreter] + * + * Sequence: + * (Id,(File(Group,Keys)*)*)* + **/ +bool KonfUpdate::updateFile(const TQString &filename) +{ + currentFilename = filename; + int i = currentFilename.findRev('/'); + if (i != -1) + currentFilename = currentFilename.mid(i+1); + skip = true; + TQFile file(filename); + if (!file.open(IO_ReadOnly)) + return false; + + log() << "Checking update-file '" << filename << "' for new updates" << endl; + + TQTextStream ts(&file); + ts.setEncoding(TQTextStream::Latin1); + m_lineCount = 0; + resetOptions(); + while(!ts.atEnd()) + { + m_line = ts.readLine().stripWhiteSpace(); + m_lineCount++; + if (m_line.isEmpty() || (m_line[0] == '#')) + continue; + if (m_line.startsWith("Id=")) + gotId(m_line.mid(3)); + else if (skip) + continue; + else if (m_line.startsWith("Options=")) + gotOptions(m_line.mid(8)); + else if (m_line.startsWith("File=")) + gotFile(m_line.mid(5)); + else if (m_line.startsWith("Group=")) + gotGroup(m_line.mid(6)); + else if (m_line.startsWith("RemoveGroup=")) + { + gotRemoveGroup(m_line.mid(12)); + resetOptions(); + } + else if (m_line.startsWith("Script=")) + { + gotScript(m_line.mid(7)); + resetOptions(); + } + else if (m_line.startsWith("ScriptArguments=")) + gotScriptArguments(m_line.mid(16)); + else if (m_line.startsWith("Key=")) + { + gotKey(m_line.mid(4)); + resetOptions(); + } + else if (m_line.startsWith("RemoveKey=")) + { + gotRemoveKey(m_line.mid(10)); + resetOptions(); + } + else if (m_line == "AllKeys") + { + gotAllKeys(); + resetOptions(); + } + else if (m_line == "AllGroups") + { + gotAllGroups(); + resetOptions(); + } + else + { + log() << currentFilename << ": parse error in line " << m_lineCount << " : '" << m_line << "'" << endl; + } + } + // Flush. + gotId(TQString::null); + + struct stat buff; + stat( TQFile::encodeName(filename), &buff); + config->setGroup(currentFilename); + config->writeEntry("ctime", buff.st_ctime); + config->writeEntry("mtime", buff.st_mtime); + config->sync(); + return true; +} + + + +void KonfUpdate::gotId(const TQString &_id) +{ + if (!id.isEmpty() && !skip) + { + config->setGroup(currentFilename); + TQStringList ids = config->readListEntry("done"); + if (!ids.contains(id)) + { + ids.append(id); + config->writeEntry("done", ids); + config->sync(); + } + } + + // Flush pending changes + gotFile(TQString::null); + + config->setGroup(currentFilename); + TQStringList ids = config->readListEntry("done"); + if (!_id.isEmpty()) + { + if (ids.contains(_id)) + { + //tqDebug("Id '%s' was already in done-list", _id.latin1()); + if (!m_bUseConfigInfo) + { + skip = true; + return; + } + } + skip = false; + id = _id; + if (m_bUseConfigInfo) + log() << currentFilename << ": Checking update '" << _id << "'" << endl; + else + log() << currentFilename << ": Found new update '" << _id << "'" << endl; + } +} + +void KonfUpdate::gotFile(const TQString &_file) +{ + // Reset group + gotGroup(TQString::null); + + if (!oldFile.isEmpty()) + { + // Close old file. + delete oldConfig1; + oldConfig1 = 0; + + oldConfig2->setGroup("$Version"); + TQStringList ids = oldConfig2->readListEntry("update_info"); + TQString cfg_id = currentFilename + ":" + id; + if (!ids.contains(cfg_id) && !skip) + { + ids.append(cfg_id); + oldConfig2->writeEntry("update_info", ids); + } + oldConfig2->sync(); + delete oldConfig2; + oldConfig2 = 0; + + TQString file = locateLocal("config", oldFile); + struct stat s_buf; + if (stat(TQFile::encodeName(file), &s_buf) == 0) + { + if (s_buf.st_size == 0) + { + // Delete empty file. + unlink(TQFile::encodeName(file)); + } + } + + oldFile = TQString::null; + } + if (!newFile.isEmpty()) + { + // Close new file. + newConfig->setGroup("$Version"); + TQStringList ids = newConfig->readListEntry("update_info"); + TQString cfg_id = currentFilename + ":" + id; + if (!ids.contains(cfg_id) && !skip) + { + ids.append(cfg_id); + newConfig->writeEntry("update_info", ids); + } + newConfig->sync(); + delete newConfig; + newConfig = 0; + + newFile = TQString::null; + } + newConfig = 0; + + int i = _file.find(','); + if (i == -1) + { + oldFile = _file.stripWhiteSpace(); + } + else + { + oldFile = _file.left(i).stripWhiteSpace(); + newFile = _file.mid(i+1).stripWhiteSpace(); + if (oldFile == newFile) + newFile = TQString::null; + } + + if (!oldFile.isEmpty()) + { + oldConfig2 = new TDEConfig(oldFile, false, false); + TQString cfg_id = currentFilename + ":" + id; + oldConfig2->setGroup("$Version"); + TQStringList ids = oldConfig2->readListEntry("update_info"); + if (ids.contains(cfg_id)) + { + skip = true; + newFile = TQString::null; + log() << currentFilename << ": Skipping update '" << id << "'" << endl; + } + + if (!newFile.isEmpty()) + { + newConfig = new TDEConfig(newFile, false, false); + newConfig->setGroup("$Version"); + ids = newConfig->readListEntry("update_info"); + if (ids.contains(cfg_id)) + { + skip = true; + log() << currentFilename << ": Skipping update '" << id << "'" << endl; + } + } + else + { + newConfig = oldConfig2; + } + + oldConfig1 = new TDEConfig(oldFile, true, false); + } + else + { + newFile = TQString::null; + } + newFileName = newFile; + if (newFileName.isEmpty()) + newFileName = oldFile; +} + +void KonfUpdate::gotGroup(const TQString &_group) +{ + int i = _group.find(','); + if (i == -1) + { + oldGroup = _group.stripWhiteSpace(); + newGroup = oldGroup; + } + else + { + oldGroup = _group.left(i).stripWhiteSpace(); + newGroup = _group.mid(i+1).stripWhiteSpace(); + } +} + +void KonfUpdate::gotRemoveGroup(const TQString &_group) +{ + oldGroup = _group.stripWhiteSpace(); + + if (!oldConfig1) + { + log() << currentFilename << ": !! RemoveGroup without previous File specification in line " << m_lineCount << " : '" << m_line << "'" << endl; + return; + } + + if (!oldConfig1->hasGroup(oldGroup)) + return; + // Delete group. + oldConfig2->deleteGroup(oldGroup, true); + log() << currentFilename << ": RemoveGroup removes group " << oldFile << ":" << oldGroup << endl; +} + + +void KonfUpdate::gotKey(const TQString &_key) +{ + int i = _key.find(','); + if (i == -1) + { + oldKey = _key.stripWhiteSpace(); + newKey = oldKey; + } + else + { + oldKey = _key.left(i).stripWhiteSpace(); + newKey = _key.mid(i+1).stripWhiteSpace(); + } + + if (oldKey.isEmpty() || newKey.isEmpty()) + { + log() << currentFilename << ": !! Key specifies invalid key in line " << m_lineCount << " : '" << m_line << "'" << endl; + return; + } + if (!oldConfig1) + { + log() << currentFilename << ": !! Key without previous File specification in line " << m_lineCount << " : '" << m_line << "'" << endl; + return; + } + oldConfig1->setGroup(oldGroup); + if (!oldConfig1->hasKey(oldKey)) + return; + TQString value = oldConfig1->readEntry(oldKey); + newConfig->setGroup(newGroup); + if (!m_bOverwrite && newConfig->hasKey(newKey)) + { + log() << currentFilename << ": Skipping " << newFileName << ":" << newGroup << ":" << newKey << ", already exists."<< endl; + return; + } + log() << currentFilename << ": Updating " << newFileName << ":" << newGroup << ":" << newKey << " to '" << value << "'" << endl; + newConfig->writeEntry(newKey, value); + + if (m_bCopy) + return; // Done. + + // Delete old entry + if ((oldConfig2 == newConfig) && + (oldGroup == newGroup) && + (oldKey == newKey)) + return; // Don't delete! + oldConfig2->setGroup(oldGroup); + oldConfig2->deleteEntry(oldKey, false); + log() << currentFilename << ": Removing " << oldFile << ":" << oldGroup << ":" << oldKey << ", moved." << endl; + if (oldConfig2->deleteGroup(oldGroup, false)) { // Delete group if empty. + log() << currentFilename << ": Removing empty group " << oldFile << ":" << oldGroup << endl; + } +} + +void KonfUpdate::gotRemoveKey(const TQString &_key) +{ + oldKey = _key.stripWhiteSpace(); + + if (oldKey.isEmpty()) + { + log() << currentFilename << ": !! RemoveKey specifies invalid key in line " << m_lineCount << " : '" << m_line << "'" << endl; + return; + } + + if (!oldConfig1) + { + log() << currentFilename << ": !! Key without previous File specification in line " << m_lineCount << " : '" << m_line << "'" << endl; + return; + } + + oldConfig1->setGroup(oldGroup); + if (!oldConfig1->hasKey(oldKey)) + return; + log() << currentFilename << ": RemoveKey removes " << oldFile << ":" << oldGroup << ":" << oldKey << endl; + + // Delete old entry + oldConfig2->setGroup(oldGroup); + oldConfig2->deleteEntry(oldKey, false); + if (oldConfig2->deleteGroup(oldGroup, false)) { // Delete group if empty. + log() << currentFilename << ": Removing empty group " << oldFile << ":" << oldGroup << endl; + } +} + +void KonfUpdate::gotAllKeys() +{ + if (!oldConfig1) + { + log() << currentFilename << ": !! AllKeys without previous File specification in line " << m_lineCount << " : '" << m_line << "'" << endl; + return; + } + + TQMap<TQString, TQString> list = oldConfig1->entryMap(oldGroup); + for(TQMap<TQString, TQString>::Iterator it = list.begin(); + it != list.end(); ++it) + { + gotKey(it.key()); + } +} + +void KonfUpdate::gotAllGroups() +{ + if (!oldConfig1) + { + log() << currentFilename << ": !! AllGroups without previous File specification in line " << m_lineCount << " : '" << m_line << "'" << endl; + return; + } + + TQStringList allGroups = oldConfig1->groupList(); + for(TQStringList::ConstIterator it = allGroups.begin(); + it != allGroups.end(); ++it) + { + oldGroup = *it; + newGroup = oldGroup; + gotAllKeys(); + } +} + +void KonfUpdate::gotOptions(const TQString &_options) +{ + TQStringList options = TQStringList::split(',', _options); + for(TQStringList::ConstIterator it = options.begin(); + it != options.end(); + ++it) + { + if ( (*it).lower().stripWhiteSpace() == "copy") + m_bCopy = true; + + if ( (*it).lower().stripWhiteSpace() == "overwrite") + m_bOverwrite = true; + } +} + +void KonfUpdate::copyGroup(TDEConfigBase *cfg1, const TQString &grp1, + TDEConfigBase *cfg2, const TQString &grp2) +{ + cfg1->setGroup(grp1); + cfg2->setGroup(grp2); + TQMap<TQString, TQString> list = cfg1->entryMap(grp1); + for(TQMap<TQString, TQString>::Iterator it = list.begin(); + it != list.end(); ++it) + { + cfg2->writeEntry(it.key(), cfg1->readEntry(it.key())); + } +} + +void KonfUpdate::gotScriptArguments(const TQString &_arguments) +{ + m_arguments = _arguments; +} + +void KonfUpdate::gotScript(const TQString &_script) +{ + TQString script, interpreter; + int i = _script.find(','); + if (i == -1) + { + script = _script.stripWhiteSpace(); + } + else + { + script = _script.left(i).stripWhiteSpace(); + interpreter = _script.mid(i+1).stripWhiteSpace(); + } + + + if (script.isEmpty()) + { + log() << currentFilename << ": !! Script fails to specifiy filename in line " << m_lineCount << " : '" << m_line << "'" << endl; + skip = true; + return; + } + + + + TQString path = locate("data","tdeconf_update/"+script); + if (path.isEmpty()) + { + if (interpreter.isEmpty()) + path = locate("lib", "tdeconf_update_bin/"+script); + + if (path.isEmpty()) + { + log() << currentFilename << ": !! Script '" << script << "' not found in line " << m_lineCount << " : '" << m_line << "'" << endl; + skip = true; + return; + } + } + + if( !m_arguments.isNull()) + log() << currentFilename << ": Running script '" << script << "' with arguments '" << m_arguments << "'" << endl; + else + log() << currentFilename << ": Running script '" << script << "'" << endl; + + TQString cmd; + if (interpreter.isEmpty()) + cmd = path; + else + cmd = interpreter + " " + path; + + if( !m_arguments.isNull()) + { + cmd += ' '; + cmd += m_arguments; + } + + KTempFile tmp1; + tmp1.setAutoDelete(true); + KTempFile tmp2; + tmp2.setAutoDelete(true); + KTempFile tmp3; + tmp3.setAutoDelete(true); + + int result; + if (oldConfig1) + { + if (debug) + { + tmp1.setAutoDelete(false); + log() << "Script input stored in " << tmp1.name() << endl; + } + KSimpleConfig cfg(tmp1.name()); + + if (oldGroup.isEmpty()) + { + // Write all entries to tmpFile; + TQStringList grpList = oldConfig1->groupList(); + for(TQStringList::ConstIterator it = grpList.begin(); + it != grpList.end(); + ++it) + { + copyGroup(oldConfig1, *it, &cfg, *it); + } + } + else + { + copyGroup(oldConfig1, oldGroup, &cfg, TQString::null); + } + cfg.sync(); + result = system(TQFile::encodeName(TQString("%1 < %2 > %3 2> %4").arg(cmd, tmp1.name(), tmp2.name(), tmp3.name()))); + } + else + { + // No config file + result = system(TQFile::encodeName(TQString("%1 2> %2").arg(cmd, tmp3.name()))); + } + + // Copy script stderr to log file + { + TQFile output(tmp3.name()); + if (output.open(IO_ReadOnly)) + { + TQTextStream ts( &output ); + ts.setEncoding(TQTextStream::UnicodeUTF8); + while(!ts.atEnd()) + { + TQString line = ts.readLine(); + log() << "[Script] " << line << endl; + } + } + } + + if (result) + { + log() << currentFilename << ": !! An error occured while running '" << cmd << "'" << endl; + return; + } + + if (!oldConfig1) + return; // Nothing to merge + + if (debug) + { + tmp2.setAutoDelete(false); + log() << "Script output stored in " << tmp2.name() << endl; + } + + // Deleting old entries + { + TQString group = oldGroup; + TQFile output(tmp2.name()); + if (output.open(IO_ReadOnly)) + { + TQTextStream ts( &output ); + ts.setEncoding(TQTextStream::UnicodeUTF8); + while(!ts.atEnd()) + { + TQString line = ts.readLine(); + if (line.startsWith("[")) + { + int j = line.find(']')+1; + if (j > 0) + group = line.mid(1, j-2); + } + else if (line.startsWith("# DELETE ")) + { + TQString key = line.mid(9); + if (key[0] == '[') + { + int j = key.find(']')+1; + if (j > 0) + { + group = key.mid(1,j-2); + key = key.mid(j); + } + } + oldConfig2->setGroup(group); + oldConfig2->deleteEntry(key, false); + log() << currentFilename << ": Script removes " << oldFile << ":" << group << ":" << key << endl; + if (oldConfig2->deleteGroup(group, false)) { // Delete group if empty. + log() << currentFilename << ": Removing empty group " << oldFile << ":" << group << endl; + } + } + else if (line.startsWith("# DELETEGROUP")) + { + TQString key = line.mid(13).stripWhiteSpace(); + if (key[0] == '[') + { + int j = key.find(']')+1; + if (j > 0) + { + group = key.mid(1,j-2); + } + } + if (oldConfig2->deleteGroup(group, true)) { // Delete group + log() << currentFilename << ": Script removes group " << oldFile << ":" << group << endl; + } + } + } + } + } + + // Merging in new entries. + m_bCopy = true; + { + TDEConfig *saveOldConfig1 = oldConfig1; + TQString saveOldGroup = oldGroup; + TQString saveNewGroup = newGroup; + oldConfig1 = new TDEConfig(tmp2.name(), true, false); + + // For all groups... + TQStringList grpList = oldConfig1->groupList(); + for(TQStringList::ConstIterator it = grpList.begin(); + it != grpList.end(); + ++it) + { + oldGroup = *it; + if (oldGroup != "<default>") + { + newGroup = oldGroup; + } + gotAllKeys(); // Copy all keys + } + delete oldConfig1; + oldConfig1 = saveOldConfig1; + oldGroup = saveOldGroup; + newGroup = saveNewGroup; + } +} + +void KonfUpdate::resetOptions() +{ + m_bCopy = false; + m_bOverwrite = false; + m_arguments = TQString::null; +} + + +extern "C" KDE_EXPORT int kdemain(int argc, char **argv) +{ + TDEAboutData aboutData("tdeconf_update", I18N_NOOP("KConf Update"), + "1.0.2", + I18N_NOOP("TDE Tool for updating user configuration files"), + TDEAboutData::License_GPL, + "(c) 2001, Waldo Bastian"); + + aboutData.addAuthor("Waldo Bastian", 0, "bastian@kde.org"); + + TDECmdLineArgs::init(argc, argv, &aboutData); + TDECmdLineArgs::addCmdLineOptions(options); + + TDEInstance instance(&aboutData); + + KonfUpdate konfUpdate; + + return 0; +} |