6bb9b938f9c7d68db07be2ebc8153f4f1e931322
[sfrench/cifs-2.6.git] / kernel / module.c
1 // SPDX-License-Identifier: GPL-2.0-or-later
2 /*
3    Copyright (C) 2002 Richard Henderson
4    Copyright (C) 2001 Rusty Russell, 2002, 2010 Rusty Russell IBM.
5
6 */
7 #include <linux/export.h>
8 #include <linux/extable.h>
9 #include <linux/moduleloader.h>
10 #include <linux/trace_events.h>
11 #include <linux/init.h>
12 #include <linux/kallsyms.h>
13 #include <linux/file.h>
14 #include <linux/fs.h>
15 #include <linux/sysfs.h>
16 #include <linux/kernel.h>
17 #include <linux/slab.h>
18 #include <linux/vmalloc.h>
19 #include <linux/elf.h>
20 #include <linux/proc_fs.h>
21 #include <linux/security.h>
22 #include <linux/seq_file.h>
23 #include <linux/syscalls.h>
24 #include <linux/fcntl.h>
25 #include <linux/rcupdate.h>
26 #include <linux/capability.h>
27 #include <linux/cpu.h>
28 #include <linux/moduleparam.h>
29 #include <linux/errno.h>
30 #include <linux/err.h>
31 #include <linux/vermagic.h>
32 #include <linux/notifier.h>
33 #include <linux/sched.h>
34 #include <linux/device.h>
35 #include <linux/string.h>
36 #include <linux/mutex.h>
37 #include <linux/rculist.h>
38 #include <linux/uaccess.h>
39 #include <asm/cacheflush.h>
40 #include <linux/set_memory.h>
41 #include <asm/mmu_context.h>
42 #include <linux/license.h>
43 #include <asm/sections.h>
44 #include <linux/tracepoint.h>
45 #include <linux/ftrace.h>
46 #include <linux/livepatch.h>
47 #include <linux/async.h>
48 #include <linux/percpu.h>
49 #include <linux/kmemleak.h>
50 #include <linux/jump_label.h>
51 #include <linux/pfn.h>
52 #include <linux/bsearch.h>
53 #include <linux/dynamic_debug.h>
54 #include <linux/audit.h>
55 #include <uapi/linux/module.h>
56 #include "module-internal.h"
57
58 #define CREATE_TRACE_POINTS
59 #include <trace/events/module.h>
60
61 #ifndef ARCH_SHF_SMALL
62 #define ARCH_SHF_SMALL 0
63 #endif
64
65 /*
66  * Modules' sections will be aligned on page boundaries
67  * to ensure complete separation of code and data, but
68  * only when CONFIG_ARCH_HAS_STRICT_MODULE_RWX=y
69  */
70 #ifdef CONFIG_ARCH_HAS_STRICT_MODULE_RWX
71 # define debug_align(X) ALIGN(X, PAGE_SIZE)
72 #else
73 # define debug_align(X) (X)
74 #endif
75
76 /* If this is set, the section belongs in the init part of the module */
77 #define INIT_OFFSET_MASK (1UL << (BITS_PER_LONG-1))
78
79 /*
80  * Mutex protects:
81  * 1) List of modules (also safely readable with preempt_disable),
82  * 2) module_use links,
83  * 3) module_addr_min/module_addr_max.
84  * (delete and add uses RCU list operations). */
85 DEFINE_MUTEX(module_mutex);
86 EXPORT_SYMBOL_GPL(module_mutex);
87 static LIST_HEAD(modules);
88
89 /* Work queue for freeing init sections in success case */
90 static struct work_struct init_free_wq;
91 static struct llist_head init_free_list;
92
93 #ifdef CONFIG_MODULES_TREE_LOOKUP
94
95 /*
96  * Use a latched RB-tree for __module_address(); this allows us to use
97  * RCU-sched lookups of the address from any context.
98  *
99  * This is conditional on PERF_EVENTS || TRACING because those can really hit
100  * __module_address() hard by doing a lot of stack unwinding; potentially from
101  * NMI context.
102  */
103
104 static __always_inline unsigned long __mod_tree_val(struct latch_tree_node *n)
105 {
106         struct module_layout *layout = container_of(n, struct module_layout, mtn.node);
107
108         return (unsigned long)layout->base;
109 }
110
111 static __always_inline unsigned long __mod_tree_size(struct latch_tree_node *n)
112 {
113         struct module_layout *layout = container_of(n, struct module_layout, mtn.node);
114
115         return (unsigned long)layout->size;
116 }
117
118 static __always_inline bool
119 mod_tree_less(struct latch_tree_node *a, struct latch_tree_node *b)
120 {
121         return __mod_tree_val(a) < __mod_tree_val(b);
122 }
123
124 static __always_inline int
125 mod_tree_comp(void *key, struct latch_tree_node *n)
126 {
127         unsigned long val = (unsigned long)key;
128         unsigned long start, end;
129
130         start = __mod_tree_val(n);
131         if (val < start)
132                 return -1;
133
134         end = start + __mod_tree_size(n);
135         if (val >= end)
136                 return 1;
137
138         return 0;
139 }
140
141 static const struct latch_tree_ops mod_tree_ops = {
142         .less = mod_tree_less,
143         .comp = mod_tree_comp,
144 };
145
146 static struct mod_tree_root {
147         struct latch_tree_root root;
148         unsigned long addr_min;
149         unsigned long addr_max;
150 } mod_tree __cacheline_aligned = {
151         .addr_min = -1UL,
152 };
153
154 #define module_addr_min mod_tree.addr_min
155 #define module_addr_max mod_tree.addr_max
156
157 static noinline void __mod_tree_insert(struct mod_tree_node *node)
158 {
159         latch_tree_insert(&node->node, &mod_tree.root, &mod_tree_ops);
160 }
161
162 static void __mod_tree_remove(struct mod_tree_node *node)
163 {
164         latch_tree_erase(&node->node, &mod_tree.root, &mod_tree_ops);
165 }
166
167 /*
168  * These modifications: insert, remove_init and remove; are serialized by the
169  * module_mutex.
170  */
171 static void mod_tree_insert(struct module *mod)
172 {
173         mod->core_layout.mtn.mod = mod;
174         mod->init_layout.mtn.mod = mod;
175
176         __mod_tree_insert(&mod->core_layout.mtn);
177         if (mod->init_layout.size)
178                 __mod_tree_insert(&mod->init_layout.mtn);
179 }
180
181 static void mod_tree_remove_init(struct module *mod)
182 {
183         if (mod->init_layout.size)
184                 __mod_tree_remove(&mod->init_layout.mtn);
185 }
186
187 static void mod_tree_remove(struct module *mod)
188 {
189         __mod_tree_remove(&mod->core_layout.mtn);
190         mod_tree_remove_init(mod);
191 }
192
193 static struct module *mod_find(unsigned long addr)
194 {
195         struct latch_tree_node *ltn;
196
197         ltn = latch_tree_find((void *)addr, &mod_tree.root, &mod_tree_ops);
198         if (!ltn)
199                 return NULL;
200
201         return container_of(ltn, struct mod_tree_node, node)->mod;
202 }
203
204 #else /* MODULES_TREE_LOOKUP */
205
206 static unsigned long module_addr_min = -1UL, module_addr_max = 0;
207
208 static void mod_tree_insert(struct module *mod) { }
209 static void mod_tree_remove_init(struct module *mod) { }
210 static void mod_tree_remove(struct module *mod) { }
211
212 static struct module *mod_find(unsigned long addr)
213 {
214         struct module *mod;
215
216         list_for_each_entry_rcu(mod, &modules, list) {
217                 if (within_module(addr, mod))
218                         return mod;
219         }
220
221         return NULL;
222 }
223
224 #endif /* MODULES_TREE_LOOKUP */
225
226 /*
227  * Bounds of module text, for speeding up __module_address.
228  * Protected by module_mutex.
229  */
230 static void __mod_update_bounds(void *base, unsigned int size)
231 {
232         unsigned long min = (unsigned long)base;
233         unsigned long max = min + size;
234
235         if (min < module_addr_min)
236                 module_addr_min = min;
237         if (max > module_addr_max)
238                 module_addr_max = max;
239 }
240
241 static void mod_update_bounds(struct module *mod)
242 {
243         __mod_update_bounds(mod->core_layout.base, mod->core_layout.size);
244         if (mod->init_layout.size)
245                 __mod_update_bounds(mod->init_layout.base, mod->init_layout.size);
246 }
247
248 #ifdef CONFIG_KGDB_KDB
249 struct list_head *kdb_modules = &modules; /* kdb needs the list of modules */
250 #endif /* CONFIG_KGDB_KDB */
251
252 static void module_assert_mutex(void)
253 {
254         lockdep_assert_held(&module_mutex);
255 }
256
257 static void module_assert_mutex_or_preempt(void)
258 {
259 #ifdef CONFIG_LOCKDEP
260         if (unlikely(!debug_locks))
261                 return;
262
263         WARN_ON_ONCE(!rcu_read_lock_sched_held() &&
264                 !lockdep_is_held(&module_mutex));
265 #endif
266 }
267
268 static bool sig_enforce = IS_ENABLED(CONFIG_MODULE_SIG_FORCE);
269 module_param(sig_enforce, bool_enable_only, 0644);
270
271 /*
272  * Export sig_enforce kernel cmdline parameter to allow other subsystems rely
273  * on that instead of directly to CONFIG_MODULE_SIG_FORCE config.
274  */
275 bool is_module_sig_enforced(void)
276 {
277         return sig_enforce;
278 }
279 EXPORT_SYMBOL(is_module_sig_enforced);
280
281 void set_module_sig_enforced(void)
282 {
283         sig_enforce = true;
284 }
285
286 /* Block module loading/unloading? */
287 int modules_disabled = 0;
288 core_param(nomodule, modules_disabled, bint, 0);
289
290 /* Waiting for a module to finish initializing? */
291 static DECLARE_WAIT_QUEUE_HEAD(module_wq);
292
293 static BLOCKING_NOTIFIER_HEAD(module_notify_list);
294
295 int register_module_notifier(struct notifier_block *nb)
296 {
297         return blocking_notifier_chain_register(&module_notify_list, nb);
298 }
299 EXPORT_SYMBOL(register_module_notifier);
300
301 int unregister_module_notifier(struct notifier_block *nb)
302 {
303         return blocking_notifier_chain_unregister(&module_notify_list, nb);
304 }
305 EXPORT_SYMBOL(unregister_module_notifier);
306
307 /*
308  * We require a truly strong try_module_get(): 0 means success.
309  * Otherwise an error is returned due to ongoing or failed
310  * initialization etc.
311  */
312 static inline int strong_try_module_get(struct module *mod)
313 {
314         BUG_ON(mod && mod->state == MODULE_STATE_UNFORMED);
315         if (mod && mod->state == MODULE_STATE_COMING)
316                 return -EBUSY;
317         if (try_module_get(mod))
318                 return 0;
319         else
320                 return -ENOENT;
321 }
322
323 static inline void add_taint_module(struct module *mod, unsigned flag,
324                                     enum lockdep_ok lockdep_ok)
325 {
326         add_taint(flag, lockdep_ok);
327         set_bit(flag, &mod->taints);
328 }
329
330 /*
331  * A thread that wants to hold a reference to a module only while it
332  * is running can call this to safely exit.  nfsd and lockd use this.
333  */
334 void __noreturn __module_put_and_exit(struct module *mod, long code)
335 {
336         module_put(mod);
337         do_exit(code);
338 }
339 EXPORT_SYMBOL(__module_put_and_exit);
340
341 /* Find a module section: 0 means not found. */
342 static unsigned int find_sec(const struct load_info *info, const char *name)
343 {
344         unsigned int i;
345
346         for (i = 1; i < info->hdr->e_shnum; i++) {
347                 Elf_Shdr *shdr = &info->sechdrs[i];
348                 /* Alloc bit cleared means "ignore it." */
349                 if ((shdr->sh_flags & SHF_ALLOC)
350                     && strcmp(info->secstrings + shdr->sh_name, name) == 0)
351                         return i;
352         }
353         return 0;
354 }
355
356 /* Find a module section, or NULL. */
357 static void *section_addr(const struct load_info *info, const char *name)
358 {
359         /* Section 0 has sh_addr 0. */
360         return (void *)info->sechdrs[find_sec(info, name)].sh_addr;
361 }
362
363 /* Find a module section, or NULL.  Fill in number of "objects" in section. */
364 static void *section_objs(const struct load_info *info,
365                           const char *name,
366                           size_t object_size,
367                           unsigned int *num)
368 {
369         unsigned int sec = find_sec(info, name);
370
371         /* Section 0 has sh_addr 0 and sh_size 0. */
372         *num = info->sechdrs[sec].sh_size / object_size;
373         return (void *)info->sechdrs[sec].sh_addr;
374 }
375
376 /* Provided by the linker */
377 extern const struct kernel_symbol __start___ksymtab[];
378 extern const struct kernel_symbol __stop___ksymtab[];
379 extern const struct kernel_symbol __start___ksymtab_gpl[];
380 extern const struct kernel_symbol __stop___ksymtab_gpl[];
381 extern const struct kernel_symbol __start___ksymtab_gpl_future[];
382 extern const struct kernel_symbol __stop___ksymtab_gpl_future[];
383 extern const s32 __start___kcrctab[];
384 extern const s32 __start___kcrctab_gpl[];
385 extern const s32 __start___kcrctab_gpl_future[];
386 #ifdef CONFIG_UNUSED_SYMBOLS
387 extern const struct kernel_symbol __start___ksymtab_unused[];
388 extern const struct kernel_symbol __stop___ksymtab_unused[];
389 extern const struct kernel_symbol __start___ksymtab_unused_gpl[];
390 extern const struct kernel_symbol __stop___ksymtab_unused_gpl[];
391 extern const s32 __start___kcrctab_unused[];
392 extern const s32 __start___kcrctab_unused_gpl[];
393 #endif
394
395 #ifndef CONFIG_MODVERSIONS
396 #define symversion(base, idx) NULL
397 #else
398 #define symversion(base, idx) ((base != NULL) ? ((base) + (idx)) : NULL)
399 #endif
400
401 static bool each_symbol_in_section(const struct symsearch *arr,
402                                    unsigned int arrsize,
403                                    struct module *owner,
404                                    bool (*fn)(const struct symsearch *syms,
405                                               struct module *owner,
406                                               void *data),
407                                    void *data)
408 {
409         unsigned int j;
410
411         for (j = 0; j < arrsize; j++) {
412                 if (fn(&arr[j], owner, data))
413                         return true;
414         }
415
416         return false;
417 }
418
419 /* Returns true as soon as fn returns true, otherwise false. */
420 bool each_symbol_section(bool (*fn)(const struct symsearch *arr,
421                                     struct module *owner,
422                                     void *data),
423                          void *data)
424 {
425         struct module *mod;
426         static const struct symsearch arr[] = {
427                 { __start___ksymtab, __stop___ksymtab, __start___kcrctab,
428                   NOT_GPL_ONLY, false },
429                 { __start___ksymtab_gpl, __stop___ksymtab_gpl,
430                   __start___kcrctab_gpl,
431                   GPL_ONLY, false },
432                 { __start___ksymtab_gpl_future, __stop___ksymtab_gpl_future,
433                   __start___kcrctab_gpl_future,
434                   WILL_BE_GPL_ONLY, false },
435 #ifdef CONFIG_UNUSED_SYMBOLS
436                 { __start___ksymtab_unused, __stop___ksymtab_unused,
437                   __start___kcrctab_unused,
438                   NOT_GPL_ONLY, true },
439                 { __start___ksymtab_unused_gpl, __stop___ksymtab_unused_gpl,
440                   __start___kcrctab_unused_gpl,
441                   GPL_ONLY, true },
442 #endif
443         };
444
445         module_assert_mutex_or_preempt();
446
447         if (each_symbol_in_section(arr, ARRAY_SIZE(arr), NULL, fn, data))
448                 return true;
449
450         list_for_each_entry_rcu(mod, &modules, list) {
451                 struct symsearch arr[] = {
452                         { mod->syms, mod->syms + mod->num_syms, mod->crcs,
453                           NOT_GPL_ONLY, false },
454                         { mod->gpl_syms, mod->gpl_syms + mod->num_gpl_syms,
455                           mod->gpl_crcs,
456                           GPL_ONLY, false },
457                         { mod->gpl_future_syms,
458                           mod->gpl_future_syms + mod->num_gpl_future_syms,
459                           mod->gpl_future_crcs,
460                           WILL_BE_GPL_ONLY, false },
461 #ifdef CONFIG_UNUSED_SYMBOLS
462                         { mod->unused_syms,
463                           mod->unused_syms + mod->num_unused_syms,
464                           mod->unused_crcs,
465                           NOT_GPL_ONLY, true },
466                         { mod->unused_gpl_syms,
467                           mod->unused_gpl_syms + mod->num_unused_gpl_syms,
468                           mod->unused_gpl_crcs,
469                           GPL_ONLY, true },
470 #endif
471                 };
472
473                 if (mod->state == MODULE_STATE_UNFORMED)
474                         continue;
475
476                 if (each_symbol_in_section(arr, ARRAY_SIZE(arr), mod, fn, data))
477                         return true;
478         }
479         return false;
480 }
481 EXPORT_SYMBOL_GPL(each_symbol_section);
482
483 struct find_symbol_arg {
484         /* Input */
485         const char *name;
486         bool gplok;
487         bool warn;
488
489         /* Output */
490         struct module *owner;
491         const s32 *crc;
492         const struct kernel_symbol *sym;
493 };
494
495 static bool check_exported_symbol(const struct symsearch *syms,
496                                   struct module *owner,
497                                   unsigned int symnum, void *data)
498 {
499         struct find_symbol_arg *fsa = data;
500
501         if (!fsa->gplok) {
502                 if (syms->licence == GPL_ONLY)
503                         return false;
504                 if (syms->licence == WILL_BE_GPL_ONLY && fsa->warn) {
505                         pr_warn("Symbol %s is being used by a non-GPL module, "
506                                 "which will not be allowed in the future\n",
507                                 fsa->name);
508                 }
509         }
510
511 #ifdef CONFIG_UNUSED_SYMBOLS
512         if (syms->unused && fsa->warn) {
513                 pr_warn("Symbol %s is marked as UNUSED, however this module is "
514                         "using it.\n", fsa->name);
515                 pr_warn("This symbol will go away in the future.\n");
516                 pr_warn("Please evaluate if this is the right api to use and "
517                         "if it really is, submit a report to the linux kernel "
518                         "mailing list together with submitting your code for "
519                         "inclusion.\n");
520         }
521 #endif
522
523         fsa->owner = owner;
524         fsa->crc = symversion(syms->crcs, symnum);
525         fsa->sym = &syms->start[symnum];
526         return true;
527 }
528
529 static unsigned long kernel_symbol_value(const struct kernel_symbol *sym)
530 {
531 #ifdef CONFIG_HAVE_ARCH_PREL32_RELOCATIONS
532         return (unsigned long)offset_to_ptr(&sym->value_offset);
533 #else
534         return sym->value;
535 #endif
536 }
537
538 static const char *kernel_symbol_name(const struct kernel_symbol *sym)
539 {
540 #ifdef CONFIG_HAVE_ARCH_PREL32_RELOCATIONS
541         return offset_to_ptr(&sym->name_offset);
542 #else
543         return sym->name;
544 #endif
545 }
546
547 static const char *kernel_symbol_namespace(const struct kernel_symbol *sym)
548 {
549 #ifdef CONFIG_HAVE_ARCH_PREL32_RELOCATIONS
550         return offset_to_ptr(&sym->namespace_offset);
551 #else
552         return sym->namespace;
553 #endif
554 }
555
556 static int cmp_name(const void *va, const void *vb)
557 {
558         const char *a;
559         const struct kernel_symbol *b;
560         a = va; b = vb;
561         return strcmp(a, kernel_symbol_name(b));
562 }
563
564 static bool find_exported_symbol_in_section(const struct symsearch *syms,
565                                             struct module *owner,
566                                             void *data)
567 {
568         struct find_symbol_arg *fsa = data;
569         struct kernel_symbol *sym;
570
571         sym = bsearch(fsa->name, syms->start, syms->stop - syms->start,
572                         sizeof(struct kernel_symbol), cmp_name);
573
574         if (sym != NULL && check_exported_symbol(syms, owner,
575                                                  sym - syms->start, data))
576                 return true;
577
578         return false;
579 }
580
581 /* Find an exported symbol and return it, along with, (optional) crc and
582  * (optional) module which owns it.  Needs preempt disabled or module_mutex. */
583 const struct kernel_symbol *find_symbol(const char *name,
584                                         struct module **owner,
585                                         const s32 **crc,
586                                         bool gplok,
587                                         bool warn)
588 {
589         struct find_symbol_arg fsa;
590
591         fsa.name = name;
592         fsa.gplok = gplok;
593         fsa.warn = warn;
594
595         if (each_symbol_section(find_exported_symbol_in_section, &fsa)) {
596                 if (owner)
597                         *owner = fsa.owner;
598                 if (crc)
599                         *crc = fsa.crc;
600                 return fsa.sym;
601         }
602
603         pr_debug("Failed to find symbol %s\n", name);
604         return NULL;
605 }
606 EXPORT_SYMBOL_GPL(find_symbol);
607
608 /*
609  * Search for module by name: must hold module_mutex (or preempt disabled
610  * for read-only access).
611  */
612 static struct module *find_module_all(const char *name, size_t len,
613                                       bool even_unformed)
614 {
615         struct module *mod;
616
617         module_assert_mutex_or_preempt();
618
619         list_for_each_entry_rcu(mod, &modules, list) {
620                 if (!even_unformed && mod->state == MODULE_STATE_UNFORMED)
621                         continue;
622                 if (strlen(mod->name) == len && !memcmp(mod->name, name, len))
623                         return mod;
624         }
625         return NULL;
626 }
627
628 struct module *find_module(const char *name)
629 {
630         module_assert_mutex();
631         return find_module_all(name, strlen(name), false);
632 }
633 EXPORT_SYMBOL_GPL(find_module);
634
635 #ifdef CONFIG_SMP
636
637 static inline void __percpu *mod_percpu(struct module *mod)
638 {
639         return mod->percpu;
640 }
641
642 static int percpu_modalloc(struct module *mod, struct load_info *info)
643 {
644         Elf_Shdr *pcpusec = &info->sechdrs[info->index.pcpu];
645         unsigned long align = pcpusec->sh_addralign;
646
647         if (!pcpusec->sh_size)
648                 return 0;
649
650         if (align > PAGE_SIZE) {
651                 pr_warn("%s: per-cpu alignment %li > %li\n",
652                         mod->name, align, PAGE_SIZE);
653                 align = PAGE_SIZE;
654         }
655
656         mod->percpu = __alloc_reserved_percpu(pcpusec->sh_size, align);
657         if (!mod->percpu) {
658                 pr_warn("%s: Could not allocate %lu bytes percpu data\n",
659                         mod->name, (unsigned long)pcpusec->sh_size);
660                 return -ENOMEM;
661         }
662         mod->percpu_size = pcpusec->sh_size;
663         return 0;
664 }
665
666 static void percpu_modfree(struct module *mod)
667 {
668         free_percpu(mod->percpu);
669 }
670
671 static unsigned int find_pcpusec(struct load_info *info)
672 {
673         return find_sec(info, ".data..percpu");
674 }
675
676 static void percpu_modcopy(struct module *mod,
677                            const void *from, unsigned long size)
678 {
679         int cpu;
680
681         for_each_possible_cpu(cpu)
682                 memcpy(per_cpu_ptr(mod->percpu, cpu), from, size);
683 }
684
685 bool __is_module_percpu_address(unsigned long addr, unsigned long *can_addr)
686 {
687         struct module *mod;
688         unsigned int cpu;
689
690         preempt_disable();
691
692         list_for_each_entry_rcu(mod, &modules, list) {
693                 if (mod->state == MODULE_STATE_UNFORMED)
694                         continue;
695                 if (!mod->percpu_size)
696                         continue;
697                 for_each_possible_cpu(cpu) {
698                         void *start = per_cpu_ptr(mod->percpu, cpu);
699                         void *va = (void *)addr;
700
701                         if (va >= start && va < start + mod->percpu_size) {
702                                 if (can_addr) {
703                                         *can_addr = (unsigned long) (va - start);
704                                         *can_addr += (unsigned long)
705                                                 per_cpu_ptr(mod->percpu,
706                                                             get_boot_cpu_id());
707                                 }
708                                 preempt_enable();
709                                 return true;
710                         }
711                 }
712         }
713
714         preempt_enable();
715         return false;
716 }
717
718 /**
719  * is_module_percpu_address - test whether address is from module static percpu
720  * @addr: address to test
721  *
722  * Test whether @addr belongs to module static percpu area.
723  *
724  * RETURNS:
725  * %true if @addr is from module static percpu area
726  */
727 bool is_module_percpu_address(unsigned long addr)
728 {
729         return __is_module_percpu_address(addr, NULL);
730 }
731
732 #else /* ... !CONFIG_SMP */
733
734 static inline void __percpu *mod_percpu(struct module *mod)
735 {
736         return NULL;
737 }
738 static int percpu_modalloc(struct module *mod, struct load_info *info)
739 {
740         /* UP modules shouldn't have this section: ENOMEM isn't quite right */
741         if (info->sechdrs[info->index.pcpu].sh_size != 0)
742                 return -ENOMEM;
743         return 0;
744 }
745 static inline void percpu_modfree(struct module *mod)
746 {
747 }
748 static unsigned int find_pcpusec(struct load_info *info)
749 {
750         return 0;
751 }
752 static inline void percpu_modcopy(struct module *mod,
753                                   const void *from, unsigned long size)
754 {
755         /* pcpusec should be 0, and size of that section should be 0. */
756         BUG_ON(size != 0);
757 }
758 bool is_module_percpu_address(unsigned long addr)
759 {
760         return false;
761 }
762
763 bool __is_module_percpu_address(unsigned long addr, unsigned long *can_addr)
764 {
765         return false;
766 }
767
768 #endif /* CONFIG_SMP */
769
770 #define MODINFO_ATTR(field)     \
771 static void setup_modinfo_##field(struct module *mod, const char *s)  \
772 {                                                                     \
773         mod->field = kstrdup(s, GFP_KERNEL);                          \
774 }                                                                     \
775 static ssize_t show_modinfo_##field(struct module_attribute *mattr,   \
776                         struct module_kobject *mk, char *buffer)      \
777 {                                                                     \
778         return scnprintf(buffer, PAGE_SIZE, "%s\n", mk->mod->field);  \
779 }                                                                     \
780 static int modinfo_##field##_exists(struct module *mod)               \
781 {                                                                     \
782         return mod->field != NULL;                                    \
783 }                                                                     \
784 static void free_modinfo_##field(struct module *mod)                  \
785 {                                                                     \
786         kfree(mod->field);                                            \
787         mod->field = NULL;                                            \
788 }                                                                     \
789 static struct module_attribute modinfo_##field = {                    \
790         .attr = { .name = __stringify(field), .mode = 0444 },         \
791         .show = show_modinfo_##field,                                 \
792         .setup = setup_modinfo_##field,                               \
793         .test = modinfo_##field##_exists,                             \
794         .free = free_modinfo_##field,                                 \
795 };
796
797 MODINFO_ATTR(version);
798 MODINFO_ATTR(srcversion);
799
800 static char last_unloaded_module[MODULE_NAME_LEN+1];
801
802 #ifdef CONFIG_MODULE_UNLOAD
803
804 EXPORT_TRACEPOINT_SYMBOL(module_get);
805
806 /* MODULE_REF_BASE is the base reference count by kmodule loader. */
807 #define MODULE_REF_BASE 1
808
809 /* Init the unload section of the module. */
810 static int module_unload_init(struct module *mod)
811 {
812         /*
813          * Initialize reference counter to MODULE_REF_BASE.
814          * refcnt == 0 means module is going.
815          */
816         atomic_set(&mod->refcnt, MODULE_REF_BASE);
817
818         INIT_LIST_HEAD(&mod->source_list);
819         INIT_LIST_HEAD(&mod->target_list);
820
821         /* Hold reference count during initialization. */
822         atomic_inc(&mod->refcnt);
823
824         return 0;
825 }
826
827 /* Does a already use b? */
828 static int already_uses(struct module *a, struct module *b)
829 {
830         struct module_use *use;
831
832         list_for_each_entry(use, &b->source_list, source_list) {
833                 if (use->source == a) {
834                         pr_debug("%s uses %s!\n", a->name, b->name);
835                         return 1;
836                 }
837         }
838         pr_debug("%s does not use %s!\n", a->name, b->name);
839         return 0;
840 }
841
842 /*
843  * Module a uses b
844  *  - we add 'a' as a "source", 'b' as a "target" of module use
845  *  - the module_use is added to the list of 'b' sources (so
846  *    'b' can walk the list to see who sourced them), and of 'a'
847  *    targets (so 'a' can see what modules it targets).
848  */
849 static int add_module_usage(struct module *a, struct module *b)
850 {
851         struct module_use *use;
852
853         pr_debug("Allocating new usage for %s.\n", a->name);
854         use = kmalloc(sizeof(*use), GFP_ATOMIC);
855         if (!use)
856                 return -ENOMEM;
857
858         use->source = a;
859         use->target = b;
860         list_add(&use->source_list, &b->source_list);
861         list_add(&use->target_list, &a->target_list);
862         return 0;
863 }
864
865 /* Module a uses b: caller needs module_mutex() */
866 int ref_module(struct module *a, struct module *b)
867 {
868         int err;
869
870         if (b == NULL || already_uses(a, b))
871                 return 0;
872
873         /* If module isn't available, we fail. */
874         err = strong_try_module_get(b);
875         if (err)
876                 return err;
877
878         err = add_module_usage(a, b);
879         if (err) {
880                 module_put(b);
881                 return err;
882         }
883         return 0;
884 }
885 EXPORT_SYMBOL_GPL(ref_module);
886
887 /* Clear the unload stuff of the module. */
888 static void module_unload_free(struct module *mod)
889 {
890         struct module_use *use, *tmp;
891
892         mutex_lock(&module_mutex);
893         list_for_each_entry_safe(use, tmp, &mod->target_list, target_list) {
894                 struct module *i = use->target;
895                 pr_debug("%s unusing %s\n", mod->name, i->name);
896                 module_put(i);
897                 list_del(&use->source_list);
898                 list_del(&use->target_list);
899                 kfree(use);
900         }
901         mutex_unlock(&module_mutex);
902 }
903
904 #ifdef CONFIG_MODULE_FORCE_UNLOAD
905 static inline int try_force_unload(unsigned int flags)
906 {
907         int ret = (flags & O_TRUNC);
908         if (ret)
909                 add_taint(TAINT_FORCED_RMMOD, LOCKDEP_NOW_UNRELIABLE);
910         return ret;
911 }
912 #else
913 static inline int try_force_unload(unsigned int flags)
914 {
915         return 0;
916 }
917 #endif /* CONFIG_MODULE_FORCE_UNLOAD */
918
919 /* Try to release refcount of module, 0 means success. */
920 static int try_release_module_ref(struct module *mod)
921 {
922         int ret;
923
924         /* Try to decrement refcnt which we set at loading */
925         ret = atomic_sub_return(MODULE_REF_BASE, &mod->refcnt);
926         BUG_ON(ret < 0);
927         if (ret)
928                 /* Someone can put this right now, recover with checking */
929                 ret = atomic_add_unless(&mod->refcnt, MODULE_REF_BASE, 0);
930
931         return ret;
932 }
933
934 static int try_stop_module(struct module *mod, int flags, int *forced)
935 {
936         /* If it's not unused, quit unless we're forcing. */
937         if (try_release_module_ref(mod) != 0) {
938                 *forced = try_force_unload(flags);
939                 if (!(*forced))
940                         return -EWOULDBLOCK;
941         }
942
943         /* Mark it as dying. */
944         mod->state = MODULE_STATE_GOING;
945
946         return 0;
947 }
948
949 /**
950  * module_refcount - return the refcount or -1 if unloading
951  *
952  * @mod:        the module we're checking
953  *
954  * Returns:
955  *      -1 if the module is in the process of unloading
956  *      otherwise the number of references in the kernel to the module
957  */
958 int module_refcount(struct module *mod)
959 {
960         return atomic_read(&mod->refcnt) - MODULE_REF_BASE;
961 }
962 EXPORT_SYMBOL(module_refcount);
963
964 /* This exists whether we can unload or not */
965 static void free_module(struct module *mod);
966
967 SYSCALL_DEFINE2(delete_module, const char __user *, name_user,
968                 unsigned int, flags)
969 {
970         struct module *mod;
971         char name[MODULE_NAME_LEN];
972         int ret, forced = 0;
973
974         if (!capable(CAP_SYS_MODULE) || modules_disabled)
975                 return -EPERM;
976
977         if (strncpy_from_user(name, name_user, MODULE_NAME_LEN-1) < 0)
978                 return -EFAULT;
979         name[MODULE_NAME_LEN-1] = '\0';
980
981         audit_log_kern_module(name);
982
983         if (mutex_lock_interruptible(&module_mutex) != 0)
984                 return -EINTR;
985
986         mod = find_module(name);
987         if (!mod) {
988                 ret = -ENOENT;
989                 goto out;
990         }
991
992         if (!list_empty(&mod->source_list)) {
993                 /* Other modules depend on us: get rid of them first. */
994                 ret = -EWOULDBLOCK;
995                 goto out;
996         }
997
998         /* Doing init or already dying? */
999         if (mod->state != MODULE_STATE_LIVE) {
1000                 /* FIXME: if (force), slam module count damn the torpedoes */
1001                 pr_debug("%s already dying\n", mod->name);
1002                 ret = -EBUSY;
1003                 goto out;
1004         }
1005
1006         /* If it has an init func, it must have an exit func to unload */
1007         if (mod->init && !mod->exit) {
1008                 forced = try_force_unload(flags);
1009                 if (!forced) {
1010                         /* This module can't be removed */
1011                         ret = -EBUSY;
1012                         goto out;
1013                 }
1014         }
1015
1016         /* Stop the machine so refcounts can't move and disable module. */
1017         ret = try_stop_module(mod, flags, &forced);
1018         if (ret != 0)
1019                 goto out;
1020
1021         mutex_unlock(&module_mutex);
1022         /* Final destruction now no one is using it. */
1023         if (mod->exit != NULL)
1024                 mod->exit();
1025         blocking_notifier_call_chain(&module_notify_list,
1026                                      MODULE_STATE_GOING, mod);
1027         klp_module_going(mod);
1028         ftrace_release_mod(mod);
1029
1030         async_synchronize_full();
1031
1032         /* Store the name of the last unloaded module for diagnostic purposes */
1033         strlcpy(last_unloaded_module, mod->name, sizeof(last_unloaded_module));
1034
1035         free_module(mod);
1036         return 0;
1037 out:
1038         mutex_unlock(&module_mutex);
1039         return ret;
1040 }
1041
1042 static inline void print_unload_info(struct seq_file *m, struct module *mod)
1043 {
1044         struct module_use *use;
1045         int printed_something = 0;
1046
1047         seq_printf(m, " %i ", module_refcount(mod));
1048
1049         /*
1050          * Always include a trailing , so userspace can differentiate
1051          * between this and the old multi-field proc format.
1052          */
1053         list_for_each_entry(use, &mod->source_list, source_list) {
1054                 printed_something = 1;
1055                 seq_printf(m, "%s,", use->source->name);
1056         }
1057
1058         if (mod->init != NULL && mod->exit == NULL) {
1059                 printed_something = 1;
1060                 seq_puts(m, "[permanent],");
1061         }
1062
1063         if (!printed_something)
1064                 seq_puts(m, "-");
1065 }
1066
1067 void __symbol_put(const char *symbol)
1068 {
1069         struct module *owner;
1070
1071         preempt_disable();
1072         if (!find_symbol(symbol, &owner, NULL, true, false))
1073                 BUG();
1074         module_put(owner);
1075         preempt_enable();
1076 }
1077 EXPORT_SYMBOL(__symbol_put);
1078
1079 /* Note this assumes addr is a function, which it currently always is. */
1080 void symbol_put_addr(void *addr)
1081 {
1082         struct module *modaddr;
1083         unsigned long a = (unsigned long)dereference_function_descriptor(addr);
1084
1085         if (core_kernel_text(a))
1086                 return;
1087
1088         /*
1089          * Even though we hold a reference on the module; we still need to
1090          * disable preemption in order to safely traverse the data structure.
1091          */
1092         preempt_disable();
1093         modaddr = __module_text_address(a);
1094         BUG_ON(!modaddr);
1095         module_put(modaddr);
1096         preempt_enable();
1097 }
1098 EXPORT_SYMBOL_GPL(symbol_put_addr);
1099
1100 static ssize_t show_refcnt(struct module_attribute *mattr,
1101                            struct module_kobject *mk, char *buffer)
1102 {
1103         return sprintf(buffer, "%i\n", module_refcount(mk->mod));
1104 }
1105
1106 static struct module_attribute modinfo_refcnt =
1107         __ATTR(refcnt, 0444, show_refcnt, NULL);
1108
1109 void __module_get(struct module *module)
1110 {
1111         if (module) {
1112                 preempt_disable();
1113                 atomic_inc(&module->refcnt);
1114                 trace_module_get(module, _RET_IP_);
1115                 preempt_enable();
1116         }
1117 }
1118 EXPORT_SYMBOL(__module_get);
1119
1120 bool try_module_get(struct module *module)
1121 {
1122         bool ret = true;
1123
1124         if (module) {
1125                 preempt_disable();
1126                 /* Note: here, we can fail to get a reference */
1127                 if (likely(module_is_live(module) &&
1128                            atomic_inc_not_zero(&module->refcnt) != 0))
1129                         trace_module_get(module, _RET_IP_);
1130                 else
1131                         ret = false;
1132
1133                 preempt_enable();
1134         }
1135         return ret;
1136 }
1137 EXPORT_SYMBOL(try_module_get);
1138
1139 void module_put(struct module *module)
1140 {
1141         int ret;
1142
1143         if (module) {
1144                 preempt_disable();
1145                 ret = atomic_dec_if_positive(&module->refcnt);
1146                 WARN_ON(ret < 0);       /* Failed to put refcount */
1147                 trace_module_put(module, _RET_IP_);
1148                 preempt_enable();
1149         }
1150 }
1151 EXPORT_SYMBOL(module_put);
1152
1153 #else /* !CONFIG_MODULE_UNLOAD */
1154 static inline void print_unload_info(struct seq_file *m, struct module *mod)
1155 {
1156         /* We don't know the usage count, or what modules are using. */
1157         seq_puts(m, " - -");
1158 }
1159
1160 static inline void module_unload_free(struct module *mod)
1161 {
1162 }
1163
1164 int ref_module(struct module *a, struct module *b)
1165 {
1166         return strong_try_module_get(b);
1167 }
1168 EXPORT_SYMBOL_GPL(ref_module);
1169
1170 static inline int module_unload_init(struct module *mod)
1171 {
1172         return 0;
1173 }
1174 #endif /* CONFIG_MODULE_UNLOAD */
1175
1176 static size_t module_flags_taint(struct module *mod, char *buf)
1177 {
1178         size_t l = 0;
1179         int i;
1180
1181         for (i = 0; i < TAINT_FLAGS_COUNT; i++) {
1182                 if (taint_flags[i].module && test_bit(i, &mod->taints))
1183                         buf[l++] = taint_flags[i].c_true;
1184         }
1185
1186         return l;
1187 }
1188
1189 static ssize_t show_initstate(struct module_attribute *mattr,
1190                               struct module_kobject *mk, char *buffer)
1191 {
1192         const char *state = "unknown";
1193
1194         switch (mk->mod->state) {
1195         case MODULE_STATE_LIVE:
1196                 state = "live";
1197                 break;
1198         case MODULE_STATE_COMING:
1199                 state = "coming";
1200                 break;
1201         case MODULE_STATE_GOING:
1202                 state = "going";
1203                 break;
1204         default:
1205                 BUG();
1206         }
1207         return sprintf(buffer, "%s\n", state);
1208 }
1209
1210 static struct module_attribute modinfo_initstate =
1211         __ATTR(initstate, 0444, show_initstate, NULL);
1212
1213 static ssize_t store_uevent(struct module_attribute *mattr,
1214                             struct module_kobject *mk,
1215                             const char *buffer, size_t count)
1216 {
1217         int rc;
1218
1219         rc = kobject_synth_uevent(&mk->kobj, buffer, count);
1220         return rc ? rc : count;
1221 }
1222
1223 struct module_attribute module_uevent =
1224         __ATTR(uevent, 0200, NULL, store_uevent);
1225
1226 static ssize_t show_coresize(struct module_attribute *mattr,
1227                              struct module_kobject *mk, char *buffer)
1228 {
1229         return sprintf(buffer, "%u\n", mk->mod->core_layout.size);
1230 }
1231
1232 static struct module_attribute modinfo_coresize =
1233         __ATTR(coresize, 0444, show_coresize, NULL);
1234
1235 static ssize_t show_initsize(struct module_attribute *mattr,
1236                              struct module_kobject *mk, char *buffer)
1237 {
1238         return sprintf(buffer, "%u\n", mk->mod->init_layout.size);
1239 }
1240
1241 static struct module_attribute modinfo_initsize =
1242         __ATTR(initsize, 0444, show_initsize, NULL);
1243
1244 static ssize_t show_taint(struct module_attribute *mattr,
1245                           struct module_kobject *mk, char *buffer)
1246 {
1247         size_t l;
1248
1249         l = module_flags_taint(mk->mod, buffer);
1250         buffer[l++] = '\n';
1251         return l;
1252 }
1253
1254 static struct module_attribute modinfo_taint =
1255         __ATTR(taint, 0444, show_taint, NULL);
1256
1257 static struct module_attribute *modinfo_attrs[] = {
1258         &module_uevent,
1259         &modinfo_version,
1260         &modinfo_srcversion,
1261         &modinfo_initstate,
1262         &modinfo_coresize,
1263         &modinfo_initsize,
1264         &modinfo_taint,
1265 #ifdef CONFIG_MODULE_UNLOAD
1266         &modinfo_refcnt,
1267 #endif
1268         NULL,
1269 };
1270
1271 static const char vermagic[] = VERMAGIC_STRING;
1272
1273 static int try_to_force_load(struct module *mod, const char *reason)
1274 {
1275 #ifdef CONFIG_MODULE_FORCE_LOAD
1276         if (!test_taint(TAINT_FORCED_MODULE))
1277                 pr_warn("%s: %s: kernel tainted.\n", mod->name, reason);
1278         add_taint_module(mod, TAINT_FORCED_MODULE, LOCKDEP_NOW_UNRELIABLE);
1279         return 0;
1280 #else
1281         return -ENOEXEC;
1282 #endif
1283 }
1284
1285 #ifdef CONFIG_MODVERSIONS
1286
1287 static u32 resolve_rel_crc(const s32 *crc)
1288 {
1289         return *(u32 *)((void *)crc + *crc);
1290 }
1291
1292 static int check_version(const struct load_info *info,
1293                          const char *symname,
1294                          struct module *mod,
1295                          const s32 *crc)
1296 {
1297         Elf_Shdr *sechdrs = info->sechdrs;
1298         unsigned int versindex = info->index.vers;
1299         unsigned int i, num_versions;
1300         struct modversion_info *versions;
1301
1302         /* Exporting module didn't supply crcs?  OK, we're already tainted. */
1303         if (!crc)
1304                 return 1;
1305
1306         /* No versions at all?  modprobe --force does this. */
1307         if (versindex == 0)
1308                 return try_to_force_load(mod, symname) == 0;
1309
1310         versions = (void *) sechdrs[versindex].sh_addr;
1311         num_versions = sechdrs[versindex].sh_size
1312                 / sizeof(struct modversion_info);
1313
1314         for (i = 0; i < num_versions; i++) {
1315                 u32 crcval;
1316
1317                 if (strcmp(versions[i].name, symname) != 0)
1318                         continue;
1319
1320                 if (IS_ENABLED(CONFIG_MODULE_REL_CRCS))
1321                         crcval = resolve_rel_crc(crc);
1322                 else
1323                         crcval = *crc;
1324                 if (versions[i].crc == crcval)
1325                         return 1;
1326                 pr_debug("Found checksum %X vs module %lX\n",
1327                          crcval, versions[i].crc);
1328                 goto bad_version;
1329         }
1330
1331         /* Broken toolchain. Warn once, then let it go.. */
1332         pr_warn_once("%s: no symbol version for %s\n", info->name, symname);
1333         return 1;
1334
1335 bad_version:
1336         pr_warn("%s: disagrees about version of symbol %s\n",
1337                info->name, symname);
1338         return 0;
1339 }
1340
1341 static inline int check_modstruct_version(const struct load_info *info,
1342                                           struct module *mod)
1343 {
1344         const s32 *crc;
1345
1346         /*
1347          * Since this should be found in kernel (which can't be removed), no
1348          * locking is necessary -- use preempt_disable() to placate lockdep.
1349          */
1350         preempt_disable();
1351         if (!find_symbol("module_layout", NULL, &crc, true, false)) {
1352                 preempt_enable();
1353                 BUG();
1354         }
1355         preempt_enable();
1356         return check_version(info, "module_layout", mod, crc);
1357 }
1358
1359 /* First part is kernel version, which we ignore if module has crcs. */
1360 static inline int same_magic(const char *amagic, const char *bmagic,
1361                              bool has_crcs)
1362 {
1363         if (has_crcs) {
1364                 amagic += strcspn(amagic, " ");
1365                 bmagic += strcspn(bmagic, " ");
1366         }
1367         return strcmp(amagic, bmagic) == 0;
1368 }
1369 #else
1370 static inline int check_version(const struct load_info *info,
1371                                 const char *symname,
1372                                 struct module *mod,
1373                                 const s32 *crc)
1374 {
1375         return 1;
1376 }
1377
1378 static inline int check_modstruct_version(const struct load_info *info,
1379                                           struct module *mod)
1380 {
1381         return 1;
1382 }
1383
1384 static inline int same_magic(const char *amagic, const char *bmagic,
1385                              bool has_crcs)
1386 {
1387         return strcmp(amagic, bmagic) == 0;
1388 }
1389 #endif /* CONFIG_MODVERSIONS */
1390
1391 static char *get_modinfo(const struct load_info *info, const char *tag);
1392 static char *get_next_modinfo(const struct load_info *info, const char *tag,
1393                               char *prev);
1394
1395 static int verify_namespace_is_imported(const struct load_info *info,
1396                                         const struct kernel_symbol *sym,
1397                                         struct module *mod)
1398 {
1399         const char *namespace;
1400         char *imported_namespace;
1401
1402         namespace = kernel_symbol_namespace(sym);
1403         if (namespace) {
1404                 imported_namespace = get_modinfo(info, "import_ns");
1405                 while (imported_namespace) {
1406                         if (strcmp(namespace, imported_namespace) == 0)
1407                                 return 0;
1408                         imported_namespace = get_next_modinfo(
1409                                 info, "import_ns", imported_namespace);
1410                 }
1411                 pr_err("%s: module uses symbol (%s) from namespace %s, but does not import it.\n",
1412                        mod->name, kernel_symbol_name(sym), namespace);
1413                 return -EINVAL;
1414         }
1415         return 0;
1416 }
1417
1418
1419 /* Resolve a symbol for this module.  I.e. if we find one, record usage. */
1420 static const struct kernel_symbol *resolve_symbol(struct module *mod,
1421                                                   const struct load_info *info,
1422                                                   const char *name,
1423                                                   char ownername[])
1424 {
1425         struct module *owner;
1426         const struct kernel_symbol *sym;
1427         const s32 *crc;
1428         int err;
1429
1430         /*
1431          * The module_mutex should not be a heavily contended lock;
1432          * if we get the occasional sleep here, we'll go an extra iteration
1433          * in the wait_event_interruptible(), which is harmless.
1434          */
1435         sched_annotate_sleep();
1436         mutex_lock(&module_mutex);
1437         sym = find_symbol(name, &owner, &crc,
1438                           !(mod->taints & (1 << TAINT_PROPRIETARY_MODULE)), true);
1439         if (!sym)
1440                 goto unlock;
1441
1442         if (!check_version(info, name, mod, crc)) {
1443                 sym = ERR_PTR(-EINVAL);
1444                 goto getname;
1445         }
1446
1447         err = verify_namespace_is_imported(info, sym, mod);
1448         if (err) {
1449                 sym = ERR_PTR(err);
1450                 goto getname;
1451         }
1452
1453         err = ref_module(mod, owner);
1454         if (err) {
1455                 sym = ERR_PTR(err);
1456                 goto getname;
1457         }
1458
1459 getname:
1460         /* We must make copy under the lock if we failed to get ref. */
1461         strncpy(ownername, module_name(owner), MODULE_NAME_LEN);
1462 unlock:
1463         mutex_unlock(&module_mutex);
1464         return sym;
1465 }
1466
1467 static const struct kernel_symbol *
1468 resolve_symbol_wait(struct module *mod,
1469                     const struct load_info *info,
1470                     const char *name)
1471 {
1472         const struct kernel_symbol *ksym;
1473         char owner[MODULE_NAME_LEN];
1474
1475         if (wait_event_interruptible_timeout(module_wq,
1476                         !IS_ERR(ksym = resolve_symbol(mod, info, name, owner))
1477                         || PTR_ERR(ksym) != -EBUSY,
1478                                              30 * HZ) <= 0) {
1479                 pr_warn("%s: gave up waiting for init of module %s.\n",
1480                         mod->name, owner);
1481         }
1482         return ksym;
1483 }
1484
1485 /*
1486  * /sys/module/foo/sections stuff
1487  * J. Corbet <corbet@lwn.net>
1488  */
1489 #ifdef CONFIG_SYSFS
1490
1491 #ifdef CONFIG_KALLSYMS
1492 static inline bool sect_empty(const Elf_Shdr *sect)
1493 {
1494         return !(sect->sh_flags & SHF_ALLOC) || sect->sh_size == 0;
1495 }
1496
1497 struct module_sect_attr {
1498         struct module_attribute mattr;
1499         char *name;
1500         unsigned long address;
1501 };
1502
1503 struct module_sect_attrs {
1504         struct attribute_group grp;
1505         unsigned int nsections;
1506         struct module_sect_attr attrs[0];
1507 };
1508
1509 static ssize_t module_sect_show(struct module_attribute *mattr,
1510                                 struct module_kobject *mk, char *buf)
1511 {
1512         struct module_sect_attr *sattr =
1513                 container_of(mattr, struct module_sect_attr, mattr);
1514         return sprintf(buf, "0x%px\n", kptr_restrict < 2 ?
1515                        (void *)sattr->address : NULL);
1516 }
1517
1518 static void free_sect_attrs(struct module_sect_attrs *sect_attrs)
1519 {
1520         unsigned int section;
1521
1522         for (section = 0; section < sect_attrs->nsections; section++)
1523                 kfree(sect_attrs->attrs[section].name);
1524         kfree(sect_attrs);
1525 }
1526
1527 static void add_sect_attrs(struct module *mod, const struct load_info *info)
1528 {
1529         unsigned int nloaded = 0, i, size[2];
1530         struct module_sect_attrs *sect_attrs;
1531         struct module_sect_attr *sattr;
1532         struct attribute **gattr;
1533
1534         /* Count loaded sections and allocate structures */
1535         for (i = 0; i < info->hdr->e_shnum; i++)
1536                 if (!sect_empty(&info->sechdrs[i]))
1537                         nloaded++;
1538         size[0] = ALIGN(struct_size(sect_attrs, attrs, nloaded),
1539                         sizeof(sect_attrs->grp.attrs[0]));
1540         size[1] = (nloaded + 1) * sizeof(sect_attrs->grp.attrs[0]);
1541         sect_attrs = kzalloc(size[0] + size[1], GFP_KERNEL);
1542         if (sect_attrs == NULL)
1543                 return;
1544
1545         /* Setup section attributes. */
1546         sect_attrs->grp.name = "sections";
1547         sect_attrs->grp.attrs = (void *)sect_attrs + size[0];
1548
1549         sect_attrs->nsections = 0;
1550         sattr = &sect_attrs->attrs[0];
1551         gattr = &sect_attrs->grp.attrs[0];
1552         for (i = 0; i < info->hdr->e_shnum; i++) {
1553                 Elf_Shdr *sec = &info->sechdrs[i];
1554                 if (sect_empty(sec))
1555                         continue;
1556                 sattr->address = sec->sh_addr;
1557                 sattr->name = kstrdup(info->secstrings + sec->sh_name,
1558                                         GFP_KERNEL);
1559                 if (sattr->name == NULL)
1560                         goto out;
1561                 sect_attrs->nsections++;
1562                 sysfs_attr_init(&sattr->mattr.attr);
1563                 sattr->mattr.show = module_sect_show;
1564                 sattr->mattr.store = NULL;
1565                 sattr->mattr.attr.name = sattr->name;
1566                 sattr->mattr.attr.mode = S_IRUSR;
1567                 *(gattr++) = &(sattr++)->mattr.attr;
1568         }
1569         *gattr = NULL;
1570
1571         if (sysfs_create_group(&mod->mkobj.kobj, &sect_attrs->grp))
1572                 goto out;
1573
1574         mod->sect_attrs = sect_attrs;
1575         return;
1576   out:
1577         free_sect_attrs(sect_attrs);
1578 }
1579
1580 static void remove_sect_attrs(struct module *mod)
1581 {
1582         if (mod->sect_attrs) {
1583                 sysfs_remove_group(&mod->mkobj.kobj,
1584                                    &mod->sect_attrs->grp);
1585                 /* We are positive that no one is using any sect attrs
1586                  * at this point.  Deallocate immediately. */
1587                 free_sect_attrs(mod->sect_attrs);
1588                 mod->sect_attrs = NULL;
1589         }
1590 }
1591
1592 /*
1593  * /sys/module/foo/notes/.section.name gives contents of SHT_NOTE sections.
1594  */
1595
1596 struct module_notes_attrs {
1597         struct kobject *dir;
1598         unsigned int notes;
1599         struct bin_attribute attrs[0];
1600 };
1601
1602 static ssize_t module_notes_read(struct file *filp, struct kobject *kobj,
1603                                  struct bin_attribute *bin_attr,
1604                                  char *buf, loff_t pos, size_t count)
1605 {
1606         /*
1607          * The caller checked the pos and count against our size.
1608          */
1609         memcpy(buf, bin_attr->private + pos, count);
1610         return count;
1611 }
1612
1613 static void free_notes_attrs(struct module_notes_attrs *notes_attrs,
1614                              unsigned int i)
1615 {
1616         if (notes_attrs->dir) {
1617                 while (i-- > 0)
1618                         sysfs_remove_bin_file(notes_attrs->dir,
1619                                               &notes_attrs->attrs[i]);
1620                 kobject_put(notes_attrs->dir);
1621         }
1622         kfree(notes_attrs);
1623 }
1624
1625 static void add_notes_attrs(struct module *mod, const struct load_info *info)
1626 {
1627         unsigned int notes, loaded, i;
1628         struct module_notes_attrs *notes_attrs;
1629         struct bin_attribute *nattr;
1630
1631         /* failed to create section attributes, so can't create notes */
1632         if (!mod->sect_attrs)
1633                 return;
1634
1635         /* Count notes sections and allocate structures.  */
1636         notes = 0;
1637         for (i = 0; i < info->hdr->e_shnum; i++)
1638                 if (!sect_empty(&info->sechdrs[i]) &&
1639                     (info->sechdrs[i].sh_type == SHT_NOTE))
1640                         ++notes;
1641
1642         if (notes == 0)
1643                 return;
1644
1645         notes_attrs = kzalloc(struct_size(notes_attrs, attrs, notes),
1646                               GFP_KERNEL);
1647         if (notes_attrs == NULL)
1648                 return;
1649
1650         notes_attrs->notes = notes;
1651         nattr = &notes_attrs->attrs[0];
1652         for (loaded = i = 0; i < info->hdr->e_shnum; ++i) {
1653                 if (sect_empty(&info->sechdrs[i]))
1654                         continue;
1655                 if (info->sechdrs[i].sh_type == SHT_NOTE) {
1656                         sysfs_bin_attr_init(nattr);
1657                         nattr->attr.name = mod->sect_attrs->attrs[loaded].name;
1658                         nattr->attr.mode = S_IRUGO;
1659                         nattr->size = info->sechdrs[i].sh_size;
1660                         nattr->private = (void *) info->sechdrs[i].sh_addr;
1661                         nattr->read = module_notes_read;
1662                         ++nattr;
1663                 }
1664                 ++loaded;
1665         }
1666
1667         notes_attrs->dir = kobject_create_and_add("notes", &mod->mkobj.kobj);
1668         if (!notes_attrs->dir)
1669                 goto out;
1670
1671         for (i = 0; i < notes; ++i)
1672                 if (sysfs_create_bin_file(notes_attrs->dir,
1673                                           &notes_attrs->attrs[i]))
1674                         goto out;
1675
1676         mod->notes_attrs = notes_attrs;
1677         return;
1678
1679   out:
1680         free_notes_attrs(notes_attrs, i);
1681 }
1682
1683 static void remove_notes_attrs(struct module *mod)
1684 {
1685         if (mod->notes_attrs)
1686                 free_notes_attrs(mod->notes_attrs, mod->notes_attrs->notes);
1687 }
1688
1689 #else
1690
1691 static inline void add_sect_attrs(struct module *mod,
1692                                   const struct load_info *info)
1693 {
1694 }
1695
1696 static inline void remove_sect_attrs(struct module *mod)
1697 {
1698 }
1699
1700 static inline void add_notes_attrs(struct module *mod,
1701                                    const struct load_info *info)
1702 {
1703 }
1704
1705 static inline void remove_notes_attrs(struct module *mod)
1706 {
1707 }
1708 #endif /* CONFIG_KALLSYMS */
1709
1710 static void del_usage_links(struct module *mod)
1711 {
1712 #ifdef CONFIG_MODULE_UNLOAD
1713         struct module_use *use;
1714
1715         mutex_lock(&module_mutex);
1716         list_for_each_entry(use, &mod->target_list, target_list)
1717                 sysfs_remove_link(use->target->holders_dir, mod->name);
1718         mutex_unlock(&module_mutex);
1719 #endif
1720 }
1721
1722 static int add_usage_links(struct module *mod)
1723 {
1724         int ret = 0;
1725 #ifdef CONFIG_MODULE_UNLOAD
1726         struct module_use *use;
1727
1728         mutex_lock(&module_mutex);
1729         list_for_each_entry(use, &mod->target_list, target_list) {
1730                 ret = sysfs_create_link(use->target->holders_dir,
1731                                         &mod->mkobj.kobj, mod->name);
1732                 if (ret)
1733                         break;
1734         }
1735         mutex_unlock(&module_mutex);
1736         if (ret)
1737                 del_usage_links(mod);
1738 #endif
1739         return ret;
1740 }
1741
1742 static void module_remove_modinfo_attrs(struct module *mod, int end);
1743
1744 static int module_add_modinfo_attrs(struct module *mod)
1745 {
1746         struct module_attribute *attr;
1747         struct module_attribute *temp_attr;
1748         int error = 0;
1749         int i;
1750
1751         mod->modinfo_attrs = kzalloc((sizeof(struct module_attribute) *
1752                                         (ARRAY_SIZE(modinfo_attrs) + 1)),
1753                                         GFP_KERNEL);
1754         if (!mod->modinfo_attrs)
1755                 return -ENOMEM;
1756
1757         temp_attr = mod->modinfo_attrs;
1758         for (i = 0; (attr = modinfo_attrs[i]); i++) {
1759                 if (!attr->test || attr->test(mod)) {
1760                         memcpy(temp_attr, attr, sizeof(*temp_attr));
1761                         sysfs_attr_init(&temp_attr->attr);
1762                         error = sysfs_create_file(&mod->mkobj.kobj,
1763                                         &temp_attr->attr);
1764                         if (error)
1765                                 goto error_out;
1766                         ++temp_attr;
1767                 }
1768         }
1769
1770         return 0;
1771
1772 error_out:
1773         if (i > 0)
1774                 module_remove_modinfo_attrs(mod, --i);
1775         return error;
1776 }
1777
1778 static void module_remove_modinfo_attrs(struct module *mod, int end)
1779 {
1780         struct module_attribute *attr;
1781         int i;
1782
1783         for (i = 0; (attr = &mod->modinfo_attrs[i]); i++) {
1784                 if (end >= 0 && i > end)
1785                         break;
1786                 /* pick a field to test for end of list */
1787                 if (!attr->attr.name)
1788                         break;
1789                 sysfs_remove_file(&mod->mkobj.kobj, &attr->attr);
1790                 if (attr->free)
1791                         attr->free(mod);
1792         }
1793         kfree(mod->modinfo_attrs);
1794 }
1795
1796 static void mod_kobject_put(struct module *mod)
1797 {
1798         DECLARE_COMPLETION_ONSTACK(c);
1799         mod->mkobj.kobj_completion = &c;
1800         kobject_put(&mod->mkobj.kobj);
1801         wait_for_completion(&c);
1802 }
1803
1804 static int mod_sysfs_init(struct module *mod)
1805 {
1806         int err;
1807         struct kobject *kobj;
1808
1809         if (!module_sysfs_initialized) {
1810                 pr_err("%s: module sysfs not initialized\n", mod->name);
1811                 err = -EINVAL;
1812                 goto out;
1813         }
1814
1815         kobj = kset_find_obj(module_kset, mod->name);
1816         if (kobj) {
1817                 pr_err("%s: module is already loaded\n", mod->name);
1818                 kobject_put(kobj);
1819                 err = -EINVAL;
1820                 goto out;
1821         }
1822
1823         mod->mkobj.mod = mod;
1824
1825         memset(&mod->mkobj.kobj, 0, sizeof(mod->mkobj.kobj));
1826         mod->mkobj.kobj.kset = module_kset;
1827         err = kobject_init_and_add(&mod->mkobj.kobj, &module_ktype, NULL,
1828                                    "%s", mod->name);
1829         if (err)
1830                 mod_kobject_put(mod);
1831
1832         /* delay uevent until full sysfs population */
1833 out:
1834         return err;
1835 }
1836
1837 static int mod_sysfs_setup(struct module *mod,
1838                            const struct load_info *info,
1839                            struct kernel_param *kparam,
1840                            unsigned int num_params)
1841 {
1842         int err;
1843
1844         err = mod_sysfs_init(mod);
1845         if (err)
1846                 goto out;
1847
1848         mod->holders_dir = kobject_create_and_add("holders", &mod->mkobj.kobj);
1849         if (!mod->holders_dir) {
1850                 err = -ENOMEM;
1851                 goto out_unreg;
1852         }
1853
1854         err = module_param_sysfs_setup(mod, kparam, num_params);
1855         if (err)
1856                 goto out_unreg_holders;
1857
1858         err = module_add_modinfo_attrs(mod);
1859         if (err)
1860                 goto out_unreg_param;
1861
1862         err = add_usage_links(mod);
1863         if (err)
1864                 goto out_unreg_modinfo_attrs;
1865
1866         add_sect_attrs(mod, info);
1867         add_notes_attrs(mod, info);
1868
1869         kobject_uevent(&mod->mkobj.kobj, KOBJ_ADD);
1870         return 0;
1871
1872 out_unreg_modinfo_attrs:
1873         module_remove_modinfo_attrs(mod, -1);
1874 out_unreg_param:
1875         module_param_sysfs_remove(mod);
1876 out_unreg_holders:
1877         kobject_put(mod->holders_dir);
1878 out_unreg:
1879         mod_kobject_put(mod);
1880 out:
1881         return err;
1882 }
1883
1884 static void mod_sysfs_fini(struct module *mod)
1885 {
1886         remove_notes_attrs(mod);
1887         remove_sect_attrs(mod);
1888         mod_kobject_put(mod);
1889 }
1890
1891 static void init_param_lock(struct module *mod)
1892 {
1893         mutex_init(&mod->param_lock);
1894 }
1895 #else /* !CONFIG_SYSFS */
1896
1897 static int mod_sysfs_setup(struct module *mod,
1898                            const struct load_info *info,
1899                            struct kernel_param *kparam,
1900                            unsigned int num_params)
1901 {
1902         return 0;
1903 }
1904
1905 static void mod_sysfs_fini(struct module *mod)
1906 {
1907 }
1908
1909 static void module_remove_modinfo_attrs(struct module *mod, int end)
1910 {
1911 }
1912
1913 static void del_usage_links(struct module *mod)
1914 {
1915 }
1916
1917 static void init_param_lock(struct module *mod)
1918 {
1919 }
1920 #endif /* CONFIG_SYSFS */
1921
1922 static void mod_sysfs_teardown(struct module *mod)
1923 {
1924         del_usage_links(mod);
1925         module_remove_modinfo_attrs(mod, -1);
1926         module_param_sysfs_remove(mod);
1927         kobject_put(mod->mkobj.drivers_dir);
1928         kobject_put(mod->holders_dir);
1929         mod_sysfs_fini(mod);
1930 }
1931
1932 #ifdef CONFIG_ARCH_HAS_STRICT_MODULE_RWX
1933 /*
1934  * LKM RO/NX protection: protect module's text/ro-data
1935  * from modification and any data from execution.
1936  *
1937  * General layout of module is:
1938  *          [text] [read-only-data] [ro-after-init] [writable data]
1939  * text_size -----^                ^               ^               ^
1940  * ro_size ------------------------|               |               |
1941  * ro_after_init_size -----------------------------|               |
1942  * size -----------------------------------------------------------|
1943  *
1944  * These values are always page-aligned (as is base)
1945  */
1946 static void frob_text(const struct module_layout *layout,
1947                       int (*set_memory)(unsigned long start, int num_pages))
1948 {
1949         BUG_ON((unsigned long)layout->base & (PAGE_SIZE-1));
1950         BUG_ON((unsigned long)layout->text_size & (PAGE_SIZE-1));
1951         set_memory((unsigned long)layout->base,
1952                    layout->text_size >> PAGE_SHIFT);
1953 }
1954
1955 #ifdef CONFIG_STRICT_MODULE_RWX
1956 static void frob_rodata(const struct module_layout *layout,
1957                         int (*set_memory)(unsigned long start, int num_pages))
1958 {
1959         BUG_ON((unsigned long)layout->base & (PAGE_SIZE-1));
1960         BUG_ON((unsigned long)layout->text_size & (PAGE_SIZE-1));
1961         BUG_ON((unsigned long)layout->ro_size & (PAGE_SIZE-1));
1962         set_memory((unsigned long)layout->base + layout->text_size,
1963                    (layout->ro_size - layout->text_size) >> PAGE_SHIFT);
1964 }
1965
1966 static void frob_ro_after_init(const struct module_layout *layout,
1967                                 int (*set_memory)(unsigned long start, int num_pages))
1968 {
1969         BUG_ON((unsigned long)layout->base & (PAGE_SIZE-1));
1970         BUG_ON((unsigned long)layout->ro_size & (PAGE_SIZE-1));
1971         BUG_ON((unsigned long)layout->ro_after_init_size & (PAGE_SIZE-1));
1972         set_memory((unsigned long)layout->base + layout->ro_size,
1973                    (layout->ro_after_init_size - layout->ro_size) >> PAGE_SHIFT);
1974 }
1975
1976 static void frob_writable_data(const struct module_layout *layout,
1977                                int (*set_memory)(unsigned long start, int num_pages))
1978 {
1979         BUG_ON((unsigned long)layout->base & (PAGE_SIZE-1));
1980         BUG_ON((unsigned long)layout->ro_after_init_size & (PAGE_SIZE-1));
1981         BUG_ON((unsigned long)layout->size & (PAGE_SIZE-1));
1982         set_memory((unsigned long)layout->base + layout->ro_after_init_size,
1983                    (layout->size - layout->ro_after_init_size) >> PAGE_SHIFT);
1984 }
1985
1986 /* livepatching wants to disable read-only so it can frob module. */
1987 void module_disable_ro(const struct module *mod)
1988 {
1989         if (!rodata_enabled)
1990                 return;
1991
1992         frob_text(&mod->core_layout, set_memory_rw);
1993         frob_rodata(&mod->core_layout, set_memory_rw);
1994         frob_ro_after_init(&mod->core_layout, set_memory_rw);
1995         frob_text(&mod->init_layout, set_memory_rw);
1996         frob_rodata(&mod->init_layout, set_memory_rw);
1997 }
1998
1999 void module_enable_ro(const struct module *mod, bool after_init)
2000 {
2001         if (!rodata_enabled)
2002                 return;
2003
2004         set_vm_flush_reset_perms(mod->core_layout.base);
2005         set_vm_flush_reset_perms(mod->init_layout.base);
2006         frob_text(&mod->core_layout, set_memory_ro);
2007
2008         frob_rodata(&mod->core_layout, set_memory_ro);
2009         frob_text(&mod->init_layout, set_memory_ro);
2010         frob_rodata(&mod->init_layout, set_memory_ro);
2011
2012         if (after_init)
2013                 frob_ro_after_init(&mod->core_layout, set_memory_ro);
2014 }
2015
2016 static void module_enable_nx(const struct module *mod)
2017 {
2018         frob_rodata(&mod->core_layout, set_memory_nx);
2019         frob_ro_after_init(&mod->core_layout, set_memory_nx);
2020         frob_writable_data(&mod->core_layout, set_memory_nx);
2021         frob_rodata(&mod->init_layout, set_memory_nx);
2022         frob_writable_data(&mod->init_layout, set_memory_nx);
2023 }
2024
2025 /* Iterate through all modules and set each module's text as RW */
2026 void set_all_modules_text_rw(void)
2027 {
2028         struct module *mod;
2029
2030         if (!rodata_enabled)
2031                 return;
2032
2033         mutex_lock(&module_mutex);
2034         list_for_each_entry_rcu(mod, &modules, list) {
2035                 if (mod->state == MODULE_STATE_UNFORMED)
2036                         continue;
2037
2038                 frob_text(&mod->core_layout, set_memory_rw);
2039                 frob_text(&mod->init_layout, set_memory_rw);
2040         }
2041         mutex_unlock(&module_mutex);
2042 }
2043
2044 /* Iterate through all modules and set each module's text as RO */
2045 void set_all_modules_text_ro(void)
2046 {
2047         struct module *mod;
2048
2049         if (!rodata_enabled)
2050                 return;
2051
2052         mutex_lock(&module_mutex);
2053         list_for_each_entry_rcu(mod, &modules, list) {
2054                 /*
2055                  * Ignore going modules since it's possible that ro
2056                  * protection has already been disabled, otherwise we'll
2057                  * run into protection faults at module deallocation.
2058                  */
2059                 if (mod->state == MODULE_STATE_UNFORMED ||
2060                         mod->state == MODULE_STATE_GOING)
2061                         continue;
2062
2063                 frob_text(&mod->core_layout, set_memory_ro);
2064                 frob_text(&mod->init_layout, set_memory_ro);
2065         }
2066         mutex_unlock(&module_mutex);
2067 }
2068 #else /* !CONFIG_STRICT_MODULE_RWX */
2069 static void module_enable_nx(const struct module *mod) { }
2070 #endif /*  CONFIG_STRICT_MODULE_RWX */
2071 static void module_enable_x(const struct module *mod)
2072 {
2073         frob_text(&mod->core_layout, set_memory_x);
2074         frob_text(&mod->init_layout, set_memory_x);
2075 }
2076 #else /* !CONFIG_ARCH_HAS_STRICT_MODULE_RWX */
2077 static void module_enable_nx(const struct module *mod) { }
2078 static void module_enable_x(const struct module *mod) { }
2079 #endif /* CONFIG_ARCH_HAS_STRICT_MODULE_RWX */
2080
2081
2082 #ifdef CONFIG_LIVEPATCH
2083 /*
2084  * Persist Elf information about a module. Copy the Elf header,
2085  * section header table, section string table, and symtab section
2086  * index from info to mod->klp_info.
2087  */
2088 static int copy_module_elf(struct module *mod, struct load_info *info)
2089 {
2090         unsigned int size, symndx;
2091         int ret;
2092
2093         size = sizeof(*mod->klp_info);
2094         mod->klp_info = kmalloc(size, GFP_KERNEL);
2095         if (mod->klp_info == NULL)
2096                 return -ENOMEM;
2097
2098         /* Elf header */
2099         size = sizeof(mod->klp_info->hdr);
2100         memcpy(&mod->klp_info->hdr, info->hdr, size);
2101
2102         /* Elf section header table */
2103         size = sizeof(*info->sechdrs) * info->hdr->e_shnum;
2104         mod->klp_info->sechdrs = kmemdup(info->sechdrs, size, GFP_KERNEL);
2105         if (mod->klp_info->sechdrs == NULL) {
2106                 ret = -ENOMEM;
2107                 goto free_info;
2108         }
2109
2110         /* Elf section name string table */
2111         size = info->sechdrs[info->hdr->e_shstrndx].sh_size;
2112         mod->klp_info->secstrings = kmemdup(info->secstrings, size, GFP_KERNEL);
2113         if (mod->klp_info->secstrings == NULL) {
2114                 ret = -ENOMEM;
2115                 goto free_sechdrs;
2116         }
2117
2118         /* Elf symbol section index */
2119         symndx = info->index.sym;
2120         mod->klp_info->symndx = symndx;
2121
2122         /*
2123          * For livepatch modules, core_kallsyms.symtab is a complete
2124          * copy of the original symbol table. Adjust sh_addr to point
2125          * to core_kallsyms.symtab since the copy of the symtab in module
2126          * init memory is freed at the end of do_init_module().
2127          */
2128         mod->klp_info->sechdrs[symndx].sh_addr = \
2129                 (unsigned long) mod->core_kallsyms.symtab;
2130
2131         return 0;
2132
2133 free_sechdrs:
2134         kfree(mod->klp_info->sechdrs);
2135 free_info:
2136         kfree(mod->klp_info);
2137         return ret;
2138 }
2139
2140 static void free_module_elf(struct module *mod)
2141 {
2142         kfree(mod->klp_info->sechdrs);
2143         kfree(mod->klp_info->secstrings);
2144         kfree(mod->klp_info);
2145 }
2146 #else /* !CONFIG_LIVEPATCH */
2147 static int copy_module_elf(struct module *mod, struct load_info *info)
2148 {
2149         return 0;
2150 }
2151
2152 static void free_module_elf(struct module *mod)
2153 {
2154 }
2155 #endif /* CONFIG_LIVEPATCH */
2156
2157 void __weak module_memfree(void *module_region)
2158 {
2159         /*
2160          * This memory may be RO, and freeing RO memory in an interrupt is not
2161          * supported by vmalloc.
2162          */
2163         WARN_ON(in_interrupt());
2164         vfree(module_region);
2165 }
2166
2167 void __weak module_arch_cleanup(struct module *mod)
2168 {
2169 }
2170
2171 void __weak module_arch_freeing_init(struct module *mod)
2172 {
2173 }
2174
2175 /* Free a module, remove from lists, etc. */
2176 static void free_module(struct module *mod)
2177 {
2178         trace_module_free(mod);
2179
2180         mod_sysfs_teardown(mod);
2181
2182         /* We leave it in list to prevent duplicate loads, but make sure
2183          * that noone uses it while it's being deconstructed. */
2184         mutex_lock(&module_mutex);
2185         mod->state = MODULE_STATE_UNFORMED;
2186         mutex_unlock(&module_mutex);
2187
2188         /* Remove dynamic debug info */
2189         ddebug_remove_module(mod->name);
2190
2191         /* Arch-specific cleanup. */
2192         module_arch_cleanup(mod);
2193
2194         /* Module unload stuff */
2195         module_unload_free(mod);
2196
2197         /* Free any allocated parameters. */
2198         destroy_params(mod->kp, mod->num_kp);
2199
2200         if (is_livepatch_module(mod))
2201                 free_module_elf(mod);
2202
2203         /* Now we can delete it from the lists */
2204         mutex_lock(&module_mutex);
2205         /* Unlink carefully: kallsyms could be walking list. */
2206         list_del_rcu(&mod->list);
2207         mod_tree_remove(mod);
2208         /* Remove this module from bug list, this uses list_del_rcu */
2209         module_bug_cleanup(mod);
2210         /* Wait for RCU-sched synchronizing before releasing mod->list and buglist. */
2211         synchronize_rcu();
2212         mutex_unlock(&module_mutex);
2213
2214         /* This may be empty, but that's OK */
2215         module_arch_freeing_init(mod);
2216         module_memfree(mod->init_layout.base);
2217         kfree(mod->args);
2218         percpu_modfree(mod);
2219
2220         /* Free lock-classes; relies on the preceding sync_rcu(). */
2221         lockdep_free_key_range(mod->core_layout.base, mod->core_layout.size);
2222
2223         /* Finally, free the core (containing the module structure) */
2224         module_memfree(mod->core_layout.base);
2225 }
2226
2227 void *__symbol_get(const char *symbol)
2228 {
2229         struct module *owner;
2230         const struct kernel_symbol *sym;
2231
2232         preempt_disable();
2233         sym = find_symbol(symbol, &owner, NULL, true, true);
2234         if (sym && strong_try_module_get(owner))
2235                 sym = NULL;
2236         preempt_enable();
2237
2238         return sym ? (void *)kernel_symbol_value(sym) : NULL;
2239 }
2240 EXPORT_SYMBOL_GPL(__symbol_get);
2241
2242 /*
2243  * Ensure that an exported symbol [global namespace] does not already exist
2244  * in the kernel or in some other module's exported symbol table.
2245  *
2246  * You must hold the module_mutex.
2247  */
2248 static int verify_exported_symbols(struct module *mod)
2249 {
2250         unsigned int i;
2251         struct module *owner;
2252         const struct kernel_symbol *s;
2253         struct {
2254                 const struct kernel_symbol *sym;
2255                 unsigned int num;
2256         } arr[] = {
2257                 { mod->syms, mod->num_syms },
2258                 { mod->gpl_syms, mod->num_gpl_syms },
2259                 { mod->gpl_future_syms, mod->num_gpl_future_syms },
2260 #ifdef CONFIG_UNUSED_SYMBOLS
2261                 { mod->unused_syms, mod->num_unused_syms },
2262                 { mod->unused_gpl_syms, mod->num_unused_gpl_syms },
2263 #endif
2264         };
2265
2266         for (i = 0; i < ARRAY_SIZE(arr); i++) {
2267                 for (s = arr[i].sym; s < arr[i].sym + arr[i].num; s++) {
2268                         if (find_symbol(kernel_symbol_name(s), &owner, NULL,
2269                                         true, false)) {
2270                                 pr_err("%s: exports duplicate symbol %s"
2271                                        " (owned by %s)\n",
2272                                        mod->name, kernel_symbol_name(s),
2273                                        module_name(owner));
2274                                 return -ENOEXEC;
2275                         }
2276                 }
2277         }
2278         return 0;
2279 }
2280
2281 /* Change all symbols so that st_value encodes the pointer directly. */
2282 static int simplify_symbols(struct module *mod, const struct load_info *info)
2283 {
2284         Elf_Shdr *symsec = &info->sechdrs[info->index.sym];
2285         Elf_Sym *sym = (void *)symsec->sh_addr;
2286         unsigned long secbase;
2287         unsigned int i;
2288         int ret = 0;
2289         const struct kernel_symbol *ksym;
2290
2291         for (i = 1; i < symsec->sh_size / sizeof(Elf_Sym); i++) {
2292                 const char *name = info->strtab + sym[i].st_name;
2293
2294                 switch (sym[i].st_shndx) {
2295                 case SHN_COMMON:
2296                         /* Ignore common symbols */
2297                         if (!strncmp(name, "__gnu_lto", 9))
2298                                 break;
2299
2300                         /* We compiled with -fno-common.  These are not
2301                            supposed to happen.  */
2302                         pr_debug("Common symbol: %s\n", name);
2303                         pr_warn("%s: please compile with -fno-common\n",
2304                                mod->name);
2305                         ret = -ENOEXEC;
2306                         break;
2307
2308                 case SHN_ABS:
2309                         /* Don't need to do anything */
2310                         pr_debug("Absolute symbol: 0x%08lx\n",
2311                                (long)sym[i].st_value);
2312                         break;
2313
2314                 case SHN_LIVEPATCH:
2315                         /* Livepatch symbols are resolved by livepatch */
2316                         break;
2317
2318                 case SHN_UNDEF:
2319                         ksym = resolve_symbol_wait(mod, info, name);
2320                         /* Ok if resolved.  */
2321                         if (ksym && !IS_ERR(ksym)) {
2322                                 sym[i].st_value = kernel_symbol_value(ksym);
2323                                 break;
2324                         }
2325
2326                         /* Ok if weak.  */
2327                         if (!ksym && ELF_ST_BIND(sym[i].st_info) == STB_WEAK)
2328                                 break;
2329
2330                         ret = PTR_ERR(ksym) ?: -ENOENT;
2331                         pr_warn("%s: Unknown symbol %s (err %d)\n",
2332                                 mod->name, name, ret);
2333                         break;
2334
2335                 default:
2336                         /* Divert to percpu allocation if a percpu var. */
2337                         if (sym[i].st_shndx == info->index.pcpu)
2338                                 secbase = (unsigned long)mod_percpu(mod);
2339                         else
2340                                 secbase = info->sechdrs[sym[i].st_shndx].sh_addr;
2341                         sym[i].st_value += secbase;
2342                         break;
2343                 }
2344         }
2345
2346         return ret;
2347 }
2348
2349 static int apply_relocations(struct module *mod, const struct load_info *info)
2350 {
2351         unsigned int i;
2352         int err = 0;
2353
2354         /* Now do relocations. */
2355         for (i = 1; i < info->hdr->e_shnum; i++) {
2356                 unsigned int infosec = info->sechdrs[i].sh_info;
2357
2358                 /* Not a valid relocation section? */
2359                 if (infosec >= info->hdr->e_shnum)
2360                         continue;
2361
2362                 /* Don't bother with non-allocated sections */
2363                 if (!(info->sechdrs[infosec].sh_flags & SHF_ALLOC))
2364                         continue;
2365
2366                 /* Livepatch relocation sections are applied by livepatch */
2367                 if (info->sechdrs[i].sh_flags & SHF_RELA_LIVEPATCH)
2368                         continue;
2369
2370                 if (info->sechdrs[i].sh_type == SHT_REL)
2371                         err = apply_relocate(info->sechdrs, info->strtab,
2372                                              info->index.sym, i, mod);
2373                 else if (info->sechdrs[i].sh_type == SHT_RELA)
2374                         err = apply_relocate_add(info->sechdrs, info->strtab,
2375                                                  info->index.sym, i, mod);
2376                 if (err < 0)
2377                         break;
2378         }
2379         return err;
2380 }
2381
2382 /* Additional bytes needed by arch in front of individual sections */
2383 unsigned int __weak arch_mod_section_prepend(struct module *mod,
2384                                              unsigned int section)
2385 {
2386         /* default implementation just returns zero */
2387         return 0;
2388 }
2389
2390 /* Update size with this section: return offset. */
2391 static long get_offset(struct module *mod, unsigned int *size,
2392                        Elf_Shdr *sechdr, unsigned int section)
2393 {
2394         long ret;
2395
2396         *size += arch_mod_section_prepend(mod, section);
2397         ret = ALIGN(*size, sechdr->sh_addralign ?: 1);
2398         *size = ret + sechdr->sh_size;
2399         return ret;
2400 }
2401
2402 /* Lay out the SHF_ALLOC sections in a way not dissimilar to how ld
2403    might -- code, read-only data, read-write data, small data.  Tally
2404    sizes, and place the offsets into sh_entsize fields: high bit means it
2405    belongs in init. */
2406 static void layout_sections(struct module *mod, struct load_info *info)
2407 {
2408         static unsigned long const masks[][2] = {
2409                 /* NOTE: all executable code must be the first section
2410                  * in this array; otherwise modify the text_size
2411                  * finder in the two loops below */
2412                 { SHF_EXECINSTR | SHF_ALLOC, ARCH_SHF_SMALL },
2413                 { SHF_ALLOC, SHF_WRITE | ARCH_SHF_SMALL },
2414                 { SHF_RO_AFTER_INIT | SHF_ALLOC, ARCH_SHF_SMALL },
2415                 { SHF_WRITE | SHF_ALLOC, ARCH_SHF_SMALL },
2416                 { ARCH_SHF_SMALL | SHF_ALLOC, 0 }
2417         };
2418         unsigned int m, i;
2419
2420         for (i = 0; i < info->hdr->e_shnum; i++)
2421                 info->sechdrs[i].sh_entsize = ~0UL;
2422
2423         pr_debug("Core section allocation order:\n");
2424         for (m = 0; m < ARRAY_SIZE(masks); ++m) {
2425                 for (i = 0; i < info->hdr->e_shnum; ++i) {
2426                         Elf_Shdr *s = &info->sechdrs[i];
2427                         const char *sname = info->secstrings + s->sh_name;
2428
2429                         if ((s->sh_flags & masks[m][0]) != masks[m][0]
2430                             || (s->sh_flags & masks[m][1])
2431                             || s->sh_entsize != ~0UL
2432                             || strstarts(sname, ".init"))
2433                                 continue;
2434                         s->sh_entsize = get_offset(mod, &mod->core_layout.size, s, i);
2435                         pr_debug("\t%s\n", sname);
2436                 }
2437                 switch (m) {
2438                 case 0: /* executable */
2439                         mod->core_layout.size = debug_align(mod->core_layout.size);
2440                         mod->core_layout.text_size = mod->core_layout.size;
2441                         break;
2442                 case 1: /* RO: text and ro-data */
2443                         mod->core_layout.size = debug_align(mod->core_layout.size);
2444                         mod->core_layout.ro_size = mod->core_layout.size;
2445                         break;
2446                 case 2: /* RO after init */
2447                         mod->core_layout.size = debug_align(mod->core_layout.size);
2448                         mod->core_layout.ro_after_init_size = mod->core_layout.size;
2449                         break;
2450                 case 4: /* whole core */
2451                         mod->core_layout.size = debug_align(mod->core_layout.size);
2452                         break;
2453                 }
2454         }
2455
2456         pr_debug("Init section allocation order:\n");
2457         for (m = 0; m < ARRAY_SIZE(masks); ++m) {
2458                 for (i = 0; i < info->hdr->e_shnum; ++i) {
2459                         Elf_Shdr *s = &info->sechdrs[i];
2460                         const char *sname = info->secstrings + s->sh_name;
2461
2462                         if ((s->sh_flags & masks[m][0]) != masks[m][0]
2463                             || (s->sh_flags & masks[m][1])
2464                             || s->sh_entsize != ~0UL
2465                             || !strstarts(sname, ".init"))
2466                                 continue;
2467                         s->sh_entsize = (get_offset(mod, &mod->init_layout.size, s, i)
2468                                          | INIT_OFFSET_MASK);
2469                         pr_debug("\t%s\n", sname);
2470                 }
2471                 switch (m) {
2472                 case 0: /* executable */
2473                         mod->init_layout.size = debug_align(mod->init_layout.size);
2474                         mod->init_layout.text_size = mod->init_layout.size;
2475                         break;
2476                 case 1: /* RO: text and ro-data */
2477                         mod->init_layout.size = debug_align(mod->init_layout.size);
2478                         mod->init_layout.ro_size = mod->init_layout.size;
2479                         break;
2480                 case 2:
2481                         /*
2482                          * RO after init doesn't apply to init_layout (only
2483                          * core_layout), so it just takes the value of ro_size.
2484                          */
2485                         mod->init_layout.ro_after_init_size = mod->init_layout.ro_size;
2486                         break;
2487                 case 4: /* whole init */
2488                         mod->init_layout.size = debug_align(mod->init_layout.size);
2489                         break;
2490                 }
2491         }
2492 }
2493
2494 static void set_license(struct module *mod, const char *license)
2495 {
2496         if (!license)
2497                 license = "unspecified";
2498
2499         if (!license_is_gpl_compatible(license)) {
2500                 if (!test_taint(TAINT_PROPRIETARY_MODULE))
2501                         pr_warn("%s: module license '%s' taints kernel.\n",
2502                                 mod->name, license);
2503                 add_taint_module(mod, TAINT_PROPRIETARY_MODULE,
2504                                  LOCKDEP_NOW_UNRELIABLE);
2505         }
2506 }
2507
2508 /* Parse tag=value strings from .modinfo section */
2509 static char *next_string(char *string, unsigned long *secsize)
2510 {
2511         /* Skip non-zero chars */
2512         while (string[0]) {
2513                 string++;
2514                 if ((*secsize)-- <= 1)
2515                         return NULL;
2516         }
2517
2518         /* Skip any zero padding. */
2519         while (!string[0]) {
2520                 string++;
2521                 if ((*secsize)-- <= 1)
2522                         return NULL;
2523         }
2524         return string;
2525 }
2526
2527 static char *get_next_modinfo(const struct load_info *info, const char *tag,
2528                               char *prev)
2529 {
2530         char *p;
2531         unsigned int taglen = strlen(tag);
2532         Elf_Shdr *infosec = &info->sechdrs[info->index.info];
2533         unsigned long size = infosec->sh_size;
2534
2535         /*
2536          * get_modinfo() calls made before rewrite_section_headers()
2537          * must use sh_offset, as sh_addr isn't set!
2538          */
2539         char *modinfo = (char *)info->hdr + infosec->sh_offset;
2540
2541         if (prev) {
2542                 size -= prev - modinfo;
2543                 modinfo = next_string(prev, &size);
2544         }
2545
2546         for (p = modinfo; p; p = next_string(p, &size)) {
2547                 if (strncmp(p, tag, taglen) == 0 && p[taglen] == '=')
2548                         return p + taglen + 1;
2549         }
2550         return NULL;
2551 }
2552
2553 static char *get_modinfo(const struct load_info *info, const char *tag)
2554 {
2555         return get_next_modinfo(info, tag, NULL);
2556 }
2557
2558 static void setup_modinfo(struct module *mod, struct load_info *info)
2559 {
2560         struct module_attribute *attr;
2561         int i;
2562
2563         for (i = 0; (attr = modinfo_attrs[i]); i++) {
2564                 if (attr->setup)
2565                         attr->setup(mod, get_modinfo(info, attr->attr.name));
2566         }
2567 }
2568
2569 static void free_modinfo(struct module *mod)
2570 {
2571         struct module_attribute *attr;
2572         int i;
2573
2574         for (i = 0; (attr = modinfo_attrs[i]); i++) {
2575                 if (attr->free)
2576                         attr->free(mod);
2577         }
2578 }
2579
2580 #ifdef CONFIG_KALLSYMS
2581
2582 /* Lookup exported symbol in given range of kernel_symbols */
2583 static const struct kernel_symbol *lookup_exported_symbol(const char *name,
2584                                                           const struct kernel_symbol *start,
2585                                                           const struct kernel_symbol *stop)
2586 {
2587         return bsearch(name, start, stop - start,
2588                         sizeof(struct kernel_symbol), cmp_name);
2589 }
2590
2591 static int is_exported(const char *name, unsigned long value,
2592                        const struct module *mod)
2593 {
2594         const struct kernel_symbol *ks;
2595         if (!mod)
2596                 ks = lookup_exported_symbol(name, __start___ksymtab, __stop___ksymtab);
2597         else
2598                 ks = lookup_exported_symbol(name, mod->syms, mod->syms + mod->num_syms);
2599
2600         return ks != NULL && kernel_symbol_value(ks) == value;
2601 }
2602
2603 /* As per nm */
2604 static char elf_type(const Elf_Sym *sym, const struct load_info *info)
2605 {
2606         const Elf_Shdr *sechdrs = info->sechdrs;
2607
2608         if (ELF_ST_BIND(sym->st_info) == STB_WEAK) {
2609                 if (ELF_ST_TYPE(sym->st_info) == STT_OBJECT)
2610                         return 'v';
2611                 else
2612                         return 'w';
2613         }
2614         if (sym->st_shndx == SHN_UNDEF)
2615                 return 'U';
2616         if (sym->st_shndx == SHN_ABS || sym->st_shndx == info->index.pcpu)
2617                 return 'a';
2618         if (sym->st_shndx >= SHN_LORESERVE)
2619                 return '?';
2620         if (sechdrs[sym->st_shndx].sh_flags & SHF_EXECINSTR)
2621                 return 't';
2622         if (sechdrs[sym->st_shndx].sh_flags & SHF_ALLOC
2623             && sechdrs[sym->st_shndx].sh_type != SHT_NOBITS) {
2624                 if (!(sechdrs[sym->st_shndx].sh_flags & SHF_WRITE))
2625                         return 'r';
2626                 else if (sechdrs[sym->st_shndx].sh_flags & ARCH_SHF_SMALL)
2627                         return 'g';
2628                 else
2629                         return 'd';
2630         }
2631         if (sechdrs[sym->st_shndx].sh_type == SHT_NOBITS) {
2632                 if (sechdrs[sym->st_shndx].sh_flags & ARCH_SHF_SMALL)
2633                         return 's';
2634                 else
2635                         return 'b';
2636         }
2637         if (strstarts(info->secstrings + sechdrs[sym->st_shndx].sh_name,
2638                       ".debug")) {
2639                 return 'n';
2640         }
2641         return '?';
2642 }
2643
2644 static bool is_core_symbol(const Elf_Sym *src, const Elf_Shdr *sechdrs,
2645                         unsigned int shnum, unsigned int pcpundx)
2646 {
2647         const Elf_Shdr *sec;
2648
2649         if (src->st_shndx == SHN_UNDEF
2650             || src->st_shndx >= shnum
2651             || !src->st_name)
2652                 return false;
2653
2654 #ifdef CONFIG_KALLSYMS_ALL
2655         if (src->st_shndx == pcpundx)
2656                 return true;
2657 #endif
2658
2659         sec = sechdrs + src->st_shndx;
2660         if (!(sec->sh_flags & SHF_ALLOC)
2661 #ifndef CONFIG_KALLSYMS_ALL
2662             || !(sec->sh_flags & SHF_EXECINSTR)
2663 #endif
2664             || (sec->sh_entsize & INIT_OFFSET_MASK))
2665                 return false;
2666
2667         return true;
2668 }
2669
2670 /*
2671  * We only allocate and copy the strings needed by the parts of symtab
2672  * we keep.  This is simple, but has the effect of making multiple
2673  * copies of duplicates.  We could be more sophisticated, see
2674  * linux-kernel thread starting with
2675  * <73defb5e4bca04a6431392cc341112b1@localhost>.
2676  */
2677 static void layout_symtab(struct module *mod, struct load_info *info)
2678 {
2679         Elf_Shdr *symsect = info->sechdrs + info->index.sym;
2680         Elf_Shdr *strsect = info->sechdrs + info->index.str;
2681         const Elf_Sym *src;
2682         unsigned int i, nsrc, ndst, strtab_size = 0;
2683
2684         /* Put symbol section at end of init part of module. */
2685         symsect->sh_flags |= SHF_ALLOC;
2686         symsect->sh_entsize = get_offset(mod, &mod->init_layout.size, symsect,
2687                                          info->index.sym) | INIT_OFFSET_MASK;
2688         pr_debug("\t%s\n", info->secstrings + symsect->sh_name);
2689
2690         src = (void *)info->hdr + symsect->sh_offset;
2691         nsrc = symsect->sh_size / sizeof(*src);
2692
2693         /* Compute total space required for the core symbols' strtab. */
2694         for (ndst = i = 0; i < nsrc; i++) {
2695                 if (i == 0 || is_livepatch_module(mod) ||
2696                     is_core_symbol(src+i, info->sechdrs, info->hdr->e_shnum,
2697                                    info->index.pcpu)) {
2698                         strtab_size += strlen(&info->strtab[src[i].st_name])+1;
2699                         ndst++;
2700                 }
2701         }
2702
2703         /* Append room for core symbols at end of core part. */
2704         info->symoffs = ALIGN(mod->core_layout.size, symsect->sh_addralign ?: 1);
2705         info->stroffs = mod->core_layout.size = info->symoffs + ndst * sizeof(Elf_Sym);
2706         mod->core_layout.size += strtab_size;
2707         info->core_typeoffs = mod->core_layout.size;
2708         mod->core_layout.size += ndst * sizeof(char);
2709         mod->core_layout.size = debug_align(mod->core_layout.size);
2710
2711         /* Put string table section at end of init part of module. */
2712         strsect->sh_flags |= SHF_ALLOC;
2713         strsect->sh_entsize = get_offset(mod, &mod->init_layout.size, strsect,
2714                                          info->index.str) | INIT_OFFSET_MASK;
2715         pr_debug("\t%s\n", info->secstrings + strsect->sh_name);
2716
2717         /* We'll tack temporary mod_kallsyms on the end. */
2718         mod->init_layout.size = ALIGN(mod->init_layout.size,
2719                                       __alignof__(struct mod_kallsyms));
2720         info->mod_kallsyms_init_off = mod->init_layout.size;
2721         mod->init_layout.size += sizeof(struct mod_kallsyms);
2722         info->init_typeoffs = mod->init_layout.size;
2723         mod->init_layout.size += nsrc * sizeof(char);
2724         mod->init_layout.size = debug_align(mod->init_layout.size);
2725 }
2726
2727 /*
2728  * We use the full symtab and strtab which layout_symtab arranged to
2729  * be appended to the init section.  Later we switch to the cut-down
2730  * core-only ones.
2731  */
2732 static void add_kallsyms(struct module *mod, const struct load_info *info)
2733 {
2734         unsigned int i, ndst;
2735         const Elf_Sym *src;
2736         Elf_Sym *dst;
2737         char *s;
2738         Elf_Shdr *symsec = &info->sechdrs[info->index.sym];
2739
2740         /* Set up to point into init section. */
2741         mod->kallsyms = mod->init_layout.base + info->mod_kallsyms_init_off;
2742
2743         mod->kallsyms->symtab = (void *)symsec->sh_addr;
2744         mod->kallsyms->num_symtab = symsec->sh_size / sizeof(Elf_Sym);
2745         /* Make sure we get permanent strtab: don't use info->strtab. */
2746         mod->kallsyms->strtab = (void *)info->sechdrs[info->index.str].sh_addr;
2747         mod->kallsyms->typetab = mod->init_layout.base + info->init_typeoffs;
2748
2749         /*
2750          * Now populate the cut down core kallsyms for after init
2751          * and set types up while we still have access to sections.
2752          */
2753         mod->core_kallsyms.symtab = dst = mod->core_layout.base + info->symoffs;
2754         mod->core_kallsyms.strtab = s = mod->core_layout.base + info->stroffs;
2755         mod->core_kallsyms.typetab = mod->core_layout.base + info->core_typeoffs;
2756         src = mod->kallsyms->symtab;
2757         for (ndst = i = 0; i < mod->kallsyms->num_symtab; i++) {
2758                 mod->kallsyms->typetab[i] = elf_type(src + i, info);
2759                 if (i == 0 || is_livepatch_module(mod) ||
2760                     is_core_symbol(src+i, info->sechdrs, info->hdr->e_shnum,
2761                                    info->index.pcpu)) {
2762                         mod->core_kallsyms.typetab[ndst] =
2763                             mod->kallsyms->typetab[i];
2764                         dst[ndst] = src[i];
2765                         dst[ndst++].st_name = s - mod->core_kallsyms.strtab;
2766                         s += strlcpy(s, &mod->kallsyms->strtab[src[i].st_name],
2767                                      KSYM_NAME_LEN) + 1;
2768                 }
2769         }
2770         mod->core_kallsyms.num_symtab = ndst;
2771 }
2772 #else
2773 static inline void layout_symtab(struct module *mod, struct load_info *info)
2774 {
2775 }
2776
2777 static void add_kallsyms(struct module *mod, const struct load_info *info)
2778 {
2779 }
2780 #endif /* CONFIG_KALLSYMS */
2781
2782 static void dynamic_debug_setup(struct module *mod, struct _ddebug *debug, unsigned int num)
2783 {
2784         if (!debug)
2785                 return;
2786         ddebug_add_module(debug, num, mod->name);
2787 }
2788
2789 static void dynamic_debug_remove(struct module *mod, struct _ddebug *debug)
2790 {
2791         if (debug)
2792                 ddebug_remove_module(mod->name);
2793 }
2794
2795 void * __weak module_alloc(unsigned long size)
2796 {
2797         return vmalloc_exec(size);
2798 }
2799
2800 bool __weak module_exit_section(const char *name)
2801 {
2802         return strstarts(name, ".exit");
2803 }
2804
2805 #ifdef CONFIG_DEBUG_KMEMLEAK
2806 static void kmemleak_load_module(const struct module *mod,
2807                                  const struct load_info *info)
2808 {
2809         unsigned int i;
2810
2811         /* only scan the sections containing data */
2812         kmemleak_scan_area(mod, sizeof(struct module), GFP_KERNEL);
2813
2814         for (i = 1; i < info->hdr->e_shnum; i++) {
2815                 /* Scan all writable sections that's not executable */
2816                 if (!(info->sechdrs[i].sh_flags & SHF_ALLOC) ||
2817                     !(info->sechdrs[i].sh_flags & SHF_WRITE) ||
2818                     (info->sechdrs[i].sh_flags & SHF_EXECINSTR))
2819                         continue;
2820
2821                 kmemleak_scan_area((void *)info->sechdrs[i].sh_addr,
2822                                    info->sechdrs[i].sh_size, GFP_KERNEL);
2823         }
2824 }
2825 #else
2826 static inline void kmemleak_load_module(const struct module *mod,
2827                                         const struct load_info *info)
2828 {
2829 }
2830 #endif
2831
2832 #ifdef CONFIG_MODULE_SIG
2833 static int module_sig_check(struct load_info *info, int flags)
2834 {
2835         int err = -ENOKEY;
2836         const unsigned long markerlen = sizeof(MODULE_SIG_STRING) - 1;
2837         const void *mod = info->hdr;
2838
2839         /*
2840          * Require flags == 0, as a module with version information
2841          * removed is no longer the module that was signed
2842          */
2843         if (flags == 0 &&
2844             info->len > markerlen &&
2845             memcmp(mod + info->len - markerlen, MODULE_SIG_STRING, markerlen) == 0) {
2846                 /* We truncate the module to discard the signature */
2847                 info->len -= markerlen;
2848                 err = mod_verify_sig(mod, info);
2849         }
2850
2851         if (!err) {
2852                 info->sig_ok = true;
2853                 return 0;
2854         }
2855
2856         /* Not having a signature is only an error if we're strict. */
2857         if (err == -ENOKEY && !is_module_sig_enforced())
2858                 err = 0;
2859
2860         return err;
2861 }
2862 #else /* !CONFIG_MODULE_SIG */
2863 static int module_sig_check(struct load_info *info, int flags)
2864 {
2865         return 0;
2866 }
2867 #endif /* !CONFIG_MODULE_SIG */
2868
2869 /* Sanity checks against invalid binaries, wrong arch, weird elf version. */
2870 static int elf_header_check(struct load_info *info)
2871 {
2872         if (info->len < sizeof(*(info->hdr)))
2873                 return -ENOEXEC;
2874
2875         if (memcmp(info->hdr->e_ident, ELFMAG, SELFMAG) != 0
2876             || info->hdr->e_type != ET_REL
2877             || !elf_check_arch(info->hdr)
2878             || info->hdr->e_shentsize != sizeof(Elf_Shdr))
2879                 return -ENOEXEC;
2880
2881         if (info->hdr->e_shoff >= info->len
2882             || (info->hdr->e_shnum * sizeof(Elf_Shdr) >
2883                 info->len - info->hdr->e_shoff))
2884                 return -ENOEXEC;
2885
2886         return 0;
2887 }
2888
2889 #define COPY_CHUNK_SIZE (16*PAGE_SIZE)
2890
2891 static int copy_chunked_from_user(void *dst, const void __user *usrc, unsigned long len)
2892 {
2893         do {
2894                 unsigned long n = min(len, COPY_CHUNK_SIZE);
2895
2896                 if (copy_from_user(dst, usrc, n) != 0)
2897                         return -EFAULT;
2898                 cond_resched();
2899                 dst += n;
2900                 usrc += n;
2901                 len -= n;
2902         } while (len);
2903         return 0;
2904 }
2905
2906 #ifdef CONFIG_LIVEPATCH
2907 static int check_modinfo_livepatch(struct module *mod, struct load_info *info)
2908 {
2909         if (get_modinfo(info, "livepatch")) {
2910                 mod->klp = true;
2911                 add_taint_module(mod, TAINT_LIVEPATCH, LOCKDEP_STILL_OK);
2912                 pr_notice_once("%s: tainting kernel with TAINT_LIVEPATCH\n",
2913                                mod->name);
2914         }
2915
2916         return 0;
2917 }
2918 #else /* !CONFIG_LIVEPATCH */
2919 static int check_modinfo_livepatch(struct module *mod, struct load_info *info)
2920 {
2921         if (get_modinfo(info, "livepatch")) {
2922                 pr_err("%s: module is marked as livepatch module, but livepatch support is disabled",
2923                        mod->name);
2924                 return -ENOEXEC;
2925         }
2926
2927         return 0;
2928 }
2929 #endif /* CONFIG_LIVEPATCH */
2930
2931 static void check_modinfo_retpoline(struct module *mod, struct load_info *info)
2932 {
2933         if (retpoline_module_ok(get_modinfo(info, "retpoline")))
2934                 return;
2935
2936         pr_warn("%s: loading module not compiled with retpoline compiler.\n",
2937                 mod->name);
2938 }
2939
2940 /* Sets info->hdr and info->len. */
2941 static int copy_module_from_user(const void __user *umod, unsigned long len,
2942                                   struct load_info *info)
2943 {
2944         int err;
2945
2946         info->len = len;
2947         if (info->len < sizeof(*(info->hdr)))
2948                 return -ENOEXEC;
2949
2950         err = security_kernel_load_data(LOADING_MODULE);
2951         if (err)
2952                 return err;
2953
2954         /* Suck in entire file: we'll want most of it. */
2955         info->hdr = __vmalloc(info->len,
2956                         GFP_KERNEL | __GFP_NOWARN, PAGE_KERNEL);
2957         if (!info->hdr)
2958                 return -ENOMEM;
2959
2960         if (copy_chunked_from_user(info->hdr, umod, info->len) != 0) {
2961                 vfree(info->hdr);
2962                 return -EFAULT;
2963         }
2964
2965         return 0;
2966 }
2967
2968 static void free_copy(struct load_info *info)
2969 {
2970         vfree(info->hdr);
2971 }
2972
2973 static int rewrite_section_headers(struct load_info *info, int flags)
2974 {
2975         unsigned int i;
2976
2977         /* This should always be true, but let's be sure. */
2978         info->sechdrs[0].sh_addr = 0;
2979
2980         for (i = 1; i < info->hdr->e_shnum; i++) {
2981                 Elf_Shdr *shdr = &info->sechdrs[i];
2982                 if (shdr->sh_type != SHT_NOBITS
2983                     && info->len < shdr->sh_offset + shdr->sh_size) {
2984                         pr_err("Module len %lu truncated\n", info->len);
2985                         return -ENOEXEC;
2986                 }
2987
2988                 /* Mark all sections sh_addr with their address in the
2989                    temporary image. */
2990                 shdr->sh_addr = (size_t)info->hdr + shdr->sh_offset;
2991
2992 #ifndef CONFIG_MODULE_UNLOAD
2993                 /* Don't load .exit sections */
2994                 if (module_exit_section(info->secstrings+shdr->sh_name))
2995                         shdr->sh_flags &= ~(unsigned long)SHF_ALLOC;
2996 #endif
2997         }
2998
2999         /* Track but don't keep modinfo and version sections. */
3000         info->sechdrs[info->index.vers].sh_flags &= ~(unsigned long)SHF_ALLOC;
3001         info->sechdrs[info->index.info].sh_flags &= ~(unsigned long)SHF_ALLOC;
3002
3003         return 0;
3004 }
3005
3006 /*
3007  * Set up our basic convenience variables (pointers to section headers,
3008  * search for module section index etc), and do some basic section
3009  * verification.
3010  *
3011  * Set info->mod to the temporary copy of the module in info->hdr. The final one
3012  * will be allocated in move_module().
3013  */
3014 static int setup_load_info(struct load_info *info, int flags)
3015 {
3016         unsigned int i;
3017
3018         /* Set up the convenience variables */
3019         info->sechdrs = (void *)info->hdr + info->hdr->e_shoff;
3020         info->secstrings = (void *)info->hdr
3021                 + info->sechdrs[info->hdr->e_shstrndx].sh_offset;
3022
3023         /* Try to find a name early so we can log errors with a module name */
3024         info->index.info = find_sec(info, ".modinfo");
3025         if (!info->index.info)
3026                 info->name = "(missing .modinfo section)";
3027         else
3028                 info->name = get_modinfo(info, "name");
3029
3030         /* Find internal symbols and strings. */
3031         for (i = 1; i < info->hdr->e_shnum; i++) {
3032                 if (info->sechdrs[i].sh_type == SHT_SYMTAB) {
3033                         info->index.sym = i;
3034                         info->index.str = info->sechdrs[i].sh_link;
3035                         info->strtab = (char *)info->hdr
3036                                 + info->sechdrs[info->index.str].sh_offset;
3037                         break;
3038                 }
3039         }
3040
3041         if (info->index.sym == 0) {
3042                 pr_warn("%s: module has no symbols (stripped?)\n", info->name);
3043                 return -ENOEXEC;
3044         }
3045
3046         info->index.mod = find_sec(info, ".gnu.linkonce.this_module");
3047         if (!info->index.mod) {
3048                 pr_warn("%s: No module found in object\n",
3049                         info->name ?: "(missing .modinfo name field)");
3050                 return -ENOEXEC;
3051         }
3052         /* This is temporary: point mod into copy of data. */
3053         info->mod = (void *)info->hdr + info->sechdrs[info->index.mod].sh_offset;
3054
3055         /*
3056          * If we didn't load the .modinfo 'name' field earlier, fall back to
3057          * on-disk struct mod 'name' field.
3058          */
3059         if (!info->name)
3060                 info->name = info->mod->name;
3061
3062         if (flags & MODULE_INIT_IGNORE_MODVERSIONS)
3063                 info->index.vers = 0; /* Pretend no __versions section! */
3064         else
3065                 info->index.vers = find_sec(info, "__versions");
3066
3067         info->index.pcpu = find_pcpusec(info);
3068
3069         return 0;
3070 }
3071
3072 static int check_modinfo(struct module *mod, struct load_info *info, int flags)
3073 {
3074         const char *modmagic = get_modinfo(info, "vermagic");
3075         int err;
3076
3077         if (flags & MODULE_INIT_IGNORE_VERMAGIC)
3078                 modmagic = NULL;
3079
3080         /* This is allowed: modprobe --force will invalidate it. */
3081         if (!modmagic) {
3082                 err = try_to_force_load(mod, "bad vermagic");
3083                 if (err)
3084                         return err;
3085         } else if (!same_magic(modmagic, vermagic, info->index.vers)) {
3086                 pr_err("%s: version magic '%s' should be '%s'\n",
3087                        info->name, modmagic, vermagic);
3088                 return -ENOEXEC;
3089         }
3090
3091         if (!get_modinfo(info, "intree")) {
3092                 if (!test_taint(TAINT_OOT_MODULE))
3093                         pr_warn("%s: loading out-of-tree module taints kernel.\n",
3094                                 mod->name);
3095                 add_taint_module(mod, TAINT_OOT_MODULE, LOCKDEP_STILL_OK);
3096         }
3097
3098         check_modinfo_retpoline(mod, info);
3099
3100         if (get_modinfo(info, "staging")) {
3101                 add_taint_module(mod, TAINT_CRAP, LOCKDEP_STILL_OK);
3102                 pr_warn("%s: module is from the staging directory, the quality "
3103                         "is unknown, you have been warned.\n", mod->name);
3104         }
3105
3106         err = check_modinfo_livepatch(mod, info);
3107         if (err)
3108                 return err;
3109
3110         /* Set up license info based on the info section */
3111         set_license(mod, get_modinfo(info, "license"));
3112
3113         return 0;
3114 }
3115
3116 static int find_module_sections(struct module *mod, struct load_info *info)
3117 {
3118         mod->kp = section_objs(info, "__param",
3119                                sizeof(*mod->kp), &mod->num_kp);
3120         mod->syms = section_objs(info, "__ksymtab",
3121                                  sizeof(*mod->syms), &mod->num_syms);
3122         mod->crcs = section_addr(info, "__kcrctab");
3123         mod->gpl_syms = section_objs(info, "__ksymtab_gpl",
3124                                      sizeof(*mod->gpl_syms),
3125                                      &mod->num_gpl_syms);
3126         mod->gpl_crcs = section_addr(info, "__kcrctab_gpl");
3127         mod->gpl_future_syms = section_objs(info,
3128                                             "__ksymtab_gpl_future",
3129                                             sizeof(*mod->gpl_future_syms),
3130                                             &mod->num_gpl_future_syms);
3131         mod->gpl_future_crcs = section_addr(info, "__kcrctab_gpl_future");
3132
3133 #ifdef CONFIG_UNUSED_SYMBOLS
3134         mod->unused_syms = section_objs(info, "__ksymtab_unused",
3135                                         sizeof(*mod->unused_syms),
3136                                         &mod->num_unused_syms);
3137         mod->unused_crcs = section_addr(info, "__kcrctab_unused");
3138         mod->unused_gpl_syms = section_objs(info, "__ksymtab_unused_gpl",
3139                                             sizeof(*mod->unused_gpl_syms),
3140                                             &mod->num_unused_gpl_syms);
3141         mod->unused_gpl_crcs = section_addr(info, "__kcrctab_unused_gpl");
3142 #endif
3143 #ifdef CONFIG_CONSTRUCTORS
3144         mod->ctors = section_objs(info, ".ctors",
3145                                   sizeof(*mod->ctors), &mod->num_ctors);
3146         if (!mod->ctors)
3147                 mod->ctors = section_objs(info, ".init_array",
3148                                 sizeof(*mod->ctors), &mod->num_ctors);
3149         else if (find_sec(info, ".init_array")) {
3150                 /*
3151                  * This shouldn't happen with same compiler and binutils
3152                  * building all parts of the module.
3153                  */
3154                 pr_warn("%s: has both .ctors and .init_array.\n",
3155                        mod->name);
3156                 return -EINVAL;
3157         }
3158 #endif
3159
3160 #ifdef CONFIG_TRACEPOINTS
3161         mod->tracepoints_ptrs = section_objs(info, "__tracepoints_ptrs",
3162                                              sizeof(*mod->tracepoints_ptrs),
3163                                              &mod->num_tracepoints);
3164 #endif
3165 #ifdef CONFIG_TREE_SRCU
3166         mod->srcu_struct_ptrs = section_objs(info, "___srcu_struct_ptrs",
3167                                              sizeof(*mod->srcu_struct_ptrs),
3168                                              &mod->num_srcu_structs);
3169 #endif
3170 #ifdef CONFIG_BPF_EVENTS
3171         mod->bpf_raw_events = section_objs(info, "__bpf_raw_tp_map",
3172                                            sizeof(*mod->bpf_raw_events),
3173                                            &mod->num_bpf_raw_events);
3174 #endif
3175 #ifdef CONFIG_JUMP_LABEL
3176         mod->jump_entries = section_objs(info, "__jump_table",
3177                                         sizeof(*mod->jump_entries),
3178                                         &mod->num_jump_entries);
3179 #endif
3180 #ifdef CONFIG_EVENT_TRACING
3181         mod->trace_events = section_objs(info, "_ftrace_events",
3182                                          sizeof(*mod->trace_events),
3183                                          &mod->num_trace_events);
3184         mod->trace_evals = section_objs(info, "_ftrace_eval_map",
3185                                         sizeof(*mod->trace_evals),
3186                                         &mod->num_trace_evals);
3187 #endif
3188 #ifdef CONFIG_TRACING
3189         mod->trace_bprintk_fmt_start = section_objs(info, "__trace_printk_fmt",
3190                                          sizeof(*mod->trace_bprintk_fmt_start),
3191                                          &mod->num_trace_bprintk_fmt);
3192 #endif
3193 #ifdef CONFIG_FTRACE_MCOUNT_RECORD
3194         /* sechdrs[0].sh_size is always zero */
3195         mod->ftrace_callsites = section_objs(info, "__mcount_loc",
3196                                              sizeof(*mod->ftrace_callsites),
3197                                              &mod->num_ftrace_callsites);
3198 #endif
3199 #ifdef CONFIG_FUNCTION_ERROR_INJECTION
3200         mod->ei_funcs = section_objs(info, "_error_injection_whitelist",
3201                                             sizeof(*mod->ei_funcs),
3202                                             &mod->num_ei_funcs);
3203 #endif
3204         mod->extable = section_objs(info, "__ex_table",
3205                                     sizeof(*mod->extable), &mod->num_exentries);
3206
3207         if (section_addr(info, "__obsparm"))
3208                 pr_warn("%s: Ignoring obsolete parameters\n", mod->name);
3209
3210         info->debug = section_objs(info, "__verbose",
3211                                    sizeof(*info->debug), &info->num_debug);
3212
3213         return 0;
3214 }
3215
3216 static int move_module(struct module *mod, struct load_info *info)
3217 {
3218         int i;
3219         void *ptr;
3220
3221         /* Do the allocs. */
3222         ptr = module_alloc(mod->core_layout.size);
3223         /*
3224          * The pointer to this block is stored in the module structure
3225          * which is inside the block. Just mark it as not being a
3226          * leak.
3227          */
3228         kmemleak_not_leak(ptr);
3229         if (!ptr)
3230                 return -ENOMEM;
3231
3232         memset(ptr, 0, mod->core_layout.size);
3233         mod->core_layout.base = ptr;
3234
3235         if (mod->init_layout.size) {
3236                 ptr = module_alloc(mod->init_layout.size);
3237                 /*
3238                  * The pointer to this block is stored in the module structure
3239                  * which is inside the block. This block doesn't need to be
3240                  * scanned as it contains data and code that will be freed
3241                  * after the module is initialized.
3242                  */
3243                 kmemleak_ignore(ptr);
3244                 if (!ptr) {
3245                         module_memfree(mod->core_layout.base);
3246                         return -ENOMEM;
3247                 }
3248                 memset(ptr, 0, mod->init_layout.size);
3249                 mod->init_layout.base = ptr;
3250         } else
3251                 mod->init_layout.base = NULL;
3252
3253         /* Transfer each section which specifies SHF_ALLOC */
3254         pr_debug("final section addresses:\n");
3255         for (i = 0; i < info->hdr->e_shnum; i++) {
3256                 void *dest;
3257                 Elf_Shdr *shdr = &info->sechdrs[i];
3258
3259                 if (!(shdr->sh_flags & SHF_ALLOC))
3260                         continue;
3261
3262                 if (shdr->sh_entsize & INIT_OFFSET_MASK)
3263                         dest = mod->init_layout.base
3264                                 + (shdr->sh_entsize & ~INIT_OFFSET_MASK);
3265                 else
3266                         dest = mod->core_layout.base + shdr->sh_entsize;
3267
3268                 if (shdr->sh_type != SHT_NOBITS)
3269                         memcpy(dest, (void *)shdr->sh_addr, shdr->sh_size);
3270                 /* Update sh_addr to point to copy in image. */
3271                 shdr->sh_addr = (unsigned long)dest;
3272                 pr_debug("\t0x%lx %s\n",
3273                          (long)shdr->sh_addr, info->secstrings + shdr->sh_name);
3274         }
3275
3276         return 0;
3277 }
3278
3279 static int check_module_license_and_versions(struct module *mod)
3280 {
3281         int prev_taint = test_taint(TAINT_PROPRIETARY_MODULE);
3282
3283         /*
3284          * ndiswrapper is under GPL by itself, but loads proprietary modules.
3285          * Don't use add_taint_module(), as it would prevent ndiswrapper from
3286          * using GPL-only symbols it needs.
3287          */
3288         if (strcmp(mod->name, "ndiswrapper") == 0)
3289                 add_taint(TAINT_PROPRIETARY_MODULE, LOCKDEP_NOW_UNRELIABLE);
3290
3291         /* driverloader was caught wrongly pretending to be under GPL */
3292         if (strcmp(mod->name, "driverloader") == 0)
3293                 add_taint_module(mod, TAINT_PROPRIETARY_MODULE,
3294                                  LOCKDEP_NOW_UNRELIABLE);
3295
3296         /* lve claims to be GPL but upstream won't provide source */
3297         if (strcmp(mod->name, "lve") == 0)
3298                 add_taint_module(mod, TAINT_PROPRIETARY_MODULE,
3299                                  LOCKDEP_NOW_UNRELIABLE);
3300
3301         if (!prev_taint && test_taint(TAINT_PROPRIETARY_MODULE))
3302                 pr_warn("%s: module license taints kernel.\n", mod->name);
3303
3304 #ifdef CONFIG_MODVERSIONS
3305         if ((mod->num_syms && !mod->crcs)
3306             || (mod->num_gpl_syms && !mod->gpl_crcs)
3307             || (mod->num_gpl_future_syms && !mod->gpl_future_crcs)
3308 #ifdef CONFIG_UNUSED_SYMBOLS
3309             || (mod->num_unused_syms && !mod->unused_crcs)
3310             || (mod->num_unused_gpl_syms && !mod->unused_gpl_crcs)
3311 #endif
3312                 ) {
3313                 return try_to_force_load(mod,
3314                                          "no versions for exported symbols");
3315         }
3316 #endif
3317         return 0;
3318 }
3319
3320 static void flush_module_icache(const struct module *mod)
3321 {
3322         mm_segment_t old_fs;
3323
3324         /* flush the icache in correct context */
3325         old_fs = get_fs();
3326         set_fs(KERNEL_DS);
3327
3328         /*
3329          * Flush the instruction cache, since we've played with text.
3330          * Do it before processing of module parameters, so the module
3331          * can provide parameter accessor functions of its own.
3332          */
3333         if (mod->init_layout.base)
3334                 flush_icache_range((unsigned long)mod->init_layout.base,
3335                                    (unsigned long)mod->init_layout.base
3336                                    + mod->init_layout.size);
3337         flush_icache_range((unsigned long)mod->core_layout.base,
3338                            (unsigned long)mod->core_layout.base + mod->core_layout.size);
3339
3340         set_fs(old_fs);
3341 }
3342
3343 int __weak module_frob_arch_sections(Elf_Ehdr *hdr,
3344                                      Elf_Shdr *sechdrs,
3345                                      char *secstrings,
3346                                      struct module *mod)
3347 {
3348         return 0;
3349 }
3350
3351 /* module_blacklist is a comma-separated list of module names */
3352 static char *module_blacklist;
3353 static bool blacklisted(const char *module_name)
3354 {
3355         const char *p;
3356         size_t len;
3357
3358         if (!module_blacklist)
3359                 return false;
3360
3361         for (p = module_blacklist; *p; p += len) {
3362                 len = strcspn(p, ",");
3363                 if (strlen(module_name) == len && !memcmp(module_name, p, len))
3364                         return true;
3365                 if (p[len] == ',')
3366                         len++;
3367         }
3368         return false;
3369 }
3370 core_param(module_blacklist, module_blacklist, charp, 0400);
3371
3372 static struct module *layout_and_allocate(struct load_info *info, int flags)
3373 {
3374         struct module *mod;
3375         unsigned int ndx;
3376         int err;
3377
3378         err = check_modinfo(info->mod, info, flags);
3379         if (err)
3380                 return ERR_PTR(err);
3381
3382         /* Allow arches to frob section contents and sizes.  */
3383         err = module_frob_arch_sections(info->hdr, info->sechdrs,
3384                                         info->secstrings, info->mod);
3385         if (err < 0)
3386                 return ERR_PTR(err);
3387
3388         /* We will do a special allocation for per-cpu sections later. */
3389         info->sechdrs[info->index.pcpu].sh_flags &= ~(unsigned long)SHF_ALLOC;
3390
3391         /*
3392          * Mark ro_after_init section with SHF_RO_AFTER_INIT so that
3393          * layout_sections() can put it in the right place.
3394          * Note: ro_after_init sections also have SHF_{WRITE,ALLOC} set.
3395          */
3396         ndx = find_sec(info, ".data..ro_after_init");
3397         if (ndx)
3398                 info->sechdrs[ndx].sh_flags |= SHF_RO_AFTER_INIT;
3399         /*
3400          * Mark the __jump_table section as ro_after_init as well: these data
3401          * structures are never modified, with the exception of entries that
3402          * refer to code in the __init section, which are annotated as such
3403          * at module load time.
3404          */
3405         ndx = find_sec(info, "__jump_table");
3406         if (ndx)
3407                 info->sechdrs[ndx].sh_flags |= SHF_RO_AFTER_INIT;
3408
3409         /* Determine total sizes, and put offsets in sh_entsize.  For now
3410            this is done generically; there doesn't appear to be any
3411            special cases for the architectures. */
3412         layout_sections(info->mod, info);
3413         layout_symtab(info->mod, info);
3414
3415         /* Allocate and move to the final place */
3416         err = move_module(info->mod, info);
3417         if (err)
3418                 return ERR_PTR(err);
3419
3420         /* Module has been copied to its final place now: return it. */
3421         mod = (void *)info->sechdrs[info->index.mod].sh_addr;
3422         kmemleak_load_module(mod, info);
3423         return mod;
3424 }
3425
3426 /* mod is no longer valid after this! */
3427 static void module_deallocate(struct module *mod, struct load_info *info)
3428 {
3429         percpu_modfree(mod);
3430         module_arch_freeing_init(mod);
3431         module_memfree(mod->init_layout.base);
3432         module_memfree(mod->core_layout.base);
3433 }
3434
3435 int __weak module_finalize(const Elf_Ehdr *hdr,
3436                            const Elf_Shdr *sechdrs,
3437                            struct module *me)
3438 {
3439         return 0;
3440 }
3441
3442 static int post_relocation(struct module *mod, const struct load_info *info)
3443 {
3444         /* Sort exception table now relocations are done. */
3445         sort_extable(mod->extable, mod->extable + mod->num_exentries);
3446
3447         /* Copy relocated percpu area over. */
3448         percpu_modcopy(mod, (void *)info->sechdrs[info->index.pcpu].sh_addr,
3449                        info->sechdrs[info->index.pcpu].sh_size);
3450
3451         /* Setup kallsyms-specific fields. */
3452         add_kallsyms(mod, info);
3453
3454         /* Arch-specific module finalizing. */
3455         return module_finalize(info->hdr, info->sechdrs, mod);
3456 }
3457
3458 /* Is this module of this name done loading?  No locks held. */
3459 static bool finished_loading(const char *name)
3460 {
3461         struct module *mod;
3462         bool ret;
3463
3464         /*
3465          * The module_mutex should not be a heavily contended lock;
3466          * if we get the occasional sleep here, we'll go an extra iteration
3467          * in the wait_event_interruptible(), which is harmless.
3468          */
3469         sched_annotate_sleep();
3470         mutex_lock(&module_mutex);
3471         mod = find_module_all(name, strlen(name), true);
3472         ret = !mod || mod->state == MODULE_STATE_LIVE;
3473         mutex_unlock(&module_mutex);
3474
3475         return ret;
3476 }
3477
3478 /* Call module constructors. */
3479 static void do_mod_ctors(struct module *mod)
3480 {
3481 #ifdef CONFIG_CONSTRUCTORS
3482         unsigned long i;
3483
3484         for (i = 0; i < mod->num_ctors; i++)
3485                 mod->ctors[i]();
3486 #endif
3487 }
3488
3489 /* For freeing module_init on success, in case kallsyms traversing */
3490 struct mod_initfree {
3491         struct llist_node node;
3492         void *module_init;
3493 };
3494
3495 static void do_free_init(struct work_struct *w)
3496 {
3497         struct llist_node *pos, *n, *list;
3498         struct mod_initfree *initfree;
3499
3500         list = llist_del_all(&init_free_list);
3501
3502         synchronize_rcu();
3503
3504         llist_for_each_safe(pos, n, list) {
3505                 initfree = container_of(pos, struct mod_initfree, node);
3506                 module_memfree(initfree->module_init);
3507                 kfree(initfree);
3508         }
3509 }
3510
3511 static int __init modules_wq_init(void)
3512 {
3513         INIT_WORK(&init_free_wq, do_free_init);
3514         init_llist_head(&init_free_list);
3515         return 0;
3516 }
3517 module_init(modules_wq_init);
3518
3519 /*
3520  * This is where the real work happens.
3521  *
3522  * Keep it uninlined to provide a reliable breakpoint target, e.g. for the gdb
3523  * helper command 'lx-symbols'.
3524  */
3525 static noinline int do_init_module(struct module *mod)
3526 {
3527         int ret = 0;
3528         struct mod_initfree *freeinit;
3529
3530         freeinit = kmalloc(sizeof(*freeinit), GFP_KERNEL);
3531         if (!freeinit) {
3532                 ret = -ENOMEM;
3533                 goto fail;
3534         }
3535         freeinit->module_init = mod->init_layout.base;
3536
3537         /*
3538          * We want to find out whether @mod uses async during init.  Clear
3539          * PF_USED_ASYNC.  async_schedule*() will set it.
3540          */
3541         current->flags &= ~PF_USED_ASYNC;
3542
3543         do_mod_ctors(mod);
3544         /* Start the module */
3545         if (mod->init != NULL)
3546                 ret = do_one_initcall(mod->init);
3547         if (ret < 0) {
3548                 goto fail_free_freeinit;
3549         }
3550         if (ret > 0) {
3551                 pr_warn("%s: '%s'->init suspiciously returned %d, it should "
3552                         "follow 0/-E convention\n"
3553                         "%s: loading module anyway...\n",
3554                         __func__, mod->name, ret, __func__);
3555                 dump_stack();
3556         }
3557
3558         /* Now it's a first class citizen! */
3559         mod->state = MODULE_STATE_LIVE;
3560         blocking_notifier_call_chain(&module_notify_list,
3561                                      MODULE_STATE_LIVE, mod);
3562
3563         /*
3564          * We need to finish all async code before the module init sequence
3565          * is done.  This has potential to deadlock.  For example, a newly
3566          * detected block device can trigger request_module() of the
3567          * default iosched from async probing task.  Once userland helper
3568          * reaches here, async_synchronize_full() will wait on the async
3569          * task waiting on request_module() and deadlock.
3570          *
3571          * This deadlock is avoided by perfomring async_synchronize_full()
3572          * iff module init queued any async jobs.  This isn't a full
3573          * solution as it will deadlock the same if module loading from
3574          * async jobs nests more than once; however, due to the various
3575          * constraints, this hack seems to be the best option for now.
3576          * Please refer to the following thread for details.
3577          *
3578          * http://thread.gmane.org/gmane.linux.kernel/1420814
3579          */
3580         if (!mod->async_probe_requested && (current->flags & PF_USED_ASYNC))
3581                 async_synchronize_full();
3582
3583         ftrace_free_mem(mod, mod->init_layout.base, mod->init_layout.base +
3584                         mod->init_layout.size);
3585         mutex_lock(&module_mutex);
3586         /* Drop initial reference. */
3587         module_put(mod);
3588         trim_init_extable(mod);
3589 #ifdef CONFIG_KALLSYMS
3590         /* Switch to core kallsyms now init is done: kallsyms may be walking! */
3591         rcu_assign_pointer(mod->kallsyms, &mod->core_kallsyms);
3592 #endif
3593         module_enable_ro(mod, true);
3594         mod_tree_remove_init(mod);
3595         module_arch_freeing_init(mod);
3596         mod->init_layout.base = NULL;
3597         mod->init_layout.size = 0;
3598         mod->init_layout.ro_size = 0;
3599         mod->init_layout.ro_after_init_size = 0;
3600         mod->init_layout.text_size = 0;
3601         /*
3602          * We want to free module_init, but be aware that kallsyms may be
3603          * walking this with preempt disabled.  In all the failure paths, we
3604          * call synchronize_rcu(), but we don't want to slow down the success
3605          * path. module_memfree() cannot be called in an interrupt, so do the
3606          * work and call synchronize_rcu() in a work queue.
3607          *
3608          * Note that module_alloc() on most architectures creates W+X page
3609          * mappings which won't be cleaned up until do_free_init() runs.  Any
3610          * code such as mark_rodata_ro() which depends on those mappings to
3611          * be cleaned up needs to sync with the queued work - ie
3612          * rcu_barrier()
3613          */
3614         if (llist_add(&freeinit->node, &init_free_list))
3615                 schedule_work(&init_free_wq);
3616
3617         mutex_unlock(&module_mutex);
3618         wake_up_all(&module_wq);
3619
3620         return 0;
3621
3622 fail_free_freeinit:
3623         kfree(freeinit);
3624 fail:
3625         /* Try to protect us from buggy refcounters. */
3626         mod->state = MODULE_STATE_GOING;
3627         synchronize_rcu();
3628         module_put(mod);
3629         blocking_notifier_call_chain(&module_notify_list,
3630                                      MODULE_STATE_GOING, mod);
3631         klp_module_going(mod);
3632         ftrace_release_mod(mod);
3633         free_module(mod);
3634         wake_up_all(&module_wq);
3635         return ret;
3636 }
3637
3638 static int may_init_module(void)
3639 {
3640         if (!capable(CAP_SYS_MODULE) || modules_disabled)
3641                 return -EPERM;
3642
3643         return 0;
3644 }
3645
3646 /*
3647  * We try to place it in the list now to make sure it's unique before
3648  * we dedicate too many resources.  In particular, temporary percpu
3649  * memory exhaustion.
3650  */
3651 static int add_unformed_module(struct module *mod)
3652 {
3653         int err;
3654         struct module *old;
3655
3656         mod->state = MODULE_STATE_UNFORMED;
3657
3658 again:
3659         mutex_lock(&module_mutex);
3660         old = find_module_all(mod->name, strlen(mod->name), true);
3661         if (old != NULL) {
3662                 if (old->state != MODULE_STATE_LIVE) {
3663                         /* Wait in case it fails to load. */
3664                         mutex_unlock(&module_mutex);
3665                         err = wait_event_interruptible(module_wq,
3666                                                finished_loading(mod->name));
3667                         if (err)
3668                                 goto out_unlocked;
3669                         goto again;
3670                 }
3671                 err = -EEXIST;
3672                 goto out;
3673         }
3674         mod_update_bounds(mod);
3675         list_add_rcu(&mod->list, &modules);
3676         mod_tree_insert(mod);
3677         err = 0;
3678
3679 out:
3680         mutex_unlock(&module_mutex);
3681 out_unlocked:
3682         return err;
3683 }
3684
3685 static int complete_formation(struct module *mod, struct load_info *info)
3686 {
3687         int err;
3688
3689         mutex_lock(&module_mutex);
3690
3691         /* Find duplicate symbols (must be called under lock). */
3692         err = verify_exported_symbols(mod);
3693         if (err < 0)
3694                 goto out;
3695
3696         /* This relies on module_mutex for list integrity. */
3697         module_bug_finalize(info->hdr, info->sechdrs, mod);
3698
3699         module_enable_ro(mod, false);
3700         module_enable_nx(mod);
3701         module_enable_x(mod);
3702
3703         /* Mark state as coming so strong_try_module_get() ignores us,
3704          * but kallsyms etc. can see us. */
3705         mod->state = MODULE_STATE_COMING;
3706         mutex_unlock(&module_mutex);
3707
3708         return 0;
3709
3710 out:
3711         mutex_unlock(&module_mutex);
3712         return err;
3713 }
3714
3715 static int prepare_coming_module(struct module *mod)
3716 {
3717         int err;
3718
3719         ftrace_module_enable(mod);
3720         err = klp_module_coming(mod);
3721         if (err)
3722                 return err;
3723
3724         blocking_notifier_call_chain(&module_notify_list,
3725                                      MODULE_STATE_COMING, mod);
3726         return 0;
3727 }
3728
3729 static int unknown_module_param_cb(char *param, char *val, const char *modname,
3730                                    void *arg)
3731 {
3732         struct module *mod = arg;
3733         int ret;
3734
3735         if (strcmp(param, "async_probe") == 0) {
3736                 mod->async_probe_requested = true;
3737                 return 0;
3738         }
3739
3740         /* Check for magic 'dyndbg' arg */
3741         ret = ddebug_dyndbg_module_param_cb(param, val, modname);
3742         if (ret != 0)
3743                 pr_warn("%s: unknown parameter '%s' ignored\n", modname, param);
3744         return 0;
3745 }
3746
3747 /* Allocate and load the module: note that size of section 0 is always
3748    zero, and we rely on this for optional sections. */
3749 static int load_module(struct load_info *info, const char __user *uargs,
3750                        int flags)
3751 {
3752         struct module *mod;
3753         long err = 0;
3754         char *after_dashes;
3755
3756         err = elf_header_check(info);
3757         if (err)
3758                 goto free_copy;
3759
3760         err = setup_load_info(info, flags);
3761         if (err)
3762                 goto free_copy;
3763
3764         if (blacklisted(info->name)) {
3765                 err = -EPERM;
3766                 goto free_copy;
3767         }
3768
3769         err = module_sig_check(info, flags);
3770         if (err)
3771                 goto free_copy;
3772
3773         err = rewrite_section_headers(info, flags);
3774         if (err)
3775                 goto free_copy;
3776
3777         /* Check module struct version now, before we try to use module. */
3778         if (!check_modstruct_version(info, info->mod)) {
3779                 err = -ENOEXEC;
3780                 goto free_copy;
3781         }
3782
3783         /* Figure out module layout, and allocate all the memory. */
3784         mod = layout_and_allocate(info, flags);
3785         if (IS_ERR(mod)) {
3786                 err = PTR_ERR(mod);
3787                 goto free_copy;
3788         }
3789
3790         audit_log_kern_module(mod->name);
3791
3792         /* Reserve our place in the list. */
3793         err = add_unformed_module(mod);
3794         if (err)
3795                 goto free_module;
3796
3797 #ifdef CONFIG_MODULE_SIG
3798         mod->sig_ok = info->sig_ok;
3799         if (!mod->sig_ok) {
3800                 pr_notice_once("%s: module verification failed: signature "
3801                                "and/or required key missing - tainting "
3802                                "kernel\n", mod->name);
3803                 add_taint_module(mod, TAINT_UNSIGNED_MODULE, LOCKDEP_STILL_OK);
3804         }
3805 #endif
3806
3807         /* To avoid stressing percpu allocator, do this once we're unique. */
3808         err = percpu_modalloc(mod, info);
3809         if (err)
3810                 goto unlink_mod;
3811
3812         /* Now module is in final location, initialize linked lists, etc. */
3813         err = module_unload_init(mod);
3814         if (err)
3815                 goto unlink_mod;
3816
3817         init_param_lock(mod);
3818
3819         /* Now we've got everything in the final locations, we can
3820          * find optional sections. */
3821         err = find_module_sections(mod, info);
3822         if (err)
3823                 goto free_unload;
3824
3825         err = check_module_license_and_versions(mod);
3826         if (err)
3827                 goto free_unload;
3828
3829         /* Set up MODINFO_ATTR fields */
3830         setup_modinfo(mod, info);
3831
3832         /* Fix up syms, so that st_value is a pointer to location. */
3833         err = simplify_symbols(mod, info);
3834         if (err < 0)
3835                 goto free_modinfo;
3836
3837         err = apply_relocations(mod, info);
3838         if (err < 0)
3839                 goto free_modinfo;
3840
3841         err = post_relocation(mod, info);
3842         if (err < 0)
3843                 goto free_modinfo;
3844
3845         flush_module_icache(mod);
3846
3847         /* Now copy in args */
3848         mod->args = strndup_user(uargs, ~0UL >> 1);
3849         if (IS_ERR(mod->args)) {
3850                 err = PTR_ERR(mod->args);
3851                 goto free_arch_cleanup;
3852         }
3853
3854         dynamic_debug_setup(mod, info->debug, info->num_debug);
3855
3856         /* Ftrace init must be called in the MODULE_STATE_UNFORMED state */
3857         ftrace_module_init(mod);
3858
3859         /* Finally it's fully formed, ready to start executing. */
3860         err = complete_formation(mod, info);
3861         if (err)
3862                 goto ddebug_cleanup;
3863
3864         err = prepare_coming_module(mod);
3865         if (err)
3866                 goto bug_cleanup;
3867
3868         /* Module is ready to execute: parsing args may do that. */
3869         after_dashes = parse_args(mod->name, mod->args, mod->kp, mod->num_kp,
3870                                   -32768, 32767, mod,
3871                                   unknown_module_param_cb);
3872         if (IS_ERR(after_dashes)) {
3873                 err = PTR_ERR(after_dashes);
3874                 goto coming_cleanup;
3875         } else if (after_dashes) {
3876                 pr_warn("%s: parameters '%s' after `--' ignored\n",
3877                        mod->name, after_dashes);
3878         }
3879
3880         /* Link in to sysfs. */
3881         err = mod_sysfs_setup(mod, info, mod->kp, mod->num_kp);
3882         if (err < 0)
3883                 goto coming_cleanup;
3884
3885         if (is_livepatch_module(mod)) {
3886                 err = copy_module_elf(mod, info);
3887                 if (err < 0)
3888                         goto sysfs_cleanup;
3889         }
3890
3891         /* Get rid of temporary copy. */
3892         free_copy(info);
3893
3894         /* Done! */
3895         trace_module_load(mod);
3896
3897         return do_init_module(mod);
3898
3899  sysfs_cleanup:
3900         mod_sysfs_teardown(mod);
3901  coming_cleanup:
3902         mod->state = MODULE_STATE_GOING;
3903         destroy_params(mod->kp, mod->num_kp);
3904         blocking_notifier_call_chain(&module_notify_list,
3905                                      MODULE_STATE_GOING, mod);
3906         klp_module_going(mod);
3907  bug_cleanup:
3908         /* module_bug_cleanup needs module_mutex protection */
3909         mutex_lock(&module_mutex);
3910         module_bug_cleanup(mod);
3911         mutex_unlock(&module_mutex);
3912
3913  ddebug_cleanup:
3914         ftrace_release_mod(mod);
3915         dynamic_debug_remove(mod, info->debug);
3916         synchronize_rcu();
3917         kfree(mod->args);
3918  free_arch_cleanup:
3919         module_arch_cleanup(mod);
3920  free_modinfo:
3921         free_modinfo(mod);
3922  free_unload:
3923         module_unload_free(mod);
3924  unlink_mod:
3925         mutex_lock(&module_mutex);
3926         /* Unlink carefully: kallsyms could be walking list. */
3927         list_del_rcu(&mod->list);
3928         mod_tree_remove(mod);
3929         wake_up_all(&module_wq);
3930         /* Wait for RCU-sched synchronizing before releasing mod->list. */
3931         synchronize_rcu();
3932         mutex_unlock(&module_mutex);
3933  free_module:
3934         /* Free lock-classes; relies on the preceding sync_rcu() */
3935         lockdep_free_key_range(mod->core_layout.base, mod->core_layout.size);
3936
3937         module_deallocate(mod, info);
3938  free_copy:
3939         free_copy(info);
3940         return err;
3941 }
3942
3943 SYSCALL_DEFINE3(init_module, void __user *, umod,
3944                 unsigned long, len, const char __user *, uargs)
3945 {
3946         int err;
3947         struct load_info info = { };
3948
3949         err = may_init_module();
3950         if (err)
3951                 return err;
3952
3953         pr_debug("init_module: umod=%p, len=%lu, uargs=%p\n",
3954                umod, len, uargs);
3955
3956         err = copy_module_from_user(umod, len, &info);
3957         if (err)
3958                 return err;
3959
3960         return load_module(&info, uargs, 0);
3961 }
3962
3963 SYSCALL_DEFINE3(finit_module, int, fd, const char __user *, uargs, int, flags)
3964 {
3965         struct load_info info = { };
3966         loff_t size;
3967         void *hdr;
3968         int err;
3969
3970         err = may_init_module();
3971         if (err)
3972                 return err;
3973
3974         pr_debug("finit_module: fd=%d, uargs=%p, flags=%i\n", fd, uargs, flags);
3975
3976         if (flags & ~(MODULE_INIT_IGNORE_MODVERSIONS
3977                       |MODULE_INIT_IGNORE_VERMAGIC))
3978                 return -EINVAL;