130fdc8d8SChris Lattner //===-- SBHostOS.cpp --------------------------------------------*- C++ -*-===//
230fdc8d8SChris Lattner //
330fdc8d8SChris Lattner //                     The LLVM Compiler Infrastructure
430fdc8d8SChris Lattner //
530fdc8d8SChris Lattner // This file is distributed under the University of Illinois Open Source
630fdc8d8SChris Lattner // License. See LICENSE.TXT for details.
730fdc8d8SChris Lattner //
830fdc8d8SChris Lattner //===----------------------------------------------------------------------===//
930fdc8d8SChris Lattner 
1030fdc8d8SChris Lattner #include "lldb/API/SBHostOS.h"
1130fdc8d8SChris Lattner #include "lldb/API/SBError.h"
1230fdc8d8SChris Lattner #include "lldb/Host/Host.h"
1342ff0ad8SZachary Turner #include "lldb/Host/HostInfo.h"
14c3018992SZachary Turner #include "lldb/Host/HostNativeThread.h"
1539de3110SZachary Turner #include "lldb/Host/HostThread.h"
1639de3110SZachary Turner #include "lldb/Host/ThreadLauncher.h"
175713a05bSZachary Turner #include "lldb/Utility/FileSpec.h"
186f9e6901SZachary Turner #include "lldb/Utility/Log.h"
1939de3110SZachary Turner 
20bdf08924SZachary Turner #include "Plugins/ExpressionParser/Clang/ClangHost.h"
21*2df331b0SPavel Labath #include "Plugins/ScriptInterpreter/Python/ScriptInterpreterPython.h"
22bdf08924SZachary Turner 
237eafdcedSPavel Labath #include "llvm/ADT/SmallString.h"
24b9c1b51eSKate Stone #include "llvm/Support/Path.h"
25878ae018SJason Molenda 
2630fdc8d8SChris Lattner using namespace lldb;
2730fdc8d8SChris Lattner using namespace lldb_private;
2830fdc8d8SChris Lattner 
29b9c1b51eSKate Stone SBFileSpec SBHostOS::GetProgramFileSpec() {
3030fdc8d8SChris Lattner   SBFileSpec sb_filespec;
31a21fee0eSZachary Turner   sb_filespec.SetFileSpec(HostInfo::GetProgramFileSpec());
3230fdc8d8SChris Lattner   return sb_filespec;
3330fdc8d8SChris Lattner }
3430fdc8d8SChris Lattner 
35b9c1b51eSKate Stone SBFileSpec SBHostOS::GetLLDBPythonPath() {
3660f028ffSPavel Labath   return GetLLDBPath(ePathTypePythonDir);
37e2231ac7SJim Ingham }
38e2231ac7SJim Ingham 
39b9c1b51eSKate Stone SBFileSpec SBHostOS::GetLLDBPath(lldb::PathType path_type) {
4006357c93SGreg Clayton   FileSpec fspec;
4160f028ffSPavel Labath   switch (path_type) {
4260f028ffSPavel Labath   case ePathTypeLLDBShlibDir:
4360f028ffSPavel Labath     fspec = HostInfo::GetShlibDir();
4460f028ffSPavel Labath     break;
4560f028ffSPavel Labath   case ePathTypeSupportExecutableDir:
4660f028ffSPavel Labath     fspec = HostInfo::GetSupportExeDir();
4760f028ffSPavel Labath     break;
4860f028ffSPavel Labath   case ePathTypeHeaderDir:
4960f028ffSPavel Labath     fspec = HostInfo::GetHeaderDir();
5060f028ffSPavel Labath     break;
5160f028ffSPavel Labath   case ePathTypePythonDir:
52*2df331b0SPavel Labath     fspec = ScriptInterpreterPython::GetPythonDir();
5360f028ffSPavel Labath     break;
5460f028ffSPavel Labath   case ePathTypeLLDBSystemPlugins:
5560f028ffSPavel Labath     fspec = HostInfo::GetSystemPluginDir();
5660f028ffSPavel Labath     break;
5760f028ffSPavel Labath   case ePathTypeLLDBUserPlugins:
5860f028ffSPavel Labath     fspec = HostInfo::GetUserPluginDir();
5960f028ffSPavel Labath     break;
6060f028ffSPavel Labath   case ePathTypeLLDBTempSystemDir:
6160f028ffSPavel Labath     fspec = HostInfo::GetProcessTempDir();
6260f028ffSPavel Labath     break;
6360f028ffSPavel Labath   case ePathTypeGlobalLLDBTempSystemDir:
6460f028ffSPavel Labath     fspec = HostInfo::GetGlobalTempDir();
6560f028ffSPavel Labath     break;
6660f028ffSPavel Labath   case ePathTypeClangDir:
67bdf08924SZachary Turner     fspec = GetClangResourceDir();
6860f028ffSPavel Labath     break;
6960f028ffSPavel Labath   }
7060f028ffSPavel Labath 
7160f028ffSPavel Labath   SBFileSpec sb_fspec;
7206357c93SGreg Clayton   sb_fspec.SetFileSpec(fspec);
7306357c93SGreg Clayton   return sb_fspec;
7406357c93SGreg Clayton }
7506357c93SGreg Clayton 
76b9c1b51eSKate Stone SBFileSpec SBHostOS::GetUserHomeDirectory() {
77878ae018SJason Molenda   SBFileSpec sb_fspec;
78878ae018SJason Molenda 
79878ae018SJason Molenda   llvm::SmallString<64> home_dir_path;
80878ae018SJason Molenda   llvm::sys::path::home_directory(home_dir_path);
81878ae018SJason Molenda   FileSpec homedir(home_dir_path.c_str(), true);
82878ae018SJason Molenda 
83878ae018SJason Molenda   sb_fspec.SetFileSpec(homedir);
84878ae018SJason Molenda   return sb_fspec;
85878ae018SJason Molenda }
86878ae018SJason Molenda 
87b9c1b51eSKate Stone lldb::thread_t SBHostOS::ThreadCreate(const char *name,
8899fbc076SDeepak Panickal                                       lldb::thread_func_t thread_function,
89b9c1b51eSKate Stone                                       void *thread_arg, SBError *error_ptr) {
905160ce5cSGreg Clayton   Log *log(lldb_private::GetLogIfAllCategoriesSet(LIBLLDB_LOG_API));
91ceb6b139SCaroline Tice 
92ceb6b139SCaroline Tice   if (log)
93b9c1b51eSKate Stone     log->Printf(
94b9c1b51eSKate Stone         "SBHostOS::ThreadCreate (name=\"%s\", thread_function=%p, "
95b9c1b51eSKate Stone         "thread_arg=%p, error_ptr=%p)",
96b9c1b51eSKate Stone         name,
97b9c1b51eSKate Stone         reinterpret_cast<void *>(reinterpret_cast<intptr_t>(thread_function)),
98b9c1b51eSKate Stone         static_cast<void *>(thread_arg), static_cast<void *>(error_ptr));
99ceb6b139SCaroline Tice 
100c1338e8dSCaroline Tice   // FIXME: You should log the return value?
101ceb6b139SCaroline Tice 
102b9c1b51eSKate Stone   HostThread thread(ThreadLauncher::LaunchThread(
103b9c1b51eSKate Stone       name, thread_function, thread_arg, error_ptr ? error_ptr->get() : NULL));
10439de3110SZachary Turner   return thread.Release();
10530fdc8d8SChris Lattner }
10630fdc8d8SChris Lattner 
107b9c1b51eSKate Stone void SBHostOS::ThreadCreated(const char *name) {}
10830fdc8d8SChris Lattner 
109b9c1b51eSKate Stone bool SBHostOS::ThreadCancel(lldb::thread_t thread, SBError *error_ptr) {
11097206d57SZachary Turner   Status error;
11139de3110SZachary Turner   HostThread host_thread(thread);
11239de3110SZachary Turner   error = host_thread.Cancel();
11339de3110SZachary Turner   if (error_ptr)
11439de3110SZachary Turner     error_ptr->SetError(error);
11539de3110SZachary Turner   host_thread.Release();
11639de3110SZachary Turner   return error.Success();
11730fdc8d8SChris Lattner }
11830fdc8d8SChris Lattner 
119b9c1b51eSKate Stone bool SBHostOS::ThreadDetach(lldb::thread_t thread, SBError *error_ptr) {
12097206d57SZachary Turner   Status error;
12139de3110SZachary Turner #if defined(_WIN32)
12239de3110SZachary Turner   if (error_ptr)
12339de3110SZachary Turner     error_ptr->SetErrorString("ThreadDetach is not supported on this platform");
12439de3110SZachary Turner #else
12539de3110SZachary Turner   HostThread host_thread(thread);
126c3018992SZachary Turner   error = host_thread.GetNativeThread().Detach();
12739de3110SZachary Turner   if (error_ptr)
12839de3110SZachary Turner     error_ptr->SetError(error);
12939de3110SZachary Turner   host_thread.Release();
13039de3110SZachary Turner #endif
13139de3110SZachary Turner   return error.Success();
13230fdc8d8SChris Lattner }
13330fdc8d8SChris Lattner 
134b9c1b51eSKate Stone bool SBHostOS::ThreadJoin(lldb::thread_t thread, lldb::thread_result_t *result,
135b9c1b51eSKate Stone                           SBError *error_ptr) {
13697206d57SZachary Turner   Status error;
13739de3110SZachary Turner   HostThread host_thread(thread);
13839de3110SZachary Turner   error = host_thread.Join(result);
13939de3110SZachary Turner   if (error_ptr)
14039de3110SZachary Turner     error_ptr->SetError(error);
14139de3110SZachary Turner   host_thread.Release();
14239de3110SZachary Turner   return error.Success();
14330fdc8d8SChris Lattner }
144