| /* | 
 |  * Copyright (C) 2017 The Android Open Source Project | 
 |  * | 
 |  * Licensed under the Apache License, Version 2.0 (the "License"); | 
 |  * you may not use this file except in compliance with the License. | 
 |  * You may obtain a copy of the License at | 
 |  * | 
 |  *      http://www.apache.org/licenses/LICENSE-2.0 | 
 |  * | 
 |  * Unless required by applicable law or agreed to in writing, software | 
 |  * distributed under the License is distributed on an "AS IS" BASIS, | 
 |  * WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied. | 
 |  * See the License for the specific language governing permissions and | 
 |  * limitations under the License. | 
 |  */ | 
 |  | 
 | #include <errno.h> | 
 | #include <signal.h> | 
 | #include <stdint.h> | 
 | #include <string.h> | 
 | #include <sys/ptrace.h> | 
 | #include <sys/syscall.h> | 
 | #include <unistd.h> | 
 |  | 
 | #include <gtest/gtest.h> | 
 |  | 
 | #include <atomic> | 
 | #include <memory> | 
 | #include <sstream> | 
 | #include <string> | 
 | #include <thread> | 
 | #include <vector> | 
 |  | 
 | #include <android-base/stringprintf.h> | 
 | #include <android-base/threads.h> | 
 |  | 
 | #include <unwindstack/Maps.h> | 
 | #include <unwindstack/Regs.h> | 
 | #include <unwindstack/RegsGetLocal.h> | 
 | #include <unwindstack/Unwinder.h> | 
 |  | 
 | #include "MemoryRemote.h" | 
 | #include "TestUtils.h" | 
 |  | 
 | namespace unwindstack { | 
 |  | 
 | enum TestTypeEnum : uint8_t { | 
 |   TEST_TYPE_LOCAL_UNWINDER = 0, | 
 |   TEST_TYPE_LOCAL_UNWINDER_FROM_PID, | 
 |   TEST_TYPE_LOCAL_WAIT_FOR_FINISH, | 
 |   TEST_TYPE_REMOTE, | 
 |   TEST_TYPE_REMOTE_WITH_INVALID_CALL, | 
 | }; | 
 |  | 
 | static std::atomic_bool g_ready; | 
 | static volatile bool g_ready_for_remote; | 
 | static volatile bool g_signal_ready_for_remote; | 
 | static std::atomic_bool g_finish; | 
 | static std::atomic_uintptr_t g_ucontext; | 
 |  | 
 | static void ResetGlobals() { | 
 |   g_ready = false; | 
 |   g_ready_for_remote = false; | 
 |   g_signal_ready_for_remote = false; | 
 |   g_finish = false; | 
 |   g_ucontext = 0; | 
 | } | 
 |  | 
 | static std::vector<const char*> kFunctionOrder{"OuterFunction", "MiddleFunction", "InnerFunction"}; | 
 |  | 
 | static std::vector<const char*> kFunctionSignalOrder{"OuterFunction",        "MiddleFunction", | 
 |                                                      "InnerFunction",        "SignalOuterFunction", | 
 |                                                      "SignalMiddleFunction", "SignalInnerFunction"}; | 
 |  | 
 | static void SignalHandler(int, siginfo_t*, void* sigcontext) { | 
 |   g_ucontext = reinterpret_cast<uintptr_t>(sigcontext); | 
 |   while (!g_finish.load()) { | 
 |   } | 
 | } | 
 |  | 
 | extern "C" void SignalInnerFunction() { | 
 |   g_signal_ready_for_remote = true; | 
 |   // Avoid any function calls because not every instruction will be | 
 |   // unwindable. | 
 |   // This method of looping is only used when testing a remote unwind. | 
 |   while (true) { | 
 |   } | 
 | } | 
 |  | 
 | extern "C" void SignalMiddleFunction() { | 
 |   SignalInnerFunction(); | 
 | } | 
 |  | 
 | extern "C" void SignalOuterFunction() { | 
 |   SignalMiddleFunction(); | 
 | } | 
 |  | 
 | static void SignalCallerHandler(int, siginfo_t*, void*) { | 
 |   SignalOuterFunction(); | 
 | } | 
 |  | 
 | static std::string ErrorMsg(const std::vector<const char*>& function_names, Unwinder* unwinder) { | 
 |   std::string unwind; | 
 |   for (size_t i = 0; i < unwinder->NumFrames(); i++) { | 
 |     unwind += unwinder->FormatFrame(i) + '\n'; | 
 |   } | 
 |  | 
 |   return std::string( | 
 |              "Unwind completed without finding all frames\n" | 
 |              "  Looking for function: ") + | 
 |          function_names.front() + "\n" + "Unwind data:\n" + unwind; | 
 | } | 
 |  | 
 | static void VerifyUnwind(Unwinder* unwinder, std::vector<const char*> expected_function_names) { | 
 |   unwinder->Unwind(); | 
 |  | 
 |   for (auto& frame : unwinder->frames()) { | 
 |     if (frame.function_name == expected_function_names.back()) { | 
 |       expected_function_names.pop_back(); | 
 |       if (expected_function_names.empty()) { | 
 |         break; | 
 |       } | 
 |     } | 
 |   } | 
 |  | 
 |   ASSERT_TRUE(expected_function_names.empty()) << ErrorMsg(expected_function_names, unwinder); | 
 | } | 
 |  | 
 | static void VerifyUnwind(pid_t pid, Maps* maps, Regs* regs, | 
 |                          std::vector<const char*> expected_function_names) { | 
 |   auto process_memory(Memory::CreateProcessMemory(pid)); | 
 |  | 
 |   Unwinder unwinder(512, maps, regs, process_memory); | 
 |   VerifyUnwind(&unwinder, expected_function_names); | 
 | } | 
 |  | 
 | // This test assumes that this code is compiled with optimizations turned | 
 | // off. If this doesn't happen, then all of the calls will be optimized | 
 | // away. | 
 | extern "C" void InnerFunction(TestTypeEnum test_type) { | 
 |   if (test_type == TEST_TYPE_LOCAL_WAIT_FOR_FINISH) { | 
 |     while (!g_finish.load()) { | 
 |     } | 
 |     return; | 
 |   } | 
 |   if (test_type == TEST_TYPE_REMOTE || test_type == TEST_TYPE_REMOTE_WITH_INVALID_CALL) { | 
 |     g_ready_for_remote = true; | 
 |     g_ready = true; | 
 |     if (test_type == TEST_TYPE_REMOTE_WITH_INVALID_CALL) { | 
 |       void (*crash_func)() = nullptr; | 
 |       crash_func(); | 
 |     } | 
 |     // Avoid any function calls because not every instruction will be | 
 |     // unwindable. | 
 |     // This method of looping is only used when testing a remote unwind. | 
 |     while (true) { | 
 |     } | 
 |     return; | 
 |   } | 
 |  | 
 |   std::unique_ptr<Unwinder> unwinder; | 
 |   std::unique_ptr<Regs> regs(Regs::CreateFromLocal()); | 
 |   RegsGetLocal(regs.get()); | 
 |   std::unique_ptr<Maps> maps; | 
 |  | 
 |   if (test_type == TEST_TYPE_LOCAL_UNWINDER) { | 
 |     maps.reset(new LocalMaps()); | 
 |     ASSERT_TRUE(maps->Parse()); | 
 |     auto process_memory(Memory::CreateProcessMemory(getpid())); | 
 |     unwinder.reset(new Unwinder(512, maps.get(), regs.get(), process_memory)); | 
 |   } else { | 
 |     UnwinderFromPid* unwinder_from_pid = new UnwinderFromPid(512, getpid()); | 
 |     ASSERT_TRUE(unwinder_from_pid->Init(regs->Arch())); | 
 |     unwinder_from_pid->SetRegs(regs.get()); | 
 |     unwinder.reset(unwinder_from_pid); | 
 |   } | 
 |   VerifyUnwind(unwinder.get(), kFunctionOrder); | 
 | } | 
 |  | 
 | extern "C" void MiddleFunction(TestTypeEnum test_type) { | 
 |   InnerFunction(test_type); | 
 | } | 
 |  | 
 | extern "C" void OuterFunction(TestTypeEnum test_type) { | 
 |   MiddleFunction(test_type); | 
 | } | 
 |  | 
 | class UnwindTest : public ::testing::Test { | 
 |  public: | 
 |   void SetUp() override { ResetGlobals(); } | 
 | }; | 
 |  | 
 | TEST_F(UnwindTest, local) { | 
 |   OuterFunction(TEST_TYPE_LOCAL_UNWINDER); | 
 | } | 
 |  | 
 | TEST_F(UnwindTest, local_use_from_pid) { | 
 |   OuterFunction(TEST_TYPE_LOCAL_UNWINDER_FROM_PID); | 
 | } | 
 |  | 
 | static void LocalUnwind(void* data) { | 
 |   TestTypeEnum* test_type = reinterpret_cast<TestTypeEnum*>(data); | 
 |   OuterFunction(*test_type); | 
 | } | 
 |  | 
 | TEST_F(UnwindTest, local_check_for_leak) { | 
 |   TestTypeEnum test_type = TEST_TYPE_LOCAL_UNWINDER; | 
 |   TestCheckForLeaks(LocalUnwind, &test_type); | 
 | } | 
 |  | 
 | TEST_F(UnwindTest, local_use_from_pid_check_for_leak) { | 
 |   TestTypeEnum test_type = TEST_TYPE_LOCAL_UNWINDER_FROM_PID; | 
 |   TestCheckForLeaks(LocalUnwind, &test_type); | 
 | } | 
 |  | 
 | void WaitForRemote(pid_t pid, uint64_t addr, bool leave_attached, bool* completed) { | 
 |   *completed = false; | 
 |   // Need to sleep before attempting first ptrace. Without this, on the | 
 |   // host it becomes impossible to attach and ptrace sets errno to EPERM. | 
 |   usleep(1000); | 
 |   for (size_t i = 0; i < 1000; i++) { | 
 |     if (ptrace(PTRACE_ATTACH, pid, 0, 0) == 0) { | 
 |       ASSERT_TRUE(TestQuiescePid(pid)) | 
 |           << "Waiting for process to quiesce failed: " << strerror(errno); | 
 |  | 
 |       MemoryRemote memory(pid); | 
 |       // Read the remote value to see if we are ready. | 
 |       bool value; | 
 |       if (memory.ReadFully(addr, &value, sizeof(value)) && value) { | 
 |         *completed = true; | 
 |       } | 
 |       if (!*completed || !leave_attached) { | 
 |         ASSERT_EQ(0, ptrace(PTRACE_DETACH, pid, 0, 0)); | 
 |       } | 
 |       if (*completed) { | 
 |         break; | 
 |       } | 
 |     } else { | 
 |       ASSERT_EQ(ESRCH, errno) << "ptrace attach failed with unexpected error: " << strerror(errno); | 
 |     } | 
 |     usleep(5000); | 
 |   } | 
 | } | 
 |  | 
 | TEST_F(UnwindTest, remote) { | 
 |   pid_t pid; | 
 |   if ((pid = fork()) == 0) { | 
 |     OuterFunction(TEST_TYPE_REMOTE); | 
 |     exit(0); | 
 |   } | 
 |   ASSERT_NE(-1, pid); | 
 |   TestScopedPidReaper reap(pid); | 
 |  | 
 |   bool completed; | 
 |   WaitForRemote(pid, reinterpret_cast<uint64_t>(&g_ready_for_remote), true, &completed); | 
 |   ASSERT_TRUE(completed) << "Timed out waiting for remote process to be ready."; | 
 |  | 
 |   RemoteMaps maps(pid); | 
 |   ASSERT_TRUE(maps.Parse()); | 
 |   std::unique_ptr<Regs> regs(Regs::RemoteGet(pid)); | 
 |   ASSERT_TRUE(regs.get() != nullptr); | 
 |  | 
 |   VerifyUnwind(pid, &maps, regs.get(), kFunctionOrder); | 
 |  | 
 |   ASSERT_EQ(0, ptrace(PTRACE_DETACH, pid, 0, 0)) | 
 |       << "ptrace detach failed with unexpected error: " << strerror(errno); | 
 | } | 
 |  | 
 | TEST_F(UnwindTest, unwind_from_pid_remote) { | 
 |   pid_t pid; | 
 |   if ((pid = fork()) == 0) { | 
 |     OuterFunction(TEST_TYPE_REMOTE); | 
 |     exit(0); | 
 |   } | 
 |   ASSERT_NE(-1, pid); | 
 |   TestScopedPidReaper reap(pid); | 
 |  | 
 |   bool completed; | 
 |   WaitForRemote(pid, reinterpret_cast<uint64_t>(&g_ready_for_remote), true, &completed); | 
 |   ASSERT_TRUE(completed) << "Timed out waiting for remote process to be ready."; | 
 |  | 
 |   std::unique_ptr<Regs> regs(Regs::RemoteGet(pid)); | 
 |   ASSERT_TRUE(regs.get() != nullptr); | 
 |  | 
 |   UnwinderFromPid unwinder(512, pid); | 
 |   ASSERT_TRUE(unwinder.Init(regs->Arch())); | 
 |   unwinder.SetRegs(regs.get()); | 
 |  | 
 |   VerifyUnwind(&unwinder, kFunctionOrder); | 
 |  | 
 |   // Verify that calling the same object works again. | 
 |  | 
 |   ASSERT_EQ(0, ptrace(PTRACE_DETACH, pid, 0, 0)) | 
 |       << "ptrace detach failed with unexpected error: " << strerror(errno); | 
 | } | 
 |  | 
 | static void RemoteCheckForLeaks(void (*unwind_func)(void*)) { | 
 |   pid_t pid; | 
 |   if ((pid = fork()) == 0) { | 
 |     OuterFunction(TEST_TYPE_REMOTE); | 
 |     exit(0); | 
 |   } | 
 |   ASSERT_NE(-1, pid); | 
 |   TestScopedPidReaper reap(pid); | 
 |  | 
 |   bool completed; | 
 |   WaitForRemote(pid, reinterpret_cast<uint64_t>(&g_ready_for_remote), true, &completed); | 
 |   ASSERT_TRUE(completed) << "Timed out waiting for remote process to be ready."; | 
 |  | 
 |   TestCheckForLeaks(unwind_func, &pid); | 
 |  | 
 |   ASSERT_EQ(0, ptrace(PTRACE_DETACH, pid, 0, 0)) | 
 |       << "ptrace detach failed with unexpected error: " << strerror(errno); | 
 | } | 
 |  | 
 | static void RemoteUnwind(void* data) { | 
 |   pid_t* pid = reinterpret_cast<pid_t*>(data); | 
 |  | 
 |   RemoteMaps maps(*pid); | 
 |   ASSERT_TRUE(maps.Parse()); | 
 |   std::unique_ptr<Regs> regs(Regs::RemoteGet(*pid)); | 
 |   ASSERT_TRUE(regs.get() != nullptr); | 
 |  | 
 |   VerifyUnwind(*pid, &maps, regs.get(), kFunctionOrder); | 
 | } | 
 |  | 
 | TEST_F(UnwindTest, remote_check_for_leaks) { | 
 |   RemoteCheckForLeaks(RemoteUnwind); | 
 | } | 
 |  | 
 | static void RemoteUnwindFromPid(void* data) { | 
 |   pid_t* pid = reinterpret_cast<pid_t*>(data); | 
 |  | 
 |   std::unique_ptr<Regs> regs(Regs::RemoteGet(*pid)); | 
 |   ASSERT_TRUE(regs.get() != nullptr); | 
 |  | 
 |   UnwinderFromPid unwinder(512, *pid); | 
 |   ASSERT_TRUE(unwinder.Init(regs->Arch())); | 
 |   unwinder.SetRegs(regs.get()); | 
 |  | 
 |   VerifyUnwind(&unwinder, kFunctionOrder); | 
 | } | 
 |  | 
 | TEST_F(UnwindTest, remote_unwind_for_pid_check_for_leaks) { | 
 |   RemoteCheckForLeaks(RemoteUnwindFromPid); | 
 | } | 
 |  | 
 | TEST_F(UnwindTest, from_context) { | 
 |   std::atomic_int tid(0); | 
 |   std::thread thread([&]() { | 
 |     tid = syscall(__NR_gettid); | 
 |     OuterFunction(TEST_TYPE_LOCAL_WAIT_FOR_FINISH); | 
 |   }); | 
 |  | 
 |   struct sigaction act, oldact; | 
 |   memset(&act, 0, sizeof(act)); | 
 |   act.sa_sigaction = SignalHandler; | 
 |   act.sa_flags = SA_RESTART | SA_SIGINFO | SA_ONSTACK; | 
 |   ASSERT_EQ(0, sigaction(SIGUSR1, &act, &oldact)); | 
 |   // Wait for the tid to get set. | 
 |   for (size_t i = 0; i < 100; i++) { | 
 |     if (tid.load() != 0) { | 
 |       break; | 
 |     } | 
 |     usleep(1000); | 
 |   } | 
 |   ASSERT_NE(0, tid.load()); | 
 |   ASSERT_EQ(0, tgkill(getpid(), tid.load(), SIGUSR1)) << "Error: " << strerror(errno); | 
 |  | 
 |   // Wait for context data. | 
 |   void* ucontext; | 
 |   for (size_t i = 0; i < 2000; i++) { | 
 |     ucontext = reinterpret_cast<void*>(g_ucontext.load()); | 
 |     if (ucontext != nullptr) { | 
 |       break; | 
 |     } | 
 |     usleep(1000); | 
 |   } | 
 |   ASSERT_TRUE(ucontext != nullptr) << "Timed out waiting for thread to respond to signal."; | 
 |  | 
 |   LocalMaps maps; | 
 |   ASSERT_TRUE(maps.Parse()); | 
 |   std::unique_ptr<Regs> regs(Regs::CreateFromUcontext(Regs::CurrentArch(), ucontext)); | 
 |  | 
 |   VerifyUnwind(getpid(), &maps, regs.get(), kFunctionOrder); | 
 |  | 
 |   ASSERT_EQ(0, sigaction(SIGUSR1, &oldact, nullptr)); | 
 |  | 
 |   g_finish = true; | 
 |   thread.join(); | 
 | } | 
 |  | 
 | static void RemoteThroughSignal(int signal, unsigned int sa_flags) { | 
 |   pid_t pid; | 
 |   if ((pid = fork()) == 0) { | 
 |     struct sigaction act, oldact; | 
 |     memset(&act, 0, sizeof(act)); | 
 |     act.sa_sigaction = SignalCallerHandler; | 
 |     act.sa_flags = SA_RESTART | SA_ONSTACK | sa_flags; | 
 |     ASSERT_EQ(0, sigaction(signal, &act, &oldact)); | 
 |  | 
 |     OuterFunction(signal != SIGSEGV ? TEST_TYPE_REMOTE : TEST_TYPE_REMOTE_WITH_INVALID_CALL); | 
 |     exit(0); | 
 |   } | 
 |   ASSERT_NE(-1, pid); | 
 |   TestScopedPidReaper reap(pid); | 
 |  | 
 |   bool completed; | 
 |   if (signal != SIGSEGV) { | 
 |     WaitForRemote(pid, reinterpret_cast<uint64_t>(&g_ready_for_remote), false, &completed); | 
 |     ASSERT_TRUE(completed) << "Timed out waiting for remote process to be ready."; | 
 |     ASSERT_EQ(0, kill(pid, SIGUSR1)); | 
 |   } | 
 |   WaitForRemote(pid, reinterpret_cast<uint64_t>(&g_signal_ready_for_remote), true, &completed); | 
 |   ASSERT_TRUE(completed) << "Timed out waiting for remote process to be in signal handler."; | 
 |  | 
 |   RemoteMaps maps(pid); | 
 |   ASSERT_TRUE(maps.Parse()); | 
 |   std::unique_ptr<Regs> regs(Regs::RemoteGet(pid)); | 
 |   ASSERT_TRUE(regs.get() != nullptr); | 
 |  | 
 |   VerifyUnwind(pid, &maps, regs.get(), kFunctionSignalOrder); | 
 |  | 
 |   ASSERT_EQ(0, ptrace(PTRACE_DETACH, pid, 0, 0)) | 
 |       << "ptrace detach failed with unexpected error: " << strerror(errno); | 
 | } | 
 |  | 
 | TEST_F(UnwindTest, remote_through_signal) { | 
 |   RemoteThroughSignal(SIGUSR1, 0); | 
 | } | 
 |  | 
 | TEST_F(UnwindTest, remote_through_signal_sa_siginfo) { | 
 |   RemoteThroughSignal(SIGUSR1, SA_SIGINFO); | 
 | } | 
 |  | 
 | TEST_F(UnwindTest, remote_through_signal_with_invalid_func) { | 
 |   RemoteThroughSignal(SIGSEGV, 0); | 
 | } | 
 |  | 
 | TEST_F(UnwindTest, remote_through_signal_sa_siginfo_with_invalid_func) { | 
 |   RemoteThroughSignal(SIGSEGV, SA_SIGINFO); | 
 | } | 
 |  | 
 | // Verify that using the same map while unwinding multiple threads at the | 
 | // same time doesn't cause problems. | 
 | TEST_F(UnwindTest, multiple_threads_unwind_same_map) { | 
 |   static constexpr size_t kNumConcurrentThreads = 100; | 
 |  | 
 |   LocalMaps maps; | 
 |   ASSERT_TRUE(maps.Parse()); | 
 |   auto process_memory(Memory::CreateProcessMemory(getpid())); | 
 |  | 
 |   std::vector<std::thread*> threads; | 
 |  | 
 |   std::atomic_bool wait; | 
 |   wait = true; | 
 |   size_t frames[kNumConcurrentThreads]; | 
 |   for (size_t i = 0; i < kNumConcurrentThreads; i++) { | 
 |     std::thread* thread = new std::thread([i, &frames, &maps, &process_memory, &wait]() { | 
 |       while (wait) | 
 |         ; | 
 |       std::unique_ptr<Regs> regs(Regs::CreateFromLocal()); | 
 |       RegsGetLocal(regs.get()); | 
 |  | 
 |       Unwinder unwinder(512, &maps, regs.get(), process_memory); | 
 |       unwinder.Unwind(); | 
 |       frames[i] = unwinder.NumFrames(); | 
 |       ASSERT_LE(3U, frames[i]) << "Failed for thread " << i; | 
 |     }); | 
 |     threads.push_back(thread); | 
 |   } | 
 |   wait = false; | 
 |   for (auto thread : threads) { | 
 |     thread->join(); | 
 |     delete thread; | 
 |   } | 
 | } | 
 |  | 
 | }  // namespace unwindstack |