ENH: add a new FILE SYSTEM_PATH that allows you to read a environment variable with a path in it.

1 files changed, 29 insertions, 0 deletions

diff --git a/Source/cmFileCommand.cxx b/Source/cmFileCommand.cxx
index 6c4ad5c..6895f84 100644
--- a/Source/cmFileCommand.cxx
+++ b/Source/cmFileCommand.cxx
@@ -71,6 +71,10 @@ bool cmFileCommand::InitialPass(std::vector<std::string> const& args)
     {
     return this->HandleRelativePathCommand(args);
     }
+  else if ( subCommand == "SYSTEM_PATH" )
+    {
+    return this->HandleSystemPathCommand(args);
+    }
 
   std::string e = "does not recognize sub-command "+subCommand;
   this->SetError(e.c_str());
@@ -889,3 +893,28 @@ bool cmFileCommand::HandleRemove(std::vector<std::string> const& args,
   return true;
 }
 
+bool cmFileCommand::HandleSystemPathCommand(std::vector<std::string> 
+                                            const& args)
+{ 
+  std::vector<std::string>::const_iterator i = args.begin();
+  if(args.size() != 3)
+    {
+    this->SetError("FILE(SYSTEM_PATH ENV result) must be called with "
+                   "only three arguments.");
+    return false;
+    }
+  i++; // Get rid of subcommand
+  std::vector<std::string> path;
+  cmSystemTools::GetPath(path, i->c_str());
+  i++;
+  const char* var =  i->c_str();
+  std::string value;
+  for(std::vector<std::string>::iterator j = path.begin();
+      j != path.end(); ++j)
+    {
+    value += *j;
+    value += ";";
+    }
+  m_Makefile->AddDefinition(var, value.c_str());
+  return true;
+}