citra-shitamoto-network/src/common/memory_util.cpp

201 lines
5.1 KiB
C++
Raw Normal View History

// Copyright 2013 Dolphin Emulator Project
// Licensed under GPLv2
// Refer to the license.txt file included.
#include "common/common.h"
#include "common/memory_util.h"
#include "common/string_util.h"
#ifdef _WIN32
#include <windows.h>
#include <psapi.h>
#else
#include <errno.h>
#include <stdio.h>
#endif
#if !defined(_WIN32) && defined(__x86_64__) && !defined(MAP_32BIT)
#include <unistd.h>
#define PAGE_MASK (getpagesize() - 1)
#define round_page(x) ((((unsigned long)(x)) + PAGE_MASK) & ~(PAGE_MASK))
#endif
// This is purposely not a full wrapper for virtualalloc/mmap, but it
// provides exactly the primitive operations that Dolphin needs.
void* AllocateExecutableMemory(size_t size, bool low)
{
#if defined(_WIN32)
2014-04-02 03:50:08 +05:30
void* ptr = VirtualAlloc(0, size, MEM_COMMIT, PAGE_EXECUTE_READWRITE);
#else
2014-04-02 03:50:08 +05:30
static char *map_hint = 0;
#if defined(__x86_64__) && !defined(MAP_32BIT)
2014-04-02 03:50:08 +05:30
// This OS has no flag to enforce allocation below the 4 GB boundary,
// but if we hint that we want a low address it is very likely we will
// get one.
// An older version of this code used MAP_FIXED, but that has the side
// effect of discarding already mapped pages that happen to be in the
// requested virtual memory range (such as the emulated RAM, sometimes).
if (low && (!map_hint))
map_hint = (char*)round_page(512*1024*1024); /* 0.5 GB rounded up to the next page */
#endif
2014-04-02 03:50:08 +05:30
void* ptr = mmap(map_hint, size, PROT_READ | PROT_WRITE | PROT_EXEC,
MAP_ANON | MAP_PRIVATE
#if defined(__x86_64__) && defined(MAP_32BIT)
2014-04-02 03:50:08 +05:30
| (low ? MAP_32BIT : 0)
#endif
2014-04-02 03:50:08 +05:30
, -1, 0);
#endif /* defined(_WIN32) */
2014-04-02 03:50:08 +05:30
// printf("Mapped executable memory at %p (size %ld)\n", ptr,
// (unsigned long)size);
#ifdef _WIN32
if (ptr == nullptr)
2014-04-02 03:50:08 +05:30
{
#else
if (ptr == MAP_FAILED)
2014-04-02 03:50:08 +05:30
{
ptr = nullptr;
#endif
2014-04-02 03:50:08 +05:30
PanicAlert("Failed to allocate executable memory");
}
#if !defined(_WIN32) && defined(__x86_64__) && !defined(MAP_32BIT)
2014-04-02 03:50:08 +05:30
else
{
if (low)
{
map_hint += size;
map_hint = (char*)round_page(map_hint); /* round up to the next page */
// printf("Next map will (hopefully) be at %p\n", map_hint);
}
}
#endif
#if defined(_M_X64)
2014-04-02 03:50:08 +05:30
if ((u64)ptr >= 0x80000000 && low == true)
PanicAlert("Executable memory ended up above 2GB!");
#endif
2014-04-02 03:50:08 +05:30
return ptr;
}
void* AllocateMemoryPages(size_t size)
{
#ifdef _WIN32
2014-04-02 03:50:08 +05:30
void* ptr = VirtualAlloc(0, size, MEM_COMMIT, PAGE_READWRITE);
#else
2014-04-02 03:50:08 +05:30
void* ptr = mmap(0, size, PROT_READ | PROT_WRITE,
MAP_ANON | MAP_PRIVATE, -1, 0);
if (ptr == MAP_FAILED)
ptr = nullptr;
#endif
2014-04-02 03:50:08 +05:30
// printf("Mapped memory at %p (size %ld)\n", ptr,
// (unsigned long)size);
2014-04-02 03:50:08 +05:30
if (ptr == NULL)
PanicAlert("Failed to allocate raw memory");
2014-04-02 03:50:08 +05:30
return ptr;
}
void* AllocateAlignedMemory(size_t size,size_t alignment)
{
#ifdef _WIN32
2014-04-02 03:50:08 +05:30
void* ptr = _aligned_malloc(size,alignment);
#else
2014-04-02 03:50:08 +05:30
void* ptr = NULL;
#ifdef ANDROID
2014-04-02 03:50:08 +05:30
ptr = memalign(alignment, size);
#else
2014-04-02 03:50:08 +05:30
if (posix_memalign(&ptr, alignment, size) != 0)
ERROR_LOG(MEMMAP, "Failed to allocate aligned memory");
#endif
#endif
2014-04-02 03:50:08 +05:30
// printf("Mapped memory at %p (size %ld)\n", ptr,
// (unsigned long)size);
2014-04-02 03:50:08 +05:30
if (ptr == NULL)
PanicAlert("Failed to allocate aligned memory");
2014-04-02 03:50:08 +05:30
return ptr;
}
void FreeMemoryPages(void* ptr, size_t size)
{
2014-04-02 03:50:08 +05:30
if (ptr)
{
#ifdef _WIN32
2014-04-02 03:50:08 +05:30
if (!VirtualFree(ptr, 0, MEM_RELEASE))
PanicAlert("FreeMemoryPages failed!\n%s", GetLastErrorMsg());
ptr = NULL; // Is this our responsibility?
#else
2014-04-02 03:50:08 +05:30
munmap(ptr, size);
#endif
2014-04-02 03:50:08 +05:30
}
}
void FreeAlignedMemory(void* ptr)
{
2014-04-02 03:50:08 +05:30
if (ptr)
{
#ifdef _WIN32
2014-04-02 03:50:08 +05:30
_aligned_free(ptr);
#else
2014-04-02 03:50:08 +05:30
free(ptr);
#endif
2014-04-02 03:50:08 +05:30
}
}
void WriteProtectMemory(void* ptr, size_t size, bool allowExecute)
{
#ifdef _WIN32
2014-04-02 03:50:08 +05:30
DWORD oldValue;
if (!VirtualProtect(ptr, size, allowExecute ? PAGE_EXECUTE_READ : PAGE_READONLY, &oldValue))
PanicAlert("WriteProtectMemory failed!\n%s", GetLastErrorMsg());
#else
2014-04-02 03:50:08 +05:30
mprotect(ptr, size, allowExecute ? (PROT_READ | PROT_EXEC) : PROT_READ);
#endif
}
void UnWriteProtectMemory(void* ptr, size_t size, bool allowExecute)
{
#ifdef _WIN32
2014-04-02 03:50:08 +05:30
DWORD oldValue;
if (!VirtualProtect(ptr, size, allowExecute ? PAGE_EXECUTE_READWRITE : PAGE_READWRITE, &oldValue))
PanicAlert("UnWriteProtectMemory failed!\n%s", GetLastErrorMsg());
#else
2014-04-02 03:50:08 +05:30
mprotect(ptr, size, allowExecute ? (PROT_READ | PROT_WRITE | PROT_EXEC) : PROT_WRITE | PROT_READ);
#endif
}
std::string MemUsage()
{
#ifdef _WIN32
#pragma comment(lib, "psapi")
2014-04-02 03:50:08 +05:30
DWORD processID = GetCurrentProcessId();
HANDLE hProcess;
PROCESS_MEMORY_COUNTERS pmc;
std::string Ret;
2014-04-02 03:50:08 +05:30
// Print information about the memory usage of the process.
2014-04-02 03:50:08 +05:30
hProcess = OpenProcess(PROCESS_QUERY_INFORMATION | PROCESS_VM_READ, FALSE, processID);
if (NULL == hProcess) return "MemUsage Error";
2014-04-02 03:50:08 +05:30
if (GetProcessMemoryInfo(hProcess, &pmc, sizeof(pmc)))
Ret = StringFromFormat("%s K", ThousandSeparate(pmc.WorkingSetSize / 1024, 7).c_str());
2014-04-02 03:50:08 +05:30
CloseHandle(hProcess);
return Ret;
#else
2014-04-02 03:50:08 +05:30
return "";
#endif
}