]> git.lyx.org Git - lyx.git/blobdiff - src/support/filetools.C
* lyxfunctional.h: delete compare_memfun and helper classes
[lyx.git] / src / support / filetools.C
index 11057b8ddde02c34616230a776306fab31a5a846..265583d074165f026cfe9d8669edabe114842f07 100644 (file)
@@ -1,48 +1,54 @@
-/*
-       filetools.C (former paths.C) - part of LyX project
-       General path-mangling functions
-       Copyright 1996 Ivan Schreter
-       Parts Copyright 1996 Dirk Niggemann
-       Parts Copyright 1985, 1990, 1993 Free Software Foundation, Inc.
-       Parts Copyright 1996 Asger Alstrup
-
-       See also filetools.h.
-
-       lyx-filetool.C : tools functions for file/path handling
-       this file is part of LyX, the High Level Word Processor
-       Copyright 1995-1996, Matthias Ettrich and the LyX Team
-
-*/
+/**
+ * \file filetools.C
+ * This file is part of LyX, the document processor.
+ * Licence details can be found in the file COPYING.
+ *
+ * parts Copyright 1985, 1990, 1993 Free Software Foundation, Inc.
+ *
+ * \author Ivan Schreter
+ * \author Dirk Niggemann
+ * \author Asger Alstrup
+ * \author Lars Gullik Bjønnes
+ * \author Jean-Marc Lasgouttes
+ * \author Angus Leeming
+ * \author John Levon
+ * \author Herbert Voß
+ *
+ * Full author contact details are available in file CREDITS.
+ *
+ * General path-mangling functions
+ */
 
 #include <config.h>
 
-#ifdef __GNUG__
-#pragma implementation "filetools.h"
-#endif
-
 #include "debug.h"
-#include "support/lstrings.h"
+#include "support/tostr.h"
 #include "support/systemcall.h"
 
 #include "filetools.h"
+#include "format.h"
 #include "lstrings.h"
-#include "frontends/Alert.h"
 #include "FileInfo.h"
-#include "support/path.h"        // I know it's OS/2 specific (SMiyata)
+#include "forkedcontr.h"
+#include "path.h"
+#include "path_defines.h"
 #include "gettext.h"
 #include "lyxlib.h"
 #include "os.h"
 
-#include "Lsstream.h"
+#include <boost/assert.hpp>
+#include <boost/regex.hpp>
+
+#include <fcntl.h>
 
 #include <cctype>
 #include <cstdlib>
 #include <cstdio>
-#include <fcntl.h>
 #include <cerrno>
 
 #include <utility>
 #include <fstream>
+#include <sstream>
 
 
 // Which part of this is still necessary? (JMarc).
 
 #ifndef CXX_GLOBAL_CSTD
 using std::fgetc;
-using std::isalpha;
 using std::isalnum;
+using std::isalpha;
 #endif
 
-using std::make_pair;
-using std::pair;
 using std::endl;
+using std::getline;
+using std::make_pair;
+using std::string;
 using std::ifstream;
+using std::ostringstream;
 using std::vector;
-using std::getline;
 
-extern string system_lyxdir;
-extern string build_lyxdir;
-extern string user_lyxdir;
 
+namespace lyx {
+namespace support {
 
 bool IsLyXFilename(string const & filename)
 {
@@ -120,8 +126,8 @@ string const MakeLatexName(string const & file)
 string const QuoteName(string const & name)
 {
        return (os::shell() == os::UNIX) ?
-               "\'" + name + "\'":
-               "\"" + name + "\"";
+               '\'' + name + '\'':
+               '"' + name + '"';
 }
 
 
@@ -155,12 +161,12 @@ bool IsDirWriteable(string const & path)
 {
        lyxerr[Debug::FILES] << "IsDirWriteable: " << path << endl;
 
-       string const tmpfl(lyx::tempName(path, "lyxwritetest"));
+       string const tmpfl(tempName(path, "lyxwritetest"));
 
        if (tmpfl.empty())
                return false;
 
-       lyx::unlink(tmpfl);
+       unlink(tmpfl);
        return true;
 }
 
@@ -182,8 +188,8 @@ string const FileOpenSearch(string const & path, string const & name,
                path_element = os::slashify_path(path_element);
                if (!suffixIs(path_element, '/'))
                        path_element+= '/';
-               path_element = subst(path_element, "$$LyX", system_lyxdir);
-               path_element = subst(path_element, "$$User", user_lyxdir);
+               path_element = subst(path_element, "$$LyX", system_lyxdir());
+               path_element = subst(path_element, "$$User", user_lyxdir());
 
                real_file = FileSearch(path_element, name, ext);
 
@@ -209,9 +215,11 @@ string const FileOpenSearch(string const & path, string const & name,
 vector<string> const DirList(string const & dir, string const & ext)
 {
        // This is a non-error checking C/system implementation
-       string extension(ext);
-       if (!extension.empty() && extension[0] != '.')
-               extension.insert(0, ".");
+       string extension;
+       if (!ext.empty() && ext[0] != '.')
+               extension += '.';
+       extension += ext;
+
        vector<string> dirlist;
        DIR * dirp = ::opendir(dir.c_str());
        if (!dirp) {
@@ -238,7 +246,7 @@ vector<string> const DirList(string const & dir, string const & ext)
        */
        /* A C++ implementaion will look like this:
           string extension(ext);
-          if (extension[0] != '.') extension.insert(0, ".");
+          if (extension[0] != '.') extension.insert(0, 1, '.');
           vector<string> dirlist;
           directory_iterator dit("dir");
           while (dit != directory_iterator()) {
@@ -286,16 +294,16 @@ string const FileSearch(string const & path, string const & name,
 string const LibFileSearch(string const & dir, string const & name,
                           string const & ext)
 {
-       string fullname = FileSearch(AddPath(user_lyxdir, dir), name, ext);
+       string fullname = FileSearch(AddPath(user_lyxdir(), dir), name, ext);
        if (!fullname.empty())
                return fullname;
 
-       if (!build_lyxdir.empty())
-               fullname = FileSearch(AddPath(build_lyxdir, dir), name, ext);
+       if (!build_lyxdir().empty())
+               fullname = FileSearch(AddPath(build_lyxdir(), dir), name, ext);
        if (!fullname.empty())
                return fullname;
 
-       return FileSearch(AddPath(system_lyxdir, dir), name, ext);
+       return FileSearch(AddPath(system_lyxdir(), dir), name, ext);
 }
 
 
@@ -303,48 +311,72 @@ string const
 i18nLibFileSearch(string const & dir, string const & name,
                  string const & ext)
 {
-       // this comment is from intl/dcigettext.c. We try to mimick this
-       // behaviour here.
+       // the following comments are from intl/dcigettext.c. We try
+       // to mimick this behaviour here.
        /* The highest priority value is the `LANGUAGE' environment
           variable. But we don't use the value if the currently
           selected locale is the C locale. This is a GNU extension. */
+       /* [Otherwise] We have to proceed with the POSIX methods of
+          looking to `LC_ALL', `LC_xxx', and `LANG'. */
 
-       string const lc_all = GetEnv("LC_ALL");
-       string lang = GetEnv("LANGUAGE");
-       if (lang.empty() || lc_all == "C") {
-               lang = lc_all;
+       string lang = GetEnv("LC_ALL");
+       if (lang.empty()) {
+               lang = GetEnv("LC_MESSAGES");
                if (lang.empty()) {
                        lang = GetEnv("LANG");
+                       if (lang.empty())
+                               lang = "C";
                }
        }
 
-       lang = token(lang, '_', 0);
+       string const language = GetEnv("LANGUAGE");
+       if (lang != "C" && lang != "POSIX" && !language.empty())
+               lang = language;
 
-       if (lang.empty() || lang == "C")
-               return LibFileSearch(dir, name, ext);
-       else {
-               string const tmp = LibFileSearch(dir, lang + '_' + name,
+       string l;
+       lang = split(lang, l, ':');
+       while (!l.empty() && l != "C" && l != "POSIX") {
+               string const tmp = LibFileSearch(dir,
+                                                token(l, '_', 0) + '_' + name,
                                                 ext);
                if (!tmp.empty())
                        return tmp;
-               else
-                       return LibFileSearch(dir, name, ext);
+               lang = split(lang, l, ':');
        }
+
+       return LibFileSearch(dir, name, ext);
 }
 
 
-string const LibScriptSearch(string const & command)
+string const LibScriptSearch(string const & command_in)
 {
-       string script;
-       string args = command;
-       args = split(args, script, ' ');
-       script = LibFileSearch("scripts", script);
-       if (script.empty())
+       string const token_scriptpath("$$s/");
+
+       string command = command_in;
+       // Find the starting position of "$$s/"
+       string::size_type const pos1 = command.find(token_scriptpath);
+       if (pos1 == string::npos)
                return command;
-       else if (args.empty())
-               return script;
-       else
-               return script + ' ' + args;
+       // Find the end of the "$$s/some_script" word within command
+       string::size_type const start_script = pos1 + 4;
+       string::size_type const pos2 = command.find(' ', start_script);
+       string::size_type const size_script = pos2 == string::npos?
+               (command.size() - start_script) : pos2 - start_script;
+
+       // Does this script file exist?
+       string const script =
+               LibFileSearch("scripts", command.substr(start_script, size_script));
+
+       if (script.empty()) {
+               // Replace "$$s/" with ""
+               command.erase(pos1, 4);
+       } else {
+               // Replace "$$s/some_script" with "$LYX_SCRIPT_PATH/some_script"
+               string::size_type const size_replace = size_script + 4;
+               command.replace(pos1, size_replace, QuoteName(script));
+       }
+
+       return command;
 }
 
 
@@ -364,54 +396,7 @@ string const GetEnvPath(string const & name)
 #else
        string const pathlist = os::slashify_path(GetEnv(name));
 #endif
-       return strip(pathlist, ';');
-}
-
-
-bool PutEnv(string const & envstr)
-{
-       // CHECK Look at and fix this.
-       // f.ex. what about error checking?
-
-#if HAVE_PUTENV
-       // this leaks, but what can we do about it?
-       //   Is doing a getenv() and a free() of the older value
-       //   a good idea? (JMarc)
-       // Actually we don't have to leak...calling putenv like this
-       // should be enough: ... and this is obviously not enough if putenv
-       // does not make a copy of the string. It is also not very wise to
-       // put a string on the free store. If we have to leak we should do it
-       // like this:
-       char * leaker = new char[envstr.length() + 1];
-       envstr.copy(leaker, envstr.length());
-       leaker[envstr.length()] = '\0';
-       int const retval = lyx::putenv(leaker);
-
-       // If putenv does not make a copy of the char const * this
-       // is very dangerous. OTOH if it does take a copy this is the
-       // best solution.
-       // The  only implementation of putenv that I have seen does not
-       // allocate memory. _And_ after testing the putenv in glibc it
-       // seems that we need to make a copy of the string contents.
-       // I will enable the above.
-       //int retval = lyx::putenv(envstr.c_str());
-#else
-#ifdef HAVE_SETENV
-       string varname;
-       string const str = envstr.split(varname,'=');
-       int const retval = ::setenv(varname.c_str(), str.c_str(), true);
-#else
-       // No environment setting function. Can this happen?
-       int const retval = 1; //return an error condition.
-#endif
-#endif
-       return retval == 0;
-}
-
-
-bool PutEnvPath(string const & envstr)
-{
-       return PutEnv(envstr);
+       return rtrim(pathlist, ";");
 }
 
 
@@ -426,7 +411,6 @@ int DeleteAllFilesInDir(string const & path)
        // directory_iterator dit(path);
        // directory_iterator dend;
        // if (dit == dend) {
-       //         Alert::err_alert(_("Error! Cannot open directory:"), path);
        //         return -1;
        // }
        // for (; dit != dend; ++dit) {
@@ -434,16 +418,13 @@ int DeleteAllFilesInDir(string const & path)
        //         if (filename == "." || filename == "..")
        //                 continue;
        //         string unlinkpath(AddName(path, filename));
-       //         if (lyx::unlink(unlinkpath))
-       //                 Alert::err_alert(_("Error! Could not remove file:"),
-       //                              unlinkpath);
+       //         lyx::unlink(unlinkpath);
        // }
        // return 0;
        DIR * dir = ::opendir(path.c_str());
-       if (!dir) {
-               Alert::err_alert (_("Error! Cannot open directory:"), path);
+       if (!dir)
                return -1;
-       }
+
        struct dirent * de;
        int return_value = 0;
        while ((de = readdir(dir))) {
@@ -457,125 +438,113 @@ int DeleteAllFilesInDir(string const & path)
 
                bool deleted = true;
                FileInfo fi(unlinkpath);
-               if (fi.isOK() && fi.isDir())
+               if (fi.isOK() && fi.isDir()) {
                        deleted = (DeleteAllFilesInDir(unlinkpath) == 0);
-               deleted &= (lyx::unlink(unlinkpath) == 0);
-               if (!deleted) {
-                       Alert::err_alert(_("Error! Could not remove file:"),
-                               unlinkpath);
+                       deleted &= (rmdir(unlinkpath) == 0);
+               } else
+                       deleted &= (unlink(unlinkpath) == 0);
+               if (!deleted)
                        return_value = -1;
-               }
        }
        closedir(dir);
        return return_value;
 }
 
 
-string const CreateTmpDir(string const & tempdir, string const & mask)
+string const createTmpDir(string const & tempdir, string const & mask)
 {
        lyxerr[Debug::FILES]
-               << "CreateTmpDir: tempdir=`" << tempdir << "'\n"
-               << "CreateTmpDir:    mask=`" << mask << "'" << endl;
+               << "createTmpDir: tempdir=`" << tempdir << "'\n"
+               << "createTmpDir:    mask=`" << mask << '\'' << endl;
 
-       string const tmpfl(lyx::tempName(tempdir, mask));
+       string const tmpfl(tempName(tempdir, mask));
        // lyx::tempName actually creates a file to make sure that it
        // stays unique. So we have to delete it before we can create
        // a dir with the same name. Note also that we are not thread
        // safe because of the gap between unlink and mkdir. (Lgb)
-       lyx::unlink(tmpfl.c_str());
+       unlink(tmpfl);
 
-       if (tmpfl.empty() || lyx::mkdir(tmpfl, 0700)) {
-               Alert::err_alert(_("Error! Couldn't create temporary directory:"),
-                            tempdir);
+       if (tmpfl.empty() || mkdir(tmpfl, 0700)) {
+               lyxerr << "LyX could not create the temporary directory '"
+                      << tmpfl << "'" << endl;
                return string();
        }
+
        return MakeAbsPath(tmpfl);
 }
 
+} // namespace anon
+
 
-int DestroyTmpDir(string const & tmpdir, bool Allfiles)
+int destroyDir(string const & tmpdir)
 {
 #ifdef __EMX__
-       Path p(user_lyxdir);
+       Path p(user_lyxdir());
 #endif
-       if (Allfiles && DeleteAllFilesInDir(tmpdir)) {
+       if (DeleteAllFilesInDir(tmpdir))
                return -1;
-       }
-       if (lyx::rmdir(tmpdir)) {
-               Alert::err_alert(_("Error! Couldn't delete temporary directory:"),
-                            tmpdir);
+
+       if (rmdir(tmpdir))
                return -1;
-       }
+
        return 0;
 }
 
-} // namespace anon
-
 
-string const CreateBufferTmpDir(string const & pathfor)
+string const createBufferTmpDir()
 {
        static int count;
-       static string const tmpdir(pathfor.empty() ? os::getTmpDir() : pathfor);
        // We are in our own directory.  Why bother to mangle name?
        // In fact I wrote this code to circumvent a problematic behaviour (bug?)
        // of EMX mkstemp().
-       string const tmpfl = tmpdir + "/lyx_tmpbuf" + tostr(count++);
-       if (lyx::mkdir(tmpfl, 0777)) {
-               Alert::err_alert(_("Error! Couldn't create temporary directory:"),
-                            tmpdir);
+       string const tmpfl = os::getTmpDir() + "/lyx_tmpbuf" + tostr(count++);
+       if (mkdir(tmpfl, 0777)) {
+               lyxerr << "LyX could not create the temporary directory '"
+                      << tmpfl << "'" << endl;
                return string();
        }
        return tmpfl;
 }
 
 
-int DestroyBufferTmpDir(string const & tmpdir)
+string const createLyXTmpDir(string const & deflt)
 {
-       return DestroyTmpDir(tmpdir, true);
-}
-
-
-string const CreateLyXTmpDir(string const & deflt)
-{
-       if ((!deflt.empty()) && (deflt  != "/tmp")) {
-               if (lyx::mkdir(deflt, 0777)) {
+       if (!deflt.empty() && deflt != "/tmp") {
+               if (mkdir(deflt, 0777)) {
+                       if (IsDirWriteable(deflt))
+                               // deflt could not be created because it
+                               // did exist already, so let's create our own
+                               // dir inside deflt.
 #ifdef __EMX__
-               Path p(user_lyxdir);
+                               Path p(user_lyxdir());
 #endif
-                       return CreateTmpDir(deflt, "lyx_tmpdir");
+                               return createTmpDir(deflt, "lyx_tmpdir");
+                       else
+                               // some other error occured.
+#ifdef __EMX__
+                               Path p(user_lyxdir());
+#endif
+                               return createTmpDir("/tmp", "lyx_tmpdir");
                } else
                        return deflt;
        } else {
 #ifdef __EMX__
-               Path p(user_lyxdir);
+               Path p(user_lyxdir());
 #endif
-               return CreateTmpDir("/tmp", "lyx_tmpdir");
+               return createTmpDir("/tmp", "lyx_tmpdir");
        }
 }
 
 
-// FIXME: no need for separate method like this ... 
-int DestroyLyXTmpDir(string const & tmpdir)
-{
-       return DestroyTmpDir(tmpdir, true); 
-}
-
-
-// Creates directory. Returns true if succesfull
 bool createDirectory(string const & path, int permission)
 {
-       string temp(strip(os::slashify_path(path), '/'));
+       string temp(rtrim(os::slashify_path(path), "/"));
 
-       if (temp.empty()) {
-               Alert::alert(_("Internal error!"),
-                          _("Call to createDirectory with invalid name"));
-               return false;
-       }
+       BOOST_ASSERT(!temp.empty());
 
-       if (lyx::mkdir(temp, permission)) {
-               Alert::err_alert (_("Error! Couldn't create directory:"), temp);
+       if (mkdir(temp, permission))
                return false;
-       }
+
        return true;
 }
 
@@ -613,7 +582,7 @@ string const MakeAbsPath(string const & RelPath, string const & BasePath)
        if (os::is_absolute_path(BasePath))
                TempBase = BasePath;
        else
-               TempBase = AddPath(lyx::getcwd(), BasePath);
+               TempBase = AddPath(getcwd(), BasePath);
 
        // Handle /./ at the end of the path
        while (suffixIs(TempBase, "/./"))
@@ -718,7 +687,7 @@ string const ExpandPath(string const & path)
        RTemp = split(RTemp, Temp, '/');
 
        if (Temp == ".") {
-               return lyx::getcwd() /*GetCWD()*/ + '/' + RTemp;
+               return getcwd() + '/' + RTemp;
        }
        if (Temp == "~") {
                return GetEnvPath("HOME") + '/' + RTemp;
@@ -734,6 +703,7 @@ string const ExpandPath(string const & path)
 // Normalize a path
 // Constracts path/../path
 // Can't handle "../../" or "/../" (Asger)
+// Also converts paths like /foo//bar ==> /foo/bar
 string const NormalizePath(string const & path)
 {
        string TempBase;
@@ -746,6 +716,10 @@ string const NormalizePath(string const & path)
                // Make implicit current directory explicit
                RTemp = "./" +path;
 
+       // Normalise paths like /foo//bar ==> /foo/bar
+       boost::RegEx regex("/{2,}");
+       RTemp = regex.Merge(RTemp, "/");
+
        while (!RTemp.empty()) {
                // Split by next /
                RTemp = split(RTemp, Temp, '/');
@@ -780,105 +754,41 @@ string const GetFileContents(string const & fname)
                if (ifs && ofs) {
                        ofs << ifs.rdbuf();
                        ifs.close();
-                       return ofs.str().c_str();
+                       return ofs.str();
                }
        }
-       lyxerr << "LyX was not able to read file '" << fname << "'" << endl;
+       lyxerr << "LyX was not able to read file '" << fname << '\'' << endl;
        return string();
 }
 
 
-//
-// Search ${...} as Variable-Name inside the string and replace it with
-// the denoted environmentvariable
-// Allow Variables according to
-//  variable :=  '$' '{' [A-Za-z_]{[A-Za-z_0-9]*} '}'
-//
-
+// Search the string for ${VAR} and $VAR and replace VAR using getenv.
 string const ReplaceEnvironmentPath(string const & path)
 {
-//
-// CompareChar: Environmentvariables starts with this character
-// PathChar:    Next path component start with this character
-// while CompareChar found do:
-//       Split String with PathChar
-//      Search Environmentvariable
-//      if found: Replace Strings
-//
-       char const CompareChar = '$';
-       char const FirstChar = '{';
-       char const EndChar = '}';
-       char const UnderscoreChar = '_';
-       string EndString; EndString += EndChar;
-       string FirstString; FirstString += FirstChar;
-       string CompareString; CompareString += CompareChar;
-       string const RegExp("*}*"); // Exist EndChar inside a String?
-
-// first: Search for a '$' - Sign.
-       //string copy(path);
-       string result1; //(copy);    // for split-calls
-       string result0 = split(path, result1, CompareChar);
-       while (!result0.empty()) {
-               string copy1(result0); // contains String after $
-
-               // Check, if there is an EndChar inside original String.
-
-               if (!regexMatch(copy1, RegExp)) {
-                       // No EndChar inside. So we are finished
-                       result1 += CompareString + result0;
-                       result0.erase();
-                       continue;
-               }
-
-               string res1;
-               string res0 = split(copy1, res1, EndChar);
-               // Now res1 holds the environmentvariable
-               // First, check, if Contents is ok.
-               if (res1.empty()) { // No environmentvariable. Continue Loop.
-                       result1 += CompareString + FirstString;
-                       result0  = res0;
-                       continue;
-               }
-               // check contents of res1
-               char const * res1_contents = res1.c_str();
-               if (*res1_contents != FirstChar) {
-                       // Again No Environmentvariable
-                       result1 += CompareString;
-                       result0 = res0;
-               }
-
-               // Check for variable names
-               // Situation ${} is detected as "No Environmentvariable"
-               char const * cp1 = res1_contents + 1;
-               bool result = isalpha(*cp1) || (*cp1 == UnderscoreChar);
-               ++cp1;
-               while (*cp1 && result) {
-                       result = isalnum(*cp1) ||
-                               (*cp1 == UnderscoreChar);
-                       ++cp1;
-               }
-
-               if (!result) {
-                       // no correct variable name
-                       result1 += CompareString + res1 + EndString;
-                       result0  = split(res0, res1, CompareChar);
-                       result1 += res1;
-                       continue;
-               }
-
-               string env(GetEnv(res1_contents + 1));
-               if (!env.empty()) {
-                       // Congratulations. Environmentvariable found
-                       result1 += env;
-               } else {
-                       result1 += CompareString + res1 + EndString;
+       // ${VAR} is defined as
+       // $\{[A-Za-z_][A-Za-z_0-9]*\}
+       static string const envvar_br = "[$]\\{([A-Za-z_][A-Za-z_0-9]*)\\}";
+
+       // $VAR is defined as:
+       // $\{[A-Za-z_][A-Za-z_0-9]*\}
+       static string const envvar = "[$]([A-Za-z_][A-Za-z_0-9]*)";
+
+       static boost::regex envvar_br_re("(.*)" + envvar_br + "(.*)");
+       static boost::regex envvar_re("(.*)" + envvar + "(.*)");
+       boost::smatch what;
+
+       string result = path;
+       while (1) {
+               regex_match(result, what, envvar_br_re);
+               if (!what[0].matched) {
+                       regex_match(result, what, envvar_re);
+                       if (!what[0].matched)
+                               break;
                }
-               // Next $-Sign?
-               result0  = split(res0, res1, CompareChar);
-               result1 += res1;
+               result = what.str(1) + GetEnv(what.str(2)) + what.str(3);
        }
-       return result1;
-}  // ReplaceEnvironmentPath
+       return result;
+}
 
 
 // Make relative path out of two absolute paths
@@ -963,7 +873,7 @@ string const ChangeExtension(string const & oldname, string const & extension)
        string ext;
        // Make sure the extension starts with a dot
        if (!extension.empty() && extension[0] != '.')
-               ext= "." + extension;
+               ext= '.' + extension;
        else
                ext = extension;
 
@@ -984,13 +894,29 @@ string const GetExtension(string const & name)
                return string();
 }
 
+
+namespace {
+
+class FormatExtensionsEqual : public std::unary_function<Format, bool> {
+public:
+       FormatExtensionsEqual(string const & extension)
+               : extension_(extension) {}
+       bool operator()(Format const & f) const
+       {
+               return f.extension() == extension_;
+       }
+private:
+       string extension_;
+};
+
+} // namespace anon
+
+
 // the different filetypes and what they contain in one of the first lines
 // (dots are any characters).          (Herbert 20020131)
 // AGR Grace...
 // BMP BM...
 // EPS %!PS-Adobe-3.0 EPSF...
-// EPSI like EPS and with
-//      %%BeginPreview...
 // FIG #FIG...
 // FITS ...BITPIX...
 // GIF GIF...
@@ -1009,33 +935,33 @@ string const GetExtension(string const & name)
 //      ...static char *...
 // XWD \000\000\000\151        (0x00006900) decimal 105
 //
-// GZIP        \037\213\010\010...     http://www.ietf.org/rfc/rfc1952.txt
+// GZIP        \037\213        http://www.ietf.org/rfc/rfc1952.txt
 // ZIP PK...                   http://www.halyava.ru/document/ind_arch.htm
-// Z   \037\177                UNIX compress
+// Z   \037\235                UNIX compress
 
 /// return the "extension" which belongs to the contents.
 /// for no knowing contents return the extension. Without
 /// an extension and unknown contents we return "user"
-string const getExtFromContents(string const & filename)
+string const getFormatFromContents(string const & filename)
 {
        // paranoia check
        if (filename.empty() || !IsFileReadable(filename))
                return string();
 
-       
+
        ifstream ifs(filename.c_str());
        if (!ifs)
                // Couldn't open file...
                return string();
 
        // gnuzip
-       string const gzipStamp = "\037\213\010\010";
+       string const gzipStamp = "\037\213";
 
        // PKZIP
        string const zipStamp = "PK";
 
        // compress
-       string const compressStamp = "\037\177";
+       string const compressStamp = "\037\235";
 
        // Maximum strings to read
        int const max_count = 50;
@@ -1046,7 +972,7 @@ string const getExtFromContents(string const & filename)
        while ((count++ < max_count) && format.empty()) {
                if (ifs.eof()) {
                        lyxerr[Debug::GRAPHICS]
-                               << "filetools(getExtFromContents)\n"
+                               << "filetools(getFormatFromContents)\n"
                                << "\tFile type not recognised before EOF!"
                                << endl;
                        break;
@@ -1139,7 +1065,7 @@ string const getExtFromContents(string const & filename)
                else if (contains(str,"%!PS-Adobe")) {
                        // eps or ps
                        ifs >> str;
-                       if (contains(str,"EPSF")) 
+                       if (contains(str,"EPSF"))
                                format = "eps";
                        else
                            format = "ps";
@@ -1156,22 +1082,6 @@ string const getExtFromContents(string const & filename)
        }
 
        if (!format.empty()) {
-               // if we have eps than epsi is also possible
-               // we have to check for a preview
-               if (format == "eps") {
-                       lyxerr[Debug::GRAPHICS]
-                               << "\teps detected -> test for an epsi ..."
-                               << endl;
-                       while (count++ < max_count) {
-                               if (ifs.eof())
-                                       break;
-                               getline(ifs, str);
-                               if (contains(str, "BeginPreview")) {
-                                       format = "epsi";
-                                       count = max_count;
-                               }
-                       }
-               }
                lyxerr[Debug::GRAPHICS]
                        << "Recognised Fileformat: " << format << endl;
                return format;
@@ -1179,35 +1089,50 @@ string const getExtFromContents(string const & filename)
 
        string const ext(GetExtension(filename));
        lyxerr[Debug::GRAPHICS]
-               << "filetools(getExtFromContents)\n"
-               << "\tCouldn't find a known Type!\n";
+               << "filetools(getFormatFromContents)\n"
+               << "\tCouldn't find a known format!\n";
        if (!ext.empty()) {
-           lyxerr[Debug::GRAPHICS]
-               << "\twill take the file extension -> "
-               << ext << endl;
-               return ext;
-       } else {
-           lyxerr[Debug::GRAPHICS]
-               << "\twill use ext or a \"user\" defined format" << endl;
-           return "user";
+               // this is ambigous if two formats have the same extension,
+               // but better than nothing
+               Formats::const_iterator cit =
+                       find_if(formats.begin(), formats.end(),
+                               FormatExtensionsEqual(ext));
+               if (cit != formats.end()) {
+                       lyxerr[Debug::GRAPHICS]
+                               << "\twill guess format from file extension: "
+                               << ext << " -> " << cit->name() << endl;
+                       return cit->name();
+               }
        }
+       lyxerr[Debug::GRAPHICS]
+               << "\twill use a \"user\" defined format" << endl;
+       return "user";
 }
 
 
 /// check for zipped file
 bool zippedFile(string const & name)
 {
-       string const type = getExtFromContents(name);
+       string const type = getFormatFromContents(name);
        if (contains("gzip zip compress", type) && !type.empty())
                return true;
        return false;
 }
 
 
-string const unzipFile(string const & zipped_file)
+string const unzippedFileName(string const & zipped_file)
 {
-       string const file = ChangeExtension(zipped_file, string());
-       string  const tempfile = lyx::tempName(string(), file);
+       string const ext = GetExtension(zipped_file);
+       if (ext == "gz" || ext == "z" || ext == "Z")
+               return ChangeExtension(zipped_file, string());
+       return "unzipped_" + zipped_file;
+}
+
+
+string const unzipFile(string const & zipped_file, string const & unzipped_file)
+{
+       string const tempfile = unzipped_file.empty() ?
+               unzippedFileName(zipped_file) : unzipped_file;
        // Run gunzip
        string const command = "gunzip -c " + zipped_file + " > " + tempfile;
        Systemcall one;
@@ -1218,54 +1143,39 @@ string const unzipFile(string const & zipped_file)
 }
 
 
-// Creates a nice compact path for displaying
-string const
-MakeDisplayPath (string const & path, unsigned int threshold)
+string const MakeDisplayPath(string const & path, unsigned int threshold)
 {
-       string::size_type const l1 = path.length();
+       string str = path;
 
-       // First, we try a relative path compared to home
        string const home(GetEnvPath("HOME"));
-       string relhome = MakeRelPath(path, home);
 
-       string::size_type l2 = relhome.length();
+       // replace /home/blah with ~/
+       if (prefixIs(str, home))
+               str = subst(str, home, "~");
 
-       string prefix;
+       if (str.length() <= threshold)
+               return str;
 
-       // If we backup from home or don't have a relative path,
-       // this try is no good
-       if (prefixIs(relhome, "../") || os::is_absolute_path(relhome)) {
-               // relative path was no good, just use the original path
-               relhome = path;
-               l2 = l1;
-       } else {
-               prefix = "~/";
-       }
+       string const prefix = ".../";
+       string temp;
 
-       // Is the path too long?
-       if (l2 > threshold) {
-               // Yes, shortend it
-               prefix += ".../";
+       while (str.length() > threshold)
+               str = split(str, temp, '/');
 
-               string temp;
+       // Did we shorten everything away?
+       if (str.empty()) {
+               // Yes, filename itself is too long.
+               // Pick the start and the end of the filename.
+               str = OnlyFilename(path);
+               string const head = str.substr(0, threshold / 2 - 3);
 
-               while (relhome.length() > threshold)
-                       relhome = split(relhome, temp, '/');
-
-               // Did we shortend everything away?
-               if (relhome.empty()) {
-                       // Yes, filename in itself is too long.
-                       // Pick the start and the end of the filename.
-                       relhome = OnlyFilename(path);
-                       string const head = relhome.substr(0, threshold/2 - 3);
-
-                       l2 = relhome.length();
-                       string const tail =
-                               relhome.substr(l2 - threshold/2 - 2, l2 - 1);
-                       relhome = head + "..." + tail;
-               }
+               string::size_type len = str.length();
+               string const tail =
+                       str.substr(len - threshold / 2 - 2, len - 1);
+               str = head + "..." + tail;
        }
-       return prefix + relhome;
+
+       return prefix + str;
 }
 
 
@@ -1286,23 +1196,33 @@ bool LyXReadLink(string const & file, string & link, bool resolve)
 }
 
 
-namespace {
-
-typedef pair<int, string> cmdret;
-
-cmdret const do_popen(string const & cmd)
+cmd_ret const RunCommand(string const & cmd)
 {
+       // FIXME: replace all calls to RunCommand with ForkedCall
+       // (if the output is not needed) or the code in ispell.C
+       // (if the output is needed).
+
        // One question is if we should use popen or
        // create our own popen based on fork, exec, pipe
        // of course the best would be to have a
        // pstream (process stream), with the
        // variants ipstream, opstream
 
-       FILE * inf = ::popen(cmd.c_str(), os::read_mode());
+       sigset_t newMask, oldMask;
+       sigemptyset(&oldMask);
+       sigemptyset(&newMask);
+       sigaddset(&newMask, SIGCHLD);
+
+       // Block the SIGCHLD signal.
+       sigprocmask(SIG_BLOCK, &newMask, &oldMask);
+
+       FILE * inf = ::popen(cmd.c_str(), os::popen_read_mode());
 
        // (Claus Hentschel) Check if popen was succesful ;-)
-       if (!inf)
+       if (!inf) {
                return make_pair(-1, string());
+               lyxerr << "RunCommand:: could not start child process" << endl;
+               }
 
        string ret;
        int c = fgetc(inf);
@@ -1311,11 +1231,15 @@ cmdret const do_popen(string const & cmd)
                c = fgetc(inf);
        }
        int const pret = pclose(inf);
+       if (pret == -1)
+               perror("RunCommand:: could not terminate child process");
+
+       // Unblock the SIGCHLD signal and restore the old mask.
+       sigprocmask(SIG_SETMASK, &oldMask, 0);
+
        return make_pair(pret, ret);
 }
 
-} // namespace anon
-
 
 string const findtexfile(string const & fil, string const & /*format*/)
 {
@@ -1355,13 +1279,13 @@ string const findtexfile(string const & fil, string const & /*format*/)
        // should help it by setting additional path in the approp. envir.var.
        string const kpsecmd = "kpsewhich " + fil;
 
-       cmdret const c = do_popen(kpsecmd);
+       cmd_ret const c = RunCommand(kpsecmd);
 
-       lyxerr[Debug::LATEX] << "kpse status = " << c.first << "\n"
-                << "kpse result = `" << strip(c.second, '\n')
-                << "'" << endl;
+       lyxerr[Debug::LATEX] << "kpse status = " << c.first << '\n'
+                << "kpse result = `" << rtrim(c.second, "\n")
+                << '\'' << endl;
        if (c.first != -1)
-               return os::internal_path(strip(strip(c.second, '\n'), '\r'));
+               return os::internal_path(rtrim(c.second, "\n\r"));
        else
                return string();
 }
@@ -1374,21 +1298,21 @@ void removeAutosaveFile(string const & filename)
        a += OnlyFilename(filename);
        a += '#';
        FileInfo const fileinfo(a);
-       if (fileinfo.exist()) {
-               if (lyx::unlink(a) != 0) {
-                       Alert::err_alert(_("Could not delete auto-save file!"), a);
-               }
-       }
+       if (fileinfo.exist())
+               unlink(a);
 }
 
 
-void readBB_lyxerrMessage(string const & file, bool & zipped, 
-       string const & message) 
+void readBB_lyxerrMessage(string const & file, bool & zipped,
+       string const & message)
 {
-       lyxerr[Debug::GRAPHICS] << "[readBB_from_PSFile] " 
+       lyxerr[Debug::GRAPHICS] << "[readBB_from_PSFile] "
                << message << std::endl;
+#ifdef WITH_WARNINGS
+#warning Why is this func deleting a file? (Lgb)
+#endif
        if (zipped)
-               lyx::unlink(file);
+               unlink(file);
 }
 
 
@@ -1404,10 +1328,10 @@ string const readBB_from_PSFile(string const & file)
        bool zipped = zippedFile(file);
        string const file_ = zipped ?
                string(unzipFile(file)) : string(file);
-       string const format = getExtFromContents(file_);
+       string const format = getFormatFromContents(file_);
 
        if (format != "eps" && format != "ps") {
-               readBB_lyxerrMessage(file_, zipped,"no(e)ps-format"); 
+               readBB_lyxerrMessage(file_, zipped,"no(e)ps-format");
                return string();
        }
 
@@ -1416,7 +1340,7 @@ string const readBB_from_PSFile(string const & file)
                string s;
                getline(is,s);
                if (contains(s,"%%BoundingBox:") && !contains(s,"atend")) {
-                       string const bb = frontStrip(s.substr(14));
+                       string const bb = ltrim(s.substr(14));
                        readBB_lyxerrMessage(file_, zipped, bb);
                        return bb;
                }
@@ -1424,3 +1348,32 @@ string const readBB_from_PSFile(string const & file)
        readBB_lyxerrMessage(file_, zipped, "no bb found");
        return string();
 }
+
+
+int compare_timestamps(string const & file1, string const & file2)
+{
+       BOOST_ASSERT(AbsolutePath(file1) && AbsolutePath(file2));
+
+       // If the original is newer than the copy, then copy the original
+       // to the new directory.
+       FileInfo f1(file1);
+       FileInfo f2(file2);
+
+       int cmp = 0;
+       if (f1.exist() && f2.exist()) {
+               double const tmp = difftime(f1.getModificationTime(),
+                                           f2.getModificationTime());
+               if (tmp != 0)
+                       cmp = tmp > 0 ? 1 : -1;
+
+       } else if (f1.exist()) {
+               cmp = 1;
+       } else if (f2.exist()) {
+               cmp = -1;
+       }
+
+       return cmp;
+}
+
+} //namespace support
+} // namespace lyx