180814287SRaphael Isemann //===-- DynamicLoader.cpp -------------------------------------------------===//
230fdc8d8SChris Lattner //
32946cd70SChandler Carruth // Part of the LLVM Project, under the Apache License v2.0 with LLVM Exceptions.
42946cd70SChandler Carruth // See https://llvm.org/LICENSE.txt for license information.
52946cd70SChandler Carruth // SPDX-License-Identifier: Apache-2.0 WITH LLVM-exception
630fdc8d8SChris Lattner //
730fdc8d8SChris Lattner //===----------------------------------------------------------------------===//
830fdc8d8SChris Lattner 
9b9c1b51eSKate Stone #include "lldb/Target/DynamicLoader.h"
102f3df613SZachary Turner 
119e02dacdSSteve Pucci #include "lldb/Core/Module.h"
12672d2c12SJonas Devlieghere #include "lldb/Core/ModuleList.h"
139e02dacdSSteve Pucci #include "lldb/Core/ModuleSpec.h"
14d7d69f80STamas Berghammer #include "lldb/Core/PluginManager.h"
159e02dacdSSteve Pucci #include "lldb/Core/Section.h"
16672d2c12SJonas Devlieghere #include "lldb/Symbol/ObjectFile.h"
17d7d69f80STamas Berghammer #include "lldb/Target/MemoryRegionInfo.h"
18d7d69f80STamas Berghammer #include "lldb/Target/Process.h"
19d7d69f80STamas Berghammer #include "lldb/Target/Target.h"
20672d2c12SJonas Devlieghere #include "lldb/Utility/ConstString.h"
21672d2c12SJonas Devlieghere #include "lldb/lldb-private-interfaces.h"
222f3df613SZachary Turner 
23672d2c12SJonas Devlieghere #include "llvm/ADT/StringRef.h"
242f3df613SZachary Turner 
25672d2c12SJonas Devlieghere #include <memory>
262f3df613SZachary Turner 
27*76e47d48SRaphael Isemann #include <cassert>
2830fdc8d8SChris Lattner 
2930fdc8d8SChris Lattner using namespace lldb;
3030fdc8d8SChris Lattner using namespace lldb_private;
3130fdc8d8SChris Lattner 
32b9c1b51eSKate Stone DynamicLoader *DynamicLoader::FindPlugin(Process *process,
33b9c1b51eSKate Stone                                          const char *plugin_name) {
3434ede34aSEugene Zelenko   DynamicLoaderCreateInstance create_callback = nullptr;
35b9c1b51eSKate Stone   if (plugin_name) {
3657abc5d6SGreg Clayton     ConstString const_plugin_name(plugin_name);
37b9c1b51eSKate Stone     create_callback =
38b9c1b51eSKate Stone         PluginManager::GetDynamicLoaderCreateCallbackForPluginName(
39b9c1b51eSKate Stone             const_plugin_name);
40b9c1b51eSKate Stone     if (create_callback) {
41d5b44036SJonas Devlieghere       std::unique_ptr<DynamicLoader> instance_up(
42b9c1b51eSKate Stone           create_callback(process, true));
43d5b44036SJonas Devlieghere       if (instance_up)
44d5b44036SJonas Devlieghere         return instance_up.release();
4530fdc8d8SChris Lattner     }
46b9c1b51eSKate Stone   } else {
47b9c1b51eSKate Stone     for (uint32_t idx = 0;
48b9c1b51eSKate Stone          (create_callback =
49b9c1b51eSKate Stone               PluginManager::GetDynamicLoaderCreateCallbackAtIndex(idx)) !=
50b9c1b51eSKate Stone          nullptr;
51b9c1b51eSKate Stone          ++idx) {
52d5b44036SJonas Devlieghere       std::unique_ptr<DynamicLoader> instance_up(
53b9c1b51eSKate Stone           create_callback(process, false));
54d5b44036SJonas Devlieghere       if (instance_up)
55d5b44036SJonas Devlieghere         return instance_up.release();
5630fdc8d8SChris Lattner     }
5730fdc8d8SChris Lattner   }
5834ede34aSEugene Zelenko   return nullptr;
5930fdc8d8SChris Lattner }
6030fdc8d8SChris Lattner 
61b9c1b51eSKate Stone DynamicLoader::DynamicLoader(Process *process) : m_process(process) {}
6230fdc8d8SChris Lattner 
6305097246SAdrian Prantl // Accessosors to the global setting as to whether to stop at image (shared
6405097246SAdrian Prantl // library) loading/unloading.
6534ede34aSEugene Zelenko 
66b9c1b51eSKate Stone bool DynamicLoader::GetStopWhenImagesChange() const {
672995077dSJim Ingham   return m_process->GetStopOnSharedLibraryEvents();
6830fdc8d8SChris Lattner }
6930fdc8d8SChris Lattner 
70b9c1b51eSKate Stone void DynamicLoader::SetStopWhenImagesChange(bool stop) {
712995077dSJim Ingham   m_process->SetStopOnSharedLibraryEvents(stop);
7230fdc8d8SChris Lattner }
7330fdc8d8SChris Lattner 
74b9c1b51eSKate Stone ModuleSP DynamicLoader::GetTargetExecutable() {
759e02dacdSSteve Pucci   Target &target = m_process->GetTarget();
769e02dacdSSteve Pucci   ModuleSP executable = target.GetExecutableModule();
779e02dacdSSteve Pucci 
78b9c1b51eSKate Stone   if (executable) {
79dbd7fabaSJonas Devlieghere     if (FileSystem::Instance().Exists(executable->GetFileSpec())) {
80b9c1b51eSKate Stone       ModuleSpec module_spec(executable->GetFileSpec(),
81b9c1b51eSKate Stone                              executable->GetArchitecture());
822f3df613SZachary Turner       auto module_sp = std::make_shared<Module>(module_spec);
839e02dacdSSteve Pucci 
8405097246SAdrian Prantl       // Check if the executable has changed and set it to the target
8505097246SAdrian Prantl       // executable if they differ.
86b9c1b51eSKate Stone       if (module_sp && module_sp->GetUUID().IsValid() &&
87b9c1b51eSKate Stone           executable->GetUUID().IsValid()) {
889e02dacdSSteve Pucci         if (module_sp->GetUUID() != executable->GetUUID())
899e02dacdSSteve Pucci           executable.reset();
90b9c1b51eSKate Stone       } else if (executable->FileHasChanged()) {
919e02dacdSSteve Pucci         executable.reset();
929e02dacdSSteve Pucci       }
939e02dacdSSteve Pucci 
94b9c1b51eSKate Stone       if (!executable) {
951724a179SJason Molenda         executable = target.GetOrCreateModule(module_spec, true /* notify */);
96b9c1b51eSKate Stone         if (executable.get() != target.GetExecutableModulePointer()) {
9705097246SAdrian Prantl           // Don't load dependent images since we are in dyld where we will
9805097246SAdrian Prantl           // know and find out about all images that are loaded
99f9a07e9fSJonas Devlieghere           target.SetExecutableModule(executable, eLoadDependentsNo);
1009e02dacdSSteve Pucci         }
1019e02dacdSSteve Pucci       }
1029e02dacdSSteve Pucci     }
1039e02dacdSSteve Pucci   }
1049e02dacdSSteve Pucci   return executable;
1059e02dacdSSteve Pucci }
1069e02dacdSSteve Pucci 
107b9c1b51eSKate Stone void DynamicLoader::UpdateLoadedSections(ModuleSP module, addr_t link_map_addr,
10842ecef3bSTamas Berghammer                                          addr_t base_addr,
109b9c1b51eSKate Stone                                          bool base_addr_is_offset) {
11042ecef3bSTamas Berghammer   UpdateLoadedSectionsCommon(module, base_addr, base_addr_is_offset);
1119e02dacdSSteve Pucci }
1129e02dacdSSteve Pucci 
113b9c1b51eSKate Stone void DynamicLoader::UpdateLoadedSectionsCommon(ModuleSP module,
11442ecef3bSTamas Berghammer                                                addr_t base_addr,
115b9c1b51eSKate Stone                                                bool base_addr_is_offset) {
1169e02dacdSSteve Pucci   bool changed;
117b9c1b51eSKate Stone   module->SetLoadAddress(m_process->GetTarget(), base_addr, base_addr_is_offset,
118b9c1b51eSKate Stone                          changed);
1199e02dacdSSteve Pucci }
1209e02dacdSSteve Pucci 
121b9c1b51eSKate Stone void DynamicLoader::UnloadSections(const ModuleSP module) {
1229e02dacdSSteve Pucci   UnloadSectionsCommon(module);
1239e02dacdSSteve Pucci }
1249e02dacdSSteve Pucci 
125b9c1b51eSKate Stone void DynamicLoader::UnloadSectionsCommon(const ModuleSP module) {
1269e02dacdSSteve Pucci   Target &target = m_process->GetTarget();
1279e02dacdSSteve Pucci   const SectionList *sections = GetSectionListFromModule(module);
1289e02dacdSSteve Pucci 
1299e02dacdSSteve Pucci   assert(sections && "SectionList missing from unloaded module.");
1309e02dacdSSteve Pucci 
1319e02dacdSSteve Pucci   const size_t num_sections = sections->GetSize();
132b9c1b51eSKate Stone   for (size_t i = 0; i < num_sections; ++i) {
1339e02dacdSSteve Pucci     SectionSP section_sp(sections->GetSectionAtIndex(i));
1349e02dacdSSteve Pucci     target.SetSectionUnloaded(section_sp);
1359e02dacdSSteve Pucci   }
1369e02dacdSSteve Pucci }
1379e02dacdSSteve Pucci 
1389e02dacdSSteve Pucci const SectionList *
139b9c1b51eSKate Stone DynamicLoader::GetSectionListFromModule(const ModuleSP module) const {
1409e02dacdSSteve Pucci   SectionList *sections = nullptr;
141b9c1b51eSKate Stone   if (module) {
1429e02dacdSSteve Pucci     ObjectFile *obj_file = module->GetObjectFile();
143b9c1b51eSKate Stone     if (obj_file != nullptr) {
1449e02dacdSSteve Pucci       sections = obj_file->GetSectionList();
1459e02dacdSSteve Pucci     }
1469e02dacdSSteve Pucci   }
1479e02dacdSSteve Pucci   return sections;
1489e02dacdSSteve Pucci }
1499e02dacdSSteve Pucci 
150b9c1b51eSKate Stone ModuleSP DynamicLoader::LoadModuleAtAddress(const FileSpec &file,
15142ecef3bSTamas Berghammer                                             addr_t link_map_addr,
15242ecef3bSTamas Berghammer                                             addr_t base_addr,
153b9c1b51eSKate Stone                                             bool base_addr_is_offset) {
1549e02dacdSSteve Pucci   Target &target = m_process->GetTarget();
1559e02dacdSSteve Pucci   ModuleList &modules = target.GetImages();
156d7d69f80STamas Berghammer   ModuleSpec module_spec(file, target.GetArchitecture());
1579e02dacdSSteve Pucci   ModuleSP module_sp;
1589e02dacdSSteve Pucci 
159b9c1b51eSKate Stone   if ((module_sp = modules.FindFirstModule(module_spec))) {
160b9c1b51eSKate Stone     UpdateLoadedSections(module_sp, link_map_addr, base_addr,
161b9c1b51eSKate Stone                          base_addr_is_offset);
162d7d69f80STamas Berghammer     return module_sp;
1639e02dacdSSteve Pucci   }
164d7d69f80STamas Berghammer 
1651724a179SJason Molenda   if ((module_sp = target.GetOrCreateModule(module_spec,
1661724a179SJason Molenda                                             true /* notify */))) {
167b9c1b51eSKate Stone     UpdateLoadedSections(module_sp, link_map_addr, base_addr,
168b9c1b51eSKate Stone                          base_addr_is_offset);
169d7d69f80STamas Berghammer     return module_sp;
1709e02dacdSSteve Pucci   }
171d7d69f80STamas Berghammer 
172d7d69f80STamas Berghammer   bool check_alternative_file_name = true;
173b9c1b51eSKate Stone   if (base_addr_is_offset) {
174b9c1b51eSKate Stone     // Try to fetch the load address of the file from the process as we need
17505097246SAdrian Prantl     // absolute load address to read the file out of the memory instead of a
17605097246SAdrian Prantl     // load bias.
1775d410241SJason Molenda     bool is_loaded = false;
178f2561846STamas Berghammer     lldb::addr_t load_addr;
17997206d57SZachary Turner     Status error = m_process->GetFileLoadAddress(file, is_loaded, load_addr);
180b9c1b51eSKate Stone     if (error.Success() && is_loaded) {
181d7d69f80STamas Berghammer       check_alternative_file_name = false;
18242ecef3bSTamas Berghammer       base_addr = load_addr;
18342ecef3bSTamas Berghammer     }
184d7d69f80STamas Berghammer   }
185d7d69f80STamas Berghammer 
18605097246SAdrian Prantl   // We failed to find the module based on its name. Lets try to check if we
18705097246SAdrian Prantl   // can find a different name based on the memory region info.
188b9c1b51eSKate Stone   if (check_alternative_file_name) {
189d7d69f80STamas Berghammer     MemoryRegionInfo memory_info;
19097206d57SZachary Turner     Status error = m_process->GetMemoryRegionInfo(base_addr, memory_info);
191b9c1b51eSKate Stone     if (error.Success() && memory_info.GetMapped() &&
1925ba3d85cSNitesh Jain         memory_info.GetRange().GetRangeBase() == base_addr &&
1935ba3d85cSNitesh Jain         !(memory_info.GetName().IsEmpty())) {
194642bc15dSRaphael Isemann       ModuleSpec new_module_spec(FileSpec(memory_info.GetName().GetStringRef()),
195d7d69f80STamas Berghammer                                  target.GetArchitecture());
196d7d69f80STamas Berghammer 
197b9c1b51eSKate Stone       if ((module_sp = modules.FindFirstModule(new_module_spec))) {
198d7d69f80STamas Berghammer         UpdateLoadedSections(module_sp, link_map_addr, base_addr, false);
199d7d69f80STamas Berghammer         return module_sp;
200d7d69f80STamas Berghammer       }
201d7d69f80STamas Berghammer 
2021724a179SJason Molenda       if ((module_sp = target.GetOrCreateModule(new_module_spec,
2031724a179SJason Molenda                                                 true /* notify */))) {
204d7d69f80STamas Berghammer         UpdateLoadedSections(module_sp, link_map_addr, base_addr, false);
205d7d69f80STamas Berghammer         return module_sp;
206d7d69f80STamas Berghammer       }
207d7d69f80STamas Berghammer     }
208d7d69f80STamas Berghammer   }
209f2561846STamas Berghammer 
210b9c1b51eSKate Stone   if ((module_sp = m_process->ReadModuleFromMemory(file, base_addr))) {
21142ecef3bSTamas Berghammer     UpdateLoadedSections(module_sp, link_map_addr, base_addr, false);
212f2561846STamas Berghammer     target.GetImages().AppendIfNeeded(module_sp);
213f2561846STamas Berghammer   }
2149e02dacdSSteve Pucci 
2159e02dacdSSteve Pucci   return module_sp;
2169e02dacdSSteve Pucci }
2179e02dacdSSteve Pucci 
218b9c1b51eSKate Stone int64_t DynamicLoader::ReadUnsignedIntWithSizeInBytes(addr_t addr,
219b9c1b51eSKate Stone                                                       int size_in_bytes) {
22097206d57SZachary Turner   Status error;
221b9c1b51eSKate Stone   uint64_t value =
222b9c1b51eSKate Stone       m_process->ReadUnsignedIntegerFromMemory(addr, size_in_bytes, 0, error);
2239e02dacdSSteve Pucci   if (error.Fail())
2249e02dacdSSteve Pucci     return -1;
2259e02dacdSSteve Pucci   else
2269e02dacdSSteve Pucci     return (int64_t)value;
2279e02dacdSSteve Pucci }
2289e02dacdSSteve Pucci 
229b9c1b51eSKate Stone addr_t DynamicLoader::ReadPointer(addr_t addr) {
23097206d57SZachary Turner   Status error;
2319e02dacdSSteve Pucci   addr_t value = m_process->ReadPointerFromMemory(addr, error);
2329e02dacdSSteve Pucci   if (error.Fail())
2339e02dacdSSteve Pucci     return LLDB_INVALID_ADDRESS;
2349e02dacdSSteve Pucci   else
2359e02dacdSSteve Pucci     return value;
2369e02dacdSSteve Pucci }
237519b0816SJim Ingham 
238519b0816SJim Ingham void DynamicLoader::LoadOperatingSystemPlugin(bool flush)
239519b0816SJim Ingham {
240519b0816SJim Ingham     if (m_process)
241519b0816SJim Ingham         m_process->LoadOperatingSystemPlugin(flush);
242519b0816SJim Ingham }
243519b0816SJim Ingham 
244