searchpath.cpp

Go to the documentation of this file.

/*
  Searchpath  -  helpers for searching directory lists and locating modules
 
   Copyright (C)
     2011,            Hermann Vosseler <Ichthyostega@web.de>
 
 **Lumiera** 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. See the file COPYING for further details.
 
* *****************************************************************/
 
 
#include "lib/error.hpp"
#include "lib/searchpath.hpp"
#include "lib/format-string.hpp"
#include "lib/symbol.hpp"
 
 
#define GET_PATH_TO_EXECUTABLE "/proc/self/exe"
 
 
 
namespace lib {
  
  using util::_Fmt;
  using std::regex;
  using std::regex_replace;
  
  const regex SearchPathSplitter::ACCEPT_PATHELEMENT{"(^|:)\\s*([^:]+)", regex::optimize};
  
  
  fs::path
  findExePath()
  {
    fs::path selfExe{GET_PATH_TO_EXECUTABLE};
    if (not fs::exists (selfExe))
      throw error::Fatal ("unable to discover path of running executable");
    return fs::canonical (selfExe);
  }
  
  
  string
  replaceMagicLinkerTokens (string const& src)
  {
    static const regex PICK_ORIGIN_TOKEN{"\\$?ORIGIN/?", regex::optimize};
    static const string expandedOriginDir
      = findExePath().parent_path().generic_string() + "/";
    
    return regex_replace (src, PICK_ORIGIN_TOKEN, expandedOriginDir);
  }
  
  
  
  
  
  string
  resolveModulePath (fs::path moduleName, string searchPath)
  {
    fs::path modulePathName (moduleName);
    SearchPathSplitter searchLocation(searchPath);
    
    while (not fs::exists (modulePathName))
      {
        // try / continue search path
        if (not searchLocation)
          throw error::Config{_Fmt{"Module %s not found%s"}
                                  % moduleName
                                  %(searchPath.empty()? ".":" in search path: "+searchPath)};
        modulePathName = *searchLocation / moduleName;
        ++searchLocation;
      }
    
    TRACE (config, "found module %s", cStr(modulePathName.generic_string()));
    return modulePathName.generic_string();
  }
  
  
  
} // namespace lib