#include "platform.hpp"

#include "../base/logging.hpp"
#include "../coding/file_reader.hpp"

#include <stdlib.h>
#include <unistd.h>

#include <sys/stat.h>
#include <sys/types.h>


/// @return directory where binary resides, including slash at the end
static bool GetBinaryFolder(string & outPath)
{
  char path[4096] = {0};
  if (0 < ::readlink("/proc/self/exe", path, ARRAY_SIZE(path)))
  {
    outPath = path;
    outPath.erase(outPath.find_last_of('/') + 1);
    return true;
  }
  return false;
}

Platform::Platform()
{
  // init directories
  string path;
  CHECK(GetBinaryFolder(path), ("Can't retrieve path to executable"));

  char const * homePath = ::getenv("HOME");
  string const home(homePath ? homePath : "");

  m_settingsDir = home + "/.config/MapsWithMe/";

  if (!IsFileExistsByFullPath(m_settingsDir + SETTINGS_FILE_NAME))
  {
    mkdir((home + "/.config/").c_str(), 0755);
    mkdir(m_settingsDir.c_str(), 0755);
  }

  m_writableDir = home + "/.local/share/MapsWithMe";
  mkdir((home + "/.local/").c_str(), 0755);
  mkdir((home + "/.local/share/").c_str(), 0755);
  mkdir(m_writableDir.c_str(), 0755);

  char const * resDir = ::getenv("MWM_RESOURCES_DIR");
  if (resDir)
    m_resourcesDir = resDir;
  else
  {
    // developer builds with symlink
    if (IsFileExistsByFullPath(path + "../../data/eula.html")){
      m_resourcesDir = path + "../../data";
      m_writableDir = m_resourcesDir;
    }
    // developer builds without symlink
    else if (IsFileExistsByFullPath(path + "../../../omim/data/eula.html"))
    {
      m_resourcesDir = path + "../../../omim/data";
      m_writableDir = m_resourcesDir;
    }
    // installed version - /opt/MapsWithMe
    else if (IsFileExistsByFullPath("/opt/MapsWithMe/share/eula.html"))
      m_resourcesDir = "/opt/MapsWithMe/share";
    // installed version
    else if (IsFileExistsByFullPath("/usr/share/MapsWithMe/eula.html"))
      m_resourcesDir = "/usr/share/MapsWithMe";
    // all-nearby installs
    else if (IsFileExistsByFullPath(path + "/eula.html"))
    {
      m_resourcesDir = path;
    }
  }
  m_resourcesDir += '/';
  m_settingsDir += '/';
  m_writableDir += '/';

  char const * tmpDir = ::getenv("TMPDIR");
  if (tmpDir)
    m_tmpDir = tmpDir;
  else
    m_tmpDir = "/tmp";
  m_tmpDir += '/';

  LOG(LDEBUG, ("Resources directory:", m_resourcesDir));
  LOG(LDEBUG, ("Writable directory:", m_writableDir));
  LOG(LDEBUG, ("Tmp directory:", m_tmpDir));
  LOG(LDEBUG, ("Settings directory:", m_settingsDir));
  LOG(LDEBUG, ("Client ID:", UniqueClientId()));
}

int Platform::CpuCores() const
{
  const long numCPU = sysconf(_SC_NPROCESSORS_ONLN);
  if (numCPU >= 1)
    return static_cast<int>(numCPU);
  return 1;
}

string Platform::UniqueClientId() const
{  
  string machineFile = "/var/lib/dbus/machine-id";
  if (IsFileExistsByFullPath("/etc/machine-id"))
    machineFile = "/etc/machine-id";

  string content;
  FileReader(machineFile).ReadAsString(content);

  return content.substr(0,32);
}

void Platform::RunOnGuiThread(TFunctor const & fn)
{
  /// @todo
  fn();
}

void Platform::RunAsync(TFunctor const & fn, Priority p)
{
  /// @todo
  fn();
}