Commit | Line | Data |
---|---|---|
2f9ade3c JA |
1 | /* |
2 | * Memory helpers | |
3 | */ | |
5921e80c JA |
4 | #include <sys/types.h> |
5 | #include <sys/stat.h> | |
6 | #include <fcntl.h> | |
2f9ade3c | 7 | #include <unistd.h> |
ec5c6b12 | 8 | #ifndef FIO_NO_HAVE_SHM_H |
2f9ade3c | 9 | #include <sys/shm.h> |
ec5c6b12 | 10 | #endif |
2f9ade3c JA |
11 | #include <sys/mman.h> |
12 | ||
13 | #include "fio.h" | |
2f9ade3c | 14 | |
2f9ade3c JA |
15 | static void *pinned_mem; |
16 | ||
17 | void fio_unpin_memory(void) | |
18 | { | |
19 | if (pinned_mem) { | |
ee56ad50 | 20 | dprint(FD_MEM, "unpinning %llu bytes\n", mlock_size); |
2f9ade3c JA |
21 | if (munlock(pinned_mem, mlock_size) < 0) |
22 | perror("munlock"); | |
23 | munmap(pinned_mem, mlock_size); | |
24 | pinned_mem = NULL; | |
25 | } | |
26 | } | |
27 | ||
28 | int fio_pin_memory(void) | |
29 | { | |
30 | unsigned long long phys_mem; | |
31 | ||
32 | if (!mlock_size) | |
33 | return 0; | |
34 | ||
ee56ad50 JA |
35 | dprint(FD_MEM, "pinning %llu bytes\n", mlock_size); |
36 | ||
2f9ade3c JA |
37 | /* |
38 | * Don't allow mlock of more than real_mem-128MB | |
39 | */ | |
40 | phys_mem = os_phys_mem(); | |
41 | if (phys_mem) { | |
42 | if ((mlock_size + 128 * 1024 * 1024) > phys_mem) { | |
43 | mlock_size = phys_mem - 128 * 1024 * 1024; | |
b22989b9 | 44 | log_info("fio: limiting mlocked memory to %lluMB\n", |
5ec10eaa | 45 | mlock_size >> 20); |
2f9ade3c JA |
46 | } |
47 | } | |
48 | ||
5ec10eaa | 49 | pinned_mem = mmap(NULL, mlock_size, PROT_READ | PROT_WRITE, |
a55820db | 50 | MAP_PRIVATE | OS_MAP_ANON, -1, 0); |
2f9ade3c JA |
51 | if (pinned_mem == MAP_FAILED) { |
52 | perror("malloc locked mem"); | |
53 | pinned_mem = NULL; | |
54 | return 1; | |
55 | } | |
56 | if (mlock(pinned_mem, mlock_size) < 0) { | |
57 | perror("mlock"); | |
58 | munmap(pinned_mem, mlock_size); | |
59 | pinned_mem = NULL; | |
60 | return 1; | |
61 | } | |
62 | ||
63 | return 0; | |
64 | } | |
65 | ||
829a602c | 66 | static int alloc_mem_shm(struct thread_data *td, unsigned int total_mem) |
2f9ade3c | 67 | { |
03e20d68 | 68 | int flags = IPC_CREAT | S_IRUSR | S_IWUSR; |
b6f9676e | 69 | |
a1242a20 JA |
70 | if (td->o.mem_type == MEM_SHMHUGE) { |
71 | unsigned long mask = td->o.hugepage_size - 1; | |
72 | ||
b6f9676e | 73 | flags |= SHM_HUGETLB; |
a1242a20 JA |
74 | total_mem = (total_mem + mask) & ~mask; |
75 | } | |
b6f9676e | 76 | |
829a602c JA |
77 | td->shm_id = shmget(IPC_PRIVATE, total_mem, flags); |
78 | dprint(FD_MEM, "shmget %u, %d\n", total_mem, td->shm_id); | |
b6f9676e JA |
79 | if (td->shm_id < 0) { |
80 | td_verror(td, errno, "shmget"); | |
da7d79b0 | 81 | if (geteuid() != 0 && (errno == ENOMEM || errno == EPERM)) |
b6f9676e | 82 | log_err("fio: you may need to run this job as root\n"); |
886b878a | 83 | if (td->o.mem_type == MEM_SHMHUGE) { |
5ec10eaa JA |
84 | if (errno == EINVAL) { |
85 | log_err("fio: check that you have free huge" | |
86 | " pages and that hugepage-size is" | |
87 | " correct.\n"); | |
88 | } else if (errno == ENOSYS) { | |
89 | log_err("fio: your system does not appear to" | |
90 | " support huge pages.\n"); | |
91 | } else if (errno == ENOMEM) { | |
92 | log_err("fio: no huge pages available, do you" | |
93 | " need to alocate some? See HOWTO.\n"); | |
94 | } | |
d8602dd0 | 95 | } |
5ec10eaa | 96 | |
b6f9676e JA |
97 | return 1; |
98 | } | |
2f9ade3c | 99 | |
b6f9676e | 100 | td->orig_buffer = shmat(td->shm_id, NULL, 0); |
ee56ad50 | 101 | dprint(FD_MEM, "shmat %d, %p\n", td->shm_id, td->orig_buffer); |
b6f9676e JA |
102 | if (td->orig_buffer == (void *) -1) { |
103 | td_verror(td, errno, "shmat"); | |
104 | td->orig_buffer = NULL; | |
105 | return 1; | |
106 | } | |
107 | ||
108 | return 0; | |
109 | } | |
110 | ||
829a602c JA |
111 | static void free_mem_shm(struct thread_data *td) |
112 | { | |
113 | struct shmid_ds sbuf; | |
114 | ||
115 | dprint(FD_MEM, "shmdt/ctl %d %p\n", td->shm_id, td->orig_buffer); | |
116 | shmdt(td->orig_buffer); | |
117 | shmctl(td->shm_id, IPC_RMID, &sbuf); | |
118 | } | |
119 | ||
0f805c00 | 120 | static int alloc_mem_mmap(struct thread_data *td, size_t total_mem) |
b6f9676e JA |
121 | { |
122 | int flags = MAP_PRIVATE; | |
123 | ||
a55820db | 124 | td->mmapfd = 1; |
b6f9676e | 125 | |
d6dc02fb JA |
126 | if (td->o.mem_type == MEM_MMAPHUGE) { |
127 | unsigned long mask = td->o.hugepage_size - 1; | |
128 | ||
129 | flags |= MAP_HUGETLB; | |
130 | total_mem = (total_mem + mask) & ~mask; | |
131 | } | |
132 | ||
b6f9676e JA |
133 | if (td->mmapfile) { |
134 | td->mmapfd = open(td->mmapfile, O_RDWR|O_CREAT, 0644); | |
135 | ||
136 | if (td->mmapfd < 0) { | |
137 | td_verror(td, errno, "open mmap file"); | |
2f9ade3c JA |
138 | td->orig_buffer = NULL; |
139 | return 1; | |
140 | } | |
829a602c | 141 | if (ftruncate(td->mmapfd, total_mem) < 0) { |
b6f9676e | 142 | td_verror(td, errno, "truncate mmap file"); |
2f9ade3c JA |
143 | td->orig_buffer = NULL; |
144 | return 1; | |
145 | } | |
b6f9676e JA |
146 | } else |
147 | flags |= OS_MAP_ANON; | |
148 | ||
829a602c JA |
149 | td->orig_buffer = mmap(NULL, total_mem, PROT_READ | PROT_WRITE, flags, |
150 | td->mmapfd, 0); | |
151 | dprint(FD_MEM, "mmap %u/%d %p\n", total_mem, td->mmapfd, | |
152 | td->orig_buffer); | |
b6f9676e JA |
153 | if (td->orig_buffer == MAP_FAILED) { |
154 | td_verror(td, errno, "mmap"); | |
155 | td->orig_buffer = NULL; | |
156 | if (td->mmapfd) { | |
157 | close(td->mmapfd); | |
158 | unlink(td->mmapfile); | |
159 | } | |
5ec10eaa | 160 | |
b6f9676e | 161 | return 1; |
2f9ade3c JA |
162 | } |
163 | ||
164 | return 0; | |
165 | } | |
166 | ||
0f805c00 | 167 | static void free_mem_mmap(struct thread_data *td, size_t total_mem) |
b6f9676e | 168 | { |
829a602c JA |
169 | dprint(FD_MEM, "munmap %u %p\n", total_mem, td->orig_buffer); |
170 | munmap(td->orig_buffer, td->orig_buffer_size); | |
171 | if (td->mmapfile) { | |
172 | close(td->mmapfd); | |
173 | unlink(td->mmapfile); | |
174 | free(td->mmapfile); | |
175 | } | |
176 | } | |
d87612ac | 177 | |
0f805c00 | 178 | static int alloc_mem_malloc(struct thread_data *td, size_t total_mem) |
829a602c JA |
179 | { |
180 | td->orig_buffer = malloc(total_mem); | |
181 | dprint(FD_MEM, "malloc %u %p\n", total_mem, td->orig_buffer); | |
5ec10eaa | 182 | |
829a602c JA |
183 | return td->orig_buffer == NULL; |
184 | } | |
b6f9676e | 185 | |
829a602c JA |
186 | static void free_mem_malloc(struct thread_data *td) |
187 | { | |
188 | dprint(FD_MEM, "free malloc mem %p\n", td->orig_buffer); | |
189 | free(td->orig_buffer); | |
b6f9676e JA |
190 | } |
191 | ||
192 | /* | |
03e20d68 | 193 | * Set up the buffer area we need for io. |
b6f9676e JA |
194 | */ |
195 | int allocate_io_mem(struct thread_data *td) | |
196 | { | |
0f805c00 | 197 | size_t total_mem; |
b6f9676e JA |
198 | int ret = 0; |
199 | ||
b4c5e1ac JA |
200 | if (td->io_ops->flags & FIO_NOIO) |
201 | return 0; | |
202 | ||
829a602c | 203 | total_mem = td->orig_buffer_size; |
d529ee19 | 204 | |
ca7e0ddb JA |
205 | if (td->o.odirect || td->o.mem_align || |
206 | (td->io_ops->flags & FIO_MEMALIGN)) { | |
829a602c | 207 | total_mem += page_mask; |
d529ee19 JA |
208 | if (td->o.mem_align && td->o.mem_align > page_size) |
209 | total_mem += td->o.mem_align - page_size; | |
210 | } | |
829a602c | 211 | |
0f805c00 JA |
212 | dprint(FD_MEM, "Alloc %lu for buffers\n", (size_t) total_mem); |
213 | ||
b6f9676e | 214 | if (td->o.mem_type == MEM_MALLOC) |
829a602c | 215 | ret = alloc_mem_malloc(td, total_mem); |
b6f9676e | 216 | else if (td->o.mem_type == MEM_SHM || td->o.mem_type == MEM_SHMHUGE) |
829a602c | 217 | ret = alloc_mem_shm(td, total_mem); |
b6f9676e | 218 | else if (td->o.mem_type == MEM_MMAP || td->o.mem_type == MEM_MMAPHUGE) |
829a602c | 219 | ret = alloc_mem_mmap(td, total_mem); |
b6f9676e JA |
220 | else { |
221 | log_err("fio: bad mem type: %d\n", td->o.mem_type); | |
222 | ret = 1; | |
223 | } | |
224 | ||
3deb3101 JA |
225 | if (ret) |
226 | td_verror(td, ENOMEM, "iomem allocation"); | |
227 | ||
b6f9676e JA |
228 | return ret; |
229 | } | |
230 | ||
2f9ade3c JA |
231 | void free_io_mem(struct thread_data *td) |
232 | { | |
829a602c JA |
233 | unsigned int total_mem; |
234 | ||
235 | total_mem = td->orig_buffer_size; | |
236 | if (td->o.odirect) | |
237 | total_mem += page_mask; | |
238 | ||
239 | if (td->o.mem_type == MEM_MALLOC) | |
240 | free_mem_malloc(td); | |
241 | else if (td->o.mem_type == MEM_SHM || td->o.mem_type == MEM_SHMHUGE) | |
242 | free_mem_shm(td); | |
243 | else if (td->o.mem_type == MEM_MMAP || td->o.mem_type == MEM_MMAPHUGE) | |
244 | free_mem_mmap(td, total_mem); | |
245 | else | |
2dc1bbeb | 246 | log_err("Bad memory type %u\n", td->o.mem_type); |
2f9ade3c JA |
247 | |
248 | td->orig_buffer = NULL; | |
829a602c | 249 | td->orig_buffer_size = 0; |
2f9ade3c | 250 | } |