1*8c1441f8SAlexey Samsonov //===-- enable_execute_stack_test.c - Test __enable_execute_stack ----------===//
2*8c1441f8SAlexey Samsonov //
3*8c1441f8SAlexey Samsonov //                     The LLVM Compiler Infrastructure
4*8c1441f8SAlexey Samsonov //
5*8c1441f8SAlexey Samsonov // This file is dual licensed under the MIT and the University of Illinois Open
6*8c1441f8SAlexey Samsonov // Source Licenses. See LICENSE.TXT for details.
7*8c1441f8SAlexey Samsonov //
8*8c1441f8SAlexey Samsonov //===----------------------------------------------------------------------===//
9*8c1441f8SAlexey Samsonov 
10*8c1441f8SAlexey Samsonov 
11*8c1441f8SAlexey Samsonov #include <stdio.h>
12*8c1441f8SAlexey Samsonov #include <string.h>
13*8c1441f8SAlexey Samsonov #include <stdint.h>
14*8c1441f8SAlexey Samsonov #if defined(_WIN32)
15*8c1441f8SAlexey Samsonov #include <windows.h>
16*8c1441f8SAlexey Samsonov void __clear_cache(void* start, void* end)
17*8c1441f8SAlexey Samsonov {
18*8c1441f8SAlexey Samsonov     if (!FlushInstructionCache(GetCurrentProcess(), start, end-start))
19*8c1441f8SAlexey Samsonov         exit(1);
20*8c1441f8SAlexey Samsonov }
21*8c1441f8SAlexey Samsonov void __enable_execute_stack(void *addr)
22*8c1441f8SAlexey Samsonov {
23*8c1441f8SAlexey Samsonov     MEMORY_BASIC_INFORMATION b;
24*8c1441f8SAlexey Samsonov 
25*8c1441f8SAlexey Samsonov     if (!VirtualQuery(addr, &b, sizeof(b)))
26*8c1441f8SAlexey Samsonov         exit(1);
27*8c1441f8SAlexey Samsonov     if (!VirtualProtect(b.BaseAddress, b.RegionSize, PAGE_EXECUTE_READWRITE, &b.Protect))
28*8c1441f8SAlexey Samsonov         exit(1);
29*8c1441f8SAlexey Samsonov }
30*8c1441f8SAlexey Samsonov #else
31*8c1441f8SAlexey Samsonov #include <sys/mman.h>
32*8c1441f8SAlexey Samsonov extern void __clear_cache(void* start, void* end);
33*8c1441f8SAlexey Samsonov extern void __enable_execute_stack(void* addr);
34*8c1441f8SAlexey Samsonov #endif
35*8c1441f8SAlexey Samsonov 
36*8c1441f8SAlexey Samsonov typedef int (*pfunc)(void);
37*8c1441f8SAlexey Samsonov 
38*8c1441f8SAlexey Samsonov int func1()
39*8c1441f8SAlexey Samsonov {
40*8c1441f8SAlexey Samsonov     return 1;
41*8c1441f8SAlexey Samsonov }
42*8c1441f8SAlexey Samsonov 
43*8c1441f8SAlexey Samsonov int func2()
44*8c1441f8SAlexey Samsonov {
45*8c1441f8SAlexey Samsonov     return 2;
46*8c1441f8SAlexey Samsonov }
47*8c1441f8SAlexey Samsonov 
48*8c1441f8SAlexey Samsonov 
49*8c1441f8SAlexey Samsonov 
50*8c1441f8SAlexey Samsonov 
51*8c1441f8SAlexey Samsonov int main()
52*8c1441f8SAlexey Samsonov {
53*8c1441f8SAlexey Samsonov     unsigned char execution_buffer[128];
54*8c1441f8SAlexey Samsonov     // mark stack page containing execution_buffer to be executable
55*8c1441f8SAlexey Samsonov     __enable_execute_stack(execution_buffer);
56*8c1441f8SAlexey Samsonov 
57*8c1441f8SAlexey Samsonov     // verify you can copy and execute a function
58*8c1441f8SAlexey Samsonov     memcpy(execution_buffer, (void *)(uintptr_t)&func1, 128);
59*8c1441f8SAlexey Samsonov     __clear_cache(execution_buffer, &execution_buffer[128]);
60*8c1441f8SAlexey Samsonov     pfunc f1 = (pfunc)(uintptr_t)execution_buffer;
61*8c1441f8SAlexey Samsonov     if ((*f1)() != 1)
62*8c1441f8SAlexey Samsonov         return 1;
63*8c1441f8SAlexey Samsonov 
64*8c1441f8SAlexey Samsonov     // verify you can overwrite a function with another
65*8c1441f8SAlexey Samsonov     memcpy(execution_buffer, (void *)(uintptr_t)&func2, 128);
66*8c1441f8SAlexey Samsonov     __clear_cache(execution_buffer, &execution_buffer[128]);
67*8c1441f8SAlexey Samsonov     pfunc f2 = (pfunc)(uintptr_t)execution_buffer;
68*8c1441f8SAlexey Samsonov     if ((*f2)() != 2)
69*8c1441f8SAlexey Samsonov         return 1;
70*8c1441f8SAlexey Samsonov 
71*8c1441f8SAlexey Samsonov     return 0;
72*8c1441f8SAlexey Samsonov }
73