1dda28197Spatrick //===-- WindowsMiniDump.cpp -----------------------------------------------===//
2061da546Spatrick //
3061da546Spatrick // Part of the LLVM Project, under the Apache License v2.0 with LLVM Exceptions.
4061da546Spatrick // See https://llvm.org/LICENSE.txt for license information.
5061da546Spatrick // SPDX-License-Identifier: Apache-2.0 WITH LLVM-exception
6061da546Spatrick //
7061da546Spatrick //===----------------------------------------------------------------------===//
8061da546Spatrick
9061da546Spatrick // This function is separated out from ObjectFilePECOFF.cpp to name avoid name
10061da546Spatrick // collisions with WinAPI preprocessor macros.
11061da546Spatrick
12061da546Spatrick #include "WindowsMiniDump.h"
13061da546Spatrick #include "lldb/Utility/FileSpec.h"
14061da546Spatrick #include "llvm/Support/ConvertUTF.h"
15061da546Spatrick
16061da546Spatrick #ifdef _WIN32
17061da546Spatrick #include "lldb/Host/windows/windows.h"
18061da546Spatrick #include <dbghelp.h>
19061da546Spatrick #endif
20061da546Spatrick
21061da546Spatrick namespace lldb_private {
22061da546Spatrick
SaveMiniDump(const lldb::ProcessSP & process_sp,const lldb_private::FileSpec & outfile,lldb_private::Status & error)23061da546Spatrick bool SaveMiniDump(const lldb::ProcessSP &process_sp,
24061da546Spatrick const lldb_private::FileSpec &outfile,
25061da546Spatrick lldb_private::Status &error) {
26061da546Spatrick if (!process_sp)
27061da546Spatrick return false;
28061da546Spatrick #ifdef _WIN32
29061da546Spatrick HANDLE process_handle = ::OpenProcess(
30061da546Spatrick PROCESS_QUERY_INFORMATION | PROCESS_VM_READ, FALSE, process_sp->GetID());
31*f6aab3d8Srobert const std::string file_name = outfile.GetPath();
32061da546Spatrick std::wstring wide_name;
33061da546Spatrick wide_name.resize(file_name.size() + 1);
34061da546Spatrick char *result_ptr = reinterpret_cast<char *>(&wide_name[0]);
35061da546Spatrick const llvm::UTF8 *error_ptr = nullptr;
36061da546Spatrick if (!llvm::ConvertUTF8toWide(sizeof(wchar_t), file_name, result_ptr,
37061da546Spatrick error_ptr)) {
38061da546Spatrick error.SetErrorString("cannot convert file name");
39061da546Spatrick return false;
40061da546Spatrick }
41061da546Spatrick HANDLE file_handle =
42061da546Spatrick ::CreateFileW(wide_name.c_str(), GENERIC_WRITE, FILE_SHARE_READ, NULL,
43061da546Spatrick CREATE_ALWAYS, FILE_ATTRIBUTE_NORMAL, NULL);
44061da546Spatrick const auto result =
45061da546Spatrick ::MiniDumpWriteDump(process_handle, process_sp->GetID(), file_handle,
46061da546Spatrick MiniDumpWithFullMemoryInfo, NULL, NULL, NULL);
47061da546Spatrick ::CloseHandle(file_handle);
48061da546Spatrick ::CloseHandle(process_handle);
49061da546Spatrick if (!result) {
50061da546Spatrick error.SetError(::GetLastError(), lldb::eErrorTypeWin32);
51061da546Spatrick return false;
52061da546Spatrick }
53061da546Spatrick return true;
54061da546Spatrick #endif
55061da546Spatrick return false;
56061da546Spatrick }
57061da546Spatrick
58061da546Spatrick } // namesapce lldb_private
59