mm, sl[au]b: create common functions for boot slab creation
[platform/adaptation/renesas_rcar/renesas_kernel.git] / mm / slab_common.c
1 /*
2  * Slab allocator functions that are independent of the allocator strategy
3  *
4  * (C) 2012 Christoph Lameter <cl@linux.com>
5  */
6 #include <linux/slab.h>
7
8 #include <linux/mm.h>
9 #include <linux/poison.h>
10 #include <linux/interrupt.h>
11 #include <linux/memory.h>
12 #include <linux/compiler.h>
13 #include <linux/module.h>
14 #include <linux/cpu.h>
15 #include <linux/uaccess.h>
16 #include <linux/seq_file.h>
17 #include <linux/proc_fs.h>
18 #include <asm/cacheflush.h>
19 #include <asm/tlbflush.h>
20 #include <asm/page.h>
21
22 #include "slab.h"
23
24 enum slab_state slab_state;
25 LIST_HEAD(slab_caches);
26 DEFINE_MUTEX(slab_mutex);
27 struct kmem_cache *kmem_cache;
28
29 #ifdef CONFIG_DEBUG_VM
30 static int kmem_cache_sanity_check(const char *name, size_t size)
31 {
32         struct kmem_cache *s = NULL;
33
34         if (!name || in_interrupt() || size < sizeof(void *) ||
35                 size > KMALLOC_MAX_SIZE) {
36                 pr_err("kmem_cache_create(%s) integrity check failed\n", name);
37                 return -EINVAL;
38         }
39
40         list_for_each_entry(s, &slab_caches, list) {
41                 char tmp;
42                 int res;
43
44                 /*
45                  * This happens when the module gets unloaded and doesn't
46                  * destroy its slab cache and no-one else reuses the vmalloc
47                  * area of the module.  Print a warning.
48                  */
49                 res = probe_kernel_address(s->name, tmp);
50                 if (res) {
51                         pr_err("Slab cache with size %d has lost its name\n",
52                                s->object_size);
53                         continue;
54                 }
55
56                 if (!strcmp(s->name, name)) {
57                         pr_err("%s (%s): Cache name already exists.\n",
58                                __func__, name);
59                         dump_stack();
60                         s = NULL;
61                         return -EINVAL;
62                 }
63         }
64
65         WARN_ON(strchr(name, ' '));     /* It confuses parsers */
66         return 0;
67 }
68 #else
69 static inline int kmem_cache_sanity_check(const char *name, size_t size)
70 {
71         return 0;
72 }
73 #endif
74
75 /*
76  * kmem_cache_create - Create a cache.
77  * @name: A string which is used in /proc/slabinfo to identify this cache.
78  * @size: The size of objects to be created in this cache.
79  * @align: The required alignment for the objects.
80  * @flags: SLAB flags
81  * @ctor: A constructor for the objects.
82  *
83  * Returns a ptr to the cache on success, NULL on failure.
84  * Cannot be called within a interrupt, but can be interrupted.
85  * The @ctor is run when new pages are allocated by the cache.
86  *
87  * The flags are
88  *
89  * %SLAB_POISON - Poison the slab with a known test pattern (a5a5a5a5)
90  * to catch references to uninitialised memory.
91  *
92  * %SLAB_RED_ZONE - Insert `Red' zones around the allocated memory to check
93  * for buffer overruns.
94  *
95  * %SLAB_HWCACHE_ALIGN - Align the objects in this cache to a hardware
96  * cacheline.  This can be beneficial if you're counting cycles as closely
97  * as davem.
98  */
99
100 struct kmem_cache *kmem_cache_create(const char *name, size_t size, size_t align,
101                 unsigned long flags, void (*ctor)(void *))
102 {
103         struct kmem_cache *s = NULL;
104         int err = 0;
105
106         get_online_cpus();
107         mutex_lock(&slab_mutex);
108
109         if (!kmem_cache_sanity_check(name, size) == 0)
110                 goto out_locked;
111
112         /*
113          * Some allocators will constraint the set of valid flags to a subset
114          * of all flags. We expect them to define CACHE_CREATE_MASK in this
115          * case, and we'll just provide them with a sanitized version of the
116          * passed flags.
117          */
118         flags &= CACHE_CREATE_MASK;
119
120         s = __kmem_cache_alias(name, size, align, flags, ctor);
121         if (s)
122                 goto out_locked;
123
124         s = kmem_cache_zalloc(kmem_cache, GFP_KERNEL);
125         if (s) {
126                 s->object_size = s->size = size;
127                 s->align = align;
128                 s->ctor = ctor;
129                 s->name = kstrdup(name, GFP_KERNEL);
130                 if (!s->name) {
131                         kmem_cache_free(kmem_cache, s);
132                         err = -ENOMEM;
133                         goto out_locked;
134                 }
135
136                 err = __kmem_cache_create(s, flags);
137                 if (!err) {
138
139                         s->refcount = 1;
140                         list_add(&s->list, &slab_caches);
141
142                 } else {
143                         kfree(s->name);
144                         kmem_cache_free(kmem_cache, s);
145                 }
146         } else
147                 err = -ENOMEM;
148
149 out_locked:
150         mutex_unlock(&slab_mutex);
151         put_online_cpus();
152
153         if (err) {
154
155                 if (flags & SLAB_PANIC)
156                         panic("kmem_cache_create: Failed to create slab '%s'. Error %d\n",
157                                 name, err);
158                 else {
159                         printk(KERN_WARNING "kmem_cache_create(%s) failed with error %d",
160                                 name, err);
161                         dump_stack();
162                 }
163
164                 return NULL;
165         }
166
167         return s;
168 }
169 EXPORT_SYMBOL(kmem_cache_create);
170
171 void kmem_cache_destroy(struct kmem_cache *s)
172 {
173         get_online_cpus();
174         mutex_lock(&slab_mutex);
175         s->refcount--;
176         if (!s->refcount) {
177                 list_del(&s->list);
178
179                 if (!__kmem_cache_shutdown(s)) {
180                         mutex_unlock(&slab_mutex);
181                         if (s->flags & SLAB_DESTROY_BY_RCU)
182                                 rcu_barrier();
183
184                         kfree(s->name);
185                         kmem_cache_free(kmem_cache, s);
186                 } else {
187                         list_add(&s->list, &slab_caches);
188                         mutex_unlock(&slab_mutex);
189                         printk(KERN_ERR "kmem_cache_destroy %s: Slab cache still has objects\n",
190                                 s->name);
191                         dump_stack();
192                 }
193         } else {
194                 mutex_unlock(&slab_mutex);
195         }
196         put_online_cpus();
197 }
198 EXPORT_SYMBOL(kmem_cache_destroy);
199
200 int slab_is_available(void)
201 {
202         return slab_state >= UP;
203 }
204
205 #ifndef CONFIG_SLOB
206 /* Create a cache during boot when no slab services are available yet */
207 void __init create_boot_cache(struct kmem_cache *s, const char *name, size_t size,
208                 unsigned long flags)
209 {
210         int err;
211
212         s->name = name;
213         s->size = s->object_size = size;
214         s->align = ARCH_KMALLOC_MINALIGN;
215         err = __kmem_cache_create(s, flags);
216
217         if (err)
218                 panic("Creation of kmalloc slab %s size=%zd failed. Reason %d\n",
219                                         name, size, err);
220
221         s->refcount = -1;       /* Exempt from merging for now */
222 }
223
224 struct kmem_cache *__init create_kmalloc_cache(const char *name, size_t size,
225                                 unsigned long flags)
226 {
227         struct kmem_cache *s = kmem_cache_zalloc(kmem_cache, GFP_NOWAIT);
228
229         if (!s)
230                 panic("Out of memory when creating slab %s\n", name);
231
232         create_boot_cache(s, name, size, flags);
233         list_add(&s->list, &slab_caches);
234         s->refcount = 1;
235         return s;
236 }
237
238 #endif /* !CONFIG_SLOB */
239
240
241 #ifdef CONFIG_SLABINFO
242 static void print_slabinfo_header(struct seq_file *m)
243 {
244         /*
245          * Output format version, so at least we can change it
246          * without _too_ many complaints.
247          */
248 #ifdef CONFIG_DEBUG_SLAB
249         seq_puts(m, "slabinfo - version: 2.1 (statistics)\n");
250 #else
251         seq_puts(m, "slabinfo - version: 2.1\n");
252 #endif
253         seq_puts(m, "# name            <active_objs> <num_objs> <objsize> "
254                  "<objperslab> <pagesperslab>");
255         seq_puts(m, " : tunables <limit> <batchcount> <sharedfactor>");
256         seq_puts(m, " : slabdata <active_slabs> <num_slabs> <sharedavail>");
257 #ifdef CONFIG_DEBUG_SLAB
258         seq_puts(m, " : globalstat <listallocs> <maxobjs> <grown> <reaped> "
259                  "<error> <maxfreeable> <nodeallocs> <remotefrees> <alienoverflow>");
260         seq_puts(m, " : cpustat <allochit> <allocmiss> <freehit> <freemiss>");
261 #endif
262         seq_putc(m, '\n');
263 }
264
265 static void *s_start(struct seq_file *m, loff_t *pos)
266 {
267         loff_t n = *pos;
268
269         mutex_lock(&slab_mutex);
270         if (!n)
271                 print_slabinfo_header(m);
272
273         return seq_list_start(&slab_caches, *pos);
274 }
275
276 static void *s_next(struct seq_file *m, void *p, loff_t *pos)
277 {
278         return seq_list_next(p, &slab_caches, pos);
279 }
280
281 static void s_stop(struct seq_file *m, void *p)
282 {
283         mutex_unlock(&slab_mutex);
284 }
285
286 static int s_show(struct seq_file *m, void *p)
287 {
288         struct kmem_cache *s = list_entry(p, struct kmem_cache, list);
289         struct slabinfo sinfo;
290
291         memset(&sinfo, 0, sizeof(sinfo));
292         get_slabinfo(s, &sinfo);
293
294         seq_printf(m, "%-17s %6lu %6lu %6u %4u %4d",
295                    s->name, sinfo.active_objs, sinfo.num_objs, s->size,
296                    sinfo.objects_per_slab, (1 << sinfo.cache_order));
297
298         seq_printf(m, " : tunables %4u %4u %4u",
299                    sinfo.limit, sinfo.batchcount, sinfo.shared);
300         seq_printf(m, " : slabdata %6lu %6lu %6lu",
301                    sinfo.active_slabs, sinfo.num_slabs, sinfo.shared_avail);
302         slabinfo_show_stats(m, s);
303         seq_putc(m, '\n');
304         return 0;
305 }
306
307 /*
308  * slabinfo_op - iterator that generates /proc/slabinfo
309  *
310  * Output layout:
311  * cache-name
312  * num-active-objs
313  * total-objs
314  * object size
315  * num-active-slabs
316  * total-slabs
317  * num-pages-per-slab
318  * + further values on SMP and with statistics enabled
319  */
320 static const struct seq_operations slabinfo_op = {
321         .start = s_start,
322         .next = s_next,
323         .stop = s_stop,
324         .show = s_show,
325 };
326
327 static int slabinfo_open(struct inode *inode, struct file *file)
328 {
329         return seq_open(file, &slabinfo_op);
330 }
331
332 static const struct file_operations proc_slabinfo_operations = {
333         .open           = slabinfo_open,
334         .read           = seq_read,
335         .write          = slabinfo_write,
336         .llseek         = seq_lseek,
337         .release        = seq_release,
338 };
339
340 static int __init slab_proc_init(void)
341 {
342         proc_create("slabinfo", S_IRUSR, NULL, &proc_slabinfo_operations);
343         return 0;
344 }
345 module_init(slab_proc_init);
346 #endif /* CONFIG_SLABINFO */