X-Git-Url: https://git.lyx.org/gitweb/?a=blobdiff_plain;f=src%2Fsupport%2Fenvironment.cpp;h=246e6afce235269b4a25e851ef835503fa7f057d;hb=c6b17b7094c42ff6bf96e3452f69023c724d15b7;hp=3c856d068b7b2b122ad83f752d9e3bba41877331;hpb=9abb7db46800e554f57e865a3e768602ffd9d6f1;p=lyx.git

diff --git a/src/support/environment.cpp b/src/support/environment.cpp
index 3c856d068b..246e6afce2 100644
--- a/src/support/environment.cpp
+++ b/src/support/environment.cpp
@@ -4,8 +4,8 @@
  * Licence details can be found in the file COPYING.
  *
  * \author Angus Leeming
- * \author João Luis M. Assirati
- * \author Lars Gullik Bjønnes
+ * \author João Luis M. Assirati
+ * \author Lars Gullik Bjønnes
  *
  * Full author contact details are available in file CREDITS.
  */
@@ -15,10 +15,11 @@
 #include "support/environment.h"
 
 #include "support/docstring.h"
+#include "support/lstrings.h"
 #include "support/os.h"
+#include "support/debug.h"
 
-#include <boost/tokenizer.hpp>
-
+#include <algorithm> // for remove
 #include <cstdlib>
 #include <map>
 #include <sstream>
@@ -28,30 +29,27 @@ using namespace std;
 namespace lyx {
 namespace support {
 
-string const getEnv(string const & envname)
+
+bool hasEnv(string const & name)
+{
+	return getenv(name.c_str());
+}
+
+
+string const getEnv(string const & name)
 {
 	// f.ex. what about error checking?
-	char const * const ch = getenv(envname.c_str());
+	char const * const ch = getenv(name.c_str());
 	return ch ? to_utf8(from_local8bit(ch)) : string();
 }
 
 
 vector<string> const getEnvPath(string const & name)
 {
-	typedef boost::char_separator<char> Separator;
-	typedef boost::tokenizer<Separator> Tokenizer;
-
 	string const env_var = getEnv(name);
-	Separator const separator(string(1, os::path_separator()).c_str());
-	Tokenizer const tokens(env_var, separator);
-	Tokenizer::const_iterator it = tokens.begin();
-	Tokenizer::const_iterator const end = tokens.end();
-
-	vector<string> vars;
-	for (; it != end; ++it)
-		vars.push_back(os::internal_path(*it));
+	string const separator(1, os::path_separator());
 
-	return vars;
+	return getVectorFromString(env_var, separator);
 }
 
 
@@ -60,10 +58,21 @@ bool setEnv(string const & name, string const & value)
 	// CHECK Look at and fix this.
 	// f.ex. what about error checking?
 
-	string const encoded = to_local8bit(from_utf8(value));
+	string encoded;
+	try {
+		encoded = to_local8bit(from_utf8(value));
+	} catch (...) {
+		return false;
+	}
+
 #if defined (HAVE_SETENV)
-	return ::setenv(name.c_str(), encoded.c_str(), true);
+	return ::setenv(name.c_str(), encoded.c_str(), 1) == 0;
 #elif defined (HAVE_PUTENV)
+	// According to http://pubs.opengroup.org/onlinepubs/9699919799/functions/putenv.html
+	// the argument of putenv() needs to be static, because changing its
+	// value will change the environment. Therefore we need a different static
+	// storage for each variable.
+	// FIXME THREAD
 	static map<string, string> varmap;
 	varmap[name] = name + '=' + encoded;
 	return ::putenv(const_cast<char*>(varmap[name].c_str())) == 0;
@@ -92,18 +101,14 @@ void setEnvPath(string const & name, vector<string> const & env)
 
 void prependEnvPath(string const & name, string const & prefix)
 {
+	string const separator(1, os::path_separator());
+	vector<string> reversed_tokens
+		= getVectorFromString(prefix, separator);
 	vector<string> env_var = getEnvPath(name);
 
-	typedef boost::char_separator<char> Separator;
-	typedef boost::tokenizer<Separator> Tokenizer;
-
-	Separator const separator(string(1, os::path_separator()).c_str());
-
 	// Prepend each new element to the list, removing identical elements
 	// that occur later in the list.
-	Tokenizer const tokens(prefix, separator);
-	vector<string> reversed_tokens(tokens.begin(), tokens.end());
-
+	LYXERR(Debug::INIT, "Prepending \"" << prefix << "\" to PATH");
 	typedef vector<string>::const_reverse_iterator token_iterator;
 	token_iterator it = reversed_tokens.rbegin();
 	token_iterator const end = reversed_tokens.rend();
@@ -117,5 +122,22 @@ void prependEnvPath(string const & name, string const & prefix)
 	setEnvPath(name, env_var);
 }
 
+
+bool unsetEnv(string const & name)
+{
+#if defined(HAVE_UNSETENV)
+	// FIXME: does it leak?
+	return ::unsetenv(name.c_str()) == 0;
+#elif defined(HAVE_PUTENV)
+	// This is OK with MSVC and MinGW at least.
+	// The argument of putenv() does not need to be a static variable in this
+	// case, since the variable is removed from the environment.
+	return ::putenv(const_cast<char*>((name + "=").c_str())) == 0;
+#else
+#error No environment-unsetting function has been defined.
+#endif
+}
+
+
 } // namespace support
 } // namespace lyx