Commit | Line | Data |
---|---|---|
2f9ade3c JA |
1 | /* |
2 | * Memory helpers | |
3 | */ | |
4 | #include <unistd.h> | |
5 | #include <sys/shm.h> | |
6 | #include <sys/mman.h> | |
7 | ||
8 | #include "fio.h" | |
9 | #include "os.h" | |
10 | ||
2f9ade3c JA |
11 | static void *pinned_mem; |
12 | ||
13 | void fio_unpin_memory(void) | |
14 | { | |
15 | if (pinned_mem) { | |
16 | if (munlock(pinned_mem, mlock_size) < 0) | |
17 | perror("munlock"); | |
18 | munmap(pinned_mem, mlock_size); | |
19 | pinned_mem = NULL; | |
20 | } | |
21 | } | |
22 | ||
23 | int fio_pin_memory(void) | |
24 | { | |
25 | unsigned long long phys_mem; | |
26 | ||
27 | if (!mlock_size) | |
28 | return 0; | |
29 | ||
30 | /* | |
31 | * Don't allow mlock of more than real_mem-128MB | |
32 | */ | |
33 | phys_mem = os_phys_mem(); | |
34 | if (phys_mem) { | |
35 | if ((mlock_size + 128 * 1024 * 1024) > phys_mem) { | |
36 | mlock_size = phys_mem - 128 * 1024 * 1024; | |
37 | fprintf(f_out, "fio: limiting mlocked memory to %lluMiB\n", mlock_size >> 20); | |
38 | } | |
39 | } | |
40 | ||
41 | pinned_mem = mmap(NULL, mlock_size, PROT_READ | PROT_WRITE, MAP_PRIVATE | OS_MAP_ANON, 0, 0); | |
42 | if (pinned_mem == MAP_FAILED) { | |
43 | perror("malloc locked mem"); | |
44 | pinned_mem = NULL; | |
45 | return 1; | |
46 | } | |
47 | if (mlock(pinned_mem, mlock_size) < 0) { | |
48 | perror("mlock"); | |
49 | munmap(pinned_mem, mlock_size); | |
50 | pinned_mem = NULL; | |
51 | return 1; | |
52 | } | |
53 | ||
54 | return 0; | |
55 | } | |
56 | ||
57 | /* | |
58 | * Setup the buffer area we need for io. | |
59 | */ | |
60 | int allocate_io_mem(struct thread_data *td) | |
61 | { | |
62 | if (td->mem_type == MEM_MALLOC) | |
63 | td->orig_buffer = malloc(td->orig_buffer_size); | |
64 | else if (td->mem_type == MEM_SHM) { | |
65 | td->shm_id = shmget(IPC_PRIVATE, td->orig_buffer_size, IPC_CREAT | 0600); | |
66 | if (td->shm_id < 0) { | |
67 | td_verror(td, errno); | |
68 | perror("shmget"); | |
69 | return 1; | |
70 | } | |
71 | ||
72 | td->orig_buffer = shmat(td->shm_id, NULL, 0); | |
73 | if (td->orig_buffer == (void *) -1) { | |
74 | td_verror(td, errno); | |
75 | perror("shmat"); | |
76 | td->orig_buffer = NULL; | |
77 | return 1; | |
78 | } | |
79 | } else if (td->mem_type == MEM_MMAP) { | |
80 | td->orig_buffer = mmap(NULL, td->orig_buffer_size, PROT_READ | PROT_WRITE, MAP_PRIVATE | OS_MAP_ANON, 0, 0); | |
81 | if (td->orig_buffer == MAP_FAILED) { | |
82 | td_verror(td, errno); | |
83 | perror("mmap"); | |
84 | td->orig_buffer = NULL; | |
85 | return 1; | |
86 | } | |
87 | } | |
88 | ||
89 | return 0; | |
90 | } | |
91 | ||
92 | void free_io_mem(struct thread_data *td) | |
93 | { | |
94 | if (td->mem_type == MEM_MALLOC) | |
95 | free(td->orig_buffer); | |
96 | else if (td->mem_type == MEM_SHM) { | |
97 | struct shmid_ds sbuf; | |
98 | ||
99 | shmdt(td->orig_buffer); | |
100 | shmctl(td->shm_id, IPC_RMID, &sbuf); | |
101 | } else if (td->mem_type == MEM_MMAP) | |
102 | munmap(td->orig_buffer, td->orig_buffer_size); | |
103 | else | |
1e97cce9 | 104 | log_err("Bad memory type %u\n", td->mem_type); |
2f9ade3c JA |
105 | |
106 | td->orig_buffer = NULL; | |
107 | } |